FreeCalypso > hg > fc-magnetite

comparison src/gpf2/inc/tdc_base.h @ 1:864b8cc0cf63

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/gpf2: preened GPF goo from TCS211
author Mychaela Falconia <falcon@freecalypso.org>
date Sun, 25 Sep 2016 23:38:58 +0000
parents
children
comparison
equal deleted inserted replaced
0:945cf7f506b2 1:864b8cc0cf63
1 /*
2 +-----------------------------------------------------------------------------
3 | Project :
4 | Modul : TDC
5 +-----------------------------------------------------------------------------
6 | Copyright 2002 Texas Instruments Berlin, AG
7 | All rights reserved.
8 |
9 | This file is confidential and a trade secret of Texas
10 | Instruments Berlin, AG
11 | The receipt of or possession of this file does not convey
12 | any rights to reproduce or disclose its contents or to
13 | manufacture, use, or sell anything it may describe, in
14 | whole, or in part, without the specific written consent of
15 | Texas Instruments Berlin, AG.
16 +-----------------------------------------------------------------------------
17 | Purpose :
18 +-----------------------------------------------------------------------------
19 */
20
21 #if defined TDC_PRECOMPILE && !defined TDC_BASE_TDC_H
22 #pragma message("TDC_BASE.H ENTERING PRECOMPILE MODE")
23 /*
24 This code is added to make a prettier and easier to navigate .i-file
25 Purpose:
26 A) maintain info of which macro codes come from
27 B) maintain line breaks from inside macros
28
29 The process include the following steps:
30
31 1:
32 Command:
33 perl tdc_h.pl ..\..\..\..\INC\tdc_base.h >tdc_base.tdc_h
34 (add TDC_BEGIN_MACRO TDC_NL TDC_MACRO_END TDC_NL macros)
35
36 Example transformation:
37 Input: (tdc_base.h)
38 */
39 #define MULTI_LINE_MACRO(A) ... \
40 ... \
41 ...
42 #define SINGLE_LINE_MACRO(A) ...
43 /*
44 Output: (tdc_base.tdc_h)
45 #define MULTI_LINE_MACRO(A) TDC_BEGIN_MACRO(MULTI_LINE_MACRO(A)) ... TDC_NL\
46 ... TDC_NL\
47 ... TDC_MACRO_END()
48 #define SINGLE_LINE_MACRO(A) TDC_MACRO(SINGLE_LINE_MACRO(A)) ...
49 2:
50 Command:
51 EDI preprocess .cpp-file with TDC and TDC_PRECOMPILE defined
52 (as a consequence tdc_base.tdc_h is used instead of tdc_base.h)
53
54 Example transformation:
55 Input: (use_some_macro.cpp)
56 MULTI_LINE_MACRO(B)
57 Output: (use_some_macro.i)
58 TDC_BEGIN_MACRO("MULTI_LINE_MACRO(B)") ... TDC_NL ... TDC_NL ... TDC_MACRO_END()
59
60 3:
61 Command:
62 perl tdc_i.pl .\tdc.i >tdc.tdc_i
63 (replace TDC_NL with real newline, make pretty indention
64
65 Example transformation:
66 Input: (use_some_macro.i)
67 TDC_BEGIN_MACRO("MULTI_LINE_MACRO(B)") ... TDC_NL ... TDC_NL ... TDC_MACRO_END
68 Output: (use_some_macro.tdc_i)
69 TDC_BEGIN_MACRO("MULTI_LINE_MACRO(B)") ...
70 ...
71 ... TDC_MACRO_END()
72
73 */
74 #define TDC_BASE_TDC_H
75 #include "tdc_base.tdc_h"
76 #endif //defined TDC_PRECOMPILE && !defined TDC_BASE_TDC_H
77
78 #ifndef TDC_BASE_H // stadard h-file guard
79 #define TDC_BASE_H
80
81 //============================================================================
82 /// \defgroup Configuration
83 //\{
84
85 ///memory leak detection
86 #define noTDC_USE_ALLOC_DEBUG_COUNTER
87
88 #define TDC_DEBUG
89
90 #define TDC_NO_PROFILING
91
92 ///include T_PORT
93 #define TDC_PORT
94
95 #define noM_TDC_MESSAGE_DEMO
96
97 ///typeinfo not needed, everything we need is in cccdgen tables
98 #define noTDC_TYPEINFO
99
100 ///never defined
101 #define noDOT_COMPLETE
102
103 //\}
104
105 //============================================================================
106 // include files
107 //============================================================================
108
109 //tdc_test_header_begin
110 //extern int dummy_to_make_namespace_non_empty;
111 //} //temporare leave namespace tdc
112 #ifndef TDC_TEST_I_CPP
113 #include <setjmp.h>
114 #include <stddef.h>
115 #include <typeinfo.h>
116 #include <malloc.h>
117 #include <string.h>
118 #endif
119 //namespace tdc { // reenter namespace tdc
120
121 //============================================================================
122 // controling warning levels from compilers
123 //============================================================================
124
125 #pragma warning(disable:4786)
126 //tdc_test_header_end
127
128 /*
129 general info members are constructed etc by generic functions so these are normal ok when
130 arriving inside M_TDC_... :
131 Warning 1539: member 'T_raw::handle' (line 3242, file M:\gpf\inc\tdc_base.h, module M:\gpf\util\tap\tdc\src\tdc_lib_main.cpp) not assigned by assignment operator
132 Warning 1401: member 'T_raw::handle' (line 3242, file M:\gpf\inc\tdc_base.h, module M:\gpf\util\tap\tdc\src\tdc_lib_main.cpp) not initialized by constructor
133 */
134
135 /*lint -e1717*/ //Info 1717: empty prototype for function declaration, assumed '(void)'
136 /*lint -e1505*/ //TODO: add access specifier for all base classes
137 /*lint -DLINT*/
138 /*lint -esym(18,BUF_*)*/ //CCDGEN generates surplus typedefs for _dsc.h-files
139 /*#lint -libdir(M:\gpf\util\teststack\inc\tdcinc)*/
140 /*#lint -libh(M:\gpf\util\teststack\inc\tdcinc\p_xx_tdc_1.h)*/
141
142 /// this lint option is used inside a macro, VA can not handle comments in macros correctly
143 #define TDC_LINT_UNUSED_MEMBER /*lint -e{754}*/
144 #define TDC_LINT_UNASSIGNED_MEMBER /*lint -e{1539}*/
145 #define TDC_LINT_UNCOPIED_BASE /*lint -e{1538}*/
146 #define TDC_LINT_NO_SELFASSIGN_TEST /*lint -e{1529}*/
147 #define TDC_LINT_UNINITIALIZED_MEMBER /*lint -e{1401}*/
148 #define TDC_LINT_POSSIBLE_UNHANDLE_POINTER_MEMBER /*lint -e{1740}*/
149
150 //============================================================================
151 /// \defgroup Constants
152 //============================================================================
153 //\{
154
155 #define FALSE 0
156 #define TRUE 1
157
158 /// TDSConstant comming from macros.h -> used in cc.doc
159 #define NOT_PRESENT_8BIT 0xff
160
161 /// TDSConstant comming from macros.h -> used in cc.doc
162 #define NOT_PRESENT_16BIT 0xffff
163
164 /// TDSConstant comming from macros.h -> used in cc.doc
165 #define NOT_PRESENT_32BIT 0xffffffffL
166
167 //\}
168
169 //============================================================================
170
171 #if TDC_DEBUG_DOT_COMPLETE
172 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_0
173 {
174 int i0;
175 };
176
177 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1
178 {
179 int i;
180 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_0 operator->(){}
181 };
182
183 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1A()
184 {
185 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
186 s.
187 i;
188 s->
189 i0;
190 }
191 #else
192 #endif
193
194 //============================================================================
195 // partial compiling tdcinc\*.cpp
196 //============================================================================
197
198 /** VC6 can not handle more than 30000 types per compilation unit, but this
199 has not so much to do with this, here we are trying to minimize the overall
200 memory usage during compilation, this is a problem for the umts asn1 file
201 the big isue is that determin this number is not an excat sicense since
202 VC give NO hint on whic entry is coursing this problem if it ocour during
203 pass2 of the compilation
204
205 to overcome this problem CCDGEN generate additional gaurds in tdcinc\*.cpp files
206
207 enum form
208
209 #if TDC_ENUM_PART
210 #ifndef TDC_SKIP_FORWARD_MENUM_prefix_enumtypename
211 M_TDC_POST_MENUM (prefix_enumtypename)
212 #endif
213 #endif // TDC_ENUM_PART
214
215 other form (example is for MSG but PRIM, STRUCT, UNION etc. use the same layout)
216
217 #if N / TDC_SIZE == TDC_PART
218 #ifndef TDC_SKIP_FORWARD_msgname
219 M_TDC_POST_MSG (msgname)
220 #endif
221 #endif // N / TDC_SIZE == TDC_PART
222
223 where N is a sequence number running from 0 and onwards, incremented by 1 for
224 each struct in the file
225
226 by defining TDC_SIZE and TDC_PART the source files can be partial compiled
227 the default behaviour is to compile the hole file at once
228
229 */
230
231 #ifndef TDC_PART
232 #define TDC_SIZE 99999L // number of structs per compilation
233 #define TDC_PART 0L // which struct part to compile in this session
234 #define TDC_ENUM_PART 1 // if enum part is to be compiled in this session
235 #elif TDC_PART == -1
236 #define TDC_ENUM_PART 1 // if enum part is to be compiled in this session
237 #else
238 #define TDC_ENUM_PART 0 // if enum part is to be compiled in this session
239 #endif
240
241 //============================================================================
242 // configuration side effects
243 //============================================================================
244
245 #ifndef TDC_DESCRIPTOR
246
247 #define NO_TDC_DESCRIPTOR
248
249 #else //TDC_DESCRIPTOR
250
251 #define __T_TDC_INTERFACE_MESSAGE__
252 #define __T_TDC_INTERFACE_PRIMITIVE__
253
254 #endif //TDC_DESCRIPTOR
255
256 //============================================================================
257 /// \defgroup dot_complete helper macros
258 //============================================================================
259 //\{
260
261 #if DOT_COMPLETE
262 #define TDC_DOT_COMPLETE_HIDE(code) \
263 /* nothing */
264 struct T_TDC_EMPTY {};
265 #else//DOT_COMPLETE
266 #define TDC_DOT_COMPLETE_HIDE(code) \
267 code
268 #endif//DOT_COMPLETE
269
270 //\}
271
272 //============================================================================
273 //
274 //============================================================================
275
276 ///tdc_test_header_begin
277 #ifndef M_TDC_DOC
278 #if DOT_COMPLETE
279
280 void TDC_NOTHING() {} // generate code for breakpoint
281 size_t TDC_LENGTHOF(array) {}
282 void TDC_DYNAMIC_DEAD_CODE() {} // program execution is not suposed to reach this point
283
284 #else //DOT_COMPLETE
285
286 void tdc_nothing();
287 /** generate code for breakpoint */
288 #define TDC_NOTHING() \
289 tdc_nothing()
290
291 #define TDC_DYNAMIC_DEAD_CODE() tdc_dynamic_dead_code() // program execution is not suposed to reach this point
292
293
294 #define TDC_LENGTHOF(array) (size_t(sizeof array / sizeof *array))
295
296 #define M_TDC_STRING1(text) #text
297 /** expand macros before stringify */
298 #define M_TDC_STRING(text) M_TDC_STRING1(text)
299
300 #endif //DOT_COMPLETE
301 #endif //M_TDC_DOC
302
303 // macro to show pragma message with file name and line number when compiling (see M_TDC_MESSAGE_DEMO below)
304 //#define M_TDC_MESSAGE(text) message(__FILE__ "(" M_TDC_STRING(__LINE__) ") : message: \'" text "\'")
305 #define M_TDC_MESSAGE(text) message(__FILE__ "(" M_TDC_STRING(__LINE__) ") : message: \'" M_TDC_STRING(text) "\'")
306 #ifdef M_TDC_MESSAGE_DEMO
307 // e.g. show how a macro is expanded
308 #define MY(X) MY_##X
309 #pragma M_TDC_MESSAGE(M_TDC_STRING(MY(Y)))
310 // compiler output: \gpf\inc\tdc_base.h(130) : message: 'MY_Y'
311 #endif
312
313 /// \defgroup IN_CLASS values for IN_CLASS macro argument
314 //\{
315 #define M_TDC_IN_CLASS(code) code
316 #define M_TDC_NOT_IN_CLASS(code)
317 #define M_TDC_NOT_M_TDC_IN_CLASS(code)
318 #define M_TDC_NOT_M_TDC_NOT_IN_CLASS(code) code
319 //\}
320
321 /// \defgroup WITH_BODY values for WITH_BODY macro argument
322 //\{
323 #define M_TDC_WITH_BODY(code) code
324 #define M_TDC_WITHOUT_BODY(code) ;
325 //\}
326
327 /// temporary removed multiline comments in multiline macros
328 /// <pre>(some compilers have problems with constructions like:
329 /// #define MY_MACRO() /* \\
330 /// my comment */ my_code
331 /// )</pre>
332 #define M_TDC_COMMENT(code) ;
333
334
335 /// \defgroup MacroTesting
336 /** for testing macros
337 * these macros is only used when tdc.dsw has the active project set to "tdc_lib - Win32 Precompile"
338 */
339 //\{
340 #define TDC_MACRO_BEGIN_(name,line)
341 #define TDC_MACRO_(name,line)
342 #define TDC_MACRO_END_()
343 //\}
344
345 // /tdc_test_header_end
346
347 #ifndef USE_TDC_TEST_I_II// during testing we see this part in the preprocessed file tdc_test_i.ii
348
349 struct T_TDC_BASE_DOT_COMPLETE_TEST
350 {
351 int i; //HINT
352 };
353
354 #define TDC_TBD() tdc_tbd(__FILE__, __LINE__)
355
356 #define TDC_ASSERT(condition) tdc_assert(condition,#condition,__FILE__,__LINE__)
357
358 #ifndef TDC_DEBUG
359 #define IF_TDC_DEBUG(code)
360 #else
361 #define IF_TDC_DEBUG(code) code
362 #endif
363
364 #ifndef TDC_TEST_PROFILE
365
366 #define TDC_PURE_BODY(code)\
367 = 0;
368
369 #else
370
371 #define TDC_PURE_BODY(code)\
372 {\
373 tdc_pure_body();\
374 code\
375 }\
376
377 #endif
378
379 #if TDC_DEBUG_DOT_COMPLETE
380 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1C()
381 {
382 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
383 s.
384 i;
385 }
386 #else
387 #endif
388
389 void tdc_cursor_trace (char* file, int line, char* format, ...);
390 void tdc_trace (char* format, ...);
391 void __declspec(noreturn) tdc_trace_fail (char* format, ...); /*lint -sem(tdc_trace_fail,r_no)*/
392 extern "C" void tdc_usi_trace (char* format, ...);
393 void __declspec(noreturn) tdc_internal_error (char* format, ...); /*lint -sem(tdc_internal_error,r_no)*/
394 void __declspec(noreturn) tdc_user_error (char* format, ...); /*lint -sem(tdc_user_error,r_no)*/
395 void tdc_check_array_assignment(const void* that, const void* address);
396
397 // some error reporting functions, which have no argument becourse they have to be called from a lot of places
398 void __declspec(noreturn) tdc_tbd(char* file, int line); /*lint -sem(tdc_tbd,r_no)*/// this facility is yet to be defined i.e. implemented
399 void __declspec(noreturn) tdc_tbd(char* message); /*lint -sem(tdc_tbd,r_no)*/// this facility is yet to be defined i.e. implemented
400
401 void __declspec(noreturn) tdc_tbd_pointer_assignment_error();
402 void __declspec(noreturn) tdc_tbd_array_assignment_error();
403 void __declspec(noreturn) tdc_tbd_array_assignment_error_T_ARRAY();
404 void __declspec(noreturn) tdc_tbd_xxx_constructor_call(char* message);
405 void __declspec(noreturn) tdc_tbd_constructor_call(char* message);
406 void __declspec(noreturn) tdc_tbd_primitive_union_constructor_call();
407 void __declspec(noreturn) tdc_tbd_message_union_constructor_call();
408
409 void tdc_pure_body();
410 void tdc_dynamic_dead_code(); // program execution is not suposed to reach this point
411 void tdc_missing_h_file(); // use of AIM/SAP not included
412 void tdc_assert(int condition, char* message, char* file, int line);
413
414 //============================================================================
415
416 #if TDC_DEBUG_DOT_COMPLETE
417 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1D()
418 {
419 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
420 s.
421 i;
422 }
423 #else
424 #endif
425
426 //----------------------------------------------------------------------------
427
428 //tdc_test_header_begin
429
430 //----------------------------------------------------------------------------
431 //
432 //----------------------------------------------------------------------------
433 #ifdef M_TDC_DOC
434 /*
435 The definitions in this sections is only present to be able to generate call graphs to be used
436 in documentation (call graphs are generated with SourceInsight 3.5)
437 */
438 /// \defgroup NamingScheme Naming convention template tree
439 //\{
440 /// \callgraph
441 #define BASE() MAIN() PART()
442 #define MAIN() all_unions() PRIM_and_MSG() XXX()
443 #define all_unions() PRMITIVE_UNION() MESSAGE_UNION()
444 #define XXX() XXX_PRMITIVE_UNION() XXX_MESSAGE_UNION()
445 #define PRIM_and_MSG() PRIM() MSG()
446 #define PART() COMP() VAR()
447 #define COMP() STRUCT() UNION()
448 #define VAR() INT() ENUM()
449 #define ENUM() PENUM() MENM()
450 #define PRMITIVE_UNION()
451 #define MESSAGE_UNION()
452 #define XXX_PRMITIVE_UNION()
453 #define XXX_MESSAGE_UNION()
454 #define PRIM()
455 #define MSG()
456 #define STRUCT() PSTRUCT() MSTRUCT()
457 #define UNION() PUNION() PUNION()
458 #define PSTRUCT()
459 #define MSTRUCT()
460 #define PUNION()
461 #define PUNION()
462 #define PENUM()
463 #define MENM()
464 #define INT()
465 //\}
466 // base entries
467 /*
468 #define M_TDC_BASE\
469 M_TDC_FORWARD_BASE(SHORT_NAME, T_HANDLE)\
470 M_TDC_INSTANCE_ADDITIONAL_BASE(IN_CLASS, WITH_BODY, T_INTERFACE_, T_INSTANCE, T_HANDLE_)\
471 M_TDC_INTERFACE_ADDITIONAL_BASE(IN_CLASS, WITH_BODY, T_INTERFACE, T_INSTANCE_, T_HANDLE)\
472 M_TDC_DESCRIPTOR_ADDITIONAL_BASE(SHORT_NAME)\
473 M_TDC_FORWARD_BASE(SHORT_NAME, T_HANDLE)\
474 //*/
475 //TDC keywords
476 void TDC_keywords()
477 {
478 FAIL();
479 PASS();
480 SEND(primitive);
481 AWAIT(primitive);
482 START_TIMEOUT(timeout);
483 WAIT_TIMEOUT();
484 MUTE(timeout);
485 COMMAND(command);
486 TIMEOUT(timeout);
487 PARKING(enable);
488 ALT() //dummy "()"to force call graph
489 {
490 ON(await);
491 OTHERWISE();
492 }
493 TRAP() //dummy "()"to force call graph
494 {
495 }
496 ONFAIL() //dummy "()"to force call graph
497 {
498 }
499 }
500 #endif
501 //----------------------------------------------------------------------------
502
503 #if DOT_COMPLETE_DEFINES
504
505 #define CCC(COMMENT)
506
507 //----------------------------------------------------------------------------
508 // macros to generate dummy functions body
509 //----------------------------------------------------------------------------
510
511 #define M_TDC_TYPE_NAME\
512 //for(;;); /* no error for missing return */
513
514 #define T_TDC_TYPE_NAME
515
516 //----------------------------------------------------------------------------
517 // macros to repeat stuff that is similar in many descriptor classes
518 //----------------------------------------------------------------------------
519
520 #define M_TDC_FORWARD_PRIM(SAP,SHORT_NAME)
521 #define M_TDC_FORWARD_PSTRUCT(SHORT_NAME)
522 #define M_TDC_FORWARD_PUNION(SHORT_NAME)
523 #define M_TDC_FORWARD_SDU(SHORT_NAME)
524 #define M_TDC_FORWARD_PENUM(SHORT_NAME)
525 //-----
526 #define M_TDC_FORWARD_MSG(SHORT_NAME)
527 #define M_TDC_FORWARD_MSTRUCT(SHORT_NAME)
528 #define M_TDC_FORWARD_MUNION(SHORT_NAME)
529 #define M_TDC_FORWARD_MENUM(SHORT_NAME)
530 //-----
531 #define M_TDC_FORWARD_INT(SHORT_NAME)
532 #define M_TDC_FORWARD_XXX_PRIMITIVE_UNION(SAP)
533 #define M_TDC_FORWARD_XXX_MESSAGE_UNION(MSG)
534 #define M_TDC_FORWARD_PRIMITIVE()
535 #define M_TDC_FORWARD_MESSAGE()
536
537 //----------------------------------------------------------------------------
538 // macros to repeat stuff that is similar in many descriptor classes
539 //----------------------------------------------------------------------------
540
541 #define M_TDC_DESCRIPTOR_PRIM_ADDITIONAL(SHORT_NAME)
542 #define M_TDC_DESCRIPTOR_PSTRUCT_ADDITIONAL(SHORT_NAME)
543 #define M_TDC_DESCRIPTOR_PUNION_ADDITIONAL(SHORT_NAME)
544 #define M_TDC_DESCRIPTOR_SDU_ADDITIONAL(SHORT_NAME)
545 #define M_TDC_DESCRIPTOR_PENUM_ADDITIONAL(SHORT_NAME)
546 //-----
547 #define M_TDC_DESCRIPTOR_MSG_ADDITIONAL(SHORT_NAME)
548 #define M_TDC_DESCRIPTOR_MSTRUCT_ADDITIONAL(SHORT_NAME)
549 #define M_TDC_DESCRIPTOR_MUNION_ADDITIONAL(SHORT_NAME)
550 #define M_TDC_DESCRIPTOR_MENUM_ADDITIONAL(SHORT_NAME)
551 //-----
552 #define M_TDC_DESCRIPTOR_INT_ADDITIONAL(SHORT_NAME)
553 #define M_TDC_DESCRIPTOR_XXX_PRIMITIVE_UNION_ADDITIONAL(SAP)
554 #define M_TDC_DESCRIPTOR_XXX_MESSAGE_UNION_ADDITIONAL(MSG)
555 #define M_TDC_CREATE_DEFAULT_PRIMITIVE_DESCRIPTOR_CLASS(SAP)
556 #define M_TDC_DESCRIPTOR_PRIMITIVE_ADDITIONAL()
557 #define M_TDC_CREATE_DEFAULT_MESSAGE_DESCRIPTOR_CLASS(MSG)
558 #define M_TDC_DESCRIPTOR_MESSAGE_ADDITIONAL()
559
560 //----------------------------------------------------------------------------
561 // macros to repeat stuff that is similar in many interface classes
562 //----------------------------------------------------------------------------
563
564 #ifndef TDC_T_TDC_INTERFACE_DOT_COMPLETE_TEST
565 #define TDC_T_TDC_INTERFACE_DOT_COMPLETE_TEST
566 struct T_TDC_INTERFACE_DOT_COMPLETE_TEST
567 {
568 typedef char T_HANDLE;
569 };
570 #endif //TDC_T_TDC_INTERFACE_DOT_COMPLETE_TEST
571
572 //-----
573 #define M_TDC_INTERFACE_PRIM_ADDITIONAL(SHORT_NAME) /*nothing*/
574 #define M_TDC_INTERFACE_PSTRUCT_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
575 #define M_TDC_INTERFACE_PUNION_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
576 #define M_TDC_INTERFACE_SDU_ADDITIONAL(SHORT_NAME) /*nothing*/
577 #define M_TDC_INTERFACE_PENUM_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
578 //-----
579 #define M_TDC_INTERFACE_MSG_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
580 #define M_TDC_INTERFACE_MSTRUCT_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
581 #define M_TDC_INTERFACE_MUNION_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
582 #define M_TDC_INTERFACE_MENUM_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
583 //-----
584 #define M_TDC_INTERFACE_INT_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
585 #define M_TDC_INTERFACE_XXX_PRIMITIVE_UNION_ADDITIONAL(SAP,PREFIXED_SAP) /*nothing*/
586 #define M_TDC_INTERFACE_XXX_MESSAGE_UNION_ADDITIONAL(MSG,PREFIXED_MSG) /*nothing*/
587 #define M_TDC_CREATE_DEFAULT_PRIMITIVE_INTERFACE_CLASS(SAP) /*nothing*/
588 #define M_TDC_INTERFACE_PRIMITIVE_ADDITIONAL() /*nothing*/
589 #define M_TDC_CREATE_DEFAULT_MESSAGE_INTERFACE_CLASS(MSG) /*nothing*/
590 #define M_TDC_INTERFACE_MESSAGE_ADDITIONAL() /*nothing*/
591
592 //----------------------------------------------------------------------------
593 // macros to repeat stuff that is similar in many instance classes
594 //----------------------------------------------------------------------------
595
596 #define M_TDC_INSTANCE_PRIM_ADDITIONAL(SAP,SHORT_NAME) /*nothing*/
597 #define M_TDC_INSTANCE_PSTRUCT_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
598 #define M_TDC_INSTANCE_PUNION_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
599 #define M_TDC_INSTANCE_SDU_ADDITIONAL(SHORT_NAME) /*nothing*/
600 #define M_TDC_INSTANCE_PENUM_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
601 //-----
602 #define M_TDC_INSTANCE_MSG_ADDITIONAL(MSG,SHORT_NAME) /*nothing*/
603 #define M_TDC_INSTANCE_MSTRUCT_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
604 #define M_TDC_INSTANCE_MUNION_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
605 #define M_TDC_INSTANCE_MENUM_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME) /*nothing*/
606 //-----
607 #define M_TDC_INSTANCE_INT_ADDITIONAL(SHORT_NAME) /*nothing*/
608 #define M_TDC_INSTANCE_XXX_PRIMITIVE_ADDITIONAL(SAP) /*nothing*/
609 #define M_TDC_INSTANCE_XXX_MESSAGE_ADDITIONAL(MSG) /*nothing*/
610 #define M_TDC_INSTANCE_PRIMITIVE_ADDITIONAL() /*nothing*/
611 #define M_TDC_INSTANCE_MESSAGE_ADDITIONAL() /*nothing*/
612
613 #else
614 #endif
615
616 //tdc_test_header_end
617
618 #if DOT_COMPLETE_DEFINES
619 #else //DOT_COMPLETE_DEFINES
620
621 #ifndef TDC_KEEP_CCC
622 #define CCC(COMMENT)
623 #endif //TDC_KEEP_CCC
624
625 //----------------------------------------------------------------------------
626 // macros to control namespace
627 //----------------------------------------------------------------------------
628
629 #define M_TDC_ENTER() //TODO namespace TDC {
630 #define M_TDC_LEAVE() //TODO }
631
632 //----------------------------------------------------------------------------
633 // macros to generate dummy functions body
634 //----------------------------------------------------------------------------
635
636 #define M_TDC_TYPE_NAME\
637 return T_TDC_TYPE_NAME();
638
639 //#define T_TDC_TYPE_NAME M_TDC_HIDE(T_TDC_TYPE_NAME)
640
641 //----------------------------------------------------------------------------
642 // macros to hide templates from dot-completion
643 //----------------------------------------------------------------------------
644
645 typedef char T_TDC_LEVEL;
646 extern T_TDC_LEVEL tdc_level;
647
648 //----------------------------------------------------------------------------
649 // macros to repeat stuff that is similar in many descriptor classes
650 //----------------------------------------------------------------------------
651
652 #ifndef TDC_DESCRIPTOR
653
654
655 #define M_TDC_FORWARD_BASE(SHORT_NAME,T_HANDLE)\
656 struct T_TDC_INTERFACE_##SHORT_NAME;\
657 T_TDC_INTERFACE_BASE* new_T_TDC_INTERFACE_##SHORT_NAME();\
658 struct T_HANDLE;\
659 T_TDC_HANDLE_BASE* new_##T_HANDLE();\
660
661 #define M_TDC_FORWARD_COMP(SHORT_NAME,TDC_IS)\
662 M_TDC_FORWARD_BASE(SHORT_NAME, T_TDC_HANDLE_##SHORT_NAME)\
663
664 #define M_TDC_FORWARD_VAR(SHORT_NAME)\
665 M_TDC_FORWARD_BASE(SHORT_NAME, T_TDC_DESCRIPTOR_##SHORT_NAME)\
666
667
668 #define M_TDC_POST_BASE(SHORT_NAME,T_HANDLE)\
669 M_TDC_INTERFACE_ADDITIONAL_BASE (M_TDC_NOT_IN_CLASS, M_TDC_WITH_BODY, T_TDC_INTERFACE_##SHORT_NAME, T_##SHORT_NAME, T_HANDLE)\
670 M_TDC_INSTANCE_ADDITIONAL_BASE (M_TDC_NOT_IN_CLASS, M_TDC_WITH_BODY, T_TDC_INTERFACE_##SHORT_NAME, T_##SHORT_NAME, T_HANDLE)\
671
672 #define M_TDC_POST_XXX(SHORT_NAME,TDC_IS)\
673 M_TDC_POST_BASE(SHORT_NAME, T_TDC_HANDLE_##SHORT_NAME)\
674
675 #define M_TDC_POST_COMP(SHORT_NAME,TDC_IS)\
676 M_TDC_POST_BASE(SHORT_NAME, T_TDC_HANDLE_##SHORT_NAME)\
677
678 #define M_TDC_POST_VAR(SHORT_NAME)\
679 M_TDC_POST_BASE(SHORT_NAME, T_TDC_DESCRIPTOR_##SHORT_NAME)\
680
681
682 #else //TDC_DESCRIPTOR
683
684
685 #define M_TDC_FORWARD_BASE(SHORT_NAME,T_HANDLE)\
686
687 #define M_TDC_FORWARD_COMP(SHORT_NAME,TDC_IS)\
688 M_TDC_FORWARD_DESCRIPTOR_COMP(SHORT_NAME,TDC_IS)\
689
690 // TODO:eliminate forwards: T_##SHORT_NAME and T_TDC_INTERFACE_##SHORT_NAME
691 #define M_TDC_FORWARD_VAR(SHORT_NAME)\
692 M_TDC_FORWARD_BASE(SHORT_NAME,T_TDC_HANDLE_##SHORT_NAME)\
693 struct T_TDC_DESCRIPTOR_##SHORT_NAME;\
694 struct T_##SHORT_NAME;\
695 struct T_TDC_INTERFACE_##SHORT_NAME;\
696 typedef T_TDC_DESCRIPTOR_##SHORT_NAME T_TDC_HANDLE_##SHORT_NAME;\
697 T_TDC_HANDLE_BASE* new_T_TDC_DESCRIPTOR_##SHORT_NAME();\
698
699 #define M_TDC_POST_DESCRIPTOR_BASE(SHORT_NAME,T_HANDLE)\
700 T_TDC_HANDLE_BASE* new_##T_HANDLE()\
701 {\
702 return new T_HANDLE;\
703 }\
704
705 #if TDC_DEBUG_DOT_COMPLETE
706 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_6
707 {
708 int i6;
709 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
710 };
711
712 inline void dot_complete_test(){
713 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_6 tdc_debug_dot_complete__tdc_h;
714 tdc_debug_dot_complete__tdc_h. i6;
715 tdc_debug_dot_complete__tdc_h-> i;
716 }
717 #else
718 #endif
719
720 #define M_TDC_POST_XXX(SHORT_NAME,TDC_IS)\
721 M_TDC_POST_DESCRIPTOR_BASE(SHORT_NAME,T_TDC_HANDLE_##SHORT_NAME)\
722 T_TDC_DESCRIPTOR_BASE* new_T_TDC_DESCRIPTOR_##SHORT_NAME ()\
723 {\
724 return new T_TDC_DESCRIPTOR_##SHORT_NAME;\
725 }\
726
727 #define M_TDC_POST_COMP(SHORT_NAME, TDC_IS)\
728 M_TDC_POST_DESCRIPTOR_COMP(SHORT_NAME, TDC_IS)\
729
730 #define M_TDC_POST_VAR(SHORT_NAME)\
731 M_TDC_POST_DESCRIPTOR_BASE(SHORT_NAME, T_TDC_DESCRIPTOR_##SHORT_NAME)\
732
733
734 #endif //TDC_DESCRIPTOR
735
736
737 #define M_TDC_FORWARD_DESCRIPTOR_COMP(SHORT_NAME,TDC_IS)\
738 M_TDC_HANDLE(M_TDC_IN_CLASS,M_TDC_WITHOUT_BODY,SHORT_NAME,TDC_IS)\
739
740 #define M_TDC_POST_DESCRIPTOR_COMP(SHORT_NAME, TDC_IS)\
741 M_TDC_POST_DESCRIPTOR_BASE(SHORT_NAME,T_TDC_HANDLE_##SHORT_NAME)\
742 T_TDC_DESCRIPTOR_BASE* T_TDC_HANDLE_##SHORT_NAME::implement_new_descriptor () const\
743 {\
744 return new T_TDC_DESCRIPTOR_##SHORT_NAME;\
745 }\
746 M_TDC_HANDLE_ADDITIONAL(M_TDC_NOT_IN_CLASS,M_TDC_WITH_BODY,T_TDC_HANDLE_##SHORT_NAME,SHORT_NAME,TDC_IS)\
747
748
749 /*lint -emacro(1706,M_TDC_HANDLE_ADDITIONAL)*/ //we don't want M_TDC_NOT(IN_CLASS(...)) for all the scope operators
750 #define M_TDC_HANDLE_ADDITIONAL(IN_CLASS,WITH_BODY,T_HANDLE_,SHORT_NAME,TDC_IS)\
751 IN_CLASS(virtual) char* T_HANDLE_::get_name () const\
752 WITH_BODY({\
753 return #SHORT_NAME;\
754 })\
755 IN_CLASS(virtual) long T_HANDLE_::get_sizeof ()\
756 WITH_BODY({\
757 return sizeof *this;\
758 })\
759 IN_CLASS(virtual) T_TDC_IS_ENUM T_HANDLE_::is ()\
760 WITH_BODY({\
761 return T_TDC_IS_ENUM (TDC_IS_COMP | TDC_IS);\
762 })\
763 IN_CLASS(static) T_TDC_HANDLE_BASE* T_HANDLE_::implement_new_handle ()\
764 WITH_BODY({\
765 return new T_HANDLE_();\
766 })\
767
768 #define M_TDC_HANDLE(IN_CLASS,WITH_BODY,SHORT_NAME,TDC_IS)\
769 struct T_TDC_DESCRIPTOR_##SHORT_NAME;\
770 struct T_TDC_HANDLE_##SHORT_NAME:T_TDC_HANDLE_BASE\
771 {\
772 typedef T_TDC_DESCRIPTOR_##SHORT_NAME T_DESCRIPTOR;\
773 M_TDC_HANDLE_ADDITIONAL(IN_CLASS,WITH_BODY,T_TDC_HANDLE_##SHORT_NAME,SHORT_NAME,TDC_IS)\
774 M_TDC_DESCRIPTOR_HANDLE_ADDITIONAL_PART (T_TDC_DESCRIPTOR_##SHORT_NAME)\
775 protected:\
776 virtual T_TDC_DESCRIPTOR_BASE* implement_new_descriptor () const;\
777 };\
778
779 #if TDC_DEBUG_DOT_COMPLETE
780 inline void dot_complete_test(){
781 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_6 tdc_debug_dot_complete__tdc_h;
782 tdc_debug_dot_complete__tdc_h. i6;
783 tdc_debug_dot_complete__tdc_h-> i;
784 }
785 #else
786 #endif
787
788 //------
789
790 #define M_TDC_FORWARD_PRIM(SHORT_NAME)\
791 M_TDC_FORWARD_COMP (SHORT_NAME,TDC_IS_PRIM)
792
793 #define M_TDC_FORWARD_PSTRUCT(SHORT_NAME)\
794 M_TDC_FORWARD_COMP (SHORT_NAME,TDC_IS_STRUCT)
795
796 #define M_TDC_FORWARD_PUNION(SHORT_NAME)\
797 M_TDC_FORWARD_COMP (SHORT_NAME,TDC_IS_UNION)
798
799 #define M_TDC_FORWARD_SDU(SHORT_NAME)\
800 M_TDC_FORWARD_COMP (SHORT_NAME,TDC_IS_SDU)
801
802 #define M_TDC_FORWARD_TYPEDEF_SDU(BUF)\
803 typedef T_TDC_HANDLE_SDU T_TDC_HANDLE_##BUF;\
804 typedef T_TDC_DESCRIPTOR_SDU T_TDC_DESCRIPTOR_##BUF;\
805
806 /**TODO: eliminate this macro*/
807 #define M_FORWARD_TYPEDEF_SDU(BUF)\
808 M_TDC_FORWARD_TYPEDEF_SDU(BUF)\
809
810 #define M_TDC_FORWARD_TYPEDEF(BASE,SHORT_NAME)\
811 typedef T_TDC_HANDLE_##BASE T_TDC_HANDLE_##SHORT_NAME;\
812 typedef T_TDC_DESCRIPTOR_##BASE T_TDC_DESCRIPTOR_##SHORT_NAME;\
813
814 #define M_TDC_FORWARD_PENUM(SHORT_NAME)\
815 M_TDC_FORWARD_VAR (SHORT_NAME)
816
817 #if TDC_DEBUG_DOT_COMPLETE
818 inline void dot_complete_test(){
819 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_6 tdc_debug_dot_complete__tdc_h;
820 tdc_debug_dot_complete__tdc_h. i6;
821 tdc_debug_dot_complete__tdc_h-> i;
822 }
823 #else
824 #endif
825
826 //------
827
828 #define M_TDC_FORWARD_MSG(SHORT_NAME)\
829 M_TDC_FORWARD_COMP (SHORT_NAME,TDC_IS_MSG)
830
831 #define M_TDC_FORWARD_MSTRUCT(SHORT_NAME)\
832 M_TDC_FORWARD_COMP (SHORT_NAME,TDC_IS_STRUCT)
833
834 #define M_TDC_FORWARD_MUNION(SHORT_NAME)\
835 M_TDC_FORWARD_COMP (SHORT_NAME,TDC_IS_UNION)
836
837 #define M_TDC_FORWARD_MENUM(SHORT_NAME)\
838 M_TDC_FORWARD_VAR (SHORT_NAME)
839
840 //------
841
842 #define M_TDC_FORWARD_INT(SHORT_NAME)\
843 M_TDC_FORWARD_BASE(SHORT_NAME, T_TDC_DESCRIPTOR_##SHORT_NAME)\
844 struct T_TDC_DESCRIPTOR_##SHORT_NAME;\
845 typedef T_TDC_DESCRIPTOR_##SHORT_NAME T_TDC_HANDLE_##SHORT_NAME;\
846 typedef T_TDC_INT_##SHORT_NAME SHORT_NAME;\
847 T_TDC_HANDLE_BASE* new_T_TDC_DESCRIPTOR_##SHORT_NAME();\
848
849 #if TDC_DEBUG_DOT_COMPLETE
850 inline void dot_complete_test(){
851 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_6 tdc_debug_dot_complete__tdc_h;
852 tdc_debug_dot_complete__tdc_h. i6;
853 tdc_debug_dot_complete__tdc_h-> i;
854 }
855 #else
856 #endif
857
858 #define M_TDC_FORWARD_XXX_PRIMITIVE_UNION(SAP)\
859 M_TDC_FORWARD_BASE (SAP, T_TDC_HANDLE_##SAP)\
860
861 #define M_TDC_FORWARD_XXX_MESSAGE_UNION(MSG)\
862 M_TDC_FORWARD_BASE (MSG,T_TDC_HANDLE_##MSG)\
863
864 #if TDC_DEBUG_DOT_COMPLETE
865 inline void dot_complete_test(){
866 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_6 tdc_debug_dot_complete__tdc_h;
867 tdc_debug_dot_complete__tdc_h. i6;
868 tdc_debug_dot_complete__tdc_h-> i;
869 }
870 #else
871 #endif
872
873 //----------------------------------------------------------------------------
874 // macros to repeat stuff that is similar in many descriptor classes
875 //----------------------------------------------------------------------------
876
877 #define M_TDC_POST_PRIM(SHORT_NAME)\
878 M_TDC_POST_COMP (SHORT_NAME, TDC_IS_PRIM)
879
880 #define M_TDC_POST_PSTRUCT(SHORT_NAME)\
881 M_TDC_POST_COMP (SHORT_NAME, TDC_IS_STRUCT)
882
883 #define M_TDC_POST_PUNION(SHORT_NAME)\
884 M_TDC_POST_COMP (SHORT_NAME, TDC_IS_UNION)
885
886 #define M_TDC_POST_SDU(SHORT_NAME)
887
888 #define M_TDC_POST_PENUM(SHORT_NAME)\
889 M_TDC_POST_VAR (SHORT_NAME)
890
891 #define M_TDC_POST_MSG(SHORT_NAME)\
892 M_TDC_POST_COMP (SHORT_NAME, TDC_IS_MSG)
893
894 #define M_TDC_POST_MSTRUCT(SHORT_NAME)\
895 M_TDC_POST_COMP (SHORT_NAME, TDC_IS_STRUCT)
896
897 #define M_TDC_POST_MUNION(SHORT_NAME)\
898 M_TDC_POST_COMP (SHORT_NAME, TDC_IS_UNION)
899
900 #define M_TDC_POST_MENUM(SHORT_NAME)\
901 M_TDC_POST_VAR (SHORT_NAME)
902
903 #define M_TDC_POST_INT(SHORT_NAME)
904
905 #define M_TDC_POST_XXX_PRIMITIVE_UNION(SAP)\
906 M_TDC_POST_XXX(SAP,TDC_IS_XXX_PRIMITIE_UNION)
907
908 #define M_TDC_POST_XXX_MESSAGE_UNION(MSG)\
909 M_TDC_POST_XXX(MSG,TDC_IS_XXX_MESSAGE_UNION)
910
911 #define M_TDC_POST_PRIMITIVE()
912
913 #define M_TDC_POST_MESSAGE()
914
915 #if TDC_DEBUG_DOT_COMPLETE
916 inline void dot_complete_test(){
917 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_6 tdc_debug_dot_complete__tdc_h;
918 tdc_debug_dot_complete__tdc_h. i6;
919 tdc_debug_dot_complete__tdc_h-> i;
920 }
921
922 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_5
923 {
924 int i5;
925 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
926 };
927
928 inline void dot_complete_test(){
929 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_5 tdc_debug_dot_complete__tdc_h;
930 tdc_debug_dot_complete__tdc_h. i4;
931 tdc_debug_dot_complete__tdc_h-> i;
932 }
933 #else
934 #endif
935
936 //============================================================================
937
938 #if TDC_DEBUG_DOT_COMPLETE
939 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1F
940 {
941 int i1F;
942 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
943 };
944 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1F()
945 {
946 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
947 s.
948 i;
949 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1F s1F;
950 s1F->
951 i0;
952 }
953 #else
954 #endif
955
956 //----------------------------------------------------------------------------
957 /// \defgroup M_TDC_DESCRIPTOR M_TDC_DESCRIPTOR
958 /// macros to repeat stuff that is similar in many descriptor classes
959 //----------------------------------------------------------------------------
960 //\{
961
962 /** declare action and description elements that are accessed through typecast to stencil */
963 #define M_TDC_DESCRIPTOR_HANDLE_ADDITIONAL_PART(T_DESCRIPTOR)\
964 T_TDC_ACTION_ENUM action TDC_LINT_UNUSED_MEMBER;\
965 T_DESCRIPTOR* descriptor TDC_LINT_UNUSED_MEMBER;\
966
967 #define M_TDC_DESCRIPTOR_ADDITIONAL_BASE(SHORT_NAME)\
968 private:\
969 virtual long get_sizeof ()\
970 {\
971 return sizeof *this;\
972 }\
973
974 #define M_TDC_DESCRIPTOR_ADDITIONAL_MAIN_BASE(SHORT_NAME)\
975 M_TDC_DESCRIPTOR_ADDITIONAL_BASE(SHORT_NAME)\
976 public:\
977 int ctrl;\
978 virtual int read_ctrl () const\
979 {\
980 return ctrl;\
981 }\
982 T_TDC_HANDLE_BASE* get_element (unsigned index)\
983 {\
984 return implement_get_union_element (index, ctrl);\
985 }\
986 virtual char* get_name () const\
987 {\
988 return #SHORT_NAME;\
989 }\
990 T_TDC_DESCRIPTOR_##SHORT_NAME ():\
991 ctrl (0)\
992 {\
993 }\
994
995
996 #define M_TDC_DESCRIPTOR_ADDITIONAL_STRUCT_BASE(SHORT_NAME)\
997 M_TDC_DESCRIPTOR_ADDITIONAL_BASE(SHORT_NAME)\
998 public:\
999 typedef T_TDC_HANDLE_##SHORT_NAME T_HANDLE;\
1000 virtual char* get_name () const\
1001 {\
1002 extern char* TDC_NAME_##SHORT_NAME;\
1003 return TDC_NAME_##SHORT_NAME;\
1004 }\
1005 friend T_TDC_DESCRIPTOR_BASE* new_T_TDC_DESCRIPTOR_##SHORT_NAME ()\
1006 {\
1007 return new T_TDC_DESCRIPTOR_##SHORT_NAME;\
1008 }\
1009 T_TDC_DESCRIPTOR_##SHORT_NAME ()\
1010 {\
1011 }\
1012
1013 #define M_TDC_DESCRIPTOR_ADDITIONAL_UNION_BASE(SHORT_NAME,TABLE_KIND)\
1014 M_TDC_DESCRIPTOR_ADDITIONAL_BASE(SHORT_NAME)\
1015 public:\
1016 typedef T_TDC_HANDLE_##SHORT_NAME T_HANDLE;\
1017 int ctrl;\
1018 virtual int read_ctrl () const\
1019 {\
1020 return ctrl;\
1021 }\
1022 T_TDC_HANDLE_BASE* get_element (unsigned index)\
1023 {\
1024 return implement_get_union_element (index, ctrl);\
1025 }\
1026 virtual char* get_name () const\
1027 {\
1028 extern char* TDC_NAME_##SHORT_NAME;\
1029 return TDC_NAME_##SHORT_NAME;\
1030 }\
1031 T_TDC_DESCRIPTOR_##SHORT_NAME ():\
1032 ctrl (0)\
1033 {\
1034 }\
1035
1036 /**
1037 * \todo move get_tap_handle() to var base class
1038 */
1039 #define M_TDC_DESCRIPTOR_ADDITIONAL_VAR(T_DESCRIPTOR, T_VAR, SHORT_NAME)\
1040 M_TDC_DESCRIPTOR_ADDITIONAL_BASE(SHORT_NAME)\
1041 public:\
1042 typedef T_DESCRIPTOR T_HANDLE;\
1043 T_TDC_ACTION_ENUM action;\
1044 union \
1045 {\
1046 T_VAR value;\
1047 T_TDC_BASIC_TYPES value_as_basic_types;\
1048 };\
1049 virtual char* get_name () const\
1050 {\
1051 extern char* TDC_NAME_##SHORT_NAME;\
1052 return TDC_NAME_##SHORT_NAME;\
1053 }\
1054 T_DESCRIPTOR ():\
1055 action (TDC_ACTION_DEFAULT)\
1056 {\
1057 }\
1058 virtual unsigned get_sizeof_target ()\
1059 {\
1060 return sizeof T_VAR;\
1061 }\
1062 static T_TDC_HANDLE_BASE* implement_new_handle ()\
1063 {\
1064 return new_##T_DESCRIPTOR();\
1065 }\
1066
1067 //-----
1068
1069 #define M_TDC_DESCRIPTOR_INT_ADDITIONAL(SHORT_NAME)\
1070 M_TDC_DESCRIPTOR_ADDITIONAL_VAR (T_TDC_DESCRIPTOR_##SHORT_NAME, T_TDC_INT_##SHORT_NAME,SHORT_NAME)\
1071 virtual T_TDC_IS_ENUM is ()\
1072 {\
1073 return TDC_IS_VAR;\
1074 }\
1075
1076 //-----
1077
1078 #define M_TDC_DESCRIPTOR_PRIM_ADDITIONAL(SHORT_NAME)\
1079 M_TDC_DESCRIPTOR_ADDITIONAL_STRUCT_BASE (SHORT_NAME)\
1080 virtual int get_id () const\
1081 {\
1082 return SHORT_NAME;\
1083 }\
1084
1085 #define M_TDC_DESCRIPTOR_PSTRUCT_ADDITIONAL(SHORT_NAME)\
1086 M_TDC_DESCRIPTOR_ADDITIONAL_STRUCT_BASE (SHORT_NAME)\
1087
1088 #define M_TDC_DESCRIPTOR_PUNION_ADDITIONAL(SHORT_NAME)\
1089 M_TDC_DESCRIPTOR_ADDITIONAL_UNION_BASE (SHORT_NAME,TDC_TABLE_KIND_PRIM)\
1090
1091 #define M_TDC_DESCRIPTOR_SDU_ADDITIONAL(SHORT_NAME)\
1092 M_TDC_DESCRIPTOR_ADDITIONAL_UNION_BASE (SHORT_NAME,TDC_TABLE_KIND_PRIM)\
1093
1094 #define M_TDC_DESCRIPTOR_PENUM_ADDITIONAL(SHORT_NAME)\
1095 M_TDC_DESCRIPTOR_ADDITIONAL_VAR (T_TDC_DESCRIPTOR_##SHORT_NAME, T_TDC_ENUM_##SHORT_NAME,SHORT_NAME)\
1096 friend T_TDC_HANDLE_BASE* new_T_TDC_DESCRIPTOR_##SHORT_NAME ();\
1097
1098 //-----
1099
1100 #define M_TDC_DESCRIPTOR_MSG_ADDITIONAL(SHORT_NAME)\
1101 M_TDC_DESCRIPTOR_ADDITIONAL_STRUCT_BASE (SHORT_NAME)\
1102 virtual int get_id () const\
1103 {\
1104 return SHORT_NAME;\
1105 }\
1106
1107 #define M_TDC_DESCRIPTOR_MSTRUCT_ADDITIONAL(SHORT_NAME)\
1108 M_TDC_DESCRIPTOR_ADDITIONAL_STRUCT_BASE (SHORT_NAME)\
1109
1110 #define M_TDC_DESCRIPTOR_MUNION_ADDITIONAL(SHORT_NAME)\
1111 M_TDC_DESCRIPTOR_ADDITIONAL_UNION_BASE (SHORT_NAME,TDC_TABLE_KIND_MSG)\
1112
1113 #define M_TDC_DESCRIPTOR_MENUM_ADDITIONAL(SHORT_NAME)\
1114 M_TDC_DESCRIPTOR_ADDITIONAL_VAR (T_TDC_DESCRIPTOR_##SHORT_NAME, T_TDC_ENUM_##SHORT_NAME,SHORT_NAME)\
1115 friend T_TDC_HANDLE_BASE* new_T_TDC_DESCRIPTOR_##SHORT_NAME ();\
1116
1117 //-----
1118
1119 #define M_TDC_DESCRIPTOR_XXX_PRIMITIVE_UNION_ADDITIONAL(SAP)\
1120 M_TDC_DESCRIPTOR_ADDITIONAL_MAIN_BASE (SAP)\
1121
1122 #define M_TDC_DESCRIPTOR_XXX_MESSAGE_UNION_ADDITIONAL(MSG)\
1123 M_TDC_DESCRIPTOR_ADDITIONAL_MAIN_BASE (MSG)\
1124 virtual int get_id () const\
1125 {\
1126 return CCDENT_##MSG;\
1127 }\
1128
1129 #ifdef TDC_LIB_MAIN_DSC
1130 #define IF_TDC_LIB_MAIN_DSC(code) code
1131 #else
1132 #define IF_TDC_LIB_MAIN_DSC(code)
1133 #endif
1134
1135 #define M_TDC_CREATE_DEFAULT_DESCRIPTOR_CLASS(SHORT_NAME, TDC_IS)\
1136 struct T_TDC_DESCRIPTOR_##SHORT_NAME;\
1137 struct T_TDC_HANDLE_##SHORT_NAME:T_TDC_HANDLE_BASE\
1138 {\
1139 typedef T_TDC_DESCRIPTOR_##SHORT_NAME T_DESCRIPTOR;\
1140 M_TDC_HANDLE_ADDITIONAL(M_TDC_IN_CLASS,M_TDC_WITH_BODY,T_TDC_HANDLE_##SHORT_NAME,SHORT_NAME,TDC_IS)\
1141 M_TDC_DESCRIPTOR_HANDLE_ADDITIONAL_PART (T_TDC_DESCRIPTOR_##SHORT_NAME)\
1142 protected:\
1143 static T_TDC_NEW_DESCRIPTOR new_descriptor;\
1144 virtual T_TDC_DESCRIPTOR_BASE* implement_new_descriptor () const\
1145 {\
1146 return call_implement_new_descriptor(new_descriptor);\
1147 }\
1148 friend char set_new_descriptor_T_TDC_HANDLE_##SHORT_NAME()\
1149 {\
1150 extern T_TDC_DESCRIPTOR_BASE* new_T_TDC_DESCRIPTOR_##SHORT_NAME ();\
1151 new_descriptor = new_T_TDC_DESCRIPTOR_##SHORT_NAME;\
1152 return 1;\
1153 }\
1154 };\
1155 T_TDC_HANDLE_BASE* new_T_TDC_HANDLE_##SHORT_NAME();\
1156 M_TDC_XXX_PRIMITIVE_UNION_ADDITIONAL_INLINE_1(SHORT_NAME,SHORT_NAME)\
1157 IF_TDC_LIB_MAIN_DSC(T_TDC_NEW_DESCRIPTOR T_TDC_HANDLE_##SHORT_NAME::new_descriptor;)\
1158
1159 #define M_TDC_CREATE_DEFAULT_PRIMITIVE_DESCRIPTOR_CLASS(SAP)\
1160 M_TDC_CREATE_DEFAULT_DESCRIPTOR_CLASS(SAP##_PRIMITIVE_UNION,TDC_IS_XXX_PRIMITIVE_UNION)\
1161
1162 #define M_TDC_CREATE_DEFAULT__T_TDC_HANDLE_XXX_PRIMITIVE_UNION(SAP,CCDSAP)\
1163 M_TDC_CREATE_DEFAULT_DESCRIPTOR_CLASS(SAP##_PRIMITIVE_UNION,TDC_IS_XXX_PRIMITIVE_UNION)\
1164
1165 #define M_TDC_DESCRIPTOR_PRIMITIVE_ADDITIONAL()\
1166 M_TDC_DESCRIPTOR_ADDITIONAL_MAIN_BASE (PRIMITIVE_UNION)\
1167
1168 #define M_TDC_CREATE_DEFAULT_MESSAGE_DESCRIPTOR_CLASS(MSG)\
1169 M_TDC_CREATE_DEFAULT_DESCRIPTOR_CLASS(MSG##_MESSAGE_UNION,TDC_IS_XXX_MESSAGE_UNION)\
1170 enum { CCDENT_##MSG##_MESSAGE_UNION = CCDENT_##MSG };\
1171
1172 #define M_TDC_CREATE_DEFAULT__T_TDC_HANDLE_XXX_MESSAGE_UNION(MSG,CCDENT)\
1173 M_TDC_CREATE_DEFAULT_MESSAGE_DESCRIPTOR_CLASS(MSG)
1174
1175 #define M_TDC_DESCRIPTOR_MESSAGE_ADDITIONAL()\
1176 M_TDC_DESCRIPTOR_ADDITIONAL_MAIN_BASE (MESSAGE_UNION)\
1177
1178 //\}
1179 //============================================================================
1180
1181 #if TDC_DEBUG_DOT_COMPLETE
1182 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1H
1183 {
1184 int i1H;
1185 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
1186 };
1187 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1H()
1188 {
1189 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
1190 s.
1191 i;
1192 s->
1193 i0;
1194 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1H s1H;
1195 s1H->
1196 i0;
1197 }
1198 #else
1199 #endif
1200
1201 //----------------------------------------------------------------------------
1202 /// \defgroup M_TDC_INTERFACE
1203 // macros to repeat stuff that is similar in many inteface classes
1204 //----------------------------------------------------------------------------
1205 //\{
1206
1207 /**
1208 * should these functions return T_RETURN / *this instead?
1209 */
1210 #define M_TDC_ADDITIONAL_CALL_FUNCTION_BASE(IN_CLASS, WITH_BODY, T_SCOPE,T_RETURN,T_ARG)\
1211 void T_SCOPE::operator = (T_ARG (*f) ())\
1212 WITH_BODY({\
1213 T_ARG value_ = f ();\
1214 set_value (value_);\
1215 TDC_LINT_UNASSIGNED_MEMBER\
1216 })\
1217 void T_SCOPE::operator = (void (*f) (T_ARG))\
1218 WITH_BODY({\
1219 T_ARG value_;\
1220 f (value_);\
1221 set_value (value_);\
1222 TDC_LINT_UNASSIGNED_MEMBER\
1223 })\
1224
1225 #define M_TDC_INTERFACE_ADDITIONAL_BASE(IN_CLASS, WITH_BODY, T_INTERFACE, T_INSTANCE_, T_HANDLE)\
1226 IN_CLASS(typedef T_INSTANCE_ T_INSTANCE;)\
1227 IN_CLASS(friend struct T_INSTANCE_;)\
1228 IN_CLASS(private:)\
1229 void T_INTERFACE::set_value (const T_INSTANCE_& value_)\
1230 WITH_BODY({\
1231 copy_instance ((const T_TDC_INSTANCE_BASE*)&value_);\
1232 })\
1233 IN_CLASS(explicit) T_INTERFACE::T_INTERFACE (const T_INTERFACE& value_)\
1234 WITH_BODY({\
1235 copy_interface (&value_);\
1236 TDC_LINT_UNCOPIED_BASE\
1237 })\
1238 IN_CLASS(public:)\
1239 void T_INTERFACE::operator = (const T_TDC_ACTION& action_)\
1240 WITH_BODY({\
1241 set_action (action_);\
1242 TDC_LINT_UNASSIGNED_MEMBER\
1243 })\
1244 void T_INTERFACE::operator = (const T_INTERFACE& value_)\
1245 WITH_BODY({\
1246 copy_interface (&value_);\
1247 TDC_LINT_NO_SELFASSIGN_TEST\
1248 TDC_LINT_UNASSIGNED_MEMBER\
1249 })\
1250 T_INSTANCE_ T_INTERFACE::operator = (const T_INSTANCE_& value_)\
1251 WITH_BODY({\
1252 copy_instance (&value_);\
1253 return value_;\
1254 TDC_LINT_UNASSIGNED_MEMBER\
1255 })\
1256 IN_CLASS(static) T_TDC_HANDLE_BASE* T_INTERFACE::implement_new_handle ()\
1257 WITH_BODY({\
1258 return new_##T_HANDLE();\
1259 })\
1260 IN_CLASS(friend) T_TDC_INTERFACE_BASE* new_##T_INTERFACE()\
1261 WITH_BODY({\
1262 return new T_INTERFACE;\
1263 })\
1264 M_TDC_ADDITIONAL_CALL_FUNCTION_BASE(IN_CLASS, WITH_BODY, T_INTERFACE,T_INSTANCE,T_INSTANCE)\
1265
1266 #define M_TDC_INTERFACE_ADDITIONAL_MAIN(IN_CLASS, WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, BASE)\
1267 public:\
1268 void operator = (const T_TDC_INTERFACE_##BASE##_BASE& value_)\
1269 {\
1270 set_main_value (&value_);\
1271 }\
1272 void operator = (const T_TDC_INSTANCE_##BASE##_BASE& value_)\
1273 {\
1274 set_main_value (&value_);\
1275 }\
1276 T_TDC_INTERFACE_##PREFIXED_SHORT_NAME ()\
1277 {\
1278 tdc_level--;\
1279 }\
1280 M_TDC_INTERFACE_ADDITIONAL_BASE (IN_CLASS, WITH_BODY, T_TDC_INTERFACE_##PREFIXED_SHORT_NAME, T_##SHORT_NAME, T_TDC_HANDLE_##PREFIXED_SHORT_NAME)
1281
1282 #define M_TDC_INTERFACE_ADDITIONAL_COMP(IN_CLASS, WITH_BODY, SHORT_NAME, PREFIXED_SHORT_NAME)\
1283 public:\
1284 T_TDC_INTERFACE_##PREFIXED_SHORT_NAME ()\
1285 {\
1286 tdc_level--;\
1287 }\
1288 M_TDC_INTERFACE_ADDITIONAL_BASE (IN_CLASS, WITH_BODY, T_TDC_INTERFACE_##PREFIXED_SHORT_NAME, T_##SHORT_NAME, T_TDC_HANDLE_##PREFIXED_SHORT_NAME)
1289
1290 #define M_TDC_INTERFACE_ADDITIONAL_VAR(IN_CLASS, WITH_BODY, SHORT_NAME, PREFIXED_SHORT_NAME)\
1291 public:\
1292 T_TDC_INTERFACE_##PREFIXED_SHORT_NAME ()\
1293 {\
1294 }\
1295 M_TDC_INTERFACE_ADDITIONAL_BASE (IN_CLASS, WITH_BODY, T_TDC_INTERFACE_##PREFIXED_SHORT_NAME, T_##SHORT_NAME, T_TDC_HANDLE_##PREFIXED_SHORT_NAME)
1296
1297 #define M_TDC_INTERFACE_INT_ADDITIONAL(SHORT_NAME)\
1298 public:\
1299 void operator = (int value_)\
1300 {\
1301 set_descriptor_value (value_);\
1302 }\
1303 M_TDC_INTERFACE_ADDITIONAL_VAR (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME, SHORT_NAME)\
1304
1305 #define M_TDC_INTERFACE_ADDITIONAL_ENUM(IN_CLASS, WITH_BODY, SHORT_NAME, PREFIXED_SHORT_NAME)\
1306 public:\
1307 void set_value (int value_)\
1308 {\
1309 set_descriptor_value (value_);\
1310 }\
1311 void operator = (int value_)\
1312 {\
1313 set_descriptor_value (value_);\
1314 }\
1315 void set_value (const T_TDC_INSTANCE_INT_BASE &value_)\
1316 {\
1317 copy_instance (&value_);\
1318 }\
1319 void operator = (const T_TDC_INSTANCE_INT_BASE &value_)\
1320 {\
1321 copy_instance (&value_);\
1322 }\
1323 M_TDC_INTERFACE_ADDITIONAL_VAR (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME, PREFIXED_SHORT_NAME)\
1324
1325 #define M_TDC_INTERFACE_ADDITIONAL_MAIN_CALL(IN_CLASS, WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME,T_ARG)\
1326 T_##SHORT_NAME operator = (const T_ARG& value_)\
1327 {\
1328 set_value (value_);\
1329 return value_;\
1330 TDC_LINT_UNASSIGNED_MEMBER\
1331 }\
1332
1333 //-----
1334
1335 #define M_TDC_INTERFACE_PRIM_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1336 M_TDC_INTERFACE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, PRIMITIVE)\
1337 M_TDC_INTERFACE_ADDITIONAL_MAIN_CALL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, T_PRIMITIVE_UNION)\
1338
1339 #define M_TDC_INTERFACE_PSTRUCT_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1340 M_TDC_INTERFACE_ADDITIONAL_COMP (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1341
1342 #define M_TDC_INTERFACE_PUNION_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1343 M_TDC_INTERFACE_ADDITIONAL_COMP (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1344
1345 #define M_TDC_INTERFACE_PENUM_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1346 M_TDC_INTERFACE_ADDITIONAL_ENUM (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1347
1348 //-----
1349
1350 #define M_TDC_INTERFACE_MSG_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1351 M_TDC_INTERFACE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, MESSAGE)\
1352 M_TDC_INTERFACE_ADDITIONAL_MAIN_CALL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, T_MESSAGE_UNION)\
1353
1354 #define M_TDC_INTERFACE_MSTRUCT_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1355 M_TDC_INTERFACE_ADDITIONAL_COMP (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1356
1357 #define M_TDC_INTERFACE_MUNION_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1358 M_TDC_INTERFACE_ADDITIONAL_COMP (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1359
1360 #define M_TDC_INTERFACE_MENUM_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1361 M_TDC_INTERFACE_ADDITIONAL_ENUM (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1362
1363 //-----
1364
1365 #define M_TDC_INTERFACE_PRIM_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1366 M_TDC_INTERFACE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, PRIMITIVE)\
1367 M_TDC_INTERFACE_ADDITIONAL_MAIN_CALL (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, T_PRIMITIVE_UNION)\
1368
1369 #define M_TDC_INTERFACE_PSTRUCT_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1370 M_TDC_INTERFACE_ADDITIONAL_COMP (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1371
1372 #define M_TDC_INTERFACE_PUNION_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1373 M_TDC_INTERFACE_ADDITIONAL_COMP (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1374
1375 #define M_TDC_INTERFACE_SDU_ADDITIONAL_INLINE(SHORT_NAME)\
1376 M_TDC_INTERFACE_ADDITIONAL_COMP (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,SHORT_NAME)
1377
1378 #define M_TDC_INTERFACE_PENUM_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1379 M_TDC_INTERFACE_ADDITIONAL_ENUM (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1380
1381 //-----
1382
1383 #define M_TDC_INTERFACE_MSG_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1384 M_TDC_INTERFACE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, MESSAGE)\
1385 M_TDC_INTERFACE_ADDITIONAL_MAIN_CALL (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, T_MESSAGE_UNION)\
1386
1387 #define M_TDC_INTERFACE_MSTRUCT_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1388 M_TDC_INTERFACE_ADDITIONAL_COMP (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1389
1390 #define M_TDC_INTERFACE_MUNION_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1391 M_TDC_INTERFACE_ADDITIONAL_COMP (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1392
1393 #define M_TDC_INTERFACE_MENUM_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1394 M_TDC_INTERFACE_ADDITIONAL_ENUM (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1395
1396 //-----
1397
1398 #define M_TDC_INTERFACE_ADDITIONAL_MAIN_XXX(M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY,XXX,PREFIXED_XXX)\
1399 private:\
1400 T_TDC_INTERFACE_##XXX (const T_TDC_INTERFACE_PRIMITIVE_BASE& primitive)\
1401 {\
1402 tdc_tbd_xxx_constructor_call(#XXX);\
1403 }\
1404
1405 #define M_TDC_INTERFACE_XXX_PRIMITIVE_UNION_ADDITIONAL(SAP,PREFIXED_SAP)\
1406 M_TDC_INTERFACE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SAP,PREFIXED_SAP, PRIMITIVE)\
1407 M_TDC_INTERFACE_ADDITIONAL_MAIN_CALL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SAP,PREFIXED_SAP, T_PRIMITIVE_UNION)\
1408 M_TDC_INTERFACE_ADDITIONAL_MAIN_XXX (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SAP,PREFIXED_SAP)\
1409 public:\
1410
1411 #define M_TDC_INTERFACE_XXX_PRIMITIVE_UNION_ADDITIONAL_INLINE(SAP,PREFIXED_SAP)\
1412 M_TDC_INTERFACE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SAP,PREFIXED_SAP, PRIMITIVE)\
1413 M_TDC_INTERFACE_ADDITIONAL_MAIN_CALL (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SAP,PREFIXED_SAP, T_PRIMITIVE_UNION)\
1414 M_TDC_INTERFACE_ADDITIONAL_MAIN_XXX (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SAP,PREFIXED_SAP)\
1415 public:\
1416
1417 #define M_TDC_INTERFACE_XXX_MESSAGE_UNION_ADDITIONAL(MSG,PREFIXED_MSG)\
1418 M_TDC_INTERFACE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, MSG, PREFIXED_MSG, MESSAGE)\
1419 M_TDC_INTERFACE_ADDITIONAL_MAIN_CALL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, MSG, PREFIXED_MSG, T_MESSAGE_UNION)\
1420 M_TDC_INTERFACE_ADDITIONAL_MAIN_XXX (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, MSG,PREFIXED_MSG)\
1421 public:\
1422
1423 #define M_TDC_INTERFACE_XXX_MESSAGE_UNION_ADDITIONAL_INLINE(MSG,PREFIXED_MSG)\
1424 M_TDC_INTERFACE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITH_BODY, MSG, PREFIXED_MSG, MESSAGE)\
1425 M_TDC_INTERFACE_ADDITIONAL_MAIN_CALL (M_TDC_IN_CLASS, M_TDC_WITH_BODY, MSG, PREFIXED_MSG, T_MESSAGE_UNION)\
1426 M_TDC_INTERFACE_ADDITIONAL_MAIN_XXX (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, MSG,PREFIXED_MSG)\
1427 public:\
1428
1429 #define M_TDC_CREATE_DEFAULT_INTERFACE_CLASS(SHORT_NAME)\
1430 struct T_TDC_INTERFACE_##SHORT_NAME;\
1431 struct T_TDC_HANDLE_##SHORT_NAME;\
1432
1433 #define M_TDC_CREATE_DEFAULT_PRIMITIVE_INTERFACE_CLASS(SAP)\
1434 M_TDC_CREATE_DEFAULT_INTERFACE_CLASS(SAP##_PRIMITIVE_UNION)\
1435
1436 #define M_TDC_CREATE_DEFAULT__T_TDC_INTERFACE_XXX_PRIMITIVE_UNION(SAP,CCDSAP)\
1437 enum { CCDSAP_##SAP = CCDSAP };\
1438 M_TDC_CREATE_DEFAULT_INTERFACE_CLASS(SAP##_PRIMITIVE_UNION)\
1439
1440 #define M_TDC_INTERFACE_PRIMITIVE_ADDITIONAL()\
1441 M_TDC_INTERFACE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, PRIMITIVE_UNION, PRIMITIVE_UNION, PRIMITIVE)\
1442 private:\
1443 T_TDC_INTERFACE_PRIMITIVE_UNION (const T_TDC_INTERFACE_PRIMITIVE_BASE& primitive)\
1444 {\
1445 tdc_tbd_primitive_union_constructor_call();\
1446 }\
1447 public:\
1448
1449 #define M_TDC_INTERFACE_PRIMITIVE_ELEMENT_ADDITIONAL(SAP)\
1450 /*nothing*/
1451
1452 #define M_TDC_CREATE_DEFAULT_MESSAGE_INTERFACE_CLASS(MSG)\
1453 M_TDC_CREATE_DEFAULT_INTERFACE_CLASS(MSG##_MESSAGE_UNION)\
1454
1455 #define M_TDC_CREATE_DEFAULT__T_TDC_INTERFACE_XXX_MESSAGE_UNION(MSG,CCDENT)\
1456 enum { CCDENT_##MSG = CCDENT };\
1457 M_TDC_CREATE_DEFAULT_MESSAGE_INTERFACE_CLASS(MSG)
1458
1459 #define M_TDC_INTERFACE_MESSAGE_ADDITIONAL()\
1460 M_TDC_INTERFACE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, MESSAGE_UNION,MESSAGE_UNION, MESSAGE)\
1461 private:\
1462 T_TDC_INTERFACE_MESSAGE_UNION (const T_TDC_INTERFACE_MESSAGE_BASE& primitive)\
1463 {\
1464 tdc_tbd_message_union_constructor_call();\
1465 }\
1466 public:\
1467
1468 #define M_TDC_INTERFACE_MESSAGE_ELEMENT_ADDITIONAL(MSG)\
1469 /*nothing*/
1470
1471 //\}
1472
1473 //============================================================================
1474
1475 #if TDC_DEBUG_DOT_COMPLETE
1476 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1I()
1477 {
1478 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
1479 s.
1480 i;
1481 s->
1482 i0;
1483 }
1484 #else
1485 #endif
1486
1487 //----------------------------------------------------------------------------
1488 /// \defgroup M_TDC_INSTANCE M_TDC_INSTANCE
1489 /// macros to repeat stuff that is similar in many instance classes
1490 //----------------------------------------------------------------------------
1491 //\{
1492
1493 /*lint -emacro(1706,M_TDC_INSTANCE_ADDITIONAL_BASE)*/ //we don't want M_TDC_NOT(IN_CLASS(...)) for all the scope operators
1494 #define M_TDC_INSTANCE_ADDITIONAL_BASE(IN_CLASS, WITH_BODY, T_INTERFACE_, T_INSTANCE, T_HANDLE_)\
1495 IN_CLASS(typedef T_INTERFACE_ T_INTERFACE;)\
1496 IN_CLASS(typedef T_HANDLE_ T_HANDLE;)\
1497 IN_CLASS(T_HANDLE* handle;)\
1498 IN_CLASS(static) T_TDC_HANDLE_BASE* T_INSTANCE::implement_new_handle ()\
1499 WITH_BODY({\
1500 return new_##T_HANDLE_();\
1501 })\
1502 IN_CLASS(virtual) T_TDC_INTERFACE_BASE* T_INSTANCE::new_interface() const\
1503 WITH_BODY({\
1504 return new_##T_INTERFACE_();\
1505 })\
1506 void T_INSTANCE::construct()\
1507 WITH_BODY({\
1508 construct_handle(new_##T_HANDLE_);\
1509 })\
1510 T_INSTANCE::T_INSTANCE ()\
1511 WITH_BODY({\
1512 construct();\
1513 TDC_LINT_UNINITIALIZED_MEMBER\
1514 })\
1515 T_INSTANCE::~T_INSTANCE ()\
1516 WITH_BODY({\
1517 destroy_handle ();\
1518 TDC_LINT_POSSIBLE_UNHANDLE_POINTER_MEMBER\
1519 })\
1520 T_INSTANCE::T_INSTANCE (const T_INTERFACE_& value_)\
1521 WITH_BODY({\
1522 construct_from_interface ((T_TDC_INTERFACE_BASE*)&value_, new_##T_HANDLE_); M_TDC_COMMENT(T_INTERFACE not defined yet; means need cast here to the base type pointer)\
1523 TDC_LINT_UNINITIALIZED_MEMBER\
1524 })\
1525 IN_CLASS(explicit) T_INSTANCE::T_INSTANCE (const T_TDC_HANDLE_BASE* value_)\
1526 WITH_BODY({\
1527 tdc_tbd_constructor_call(#T_INSTANCE);\
1528 TDC_LINT_UNINITIALIZED_MEMBER\
1529 })\
1530 void T_INSTANCE::operator = (const T_INSTANCE& value_)\
1531 WITH_BODY({\
1532 set_value (value_);\
1533 TDC_LINT_UNASSIGNED_MEMBER\
1534 TDC_LINT_NO_SELFASSIGN_TEST\
1535 })\
1536 M_TDC_NOT_##IN_CLASS(T_INTERFACE_* T_INSTANCE::operator -> ()\
1537 {\
1538 return (T_INTERFACE*)get_navigation();\
1539 })\
1540 T_INSTANCE::T_INSTANCE (const T_INSTANCE& value_)\
1541 WITH_BODY({\
1542 construct_from_instance (value_, new_##T_HANDLE_);\
1543 TDC_LINT_UNCOPIED_BASE\
1544 TDC_LINT_UNINITIALIZED_MEMBER\
1545 })\
1546 T_INSTANCE::T_INSTANCE (T_INSTANCE (*f) ())\
1547 WITH_BODY({\
1548 T_INSTANCE value_ = f ();\
1549 construct_from_instance (value_, new_##T_HANDLE_);\
1550 TDC_LINT_UNINITIALIZED_MEMBER\
1551 })\
1552 M_TDC_ADDITIONAL_CALL_FUNCTION_BASE(IN_CLASS, WITH_BODY, T_INSTANCE, T_INSTANCE, T_INSTANCE)
1553
1554 #define M_TDC_INSTANCE_ADDITIONAL_MAIN(IN_CLASS, WITH_BODY, SHORT_NAME, PREFIXED_SHORT_NAME, BASE)\
1555 public:\
1556 void operator = (const T_TDC_INTERFACE_##BASE##_BASE& value_)\
1557 {\
1558 set_main_value (&value_);\
1559 }\
1560 void operator = (const T_TDC_INSTANCE_##BASE##_BASE& value_)\
1561 {\
1562 set_main_value (&value_);\
1563 }\
1564 T_##SHORT_NAME (const T_TDC_INTERFACE_##BASE##_BASE& value_)\
1565 {\
1566 construct_main_value (&value_, new_T_TDC_HANDLE_##PREFIXED_SHORT_NAME);\
1567 }\
1568 T_##SHORT_NAME (const T_TDC_INSTANCE_##BASE##_BASE& value_)\
1569 {\
1570 construct_main_value (&value_, new_T_TDC_HANDLE_##PREFIXED_SHORT_NAME);\
1571 }\
1572 M_TDC_INSTANCE_ADDITIONAL_BASE (IN_CLASS, WITH_BODY, T_TDC_INTERFACE_##PREFIXED_SHORT_NAME, T_##SHORT_NAME, T_TDC_HANDLE_##PREFIXED_SHORT_NAME)
1573
1574 #define M_TDC_INSTANCE_PART_ADDITIONAL(IN_CLASS, WITH_BODY, T_INTERFACE, T_INSTANCE, T_DESCRIPTOR, T_HANDLE)\
1575 public:\
1576 T_INSTANCE (const T_TDC_ACTION& action_)\
1577 {\
1578 construct_from_action (action_, new_##T_HANDLE);\
1579 }\
1580 T_TDC_ACTION operator = (const T_TDC_ACTION& action_)\
1581 {\
1582 set_action (action_);\
1583 return action_;\
1584 }\
1585 M_TDC_INSTANCE_ADDITIONAL_BASE(IN_CLASS, WITH_BODY, T_INTERFACE, T_INSTANCE, T_HANDLE)
1586
1587 #define M_TDC_INSTANCE_COMP_ADDITIONAL(IN_CLASS, WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)\
1588 M_TDC_INSTANCE_PART_ADDITIONAL (IN_CLASS, WITH_BODY, T_TDC_INTERFACE_##PREFIXED_SHORT_NAME, T_##SHORT_NAME, T_TDC_DESCRIPTOR_##PREFIXED_SHORT_NAME, T_TDC_HANDLE_##PREFIXED_SHORT_NAME)
1589
1590 #define M_TDC_INSTANCE_ENUM_ADDITIONAL(IN_CLASS, WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)\
1591 T_##SHORT_NAME (int value_)\
1592 {\
1593 construct_from_number (value_, new_T_TDC_DESCRIPTOR_##PREFIXED_SHORT_NAME);\
1594 }\
1595 void operator = (int value_)\
1596 {\
1597 set_descriptor_value (value_);\
1598 }\
1599 bool operator == (T_TDC_ENUM_##PREFIXED_SHORT_NAME value_)\
1600 {\
1601 return cmp_descriptor_value (value_);\
1602 }\
1603 operator T_TDC_ENUM_##PREFIXED_SHORT_NAME ()\
1604 {\
1605 return (T_TDC_ENUM_##PREFIXED_SHORT_NAME) get_descriptor_value ();\
1606 }\
1607 M_TDC_INSTANCE_PART_ADDITIONAL (IN_CLASS, WITH_BODY, T_TDC_INTERFACE_##PREFIXED_SHORT_NAME, T_##SHORT_NAME, T_TDC_DESCRIPTOR_##PREFIXED_SHORT_NAME, T_TDC_DESCRIPTOR_##PREFIXED_SHORT_NAME)
1608
1609 #define M_TDC_INSTANCE_INT_ADDITIONAL(SHORT_NAME)\
1610 T_##SHORT_NAME (int value_)\
1611 {\
1612 construct_from_number (value_, new_T_TDC_DESCRIPTOR_##SHORT_NAME);\
1613 }\
1614 void operator = (int value_)\
1615 {\
1616 set_descriptor_value (value_);\
1617 }\
1618 M_TDC_INSTANCE_PART_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, T_TDC_INTERFACE_##SHORT_NAME, T_##SHORT_NAME, T_TDC_DESCRIPTOR_##SHORT_NAME, T_TDC_DESCRIPTOR_##SHORT_NAME)
1619
1620 //-----
1621
1622 #define M_TDC_INSTANCE_PRIM_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1623 M_TDC_INSTANCE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, PRIMITIVE)
1624
1625 #define M_TDC_INSTANCE_PSTRUCT_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1626 M_TDC_INSTANCE_COMP_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1627
1628 #define M_TDC_INSTANCE_PUNION_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1629 M_TDC_INSTANCE_COMP_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1630
1631 #define M_TDC_INSTANCE_SDU_ADDITIONAL(SHORT_NAME)\
1632 M_TDC_INSTANCE_COMP_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,SHORT_NAME)
1633
1634 #define M_TDC_INSTANCE_PENUM_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1635 M_TDC_INSTANCE_ENUM_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1636
1637 //-----
1638
1639 #define M_TDC_INSTANCE_MSG_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1640 M_TDC_INSTANCE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, MESSAGE)
1641
1642 #define M_TDC_INSTANCE_MSTRUCT_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1643 M_TDC_INSTANCE_COMP_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1644
1645 #define M_TDC_INSTANCE_MUNION_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1646 M_TDC_INSTANCE_COMP_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1647
1648 #define M_TDC_INSTANCE_MENUM_ADDITIONAL(SHORT_NAME,PREFIXED_SHORT_NAME)\
1649 M_TDC_INSTANCE_ENUM_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1650
1651 //-----
1652
1653 #define M_TDC_INSTANCE_XXX_PRIMITIVE_UNION_ADDITIONAL(SAP,PREFIXED_SAP)\
1654 M_TDC_INSTANCE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, SAP,PREFIXED_SAP, PRIMITIVE)
1655
1656 #define M_TDC_INSTANCE_XXX_MESSAGE_UNION_ADDITIONAL(MSG,PREFIXED_MSG)\
1657 M_TDC_INSTANCE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, MSG,PREFIXED_MSG, MESSAGE)
1658
1659 #define M_TDC_INSTANCE_PRIMITIVE_ADDITIONAL()\
1660 M_TDC_INSTANCE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, PRIMITIVE_UNION,PRIMITIVE_UNION, PRIMITIVE)\
1661 static int call_tdc_initialize_primitive ();\
1662
1663 #define M_TDC_INSTANCE_MESSAGE_ADDITIONAL()\
1664 M_TDC_INSTANCE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITHOUT_BODY, MESSAGE_UNION,MESSAGE_UNION, MESSAGE)\
1665 static int call_tdc_initialize_message ();\
1666
1667 //-----
1668
1669 #define M_TDC_INSTANCE_PRIM_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1670 M_TDC_INSTANCE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, PRIMITIVE)
1671
1672 #define M_TDC_INSTANCE_PSTRUCT_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1673 M_TDC_INSTANCE_COMP_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1674
1675 #define M_TDC_INSTANCE_PUNION_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1676 M_TDC_INSTANCE_COMP_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1677
1678 #define M_TDC_INSTANCE_PENUM_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1679 M_TDC_INSTANCE_ENUM_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1680
1681 //-----
1682
1683 #define M_TDC_INSTANCE_MSG_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1684 M_TDC_INSTANCE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME, MESSAGE)
1685
1686 #define M_TDC_INSTANCE_MSTRUCT_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1687 M_TDC_INSTANCE_COMP_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1688
1689 #define M_TDC_INSTANCE_MUNION_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1690 M_TDC_INSTANCE_COMP_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1691
1692 #define M_TDC_INSTANCE_MENUM_ADDITIONAL_INLINE(SHORT_NAME,PREFIXED_SHORT_NAME)\
1693 M_TDC_INSTANCE_ENUM_ADDITIONAL (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SHORT_NAME,PREFIXED_SHORT_NAME)
1694
1695 //-----
1696
1697 template<class T_INSTANCE,class T_HANDLE>class T_TDC_FORCE_LINK_INSTANCE_WORKER
1698 {
1699 T_TDC_FORCE_LINK_INSTANCE_WORKER(){
1700 T_HANDLE::new_descriptor = T_INSTANCE::get_new_descriptor();
1701 }
1702 };
1703
1704 template<class T_INSTANCE,class T_HANDLE>class T_TDC_FORCE_LINK_INSTANCE
1705 {
1706 static T_TDC_FORCE_LINK_INSTANCE_WORKER<T_INSTANCE,T_HANDLE> worker;
1707 };
1708 template<class T_INSTANCE,class T_HANDLE>T_TDC_FORCE_LINK_INSTANCE_WORKER<T_INSTANCE,T_HANDLE> T_TDC_FORCE_LINK_INSTANCE<T_INSTANCE,T_HANDLE>::worker;
1709
1710 #define M_TDC_XXX_PRIMITIVE_UNION_ADDITIONAL_INLINE_1(SAP,PREFIXED_SAP)\
1711 extern char set_new_descriptor_T_TDC_HANDLE_##SAP();\
1712 static char init_new_descriptor_T_TDC_HANDLE_##SAP = set_new_descriptor_T_TDC_HANDLE_##SAP();\
1713
1714 #define M_TDC_XXX_PRIMITIVE_UNION_ADDITIONAL_INLINE(SAP,PREFIXED_SAP)\
1715
1716 #define M_TDC_XXX_MESSAGE_UNION_ADDITIONAL_INLINE(SAP,PREFIXED_SAP)\
1717
1718 /*
1719 #define M_TDC_XXX_PRIMITIVE_UNION_ADDITIONAL_INLINE(SAP,PREFIXED_SAP)\
1720 extern char set_new_descriptor_T_TDC_HANDLE_##SAP();\
1721 static char init_new_descriptor_T_TDC_HANDLE_##SAP = set_new_descriptor_T_TDC_HANDLE_##SAP();\
1722
1723 #define M_TDC_XXX_MESSAGE_UNION_ADDITIONAL_INLINE(SAP,PREFIXED_SAP)\
1724 extern char set_new_descriptor_T_TDC_HANDLE_##SAP();\
1725 static char init_new_descriptor_T_TDC_HANDLE_##SAP = set_new_descriptor_T_TDC_HANDLE_##SAP();\
1726 */
1727
1728 #define M_TDC_INSTANCE_XXX_PRIMITIVE_UNION_ADDITIONAL_INLINE(SAP,PREFIXED_SAP)\
1729 M_TDC_INSTANCE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITH_BODY, SAP,PREFIXED_SAP, PRIMITIVE)\
1730 T_TDC_NEW_DESCRIPTOR get_new_descriptor()\
1731 {\
1732 extern T_TDC_DESCRIPTOR_BASE* new_T_TDC_DESCRIPTOR_##SAP();\
1733 return new_T_TDC_DESCRIPTOR_##SAP;\
1734 }\
1735
1736 #define M_TDC_INSTANCE_XXX_MESSAGE_UNION_ADDITIONAL_INLINE(MSG,PREFIXED_MSG)\
1737 M_TDC_INSTANCE_ADDITIONAL_MAIN (M_TDC_IN_CLASS, M_TDC_WITH_BODY, MSG,PREFIXED_MSG, MESSAGE)\
1738 T_TDC_NEW_DESCRIPTOR get_new_descriptor()\
1739 {\
1740 extern T_TDC_DESCRIPTOR_BASE* new_T_TDC_DESCRIPTOR_##MSG();\
1741 return new_T_TDC_DESCRIPTOR_##MSG;\
1742 }\
1743
1744 //\}
1745
1746 //-----
1747
1748 #ifdef TDC_TYPE_NAME_COMPLETE
1749 #define M_TDC_TYPE_NAME_COMPLETE TDC_DOT_COMPLETE_HIDE({ T_TDC_TYPE_NAME type_name = {0}; return type_name; })
1750 #else
1751 #define M_TDC_TYPE_NAME_COMPLETE ;
1752 #endif
1753
1754 #endif //DOT_COMPLETE_DEFINES
1755
1756 //============================================================================
1757
1758 #if TDC_DEBUG_DOT_COMPLETE
1759 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1J()
1760 {
1761 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
1762 s.
1763 i;
1764 s->
1765 i0;
1766 }
1767 #else
1768 #endif
1769
1770 //============================================================================
1771 // implementation classes
1772 //============================================================================
1773
1774 typedef bool T_TDC_TABLE_KIND;
1775
1776 enum T_TDC_ACTION_ENUM
1777 {
1778 TDC_ACTION_UNKNOWN,
1779 // MANDATORY-SEND OPTIONAL-SEND MANDATORY-WAIT OPTIONAL-WAIT
1780 TDC_ACTION_SKIP, // ERROR ABSENT SKIPED SKIPED
1781 TDC_ACTION_SHOW, // ERROR ABSENT SKIPED SKIPED
1782 TDC_ACTION_FORBID, // ERROR ABSENT ERROR CHECKED
1783 TDC_ACTION_REQUIRE, // ERROR ERROR ERROR CHECKED PRESENT
1784 TDC_ACTION_MESSAGE,
1785 TDC_ACTION_DESTROYED,
1786 TDC_ACTION_SKIP_TO_END,
1787 TDC_ACTION_SET = 0x10, // PRESENT PRESENT CHECKED CHECKED VALUE
1788 TDC_ACTION_HAS_VALUE = 0x20,
1789 TDC_ACTION_HAS_REF = 0x40,
1790 TDC_ACTION_IS_IMPLICIT = 0x80,
1791 TDC_ACTION_SET_VALUE = TDC_ACTION_SET + TDC_ACTION_HAS_VALUE,
1792 TDC_ACTION_SET_REF = TDC_ACTION_SET + TDC_ACTION_HAS_REF,
1793 TDC_ACTION_CHILD_TOUCHED = TDC_ACTION_SET + TDC_ACTION_HAS_REF + TDC_ACTION_IS_IMPLICIT,
1794 TDC_ACTION_DEFAULT = TDC_ACTION_UNKNOWN
1795 };
1796
1797 /** allow one optional extra set of () on action member functions, first set is suplyed by macro
1798 * second set might be suplyed by the user, this will have no effect on behaviour of code
1799 */
1800 struct T_TDC_ASSIGN_ACTION
1801 {
1802 void operator ()();
1803 };
1804
1805 extern T_TDC_ASSIGN_ACTION tdc_assign_action;
1806
1807 struct T_TDC_ACTION
1808 {
1809 //create a waper class for T_TDC_ACTION_ENUM so that the action constants can not be converted to integers
1810 T_TDC_ACTION_ENUM action;
1811 T_TDC_ACTION (T_TDC_ACTION_ENUM action_):
1812 action (action_)
1813 {
1814 //nothing
1815 }
1816 T_TDC_ACTION ();
1817 };
1818
1819 struct T_TDC_CREATE_ACTION:T_TDC_ACTION
1820 {
1821 /* This type is returned by constant action function, this allow the user to optional
1822 omit the "()" after the action name
1823 Src code After macro expantion Function returns After implicit type convting
1824 ======== ==================== ======================== =====================
1825 _skip tdc_skip() SKIP::T_TDC_CREATE_ACTION SKIP::T_TDC_ACTION
1826 _skip() tdc_skip()() SKIP::T_TDC_ACTION SKIP::T_TDC_ACTION
1827 _skip()() tdc_skip()()() <error T_TDC_ACTION have no operator ()>
1828 */
1829 T_TDC_CREATE_ACTION ();
1830 T_TDC_ACTION operator()();
1831 };
1832
1833 extern T_TDC_CREATE_ACTION SKIP;
1834 extern T_TDC_CREATE_ACTION SHOW;
1835 extern T_TDC_CREATE_ACTION FORBID;
1836 extern T_TDC_CREATE_ACTION REQUIRE;
1837 extern T_TDC_CREATE_ACTION SKIP_TO_END;
1838
1839 extern T_TDC_CREATE_ACTION tdc_skip();
1840 extern T_TDC_CREATE_ACTION tdc_show();
1841 extern T_TDC_CREATE_ACTION tdc_forbid();
1842 extern T_TDC_CREATE_ACTION tdc_require();
1843 extern T_TDC_CREATE_ACTION tdc_skip_to_end();
1844
1845 //----------------------------------------------------------------------------
1846
1847 enum T_TDC_EVENT_ENUM
1848 {
1849 TDC_EVENT_SEND,
1850 TDC_EVENT_AWAIT
1851 };
1852
1853 enum T_TDC_IS_ENUM
1854 {
1855 TDC_IS_UNKNOWN = 0,
1856 TDC_IS_VAR = 0x001,
1857 TDC_IS_STRUCT = 0x002,
1858 TDC_IS_SDU = 0x004,
1859 TDC_IS_P = 0x008,
1860 TDC_IS_M = 0x010,
1861 TDC_IS_COMP = 0x20,
1862 TDC_IS_ARRAY = 0x40,
1863 TDC_IS_UNION = 0x80,
1864 TDC_IS_MESSAGE_UNION = 0x100,
1865 TDC_IS_PRIMITIVE_UNION = 0x200,
1866 TDC_IS_MSG = 0x400,
1867 TDC_IS_PRIM = 0x800,
1868 TDC_IS_XXX_MESSAGE_UNION = 0x1000,
1869 TDC_IS_XXX_PRIMITIVE_UNION = 0x2000,
1870 TDC_IS_POINTER = 0x4000,
1871 TDC_IS_PVAR = TDC_IS_VAR | TDC_IS_P,
1872 TDC_IS_MVAR = TDC_IS_VAR | TDC_IS_M
1873 };
1874
1875 //----------------------------------------------------------------------------
1876
1877 struct T_TDC_HANDLE_BASE;
1878 struct T_TDC_DESCRIPTOR_BASE;
1879 struct T_TDC_INSTANCE_MAIN_BASE;
1880 struct T_TDC_INTERFACE_BASE;
1881 struct T_TDC_INSTANCE_BASE;
1882 struct T_TDC_PATH;
1883 struct T_TDC_PATH_TEXT;
1884
1885 typedef T_TDC_INTERFACE_BASE* (*T_TDC_NEW_INTERFACE)();
1886 typedef T_TDC_HANDLE_BASE* (*T_TDC_NEW_HANDLE)();
1887 typedef T_TDC_DESCRIPTOR_BASE* (*T_TDC_NEW_DESCRIPTOR)();
1888
1889 struct T_PRIMITIVE_UNION;
1890 struct T_TDC_INTERFACE_PRIMITIVE_UNION;
1891 struct T_TDC_DESCRIPTOR_PRIMITIVE_UNION;
1892
1893 struct T_MESSAGE_UNION;
1894 struct T_TDC_INTERFACE_MESSAGE_UNION;
1895 struct T_TDC_DESCRIPTOR_MESSAGE_UNION;
1896
1897 typedef signed long T_TDC_INT_S32;
1898 typedef signed short T_TDC_INT_S16;
1899 typedef signed char T_TDC_INT_S8;
1900 typedef unsigned long T_TDC_INT_U32;
1901 typedef unsigned short T_TDC_INT_U16;
1902 typedef unsigned char T_TDC_INT_U8;
1903 typedef char CHAR;
1904
1905 //----------------------------------------------------------------------------
1906 inline unsigned long num_elements(const unsigned char* array)
1907 {
1908 return strlen((const char*)array);
1909 }
1910
1911 inline unsigned long num_elements(const signed char* array)
1912 {
1913 return strlen((const char*)array);
1914 }
1915
1916
1917 //----------------------------------------------------------------------------
1918
1919 enum T_TDC_RW_MODE
1920 {
1921 TDC_RW_MODE_READ,
1922 TDC_RW_MODE_WRITE
1923 };
1924
1925 struct T_TDC_HANDLE_BASE
1926 {
1927 friend struct T_TDC_COPY;
1928 protected:
1929 T_TDC_ACTION_ENUM implement_get_action () const;
1930 void implement_set_action (T_TDC_ACTION_ENUM action_);
1931 T_TDC_DESCRIPTOR_BASE* implement_get_descriptor () const;
1932 void implement_set_descriptor (T_TDC_DESCRIPTOR_BASE* descriptor_);
1933 long implement_get_value () const;
1934 void implement_set_value (long value_);
1935 friend void add_name_info (T_TDC_HANDLE_BASE* descriptor_ref, int level, int parent, int index);
1936 T_TDC_PATH_TEXT path_text();
1937 virtual T_TDC_DESCRIPTOR_BASE* implement_new_descriptor () const;
1938 static T_TDC_DESCRIPTOR_BASE* call_implement_new_descriptor(T_TDC_NEW_DESCRIPTOR new_descriptor);
1939 public:
1940 T_TDC_DESCRIPTOR_BASE* make_descriptor ();
1941 T_TDC_DESCRIPTOR_BASE* make_array_descriptor (T_TDC_NEW_HANDLE new_element_handle);
1942 virtual char* get_name () const
1943 TDC_PURE_BODY({
1944 //TDC_ERROR();
1945 return 0;
1946 })
1947 virtual long get_sizeof () = 0
1948 {
1949 return sizeof *this;
1950 }
1951 T_TDC_HANDLE_BASE ();
1952 ~T_TDC_HANDLE_BASE ();
1953 T_TDC_HANDLE_BASE* get_element (int index)const;
1954 T_TDC_HANDLE_BASE* get_union_element ();
1955 void destroy ();
1956 T_TDC_DESCRIPTOR_BASE* get_descriptor()const;
1957 T_TDC_ACTION_ENUM get_action()const;
1958 long get_value()const;
1959 int get_ctrl()const;
1960 void clear();
1961 void set_descriptor_value(long value_);
1962 virtual unsigned get_sizeof_target ();
1963 virtual T_TDC_IS_ENUM is ();
1964 };
1965
1966 #ifdef TDC_USE_ALLOC_DEBUG_COUNTER
1967 struct T_TDC_ALLOC_DEBUG_COUNTER
1968 {
1969 int count;
1970 int max_count;
1971 int alloc_count;
1972 int free_count;
1973 bool alloc[1000];
1974 T_TDC_ALLOC_DEBUG_COUNTER ()
1975 {
1976 /* nothing here should allways be static allocated and there for cleared,
1977 futher more it is used before construction so intializing here will be fatal */
1978 }
1979 ~T_TDC_ALLOC_DEBUG_COUNTER ()
1980 {
1981 for (int first_not_freed = 0; !alloc[first_not_freed]; first_not_freed++)
1982 TDC_ASSERT (first_not_freed < sizeof alloc);
1983 TDC_ASSERT (count==0); // some where we have a leak
1984 }
1985 };
1986
1987 template<class T>
1988 struct T_TDC_ALLOC_DEBUG
1989 {
1990 static T_TDC_ALLOC_DEBUG_COUNTER counter;
1991 int alloc_count;
1992 T_TDC_ALLOC_DEBUG_COUNTER& counter_;
1993 T_TDC_ALLOC_DEBUG ():
1994 counter_ (counter)
1995 {
1996 counter.count++;
1997 alloc_count = counter.alloc_count++;
1998 if (alloc_count < sizeof counter.alloc)
1999 counter.alloc[alloc_count]=true;
2000 if (counter.max_count < counter.count)
2001 counter.max_count = counter.count;
2002 }
2003 ~T_TDC_ALLOC_DEBUG ()
2004 {
2005 if (alloc_count < sizeof counter.alloc)
2006 counter.alloc[alloc_count]=false;
2007 TDC_ASSERT (counter.count > 0); // deallocating more than ever allocated
2008 counter.free_count++;
2009 counter.count--;
2010 }
2011 };
2012
2013 template<class T>T_TDC_ALLOC_DEBUG_COUNTER T_TDC_ALLOC_DEBUG<T>::counter;
2014 #endif
2015
2016 enum {
2017 TDC_CTRL_DEFAULT = 0,
2018 TDC_CTRL_NO_DESCRIPTOR = -1,
2019 TDC_CTRL_NOT_AN_UNION = -2,
2020 TDC_REF_COUNT_ELEMENTS_DESTROYED = -2,
2021 TDC_DESCRIPTOR_DESTROYED_VALUE = -4,
2022 TDC_DUMMY_TAP_HANDLE = -16
2023 };
2024
2025 #define TDC_DESCRIPTOR_DESTROYED ((T_TDC_DESCRIPTOR_BASE*)TDC_DESCRIPTOR_DESTROYED_VALUE)
2026
2027 struct T_TDC_DESCRIPTOR_BASE
2028 #ifdef TDC_USE_ALLOC_DEBUG_COUNTER
2029 :T_TDC_ALLOC_DEBUG<T_TDC_DESCRIPTOR_BASE>
2030 #endif
2031 {
2032 private:
2033 friend struct T_TDC_COPY;
2034 friend void unsubscribe (T_TDC_DESCRIPTOR_BASE* descriptor);
2035 int ref_count;
2036 virtual long get_sizeof ()
2037 TDC_PURE_BODY(
2038 return 0;
2039 )
2040
2041 void destroy_elements ();
2042 protected:
2043 T_TDC_HANDLE_BASE* implement_get_element (unsigned index, char *first_element);
2044 T_TDC_HANDLE_BASE* implement_get_union_element (unsigned index, int& ctrl);
2045 public:
2046 void *operator new (size_t size);//TODO: operator new (size_t size); + eliminate T_TDC_HANDLE_BASE::T_TDC_HANDLE_BASE i.e. todo T_TDC_HANDLE_BASE::operator new (size_t size);
2047 T_TDC_PATH_TEXT path_text();
2048 virtual int read_ctrl () const
2049 {
2050 return TDC_CTRL_NOT_AN_UNION;
2051 }
2052 void set_skip_to_end_from_action (T_TDC_ACTION_ENUM action);
2053 virtual void set_skip_to_end (bool skip_to_end);
2054 virtual bool get_skip_to_end () const;
2055 virtual T_TDC_HANDLE_BASE* make_element (unsigned index);
2056 virtual T_TDC_HANDLE_BASE* get_element (unsigned index);
2057 virtual int get_tap_handle ();
2058 T_TDC_DESCRIPTOR_BASE ();
2059 virtual ~T_TDC_DESCRIPTOR_BASE ();
2060 virtual char* get_name () const
2061 TDC_PURE_BODY(
2062 return 0;
2063 )
2064 virtual T_TDC_IS_ENUM is ()
2065 {
2066 //TODO: TDC_ERROR() here and mov is function to distinct base classes;
2067 return TDC_IS_UNKNOWN;
2068 }
2069 };
2070
2071 union T_TDC_BASIC_TYPES
2072 {
2073 unsigned long u32;
2074 signed long s32;
2075 signed int s16;
2076 signed char s8;
2077 char c[4];
2078 };
2079
2080 //----------------------------------------------------------------------------
2081
2082 struct T_TDC_INTERFACE_BASE
2083 {
2084 private:
2085 void* operator &(); /* this member function is only here to prevent the user from taking the address of
2086 an interface, which make no sence to the user as it gives the address of
2087 some internal tdc navigation data */
2088 #ifdef LINT //TODO: introduce for VC too
2089 const void* operator &() const; /* but we don't want ripling errors from LINT
2090 the ripling errors comes from the fact that LINT seems to have a more correct
2091 interpretion of where to use the overloaded function and where to truely take
2092 the address*/
2093 #endif
2094 protected:
2095 T_TDC_LEVEL level[1];
2096 T_TDC_ASSIGN_ACTION set_action (const T_TDC_ACTION& action_);
2097 T_TDC_INTERFACE_BASE ()
2098 {
2099 //nothing
2100 }
2101 public:
2102 T_TDC_PATH* implement_make_descriptor_ref (T_TDC_RW_MODE rw_mode);
2103 T_TDC_PATH* make_descriptor_ref (T_TDC_RW_MODE rw_mode);
2104 const T_TDC_PATH* make_descriptor_ref (T_TDC_RW_MODE rw_mode) const;
2105 void set_descriptor_value (long value_);
2106 //bool cmp_descriptor_value (long value_);
2107 void copy_instance (const T_TDC_INSTANCE_BASE * value_);
2108 void copy_interface (const T_TDC_INTERFACE_BASE * value_);
2109 };
2110
2111 struct T_TDC_INTERFACE_MAIN_BASE
2112 #if DOT_COMPLETE_MEMBERS
2113 #else
2114 TDC_DOT_COMPLETE_HIDE(:T_TDC_INTERFACE_BASE)
2115 #endif
2116 {
2117 #if DOT_COMPLETE_MEMBERS
2118 #else
2119 protected:
2120 void set_main_value (const T_TDC_INTERFACE_MAIN_BASE* value_);
2121 void set_main_value (const T_TDC_INSTANCE_MAIN_BASE* value_);
2122 T_TDC_INTERFACE_BASE* get_element_navigation(T_TDC_NEW_INTERFACE new_element_interface);
2123 /*T_TDC_INTERFACE_MAIN_BASE ()
2124 {
2125 tdc_level++;
2126 }*/
2127 #endif
2128 };
2129
2130 struct T_TDC_INTERFACE_REF_BASE
2131 #if DOT_COMPLETE_MEMBERS
2132 #else
2133 TDC_DOT_COMPLETE_HIDE(:T_TDC_INTERFACE_BASE)
2134 #endif
2135 {
2136 #if DOT_COMPLETE_MEMBERS
2137 T_TDC_ASSIGN_ACTION _skip () {} /* you can use '= SKIP' as well */
2138 T_TDC_ASSIGN_ACTION _show () {} /* you can use '= SHOW' as well */
2139 T_TDC_ASSIGN_ACTION _forbid () {} /* you can use '= FORBID' as well */
2140 T_TDC_ASSIGN_ACTION _require () {} /* you can use '= REQUIRE' as well */
2141 #else//DOT_COMPLETE_MEMBERS
2142 T_TDC_INTERFACE_REF_BASE ()
2143 {
2144 level[0] = 'A'+tdc_level;
2145 }
2146 TDC_DOT_COMPLETE_HIDE(T_TDC_ASSIGN_ACTION tdc_skip ();) /* you can use '= SKIP' as well */
2147 TDC_DOT_COMPLETE_HIDE(T_TDC_ASSIGN_ACTION tdc_show ();) /* you can use '= SHOW' as well */
2148 TDC_DOT_COMPLETE_HIDE(T_TDC_ASSIGN_ACTION tdc_forbid ();) /* you can use '= FORBID' as well */
2149 TDC_DOT_COMPLETE_HIDE(T_TDC_ASSIGN_ACTION tdc_require ();) /* you can use '= REQUIRE' as well */
2150 #endif//DOT_COMPLETE_MEMBERS
2151 };
2152
2153 struct T_TDC_INTERFACE_VAR_BASE
2154 #if DOT_COMPLETE_MEMBERS
2155 #else
2156 TDC_DOT_COMPLETE_HIDE(:T_TDC_INTERFACE_BASE)
2157 #endif
2158 {
2159 #if DOT_COMPLETE_MEMBERS
2160 T_TDC_ASSIGN_ACTION _skip () {} /* you can use '= SKIP' as well */
2161 T_TDC_ASSIGN_ACTION _show () {} /* you can use '= SHOW' as well */
2162 T_TDC_ASSIGN_ACTION _forbid () {} /* you can use '= FORBID' as well */
2163 T_TDC_ASSIGN_ACTION _require () {} /* you can use '= REQUIRE' as well */
2164 #else//DOT_COMPLETE_MEMBERS
2165 T_TDC_INTERFACE_VAR_BASE ()
2166 {
2167 level[0] = 'A'+tdc_level;
2168 }
2169 TDC_DOT_COMPLETE_HIDE(T_TDC_ASSIGN_ACTION tdc_skip ();) /* you can use '= SKIP' as well */
2170 TDC_DOT_COMPLETE_HIDE(T_TDC_ASSIGN_ACTION tdc_show ();) /* you can use '= SHOW' as well */
2171 TDC_DOT_COMPLETE_HIDE(T_TDC_ASSIGN_ACTION tdc_forbid ();) /* you can use '= FORBID' as well */
2172 TDC_DOT_COMPLETE_HIDE(T_TDC_ASSIGN_ACTION tdc_require ();) /* you can use '= REQUIRE' as well */
2173 #endif//DOT_COMPLETE_MEMBERS
2174 };
2175
2176 //----------------------------------------------------------------------------
2177
2178 #if TDC_DEBUG_DOT_COMPLETE
2179 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1K()
2180 {
2181 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
2182 s.
2183 i;
2184 s->
2185 i0;
2186 }
2187 #else
2188 #endif
2189
2190 //----------------------------------------------------------------------------
2191 /** \defgroup PATH PATH
2192 * A set of classes and functions that is used for generating the path of
2193 * an element when generating warning or error messages.
2194 * TODO: need more work
2195 */
2196 //\{
2197
2198 struct T_TDC_PATH
2199 #ifdef TDC_USE_ALLOC_DEBUG_COUNTER
2200 :T_TDC_ALLOC_DEBUG<T_TDC_PATH>
2201 #endif
2202 {
2203 T_TDC_HANDLE_BASE* handle;
2204 T_TDC_DESCRIPTOR_BASE* cahed_descriptor;
2205 int indexes_count;
2206 union{
2207 int *indexes;
2208 struct T_WATCH_INDEXES{
2209 int i0,i1,i2,i3,i4,i5,i6,i7,i8,i9;
2210 }*watch_indexes;
2211 };
2212 T_TDC_INTERFACE_BASE* pattern;
2213 T_TDC_PATH* next;
2214 T_TDC_PATH (T_TDC_HANDLE_BASE* handle_);
2215 ~T_TDC_PATH ();
2216 void add_index(T_TDC_DESCRIPTOR_BASE* descriptor, int index);
2217 void add_to_cashed_path_list ();
2218 T_TDC_HANDLE_BASE* get_leaf();
2219 T_TDC_PATH_TEXT get_path_text ();
2220 T_TDC_PATH* duplicate()const;
2221 };
2222
2223 //----------------------------------------------------------------------------
2224
2225 #if TDC_DEBUG_DOT_COMPLETE
2226 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1L()
2227 {
2228 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
2229 s.
2230 i;
2231 s->
2232 i0;
2233
2234 }
2235 #else
2236 #endif
2237
2238 //----------------------------------------------------------------------------
2239
2240 struct const_T_TDC_COPY
2241 {
2242 T_TDC_HANDLE_BASE* descriptor_ref;
2243 const T_TDC_PATH* path;
2244 const_T_TDC_COPY (const T_TDC_PATH* path_):
2245 descriptor_ref (const_cast<T_TDC_PATH*>(path_)->get_leaf()),
2246 path (path_)
2247 {
2248 }
2249 const_T_TDC_COPY (const T_TDC_HANDLE_BASE* descriptor_ref_):
2250 descriptor_ref (const_cast<T_TDC_HANDLE_BASE*>(descriptor_ref_)),
2251 path (0)
2252 {
2253 }
2254 const_T_TDC_COPY (const const_T_TDC_COPY& src):
2255 descriptor_ref (src.descriptor_ref),
2256 path (0)
2257 {
2258 if (src.path)
2259 path = src.path->duplicate();
2260 }
2261 void operator = (const const_T_TDC_COPY& src)
2262 {
2263 descriptor_ref = src.descriptor_ref;
2264 if (path)
2265 delete path;
2266 if (src.path)
2267 path = src.path->duplicate();
2268 else
2269 path = 0;
2270 }
2271 const T_TDC_HANDLE_BASE* operator->()
2272 {
2273 return descriptor_ref;
2274 }
2275 operator const T_TDC_HANDLE_BASE*()const
2276 {
2277 return descriptor_ref;
2278 }
2279 ~const_T_TDC_COPY ()
2280 {
2281 if (path)
2282 delete path;
2283 }
2284 T_TDC_PATH_TEXT path_text ();
2285 T_TDC_ACTION_ENUM get_action () const
2286 {
2287 return descriptor_ref->get_action();
2288 }
2289 bool has_value () const
2290 {
2291 return (descriptor_ref->get_action() & TDC_ACTION_HAS_VALUE) != 0;
2292 }
2293 int get_value () const
2294 {
2295 return descriptor_ref->get_value();
2296 }
2297 };
2298
2299 struct T_TDC_COPY:const_T_TDC_COPY
2300 {
2301 friend struct T_TDC_COPY;
2302 T_TDC_COPY (T_TDC_PATH* path_):
2303 const_T_TDC_COPY (path_)
2304 {
2305 }
2306 T_TDC_COPY (T_TDC_HANDLE_BASE* descriptor_ref_):
2307 const_T_TDC_COPY (descriptor_ref_)
2308 {
2309 }
2310 T_TDC_HANDLE_BASE* operator->()
2311 {
2312 return descriptor_ref;
2313 }
2314 operator T_TDC_HANDLE_BASE*()const
2315 {
2316 return descriptor_ref;
2317 }
2318 void copy_descriptor_ref (const const_T_TDC_COPY& value_);
2319 void copy_number (long value_);
2320 T_TDC_ASSIGN_ACTION copy_action (T_TDC_ACTION_ENUM action_);
2321 private:
2322 void set_action_and_value (T_TDC_ACTION_ENUM action_, long value_=0xFCFCFCFC);
2323 };
2324
2325 //----------------------------------------------------------------------------
2326
2327 /** \struct T_TDC_PATH_TEXT
2328 T_TDC_PATH_TEXT is used to return a string on the heap that will auto dealloc
2329 <pre>
2330 e.g.
2331
2332 T_TDC_PATH_TEXT f()
2333 {
2334 return strdup ("...");
2335 }
2336
2337 void g()
2338 {
2339 printf ("%s", f()); // free of string allocated in f() will happen automatic
2340 // when ~T_TDC_PATH_TEXT is called at the end of sentence (at ';')
2341 }
2342 </pre>
2343 */
2344 struct T_TDC_PATH_TEXT
2345 {
2346 char* str;
2347 T_TDC_PATH_TEXT(char* str_);
2348 ~T_TDC_PATH_TEXT();
2349 };
2350
2351 //\}
2352
2353 //----------------------------------------------------------------------------
2354
2355 #if TDC_DEBUG_DOT_COMPLETE
2356 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1N()
2357 {
2358 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
2359 s.
2360 i;
2361 s->
2362 i0;
2363
2364 }
2365 #else
2366 #endif
2367
2368 //============================================================================
2369 /// \defgroup T_TDC_INTERFACE
2370 //\{
2371
2372 struct T_TDC_INTERFACE_REF:T_TDC_INTERFACE_REF_BASE
2373 {
2374 #if DOT_COMPLETE_MEMBERS
2375 #else
2376 T_TDC_INTERFACE_REF ()
2377 {
2378 tdc_level++;
2379 }
2380 #endif
2381 };
2382
2383 struct T_TDC_INTERFACE_VAR:T_TDC_INTERFACE_VAR_BASE
2384 {
2385 #if DOT_COMPLETE_MEMBERS
2386 #else
2387 T_TDC_INTERFACE_VAR ()
2388 {
2389 //nothing
2390 }
2391 #endif
2392 };
2393
2394 //============================================================================
2395
2396 #if TDC_DEBUG_DOT_COMPLETE
2397 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1O
2398 {
2399 int i1O;
2400 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
2401 };
2402 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1O()
2403 {
2404 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
2405 s.
2406 i;
2407 s->
2408 i0;
2409 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1O s10;
2410 s10->
2411 i0;
2412 }
2413 #else
2414 #endif
2415
2416 //----------------------------------------------------------------------------
2417
2418 #if DOT_COMPLETE
2419 #define TDC_HIDDEN_LEVEL_DEF
2420 #define TDC_HIDDEN_LEVEL(T_BASE)
2421 #define TDC_HIDDEN_LEVEL_MAIN_DEF
2422 #define TDC_HIDDEN_LEVEL_MAIN(T_BASE)
2423 struct T_TDC_INTERFACE_POINTER_MAIN_BASE:T_TDC_INTERFACE_REF_BASE
2424 {
2425 };
2426 #else
2427 #define TDC_HIDDEN_LEVEL_DEF
2428 #define TDC_HIDDEN_LEVEL
2429 #define TDC_HIDDEN_LEVEL_MAIN_DEF , class T_TDC_INTERFACE_POINTER_MAIN_BASE = T_TDC_INTERFACE_POINTER_MAIN_BASE_DEFAULT
2430 #define TDC_HIDDEN_LEVEL_MAIN(T_BASE) , T_BASE
2431 #endif
2432
2433 struct T_TDC_INTERFACE_PRIMITIVE_BASE:T_TDC_INTERFACE_MAIN_BASE
2434 {
2435 };
2436
2437 struct T_TDC_INTERFACE_MESSAGE_BASE:T_TDC_INTERFACE_MAIN_BASE
2438 {
2439 };
2440
2441 //template<class T TDC_HIDDEN_LEVEL_MAIN_DEF > struct T_TDC_INTERFACE_POINTER_MAIN:T_TDC_INTERFACE_POINTER_BASE
2442 template<class T TDC_HIDDEN_LEVEL_MAIN_DEF > struct T_TDC_INTERFACE_POINTER_MAIN:T_TDC_INTERFACE_POINTER_MAIN_BASE
2443 {
2444 T_TDC_INTERFACE_POINTER_MAIN ()
2445 {
2446 level[0] = 'A'+tdc_level;
2447 }
2448 #if DOT_COMPLETE_MEMBERS
2449 #else //DOT_COMPLETE_MEMBERS
2450 operator = (const T& t)
2451 {
2452 tdc_tbd_pointer_assignment_error();
2453 //get_navigation()->_set(t);
2454 return 0;
2455 }
2456 #endif //DOT_COMPLETE_MEMBERS
2457 /*operator = (const T_TDC_INSTANCE& t)
2458 {
2459 get_navigation()->_set(t);
2460 }*/
2461 T* operator-> (){
2462 return (T*)get_element_navigation(new_element_interface);
2463 }
2464 /*operator const T&()
2465 {
2466 return *get_navigation();
2467 }*/
2468 private:
2469 #if DOT_COMPLETE_MEMBERS
2470 #else //DOT_COMPLETE_MEMBERS
2471 static T_TDC_INTERFACE_BASE* new_element_interface()
2472 {
2473 return new T;
2474 }
2475 #endif //DOT_COMPLETE_MEMBERS
2476 };
2477
2478 template<class T> struct T_ARRAY;
2479
2480 struct T_TDC_INTERFACE_ARRAY_BASE
2481 :T_TDC_INTERFACE_REF_BASE
2482 {
2483 #if DOT_COMPLETE
2484 #else
2485 protected:
2486 T_TDC_INTERFACE_BASE* get_element_navigation(int index, T_TDC_NEW_INTERFACE new_element_interface, T_TDC_NEW_HANDLE new_handle);
2487 void copy_basic_array (const T_TDC_INT_U8* array, unsigned size, void *address);
2488 void copy_basic_array (const T_TDC_INT_S8* array, unsigned size, void *address);
2489 void copy_basic_array (const T_TDC_INT_U16* array, unsigned size, void *address);
2490 void copy_basic_array (const T_TDC_INT_S16* array, unsigned size, void *address);
2491 void copy_basic_array (const T_TDC_INT_U32* array, unsigned size, void *address);
2492 void copy_basic_array (const T_TDC_INT_S32* array, unsigned size, void *address);
2493 #endif
2494 };
2495
2496 /*
2497 ** TODO: Function header (this is a comment for an bug fix)
2498 **
2499 ** I would expect dropdown to work for this
2500 ** template<class T, int MAX_INDEX > struct T_TDC_INTERFACE_ARRAY:T_TDC_INTERFACE_POINTER_BASE_DEFAULT
2501 ** ^^
2502 ** and to fail for this
2503 ** template<class T, int MAX_INDEX, int DUMMY=0 > struct T_TDC_INTERFACE_ARRAY:T_TDC_INTERFACE_POINTER_BASE_DEFAULT
2504 ** ^^^^^^^^^^^^^
2505 **
2506 ** but it seams to be the otherway around (see more info in tcd_test.cpp::test_1000())
2507 */
2508
2509 #if DOT_COMPLETE
2510 template<class T /*T_INTERFACE*/, int MAX_INDEX = 1, int DUMMY=0> struct T_TDC_INTERFACE_ARRAY
2511 #else
2512 template<class T /*T_INTERFACE*/, int MAX_INDEX = 1> struct T_TDC_INTERFACE_ARRAY
2513 //template<class T /*T_INTERFACE*/> struct T_TDC_INTERFACE_ARRAY
2514 #endif
2515 :T_TDC_INTERFACE_ARRAY_BASE
2516 {
2517 public:
2518 T& operator [] (int index)//HINT: blah
2519 {
2520 return *(T*)get_element_navigation (index, new_element_interface, T::implement_new_handle);
2521 }
2522 T* operator-> ()//HINT: blah
2523 {
2524 return (T*)get_element_navigation (0, new_element_interface, T::implement_new_handle);
2525 }
2526 #if DOT_COMPLETE_MEMBERS
2527 #else//DOT_COMPLETE_MEMBERS
2528 T_TDC_INTERFACE_ARRAY ()
2529 {
2530 //nothing
2531 }
2532 void assign (const T_TDC_INT_U8* array, unsigned size, void *address)
2533 {
2534 copy_basic_array (array, size, address);
2535 }
2536 void assign (const T_TDC_INT_S8* array, unsigned size, void *address)
2537 {
2538 copy_basic_array (array, size, address);
2539 }
2540 void assign (const T_TDC_INT_U16* array, unsigned size, void *address)
2541 {
2542 copy_basic_array (array, size, address);
2543 }
2544 void assign (const T_TDC_INT_S16* array, unsigned size, void *address)
2545 {
2546 copy_basic_array (array, size, address);
2547 }
2548 void assign (const T_TDC_INT_U32* array, unsigned size, void *address)
2549 {
2550 copy_basic_array (array, size, address);
2551 }
2552 void assign (const T_TDC_INT_S32* array, unsigned size, void *address)
2553 {
2554 copy_basic_array (array, size, address);
2555 }
2556 void assign (const T_TDC_ACTION& action_, unsigned size, void *address)
2557 {
2558 set_action(action_);
2559 }
2560 /*template <class U>
2561 void assign (const U* u, unsigned size)
2562 {
2563 //TDC_TBD();
2564 }*/
2565 template <class U>
2566 void assign (const T_ARRAY<U>& src, unsigned size, void *address)
2567 {
2568 T_TDC_COPY handle = make_descriptor_ref (TDC_RW_MODE_WRITE);
2569 handle.copy_descriptor_ref (src.handle);
2570 }
2571 void assign (const T* t, unsigned size, void *address)
2572 {
2573 //tdc_check_array_assignment(array, address);
2574 tdc_tbd_array_assignment_error();
2575 }
2576 void assign (const T::T_INSTANCE* array, unsigned size, void *address)
2577 {
2578 tdc_check_array_assignment(array, address);
2579 //copy_instance_array (array, size);
2580 T_TDC_COPY handle = make_descriptor_ref (TDC_RW_MODE_WRITE);
2581 T_TDC_HANDLE_BASE* descriptor_ref = handle.descriptor_ref;
2582 T_TDC_DESCRIPTOR_BASE* descriptor = descriptor_ref->make_descriptor ();
2583 T_TDC_HANDLE_BASE** elements = ((T_TDC_DESCRIPTOR_ARRAY_BASE*)descriptor)->get_elements();
2584 if (!*elements)
2585 *elements = T::implement_new_handle ();
2586 int count = size / sizeof *array;
2587
2588 for (int i = 0; i < count; i++)
2589 {
2590 T_TDC_COPY dst_element = descriptor->make_element(i);
2591 const_T_TDC_COPY src_element = (T_TDC_HANDLE_BASE*) array[i].handle;
2592 dst_element.copy_descriptor_ref (src_element);
2593 }
2594 }
2595 template <class U>
2596 T_TDC_INTERFACE_ARRAY& operator = (const U& array)
2597 {
2598 int size = sizeof array; /* if you have error "illegal indirection" here the right hand operator can not be converted to an array
2599 see next error message for the bad assignment */
2600 assign (array, size, (void*)&array);
2601 return *this;
2602 }
2603 private:
2604 static T_TDC_INTERFACE_BASE* new_element_interface()
2605 {
2606 return new T;
2607 }
2608 #endif//DOT_COMPLETE_MEMBERS
2609 };
2610
2611 /*
2612 ** TODO: Function header (this is a comment for an bug fix)
2613 **
2614 ** When we change T_TDC_INTERFACE_ARRAY we have to change T_TDC_INTERFACE_POINTER too
2615 ** template<class T TDC_HIDDEN_LEVEL_DEF > struct T_TDC_INTERFACE_POINTER:T_TDC_INTERFACE_ARRAY<T, 1 TDC_HIDDEN_LEVEL>
2616 */
2617
2618 struct T_TDC_INTERFACE_POINTER_BASE:T_TDC_INTERFACE_REF_BASE
2619 {
2620 protected:
2621 T_TDC_INTERFACE_BASE* get_navigation(T_TDC_NEW_INTERFACE new_element_interface, T_TDC_NEW_HANDLE new_handle);
2622 T_TDC_INTERFACE_BASE* get_navigation(T_TDC_NEW_INTERFACE new_element_interface, T_TDC_NEW_HANDLE new_handle, int index);
2623 };
2624
2625 template<class T_INTERFACE> struct T_TDC_INTERFACE_POINTER
2626 #if DOT_COMPLETE
2627 #else
2628 :T_TDC_INTERFACE_POINTER_BASE
2629 #endif
2630 {
2631 T_INTERFACE* operator-> ()
2632 {
2633 return (T_INTERFACE*)get_navigation (new_element_interface, T_INTERFACE::implement_new_handle);
2634 }
2635 #if DOT_COMPLETE_MEMBERS
2636 #else//DOT_COMPLETE_MEMBERS
2637 T_INTERFACE& operator [] (int index)
2638 {
2639 return *(T_INTERFACE*)get_navigation (new_element_interface, T_INTERFACE::implement_new_handle, index);
2640 }
2641 static T_TDC_INTERFACE_BASE* new_element_interface()
2642 {
2643 return new T_INTERFACE;
2644 }
2645 /*T_TDC_INTERFACE_POINTER ()
2646 {
2647 //nothing
2648 }*/
2649 #endif//DOT_COMPLETE_MEMBERS
2650 };
2651
2652 //============================================================================
2653
2654 #if TDC_DEBUG_DOT_COMPLETE
2655 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1P
2656 {
2657 int i1P;
2658 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
2659 };
2660 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1P()
2661 {
2662 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
2663 s.
2664 i;
2665 s->
2666 i0;
2667 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1P s1P;
2668 s1P->
2669 i0;
2670 T_TDC_INTERFACE_ARRAY<int> i;
2671 i.assign(0,0);
2672 T_ARRAY<int> array;
2673 array.
2674
2675 }
2676 #else
2677 #endif
2678
2679 //----------------------------------------------------------------------------
2680 // T_TDC_INTERFACE
2681 //----------------------------------------------------------------------------
2682
2683 struct T_TDC_INTERFACE_PRIM_BASE:T_TDC_INTERFACE_PRIMITIVE_BASE
2684 {
2685 T_TDC_INTERFACE_PRIM_BASE ()
2686 {
2687 level[0] = 'A'+tdc_level;
2688 tdc_level++;
2689 }
2690 #if DOT_COMPLETE_MEMBERS//{{
2691 T_TDC_ASSIGN_ACTION _require () {} // you can use '= REQUIRE' as well
2692 #else//}DOT_COMPLETE_MEMBERS{
2693 T_TDC_ASSIGN_ACTION tdc_require() // you can use '= REQUIRE' as well
2694 {
2695 return set_action (REQUIRE);
2696 }
2697 #endif//}}DOT_COMPLETE_MEMBERS
2698 };
2699
2700 struct T_TDC_INTERFACE_PSTRUCT_BASE:T_TDC_INTERFACE_REF
2701 {
2702 };
2703
2704 struct T_TDC_INTERFACE_PUNION_BASE:T_TDC_INTERFACE_REF
2705 {
2706 };
2707
2708 struct T_TDC_INTERFACE_SDU_BASE:T_TDC_INTERFACE_REF
2709 {
2710 };
2711
2712 struct T_TDC_INTERFACE_PENUM_BASE:T_TDC_INTERFACE_VAR
2713 {
2714 };
2715
2716 struct T_TDC_INTERFACE_MSG_BASE:T_TDC_INTERFACE_MESSAGE_BASE
2717 {
2718 T_TDC_INTERFACE_MSG_BASE ()
2719 {
2720 level[0] = 'A'+tdc_level;
2721 tdc_level++;
2722 }
2723 #if DOT_COMPLETE_MEMBERS
2724 T_TDC_ASSIGN_ACTION _require () {} // you can use '= REQUIRE' as well
2725 #else//DOT_COMPLETE_MEMBERS
2726 T_TDC_ASSIGN_ACTION tdc_require() // you can use '= REQUIRE' as well
2727 {
2728 return set_action (REQUIRE);
2729 }
2730 #endif//DOT_COMPLETE_MEMBERS
2731 };
2732
2733 struct T_TDC_INTERFACE_MSTRUCT_BASE:T_TDC_INTERFACE_REF
2734 {
2735 };
2736
2737 struct T_TDC_INTERFACE_MUNION_BASE:T_TDC_INTERFACE_REF
2738 {
2739 };
2740
2741 struct T_TDC_INTERFACE_MENUM_BASE:T_TDC_INTERFACE_VAR
2742 {
2743 };
2744
2745 struct T_TDC_INTERFACE_INT_BASE:T_TDC_INTERFACE_VAR
2746 {
2747 };
2748
2749 struct T_TDC_INTERFACE_XXX_PRIMITIVE_UNION_BASE:T_TDC_INTERFACE_PRIMITIVE_BASE
2750 {
2751 T_TDC_INTERFACE_XXX_PRIMITIVE_UNION_BASE ()
2752 {
2753 level[0] = 'A'+tdc_level;
2754 tdc_level++;
2755 }
2756 };
2757
2758 struct T_TDC_INTERFACE_XXX_MESSAGE_UNION_BASE:T_TDC_INTERFACE_MESSAGE_BASE
2759 {
2760 T_TDC_INTERFACE_XXX_MESSAGE_UNION_BASE ()
2761 {
2762 level[0] = 'A'+tdc_level;
2763 tdc_level++;
2764 }
2765 };
2766
2767 struct T_TDC_INTERFACE_PRIMITIVE_UNION_BASE:T_TDC_INTERFACE_PRIMITIVE_BASE
2768 {
2769 T_TDC_INTERFACE_PRIMITIVE_UNION_BASE ()
2770 {
2771 level[0] = 'A'+tdc_level;
2772 tdc_level++;
2773 }
2774 };
2775
2776 struct T_TDC_INTERFACE_MESSAGE_UNION_BASE:T_TDC_INTERFACE_MESSAGE_BASE
2777 {
2778 T_TDC_INTERFACE_MESSAGE_UNION_BASE ()
2779 {
2780 level[0] = 'A'+tdc_level;
2781 tdc_level++;
2782 }
2783 };
2784
2785 #if TDC_DEBUG_DOT_COMPLETE
2786 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q
2787 {
2788 int i1Q;
2789 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
2790 };
2791 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q()
2792 {
2793 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
2794 s.
2795 i;
2796 s->
2797 i0;
2798 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q s1Q;
2799 s1Q->
2800 i;
2801 }
2802 #else
2803 #endif
2804
2805 template<class T> struct T_TDC_INTERFACE_XXX_PRIMITIVE:T_TDC_INTERFACE_POINTER_MAIN<T TDC_HIDDEN_LEVEL_MAIN(T_TDC_INTERFACE_PRIMITIVE_BASE) >
2806 {
2807 };
2808
2809 template<class T> struct T_TDC_INTERFACE_XXX_MESSAGE:T_TDC_INTERFACE_POINTER_MAIN<T TDC_HIDDEN_LEVEL_MAIN(T_TDC_INTERFACE_MESSAGE_BASE) >
2810 {
2811 };
2812
2813 template<class T> struct T_TDC_INTERFACE_PRIMITIVE:T_TDC_INTERFACE_POINTER_MAIN<T TDC_HIDDEN_LEVEL_MAIN(T_TDC_INTERFACE_PRIMITIVE_BASE) >
2814 {
2815 };
2816
2817 template<class T> struct T_TDC_INTERFACE_PRIMITIVE_UNION_POINTER:T_TDC_INTERFACE_POINTER_MAIN<T TDC_HIDDEN_LEVEL_MAIN(T_TDC_INTERFACE_PRIMITIVE_BASE) >
2818 {
2819 };
2820
2821 template<class T> struct T_TDC_INTERFACE_MESSAGE:T_TDC_INTERFACE_POINTER_MAIN<T TDC_HIDDEN_LEVEL_MAIN(T_TDC_INTERFACE_MESSAGE_BASE) >
2822 {
2823 };
2824
2825 template<class T> struct T_TDC_INTERFACE_MESSAGE_UNION_POINTER:T_TDC_INTERFACE_POINTER_MAIN<T TDC_HIDDEN_LEVEL_MAIN(T_TDC_INTERFACE_MESSAGE_BASE) >
2826 {
2827 };
2828
2829 //\}
2830
2831 #if TDC_DEBUG_DOT_COMPLETE
2832 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q1
2833 {
2834 int i1Q1;
2835 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
2836 };
2837 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q1u
2838 {
2839 int i1Q1u;
2840 };
2841 template<class T>
2842 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q1t1
2843 {
2844 int i1Q1t;
2845 //T* operator->(){return 0;}
2846 };
2847 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q1()
2848 {
2849 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q1 s1Q1;
2850 s1Q1->
2851 i;
2852 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q1t1<T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q1u> s1Q1t1u;
2853 s1Q1t1u.
2854 i1Q1t;
2855 s1Q1t1u->
2856 i1Q1u;
2857 /*T_TDC_INTERFACE_PRIMITIVE_UNION_POINTER z1Q1_;
2858 z1Q1_->
2859 i;*/
2860 T_TDC_INTERFACE_PRIMITIVE_UNION_POINTER<T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Q1> z1Q1;
2861 z1Q1.
2862 x;
2863 z1Q1->
2864 i;
2865 }
2866 #else
2867 #endif
2868
2869 //============================================================================
2870
2871 #if TDC_DEBUG_DOT_COMPLETE
2872 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1R
2873 {
2874 int i1R;
2875 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
2876 };
2877 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1R()
2878 {
2879 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
2880 s.
2881 i;
2882 s->
2883 i0;
2884 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1R s1R;
2885 s1R->
2886 i0;
2887 }
2888 #else
2889 #endif
2890
2891 //----------------------------------------------------------------------------
2892 /// \defgroup T_TDC_DESCRIPTOR T_TDC_DESCRIPTOR
2893 /// base classes to repeat stuff that is similar in many descriptor classes
2894 //----------------------------------------------------------------------------
2895 //\{
2896
2897 struct T_TDC_DESCRIPTOR_ARRAY_BASE:T_TDC_DESCRIPTOR_BASE
2898 {
2899 int tap_handle;
2900 int implement_get_tap_array_handle (unsigned c_elements, T_TDC_DESCRIPTOR_BASE* sdu_handle);
2901 int get_tap_array_handle (unsigned c_elements);
2902 bool skip_to_end;
2903 virtual T_TDC_IS_ENUM is ();
2904 virtual void set_skip_to_end (bool skip_to_end_);
2905 virtual bool get_skip_to_end ();
2906 T_TDC_DESCRIPTOR_ARRAY_BASE ();
2907 virtual char* get_name () const;
2908 ~T_TDC_DESCRIPTOR_ARRAY_BASE ();
2909 T_TDC_HANDLE_BASE** get_elements();
2910 unsigned get_c_elements();
2911 void set_c_elements(unsigned c_elements);
2912 T_TDC_HANDLE_BASE* make_element (unsigned index);
2913 T_TDC_HANDLE_BASE* get_element (unsigned index);
2914 };
2915
2916 template<class T, int MAX_INDEX = 1>
2917 struct T_TDC_DESCRIPTOR_ARRAY:T_TDC_DESCRIPTOR_ARRAY_BASE
2918 {
2919 typedef T_TDC_DESCRIPTOR_ARRAY<T, MAX_INDEX> T_DESCRIPTOR_ARRAY;
2920 friend T_TDC_DESCRIPTOR_BASE * new_T_DESCRIPTOR_ARRAY(void)
2921 {
2922 return new T_TDC_DESCRIPTOR_ARRAY<T, MAX_INDEX>;
2923 }
2924 unsigned c_elements;
2925 typedef T T_ELEMENT;
2926 T_ELEMENT* elements;
2927 T_TDC_DESCRIPTOR_ARRAY()
2928 {
2929 c_elements = 0;
2930 elements = 0;
2931 }
2932 virtual int get_tap_handle ()
2933 {
2934 return get_tap_array_handle (c_elements);
2935 }
2936 #ifndef TDC_TEST_PROFILE
2937 virtual long get_sizeof ()
2938 {
2939 /* this function should never be called but the base version have no chance of returning a proper value so we keep it just in case */
2940 TDC_DYNAMIC_DEAD_CODE();
2941 return sizeof *this;
2942 }
2943 #endif
2944 };
2945
2946 struct T_TDC_HANDLE_ARRAY_BASE:T_TDC_HANDLE_BASE
2947 {
2948 virtual char* get_name () const;
2949 virtual T_TDC_IS_ENUM is ()
2950 {
2951 return TDC_IS_ARRAY;
2952 }
2953 };
2954
2955 template<class T, int MAX_INDEX = 1>
2956 struct T_TDC_HANDLE_ARRAY:T_TDC_HANDLE_ARRAY_BASE
2957 {
2958 typedef T_TDC_DESCRIPTOR_ARRAY<T, MAX_INDEX> T_DESCRIPTOR_ARRAY;
2959 virtual long get_sizeof ()
2960 {
2961 return sizeof *this;
2962 }
2963 M_TDC_DESCRIPTOR_HANDLE_ADDITIONAL_PART (T_DESCRIPTOR_ARRAY)
2964 protected:
2965 virtual T_TDC_DESCRIPTOR_BASE* implement_new_descriptor () const;
2966 };
2967
2968 #if DOT_COMPLETE
2969 #else
2970 // the dot complete compiler can not handle this code
2971 template<class T, int MAX_INDEX>
2972 T_TDC_DESCRIPTOR_BASE* T_TDC_HANDLE_ARRAY<T, MAX_INDEX>::implement_new_descriptor(void) const
2973 {
2974 //return new T_DESCRIPTOR_ARRAY;
2975 /*TODO: We don't allways need the element array and the code was once remove
2976 but it seems like there are still problems with code like:
2977 T_ARRAY<T_S8> parray_ps8c;
2978 parray_ps8c[0]. _require;
2979 */
2980 T_DESCRIPTOR_ARRAY *descriptor = new T_DESCRIPTOR_ARRAY;
2981 /*T_TDC_HANDLE_BASE** elements = ((T_TDC_DESCRIPTOR_ARRAY_BASE*)descriptor)->get_elements();
2982 if (!*elements)
2983 //*elements = new_handle ();
2984 *elements = T::implement_new_handle();*/
2985 return descriptor;
2986 }
2987 #endif
2988
2989 #ifdef TDC_SIMULATE_POINTER
2990 #define T_TDC_DESCRIPTOR_POINTER T_TDC_DESCRIPTOR_ARRAY
2991 #define T_TDC_HANDLE_POINTER T_TDC_HANDLE_ARRAY
2992 #else
2993
2994 struct T_TDC_DESCRIPTOR_POINTER_BASE:T_TDC_DESCRIPTOR_BASE
2995 {
2996 virtual T_TDC_IS_ENUM is ();
2997 virtual char* get_name () const;
2998 T_TDC_HANDLE_BASE** get_elements();
2999 virtual T_TDC_HANDLE_BASE* get_element (unsigned index);
3000 virtual int get_tap_handle ();
3001 //virtual int read_ctrl () const;
3002 };
3003
3004 template<class T /*T_HANDLE*/> struct T_TDC_DESCRIPTOR_POINTER:T_TDC_DESCRIPTOR_POINTER_BASE
3005 {
3006 typedef T_TDC_DESCRIPTOR_POINTER<T> T_DESCRIPTOR_POINTER;
3007 friend T_TDC_DESCRIPTOR_BASE * new_T_DESCRIPTOR_POINTER(void)
3008 {
3009 return new T_TDC_DESCRIPTOR_POINTER<T, MAX_INDEX>;
3010 }
3011 //T::T_DESCRIPTOR element;
3012 T* element;
3013 //T element;
3014 #ifndef TDC_TEST_PROFILE
3015 virtual long get_sizeof ()
3016 {
3017 /* this function should never be called but the base version have no chance of returning a proper value so we keep it just in case */
3018 TDC_DYNAMIC_DEAD_CODE();
3019 return sizeof *this;
3020 }
3021 #endif
3022 };
3023
3024 struct T_TDC_HANDLE_POINTER_BASE:T_TDC_HANDLE_BASE
3025 {
3026 virtual char* get_name () const;
3027 virtual T_TDC_IS_ENUM is ()
3028 {
3029 return TDC_IS_POINTER;
3030 }
3031 virtual T_TDC_DESCRIPTOR_BASE* implement_new_descriptor () const;
3032 };
3033
3034 template<class T> struct T_TDC_HANDLE_POINTER:T_TDC_HANDLE_POINTER_BASE
3035 {
3036 typedef T_TDC_DESCRIPTOR_POINTER<T> T_DESCRIPTOR_POINTER;
3037 virtual long get_sizeof ()
3038 {
3039 return sizeof *this;
3040 }
3041 M_TDC_DESCRIPTOR_HANDLE_ADDITIONAL_PART (T_DESCRIPTOR_POINTER)
3042 protected:
3043 virtual T_TDC_DESCRIPTOR_BASE* implement_new_descriptor () const;
3044 };
3045
3046 #if DOT_COMPLETE
3047 #else
3048 // the dot complete compiler can not handle this code
3049 template<class T>
3050 T_TDC_DESCRIPTOR_BASE* T_TDC_HANDLE_POINTER<T>::implement_new_descriptor(void) const
3051 {
3052 return new T_DESCRIPTOR_POINTER;
3053 }
3054 #endif
3055
3056 #endif
3057
3058 //----------------------------------------------------------------------------
3059
3060 struct T_TDC_DESCRIPTOR_MAIN_BASE:T_TDC_DESCRIPTOR_BASE
3061 {
3062 virtual int get_id () const
3063 TDC_PURE_BODY(
3064 return 0;
3065 )
3066 T_TDC_HANDLE_BASE* get_element (unsigned index)
3067 {
3068 char *first_element = (char*) this + sizeof *this;
3069 return implement_get_element (index, first_element);
3070 }
3071 };
3072
3073 struct T_TDC_DESCRIPTOR_XSTRUCT_BASE:T_TDC_DESCRIPTOR_BASE
3074 {
3075 int tap_handle;
3076 int get_tap_xstruct_handle (T_TDC_TABLE_KIND table_kind);
3077 T_TDC_DESCRIPTOR_XSTRUCT_BASE ();
3078 ~T_TDC_DESCRIPTOR_XSTRUCT_BASE ();
3079 T_TDC_HANDLE_BASE* get_element (unsigned index);
3080 };
3081
3082 struct T_TDC_DESCRIPTOR_INT_BASE:T_TDC_HANDLE_BASE
3083 {
3084 virtual int get_tap_handle ();
3085 };
3086
3087 //-----
3088
3089 struct T_TDC_DESCRIPTOR_PRIM_BASE:T_TDC_DESCRIPTOR_MAIN_BASE
3090 {
3091 virtual T_TDC_IS_ENUM is ()
3092 {
3093 return T_TDC_IS_ENUM (TDC_IS_COMP | TDC_IS_PRIM);
3094 }
3095 };
3096
3097 struct T_TDC_DESCRIPTOR_PSTRUCT_BASE:T_TDC_DESCRIPTOR_XSTRUCT_BASE
3098 {
3099 virtual T_TDC_IS_ENUM is ()
3100 {
3101 return TDC_IS_STRUCT;
3102 }
3103 virtual int get_tap_handle ();
3104 };
3105
3106 struct T_TDC_DESCRIPTOR_PUNION_BASE:T_TDC_DESCRIPTOR_BASE
3107 {
3108 virtual T_TDC_IS_ENUM is ()
3109 {
3110 return TDC_IS_UNION;
3111 }
3112 };
3113
3114 struct T_TDC_DESCRIPTOR_SDU_BASE:T_TDC_DESCRIPTOR_BASE
3115 {
3116 virtual T_TDC_IS_ENUM is ()
3117 {
3118 return TDC_IS_SDU;
3119 }
3120 virtual int get_tap_handle ()
3121 {
3122 return TDC_DUMMY_TAP_HANDLE;
3123 }
3124 void invoke_tap (T_TDC_EVENT_ENUM event) const;
3125 };
3126
3127 struct T_TDC_DESCRIPTOR_PENUM_BASE:T_TDC_HANDLE_BASE
3128 {
3129 virtual int get_tap_handle ();
3130 virtual T_TDC_IS_ENUM is ()
3131 {
3132 return TDC_IS_PVAR;
3133 }
3134 };
3135
3136 //-----
3137
3138 struct T_TDC_DESCRIPTOR_MSG_BASE:T_TDC_DESCRIPTOR_MAIN_BASE
3139 {
3140 virtual T_TDC_IS_ENUM is ()
3141 {
3142 return T_TDC_IS_ENUM (TDC_IS_COMP | TDC_IS_MSG);
3143 }
3144 };
3145
3146 struct T_TDC_DESCRIPTOR_MSTRUCT_BASE:T_TDC_DESCRIPTOR_XSTRUCT_BASE
3147 {
3148 virtual T_TDC_IS_ENUM is ()
3149 {
3150 return TDC_IS_STRUCT;
3151 }
3152 virtual int get_tap_handle ();
3153 };
3154
3155 struct T_TDC_DESCRIPTOR_MUNION_BASE:T_TDC_DESCRIPTOR_BASE
3156 {
3157 virtual T_TDC_IS_ENUM is ()
3158 {
3159 return TDC_IS_UNION;
3160 }
3161 };
3162
3163 struct T_TDC_DESCRIPTOR_MENUM_BASE:T_TDC_HANDLE_BASE
3164 {
3165 virtual int get_tap_handle ();
3166 virtual T_TDC_IS_ENUM is ()
3167 {
3168 return TDC_IS_MVAR;
3169 }
3170 };
3171
3172 //-----
3173
3174 struct T_TDC_DESCRIPTOR_XXX_PRIMITIVE_UNION_BASE:T_TDC_DESCRIPTOR_BASE
3175 {
3176 };
3177
3178 struct T_TDC_DESCRIPTOR_XXX_MESSAGE_UNION_BASE:T_TDC_DESCRIPTOR_BASE
3179 {
3180 };
3181
3182 struct T_TDC_DESCRIPTOR_PRIMITIVE_UNION_BASE:T_TDC_DESCRIPTOR_BASE
3183 {
3184 };
3185
3186 struct T_TDC_DESCRIPTOR_MESSAGE_UNION_BASE:T_TDC_DESCRIPTOR_BASE
3187 {
3188 //TODO: construct munions (when called from make_element_info, shold be hamless in get_element_info)
3189 };
3190
3191 //\}
3192
3193 //============================================================================
3194
3195 #if TDC_DEBUG_DOT_COMPLETE
3196 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1S
3197 {
3198 int i1S;
3199 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
3200 };
3201 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1S()
3202 {
3203 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
3204 s.
3205 i;
3206 s->
3207 i0;
3208 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1S s1S;
3209 s1S->
3210 i0;
3211 }
3212 #else
3213 #endif
3214
3215 //----------------------------------------------------------------------------
3216 /// \defgroup T_TDC_INSTANCE T_TDC_INSTANCE
3217 /// base classes to repeat stuff that is similar in many instance classes
3218 //----------------------------------------------------------------------------
3219 ///\{
3220
3221 struct T_TDC_INSTANCE_BASE
3222 {
3223 //private:
3224 T_TDC_HANDLE_BASE* implement_get_handle () const;
3225 void implement_set_handle(T_TDC_HANDLE_BASE* handle);
3226 //protected:
3227 virtual T_TDC_INTERFACE_BASE *new_interface () const;
3228 //public:
3229 T_TDC_INTERFACE_BASE *get_navigation () const;
3230 //protected:
3231 T_TDC_INTERFACE_BASE *get_element_navigation (int index) const;
3232 //public:
3233 T_TDC_INTERFACE_BASE *make_element_navigation (int index, T_TDC_NEW_HANDLE new_element_handle);
3234 T_TDC_HANDLE_BASE* get_descriptor_ref () const;
3235 T_TDC_ASSIGN_ACTION set_action(const T_TDC_ACTION& action_);
3236 void set_value (const T_TDC_INSTANCE_BASE& value_);
3237 void copy_instance (const T_TDC_INSTANCE_BASE * value_);
3238 void copy_interface (const T_TDC_INTERFACE_BASE * value_);
3239 T_TDC_ASSIGN_ACTION construct_from_action(const T_TDC_ACTION& action_, T_TDC_NEW_HANDLE new_handle);
3240 void construct_from_instance (const T_TDC_INSTANCE_BASE& value_, T_TDC_NEW_HANDLE new_handle);
3241 void construct_from_interface (const T_TDC_INTERFACE_BASE * value_, T_TDC_NEW_HANDLE new_handle);
3242 void set_descriptor_value (long value_);
3243 long get_descriptor_value ();
3244 bool cmp_descriptor_value (long value_);
3245 void construct_from_number (long value_, T_TDC_NEW_HANDLE new_handle);
3246 void destroy_handle ();
3247 T_TDC_HANDLE_BASE* construct_handle (T_TDC_NEW_HANDLE new_handle);
3248 T_TDC_HANDLE_BASE* construct_array_handle (T_TDC_NEW_HANDLE new_handle,T_TDC_NEW_HANDLE new_element_handle);
3249 T_TDC_DESCRIPTOR_BASE* construct_descriptor (T_TDC_NEW_HANDLE new_handle);
3250 T_TDC_DESCRIPTOR_BASE* construct_array_descriptor (T_TDC_NEW_HANDLE new_handle,T_TDC_NEW_HANDLE new_element_handle);
3251 T_TDC_INSTANCE_BASE();
3252 ~T_TDC_INSTANCE_BASE();
3253 private:
3254 ///Check for copy constructor missing in class derived from T_TDC_INSTANCE_BASE
3255 T_TDC_INSTANCE_BASE(const T_TDC_INSTANCE_BASE&);
3256 };
3257
3258 struct T_TDC_INSTANCE_MAIN_BASE:T_TDC_INSTANCE_BASE
3259 {
3260 void set_main_value (const T_TDC_INTERFACE_MAIN_BASE* value_);
3261 void set_main_value (const T_TDC_INSTANCE_MAIN_BASE* value_);
3262 void construct_main_value (const T_TDC_INTERFACE_MAIN_BASE* value_, T_TDC_NEW_HANDLE new_handle);
3263 void construct_main_value (const T_TDC_INSTANCE_MAIN_BASE* value_, T_TDC_NEW_HANDLE new_handle);
3264 };
3265
3266 struct T_TDC_INSTANCE_PART_BASE
3267 #if DOT_COMPLETE
3268 #else
3269 TDC_DOT_COMPLETE_HIDE(:T_TDC_INSTANCE_BASE)
3270 #endif
3271 {
3272 };
3273
3274 struct T_TDC_INSTANCE_PRIMITIVE_BASE
3275 #if DOT_COMPLETE
3276 #else
3277 TDC_DOT_COMPLETE_HIDE(:T_TDC_INSTANCE_MAIN_BASE)
3278 #endif
3279 {
3280 #if DOT_COMPLETE
3281 #else
3282 TDC_DOT_COMPLETE_HIDE(void invoke_tap (T_TDC_EVENT_ENUM) const;)
3283 #endif
3284 };
3285
3286 struct T_TDC_INSTANCE_MESSAGE_BASE
3287 #if DOT_COMPLETE
3288 #else
3289 TDC_DOT_COMPLETE_HIDE(:T_TDC_INSTANCE_MAIN_BASE)
3290 #endif
3291 {
3292 };
3293
3294 struct T_TDC_INSTANCE_PRIM_BASE:T_TDC_INSTANCE_PRIMITIVE_BASE
3295 {
3296 };
3297
3298 struct T_TDC_INSTANCE_PSTRUCT_BASE:T_TDC_INSTANCE_PART_BASE
3299 {
3300 };
3301
3302 struct T_TDC_INSTANCE_PUNION_BASE:T_TDC_INSTANCE_PART_BASE
3303 {
3304 };
3305
3306 struct T_TDC_INSTANCE_SDU_BASE:T_TDC_INSTANCE_PART_BASE
3307 {
3308 };
3309
3310 struct T_TDC_INSTANCE_PENUM_BASE:T_TDC_INSTANCE_PART_BASE
3311 {
3312 };
3313
3314 struct T_TDC_INSTANCE_MSG_BASE:T_TDC_INSTANCE_MESSAGE_BASE
3315 {
3316 };
3317
3318 struct T_TDC_INSTANCE_MSTRUCT_BASE:T_TDC_INSTANCE_PART_BASE
3319 {
3320 };
3321
3322 struct T_TDC_INSTANCE_MUNION_BASE:T_TDC_INSTANCE_PART_BASE
3323 {
3324 };
3325
3326 struct T_TDC_INSTANCE_MENUM_BASE:T_TDC_INSTANCE_PART_BASE
3327 {
3328 };
3329
3330 struct T_TDC_INSTANCE_INT_BASE:T_TDC_INSTANCE_PART_BASE
3331 {
3332 };
3333
3334 struct T_TDC_INSTANCE_XXX_PRIMITIVE_UNION_BASE:T_TDC_INSTANCE_PRIMITIVE_BASE
3335 {
3336 };
3337
3338 struct T_TDC_INSTANCE_XXX_MESSAGE_UNION_BASE:T_TDC_INSTANCE_MESSAGE_BASE
3339 {
3340 };
3341
3342 struct T_TDC_INSTANCE_PRIMITIVE_UNION_BASE:T_TDC_INSTANCE_PRIMITIVE_BASE
3343 {
3344 };
3345
3346 struct T_TDC_INSTANCE_MESSAGE_UNION_BASE:T_TDC_INSTANCE_MESSAGE_BASE
3347 {
3348 };
3349
3350 //----------------------------------------------------------------------------
3351
3352 struct T_TDC_INSTANCE_ARRAY_BASE
3353 #if DOT_COMPLETE
3354 #else
3355 TDC_DOT_COMPLETE_HIDE(:T_TDC_INSTANCE_BASE)
3356 #endif
3357 {
3358 #if DOT_COMPLETE_MEMBERS
3359 T_TDC_ASSIGN_ACTION _skip () {} /* you can use '= SKIP' as well */
3360 T_TDC_ASSIGN_ACTION _show () {} /* you can use '= SHOW' as well */
3361 T_TDC_ASSIGN_ACTION _forbid () {} /* you can use '= FORBID' as well */
3362 T_TDC_ASSIGN_ACTION _require () {} /* you can use '= REQUIRE' as well */
3363 #else//DOT_COMPLETE_MEMBERS
3364 T_TDC_ASSIGN_ACTION tdc_skip (); /* you can use '= SKIP' as well */
3365 T_TDC_ASSIGN_ACTION tdc_show (); /* you can use '= SHOW' as well */
3366 T_TDC_ASSIGN_ACTION tdc_forbid (); /* you can use '= FORBID' as well */
3367 T_TDC_ASSIGN_ACTION tdc_require (); /* you can use '= REQUIRE' as well */
3368 /*T_ARRAY operator = (const T_TDC_ACTION& action_)
3369 {
3370 set_action (action_);
3371 return *this;
3372 }*/
3373 #endif//DOT_COMPLETE_MEMBERS
3374 };
3375
3376 #if DOT_COMPLETE
3377 template<class T /*T_INSTANCE*/, int DUMMY> struct T_ARRAY
3378 #else
3379 template<class T /*T_INSTANCE*/> struct T_ARRAY
3380 #endif
3381 :T_TDC_INSTANCE_ARRAY_BASE
3382 {
3383 T::T_INTERFACE& operator [] (int index_)
3384 {
3385 return *(T::T_INTERFACE*)make_element_navigation(index_,T::implement_new_handle);
3386 }
3387 /*
3388 T::T_INTERFACE& operator -> ()
3389 {
3390 return *(T::T_INTERFACE*)get_element_navigation(0);
3391 }
3392 */
3393 #if DOT_COMPLETE
3394 #else
3395 typedef T_TDC_HANDLE_ARRAY<T::T_HANDLE> T_HANDLE;
3396 T_HANDLE* handle;
3397 friend T_TDC_HANDLE_BASE* new_T_HANDLE()\
3398 {
3399 return new T_HANDLE;//(T::implement_new_handle);
3400 }
3401 T_ARRAY operator = (const T_ARRAY& value_)
3402 {
3403 set_value (value_);
3404 return *this;
3405 }
3406 T_ARRAY ()
3407 {
3408 construct_array_handle(new_T_HANDLE,T::implement_new_handle);
3409 }
3410 ~T_ARRAY ()
3411 {
3412 destroy_handle();
3413 }
3414 // T_ARRAY (const T_ARRAY<T>& u1) => ambiguous call to overloaded function
3415 void assign (const T_ARRAY<T>& array, unsigned size, void* address)
3416 {
3417 construct_array_descriptor(new_T_HANDLE,T::implement_new_handle);
3418 T_TDC_COPY(handle).copy_descriptor_ref (array.handle);
3419 }
3420 template<class U1> void assign (const U1* array, unsigned size, void* address)
3421 {
3422 tdc_check_array_assignment(array, address);
3423 int count = size / sizeof *array;
3424 T_TDC_DESCRIPTOR_BASE* descriptor = construct_array_descriptor(new_T_HANDLE,T::implement_new_handle);
3425 for (int i = 0; i < count; i++)
3426 {
3427 T_TDC_COPY element = descriptor->make_element(i);
3428 element.copy_descriptor_ref ((T_TDC_HANDLE_BASE*) array[i].handle);
3429 }
3430 }
3431 void assign (const T_TDC_ACTION& action_, unsigned size, void *address)
3432 {
3433 construct_from_action (action_, new_T_HANDLE);
3434 }
3435 /*T_ARRAY (const T_ARRAY& array) //ambiguous call to overloaded function
3436 {
3437 assign (array, sizeof array, (void*)&array);
3438 }*/
3439 template<class U1> T_ARRAY (const U1& array)
3440 {
3441 assign (array, sizeof array, (void*)&array);
3442 }
3443 template<class U1> T_ARRAY (const U1& u1, T_TDC_ACTION action)
3444 {
3445 const T* array = u1;
3446 int count = sizeof u1 / sizeof *u1;
3447 T_TDC_DESCRIPTOR_BASE* descriptor = construct_array_descriptor(new_T_HANDLE,T::implement_new_handle);
3448 descriptor->set_skip_to_end_from_action (action.action);
3449 for (int i = 0; i < count; i++)
3450 {
3451 T_TDC_COPY element = descriptor->make_element(i);
3452 element.copy_descriptor_ref ((T_TDC_HANDLE_BASE*) array[i].handle);
3453 }
3454 }
3455 template<class U1> T_ARRAY (const U1& u1, T_TDC_CREATE_ACTION action)
3456 {
3457 const T* array = u1;
3458 int count = sizeof u1 / sizeof *u1;
3459 T_TDC_DESCRIPTOR_BASE* descriptor = construct_array_descriptor(new_T_HANDLE,T::implement_new_handle);
3460 descriptor->set_skip_to_end_from_action (action.action);
3461 for (int i = 0; i < count; i++)
3462 {
3463 T_TDC_COPY element = descriptor->make_element(i);
3464 element.copy_descriptor_ref ((T_TDC_HANDLE_BASE*) array[i].handle);
3465 }
3466 }
3467 template<class U1, class U2> T_ARRAY (const U1& u1, const U2& u2)
3468 {
3469 tdc_tbd_array_assignment_error_T_ARRAY();
3470 }
3471 /*
3472 template<class U1, class U2, class U3> T_ARRAY (U1 u1, U2 u2, U3 u3)
3473 {
3474 TDC_TBD();
3475 }
3476 template<class U1, class U2, class U3, class U4> T_ARRAY (U1 u1, U2 u2, U3 u3, U4 u4)
3477 {
3478 TDC_TBD();
3479 }
3480 template<class U1, class U2, class U3, class U4, class U5> T_ARRAY (U1 u1, U2 u2, U3 u3, U4 u4, U5 u5)
3481 {
3482 TDC_TBD();
3483 }
3484 */
3485 virtual T_TDC_INTERFACE_BASE *new_interface () const
3486 {
3487 return new T::T_INTERFACE;
3488 }
3489 #endif
3490 };
3491
3492
3493 #define M_TDC_BASIC_ARRAY(T_BASIC)\
3494 T_ARRAY ()\
3495 {\
3496 /*construct_handle(new_T_HANDLE);*/\
3497 }\
3498 template<class U1>\
3499 T_ARRAY (const U1& array, T_TDC_ACTION action)\
3500 {\
3501 assign (array, sizeof array, (void*)&array, action);\
3502 }\
3503 template<class U1>\
3504 T_ARRAY (const U1& array)\
3505 {\
3506 assign (array, sizeof array, (void*)&array, TDC_ACTION_UNKNOWN);\
3507 }\
3508 T_ARRAY operator = (const T_ARRAY& value_)\
3509 {\
3510 set_value (value_);\
3511 return *this;\
3512 }\
3513 T_ARRAY operator = (const T_TDC_ACTION& action_)\
3514 {\
3515 construct_from_action (action_,new_T_HANDLE);\
3516 return *this;\
3517 }\
3518
3519 template<class T, class T_BASIC> struct T_TDC_INSTANCE_BASIC_ARRAY:T_TDC_INSTANCE_ARRAY_BASE
3520 {
3521 typedef T_TDC_HANDLE_ARRAY<T::T_HANDLE> T_HANDLE;
3522 T_HANDLE* handle;
3523 static T_TDC_HANDLE_BASE* new_T_HANDLE()\
3524 {
3525 return new T_HANDLE;//(T::implement_new_handle);
3526 }
3527 T_TDC_INSTANCE_BASIC_ARRAY ()
3528 {
3529 construct_array_descriptor(new_T_HANDLE,T::implement_new_handle);
3530 }
3531 void assign (const T_BASIC* array, unsigned size, void* address, T_TDC_ACTION action)
3532 {
3533 tdc_check_array_assignment(array, address);
3534 unsigned count = size / sizeof T_BASIC;
3535 T_TDC_DESCRIPTOR_BASE* descriptor = construct_array_descriptor(new_T_HANDLE,T::implement_new_handle);
3536 descriptor->set_skip_to_end_from_action (action.action);
3537 for (int i = 0; i < count; i++)
3538 {
3539 T_TDC_COPY element= descriptor->make_element(i);
3540 element.copy_number (array[i]);
3541 }
3542 }
3543 void assign (const T_BASIC* array, unsigned size, void* address, T_TDC_CREATE_ACTION action)
3544 {
3545 tdc_check_array_assignment(array, address);
3546 unsigned count = size / sizeof T_BASIC;
3547 T_TDC_DESCRIPTOR_BASE* descriptor = construct_array_descriptor(new_T_HANDLE,T::implement_new_handle);
3548 descriptor->set_skip_to_end_from_action (action.action);
3549 for (int i = 0; i < count; i++)
3550 {
3551 T_TDC_COPY element= descriptor->make_element(i);
3552 element.copy_number (array[i]);
3553 }
3554 }
3555 void assign (const T_ARRAY<T>& array, unsigned size, void* address)
3556 {
3557 construct_array_descriptor(new_T_HANDLE,T::implement_new_handle);
3558 T_TDC_COPY(handle).copy_descriptor_ref (array.handle);
3559 }
3560 template<class U1> void assign (const U1* array, unsigned size, void* address)
3561 {
3562 tdc_check_array_assignment(array, address);
3563 int count = size / sizeof *array;
3564 T_TDC_DESCRIPTOR_BASE* descriptor = construct_array_descriptor(new_T_HANDLE,T::implement_new_handle);
3565 for (int i = 0; i < count; i++)
3566 {
3567 T_TDC_COPY element = descriptor->make_element(i);
3568 element.copy_descriptor_ref ((T_TDC_HANDLE_BASE*) array[i].handle);
3569 }
3570 }
3571 void assign (const T_TDC_ACTION& action_, unsigned size, void *address)
3572 {
3573 construct_from_action (action_, new_T_HANDLE);
3574 }
3575 void assign (const T_ARRAY<T_BASIC>& array, unsigned size, void* address, T_TDC_ACTION action)
3576 {
3577 construct_from_instance(array,new_T_HANDLE);
3578 }
3579 T::T_INTERFACE& operator [] (int index_)
3580 {
3581 return *(T::T_INTERFACE*)get_element_navigation(index_);
3582 }
3583 virtual T_TDC_INTERFACE_BASE *new_interface () const
3584 {
3585 return new T::T_INTERFACE;
3586 }
3587 };
3588
3589 //\}
3590
3591 //============================================================================
3592
3593 #if TDC_DEBUG_DOT_COMPLETE
3594 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W
3595 {
3596 int i1W;
3597 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
3598 };
3599 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W()
3600 {
3601 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
3602 s.
3603 i;
3604 s->
3605 i0;
3606 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W s1W;
3607 s1W->
3608 i0;
3609 }
3610 #else
3611 #endif
3612
3613 //============================================================================
3614 /// \defgroup BuildInTypes build in types
3615 //============================================================================
3616 //\{
3617
3618 //#pragma M_TDC_MESSAGE (M_TDC_STRING(M_TDC_FORWARD_INT (U8)))
3619 M_TDC_FORWARD_INT (U8)
3620 M_TDC_FORWARD_INT (S8)
3621 M_TDC_FORWARD_INT (U16)
3622 M_TDC_FORWARD_INT (S16)
3623 M_TDC_FORWARD_INT (U32)
3624 M_TDC_FORWARD_INT (S32)
3625
3626 M_TDC_FORWARD_PSTRUCT (raw)
3627 M_TDC_FORWARD_PSTRUCT (aim)
3628 M_TDC_FORWARD_COMP (MESSAGE_UNION,TDC_IS_MESSAGE_UNION)
3629
3630 //M_TDC_FORWARD_MSTRUCT(COMP_STENCIL)
3631 M_TDC_FORWARD_BASE(COMP_STENCIL, T_TDC_HANDLE_COMP_STENCIL)
3632 M_TDC_HANDLE(M_TDC_IN_CLASS,M_TDC_WITHOUT_BODY,COMP_STENCIL,TDC_IS_COMP)
3633
3634 #ifndef TDC_DOT_COMPLETE_HIDE_PROTOTYPES
3635 struct T_PRIMITIVE_UNION;
3636 struct T_TDC_INTERFACE_PRIMITIVE_UNION;
3637 struct T_TDC_DESCRIPTOR_PRIMITIVE_UNION;
3638 struct T_TDC_HANDLE_PRIMITIVE_UNION;
3639 T_TDC_HANDLE_BASE* new_T_TDC_HANDLE_PRIMITIVE_UNION();
3640
3641 struct T_MESSAGE_UNION;
3642 struct T_TDC_INTERFACE_MESSAGE_UNION;
3643 struct T_TDC_DESCRIPTOR_MESSAGE_UNION;
3644 struct T_TDC_HANDLE_MESSAGE_UNION;
3645 T_TDC_HANDLE_BASE* new_T_TDC_HANDLE_MESSAGE_UNION();
3646 #endif
3647
3648 struct T_TDC_DESCRIPTOR_S8:T_TDC_DESCRIPTOR_INT_BASE
3649 {
3650 M_TDC_DESCRIPTOR_INT_ADDITIONAL (S8)
3651 };
3652
3653 struct T_TDC_DESCRIPTOR_U8:T_TDC_DESCRIPTOR_INT_BASE
3654 {
3655 M_TDC_DESCRIPTOR_INT_ADDITIONAL (U8)
3656 };
3657
3658 struct T_TDC_DESCRIPTOR_S16:T_TDC_DESCRIPTOR_INT_BASE
3659 {
3660 M_TDC_DESCRIPTOR_INT_ADDITIONAL (S16)
3661 };
3662
3663 struct T_TDC_DESCRIPTOR_U16:T_TDC_DESCRIPTOR_INT_BASE
3664 {
3665 M_TDC_DESCRIPTOR_INT_ADDITIONAL (U16)
3666 };
3667
3668 struct T_TDC_DESCRIPTOR_S32:T_TDC_DESCRIPTOR_INT_BASE
3669 {
3670 M_TDC_DESCRIPTOR_INT_ADDITIONAL (S32)
3671 };
3672
3673 struct T_TDC_DESCRIPTOR_U32:T_TDC_DESCRIPTOR_INT_BASE
3674 {
3675 M_TDC_DESCRIPTOR_INT_ADDITIONAL (U32)
3676 };
3677
3678 struct T_TDC_DESCRIPTOR_raw:T_TDC_DESCRIPTOR_PSTRUCT_BASE
3679 {
3680 M_TDC_DESCRIPTOR_PSTRUCT_ADDITIONAL (raw)
3681 T_TDC_HANDLE_U16 l_buf;
3682 T_TDC_HANDLE_U16 o_buf;
3683 T_TDC_HANDLE_ARRAY<T_TDC_DESCRIPTOR_U8> buf;
3684 virtual int get_tap_handle ();
3685 };
3686
3687 struct T_TDC_DESCRIPTOR_COMP_STENCIL:T_TDC_DESCRIPTOR_MSTRUCT_BASE
3688 {
3689 M_TDC_DESCRIPTOR_MSTRUCT_ADDITIONAL (COMP_STENCIL)
3690 };
3691
3692 struct T_TDC_DESCRIPTOR_VAR_STENCIL:T_TDC_DESCRIPTOR_MENUM_BASE
3693 {
3694 typedef long T_TDC_ENUM_VAR_STENCIL;
3695 M_TDC_DESCRIPTOR_MENUM_ADDITIONAL (VAR_STENCIL)
3696 };
3697
3698 #if TDC_DEBUG_DOT_COMPLETE
3699 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W1
3700 {
3701 int i1W1;
3702 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
3703 };
3704 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W1()
3705 {
3706 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
3707 s.
3708 i;
3709 s->
3710 i0;
3711 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W1 s1W1;
3712 s1W1->
3713 i0;
3714 }
3715 #else
3716 #endif
3717
3718
3719 typedef T_TDC_DESCRIPTOR_ARRAY<T_TDC_HANDLE_COMP_STENCIL> T_TDC_DESCRIPTOR_ARRAY_STENCIL;
3720 typedef T_TDC_DESCRIPTOR_POINTER<T_TDC_HANDLE_COMP_STENCIL> T_TDC_DESCRIPTOR_POINTER_STENCIL;
3721 typedef T_TDC_HANDLE_POINTER<T_TDC_HANDLE_COMP_STENCIL> T_TDC_HANDLE_POINTER_STENCIL;
3722
3723
3724 #if TDC_DEBUG_DOT_COMPLETE
3725 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W4
3726 {
3727 int i1W4;
3728 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
3729 };
3730 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W4()
3731 {
3732 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
3733 s.
3734 i;
3735 s->
3736 i0;
3737 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W4 s1W4;
3738 s1W4->
3739 i0;
3740 }
3741 #else
3742 #endif
3743
3744 #if !defined TDC_DESCRIPTOR || defined TDC_PRECOMPILE
3745
3746 #if TDC_DEBUG_DOT_COMPLETE
3747 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W5
3748 {
3749 int i1W5;
3750 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
3751 };
3752 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W5()
3753 {
3754 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
3755 s.
3756 i;
3757 s->
3758 i0;
3759 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W5 s1W5;
3760 s1W5->
3761 i0;
3762 }
3763 #else
3764 #endif
3765
3766 struct T_U8:T_TDC_INSTANCE_INT_BASE
3767 {
3768 //enable pragma line to see expanded version of macro in list file
3769 //#pragma M_TDC_MESSAGE (M_TDC_STRING(M_TDC_INSTANCE_INT_ADDITIONAL (U8)))
3770 M_TDC_INSTANCE_INT_ADDITIONAL (U8)
3771 T_TDC_INTERFACE_U8* operator-> ();
3772 };
3773 struct T_TDC_INTERFACE_U8:T_TDC_INTERFACE_INT_BASE
3774 {
3775 //enable pragma line to see expanded version of macro in list file
3776 //#pragma M_TDC_MESSAGE (M_TDC_STRING(M_TDC_INTERFACE_INT_ADDITIONAL (U8)))
3777 M_TDC_INTERFACE_INT_ADDITIONAL (U8)
3778 #ifdef TDC_TYPE_NAME_COMPLETE
3779 struct T_TDC_TYPE_NAME { char T_U8, ___dummy__basic_type_have_no_members; } _type_name () M_TDC_TYPE_NAME_COMPLETE //HINT: ??? press CTRL + SHIFT + Q to create a reference to this variable
3780 #endif
3781 };
3782
3783 #if TDC_DEBUG_DOT_COMPLETE
3784 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W6
3785 {
3786 int i1W6;
3787 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
3788 };
3789 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W6()
3790 {
3791 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
3792 s.
3793 i;
3794 s->
3795 i0;
3796 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W6 s1W6;
3797 s1W6->
3798 i0;
3799 }
3800 #else
3801 #endif
3802
3803 struct T_S8:T_TDC_INSTANCE_INT_BASE
3804 {
3805 M_TDC_INSTANCE_INT_ADDITIONAL (S8)
3806 T_TDC_INTERFACE_S8* operator-> ();
3807 };
3808 struct T_TDC_INTERFACE_S8:T_TDC_INTERFACE_INT_BASE
3809 {
3810 M_TDC_INTERFACE_INT_ADDITIONAL (S8)
3811 #ifdef TDC_TYPE_NAME_COMPLETE
3812 struct T_TDC_TYPE_NAME { char T_S8, ___dummy__basic_type_have_no_members; } _type_name () M_TDC_TYPE_NAME_COMPLETE //HINT: ??? press CTRL + SHIFT + Q to create a reference to this variable
3813 #endif
3814 };
3815
3816 struct T_U16:T_TDC_INSTANCE_INT_BASE
3817 {
3818 M_TDC_INSTANCE_INT_ADDITIONAL (U16)
3819 T_TDC_INTERFACE_U16* operator-> ();
3820 };
3821 struct T_TDC_INTERFACE_U16:T_TDC_INTERFACE_INT_BASE
3822 {
3823 M_TDC_INTERFACE_INT_ADDITIONAL (U16)
3824 #ifdef TDC_TYPE_NAME_COMPLETE
3825 struct T_TDC_TYPE_NAME { char T_U16, ___dummy__basic_type_have_no_members; } _type_name () M_TDC_TYPE_NAME_COMPLETE //HINT: ??? press CTRL + SHIFT + Q to create a reference to this variable
3826 #endif
3827 };
3828
3829 struct T_S16:T_TDC_INSTANCE_INT_BASE
3830 {
3831 M_TDC_INSTANCE_INT_ADDITIONAL (S16)
3832 T_TDC_INTERFACE_S16* operator-> ();
3833 };
3834 struct T_TDC_INTERFACE_S16:T_TDC_INTERFACE_INT_BASE
3835 {
3836 M_TDC_INTERFACE_INT_ADDITIONAL (S16)
3837 #ifdef TDC_TYPE_NAME_COMPLETE
3838 struct T_TDC_TYPE_NAME { char T_S16, ___dummy__basic_type_have_no_members; } _type_name () M_TDC_TYPE_NAME_COMPLETE //HINT: ??? press CTRL + SHIFT + Q to create a reference to this variable
3839 #endif
3840 };
3841
3842 struct T_U32:T_TDC_INSTANCE_INT_BASE
3843 {
3844 M_TDC_INSTANCE_INT_ADDITIONAL (U32)
3845 T_TDC_INTERFACE_U32* operator-> ();
3846 };
3847 struct T_TDC_INTERFACE_U32:T_TDC_INTERFACE_INT_BASE
3848 {
3849 M_TDC_INTERFACE_INT_ADDITIONAL (U32)
3850 #ifdef TDC_TYPE_NAME_COMPLETE
3851 struct T_TDC_TYPE_NAME { char T_U32, ___dummy__basic_type_have_no_members; } _type_name () M_TDC_TYPE_NAME_COMPLETE //HINT: ??? press CTRL + SHIFT + Q to create a reference to this variable
3852 #endif
3853 };
3854
3855 struct T_S32:T_TDC_INSTANCE_INT_BASE
3856 {
3857 M_TDC_INSTANCE_INT_ADDITIONAL (S32)
3858 T_TDC_INTERFACE_S32* operator-> ();
3859 };
3860 struct T_TDC_INTERFACE_S32:T_TDC_INTERFACE_INT_BASE
3861 {
3862 M_TDC_INTERFACE_INT_ADDITIONAL (S32)
3863 #ifdef TDC_TYPE_NAME_COMPLETE
3864 struct T_TDC_TYPE_NAME { char T_S32, ___dummy__basic_type_have_no_members; } _type_name () M_TDC_TYPE_NAME_COMPLETE //HINT: ??? press CTRL + SHIFT + Q to create a reference to this variable
3865 #endif
3866 };
3867
3868 struct T_raw:T_TDC_INSTANCE_PSTRUCT_BASE
3869 {
3870 M_TDC_INSTANCE_PSTRUCT_ADDITIONAL (raw,raw)
3871 T_TDC_INTERFACE_raw* operator-> ();
3872 };
3873 struct T_TDC_INTERFACE_raw:T_TDC_INTERFACE_PSTRUCT_BASE
3874 {
3875 M_TDC_INTERFACE_PSTRUCT_ADDITIONAL (raw,raw)
3876 T_TDC_INTERFACE_U16 l_buf; //number of valid bits
3877 T_TDC_INTERFACE_U16 o_buf; //offset of first valid bit
3878 T_TDC_INTERFACE_ARRAY<T_TDC_INTERFACE_U8> buf; //array size = (o_buf + l_buf + 7) /8
3879 #ifdef TDC_TYPE_NAME_COMPLETE
3880 struct T_TDC_TYPE_NAME { char T_raw, ___l_buf___o_buf___buf; } _type_name () M_TDC_TYPE_NAME_COMPLETE //HINT: ??? press CTRL + SHIFT + Q to create a reference to this variable
3881 #endif
3882 };
3883
3884 #if TDC_DEBUG_DOT_COMPLETE
3885 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9
3886 {
3887 int i1W9;
3888 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
3889 };
3890 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9()
3891 {
3892 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
3893 s.
3894 i;
3895 s->
3896 i0;
3897 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9 s1W9;
3898 s1W9->
3899 i0;
3900 }
3901 #else
3902 #endif
3903
3904 struct T_COMP_STENCIL:T_TDC_INSTANCE_MSTRUCT_BASE
3905 {
3906 /*void copy_instance (const T_TDC_INSTANCE_BASE * value_)
3907 {
3908 TDC_INTERNAL_ERROR();
3909 }*/
3910 M_TDC_INSTANCE_MSTRUCT_ADDITIONAL (COMP_STENCIL,COMP_STENCIL)
3911 };
3912 struct T_TDC_INTERFACE_COMP_STENCIL:T_TDC_INTERFACE_MSTRUCT_BASE
3913 {
3914 M_TDC_INTERFACE_MSTRUCT_ADDITIONAL (COMP_STENCIL,COMP_STENCIL)
3915 };
3916
3917 #if TDC_DEBUG_DOT_COMPLETE
3918 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9A9
3919 {
3920 int i1W9A9;
3921 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
3922 };
3923 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9A9()
3924 {
3925 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
3926 s.
3927 i;
3928 s->
3929 i0;
3930 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9A9 s1W9A9;
3931 s1W9A9->
3932 i0;
3933 }
3934 #else
3935 #endif
3936
3937 #ifndef TDC_DOT_COMPLETE_SOURCE_INSIGHT
3938 /**
3939 allocation call tree:
3940 function defined in
3941 T_PRIMITIVE_UNION() tdc_base.h
3942 T_PRIMITIVE_UNION
3943 M_TDC_INSTANCE_ADDITIONAL_BASE
3944 construct_handle(new_T_TDC_HANDLE_PRIMITIVE_UNION) tdc.cpp
3945 T_TDC_INSTANCE_BASE
3946 new_T_TDC_HANDLE_PRIMITIVE_UNION ??? global
3947 ???
3948 implement_new_handle () tdc_lib_main_dsc.cpp virtual in T_TDC_HANDLE_PRIMITIVE_UNION
3949 M_TDC_POST_COMP
3950 M_TDC_POST_DESCRIPTOR_COMP
3951 M_TDC_HANDLE_ADDITIONAL
3952 new T_TDC_HANDLE_PRIMITIVE_UNION() not explicit declared
3953 T_TDC_HANDLE_BASE () tdc_dsc.cpp
3954 implement_set_action(TDC_ACTION_DEFAULT) tdc_dsc.cpp
3955
3956 T_PRIMITIVE_UNION
3957
3958 make_descriptor() tdc.cpp
3959 implement_new_descriptor () tdc.cpp
3960 new T_TDC_DESCRIPTOR_PRIMITIVE_UNION tdc_lib_main_dsc.cpp
3961 M_TDC_POST_COMP
3962 M_TDC_POST_DESCRIPTOR_COMP
3963
3964
3965 */
3966 #if TDC_DEBUG_DOT_COMPLETE
3967 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9B
3968 {
3969 int i1W9B;
3970 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
3971 };
3972 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9B()
3973 {
3974 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
3975 s.
3976 i;
3977 s->
3978 i0;
3979 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9B s1W9B;
3980 s1W9B->
3981 i0;
3982 }
3983 #else
3984 #endif
3985
3986 struct T_PRIMITIVE_UNION
3987 TDC_DOT_COMPLETE_HIDE(:T_TDC_INSTANCE_PRIMITIVE_UNION_BASE)
3988 {
3989 TDC_DOT_COMPLETE_HIDE(M_TDC_INSTANCE_PRIMITIVE_ADDITIONAL ())
3990 T_TDC_INTERFACE_PRIMITIVE_UNION* operator-> ();
3991 };
3992
3993 struct T_MESSAGE_UNION:T_TDC_INSTANCE_MESSAGE_UNION_BASE
3994 {
3995 TDC_DOT_COMPLETE_HIDE(M_TDC_INSTANCE_MESSAGE_ADDITIONAL ())
3996 T_TDC_INTERFACE_MESSAGE_UNION* operator-> ();
3997 };
3998
3999 #if TDC_DEBUG_DOT_COMPLETE
4000 struct T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9B
4001 {
4002 int i1W9B;
4003 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 operator->(){return 0;}
4004 };
4005 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1W9B()
4006 {
4007 T_PRIMITIVE_UNION primitive_union;
4008 primitive_union-> XX_TDC_1;
4009 }
4010 #else
4011 #endif
4012
4013 #else
4014 typedef T_TDC_INTERFACE_PRIMITIVE_UNION* T_PRIMITIVE_UNION;
4015 typedef T_TDC_INTERFACE_MESSAGE_UNION* T_MESSAGE_UNION;
4016 #endif
4017
4018 //----------------------------------------------------------------------------
4019
4020 //#if TDC_DOT_COMPLETE
4021 //#else
4022 template<> struct T_ARRAY<U8>:T_TDC_INSTANCE_BASIC_ARRAY<T_U8, U8>
4023 {
4024 M_TDC_BASIC_ARRAY(U8)
4025 };
4026
4027 template<> struct T_ARRAY<S8>:T_TDC_INSTANCE_BASIC_ARRAY<T_S8, S8>
4028 {
4029 M_TDC_BASIC_ARRAY(S8)
4030 };
4031
4032 template<> struct T_ARRAY<U16>:T_TDC_INSTANCE_BASIC_ARRAY<T_U16, U16>
4033 {
4034 M_TDC_BASIC_ARRAY(U16)
4035 };
4036
4037 template<> struct T_ARRAY<S16>:T_TDC_INSTANCE_BASIC_ARRAY<T_S16, S16>
4038 {
4039 M_TDC_BASIC_ARRAY(S16)
4040 };
4041
4042 template<> struct T_ARRAY<U32>:T_TDC_INSTANCE_BASIC_ARRAY<T_U32, U32>
4043 {
4044 M_TDC_BASIC_ARRAY(U32)
4045 };
4046
4047 template<> struct T_ARRAY<S32>:T_TDC_INSTANCE_BASIC_ARRAY<T_S32, S32>
4048 {
4049 M_TDC_BASIC_ARRAY(S32)
4050 };
4051 //#endif
4052
4053 #endif //!defined TDC_DESCRIPTOR || defined TDC_PRECOMPILE
4054
4055 //\}
4056
4057 //============================================================================
4058 // types used by dynamic part
4059 //============================================================================
4060
4061 struct T_TDC_AWAIT_CONTEXT;
4062 struct T_TDC_SEND_CONTEXT;
4063 struct T_TDC_AWAIT;
4064
4065 #ifdef DOT_COMPLETE
4066 struct T_ON{};
4067 #endif
4068
4069 //============================================================================
4070
4071 enum T_TDC_JMPRET
4072 {
4073 TDC_JMPRET_SETJMP = 0, //setjmp is hard coded to return 0
4074 TDC_JMPRET_INITIAL = 1,
4075 TDC_JMPRET_FAIL = 2,
4076 TDC_JMPRET_PASS = 3,
4077 TDC_JMPRET_BAD_BREAK = 4,
4078 TDC_JMPRET_CASE_PASS = 5,
4079 TDC_JMPRET_STEP_PASS = 6,
4080 TDC_JMPRET_ON_PASS = 7,
4081 TDC_JMPRET_ON_TEST = 8,
4082 TDC_JMPRET_ALT_ENTER = 9,
4083 TDC_JMPRET_OTHERWISE_PASS = 10,
4084 TDC_JMPRET_OTHERWISE_PARK = 11,
4085 TDC_JMPRET_TRAP_PASS = 12,
4086 TDC_JMPRET_POPED = 13,
4087 TDC_JMPRET_USER_ERROR = 14,
4088 TDC_JMPRET_INTERNAL_ERROR = 15,
4089 TDC_JMPRET_TAP_EXCLUDED = 16
4090 };
4091
4092 enum T_TDC_CONTEXT
4093 {
4094 TDC_CONTEXT_UNKNOWN,
4095 TDC_CONTEXT_FUNCTION,
4096 TDC_CONTEXT_CASE,
4097 TDC_CONTEXT_STEP,
4098 TDC_CONTEXT_ALT,
4099 TDC_CONTEXT_ON,
4100 TDC_CONTEXT_OTHERWISE,
4101 TDC_CONTEXT_TRAP
4102 };
4103
4104 struct T_TDC_DYNAMIC_CONTEXT_DATA
4105 {
4106 T_TDC_DYNAMIC_CONTEXT_DATA* parent;
4107 jmp_buf mark;
4108 T_TDC_DYNAMIC_CONTEXT_DATA* prev;
4109 T_TDC_JMPRET jmpret;
4110 char* file;
4111 int line;
4112 int event;
4113 bool testing;
4114 char *text;
4115 int destroy_on_fail_handles_count;
4116 T_TDC_CONTEXT context;
4117 T_TDC_HANDLE_BASE** destroy_on_fail_handles;
4118 void add_destroy_on_fail (T_TDC_HANDLE_BASE* handle);
4119 void remove_destroy_on_fail (T_TDC_HANDLE_BASE* handle);
4120 T_TDC_DYNAMIC_CONTEXT_DATA* pop ();
4121 T_TDC_DYNAMIC_CONTEXT_DATA (T_TDC_CONTEXT
4122 context_, T_TDC_DYNAMIC_CONTEXT_DATA* parent_, char* file_, int line_, char* text_);
4123 ~T_TDC_DYNAMIC_CONTEXT_DATA();
4124 void jmp(T_TDC_JMPRET jmpret_);
4125 };
4126
4127 struct T_TDC_CONTEXT_BASE
4128 {
4129 };
4130
4131 struct T_TDC_FUNCTION_CONTEXT:T_TDC_CONTEXT_BASE //the name of this type is contructed to give more info from error message
4132 {
4133 /*
4134 Got this error?
4135 error C2039: 'tdc_alt_context' : is not a member of 'T_TDC_FUNCTION_CONTEXT'
4136 you are violating the following rules:
4137
4138 "ON(...)...;" and "OTHERWISE()...;" must be inside an "ALT{...}"
4139
4140 TODO: test above statement
4141 */
4142 T_TDC_DYNAMIC_CONTEXT_DATA tdc_function_context; //this member name is contructed to give more info from error message
4143 T_TDC_FUNCTION_CONTEXT (char* file_, int line_);
4144 };
4145
4146 struct T_TDC_USER_ERROR_CASE_BASE
4147 {
4148 // for testing TDC only
4149 unsigned int failed;
4150 };
4151
4152 struct T_TDC_CASE
4153 {
4154 /** \struct T_TDC_CASE
4155 this type can not have constructor or member functions as it virolate 'extern "C"' in T_CASE macro
4156
4157 this type should only contain one member so that if returned from a function with '__declspec(dllexport)'
4158 it will be returned in the same way as if such a function returned int, returning an int is what tap2.exe
4159 expect
4160
4161 from an internal tdc point of view there is no difference between a function of type T_CASE and one of
4162 type T_TDC_CASE, this is used in some tdc_test test cases
4163
4164 founctions of type T_CASE (T_TDC_CASE) should not have explicit returns instead they should contain
4165 a BEGIN_CASE(...) which will make an implicit return (return is hidden inside macro);
4166 */
4167 unsigned int passed;
4168 };
4169
4170 struct T_TDC_CASE_CONTEXT:T_TDC_CONTEXT_BASE
4171 {
4172 T_TDC_DYNAMIC_CONTEXT_DATA tdc_not_alt_context;
4173 T_TDC_CASE_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA* parent_, char* file_, int line_, char* text_);
4174 void tdc_end_for ();
4175 bool tdc_do_return ();
4176 void prepare_exit (int exit_code, char *message);
4177 T_TDC_CASE tdc_return_value ();
4178 T_TDC_USER_ERROR_CASE_BASE tdc_user_error_return_value ();
4179 };
4180
4181 struct T_TDC_only_one__BEGIN_CASE__allowed_per_function:T_TDC_CONTEXT_BASE
4182 {
4183 /* TODO: wrong text type name should say it all
4184 Got this error?
4185 error C2039: 'tdc_alt_context' : is not a member of 'T_TDC__OTHERWISE__MUST_BE_LAST_IN_ALT'
4186
4187 you are violating one of the following rules:
4188 A)
4189 "ON(...)...;" cannot follow "OTHERWISE()...;"
4190
4191 B)
4192 "AWAIT(...)" is not allow in side "ALT{...}" enclose it with an "ON(...)"
4193 e.g. ALT{... ON(AWAIT(...))...; ...}
4194 C)
4195 "FAIL()", "PASS()", "SEND(...)" are not allowed inside "ALT{...}" they must be
4196 inside the body of an "ON(AWAIT(something))...;" or "OTHERWISE()...;"
4197
4198 remember to use curly parantheses "{...}" when the body contain more than one command
4199 */
4200 T_TDC_DYNAMIC_CONTEXT_DATA* parent;
4201 T_TDC_only_one__BEGIN_CASE__allowed_per_function (T_TDC_DYNAMIC_CONTEXT_DATA& parent_);
4202 };
4203
4204 /// return of a step
4205 struct T_STEP
4206 {
4207 T_STEP ()
4208 {
4209 //nothing
4210 }
4211 };
4212
4213 struct T_TDC_STEP_CONTEXT:T_TDC_CONTEXT_BASE
4214 {
4215 T_TDC_DYNAMIC_CONTEXT_DATA tdc_not_alt_context;
4216 T_TDC_STEP_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA* parent_, char* file_, int line_, char* text_);
4217 void tdc_end_for ();
4218 bool tdc_do_return ();
4219 T_STEP tdc_return_value ();
4220 };
4221
4222 struct T_TDC_only_one__BEGIN_STEP__allowed_per_function:T_TDC_CONTEXT_BASE
4223 {
4224 /* TODO: wrong text type name should say it all
4225 Got this error?
4226 error C2039: 'tdc_alt_context' : is not a member of 'T_TDC_only_one__BEGIN_STEP__allowed_per_function'
4227
4228 you are violating one of the following rules:
4229 A)
4230 "ON(...)...;" cannot follow "OTHERWISE()...;"
4231
4232 B)
4233 "AWAIT(...)" is not allow in side "ALT{...}" enclose it with an "ON(...)"
4234 e.g. ALT{... ON(AWAIT(...))...; ...}
4235 C)
4236 "FAIL()", "PASS()", "SEND(...)" are not allowed inside "ALT{...}" they must be
4237 inside the body of an "ON(AWAIT(something))...;" or "OTHERWISE()...;"
4238
4239 remember to use curly parantheses "{...}" when the body contain more than one command
4240 */
4241 T_TDC_DYNAMIC_CONTEXT_DATA* parent;
4242 T_TDC_only_one__BEGIN_STEP__allowed_per_function (T_TDC_DYNAMIC_CONTEXT_DATA& parent_);
4243 };
4244
4245 struct T_TDC_ALT_CONTEXT:T_TDC_CONTEXT_BASE
4246 {
4247 /*
4248 Got this error?
4249 error C2039: 'tdc_not_alt_context' : is not a member of 'T_TDC_ALT_CONTEXT'
4250
4251 you are violating one of the following rules:
4252 A)
4253 "AWAIT(...)" is not allow in side "ALT{...}" enclose it with an "ON(...)"
4254 e.g. ALT{... ON(AWAIT(...))...; ...}
4255 B)
4256 "FAIL()", "PASS()", "SEND(...)", "ALT{...}" are not allowed inside "ALT{...}" they must be
4257 inside the body of an "ON(AWAIT(something))...;" or "OTHERWISE()...;"
4258
4259 remember to use curly parantheses "{...}" when the body contain more than one command
4260 */
4261 T_TDC_DYNAMIC_CONTEXT_DATA tdc_alt_context;
4262 T_TDC_ALT_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent_, char* file_, int line_);
4263 void tdc_end_for();
4264 bool tdc_enter_for();
4265 };
4266
4267 struct T_TDC_ON_CONTEXT:T_TDC_CONTEXT_BASE
4268 {
4269 T_TDC_DYNAMIC_CONTEXT_DATA tdc_not_alt_context;
4270 T_TDC_ON_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent_, char* file_, int line_, char* text_);
4271 void tdc_end_for ();
4272 bool tdc_enter_for();
4273 bool tdc_on_expects_await(T_TDC_AWAIT& await_);
4274 };
4275
4276 struct T_TDC__OTHERWISE__MUST_BE_LAST_IN_ALT:T_TDC_CONTEXT_BASE
4277 {
4278 /*
4279 Got this error?
4280 error C2039: 'tdc_alt_context' : is not a member of 'T_TDC__OTHERWISE__MUST_BE_LAST_IN_ALT'
4281
4282 you are violating one of the following rules:
4283 A)
4284 "ON(...)...;" cannot follow "OTHERWISE()...;"
4285
4286 B)
4287 "AWAIT(...)" is not allow in side "ALT{...}" enclose it with an "ON(...)"
4288 e.g. ALT{... ON(AWAIT(...))...; ...}
4289 C)
4290 "FAIL()", "PASS()", "SEND(...)" are not allowed inside "ALT{...}" they must be
4291 inside the body of an "ON(AWAIT(something))...;" or "OTHERWISE()...;"
4292
4293 remember to use curly parantheses "{...}" when the body contain more than one command
4294 */
4295 T_TDC_DYNAMIC_CONTEXT_DATA* parent;
4296 T_TDC__OTHERWISE__MUST_BE_LAST_IN_ALT (T_TDC_DYNAMIC_CONTEXT_DATA& parent_);
4297 };
4298
4299 struct T_TDC_OTHERWISE_CONTEXT:T_TDC_CONTEXT_BASE
4300 {
4301 T_TDC_DYNAMIC_CONTEXT_DATA tdc_not_alt_context;
4302 T_TDC_OTHERWISE_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA* parent_, char* file_, int line_);
4303 void tdc_end_for ();
4304 bool tdc_enter_for ();
4305 };
4306
4307 struct T_TDC_TRAP_CONTEXT:T_TDC_CONTEXT_BASE
4308 {
4309 T_TDC_DYNAMIC_CONTEXT_DATA tdc_not_alt_context;
4310 T_TDC_TRAP_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent_, char* file_, int line_);
4311 void tdc_end_for ();
4312 bool tdc_trap_testing ();
4313 bool tdc_initial ();
4314 bool tdc_enter_for ();
4315 };
4316
4317 struct T_TDC_EVENT_CONTEXT:T_TDC_CONTEXT_BASE
4318 {
4319 T_TDC_EVENT_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_, char* text_, char* primitive_);
4320 T_TDC_EVENT_CONTEXT ();
4321 };
4322
4323 //============================================================================
4324
4325 #ifdef TDC_PORT
4326 struct T_PORT
4327 {
4328 T_PORT operator +(T_PORT& port); // be aware: ("x->y","z") + ("a->b","c") != ("x;a->y;b","z;c")
4329 #if DOT_COMPLETE
4330 T_ON AWAIT (T_PRIMITIVE_UNION primitive){}
4331 void SEND (T_PRIMITIVE_UNION primitive){}
4332 #else//DOT_COMPLETE
4333 char* src_list;
4334 char* dst_list;
4335 char* sap_list;
4336 bool is_send_port; // -> or <-> was specified
4337 bool is_await_port;// <- or <-> was specified
4338 T_PORT* next; // used when 2 or more ports have been linked together with operator +
4339 void construct(char* src_and_dst_list, char* sap_list_);
4340 T_PORT (char* src_and_dst_list, char* sap_list_);
4341 T_PORT (char* src_and_dst_list);
4342 T_PORT (T_PORT& port,T_PORT* port2=0);
4343 ~T_PORT ();
4344 T_TDC_AWAIT_CONTEXT tdc_await_context(T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_, char* primitive_);
4345 T_TDC_SEND_CONTEXT tdc_send_context(T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_, char* primitive_);
4346 #endif//DOT_COMPLETE
4347 };
4348
4349 extern T_PORT DEFAULT_PORT;
4350 #endif
4351
4352 //============================================================================
4353 /// \defgroup AWAIT
4354 //\{
4355
4356 /// Special values that can be awaited for the sake of testing TDC
4357 enum T_TDC_AWAIT_TESTING {
4358 TDC_AWAIT_FAIL, /// Hardcode AWAIT to fail
4359 TDC_AWAIT_PASS, /// Hardcode AWAIT to pass
4360 TDC_AWAIT_FORCE_PASS,
4361 };
4362
4363 #if DOT_COMPLETE
4364 int TDC_AWAIT_FAIL;
4365 int TDC_AWAIT_PASS;
4366 int TDC_AWAIT_FORCE_PASS;
4367 #endif
4368
4369 ///What an AWAIT returns
4370 struct T_TDC_AWAIT
4371 {
4372 T_TDC_AWAIT();
4373 private:
4374 template<class T> T_TDC_AWAIT operator, (T)
4375 {
4376 tdc_user_error ("AWAIT can not be part of a comma expression"); // should be courth compiletime as this function is private
4377 return T_TDC_AWAIT ();
4378 }
4379 };
4380
4381 struct T_TDC_AWAIT_CONTEXT:T_TDC_EVENT_CONTEXT
4382 {
4383 friend T_TDC_AWAIT_CONTEXT tdc_await_context (T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_, char* primitive_);
4384 #ifdef TDC_PORT
4385 T_TDC_AWAIT_CONTEXT (T_PORT* port_, T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_, char* primitive_);
4386 #else
4387 T_TDC_AWAIT_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_, char* primitive_);
4388 #endif
4389 ~T_TDC_AWAIT_CONTEXT ();
4390 T_TDC_AWAIT tdc_implement_await (T_TDC_AWAIT_TESTING pass_or_fail);
4391 T_TDC_AWAIT tdc_implement_await (const T_TDC_INSTANCE_PRIMITIVE_BASE& primitive);
4392 template<class T> T_TDC_AWAIT tdc_implement_await (T (*f) ())
4393 {
4394 T primitive = f ();
4395 return tdc_implement_await (primitive);
4396 }
4397 template<class T> T_TDC_AWAIT tdc_implement_await (void (*f) (T))
4398 {
4399 T primitive;
4400 f (primitive);
4401 return tdc_implement_await (primitive);
4402 }
4403 };
4404
4405 //\}
4406
4407 //----------------------------------------------------------------------------
4408 /// \defgroup SEND
4409 //\{
4410
4411 struct T_TDC_SEND_CONTEXT
4412 :T_TDC_EVENT_CONTEXT
4413 {
4414 friend T_TDC_SEND_CONTEXT tdc_send_context (T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_, char* primitive_);
4415 #ifdef TDC_PORT
4416 T_TDC_SEND_CONTEXT (T_PORT* port_, T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_, char* primitive_);
4417 #else
4418 T_TDC_SEND_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_, char* primitive_);
4419 #endif
4420 ~T_TDC_SEND_CONTEXT ();
4421 void tdc_implement_send (T_TDC_AWAIT_TESTING pass_or_fail);
4422 void tdc_implement_send (const T_TDC_INSTANCE_PRIMITIVE_BASE& primitive);
4423 template<class T>void tdc_implement_send (T (*f) ())
4424 {
4425 T primitive = f ();
4426 return tdc_implement_send (primitive);
4427 }
4428 template<class T>void tdc_implement_send (void (*f) (T))
4429 {
4430 T primitive;
4431 f (primitive);
4432 return tdc_implement_send (primitive);
4433 }
4434 };
4435
4436 //\}
4437
4438 //----------------------------------------------------------------------------
4439 /// \defgroup COMMAND COMMAND
4440 //\{
4441
4442 ///What a COMMAND returns
4443 struct T_TDC_COMMAND
4444 {
4445 T_TDC_COMMAND ();
4446 private:
4447 ///Hides ',' operator for COMMANDS
4448 template<class T>
4449 T_TDC_COMMAND operator, (T)
4450 {
4451 tdc_user_error ("COMMAND can not be part of comma expression"); // should be courth compiletime as this function is private
4452 return T_TDC_COMMAND();
4453 }
4454 };
4455
4456 struct T_TDC_COMMAND_CONTEXT:T_TDC_EVENT_CONTEXT
4457 {
4458 T_TDC_COMMAND_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_,int line_, char* text_);
4459 T_TDC_COMMAND_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_,int line_, char* text_, char* command_);
4460 T_TDC_COMMAND_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_,int line_, char* text_, char* value_text_, long value_);
4461 T_TDC_COMMAND operator || (T_TDC_COMMAND& command_);
4462 };
4463
4464 //\}
4465
4466 /// \defgroup PARKING PARKING Command
4467 //\{
4468
4469 enum T_TDC_PARKING_ENUM /// Values should be indentical to those defined in tap_int.h
4470 {
4471 DISABLE = 0,
4472 SHORT_TERM = 1,
4473 LONG_TERM = 2,
4474 SHORT_TERM_FAIL = 3,
4475 LONG_TERM_FAIL = 4
4476 };
4477
4478 struct T_TDC_PARKING_CONTEXT:private T_TDC_COMMAND_CONTEXT
4479 {
4480 T_TDC_PARKING_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_,int line_, char* value_text_, T_TDC_PARKING_ENUM value_);
4481 T_TDC_PARKING_CONTEXT (T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_,int line_, char* value_text_, bool value_);
4482 T_TDC_PARKING_ENUM operator || (T_TDC_PARKING_ENUM value_);
4483 };
4484
4485 //\}
4486
4487 //============================================================================
4488
4489 extern T_TDC_FUNCTION_CONTEXT tdc_syntax_context;
4490
4491 extern T_TDC_DYNAMIC_CONTEXT_DATA* tdc_dynamic_context;
4492
4493 //----------------------------------------------------------------------------
4494
4495 extern void tdc_implement_fail(T_TDC_JMPRET jmpret);
4496
4497 extern void tdc_implement_user_fail(T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_);
4498
4499 extern void tdc_implement_pass();
4500
4501 extern void tdc_implement_user_pass(T_TDC_DYNAMIC_CONTEXT_DATA& parent, char* file_, int line_);
4502
4503 //----------------------------------------------------------------------------
4504
4505 extern T_TDC_COMMAND tdc_implement_command (const char* text);
4506
4507 extern T_TDC_COMMAND tdc_implement_timeout (int time);
4508
4509 extern T_TDC_COMMAND tdc_implement_mute (int time);
4510
4511 extern T_TDC_COMMAND tdc_implement_start_timeout (int time);
4512
4513 extern T_TDC_COMMAND tdc_implement_wait_timeout ();
4514
4515 extern T_TDC_PARKING_ENUM tdc_implement_parking (T_TDC_PARKING_ENUM enabled);
4516 extern T_TDC_PARKING_ENUM tdc_implement_parking (bool enabled);
4517
4518 //============================================================================
4519
4520 #endif //TDC_TESTING
4521
4522 //============================================================================
4523 /// \defgroup TryCatchProtection
4524 //\{
4525
4526 /**
4527 map try, catch and throw to our version that prevent the user from using them
4528 by having both a plain and a "tdc_implement_..." version it is faily simple
4529 temporary to disable the mapping through #undef when need be
4530 this is some thing that the user should never do, but tdc have to, so the debugger
4531 see our longjmps as exceptions
4532
4533 //TODO: do this stuff debugger see longjumps as exceptions
4534 */
4535
4536 /// try, catch and throw conflicts with longjmp in vc6, use TRAP
4537 #define try tdc_implement_try
4538 /// try, catch and throw conflicts with longjmp in vc6, use ELSE
4539 #define catch(exception) tdc_implement_catch(exception)
4540 /// try, catch and throw conflicts with longjmp in vc6, use FAIL or PASS
4541 #define throw tdc_implement_throw
4542
4543 /// try, catch and throw conflicts with longjmp in vc6, use TRAP
4544 #define tdc_implement_try while(tdc_try_disabled)
4545 /// try, catch and throw conflicts with longjmp in vc6, use ELSE
4546 #define tdc_implement_catch(exception) while(tdc_catch_disabled)
4547 /// try, catch and throw conflicts with longjmp in vc6, use FAIL or PASS
4548 #define tdc_implement_throw while(tdc_throw_disabled)throw
4549
4550 //\}
4551 //----------------------------------------------------------------------------
4552
4553 #if DOT_COMPLETE //DOT_COMPLETE_PROTOTYPES
4554 #ifndef M_TDC_DOC //we don't want theses to occour twice in the call graph
4555
4556 // dummy functions to generate hint in dot-complete (e.g. when pressing <ctrl-shift-space> )
4557 // remember that functions must have a body to be considered for dot-completion by Visual Studio
4558
4559 void FAIL (void){}
4560
4561 void PASS (void){}
4562
4563 void SEND (T_PRIMITIVE_UNION primitive){}
4564
4565 T_ON AWAIT (T_PRIMITIVE_UNION primitive){}
4566
4567 void COMMAND (char* command_string){}
4568
4569 void TIMEOUT (int timeout){}
4570
4571 void START_TIMEOUT (int timeout){}
4572
4573 void WAIT_TIMEOUT (){}
4574
4575 void MUTE (int timeout){}
4576
4577 T_TDC_PARKING_ENUM PARKING (T_TDC_PARKING_ENUM enable){}
4578
4579 T_similar_syntax_as_while_statement BEGIN_CASE (char* trace_comment){}
4580
4581 T_similar_syntax_as_while_statement BEGIN_STEP (char* trace_comment){}
4582
4583 T_similar_syntax_as_while_statement ON (T_AWAIT){}
4584
4585 T_similar_syntax_as_while_statement OTHERWISE (){}
4586
4587 #endif//M_TDC_DOC
4588 #else//DOT_COMPLETE_PROTOTYPES
4589
4590 // real implementation
4591
4592 /*
4593 special constructions used in these macros:
4594
4595 ensure that only a ; is allowed after this macro
4596 do {...} while(0)
4597
4598 make variable declared in for(...) private to the statements ({...} or ...;) after this macro
4599 if(0);else
4600
4601 make implicit return at exit of loop (x might be replace by more code in the actual macros)
4602 for (int x=0;;x=1) if (x) return ...; else
4603 */
4604
4605 #define FAIL() do {tdc_implement_user_fail (tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__); } while (0)
4606
4607 #define PASS() do {tdc_implement_user_pass (tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__); } while (0)
4608
4609 #define SEND(primitive) tdc_send_context(tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__, #primitive).tdc_implement_send(T_PRIMITIVE_UNION(primitive))
4610
4611 #define AWAIT(primitive) tdc_await_context(tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__, #primitive).tdc_implement_await(T_PRIMITIVE_UNION(primitive))
4612
4613 #define START_TIMEOUT(timeout) (T_TDC_COMMAND_CONTEXT (tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__, "START_TIMEOUT", #timeout, timeout) || tdc_implement_start_timeout(timeout))
4614
4615 #ifdef WAIT_TIMEOUT
4616 #undef WAIT_TIMEOUT /* To avoid class with defined macro in winbase.h */
4617 #endif
4618 #define WAIT_TIMEOUT() (T_TDC_COMMAND_CONTEXT (tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__, "WAIT_TIMEOUT") || tdc_implement_wait_timeout())
4619
4620 #define MUTE(timeout) (T_TDC_COMMAND_CONTEXT (tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__, "MUTE", #timeout, timeout) || tdc_implement_mute(timeout))
4621
4622 #define COMMAND(command) (T_TDC_COMMAND_CONTEXT (tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__, #command) || tdc_implement_command(command))
4623
4624 #define TIMEOUT(timeout) (T_TDC_COMMAND_CONTEXT (tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__, #timeout) || tdc_implement_timeout(timeout))
4625
4626 #define PARKING(enable) (T_TDC_PARKING_CONTEXT (tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__, #enable, enable) || tdc_implement_parking(enable))
4627
4628 // some short cuts where user forgot '()' after '_skip' etc.
4629
4630 #define _skip tdc_skip()
4631 #define _show tdc_show()
4632 #define _forbid tdc_forbid()
4633 #define _require tdc_require()
4634 #define _skip_to_end tdc_skip_to_end()
4635
4636 #define _SKIP tdc_skip()
4637 #define _SHOW tdc_show()
4638 #define _FORBID tdc_forbid()
4639 #define _REQUIRE tdc_require()
4640 #define _SKIP_TO_END tdc_skip_to_end()
4641
4642 #endif//DOT_COMPLETE_PROTOTYPES
4643
4644 #define M_TDC_COMMAND_MUST_BE_LAST_IN_SCOPE true
4645
4646 /** \defgroup BEGIN_CASE BEGIN_CASE(){}
4647 Usage:
4648 <pre>
4649 T_CASE casename ()
4650 {
4651 BEGIN_CASE ("trace_comment")
4652 {
4653 ...
4654 }
4655 }
4656 </pre>
4657 */
4658 //\{
4659
4660 /// return type for a test CASE
4661 #define T_CASE \
4662 extern "C" __declspec(dllexport) T_TDC_CASE
4663
4664 /** \def T_TDC_USER_ERROR_CASE
4665 Test cases defined with T_TDC_USER_ERROR_CASE
4666 are cases that passes when they fail and fails when they passes,
4667 this is only intended for testing TDC it self.
4668 T_TDC_USER_ERROR_CASE will not reverse the result of a syntax error.
4669
4670 <pre>
4671 Usage:
4672 T_TDC_USER_ERROR_CASE casename ()
4673 {
4674 TDC_BEGIN_USER_ERROR_CASE ("trace_comment")
4675 {
4676 ...
4677 }
4678 }
4679 </pre>
4680 */
4681
4682 /// return type for a test USER ERROR CASE
4683 #define T_TDC_USER_ERROR_CASE\
4684 extern "C" __declspec(dllexport) T_TDC_USER_ERROR_CASE_BASE
4685
4686 /// stuff common to BEGIN_CASE and TDC_BEGIN_USER_ERROR_CASE
4687 #define M_TDC_BEGIN_CASE_BASE(trace_comment,return_value)\
4688 T_TDC_only_one__BEGIN_CASE__allowed_per_function tdc_begin_case (tdc_syntax_context.tdc_function_context);\
4689 if(0);else/*hide tdc_syntax_context after for body*/\
4690 for (T_TDC_CASE_CONTEXT tdc_context (tdc_begin_case.parent,__FILE__,__LINE__,trace_comment),\
4691 &tdc_syntax_context = ((tdc_context.tdc_not_alt_context.jmpret = T_TDC_JMPRET (setjmp (tdc_context.tdc_not_alt_context.mark))),tdc_context);\
4692 M_TDC_COMMAND_MUST_BE_LAST_IN_SCOPE;\
4693 tdc_context.tdc_end_for ())\
4694 if (tdc_context.tdc_do_return ())\
4695 return tdc_context.return_value ();\
4696 else
4697
4698 /// BEGIN_CASE should be the outermost scope in a CASE
4699 #define BEGIN_CASE(trace_comment)\
4700 M_TDC_BEGIN_CASE_BASE(trace_comment,tdc_return_value)
4701
4702 /// TDC_BEGIN_USER_ERROR_CASE a BEGIN_CASE for T_TDC_USER_ERROR_CASE
4703 #define TDC_BEGIN_USER_ERROR_CASE(trace_comment)\
4704 M_TDC_BEGIN_CASE_BASE(trace_comment,tdc_user_error_return_value)
4705
4706 //\}
4707
4708 /** \defgroup BEGIN_STEP BEGIN_STEP(){}
4709 <pre>
4710 Usage:
4711 T_STEP stepname (...)
4712 {
4713 BEGIN_STEP ("trace_comment")
4714 {
4715 ...
4716 }
4717 }
4718 </pre>
4719 */
4720 //\{
4721
4722 //TODO: move functionality from tdc_context to tdc_begin_step and delete tdc_context
4723 #define BEGIN_STEP(trace_comment)\
4724 T_TDC_only_one__BEGIN_STEP__allowed_per_function tdc_begin_step (tdc_syntax_context.tdc_function_context), &tdc_syntax_context = tdc_begin_step;\
4725 if (0); else\
4726 for (T_TDC_STEP_CONTEXT tdc_context (tdc_begin_step.parent,__FILE__,__LINE__,trace_comment),\
4727 &tdc_syntax_context = ((tdc_context.tdc_not_alt_context.jmpret = T_TDC_JMPRET (setjmp (tdc_context.tdc_not_alt_context.mark))),tdc_context);\
4728 M_TDC_COMMAND_MUST_BE_LAST_IN_SCOPE;\
4729 tdc_context.tdc_end_for ())\
4730 if (tdc_context.tdc_do_return ())\
4731 return tdc_context.tdc_return_value ();\
4732 else
4733
4734 //\}
4735
4736 /** \defgroup TRAP_ONFAIL TRAP{} & ONFAIL{}
4737 <pre>
4738 Usage:
4739 TRAP
4740 {
4741 ...
4742 FAIL();
4743 }
4744 ONFAIL
4745 {
4746 ...
4747 }
4748 </pre>
4749 */
4750 //\{
4751
4752 #define TRAP\
4753 if (0); else\
4754 for (T_TDC_TRAP_CONTEXT tdc_context (tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__);\
4755 tdc_context.tdc_initial () && \
4756 (tdc_context.tdc_not_alt_context.jmpret = T_TDC_JMPRET (setjmp (tdc_context.tdc_not_alt_context.mark)),\
4757 tdc_context.tdc_enter_for ());\
4758 )\
4759 if (tdc_context.tdc_trap_testing ())\
4760 for (T_TDC_TRAP_CONTEXT &tdc_syntax_context = tdc_context; ; tdc_syntax_context.tdc_end_for())
4761
4762 #ifdef M_TDC_DOC
4763 #define ONFAIL() //Soure Insight will only draw call gaphs if "()" is present
4764 #else
4765 #define ONFAIL else // we don't want to do something special here, as we can't ensure warning on a plain else
4766 #endif
4767
4768 //\}
4769
4770 /** \defgroup ALT_ON_OTHERWISE ALT{}, ON() & OTHERWISE()
4771 <pre>
4772 Usage:
4773 ALT
4774 {
4775 ON (AWAIT (...)) ...;
4776 ON (AWAIT (...)) ...;
4777 ON (AWAIT (...)) ...;
4778 OTHERWISE () ...;
4779 }
4780 </pre>
4781 */
4782 //\{
4783
4784 #define ALT\
4785 if (0); else\
4786 for (T_TDC_ALT_CONTEXT tdc_context (tdc_syntax_context.tdc_not_alt_context, __FILE__, __LINE__), &tdc_syntax_context = tdc_context;\
4787 tdc_context.tdc_alt_context.jmpret = T_TDC_JMPRET (setjmp (tdc_context.tdc_alt_context.mark)),\
4788 tdc_context.tdc_enter_for ();\
4789 tdc_context.tdc_end_for ())
4790
4791 #define ON(await)\
4792 if (0); else\
4793 for (T_TDC_ON_CONTEXT tdc_context (tdc_syntax_context.tdc_alt_context,__FILE__,__LINE__,#await), &tdc_syntax_context = tdc_context;\
4794 tdc_context.tdc_not_alt_context.jmpret = T_TDC_JMPRET (setjmp (tdc_context.tdc_not_alt_context.mark)),\
4795 tdc_context.tdc_enter_for () && tdc_context.tdc_on_expects_await (await);\
4796 tdc_context.tdc_end_for ())
4797
4798 #define OTHERWISE()\
4799 T_TDC__OTHERWISE__MUST_BE_LAST_IN_ALT tdc_otherwise (tdc_syntax_context.tdc_alt_context), &tdc_syntax_context = tdc_otherwise;\
4800 if (0); else\
4801 for (T_TDC_OTHERWISE_CONTEXT tdc_syntax_context (tdc_otherwise.parent, __FILE__, __LINE__);\
4802 tdc_syntax_context.tdc_not_alt_context.jmpret = T_TDC_JMPRET (setjmp (tdc_syntax_context.tdc_not_alt_context.mark)),\
4803 tdc_syntax_context.tdc_enter_for (), M_TDC_COMMAND_MUST_BE_LAST_IN_SCOPE ;\
4804 tdc_syntax_context.tdc_end_for ())
4805
4806 //\}
4807
4808 //============================================================================
4809
4810 #if TDC_DEBUG_DOT_COMPLETE
4811 void F_TDC_DEBUG_DOT_COMPLETE__TDC_H_1Z()
4812 {
4813 T_TDC_DEBUG_DOT_COMPLETE__TDC_H_1 s;
4814 s.
4815 i;
4816 s->i0;
4817 T_TDC_INTERFACE_ARRAY<int> i;
4818 i.
4819 }
4820 #else
4821 #endif
4822
4823 //============================================================================
4824
4825 #endif //TDC_BASE_H
4826
4827