Mercurial > pidgin
view src/protocols/zephyr/ZCkIfNot.c @ 5966:5fb6bd688a5b
[gaim-migrate @ 6413]
I renamed file_is_dir to gaim_gtk_check_if_dir and moved it to gtkutils.c/h
Chipster (or whoever) - Lemme know if that's notsogood, remember: I pretend
not to know anything about gtk.
committer: Tailor Script <tailor@pidgin.im>
author | Mark Doliner <mark@kingant.net> |
---|---|
date | Fri, 27 Jun 2003 23:11:21 +0000 |
parents | 424a40f12a6c |
children | 43d6c08d7e96 |
line wrap: on
line source
/* This file is part of the Project Athena Zephyr Notification System. * It contains source for the ZCheckIfNotice function. * * Created by: Robert French * * $Source$ * $Author: warmenhoven $ * * Copyright (c) 1987,1988 by the Massachusetts Institute of Technology. * For copying and distribution information, see the file * "mit-copyright.h". */ /* $Header$ */ #include <internal.h> #ifndef lint static const char rcsid_ZCheckIfNotice_c[] = "$Id: ZCkIfNot.c 2096 2001-07-31 01:00:39Z warmenhoven $"; #endif Code_t ZCheckIfNotice(notice, from, predicate, args) ZNotice_t *notice; struct sockaddr_in *from; register int (*predicate) __P((ZNotice_t *, void *)); void *args; { ZNotice_t tmpnotice; Code_t retval; register char *buffer; register struct _Z_InputQ *qptr; if ((retval = Z_ReadEnqueue()) != ZERR_NONE) return (retval); qptr = Z_GetFirstComplete(); while (qptr) { if ((retval = ZParseNotice(qptr->packet, qptr->packet_len, &tmpnotice)) != ZERR_NONE) return (retval); if ((*predicate)(&tmpnotice, args)) { if (!(buffer = (char *) malloc((unsigned) qptr->packet_len))) return (ENOMEM); (void) memcpy(buffer, qptr->packet, qptr->packet_len); if (from) *from = qptr->from; if ((retval = ZParseNotice(buffer, qptr->packet_len, notice)) != ZERR_NONE) { free(buffer); return (retval); } Z_RemQueue(qptr); return (ZERR_NONE); } qptr = Z_GetNextComplete(qptr); } return (ZERR_NONOTICE); }