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
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
|
/* MODULE HTAssoc.c
** ASSOCIATION LIST FOR STORING NAME-VALUE PAIRS.
** NAMES NOT CASE SENSITIVE, AND ONLY COMMON LENGTH
** IS CHECKED (allows abbreviations; well, length is
** taken from lookup-up name, so if table contains
** a shorter abbrev it is not found).
** AUTHORS:
** AL Ari Luotonen luotonen@dxcern.cern.ch
**
** HISTORY:
**
**
** BUGS:
**
**
*/
#include "HTUtils.h"
#include <string.h>
#include "HTAAUtil.h"
#include "HTAssoc.h"
#include "HTString.h"
#include "LYLeaks.h"
PUBLIC HTAssocList *HTAssocList_new NOARGS
{
return HTList_new();
}
PUBLIC void HTAssocList_delete ARGS1(HTAssocList *, alist)
{
if (alist) {
HTAssocList *cur = alist;
HTAssoc *assoc;
while (NULL != (assoc = (HTAssoc*)HTList_nextObject(cur))) {
FREE(assoc->name);
FREE(assoc->value);
FREE(assoc);
}
HTList_delete(alist);
alist = NULL;
}
}
PUBLIC void HTAssocList_add ARGS3(HTAssocList *, alist,
CONST char *, name,
CONST char *, value)
{
HTAssoc *assoc;
if (alist) {
if (!(assoc = (HTAssoc*)malloc(sizeof(HTAssoc))))
outofmem(__FILE__, "HTAssoc_add");
assoc->name = NULL;
assoc->value = NULL;
if (name)
StrAllocCopy(assoc->name, name);
if (value)
StrAllocCopy(assoc->value, value);
HTList_addObject(alist, (void*)assoc);
} else if (TRACE) {
fprintf(stderr, "HTAssoc_add: ERROR: assoc list NULL!!\n");
}
}
PUBLIC char *HTAssocList_lookup ARGS2(HTAssocList *, alist,
CONST char *, name)
{
HTAssocList *cur = alist;
HTAssoc *assoc;
while (NULL != (assoc = (HTAssoc*)HTList_nextObject(cur))) {
if (!strncasecomp(assoc->name, name, strlen(name)))
return assoc->value;
}
return NULL;
}
|