src/protocols/zephyr/ZPeekIfNot.c

changeset 2086
007508451e2c
child 8792
b0645c9dc276
equal deleted inserted replaced
2085:4659ae7bc69c 2086:007508451e2c
1 /* This file is part of the Project Athena Zephyr Notification System.
2 * It contains source for the ZPeekIfNotice function.
3 *
4 * Created by: Robert French
5 *
6 * $Source$
7 * $Author: warmenhoven $
8 *
9 * Copyright (c) 1987,1988 by the Massachusetts Institute of Technology.
10 * For copying and distribution information, see the file
11 * "mit-copyright.h".
12 */
13 /* $Header$ */
14
15 #ifndef lint
16 static char rcsid_ZPeekIfNotice_c[] = "$Header$";
17 #endif
18
19 #include <internal.h>
20
21 Code_t ZPeekIfNotice(notice, from, predicate, args)
22 ZNotice_t *notice;
23 struct sockaddr_in *from;
24 int (*predicate)();
25 char *args;
26 {
27 ZNotice_t tmpnotice;
28 Code_t retval;
29 char *buffer;
30 struct _Z_InputQ *qptr;
31
32 if ((retval = Z_WaitForComplete()) != ZERR_NONE)
33 return (retval);
34
35 for (;;) {
36 qptr = Z_GetFirstComplete();
37 while (qptr) {
38 if ((retval = ZParseNotice(qptr->packet, qptr->packet_len,
39 &tmpnotice)) != ZERR_NONE)
40 return (retval);
41 if ((*predicate)(&tmpnotice, args)) {
42 if (!(buffer = (char *) malloc((unsigned) qptr->packet_len)))
43 return (ENOMEM);
44 (void) memcpy(buffer, qptr->packet, qptr->packet_len);
45 if (from)
46 *from = qptr->from;
47 if ((retval = ZParseNotice(buffer, qptr->packet_len,
48 notice)) != ZERR_NONE) {
49 free(buffer);
50 return (retval);
51 }
52 return (ZERR_NONE);
53 }
54 qptr = Z_GetNextComplete(qptr);
55 }
56 if ((retval = Z_ReadWait()) != ZERR_NONE)
57 return (retval);
58 }
59 }

mercurial