blob: 002a4733a4902f80b9eec57f3c366b816236585c (
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
|
/* This file is part of the Project Athena Zephyr Notification System.
* It contains source for the ZGetSubscriptions 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>
#define min(a,b) ((a)<(b)?(a):(b))
Code_t ZGetSubscriptions(subscription,numsubs)
ZSubscription_t *subscription;
int *numsubs;
{
int i;
if (!__subscriptions_list)
return (ZERR_NOSUBSCRIPTIONS);
if (__subscriptions_next == __subscriptions_num)
return (ZERR_NOMORESUBSCRIPTIONS);
for (i=0;i<min(*numsubs,__subscriptions_num-__subscriptions_next);i++)
subscription[i] = __subscriptions_list[i+__subscriptions_next];
if (__subscriptions_num-__subscriptions_next < *numsubs)
*numsubs = __subscriptions_num-__subscriptions_next;
__subscriptions_next += *numsubs;
return (ZERR_NONE);
}
|
