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
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
|
/*
* DIS/x : An implementation of the IEEE 1278.1 protocol
*
* Copyright (C) 1996, Riley Rainey (rainey@netcom.com)
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of either:
*
* a) the GNU Library General Public License as published by the Free
* Software Foundation; either version 2 of the License, or (at your
* option) any later version. A description of the terms and conditions
* of the GLPL may be found in the "COPYING.LIB" file.
*
* b) the "Artistic License" which comes with this Kit. Information
* about this license may be found in the "Artistic" file.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Library General Public License or the Artistic License for more details.
*
* You should have received a copy of the GNU Library General Public
* License along with this library; if not, write to the Free
* Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*
* Information describing how to contact the author can be found in the
* README file.
*/
#include <dis/dis.h>
#include <rpc/rpc.h>
#include <string.h>
#include "simmgr.h"
static struct timeval TIMEOUT =
{25, 0};
extern CLIENT *simx_clnt;
extern bool_t xdr_simx_lookup_complete_entity_type_result(register XDR * xdrs, simx_lookup_complete_entity_type_result * objp);
typedef struct _client_names_cache_entry {
dis_entity_type key;
simx_lookup_complete_entity_type_result result;
struct _client_names_cache_entry *next;
struct _client_names_cache_entry *prev;
} client_names_cache_entry;
static client_names_cache_entry *cache_list_head = 0, *cache_list_tail = 0;
static int cache_list_count = 0;
static int cache_list_max = 32;
int
SIMxLookupEntityName(dis_entity_type * p, char *result, int size)
{
simx_lookup_entity_type_result res;
res.value = NULL;
if (clnt_call(simx_clnt, SIMxLookupEntityNameP,
(xdrproc_t) xdr_dis_entity_type, (char *) p,
(xdrproc_t) xdr_simx_lookup_entity_type_result, (char *) &res,
TIMEOUT) != RPC_SUCCESS) {
return SIMx_TIMEOUT;
}
strncpy(result, res.value, size);
free(res.value);
return res.status_code;
}
int
SIMxLookupEntityNames(dis_entity_type * p, char *result[7], int size)
{
simx_lookup_complete_entity_type_result res;
client_names_cache_entry *cp;
/*
* First, check the client's local cache of query results.
*/
for (cp = cache_list_head; cp; cp = cp->next) {
if (memcmp((char *) &cp->key, (char *) p,
sizeof(cp->key)) == 0) {
/*
* Found a match in the cache, move it to the head of the cache list.
*/
if (cache_list_head != cp) {
if (cache_list_tail == cp) {
cache_list_tail = cp->prev;
}
if (cp->prev) {
cp->prev->next = cp->next;
}
if (cp->next) {
cp->next->prev = cp->prev;
}
/*
* There are always at least two entries in the cache if we get to here,
* so we can be a bit sloppy about how we insert the cache entry onto the
* head of the list
*/
cp->next = cache_list_head;
cp->prev = 0;
cp->next->prev = cp;
cache_list_head = cp;
}
/*
* Return result
*/
res = cp->result;
strncpy(result[0], res.kind_value, size);
strncpy(result[1], res.domain_value, size);
strncpy(result[2], res.country_value, size);
strncpy(result[3], res.category_value, size);
strncpy(result[4], res.subcategory_value, size);
strncpy(result[5], res.specific_value, size);
strncpy(result[6], res.extra_value, size);
return res.status_code;
}
}
/*
* Wasn't in the cache -- consult the server via RPC
*/
res.status_code = 0;
res.kind_value = NULL;
res.domain_value = NULL;
res.country_value = NULL;
res.category_value = NULL;
res.subcategory_value = NULL;
res.specific_value = NULL;
res.extra_value = NULL;
if (clnt_call(simx_clnt, SIMxLookupEntityNamesP,
(xdrproc_t) xdr_dis_entity_type, (char *) p,
(xdrproc_t) xdr_simx_lookup_complete_entity_type_result, (char *) &res,
TIMEOUT) != RPC_SUCCESS) {
return SIMx_TIMEOUT;
}
strncpy(result[0], res.kind_value, size);
strncpy(result[1], res.domain_value, size);
strncpy(result[2], res.country_value, size);
strncpy(result[3], res.category_value, size);
strncpy(result[4], res.subcategory_value, size);
strncpy(result[5], res.specific_value, size);
strncpy(result[6], res.extra_value, size);
/*
* Add new cache entry (or replace the least used one) with the results
* of this query
*/
if (cache_list_count == cache_list_max) {
cp = cache_list_tail;
free(cp->result.kind_value);
free(cp->result.domain_value);
free(cp->result.country_value);
free(cp->result.category_value);
free(cp->result.subcategory_value);
free(cp->result.specific_value);
free(cp->result.extra_value);
}
else {
cp = (client_names_cache_entry *)
malloc(sizeof(client_names_cache_entry));
cp->next = 0;
cp->prev = cache_list_tail;
cache_list_tail = cp;
++cache_list_count;
}
cp->key = *p;
cp->result = res;
#ifdef notdef
cp->result.kind_value = strdup(cp->result.kind_value);
cp->result.domain_value = strdup(cp->result.domain_value);
cp->result.country_value = strdup(cp->result.country_value);
cp->result.category_value = strdup(cp->result.category_value);
cp->result.subcategory_value = strdup(cp->result.subcategory_value);
cp->result.specific_value = strdup(cp->result.specific_value);
cp->result.extra_value = strdup(cp->result.extra_value);
xdr_free(xdr_simx_lookup_complete_entity_type_result, (char *) &res);
#endif
return res.status_code;
}
|
