blob: a215cd3674418e2c2cf7459e78ae9a87f218531d (
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
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
static char *rcs = "$Header: has.c,v 1.1 88/01/15 12:17:00 simpson Rel $";
/*
$Log: has.c,v $
* Revision 1.1 88/01/15 12:17:00 simpson
* initial release
*
* Revision 0.1 87/12/11 17:02:12 simpson
* beta test
*
*/
#include <stdio.h>
#include "profile.h"
PROFILE_MARKER *profile_has_marker (s, m)
PROFILE_STANZA *s;
char *m;
{
PROFILE_MARKER *x;
int result;
for (x = s->marker; x; x = x->next)
if(glob_match(x->text, m) > 0)
return(x);
return((PROFILE_MARKER *)0);
}
/*
* read down a linked list of stanzas looking
* for a stanza that has the requested markers
*/
PROFILE_STANZA *profile_has_stanza(s, marker)
PROFILE_STANZA *s;
char *marker[]; /* terminated by a null pointer */
{
int i;
PROFILE_STANZA *x;
if (s == NULL)
return(s);
x = s;
do {
for (i = 0; marker[i] != NULL; i++)
if (profile_has_marker(x, marker[i]) == NULL)
break;
if (marker[i] == NULL)
return(x);
x = x->next;
} while (x != s && x != NULL);
return((PROFILE_STANZA *)NULL);
}
PROFILE_BINDING *profile_has_binding (s, b)
PROFILE_STANZA *s;
char *b;
{
PROFILE_BINDING *x;
for (x = s->binding; x; x = x->next)
if (glob_match(x->name, b) > 0)
return(x);
return((PROFILE_BINDING *)0);
}
|