blob: e74a3d2228db1c156da7771d568bffab672eadcd (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
|
/* This file is part of the Project Athena Zephyr Notification System.
* It contains source for ZPeekPacket function.
*
* Created by: Robert French
*
* $Source$
* $Author$
*
* Copyright (c) 1987 by the Massachusetts Institute of Technology.
* For copying and distribution information, see the file
* "mit-copyright.h".
*/
/* $Header$ */
#include <zephyr/mit-copyright.h>
#include <zephyr/zephyr_internal.h>
Code_t ZPeekPacket(buffer,buffer_len,ret_len,from)
ZPacket_t buffer;
int buffer_len;
int *ret_len;
struct sockaddr_in *from;
{
int retval;
if (ZGetFD() < 0)
return (ZERR_NOPORT);
if (!ZQLength())
if ((retval = Z_ReadWait()) != ZERR_NONE)
return (retval);
if (buffer_len < __Q_Head->packet_len) {
*ret_len = buffer_len;
retval = ZERR_PKTLEN;
}
else {
*ret_len = __Q_Head->packet_len;
retval = ZERR_NONE;
}
bcopy(__Q_Head->packet,buffer,*ret_len);
bcopy(&__Q_Head->from,from,sizeof(struct sockaddr_in));
return (retval);
}
|