Mercurial > pidgin
view src/protocols/zephyr/ZPeekIfNot.c @ 3127:4e7cefc55971
[gaim-migrate @ 3142]
Upgraded jabber to most recent stable version
committer: Tailor Script <tailor@pidgin.im>
author | Sean Egan <seanegan@gmail.com> |
---|---|
date | Thu, 04 Apr 2002 03:04:57 +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 ZPeekIfNotice 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$ */ #ifndef lint static char rcsid_ZPeekIfNotice_c[] = "$Header$"; #endif #include <internal.h> Code_t ZPeekIfNotice(notice, from, predicate, args) ZNotice_t *notice; struct sockaddr_in *from; int (*predicate)(); char *args; { ZNotice_t tmpnotice; Code_t retval; char *buffer; struct _Z_InputQ *qptr; if ((retval = Z_WaitForComplete()) != ZERR_NONE) return (retval); for (;;) { 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); } return (ZERR_NONE); } qptr = Z_GetNextComplete(qptr); } if ((retval = Z_ReadWait()) != ZERR_NONE) return (retval); } }