theKernel 10.0
Loading...
Searching...
No Matches
MkBufferStreamC_atl.c
Go to the documentation of this file.
1
9/* LABEL-START */
10
11#define META_FILE_NAME "MkBufferStreamC_atl.c"
12
14
15#define OT_CLASS amkrt->AtlMkBufferStreamC
16#define OT_NULL amkrt->AtlMkBufferStreamC_MK_NULL
17#define OT_CLASS_NAME "MkBufferStreamC"
18
19#define SELF2HDL(O) MkBus(VAL2MNG(O))
20
21// LNG: class
22// -> moved to LibMkKernel_atl.h → OT_MK_RT_S → AtlMkKernelCTT;
23
24// META: ObjNew feature: called to return a new or an already existing ATL-SELF-Object
25// -> moved to LibMkKernel_atl.h → MkKernelC_ObjNew
26
27// META: ObjNew feature: selfCreate will be called from "ObjNew->MkSelfNew" if MkObj need a SELF pointer
28static MK_PTR NS(MkBufferStreamC_selfCreate) (MK_RT_ARGS MK_OBJ const obj, MK_PTR const env) {
29 SETUP_amkrt(env);
30 return AtomMake(obj,OT_CLASS,NULL,NULL,env);
31}
32
33// META: called if MkObj must be destroyed and if the SELF is still alive → goal: destroy the SELF
34static void NS(MkBufferStreamC_selfDelete) (MK_RT_ARGS MK_PTR selfP, MK_PTR const env) {
35 OT_SELF_T selfO = selfP;
36 SETUP_amkrt(env);
37 MK(AtomDeleteHard) (OT_MK_CALL selfO);
38}
39
40// META: called to destroy link from SELF to META
41static void NS(MkBufferStreamC_selfUnlink) (MK_RT_ARGS MK_PTR selfP, MK_PTR const env) {
42 OT_SELF_T selfO = selfP;
43 SETUP_amkrt(env);
44 return MK(AtomUnlink) (OT_MK_CALL selfO);
45}
46
47#define OT_SETUP_hdl SetupHdlFromMetaData_2(MK_BUS)
48#define OT_SETUP_hdl__null_allow SetupHdlFromMetaData__null_allow_2(MK_BUS)
49#define OT_SETUP_hdl_destr SetupHdlFromMetaData__null_allow_2(MK_BUS)
50#define OT_SETUP_hdl_constr SetupHdlConstr(MkBufferStreamC)
51#define OT_SETUP_hdl_static_constr OT_SETUP_hdl_static
52#define OT_SETUP_hdl_static SetupHdlStatic(MkBufferStreamC)
53
54#define OT_retObj_CONSTR(x) OT_retObj_SET(AtomInit(OT_SELF,MkBufferStreamC_X2obj(x),amkrt))
55
56// initialize the ATL and META class specific object
57#define ClassInit \
58 /* if not already done, initialize NEW META type */ \
59 if (MkBufferStreamCTT == NULL) MkBufferStreamCTT = MkBufferStreamSTT; \
60 \
61 /* protect against double call */ \
62 if (MkBufferStreamCTT->selfCreate == NS(MkBufferStreamC_selfCreate)) return MK_OK; \
63 \
64 /* add "selfCreate" and "selfDelete" feature to the META-Class */ \
65 MkBufferStreamCTT->selfCreate = NS(MkBufferStreamC_selfCreate); \
66 MkBufferStreamCTT->selfDelete = NS(MkBufferStreamC_selfDelete); \
67 MkBufferStreamCTT->selfUnlink = NS(MkBufferStreamC_selfUnlink); \
68 \
69 /* create the ATL-class */ \
70 OT_CLASS = AltClassDef(MkBufferStreamCTT,&amkrt->AtlMkBufferStreamC_NS); \
71 if (OT_CLASS == NULL) goto error; \
72 OT_REF_INCR(OT_CLASS); \
73 \
74 /* create the ATL static Methods */ \
75 check_LNG(AtlUnknownSetup (NS(sOtClassDef),amkrt)) goto error; \
76 \
77 /* create the ATL instance Methods */ \
78 check_LNG(AtlUnknownSetup (NS(sInstanceDef),amkrt)) goto error; \
79 \
80 /* after class was modified, recompile the class */ \
81 RL_init(2, recompile, RL_T(0,RecompileN)); RL_O(1,OT_CLASS) ; \
82 int retI = RL_EvalEx(0); \
83 if (retI != TCL_OK) return retI; \
84 \
85 /* define the "NULL" object */ \
86 OT_NULL = AtomCreateNULL(OT_CLASS, "::MkBufferStreamC::MK_NULL", (MK_PTR)amkrt); \
87 if (OT_NULL == NULL) goto error; \
88 OT_REF_INCR(OT_NULL);
89/* LABEL-END */
90
91// BEGIN-DOC - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
92
93// doc-key: MkBufferStreamC,MkBufferStream,sCc,func
94#define CTOR_doc "MkBufferStreamC [MkBufferStreamC::CTOR ?size:int32=0?]"
95#define Create_doc "MkBufferStreamC [MkBufferStreamC::Create ?size:int32=0?]"
96#define Create1024_doc "MkBufferStreamC [MkBufferStreamC::Create1024 ?size:int32=0?]"
97#define Create16384_doc "MkBufferStreamC [MkBufferStreamC::Create16384 ?size:int32=0?]"
98#define Create256_doc "MkBufferStreamC [MkBufferStreamC::Create256 ?size:int32=0?]"
99#define Create64_doc "MkBufferStreamC [MkBufferStreamC::Create64 ?size:int32=0?]"
100
101// doc-key: MkBufferStreamC,MkBufferStream,sc_,func
102#define CreateTLS_doc "MkBufferStreamC [MkBufferStreamC::CreateTLS tlsName:string ?resetB:bool=true?]"
103#define GetNull_doc "MkBufferStreamC [MkBufferStreamC::GetNull]"
104#define HandleResolve_doc "MkBufferStreamC [MkBufferStreamC::HandleResolve netHdl:MK_HDL]"
105#define Instances_doc "MkBufferStreamC [MkBufferStreamC::Instances]"
106
107// doc-key: MkBufferStreamC,MkBufferStream,oC_,func
108#define Merge_doc "MkBufferStreamC [MkBufferStreamC::Merge $bus]"
109
110// doc-key: MkBufferStreamC,MkBufferStream,oCx,func
111#define Dup_doc "MkBufferStreamC [MkBufferStreamC::Dup $src] (const)"
112
113// doc-key: MkBufferStreamC,MkBufferStream,oc_,func
114#define Copy_doc "MkBufferStreamC [MkBufferStreamC::Copy $bus src:MkBufferStreamC] (const)"
115#define Next_doc "MkBufferStreamC [MkBufferStreamC::Next $bus]"
116#define Prev_doc "MkBufferStreamC [MkBufferStreamC::Prev $bus]"
117#define Reset_doc "MkBufferStreamC [MkBufferStreamC::Reset $bus]"
118#define ToBFL_doc "MkBufferListC [MkBufferStreamC::ToBFL $bus] (const)"
119
120// doc-key: MkBufferStreamC,MkBufferStream,oci,func
121#define ReadALL_doc "MkBufferListC [MkBufferStreamC::ReadALL $bus ?val_inout:MkBufferListC=NULL?]"
122
123// doc-key: MkBufferStreamC,MkBufferStream,oco,func
124#define ReadBFL_doc "MkBufferListC [MkBufferStreamC::ReadBFL $bus]"
125#define ReadBUF_doc "MkBufferC [MkBufferStreamC::ReadBUF $bus]"
126
127// doc-key: MkBufferStreamC,MkBufferStream,om_,func
128// skip class-overload: HandleGet → MkObjectHandleGet
129// skip class-overload: Log → MkObjectLog
130#define PosToStart_doc "MkBufferStreamC::PosToStart $bus"
131#define ReadGetNextType_doc "MkTypeE [MkBufferStreamC::ReadGetNextType $bus] (const)"
132#define ReadGetNumItems_doc "int32 [MkBufferStreamC::ReadGetNumItems $bus] (const)"
133#define ReadItemExists_doc "bool [MkBufferStreamC::ReadItemExists $bus] (const)"
134#define ReadL_END_doc "MkBufferStreamC::ReadL_END $bus"
135#define ReadL_START_doc "MkBufferStreamC::ReadL_START $bus ?buf:MkBufferC=NULL?"
136#define ReadUndo_doc "MkBufferStreamC::ReadUndo $bus"
137#define ResetFull_doc "MkBufferStreamC::ResetFull $bus"
138// skip class-overload: ToString → MkObjectToString
139#define WriteBFL_doc "MkBufferStreamC::WriteBFL $bus bfl:MkBufferListC"
140#define WriteBIN_doc "MkBufferStreamC::WriteBIN $bus val:binary"
141#define WriteBOL_doc "MkBufferStreamC::WriteBOL $bus val:bool"
142#define WriteBUF_doc "MkBufferStreamC::WriteBUF $bus val:MkBufferC"
143#define WriteBUS_FLAT_doc "MkBufferStreamC::WriteBUS_FLAT $bus add:MkBufferStreamC"
144#define WriteDBL_doc "MkBufferStreamC::WriteDBL $bus val:double"
145#define WriteFLT_doc "MkBufferStreamC::WriteFLT $bus val:float"
146#define WriteHDL_doc "MkBufferStreamC::WriteHDL $bus val:int32"
147#define WriteI32_doc "MkBufferStreamC::WriteI32 $bus val:int32"
148#define WriteI64_doc "MkBufferStreamC::WriteI64 $bus val:int64"
149#define WriteI8_doc "MkBufferStreamC::WriteI8 $bus val:int8"
150#define WriteLONG_doc "MkBufferStreamC::WriteLONG $bus val:long"
151#define WriteL_END_doc "MkBufferStreamC::WriteL_END $bus"
152#define WriteL_FLAT_doc "MkBufferStreamC::WriteL_FLAT $bus bfl:MkBufferListC"
153#define WriteL_START_doc "MkBufferStreamC::WriteL_START $bus"
154#define WriteSTR_doc "MkBufferStreamC::WriteSTR $bus val:string ?len:int32=-1?"
155
156// doc-key: MkBufferStreamC,MkBufferStream,omo,func
157#define ReadBIN_doc "binary [MkBufferStreamC::ReadBIN $bus]"
158#define ReadBOL_doc "bool [MkBufferStreamC::ReadBOL $bus]"
159#define ReadDBL_doc "double [MkBufferStreamC::ReadDBL $bus]"
160#define ReadFLT_doc "float [MkBufferStreamC::ReadFLT $bus]"
161#define ReadI32_doc "int32 [MkBufferStreamC::ReadI32 $bus]"
162#define ReadI64_doc "int64 [MkBufferStreamC::ReadI64 $bus]"
163#define ReadI8_doc "int8 [MkBufferStreamC::ReadI8 $bus]"
164#define ReadLONG_doc "long [MkBufferStreamC::ReadLONG $bus]"
165#define ReadSTR_doc "string [MkBufferStreamC::ReadSTR $bus]"
166
167// END-DOC - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
168
169/*****************************************************************************/
170/* */
171/* O B J E C T */
172/* */
173/*****************************************************************************/
174
175// BEGIN-MkBufferStreamC - created by 'atl_MqC.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
176
180
181// doc-key: MkBufferStreamC,MkBufferStreamC-Class-Export,sc_
182
184static OT_ProcRet NS(MkBufferStreamC_HandleResolve) (OtClass_ARGS) {
187 MK_HDL netHdl = 0;
190 MK_BUS retVal = MkBufferStreamHandleResolve (netHdl);
191 OT_retObj_SET_BUS(retVal);
192 goto end;
193 error:
195 end:
197}
198
199// doc-key: MkBufferStreamC,MkBufferStreamC-Class-Export,om_
200
201// skip on class-overload: MkBufferStreamHandleGet → MkObjectHandleGet
203static OT_ProcRet NS(MkBufferStreamC_HandleGet) (MkBufferStreamC_ARGS) {OT_ERROR_LNG_RETURN;}
204
206// MkBufferStreamC_Class_ATL_API
207
211
212// doc-key: MkBufferStreamC,MkBufferStreamC-Class-Introspection,oc_
213
215static OT_ProcRet NS(MkBufferStreamC_Next) (MkBufferStreamC_ARGS) {
219 MK_BUS retVal = MkBufferStreamNext (hdl);
220 OT_retObj_SET_BUS(retVal);
221 goto end;
222 error:
224 end:
226}
227
229static OT_ProcRet NS(MkBufferStreamC_Prev) (MkBufferStreamC_ARGS) {
233 MK_BUS retVal = MkBufferStreamPrev (hdl);
234 OT_retObj_SET_BUS(retVal);
235 goto end;
236 error:
238 end:
240}
241
242// doc-key: MkBufferStreamC,MkBufferStreamC-Class-Introspection,sc_
243
245static OT_ProcRet NS(MkBufferStreamC_Instances) (OtClass_ARGS) {
250 OT_retObj_SET_BUS(retVal);
251 goto end;
252 error:
254 end:
256}
257
259// MkBufferStreamC_Class_ATL_API
260
264
265// doc-key: MkBufferStreamC,MkBufferStreamC-Class-Misc,sc_
266
268static OT_ProcRet NS(MkBufferStreamC_GetNull) (OtClass_ARGS) {
272 MK_BUS retVal = MkBufferStreamGetNull ();
273 OT_retObj_SET_BUS(retVal);
274 goto end;
275 error:
277 end:
279}
280
282// MkBufferStreamC_Class_ATL_API
283
287
288// doc-key: MkBufferStreamC,MkBufferStreamC-Misc,oc_
289
291static OT_ProcRet NS(MkBufferStreamC_Copy) (MkBufferStreamC_ARGS) {
294 MK_BUSN src = 0;
297 MK_BUS retVal = MkBufferStreamCopy (hdl, src);
298 OT_retObj_SET_BUS(retVal);
299 goto end;
300 error:
302 end:
304}
305
307static OT_ProcRet NS(MkBufferStreamC_Reset) (MkBufferStreamC_ARGS) {
311 MK_BUS retVal = MkBufferStreamReset (hdl);
312 OT_retObj_SET_BUS(retVal);
313 goto end;
314 error:
316 end:
318}
319
321static OT_ProcRet NS(MkBufferStreamC_ToBFL) (MkBufferStreamC_ARGS) {
325 MK_BFL retVal = MkBufferStreamToBFL (hdl);
326 OT_retObj_SET_BFL(retVal);
327 goto end;
328 error:
330 end:
332}
333
334// doc-key: MkBufferStreamC,MkBufferStreamC-Misc,om_
335
336// skip on class-overload: MkBufferStreamLog → MkObjectLog
339
341static OT_ProcRet NS(MkBufferStreamC_PosToStart) (MkBufferStreamC_ARGS) {
347 goto end;
348 error:
350 end:
352}
353
355static OT_ProcRet NS(MkBufferStreamC_ResetFull) (MkBufferStreamC_ARGS) {
361 goto end;
362 error:
364 end:
366}
367
368// skip on class-overload: MkBufferStreamToString → MkObjectToString
370static OT_ProcRet NS(MkBufferStreamC_ToString) (MkBufferStreamC_ARGS) {OT_ERROR_LNG_RETURN;}
371
373// MkBufferStreamC_Misc_ATL_API
374
378
379// doc-key: MkBufferStreamC,MkBufferStreamC-Read,oci
380
382static OT_ProcRet NS(MkBufferStreamC_ReadALL) (MkBufferStreamC_ARGS) {
385 MkBufferListCreateTLS_T(val_inout,10);
388 MkErrorC_Check(hdl,MkBufferStreamReadALL (hdl, &val_inout));
389 OT_retObj_SET_BFL(val_inout);
390 goto end;
391 error:
393 end:
395}
396
397// doc-key: MkBufferStreamC,MkBufferStreamC-Read,oco
398
400static OT_ProcRet NS(MkBufferStreamC_ReadBFL) (MkBufferStreamC_ARGS) {
404 MK_BFL val_out;
405 MkErrorC_Check(hdl,MkBufferStreamReadBFL (hdl, &val_out));
406 OT_retObj_SET_BFL(val_out);
407 goto end;
408 error:
410 end:
412}
413
415static OT_ProcRet NS(MkBufferStreamC_ReadBUF) (MkBufferStreamC_ARGS) {
419 MK_BUF val_out;
420 MkErrorC_Check(hdl,MkBufferStreamReadBUF (hdl, &val_out));
421 OT_retObj_SET_BUF(val_out);
422 goto end;
423 error:
425 end:
427}
428
429// doc-key: MkBufferStreamC,MkBufferStreamC-Read,om_
430
432static OT_ProcRet NS(MkBufferStreamC_ReadGetNextType) (MkBufferStreamC_ARGS) {
437 goto end;
438 error:
440 end:
442}
443
445static OT_ProcRet NS(MkBufferStreamC_ReadGetNumItems) (MkBufferStreamC_ARGS) {
450 goto end;
451 error:
453 end:
455}
456
458static OT_ProcRet NS(MkBufferStreamC_ReadItemExists) (MkBufferStreamC_ARGS) {
463 goto end;
464 error:
466 end:
468}
469
471static OT_ProcRet NS(MkBufferStreamC_ReadL_END) (MkBufferStreamC_ARGS) {
477 goto end;
478 error:
480 end:
482}
483
485static OT_ProcRet NS(MkBufferStreamC_ReadL_START) (MkBufferStreamC_ARGS) {
488 MK_BUF buf = NULL;
493 goto end;
494 error:
496 end:
498}
499
501static OT_ProcRet NS(MkBufferStreamC_ReadUndo) (MkBufferStreamC_ARGS) {
507 goto end;
508 error:
510 end:
512}
513
514// doc-key: MkBufferStreamC,MkBufferStreamC-Read,omo
515
517static OT_ProcRet NS(MkBufferStreamC_ReadBIN) (MkBufferStreamC_ARGS) {
521 MkBinaryR val_out;
522 MkErrorC_Check(hdl,MkBufferStreamReadBIN (hdl, &val_out));
523 MkBinaryR retVal = val_out;
525 goto end;
526 error:
528 end:
530}
531
533static OT_ProcRet NS(MkBufferStreamC_ReadBOL) (MkBufferStreamC_ARGS) {
537 MK_BOL val_out;
538 MkErrorC_Check(hdl,MkBufferStreamReadBOL (hdl, &val_out));
539 OT_retObj_SET_BOL(val_out == 1);
540 goto end;
541 error:
543 end:
545}
546
548static OT_ProcRet NS(MkBufferStreamC_ReadDBL) (MkBufferStreamC_ARGS) {
552 MK_DBL val_out;
553 MkErrorC_Check(hdl,MkBufferStreamReadDBL (hdl, &val_out));
554 OT_retObj_SET_DBL(val_out);
555 goto end;
556 error:
558 end:
560}
561
563static OT_ProcRet NS(MkBufferStreamC_ReadFLT) (MkBufferStreamC_ARGS) {
567 MK_FLT val_out;
568 MkErrorC_Check(hdl,MkBufferStreamReadFLT (hdl, &val_out));
569 OT_retObj_SET_FLT(val_out);
570 goto end;
571 error:
573 end:
575}
576
578static OT_ProcRet NS(MkBufferStreamC_ReadI32) (MkBufferStreamC_ARGS) {
582 MK_I32 val_out;
583 MkErrorC_Check(hdl,MkBufferStreamReadI32 (hdl, &val_out));
584 OT_retObj_SET_I32(val_out);
585 goto end;
586 error:
588 end:
590}
591
593static OT_ProcRet NS(MkBufferStreamC_ReadI64) (MkBufferStreamC_ARGS) {
597 MK_I64 val_out;
598 MkErrorC_Check(hdl,MkBufferStreamReadI64 (hdl, &val_out));
599 OT_retObj_SET_I64(val_out);
600 goto end;
601 error:
603 end:
605}
606
608static OT_ProcRet NS(MkBufferStreamC_ReadI8) (MkBufferStreamC_ARGS) {
612 MK_I8 val_out;
613 MkErrorC_Check(hdl,MkBufferStreamReadI8 (hdl, &val_out));
614 OT_retObj_SET_I8(val_out);
615 goto end;
616 error:
618 end:
620}
621
623static OT_ProcRet NS(MkBufferStreamC_ReadLONG) (MkBufferStreamC_ARGS) {
627 MK_LONG val_out;
628 MkErrorC_Check(hdl,MkBufferStreamReadLONG (hdl, &val_out));
629 OT_retObj_SET_LONG(val_out);
630 goto end;
631 error:
633 end:
635}
636
638static OT_ProcRet NS(MkBufferStreamC_ReadSTR) (MkBufferStreamC_ARGS) {
642 MK_STRN val_out;
643 MkErrorC_Check(hdl,MkBufferStreamReadSTR (hdl, &val_out));
644 OT_retObj_SET_STR(val_out);
645 goto end;
646 error:
648 end:
650}
651
653// MkBufferStreamC_Read_ATL_API
654
658
659// doc-key: MkBufferStreamC,MkBufferStreamC-TOR,oC_
660
662static OT_ProcRet NS(MkBufferStreamC_Merge) (MkBufferStreamC_ARGS) {
666 MK_BUS retVal = MkBufferStreamMerge (hdl);
667 if (retVal == NULL) {
668 OT_ERROR_CONSTRUCTOR(MkBufferStreamC);
669 goto error;
670 }
671 OT_retObj_SET_BUS(retVal);
672 goto end;
673 error:
675 end:
677}
678
679// doc-key: MkBufferStreamC,MkBufferStreamC-TOR,oCx
680
682static OT_ProcRet NS(MkBufferStreamC_Dup) (MkBufferStreamC_ARGS) {
686 MK_BUS retVal = MkBufferStreamDup (hdl);
687 if (retVal == NULL) {
688 OT_ERROR_CONSTRUCTOR(MkBufferStreamC);
689 goto error;
690 }
691 OT_retObj_SET_BUS(retVal);
692 goto end;
693 error:
695 end:
697}
698
699// doc-key: MkBufferStreamC,MkBufferStreamC-TOR,sCc
700
702static OT_ProcRet NS(MkBufferStreamC_CTOR) (CONSTR_ARGS) {
705 MK_NUM size = 0;
707 MK_BUS retVal = MkBufferStreamCreate (NULL, size);
708 if (retVal == NULL) {
709 OT_ERROR_CONSTRUCTOR(MkBufferStreamC);
710 goto error;
711 }
712 OT_CONSTRUCTOR_POST(retVal)
713 OT_retObj_CONSTR(retVal);
714 goto end;
715 error:
717 end:
719}
720
722static OT_ProcRet NS(MkBufferStreamC_Create) (OtClass_ARGS) {
725 MK_NUM size = 0;
728 MK_BUS retVal = MkBufferStreamCreate (NULL, size);
729 if (retVal == NULL) {
730 OT_ERROR_CONSTRUCTOR(MkBufferStreamC);
731 goto error;
732 }
733 OT_CONSTRUCTOR_POST(retVal)
734 OT_retObj_SET_BUS(retVal);
735 goto end;
736 error:
738 end:
740}
741
743static OT_ProcRet NS(MkBufferStreamC_Create1024) (OtClass_ARGS) {
746 MK_NUM size = 0;
749 MK_BUS retVal = MkBufferStreamCreate1024 (size);
750 if (retVal == NULL) {
751 OT_ERROR_CONSTRUCTOR(MkBufferStreamC);
752 goto error;
753 }
754 OT_retObj_SET_BUS(retVal);
755 goto end;
756 error:
758 end:
760}
761
763static OT_ProcRet NS(MkBufferStreamC_Create16384) (OtClass_ARGS) {
766 MK_NUM size = 0;
769 MK_BUS retVal = MkBufferStreamCreate16384 (size);
770 if (retVal == NULL) {
771 OT_ERROR_CONSTRUCTOR(MkBufferStreamC);
772 goto error;
773 }
774 OT_retObj_SET_BUS(retVal);
775 goto end;
776 error:
778 end:
780}
781
783static OT_ProcRet NS(MkBufferStreamC_Create256) (OtClass_ARGS) {
786 MK_NUM size = 0;
789 MK_BUS retVal = MkBufferStreamCreate256 (size);
790 if (retVal == NULL) {
791 OT_ERROR_CONSTRUCTOR(MkBufferStreamC);
792 goto error;
793 }
794 OT_retObj_SET_BUS(retVal);
795 goto end;
796 error:
798 end:
800}
801
803static OT_ProcRet NS(MkBufferStreamC_Create64) (OtClass_ARGS) {
806 MK_NUM size = 0;
809 MK_BUS retVal = MkBufferStreamCreate64 (size);
810 if (retVal == NULL) {
811 OT_ERROR_CONSTRUCTOR(MkBufferStreamC);
812 goto error;
813 }
814 OT_retObj_SET_BUS(retVal);
815 goto end;
816 error:
818 end:
820}
821
822// doc-key: MkBufferStreamC,MkBufferStreamC-TOR,sc_
823
825static OT_ProcRet NS(MkBufferStreamC_CreateTLS) (OtClass_ARGS) {
828 MK_STRN tlsName = 0;
830 MK_BOOL resetB = true;
833 MK_BUS retVal = MkBufferStreamCreateTLS (tlsName, resetB);
834 OT_retObj_SET_BUS(retVal);
835 goto end;
836 error:
838 end:
840}
841
843// MkBufferStreamC_TOR_ATL_API
844
848
849// doc-key: MkBufferStreamC,MkBufferStreamC-Write,om_
850
852static OT_ProcRet NS(MkBufferStreamC_WriteBFL) (MkBufferStreamC_ARGS) {
860 goto end;
861 error:
863 end:
865}
866
868static OT_ProcRet NS(MkBufferStreamC_WriteBIN) (MkBufferStreamC_ARGS) {
871 MkBinaryR val = {0};
876 goto end;
877 error:
879 end:
881}
882
884static OT_ProcRet NS(MkBufferStreamC_WriteBOL) (MkBufferStreamC_ARGS) {
887 MK_BOL val = 0;
890 MkErrorC_Check(hdl,MkBufferStreamWriteBOL (hdl, (MK_BOL)(val?1:0)));
892 goto end;
893 error:
895 end:
897}
898
900static OT_ProcRet NS(MkBufferStreamC_WriteBUF) (MkBufferStreamC_ARGS) {
903 MK_BUFN val = 0;
908 goto end;
909 error:
911 end:
913}
914
916static OT_ProcRet NS(MkBufferStreamC_WriteBUS_FLAT) (MkBufferStreamC_ARGS) {
919 MK_BUSN add = 0;
924 goto end;
925 error:
927 end:
929}
930
932static OT_ProcRet NS(MkBufferStreamC_WriteDBL) (MkBufferStreamC_ARGS) {
935 MK_DBL val = 0;
940 goto end;
941 error:
943 end:
945}
946
948static OT_ProcRet NS(MkBufferStreamC_WriteFLT) (MkBufferStreamC_ARGS) {
951 MK_FLT val = 0;
956 goto end;
957 error:
959 end:
961}
962
964static OT_ProcRet NS(MkBufferStreamC_WriteHDL) (MkBufferStreamC_ARGS) {
967 MK_I32 val = 0;
972 goto end;
973 error:
975 end:
977}
978
980static OT_ProcRet NS(MkBufferStreamC_WriteI32) (MkBufferStreamC_ARGS) {
983 MK_I32 val = 0;
988 goto end;
989 error:
991 end:
993}
994
996static OT_ProcRet NS(MkBufferStreamC_WriteI64) (MkBufferStreamC_ARGS) {
999 MK_I64 val = 0;
1002 MkErrorC_Check(hdl,MkBufferStreamWriteI64 (hdl, val));
1004 goto end;
1005 error:
1007 end:
1009}
1010
1012static OT_ProcRet NS(MkBufferStreamC_WriteI8) (MkBufferStreamC_ARGS) {
1015 MK_I8 val = 0;
1018 MkErrorC_Check(hdl,MkBufferStreamWriteI8 (hdl, (MK_I8)(val)));
1020 goto end;
1021 error:
1023 end:
1025}
1026
1028static OT_ProcRet NS(MkBufferStreamC_WriteLONG) (MkBufferStreamC_ARGS) {
1031 MK_LONG val = 0;
1036 goto end;
1037 error:
1039 end:
1041}
1042
1044static OT_ProcRet NS(MkBufferStreamC_WriteL_END) (MkBufferStreamC_ARGS) {
1050 goto end;
1051 error:
1053 end:
1055}
1056
1058static OT_ProcRet NS(MkBufferStreamC_WriteL_FLAT) (MkBufferStreamC_ARGS) {
1066 goto end;
1067 error:
1069 end:
1071}
1072
1074static OT_ProcRet NS(MkBufferStreamC_WriteL_START) (MkBufferStreamC_ARGS) {
1080 goto end;
1081 error:
1083 end:
1085}
1086
1088static OT_ProcRet NS(MkBufferStreamC_WriteSTR) (MkBufferStreamC_ARGS) {
1091 MK_STRN val = 0;
1093 MK_NUM len = -1;
1096 MkErrorC_Check(hdl,MkBufferStreamWriteSTR (hdl, val, len));
1098 goto end;
1099 error:
1101 end:
1103}
1104
1106// MkBufferStreamC_Write_ATL_API
1107
1108// END-MkBufferStreamC - created by 'atl_MqC.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
1109
1115
1116static const OtObjProcDefS NS(sOtClassDef)[] = {
1117
1118 // BEGIN-CLASS - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
1119
1120 // doc-key: MkBufferStreamC,MkBufferStream,sCc
1121 { "::MkBufferStreamC::Create" , NS(MkBufferStreamC_Create) },
1122 { "::MkBufferStreamC::Create1024" , NS(MkBufferStreamC_Create1024) },
1123 { "::MkBufferStreamC::Create16384" , NS(MkBufferStreamC_Create16384) },
1124 { "::MkBufferStreamC::Create256" , NS(MkBufferStreamC_Create256) },
1125 { "::MkBufferStreamC::Create64" , NS(MkBufferStreamC_Create64) },
1126
1127 // doc-key: MkBufferStreamC,MkBufferStream,sc_
1128 { "::MkBufferStreamC::CreateTLS" , NS(MkBufferStreamC_CreateTLS) },
1129 { "::MkBufferStreamC::GetNull" , NS(MkBufferStreamC_GetNull) },
1130 { "::MkBufferStreamC::HandleResolve" , NS(MkBufferStreamC_HandleResolve) },
1131 { "::MkBufferStreamC::Instances" , NS(MkBufferStreamC_Instances) },
1132
1133 // END-CLASS - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
1134 { NULL }
1135};
1136
1137// ---------------------------------------------------------------------------------------
1138
1139static const OtObjProcDefS NS(sInstanceDef)[] = {
1140
1141 // BEGIN-OBJ - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
1142
1143 // doc-key: MkBufferStreamC,MkBufferStream,oC_
1144 { "::MkBufferStreamC::MkBufferStreamC" , NS(MkBufferStreamC_CTOR) },
1145 { "::MkBufferStreamC::Merge" , NS(MkBufferStreamC_Merge) },
1146
1147 // doc-key: MkBufferStreamC,MkBufferStream,oCx
1148 { "::MkBufferStreamC::Dup" , NS(MkBufferStreamC_Dup) },
1149
1150 // doc-key: MkBufferStreamC,MkBufferStream,oc_
1151 { "::MkBufferStreamC::Copy" , NS(MkBufferStreamC_Copy) },
1152 { "::MkBufferStreamC::Next" , NS(MkBufferStreamC_Next) },
1153 { "::MkBufferStreamC::Prev" , NS(MkBufferStreamC_Prev) },
1154 { "::MkBufferStreamC::Reset" , NS(MkBufferStreamC_Reset) },
1155 { "::MkBufferStreamC::ToBFL" , NS(MkBufferStreamC_ToBFL) },
1156
1157 // doc-key: MkBufferStreamC,MkBufferStream,oci
1158 { "::MkBufferStreamC::ReadALL" , NS(MkBufferStreamC_ReadALL) },
1159
1160 // doc-key: MkBufferStreamC,MkBufferStream,oco
1161 { "::MkBufferStreamC::ReadBFL" , NS(MkBufferStreamC_ReadBFL) },
1162 { "::MkBufferStreamC::ReadBUF" , NS(MkBufferStreamC_ReadBUF) },
1163
1164 // doc-key: MkBufferStreamC,MkBufferStream,om_
1165 // skip class-overload: HandleGet → MkObjectHandleGet
1166 // skip class-overload: Log → MkObjectLog
1167 { "::MkBufferStreamC::PosToStart" , NS(MkBufferStreamC_PosToStart) },
1168 { "::MkBufferStreamC::ReadGetNextType" , NS(MkBufferStreamC_ReadGetNextType) },
1169 { "::MkBufferStreamC::ReadGetNumItems" , NS(MkBufferStreamC_ReadGetNumItems) },
1170 { "::MkBufferStreamC::ReadItemExists" , NS(MkBufferStreamC_ReadItemExists) },
1171 { "::MkBufferStreamC::ReadL_END" , NS(MkBufferStreamC_ReadL_END) },
1172 { "::MkBufferStreamC::ReadL_START" , NS(MkBufferStreamC_ReadL_START) },
1173 { "::MkBufferStreamC::ReadUndo" , NS(MkBufferStreamC_ReadUndo) },
1174 { "::MkBufferStreamC::ResetFull" , NS(MkBufferStreamC_ResetFull) },
1175 // skip class-overload: ToString → MkObjectToString
1176 { "::MkBufferStreamC::WriteBFL" , NS(MkBufferStreamC_WriteBFL) },
1177 { "::MkBufferStreamC::WriteBIN" , NS(MkBufferStreamC_WriteBIN) },
1178 { "::MkBufferStreamC::WriteBOL" , NS(MkBufferStreamC_WriteBOL) },
1179 { "::MkBufferStreamC::WriteBUF" , NS(MkBufferStreamC_WriteBUF) },
1180 { "::MkBufferStreamC::WriteBUS_FLAT" , NS(MkBufferStreamC_WriteBUS_FLAT) },
1181 { "::MkBufferStreamC::WriteDBL" , NS(MkBufferStreamC_WriteDBL) },
1182 { "::MkBufferStreamC::WriteFLT" , NS(MkBufferStreamC_WriteFLT) },
1183 { "::MkBufferStreamC::WriteHDL" , NS(MkBufferStreamC_WriteHDL) },
1184 { "::MkBufferStreamC::WriteI32" , NS(MkBufferStreamC_WriteI32) },
1185 { "::MkBufferStreamC::WriteI64" , NS(MkBufferStreamC_WriteI64) },
1186 { "::MkBufferStreamC::WriteI8" , NS(MkBufferStreamC_WriteI8) },
1187 { "::MkBufferStreamC::WriteLONG" , NS(MkBufferStreamC_WriteLONG) },
1188 { "::MkBufferStreamC::WriteL_END" , NS(MkBufferStreamC_WriteL_END) },
1189 { "::MkBufferStreamC::WriteL_FLAT" , NS(MkBufferStreamC_WriteL_FLAT) },
1190 { "::MkBufferStreamC::WriteL_START" , NS(MkBufferStreamC_WriteL_START) },
1191 { "::MkBufferStreamC::WriteSTR" , NS(MkBufferStreamC_WriteSTR) },
1192
1193 // doc-key: MkBufferStreamC,MkBufferStream,omo
1194 { "::MkBufferStreamC::ReadBIN" , NS(MkBufferStreamC_ReadBIN) },
1195 { "::MkBufferStreamC::ReadBOL" , NS(MkBufferStreamC_ReadBOL) },
1196 { "::MkBufferStreamC::ReadDBL" , NS(MkBufferStreamC_ReadDBL) },
1197 { "::MkBufferStreamC::ReadFLT" , NS(MkBufferStreamC_ReadFLT) },
1198 { "::MkBufferStreamC::ReadI32" , NS(MkBufferStreamC_ReadI32) },
1199 { "::MkBufferStreamC::ReadI64" , NS(MkBufferStreamC_ReadI64) },
1200 { "::MkBufferStreamC::ReadI8" , NS(MkBufferStreamC_ReadI8) },
1201 { "::MkBufferStreamC::ReadLONG" , NS(MkBufferStreamC_ReadLONG) },
1202 { "::MkBufferStreamC::ReadSTR" , NS(MkBufferStreamC_ReadSTR) },
1203
1204 // END-OBJ - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
1205 { NULL }
1206};
1207
1213
1214int NS(pMkBufferStreamC_Init) ( OT_MK_ARGS OT_NS_T ns )
1215{
1216 ClassInit
1217
1218 MkBufferStream16384C_TT->selfCreate = NS(MkBufferStreamC_selfCreate) ;
1219 MkBufferStream16384C_TT->selfDelete = NS(MkBufferStreamC_selfDelete) ;
1220 MkBufferStream16384C_TT->selfUnlink = NS(MkBufferStreamC_selfUnlink) ;
1221 MkBufferStream256C_TT->selfCreate = NS(MkBufferStreamC_selfCreate) ;
1222 MkBufferStream256C_TT->selfDelete = NS(MkBufferStreamC_selfDelete) ;
1223 MkBufferStream256C_TT->selfUnlink = NS(MkBufferStreamC_selfUnlink) ;
1224 MkBufferStream64C_TT->selfCreate = NS(MkBufferStreamC_selfCreate) ;
1225 MkBufferStream64C_TT->selfDelete = NS(MkBufferStreamC_selfDelete) ;
1226 MkBufferStream64C_TT->selfUnlink = NS(MkBufferStreamC_selfUnlink) ;
1227 MkBufferStream1024C_TT->selfCreate = NS(MkBufferStreamC_selfCreate) ;
1228 MkBufferStream1024C_TT->selfDelete = NS(MkBufferStreamC_selfDelete) ;
1229 MkBufferStream1024C_TT->selfUnlink = NS(MkBufferStreamC_selfUnlink) ;
1230
1231 return TCL_OK;
1232error:
1233 return TCL_ERROR;
1234}
#define OtClass_ARGS
#define OT_CHECK_NI1(val)
#define OT_CHECK_bool(val)
#define OT_retObj_SET_I8(nat)
#define MK(n)
#define OT_retObj_SET_FLT(nat)
#define AtomMake(...)
#define OT_SETUP_VARARGS(min, max, d)
#define OT_CHECK_NIH(val)
#define OT_retObj_SET_BOL(nat)
#define OT_SETUP_NOARG(d)
#define OT_SETUP_ONEARG(d)
#define OT_ERROR_LNG_RETURN
#define OT_CHECK_NI4(val)
#define OT_CHECK_NI8(val)
MOX_NS_T OT_NS_T
#define OT_retObj_SET_Error
#define OT_CHECK_NF8(val)
#define OT_CONSTRUCTOR_POST(x)
#define OT_CHECK_NIL(val)
#define OT_retObj_SET_BUF(nat)
#define OT_ERROR_CONSTRUCTOR(class)
#define OT_retObj_SET_DBL(nat)
#define OT_retObj_SET_I64(nat)
#define OT_retObj_SET_LONG(nat)
#define OT_CHECK_REQUIRED(val)
#define OT_retObj_SET_None
#define OT_retObj_SET_I32(nat)
MOX_OBJ_T OT_SELF_T
#define OT_CHECK_NF4(val)
#define OT_retObj_SET_BFL(nat)
#define NS(n)
#define OT_GET__ME_REF_MkBinaryR(b)
#define OT_SETUP_CONSTRUCTOR_ARGS(...)
#define MkBufferStreamC_ARGS
#define OT_retObj_RETURN
#define OT_CHECK__ME_REF_MkBinaryR(val)
#define OT_MK_CALL
#define OT_MK_ARGS
#define OT_retObj_SET_STR(nat)
#define SETUP_amkrt(r)
#define OT_CHECK_NB1(val)
#define OT_NEW_Mk_enum_OBJ(typ, val)
#define OT_CHECK_OPTIONAL(val)
#define OT_retObj_SET_BUS(nat)
#define OT_retObj_SET(val)
#define OT_CHECK_NOARGS
#define MkErrorC_Check(mng, PROC)
#define OT_ProcRet
#define CONSTR_ARGS
#define OT_CHECK_STRN(val)
tag: nhi1-release-250425
#define Instances_doc
#define WriteBIN_doc
#define Create64_doc
#define ResetFull_doc
#define WriteHDL_doc
#define WriteL_START_doc
#define ReadBIN_doc
#define ReadBUF_doc
#define Create16384_doc
#define OT_SETUP_hdl_static_constr
#define WriteLONG_doc
#define ReadUndo_doc
#define Reset_doc
#define ReadBFL_doc
#define Create256_doc
#define OT_SETUP_hdl
#define ReadI64_doc
#define ReadI32_doc
#define ReadGetNextType_doc
#define Dup_doc
#define ToBFL_doc
#define CreateTLS_doc
#define WriteL_FLAT_doc
#define GetNull_doc
#define WriteBFL_doc
#define Next_doc
#define Merge_doc
#define Create_doc
#define ReadGetNumItems_doc
#define WriteBUF_doc
#define HandleResolve_doc
#define PosToStart_doc
#define ReadL_END_doc
#define Prev_doc
#define Create1024_doc
#define ReadFLT_doc
#define WriteI64_doc
#define OT_CLASS
#define OT_SETUP_hdl_static
#define OT_SETUP_hdl_constr
#define ReadALL_doc
#define ReadI8_doc
#define WriteI8_doc
#define ReadDBL_doc
#define WriteFLT_doc
#define WriteBOL_doc
#define WriteI32_doc
#define WriteL_END_doc
#define ReadL_START_doc
#define ReadItemExists_doc
#define OT_retObj_CONSTR(x)
#define ReadLONG_doc
#define WriteDBL_doc
#define WriteBUS_FLAT_doc
#define CTOR_doc
#define ReadSTR_doc
#define ClassInit
#define Copy_doc
#define WriteSTR_doc
#define ReadBOL_doc
#define MkBufferListCreateTLS_T(name, num)
create a MkBufferListC instance as thread-local-storage …
#define MkBufferStream1024C_TT
class as MkTypeS-class-type, useable in a class-macro as: class##_TT …
#define MkBufferStream16384C_TT
class as MkTypeS-class-type, useable in a class-macro as: class##_TT …
#define MkBufferStream256C_TT
class as MkTypeS-class-type, useable in a class-macro as: class##_TT …
#define MkBufferStream64C_TT
class as MkTypeS-class-type, useable in a class-macro as: class##_TT …
#define MkBufferStreamHandleResolve(...)
#define MkBufferStreamInstances()
static MK_BUS MkBufferStreamNext(MK_BUS const bus)
get next instance from linked-list of MkBufferStreamS type
static MK_BUS MkBufferStreamGetNull(void)
Null-Slot - return a MkBufferStreamC typed NULL instance …
static MK_BUS MkBufferStreamPrev(MK_BUS const bus)
get previous instance from linked-list of MkBufferStreamS type
#define MkBufferStreamPosToStart(...)
#define MkBufferStreamToBFL(...)
#define MkBufferStreamCopy(...)
#define MkBufferStreamReset(...)
#define MkBufferStreamResetFull(...)
#define MkBufferStreamReadALL(...)
#define MkBufferStreamReadBUF(...)
#define MkBufferStreamReadBFL(...)
#define MkBufferStreamReadFLT(...)
#define MkBufferStreamReadUndo(...)
#define MkBufferStreamReadGetNumItems(...)
#define MkBufferStreamReadI32(...)
#define MkBufferStreamReadBIN(...)
#define MkBufferStreamReadL_START(...)
#define MkBufferStreamReadDBL(...)
#define MkBufferStreamReadI8(...)
#define MkBufferStreamReadGetNextType(...)
#define MkBufferStreamReadI64(...)
#define MkBufferStreamReadBOL(...)
#define MkBufferStreamReadLONG(...)
#define MkBufferStreamReadL_END(...)
#define MkBufferStreamReadSTR(...)
#define MkBufferStreamReadItemExists(...)
#define MkBufferStreamCreate16384(...)
#define MkBufferStreamDup(...)
#define MkBufferStreamCreate(...)
#define MkBufferStreamCreate1024(...)
#define MkBufferStreamCreateTLS(...)
#define MkBufferStreamMerge(...)
#define MkBufferStreamCreate64(...)
#define MkBufferStreamCreate256(...)
#define MkBufferStreamWriteI8(...)
#define MkBufferStreamWriteBUF(...)
#define MkBufferStreamWriteL_END(...)
#define MkBufferStreamWriteDBL(...)
#define MkBufferStreamWriteBOL(...)
#define MkBufferStreamWriteL_FLAT(...)
#define MkBufferStreamWriteLONG(...)
#define MkBufferStreamWriteBIN(...)
#define MkBufferStreamWriteBUS_FLAT(...)
#define MkBufferStreamWriteSTR(...)
#define MkBufferStreamWriteI64(...)
#define MkBufferStreamWriteHDL(...)
#define MkBufferStreamWriteBFL(...)
#define MkBufferStreamWriteL_START(...)
#define MkBufferStreamWriteFLT(...)
#define MkBufferStreamWriteI32(...)
#define MK_NULL_NO
flag, not allow NULL
#define MK_NULL_YES
flag, allow NULL
#define MK_UNUSED
mark unnused variables and functions
#define MK_DEPRECATED
int32_t MK_NUM
array size data-type ('num' items in array …
float MK_FLT
4 byte float data-type
MK_PTRB * MK_PTR
generic pointer data-type
const MK_STRB * MK_STRN
constant string pointer data-type
signed char MK_I8
1 byte byte data-type
signed long long MK_I64
8 byte wide integer data-type
bool MK_BOOL
real bool data-type
unsigned char MK_BOL
1 byte boolean data-type
long MK_LONG
4/8 byte long data-type
double MK_DBL
8 byte double data-type
int32_t MK_HDL
4 byte int handle data-type
signed int MK_I32
4 byte integer data-type
#define MK_RT_ARGS
#define OT_CHECK_BUFN(val, nullB)
#define OT_CHECK_BUF(val, nullB)
#define OT_CHECK_BFLN(val, nullB)
#define OT_CHECK_BUSN(val, nullB)
#define OT_CHECK_BFL(val, nullB)
binary data default format …
The CLASS used to store a list of MkBufferS items into a flat array…
The ABSTRACT-CLASS used to store a native-type-data-item defined by PRIMITIVE TYPE …
The ABSTRACT-CLASS MkBufferStreamS is used for package-based serialized IO …
object header …