Commit | Line | Data |
---|---|---|
bac41a7b A |
1 | /* |
2 | * tbl.c | |
3 | * | |
4 | * "TBL" ASN.1 module encode/decode/print/free C src. | |
5 | * | |
6 | * This file was generated by snacc on Mon Jun 2 11:23:51 1997 | |
7 | * | |
8 | * UBC snacc written by Mike Sample | |
9 | * | |
10 | * NOTE: This is a machine generated file - editing not recommended | |
11 | */ | |
12 | ||
13 | ||
14 | ||
15 | #include "asn-incl.h" | |
16 | #include "tbl.h" | |
17 | ||
18 | ||
19 | AsnLen | |
20 | BEncTBLRangeContent PARAMS ((b, v), | |
21 | BUF_TYPE b _AND_ | |
22 | TBLRange *v) | |
23 | { | |
24 | AsnLen totalLen = 0; | |
25 | AsnLen itemLen; | |
26 | AsnLen listLen; | |
27 | void *component; | |
28 | ||
29 | itemLen = BEncAsnIntContent (b, (&v->to)); | |
30 | BEncDefLenTo127 (b, itemLen); | |
31 | itemLen++; | |
32 | itemLen += BEncTag1 (b, CNTX, PRIM, 1); | |
33 | ||
34 | totalLen += itemLen; | |
35 | ||
36 | itemLen = BEncAsnIntContent (b, (&v->from)); | |
37 | BEncDefLenTo127 (b, itemLen); | |
38 | itemLen++; | |
39 | itemLen += BEncTag1 (b, CNTX, PRIM, 0); | |
40 | ||
41 | totalLen += itemLen; | |
42 | ||
43 | return totalLen; | |
44 | ||
45 | } /* BEncTBLRangeContent */ | |
46 | ||
47 | ||
48 | ||
49 | ||
50 | AsnLen | |
51 | BEncTBLNamedNumberContent PARAMS ((b, v), | |
52 | BUF_TYPE b _AND_ | |
53 | TBLNamedNumber *v) | |
54 | { | |
55 | AsnLen totalLen = 0; | |
56 | AsnLen itemLen; | |
57 | AsnLen listLen; | |
58 | void *component; | |
59 | ||
60 | itemLen = BEncAsnIntContent (b, (&v->value)); | |
61 | BEncDefLenTo127 (b, itemLen); | |
62 | itemLen++; | |
63 | itemLen += BEncTag1 (b, CNTX, PRIM, 1); | |
64 | ||
65 | totalLen += itemLen; | |
66 | ||
67 | itemLen = BEncPrintableStringContent (b, (&v->name)); | |
68 | itemLen += BEncDefLen (b, itemLen); | |
69 | itemLen += BEncTag1 (b, CNTX, PRIM, 0); | |
70 | ||
71 | totalLen += itemLen; | |
72 | ||
73 | return totalLen; | |
74 | ||
75 | } /* BEncTBLNamedNumberContent */ | |
76 | ||
77 | ||
78 | ||
79 | ||
80 | AsnLen | |
81 | BEncTBLNamedNumberListContent PARAMS ((b, v), | |
82 | BUF_TYPE b _AND_ | |
83 | TBLNamedNumberList *v) | |
84 | { | |
85 | AsnLen totalLen = 0; | |
86 | AsnLen itemLen; | |
87 | AsnLen listLen; | |
88 | void *component; | |
89 | ||
90 | listLen = 0; | |
91 | FOR_EACH_LIST_ELMT_RVS (component, v) | |
92 | { | |
93 | BEncEocIfNec (b); | |
94 | itemLen = BEncTBLNamedNumberContent (b, component); | |
95 | itemLen += BEncConsLen (b, itemLen); | |
96 | itemLen += BEncTag1 (b, UNIV, CONS, 16); | |
97 | ||
98 | listLen += itemLen; | |
99 | } | |
100 | return listLen; | |
101 | ||
102 | } /* BEncTBLNamedNumberListContent */ | |
103 | ||
104 | ||
105 | ||
106 | ||
107 | AsnLen | |
108 | BEncTBLTypeRefContent PARAMS ((b, v), | |
109 | BUF_TYPE b _AND_ | |
110 | TBLTypeRef *v) | |
111 | { | |
112 | AsnLen totalLen = 0; | |
113 | AsnLen itemLen; | |
114 | AsnLen listLen; | |
115 | void *component; | |
116 | ||
117 | itemLen = BEncAsnBoolContent (b, (&v->implicit)); | |
118 | BEncDefLenTo127 (b, itemLen); | |
119 | itemLen++; | |
120 | itemLen += BEncTag1 (b, UNIV, PRIM, 1); | |
121 | ||
122 | totalLen += itemLen; | |
123 | ||
124 | itemLen = BEncTBLTypeDefIdContent (b, (&v->typeDef)); | |
125 | BEncDefLenTo127 (b, itemLen); | |
126 | itemLen++; | |
127 | itemLen += BEncTag1 (b, UNIV, PRIM, 2); | |
128 | ||
129 | totalLen += itemLen; | |
130 | ||
131 | return totalLen; | |
132 | ||
133 | } /* BEncTBLTypeRefContent */ | |
134 | ||
135 | ||
136 | ||
137 | ||
138 | AsnLen | |
139 | BEncTBLTagContent PARAMS ((b, v), | |
140 | BUF_TYPE b _AND_ | |
141 | TBLTag *v) | |
142 | { | |
143 | AsnLen totalLen = 0; | |
144 | AsnLen itemLen; | |
145 | AsnLen listLen; | |
146 | void *component; | |
147 | ||
148 | itemLen = BEncAsnIntContent (b, (&v->code)); | |
149 | BEncDefLenTo127 (b, itemLen); | |
150 | itemLen++; | |
151 | itemLen += BEncTag1 (b, UNIV, PRIM, 2); | |
152 | ||
153 | totalLen += itemLen; | |
154 | ||
155 | itemLen = BEncTBLTagClassContent (b, (&v->tclass)); | |
156 | BEncDefLenTo127 (b, itemLen); | |
157 | itemLen++; | |
158 | itemLen += BEncTag1 (b, UNIV, PRIM, 10); | |
159 | ||
160 | totalLen += itemLen; | |
161 | ||
162 | return totalLen; | |
163 | ||
164 | } /* BEncTBLTagContent */ | |
165 | ||
166 | ||
167 | ||
168 | ||
169 | AsnLen | |
170 | BEncTBLTypeSeqOfContent PARAMS ((b, v), | |
171 | BUF_TYPE b _AND_ | |
172 | TBLTypeSeqOf *v) | |
173 | { | |
174 | AsnLen totalLen = 0; | |
175 | AsnLen itemLen; | |
176 | AsnLen listLen; | |
177 | void *component; | |
178 | ||
179 | listLen = 0; | |
180 | FOR_EACH_LIST_ELMT_RVS (component, v) | |
181 | { | |
182 | BEncEocIfNec (b); | |
183 | itemLen = BEncTBLTagContent (b, component); | |
184 | itemLen += BEncConsLen (b, itemLen); | |
185 | itemLen += BEncTag1 (b, UNIV, CONS, 16); | |
186 | ||
187 | listLen += itemLen; | |
188 | } | |
189 | return listLen; | |
190 | ||
191 | } /* BEncTBLTypeSeqOfContent */ | |
192 | ||
193 | ||
194 | ||
195 | ||
196 | AsnLen | |
197 | BEncTBLTypeContentSeqOfContent PARAMS ((b, v), | |
198 | BUF_TYPE b _AND_ | |
199 | TBLTypeContentSeqOf *v) | |
200 | { | |
201 | AsnLen totalLen = 0; | |
202 | AsnLen itemLen; | |
203 | AsnLen listLen; | |
204 | void *component; | |
205 | ||
206 | listLen = 0; | |
207 | FOR_EACH_LIST_ELMT_RVS (component, v) | |
208 | { | |
209 | BEncEocIfNec (b); | |
210 | itemLen = BEncTBLTypeContent (b, component); | |
211 | itemLen += BEncConsLen (b, itemLen); | |
212 | itemLen += BEncTag1 (b, UNIV, CONS, 16); | |
213 | ||
214 | listLen += itemLen; | |
215 | } | |
216 | return listLen; | |
217 | ||
218 | } /* BEncTBLTypeContentSeqOfContent */ | |
219 | ||
220 | ||
221 | ||
222 | ||
223 | AsnLen | |
224 | BEncTBLTypeContent PARAMS ((b, v), | |
225 | BUF_TYPE b _AND_ | |
226 | TBLType *v) | |
227 | { | |
228 | AsnLen totalLen = 0; | |
229 | AsnLen itemLen; | |
230 | AsnLen listLen; | |
231 | void *component; | |
232 | ||
233 | if (NOT_NULL ((v->values))) | |
234 | { | |
235 | BEncEocIfNec (b); | |
236 | itemLen = BEncTBLNamedNumberListContent (b, (v->values)); | |
237 | itemLen += BEncConsLen (b, itemLen); | |
238 | itemLen += BEncTag1 (b, CNTX, CONS, 6); | |
239 | ||
240 | totalLen += itemLen; | |
241 | } | |
242 | ||
243 | if (NOT_NULL ((v->constraint))) | |
244 | { | |
245 | BEncEocIfNec (b); | |
246 | itemLen = BEncTBLRangeContent (b, (v->constraint)); | |
247 | itemLen += BEncConsLen (b, itemLen); | |
248 | itemLen += BEncTag1 (b, CNTX, CONS, 5); | |
249 | ||
250 | totalLen += itemLen; | |
251 | } | |
252 | ||
253 | if (ASNOCTS_PRESENT ((&v->fieldName))) | |
254 | { | |
255 | itemLen = BEncPrintableStringContent (b, (&v->fieldName)); | |
256 | itemLen += BEncDefLen (b, itemLen); | |
257 | itemLen += BEncTag1 (b, CNTX, PRIM, 4); | |
258 | ||
259 | totalLen += itemLen; | |
260 | } | |
261 | ||
262 | BEncEocIfNec (b); | |
263 | itemLen = BEncTBLTypeContentContent (b, (v->content)); | |
264 | itemLen += BEncConsLen (b, itemLen); | |
265 | itemLen += BEncTag1 (b, CNTX, CONS, 3); | |
266 | ||
267 | totalLen += itemLen; | |
268 | ||
269 | if (NOT_NULL ((v->tagList))) | |
270 | { | |
271 | BEncEocIfNec (b); | |
272 | itemLen = BEncTBLTypeSeqOfContent (b, (v->tagList)); | |
273 | itemLen += BEncConsLen (b, itemLen); | |
274 | itemLen += BEncTag1 (b, CNTX, CONS, 2); | |
275 | ||
276 | totalLen += itemLen; | |
277 | } | |
278 | ||
279 | itemLen = BEncAsnBoolContent (b, (&v->optional)); | |
280 | BEncDefLenTo127 (b, itemLen); | |
281 | itemLen++; | |
282 | itemLen += BEncTag1 (b, CNTX, PRIM, 1); | |
283 | ||
284 | totalLen += itemLen; | |
285 | ||
286 | itemLen = BEncTBLTypeIdContent (b, (&v->typeId)); | |
287 | BEncDefLenTo127 (b, itemLen); | |
288 | itemLen++; | |
289 | itemLen += BEncTag1 (b, CNTX, PRIM, 0); | |
290 | ||
291 | totalLen += itemLen; | |
292 | ||
293 | return totalLen; | |
294 | ||
295 | } /* BEncTBLTypeContent */ | |
296 | ||
297 | ||
298 | ||
299 | ||
300 | AsnLen | |
301 | BEncTBLTypeContentContent PARAMS ((b, v), | |
302 | BUF_TYPE b _AND_ | |
303 | TBLTypeContent *v) | |
304 | { | |
305 | AsnLen totalLen = 0; | |
306 | AsnLen itemLen; | |
307 | AsnLen listLen; | |
308 | void *component; | |
309 | ||
310 | switch (v->choiceId) | |
311 | { | |
312 | case TBLTYPECONTENT_PRIMTYPE: | |
313 | itemLen = BEncAsnNullContent (b, (&v->a.primType)); | |
314 | BEncDefLenTo127 (b, itemLen); | |
315 | itemLen++; | |
316 | itemLen += BEncTag1 (b, CNTX, PRIM, 0); | |
317 | ||
318 | totalLen += itemLen; | |
319 | ||
320 | break; | |
321 | ||
322 | case TBLTYPECONTENT_ELMTS: | |
323 | BEncEocIfNec (b); | |
324 | itemLen = BEncTBLTypeContentSeqOfContent (b, (v->a.elmts)); | |
325 | itemLen += BEncConsLen (b, itemLen); | |
326 | itemLen += BEncTag1 (b, CNTX, CONS, 1); | |
327 | ||
328 | totalLen += itemLen; | |
329 | ||
330 | break; | |
331 | ||
332 | case TBLTYPECONTENT_TYPEREF: | |
333 | BEncEocIfNec (b); | |
334 | itemLen = BEncTBLTypeRefContent (b, (v->a.typeRef)); | |
335 | itemLen += BEncConsLen (b, itemLen); | |
336 | itemLen += BEncTag1 (b, CNTX, CONS, 2); | |
337 | ||
338 | totalLen += itemLen; | |
339 | ||
340 | break; | |
341 | ||
342 | } | |
343 | return totalLen; | |
344 | ||
345 | } /* BEncTBLTypeContentContent */ | |
346 | ||
347 | ||
348 | ||
349 | ||
350 | AsnLen | |
351 | BEncTBLTypeDefContent PARAMS ((b, v), | |
352 | BUF_TYPE b _AND_ | |
353 | TBLTypeDef *v) | |
354 | { | |
355 | AsnLen totalLen = 0; | |
356 | AsnLen itemLen; | |
357 | AsnLen listLen; | |
358 | void *component; | |
359 | ||
360 | if (NOT_NULL ((v->isPdu))) | |
361 | { | |
362 | itemLen = BEncAsnNullContent (b, (v->isPdu)); | |
363 | BEncDefLenTo127 (b, itemLen); | |
364 | itemLen++; | |
365 | itemLen += BEncTag1 (b, UNIV, PRIM, 5); | |
366 | ||
367 | totalLen += itemLen; | |
368 | } | |
369 | ||
370 | BEncEocIfNec (b); | |
371 | itemLen = BEncTBLTypeContent (b, (v->type)); | |
372 | itemLen += BEncConsLen (b, itemLen); | |
373 | itemLen += BEncTag1 (b, UNIV, CONS, 16); | |
374 | ||
375 | totalLen += itemLen; | |
376 | ||
377 | itemLen = BEncPrintableStringContent (b, (&v->typeName)); | |
378 | itemLen += BEncDefLen (b, itemLen); | |
379 | itemLen += BEncTag1 (b, UNIV, PRIM, 19); | |
380 | ||
381 | totalLen += itemLen; | |
382 | ||
383 | itemLen = BEncTBLTypeDefIdContent (b, (&v->typeDefId)); | |
384 | BEncDefLenTo127 (b, itemLen); | |
385 | itemLen++; | |
386 | itemLen += BEncTag1 (b, UNIV, PRIM, 2); | |
387 | ||
388 | totalLen += itemLen; | |
389 | ||
390 | return totalLen; | |
391 | ||
392 | } /* BEncTBLTypeDefContent */ | |
393 | ||
394 | ||
395 | ||
396 | ||
397 | AsnLen | |
398 | BEncTBLModuleSeqOfContent PARAMS ((b, v), | |
399 | BUF_TYPE b _AND_ | |
400 | TBLModuleSeqOf *v) | |
401 | { | |
402 | AsnLen totalLen = 0; | |
403 | AsnLen itemLen; | |
404 | AsnLen listLen; | |
405 | void *component; | |
406 | ||
407 | listLen = 0; | |
408 | FOR_EACH_LIST_ELMT_RVS (component, v) | |
409 | { | |
410 | BEncEocIfNec (b); | |
411 | itemLen = BEncTBLTypeDefContent (b, component); | |
412 | itemLen += BEncConsLen (b, itemLen); | |
413 | itemLen += BEncTag1 (b, UNIV, CONS, 16); | |
414 | ||
415 | listLen += itemLen; | |
416 | } | |
417 | return listLen; | |
418 | ||
419 | } /* BEncTBLModuleSeqOfContent */ | |
420 | ||
421 | ||
422 | ||
423 | ||
424 | AsnLen | |
425 | BEncTBLModuleContent PARAMS ((b, v), | |
426 | BUF_TYPE b _AND_ | |
427 | TBLModule *v) | |
428 | { | |
429 | AsnLen totalLen = 0; | |
430 | AsnLen itemLen; | |
431 | AsnLen listLen; | |
432 | void *component; | |
433 | ||
434 | BEncEocIfNec (b); | |
435 | itemLen = BEncTBLModuleSeqOfContent (b, (v->typeDefs)); | |
436 | itemLen += BEncConsLen (b, itemLen); | |
437 | itemLen += BEncTag1 (b, CNTX, CONS, 3); | |
438 | ||
439 | totalLen += itemLen; | |
440 | ||
441 | itemLen = BEncAsnBoolContent (b, (&v->isUseful)); | |
442 | BEncDefLenTo127 (b, itemLen); | |
443 | itemLen++; | |
444 | itemLen += BEncTag1 (b, CNTX, PRIM, 2); | |
445 | ||
446 | totalLen += itemLen; | |
447 | ||
448 | if (ASNOID_PRESENT ((&v->id))) | |
449 | { | |
450 | itemLen = BEncAsnOidContent (b, (&v->id)); | |
451 | itemLen += BEncDefLen (b, itemLen); | |
452 | itemLen += BEncTag1 (b, CNTX, PRIM, 1); | |
453 | ||
454 | totalLen += itemLen; | |
455 | } | |
456 | ||
457 | itemLen = BEncPrintableStringContent (b, (&v->name)); | |
458 | itemLen += BEncDefLen (b, itemLen); | |
459 | itemLen += BEncTag1 (b, CNTX, PRIM, 0); | |
460 | ||
461 | totalLen += itemLen; | |
462 | ||
463 | return totalLen; | |
464 | ||
465 | } /* BEncTBLModuleContent */ | |
466 | ||
467 | ||
468 | ||
469 | ||
470 | AsnLen | |
471 | BEncTBLSeqOfContent PARAMS ((b, v), | |
472 | BUF_TYPE b _AND_ | |
473 | TBLSeqOf *v) | |
474 | { | |
475 | AsnLen totalLen = 0; | |
476 | AsnLen itemLen; | |
477 | AsnLen listLen; | |
478 | void *component; | |
479 | ||
480 | listLen = 0; | |
481 | FOR_EACH_LIST_ELMT_RVS (component, v) | |
482 | { | |
483 | BEncEocIfNec (b); | |
484 | itemLen = BEncTBLModuleContent (b, component); | |
485 | itemLen += BEncConsLen (b, itemLen); | |
486 | itemLen += BEncTag1 (b, UNIV, CONS, 16); | |
487 | ||
488 | listLen += itemLen; | |
489 | } | |
490 | return listLen; | |
491 | ||
492 | } /* BEncTBLSeqOfContent */ | |
493 | ||
494 | ||
495 | ||
496 | ||
497 | AsnLen BEncTBL PARAMS ((b, v), | |
498 | BUF_TYPE b _AND_ | |
499 | TBL *v) | |
500 | { | |
501 | AsnLen l; | |
502 | BEncEocIfNec (b); | |
503 | l = BEncTBLContent (b, v); | |
504 | l += BEncConsLen (b, l); | |
505 | l += BEncTag1 (b, UNIV, CONS, SEQ_TAG_CODE); | |
506 | return l; | |
507 | } /* BEncTBL */ | |
508 | ||
509 | AsnLen | |
510 | BEncTBLContent PARAMS ((b, v), | |
511 | BUF_TYPE b _AND_ | |
512 | TBL *v) | |
513 | { | |
514 | AsnLen totalLen = 0; | |
515 | AsnLen itemLen; | |
516 | AsnLen listLen; | |
517 | void *component; | |
518 | ||
519 | BEncEocIfNec (b); | |
520 | itemLen = BEncTBLSeqOfContent (b, (v->modules)); | |
521 | itemLen += BEncConsLen (b, itemLen); | |
522 | itemLen += BEncTag1 (b, UNIV, CONS, 16); | |
523 | ||
524 | totalLen += itemLen; | |
525 | ||
526 | itemLen = BEncAsnIntContent (b, (&v->totalLenStrings)); | |
527 | BEncDefLenTo127 (b, itemLen); | |
528 | itemLen++; | |
529 | itemLen += BEncTag1 (b, UNIV, PRIM, 2); | |
530 | ||
531 | totalLen += itemLen; | |
532 | ||
533 | itemLen = BEncAsnIntContent (b, (&v->totalNumStrings)); | |
534 | BEncDefLenTo127 (b, itemLen); | |
535 | itemLen++; | |
536 | itemLen += BEncTag1 (b, UNIV, PRIM, 2); | |
537 | ||
538 | totalLen += itemLen; | |
539 | ||
540 | itemLen = BEncAsnIntContent (b, (&v->totalNumTags)); | |
541 | BEncDefLenTo127 (b, itemLen); | |
542 | itemLen++; | |
543 | itemLen += BEncTag1 (b, UNIV, PRIM, 2); | |
544 | ||
545 | totalLen += itemLen; | |
546 | ||
547 | itemLen = BEncAsnIntContent (b, (&v->totalNumTypes)); | |
548 | BEncDefLenTo127 (b, itemLen); | |
549 | itemLen++; | |
550 | itemLen += BEncTag1 (b, UNIV, PRIM, 2); | |
551 | ||
552 | totalLen += itemLen; | |
553 | ||
554 | itemLen = BEncAsnIntContent (b, (&v->totalNumTypeDefs)); | |
555 | BEncDefLenTo127 (b, itemLen); | |
556 | itemLen++; | |
557 | itemLen += BEncTag1 (b, UNIV, PRIM, 2); | |
558 | ||
559 | totalLen += itemLen; | |
560 | ||
561 | itemLen = BEncAsnIntContent (b, (&v->totalNumModules)); | |
562 | BEncDefLenTo127 (b, itemLen); | |
563 | itemLen++; | |
564 | itemLen += BEncTag1 (b, UNIV, PRIM, 2); | |
565 | ||
566 | totalLen += itemLen; | |
567 | ||
568 | return totalLen; | |
569 | ||
570 | } /* BEncTBLContent */ | |
571 | ||
572 | ||
573 | ||
574 |