ua_basictypes.c 52 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503
  1. #include <stdio.h> // printf
  2. #include <stdlib.h> // alloc, free, vsnprintf
  3. #include <string.h>
  4. #include <stdarg.h> // va_start, va_end
  5. #include <time.h>
  6. #include "opcua.h"
  7. #include "ua_basictypes.h"
  8. UA_Int32 UA_encodeBinary(void const * data, UA_Int32 *pos, UA_Int32 type, UA_ByteString* dst) {
  9. return UA_[type].encodeBinary(data,pos,dst);
  10. }
  11. UA_Int32 UA_decodeBinary(UA_ByteString const * data, UA_Int32* pos, UA_Int32 type, void* dst){
  12. return UA_[type].decodeBinary(data,pos,dst);
  13. }
  14. UA_Int32 UA_calcSize(void const * data, UA_UInt32 type) {
  15. return (UA_[type].calcSize)(data);
  16. }
  17. UA_Int32 UA_Array_calcSize(UA_Int32 nElements, UA_Int32 type, void const * const * data) {
  18. int length = sizeof(UA_Int32);
  19. int i;
  20. if (nElements > 0) {
  21. for(i=0; i<nElements;i++) {
  22. length += UA_calcSize((void*)data[i],type);
  23. }
  24. }
  25. return length;
  26. }
  27. UA_Int32 UA_Array_encodeBinary(void const * const *src, UA_Int32 noElements, UA_Int32 type, UA_Int32* pos, UA_ByteString* dst) {
  28. UA_Int32 retval = UA_SUCCESS;
  29. UA_Int32 i = 0;
  30. retval = UA_Int32_encodeBinary(&noElements, pos, dst);
  31. for(i=0; i<noElements; i++) {
  32. retval |= UA_[type].encodeBinary((void*)src[i], pos, dst);
  33. }
  34. return retval;
  35. }
  36. UA_Int32 UA_Array_decodeBinary(UA_ByteString const * src, UA_Int32 noElements, UA_Int32 type, UA_Int32* pos, void ** dst) {
  37. UA_Int32 retval = UA_SUCCESS;
  38. UA_Int32 i = 0;
  39. for(i=0; i<noElements; i++) {
  40. retval |= UA_[type].decodeBinary(src, pos, (void*)dst[i]);
  41. }
  42. return retval;
  43. }
  44. UA_Int32 UA_Array_deleteMembers(void ** p,UA_Int32 noElements, UA_Int32 type) {
  45. UA_Int32 retval = UA_SUCCESS;
  46. UA_Int32 i = 0;
  47. for(i=0; i<noElements; i++) {
  48. retval |= UA_[type].delete((void*)p[i]);
  49. }
  50. return retval;
  51. }
  52. UA_Int32 UA_Array_delete(void **p,UA_Int32 noElements, UA_Int32 type) {
  53. UA_Int32 retval = UA_SUCCESS;
  54. retval |= UA_Array_deleteMembers(p,noElements,type);
  55. retval |= UA_free(p);
  56. return retval;
  57. }
  58. // TODO: Do we need to implement? We would need to add init to the VTable...
  59. // UA_Int32 UA_Array_init(void **p,UA_Int32 noElements, UA_Int32 type) {
  60. /** p is the address of a pointer to an array of pointers (type**).
  61. * [p] -> [p1, p2, p3, p4]
  62. * +-> struct 1, ...
  63. */
  64. UA_Int32 UA_Array_new(void **p,UA_Int32 noElements, UA_Int32 type) {
  65. UA_Int32 retval = UA_SUCCESS;
  66. UA_Int32 i;
  67. // Get memory for the pointers
  68. retval |= UA_alloc(p, sizeof(void*)*noElements);
  69. // Then allocate all the elements. We could allocate all the members in one chunk and
  70. // calculate the addresses to prevent memory segmentation. This would however not call
  71. // init for each member
  72. void *arr = *p;
  73. for(i=0; i<noElements; i++) {
  74. retval |= UA_[type].new((void**)arr+i);
  75. }
  76. return retval;
  77. }
  78. UA_Int32 UA_Array_copy(void const * const * src,UA_Int32 noElements, UA_Int32 type, void **dst) {
  79. UA_Int32 retval = UA_SUCCESS;
  80. UA_Int32 i;
  81. // Get memory for the pointers
  82. retval |= UA_Array_new(dst, noElements, type);
  83. void const * const a_src = *src;
  84. void * a_dst = *dst;
  85. for(i=0; i<noElements; i++) {
  86. // FIXME: we only have code to do this for strings yet
  87. if (type == UA_STRING || type == UA_BYTESTRING) {
  88. UA_String_copy(((UA_String **)a_src)[i],((UA_String **)a_dst)[i]);
  89. } else {
  90. retval = UA_ERR_INVALID_VALUE;
  91. break;
  92. }
  93. }
  94. return retval;
  95. }
  96. UA_Int32 _UA_free(void * ptr,char *pname,char* f,int l){
  97. DBG_VERBOSE(printf("UA_free;%p;;%s;;%s;%d\n",ptr,pname,f,l); fflush(stdout));
  98. if (UA_NULL != ptr) {
  99. free(ptr);
  100. }
  101. return UA_SUCCESS;
  102. }
  103. void const * UA_alloc_lastptr;
  104. UA_Int32 _UA_alloc(void ** ptr, int size,char*pname,char*sname,char* f,int l){
  105. if(ptr == UA_NULL) return UA_ERR_INVALID_VALUE;
  106. UA_alloc_lastptr = *ptr = malloc(size);
  107. DBG_VERBOSE(printf("UA_alloc - %p;%d;%s;%s;%s;%d\n",*ptr,size,pname,sname,f,l); fflush(stdout));
  108. if(*ptr == UA_NULL) return UA_ERR_NO_MEMORY;
  109. return UA_SUCCESS;
  110. }
  111. UA_Int32 UA_memcpy(void * dst, void const * src, int size){
  112. if(dst == UA_NULL) return UA_ERR_INVALID_VALUE;
  113. DBG_VERBOSE(printf("UA_memcpy - %p;%p;%d\n",dst,src,size));
  114. memcpy(dst, src, size);
  115. return UA_SUCCESS;
  116. }
  117. #define UA_TYPE_START_ENCODEBINARY(TYPE) \
  118. UA_Int32 TYPE##_encodeBinary(TYPE const * src, UA_Int32* pos, UA_ByteString * dst) { \
  119. UA_Int32 retval = UA_SUCCESS; \
  120. if ( *pos < 0 || *pos+TYPE##_calcSize(src) > dst->length ) { \
  121. return UA_ERR_INVALID_VALUE; \
  122. } else {
  123. // Attention! this macro works only for TYPEs with storageSize = encodingSize
  124. #define UA_TYPE_START_DECODEBINARY(TYPE) \
  125. UA_Int32 TYPE##_decodeBinary(UA_ByteString const * src, UA_Int32* pos, TYPE * dst) { \
  126. UA_Int32 retval = UA_SUCCESS; \
  127. if ( *pos < 0 || *pos+TYPE##_calcSize(UA_NULL) > src->length ) { \
  128. return UA_ERR_INVALID_VALUE; \
  129. } else {
  130. #define UA_TYPE_END_XXCODEBINARY \
  131. } \
  132. return retval; \
  133. }
  134. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_Boolean)
  135. UA_TYPE_START_ENCODEBINARY(UA_Boolean)
  136. UA_Boolean tmpBool = ((*src > 0) ? UA_TRUE : UA_FALSE);
  137. memcpy(&(dst->data[(*pos)++]), &tmpBool, sizeof(UA_Boolean));
  138. UA_TYPE_END_XXCODEBINARY
  139. UA_TYPE_START_DECODEBINARY(UA_Boolean)
  140. *dst = ((UA_Boolean) (src->data[(*pos)++]) > 0) ? UA_TRUE : UA_FALSE;
  141. UA_TYPE_END_XXCODEBINARY
  142. UA_Int32 UA_Boolean_init(UA_Boolean * p){
  143. if(p==UA_NULL)return UA_ERROR;
  144. *p = UA_FALSE;
  145. return UA_SUCCESS;
  146. }
  147. UA_TYPE_METHOD_DELETE_FREE(UA_Boolean)
  148. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_Boolean)
  149. UA_TYPE_METHOD_NEW_DEFAULT(UA_Boolean)
  150. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_Byte)
  151. UA_TYPE_START_ENCODEBINARY(UA_Byte)
  152. dst->data[(*pos)++] = *src;
  153. UA_TYPE_END_XXCODEBINARY
  154. UA_TYPE_START_DECODEBINARY(UA_Byte)
  155. *dst = src->data[(*pos)++];
  156. UA_TYPE_END_XXCODEBINARY
  157. UA_TYPE_METHOD_DELETE_FREE(UA_Byte)
  158. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_Byte)
  159. UA_TYPE_METHOD_INIT_DEFAULT(UA_Byte)
  160. UA_TYPE_METHOD_NEW_DEFAULT(UA_Byte)
  161. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_SByte)
  162. UA_TYPE_START_ENCODEBINARY(UA_SByte)
  163. dst->data[(*pos)++] = *src;
  164. UA_TYPE_END_XXCODEBINARY
  165. UA_TYPE_START_DECODEBINARY(UA_SByte)
  166. *dst = src->data[(*pos)++];
  167. UA_TYPE_END_XXCODEBINARY
  168. UA_TYPE_METHOD_DELETE_FREE(UA_SByte)
  169. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_SByte)
  170. UA_TYPE_METHOD_INIT_DEFAULT(UA_SByte)
  171. UA_TYPE_METHOD_NEW_DEFAULT(UA_SByte)
  172. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_UInt16)
  173. UA_TYPE_START_ENCODEBINARY(UA_UInt16)
  174. dst->data[(*pos)++] = (*src & 0x00FF) >> 0;
  175. dst->data[(*pos)++] = (*src & 0xFF00) >> 8;
  176. UA_TYPE_END_XXCODEBINARY
  177. UA_TYPE_START_DECODEBINARY(UA_UInt16)
  178. *dst = (UA_UInt16) src->data[(*pos)++] << 0;
  179. *dst |= (UA_UInt16) src->data[(*pos)++] << 8;
  180. UA_TYPE_END_XXCODEBINARY
  181. UA_TYPE_METHOD_DELETE_FREE(UA_UInt16)
  182. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_UInt16)
  183. UA_TYPE_METHOD_INIT_DEFAULT(UA_UInt16)
  184. UA_TYPE_METHOD_NEW_DEFAULT(UA_UInt16)
  185. /** UA_Int16 - signed integer, 2 bytes */
  186. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_Int16)
  187. UA_TYPE_START_ENCODEBINARY(UA_Int16)
  188. retval = UA_UInt16_encodeBinary((UA_UInt16 const *) src,pos,dst);
  189. UA_TYPE_END_XXCODEBINARY
  190. UA_TYPE_START_DECODEBINARY(UA_Int16)
  191. *dst = (UA_Int16) (((UA_SByte) (src->data[(*pos)++]) & 0xFF) << 0);
  192. *dst |= (UA_Int16) (((UA_SByte) (src->data[(*pos)++]) & 0xFF) << 8);
  193. UA_TYPE_END_XXCODEBINARY
  194. UA_TYPE_METHOD_DELETE_FREE(UA_Int16)
  195. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_Int16)
  196. UA_TYPE_METHOD_INIT_DEFAULT(UA_Int16)
  197. UA_TYPE_METHOD_NEW_DEFAULT(UA_Int16)
  198. /** UA_Int32 - signed integer, 4 bytes */
  199. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_Int32)
  200. UA_TYPE_START_ENCODEBINARY(UA_Int32)
  201. dst->data[(*pos)++] = (*src & 0x000000FF) >> 0;
  202. dst->data[(*pos)++] = (*src & 0x0000FF00) >> 8;
  203. dst->data[(*pos)++] = (*src & 0x00FF0000) >> 16;
  204. dst->data[(*pos)++] = (*src & 0xFF000000) >> 24;
  205. UA_TYPE_END_XXCODEBINARY
  206. UA_TYPE_START_DECODEBINARY(UA_Int32)
  207. *dst = (UA_Int32) (((UA_SByte) (src->data[(*pos)++]) & 0xFF) << 0);
  208. *dst |= (UA_Int32) (((UA_SByte) (src->data[(*pos)++]) & 0xFF) << 8);
  209. *dst |= (UA_Int32) (((UA_SByte) (src->data[(*pos)++]) & 0xFF) << 16);
  210. *dst |= (UA_Int32) (((UA_SByte) (src->data[(*pos)++]) & 0xFF) << 24);
  211. UA_TYPE_END_XXCODEBINARY
  212. UA_TYPE_METHOD_DELETE_FREE(UA_Int32)
  213. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_Int32)
  214. UA_TYPE_METHOD_INIT_DEFAULT(UA_Int32)
  215. UA_TYPE_METHOD_NEW_DEFAULT(UA_Int32)
  216. /** UA_UInt32 - unsigned integer, 4 bytes */
  217. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_UInt32)
  218. UA_TYPE_START_ENCODEBINARY(UA_UInt32)
  219. retval = UA_Int32_encodeBinary((UA_Int32 const *)src,pos,dst);
  220. UA_TYPE_END_XXCODEBINARY
  221. UA_TYPE_START_DECODEBINARY(UA_UInt32)
  222. UA_UInt32 t1 = (UA_UInt32)((UA_Byte)(src->data[(*pos)++] & 0xFF));
  223. UA_UInt32 t2 = (UA_UInt32)((UA_Byte)(src->data[(*pos)++]& 0xFF) << 8);
  224. UA_UInt32 t3 = (UA_UInt32)((UA_Byte)(src->data[(*pos)++]& 0xFF) << 16);
  225. UA_UInt32 t4 = (UA_UInt32)((UA_Byte)(src->data[(*pos)++]& 0xFF) << 24);
  226. *dst = t1 + t2 + t3 + t4;
  227. UA_TYPE_END_XXCODEBINARY
  228. UA_TYPE_METHOD_DELETE_FREE(UA_UInt32)
  229. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_UInt32)
  230. UA_TYPE_METHOD_INIT_DEFAULT(UA_UInt32)
  231. UA_TYPE_METHOD_NEW_DEFAULT(UA_UInt32)
  232. /** UA_Int64 - signed integer, 8 bytes */
  233. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_Int64)
  234. UA_TYPE_START_ENCODEBINARY(UA_Int64)
  235. dst->data[(*pos)++] = (*src & 0x00000000000000FF) >> 0;
  236. dst->data[(*pos)++] = (*src & 0x000000000000FF00) >> 8;
  237. dst->data[(*pos)++] = (*src & 0x0000000000FF0000) >> 16;
  238. dst->data[(*pos)++] = (*src & 0x00000000FF000000) >> 24;
  239. dst->data[(*pos)++] = (*src & 0x000000FF00000000) >> 32;
  240. dst->data[(*pos)++] = (*src & 0x0000FF0000000000) >> 40;
  241. dst->data[(*pos)++] = (*src & 0x00FF000000000000) >> 48;
  242. dst->data[(*pos)++] = (*src & 0xFF00000000000000) >> 56;
  243. UA_TYPE_END_XXCODEBINARY
  244. UA_TYPE_START_DECODEBINARY(UA_Int64)
  245. *dst = (UA_Int64) src->data[(*pos)++] << 0;
  246. *dst |= (UA_Int64) src->data[(*pos)++] << 8;
  247. *dst |= (UA_Int64) src->data[(*pos)++] << 16;
  248. *dst |= (UA_Int64) src->data[(*pos)++] << 24;
  249. *dst |= (UA_Int64) src->data[(*pos)++] << 32;
  250. *dst |= (UA_Int64) src->data[(*pos)++] << 40;
  251. *dst |= (UA_Int64) src->data[(*pos)++] << 48;
  252. *dst |= (UA_Int64) src->data[(*pos)++] << 56;
  253. UA_TYPE_END_XXCODEBINARY
  254. UA_TYPE_METHOD_DELETE_FREE(UA_Int64)
  255. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_Int64)
  256. UA_TYPE_METHOD_INIT_DEFAULT(UA_Int64)
  257. UA_TYPE_METHOD_NEW_DEFAULT(UA_Int64)
  258. /** UA_UInt64 - unsigned integer, 8 bytes */
  259. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_UInt64)
  260. UA_TYPE_START_ENCODEBINARY(UA_UInt64)
  261. return UA_Int64_encodeBinary((UA_Int64 const *)src,pos,dst);
  262. UA_TYPE_END_XXCODEBINARY
  263. UA_TYPE_START_DECODEBINARY(UA_UInt64)
  264. UA_UInt64 t1 = (UA_UInt64) src->data[(*pos)++];
  265. UA_UInt64 t2 = (UA_UInt64) src->data[(*pos)++] << 8;
  266. UA_UInt64 t3 = (UA_UInt64) src->data[(*pos)++] << 16;
  267. UA_UInt64 t4 = (UA_UInt64) src->data[(*pos)++] << 24;
  268. UA_UInt64 t5 = (UA_UInt64) src->data[(*pos)++] << 32;
  269. UA_UInt64 t6 = (UA_UInt64) src->data[(*pos)++] << 40;
  270. UA_UInt64 t7 = (UA_UInt64) src->data[(*pos)++] << 48;
  271. UA_UInt64 t8 = (UA_UInt64) src->data[(*pos)++] << 56;
  272. *dst = t1 + t2 + t3 + t4 + t5 + t6 + t7 + t8;
  273. UA_TYPE_END_XXCODEBINARY
  274. UA_TYPE_METHOD_DELETE_FREE(UA_UInt64)
  275. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_UInt64)
  276. UA_TYPE_METHOD_INIT_DEFAULT(UA_UInt64)
  277. UA_TYPE_METHOD_NEW_DEFAULT(UA_UInt64)
  278. /** UA_Float - IEE754 32bit float with biased exponent */
  279. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_Float)
  280. // FIXME: Implement NaN, Inf and Zero(s)
  281. UA_Byte UA_FLOAT_ZERO[] = {0x00,0x00,0x00,0x00};
  282. UA_TYPE_START_DECODEBINARY(UA_Float)
  283. if (memcmp(&(src->data[*pos]),UA_FLOAT_ZERO,4)==0) { return UA_Int32_decodeBinary(src,pos,(UA_Int32*)dst); }
  284. UA_Float mantissa;
  285. mantissa = (UA_Float) (src->data[*pos] & 0xFF); // bits 0-7
  286. mantissa = (mantissa / 256.0 ) + (UA_Float) (src->data[*pos+1] & 0xFF); // bits 8-15
  287. mantissa = (mantissa / 256.0 ) + (UA_Float) (src->data[*pos+2] & 0x7F); // bits 16-22
  288. UA_UInt32 biasedExponent ;
  289. biasedExponent = (src->data[*pos+2] & 0x80) >> 7; // bits 23
  290. biasedExponent |= (src->data[*pos+3] & 0x7F) << 1; // bits 24-30
  291. UA_Float sign = ( src->data[*pos + 3] & 0x80 ) ? -1.0 : 1.0; // bit 31
  292. if (biasedExponent >= 127) {
  293. *dst = (UA_Float) sign * (1 << (biasedExponent-127)) * (1.0 + mantissa / 128.0 );
  294. } else {
  295. *dst = (UA_Float) sign * 2.0 * (1.0 + mantissa / 128.0 ) / ((UA_Float) (biasedExponent-127));
  296. }
  297. *pos += 4;
  298. UA_TYPE_END_XXCODEBINARY
  299. #ifdef __pdp11
  300. #error FIXME UA_Float_encodeBinary is not yet completely byte order agnostic
  301. #endif
  302. UA_TYPE_START_ENCODEBINARY(UA_Float)
  303. return UA_UInt32_encodeBinary((UA_UInt32*)src,pos,dst);
  304. UA_TYPE_END_XXCODEBINARY
  305. UA_TYPE_METHOD_DELETE_FREE(UA_Float)
  306. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_Float)
  307. UA_Int32 UA_Float_init(UA_Float * p){
  308. if(p==UA_NULL)return UA_ERROR;
  309. *p = (UA_Float)0.0;
  310. return UA_SUCCESS;
  311. }
  312. UA_TYPE_METHOD_NEW_DEFAULT(UA_Float)
  313. /** UA_Float - IEEE754 64bit float with biased exponent*/
  314. UA_TYPE_METHOD_CALCSIZE_SIZEOF(UA_Double)
  315. // FIXME: Implement NaN, Inf and Zero(s)
  316. UA_Byte UA_DOUBLE_ZERO[] = {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00};
  317. UA_TYPE_START_DECODEBINARY(UA_Double)
  318. if (memcmp(&(src->data[*pos]),UA_DOUBLE_ZERO,8)==0) { return UA_Int64_decodeBinary(src,pos,(UA_Int64*)dst); }
  319. UA_Double mantissa;
  320. mantissa = (UA_Double) (src->data[*pos] & 0xFF); // bits 0-7
  321. mantissa = (mantissa / 256.0 ) + (UA_Double) (src->data[*pos+1] & 0xFF); // bits 8-15
  322. mantissa = (mantissa / 256.0 ) + (UA_Double) (src->data[*pos+2] & 0xFF); // bits 16-23
  323. mantissa = (mantissa / 256.0 ) + (UA_Double) (src->data[*pos+3] & 0xFF); // bits 24-31
  324. mantissa = (mantissa / 256.0 ) + (UA_Double) (src->data[*pos+4] & 0xFF); // bits 32-39
  325. mantissa = (mantissa / 256.0 ) + (UA_Double) (src->data[*pos+5] & 0xFF); // bits 40-47
  326. mantissa = (mantissa / 256.0 ) + (UA_Double) (src->data[*pos+6] & 0x0F); // bits 48-51
  327. DBG_VERBOSE(printf("UA_Double_decodeBinary - mantissa=%f\n", mantissa));
  328. UA_UInt32 biasedExponent ;
  329. biasedExponent = (src->data[*pos+6] & 0xF0) >> 4; // bits 52-55
  330. DBG_VERBOSE(printf("UA_Double_decodeBinary - biasedExponent52-55=%d, src=%d\n", biasedExponent,src->data[*pos+6]));
  331. biasedExponent |= ((UA_UInt32) (src->data[*pos+7] & 0x7F)) << 4; // bits 56-62
  332. DBG_VERBOSE(printf("UA_Double_decodeBinary - biasedExponent56-62=%d, src=%d\n", biasedExponent,src->data[*pos+7]));
  333. UA_Double sign = ( src->data[*pos+7] & 0x80 ) ? -1.0 : 1.0; // bit 63
  334. if (biasedExponent >= 1023) {
  335. *dst = (UA_Double) sign * (1 << (biasedExponent-1023)) * (1.0 + mantissa / 8.0 );
  336. } else {
  337. *dst = (UA_Double) sign * 2.0 * (1.0 + mantissa / 8.0 ) / ((UA_Double) (biasedExponent-1023));
  338. }
  339. *pos += 8;
  340. UA_TYPE_END_XXCODEBINARY
  341. #ifdef __pdp11
  342. #error FIXME UA_Float_decodeBinary is not yet completely byte order agnostic
  343. #endif
  344. UA_TYPE_START_ENCODEBINARY(UA_Double)
  345. return UA_UInt64_encodeBinary((UA_UInt64*)src,pos,dst);
  346. UA_TYPE_END_XXCODEBINARY
  347. UA_TYPE_METHOD_DELETE_FREE(UA_Double)
  348. UA_TYPE_METHOD_DELETEMEMBERS_NOACTION(UA_Double)
  349. UA_TYPE_METHOD_INIT_DEFAULT(UA_Double)
  350. UA_TYPE_METHOD_NEW_DEFAULT(UA_Double)
  351. /** UA_String */
  352. UA_Int32 UA_String_calcSize(UA_String const * string) {
  353. if (string == UA_NULL) { // internal size for UA_memalloc
  354. return sizeof(UA_String);
  355. } else { // binary encoding size
  356. if (string->length > 0) {
  357. return sizeof(UA_Int32) + string->length * sizeof(UA_Byte);
  358. } else {
  359. return sizeof(UA_Int32);
  360. }
  361. }
  362. }
  363. UA_Int32 UA_String_encodeBinary(UA_String const * src, UA_Int32* pos, UA_ByteString* dst) {
  364. UA_Int32 retval = UA_SUCCESS;
  365. if (src == UA_NULL) {
  366. return UA_ERR_INVALID_VALUE;
  367. } else if (*pos < 0 || *pos + UA_String_calcSize(src) > dst->length) {
  368. return UA_ERR_INVALID_VALUE;
  369. } else {
  370. retval = UA_Int32_encodeBinary(&(src->length),pos,dst);
  371. if (src->length > 0) {
  372. retval |= UA_memcpy(&(dst->data[*pos]), src->data, src->length);
  373. *pos += src->length;
  374. }
  375. }
  376. return retval;
  377. }
  378. UA_Int32 UA_String_decodeBinary(UA_ByteString const * src, UA_Int32* pos, UA_String * dst) {
  379. UA_Int32 retval = UA_SUCCESS;
  380. retval |= UA_Int32_decodeBinary(src,pos,&(dst->length));
  381. if (retval == UA_SUCCESS && dst->length > 0) {
  382. if (*pos >= 0 && (dst->length <= (src->length - *pos))) { // read beyond end of src is assumed to be an error
  383. retval |= UA_alloc((void**)&(dst->data),dst->length);
  384. retval |= UA_memcpy(dst->data,&(src->data[*pos]),dst->length);
  385. *pos += dst->length;
  386. } else {
  387. dst->data = UA_NULL;
  388. dst->length = -1;
  389. retval = UA_ERR_INVALID_VALUE;
  390. }
  391. } else {
  392. dst->length = -1;
  393. dst->data = UA_NULL;
  394. }
  395. return retval;
  396. }
  397. UA_TYPE_METHOD_NEW_DEFAULT(UA_String)
  398. UA_TYPE_METHOD_DELETE_STRUCT(UA_String)
  399. UA_Int32 UA_String_deleteMembers(UA_String* p) { return UA_free(p->data); }
  400. UA_Int32 UA_String_copy(UA_String const * src, UA_String* dst) {
  401. UA_Int32 retval = UA_SUCCESS;
  402. dst->data = UA_NULL;
  403. dst->length = -1;
  404. if (src->length > 0) {
  405. retval |= UA_alloc((void**)&(dst->data), src->length);
  406. if (retval == UA_SUCCESS) {
  407. retval |= UA_memcpy((void*)dst->data, src->data, src->length);
  408. dst->length = src->length;
  409. }
  410. }
  411. return retval;
  412. }
  413. UA_Int32 UA_String_copycstring(char const * src, UA_String* dst) {
  414. UA_Int32 retval = UA_SUCCESS;
  415. dst->length = strlen(src);
  416. dst->data = UA_NULL;
  417. if (dst->length > 0) {
  418. retval |= UA_alloc((void**)&(dst->data), dst->length);
  419. if (retval == UA_SUCCESS) {
  420. retval |= UA_memcpy((void*)dst->data, src, dst->length);
  421. }
  422. }
  423. return retval;
  424. }
  425. #define UA_STRING_COPYPRINTF_BUFSIZE 1024
  426. UA_Int32 UA_String_copyprintf(char const * fmt, UA_String* dst, ...) {
  427. UA_Int32 retval = UA_SUCCESS;
  428. char src[UA_STRING_COPYPRINTF_BUFSIZE];
  429. UA_Int32 len;
  430. va_list ap;
  431. va_start(ap, dst);
  432. len = vsnprintf(src,UA_STRING_COPYPRINTF_BUFSIZE,fmt,ap);
  433. va_end(ap);
  434. if (len < 0) { // FIXME: old glibc 2.0 would return -1 when truncated
  435. dst->length = 0;
  436. dst->data = UA_NULL;
  437. retval = UA_ERR_INVALID_VALUE;
  438. } else {
  439. // since glibc 2.1 vsnprintf returns len that would have resulted if buf were large enough
  440. dst->length = ( len > UA_STRING_COPYPRINTF_BUFSIZE ? UA_STRING_COPYPRINTF_BUFSIZE : len );
  441. retval |= UA_alloc((void**)&(dst->data), dst->length);
  442. if (retval == UA_SUCCESS) {
  443. retval |= UA_memcpy((void*)dst->data, src, dst->length);
  444. }
  445. }
  446. return retval;
  447. }
  448. UA_String UA_String_null = { -1, UA_NULL };
  449. UA_Int32 UA_String_init(UA_String* p){
  450. if(p==UA_NULL)return UA_ERROR;
  451. p->length = -1;
  452. p->data = UA_NULL;
  453. return UA_SUCCESS;
  454. }
  455. UA_Int32 UA_String_compare(const UA_String* string1, const UA_String* string2) {
  456. UA_Int32 retval;
  457. if (string1->length == 0 && string2->length == 0) {
  458. retval = UA_EQUAL;
  459. } else if (string1->length == -1 && string2->length == -1) {
  460. retval = UA_EQUAL;
  461. } else if (string1->length != string2->length) {
  462. retval = UA_NOT_EQUAL;
  463. } else {
  464. // casts are needed to overcome signed warnings
  465. UA_Int32 is = strncmp((char const*)string1->data,(char const*)string2->data,string1->length);
  466. retval = (is == 0) ? UA_EQUAL : UA_NOT_EQUAL;
  467. }
  468. return retval;
  469. }
  470. void UA_String_printf(char const * label, const UA_String* string) {
  471. printf("%s {Length=%d, Data=%.*s}\n", label, string->length,
  472. string->length, (char*)string->data);
  473. }
  474. void UA_String_printx(char const * label, const UA_String* string) {
  475. int i;
  476. if (string == UA_NULL) { printf("%s {NULL}\n", label); return; }
  477. printf("%s {Length=%d, Data=", label, string->length);
  478. if (string->length > 0) {
  479. for (i = 0; i < string->length; i++) {
  480. printf("%c%d", i == 0 ? '{' : ',', (string->data)[i]);
  481. // if (i > 0 && !(i%20)) { printf("\n\t"); }
  482. }
  483. } else {
  484. printf("{");
  485. }
  486. printf("}}\n");
  487. }
  488. void UA_String_printx_hex(char const * label, const UA_String* string) {
  489. int i;
  490. printf("%s {Length=%d, Data=", label, string->length);
  491. if (string->length > 0) {
  492. for (i = 0; i < string->length; i++) {
  493. printf("%c%x", i == 0 ? '{' : ',', (string->data)[i]);
  494. }
  495. } else {
  496. printf("{");
  497. }
  498. printf("}}\n");
  499. }
  500. // TODO: should we really want to handle UA_String and UA_ByteString the same way?
  501. UA_TYPE_METHOD_PROTOTYPES_AS(UA_ByteString, UA_String)
  502. UA_TYPE_METHOD_NEW_DEFAULT(UA_ByteString)
  503. UA_Int32 UA_ByteString_compare(const UA_ByteString *string1, const UA_ByteString *string2) {
  504. return UA_String_compare((const UA_String*) string1, (const UA_String*) string2);
  505. }
  506. void UA_ByteString_printf(char* label, const UA_ByteString* string) {
  507. UA_String_printf(label, (UA_String*) string);
  508. }
  509. void UA_ByteString_printx(char* label, const UA_ByteString* string) {
  510. UA_String_printx(label, (UA_String*) string);
  511. }
  512. void UA_ByteString_printx_hex(char* label, const UA_ByteString* string) {
  513. UA_String_printx_hex(label, (UA_String*) string);
  514. }
  515. UA_Byte UA_Byte_securityPoliceNoneData[] = "http://opcfoundation.org/UA/SecurityPolicy#None";
  516. // sizeof()-1 : discard the implicit null-terminator of the c-char-string
  517. UA_ByteString UA_ByteString_securityPoliceNone = { sizeof(UA_Byte_securityPoliceNoneData)-1, UA_Byte_securityPoliceNoneData };
  518. UA_Int32 UA_ByteString_copy(UA_ByteString const * src, UA_ByteString* dst) {
  519. return UA_String_copy((UA_String const*)src,(UA_String*)dst);
  520. }
  521. UA_Int32 UA_ByteString_newMembers(UA_ByteString* p, UA_Int32 length) {
  522. UA_Int32 retval = UA_SUCCESS;
  523. if ((retval |= UA_alloc((void**)&(p->data),length)) == UA_SUCCESS) {
  524. p->length = length;
  525. } else {
  526. p->length = length;
  527. p->data = UA_NULL;
  528. }
  529. return retval;
  530. }
  531. UA_Int32 UA_Guid_calcSize(UA_Guid const * p) {
  532. if (p == UA_NULL) {
  533. return sizeof(UA_Guid);
  534. } else {
  535. return 16;
  536. }
  537. }
  538. UA_TYPE_START_ENCODEBINARY(UA_Guid)
  539. int i=0;
  540. retval |= UA_UInt32_encodeBinary(&(src->data1), pos, dst);
  541. retval |= UA_UInt16_encodeBinary(&(src->data2), pos, dst);
  542. retval |= UA_UInt16_encodeBinary(&(src->data3), pos, dst);
  543. for (i=0;i<8;i++) {
  544. retval |= UA_Byte_encodeBinary(&(src->data4[i]), pos, dst);
  545. }
  546. UA_TYPE_END_XXCODEBINARY
  547. UA_Int32 UA_Guid_decodeBinary(UA_ByteString const * src, UA_Int32* pos, UA_Guid *dst) {
  548. UA_Int32 retval = UA_SUCCESS;
  549. int i=0;
  550. retval |= UA_UInt32_decodeBinary(src,pos,&(dst->data1));
  551. retval |= UA_UInt16_decodeBinary(src,pos,&(dst->data2));
  552. retval |= UA_UInt16_decodeBinary(src,pos,&(dst->data3));
  553. for (i=0;i<8;i++) {
  554. retval |= UA_Byte_decodeBinary(src,pos,&(dst->data4[i]));
  555. }
  556. return retval;
  557. }
  558. UA_TYPE_METHOD_DELETE_STRUCT(UA_Guid)
  559. UA_Int32 UA_Guid_deleteMembers(UA_Guid* p) { return UA_SUCCESS; }
  560. UA_Int32 UA_Guid_compare(const UA_Guid *g1, const UA_Guid *g2) {
  561. return memcmp(g1, g2, sizeof(UA_Guid));
  562. }
  563. UA_Int32 UA_Guid_init(UA_Guid* p){
  564. if(p==UA_NULL)return UA_ERROR;
  565. p->data1 = 0;
  566. p->data2 = 0;
  567. p->data3 = 0;
  568. memset(p->data4,8,sizeof(UA_Byte));
  569. return UA_SUCCESS;
  570. }
  571. UA_TYPE_METHOD_NEW_DEFAULT(UA_Guid)
  572. UA_Int32 UA_LocalizedText_calcSize(UA_LocalizedText const * p) {
  573. UA_Int32 length = 0;
  574. if (p==UA_NULL) {
  575. // size for UA_memalloc
  576. length = sizeof(UA_LocalizedText);
  577. } else {
  578. // size for binary encoding
  579. length += 1; // p->encodingMask;
  580. if (p->encodingMask & UA_LOCALIZEDTEXT_ENCODINGMASKTYPE_LOCALE) {
  581. length += UA_String_calcSize(&(p->locale));
  582. }
  583. if (p->encodingMask & UA_LOCALIZEDTEXT_ENCODINGMASKTYPE_TEXT) {
  584. length += UA_String_calcSize(&(p->text));
  585. }
  586. }
  587. return length;
  588. }
  589. UA_TYPE_START_ENCODEBINARY(UA_LocalizedText)
  590. retval |= UA_Byte_encodeBinary(&(src->encodingMask),pos,dst);
  591. if (src->encodingMask & UA_LOCALIZEDTEXT_ENCODINGMASKTYPE_LOCALE) {
  592. retval |= UA_String_encodeBinary(&(src->locale),pos,dst);
  593. }
  594. if (src->encodingMask & UA_LOCALIZEDTEXT_ENCODINGMASKTYPE_TEXT) {
  595. retval |= UA_String_encodeBinary(&(src->text),pos,dst);
  596. }
  597. UA_TYPE_END_XXCODEBINARY
  598. UA_Int32 UA_LocalizedText_decodeBinary(UA_ByteString const * src, UA_Int32 *pos,
  599. UA_LocalizedText *dst) {
  600. UA_Int32 retval = UA_SUCCESS;
  601. retval |= UA_String_init(&(dst->locale));
  602. retval |= UA_String_init(&(dst->text));
  603. retval |= UA_Byte_decodeBinary(src,pos,&(dst->encodingMask));
  604. if (dst->encodingMask & UA_LOCALIZEDTEXT_ENCODINGMASKTYPE_LOCALE) {
  605. retval |= UA_String_decodeBinary(src,pos,&(dst->locale));
  606. }
  607. if (dst->encodingMask & UA_LOCALIZEDTEXT_ENCODINGMASKTYPE_TEXT) {
  608. retval |= UA_String_decodeBinary(src,pos,&(dst->text));
  609. }
  610. return retval;
  611. }
  612. UA_TYPE_METHOD_DELETE_STRUCT(UA_LocalizedText)
  613. UA_Int32 UA_LocalizedText_deleteMembers(UA_LocalizedText* p) {
  614. return UA_SUCCESS
  615. || UA_String_deleteMembers(&(p->locale))
  616. || UA_String_deleteMembers(&(p->text))
  617. ;
  618. }
  619. UA_Int32 UA_LocalizedText_init(UA_LocalizedText* p){
  620. if(p==UA_NULL)return UA_ERROR;
  621. p->encodingMask = 0;
  622. UA_String_init(&(p->locale));
  623. UA_String_init(&(p->text));
  624. return UA_SUCCESS;
  625. }
  626. UA_TYPE_METHOD_NEW_DEFAULT(UA_LocalizedText)
  627. UA_Int32 UA_LocalizedText_copycstring(char const * src, UA_LocalizedText* dst) {
  628. UA_Int32 retval = UA_SUCCESS;
  629. if(dst==UA_NULL)return UA_ERROR;
  630. dst->encodingMask = UA_LOCALIZEDTEXT_ENCODINGMASKTYPE_LOCALE | UA_LOCALIZEDTEXT_ENCODINGMASKTYPE_TEXT;
  631. retval |= UA_String_copycstring("EN",&(dst->locale));
  632. retval |= UA_String_copycstring(src,&(dst->text));
  633. return retval;
  634. }
  635. /* Serialization of UA_NodeID is specified in 62541-6, §5.2.2.9 */
  636. UA_Int32 UA_NodeId_calcSize(UA_NodeId const *p) {
  637. UA_Int32 length = 0;
  638. if (p == UA_NULL) {
  639. length = sizeof(UA_NodeId);
  640. } else {
  641. switch (p->encodingByte & UA_NODEIDTYPE_MASK) {
  642. case UA_NODEIDTYPE_TWOBYTE:
  643. length = 2;
  644. break;
  645. case UA_NODEIDTYPE_FOURBYTE:
  646. length = 4;
  647. break;
  648. case UA_NODEIDTYPE_NUMERIC:
  649. length += sizeof(UA_Byte) + sizeof(UA_UInt16) + sizeof(UA_UInt32);
  650. break;
  651. case UA_NODEIDTYPE_STRING:
  652. length += sizeof(UA_Byte) + sizeof(UA_UInt16) + UA_String_calcSize(&(p->identifier.string));
  653. break;
  654. case UA_NODEIDTYPE_GUID:
  655. length += sizeof(UA_Byte) + sizeof(UA_UInt16) + UA_Guid_calcSize(&(p->identifier.guid));
  656. break;
  657. case UA_NODEIDTYPE_BYTESTRING:
  658. length += sizeof(UA_Byte) + sizeof(UA_UInt16) + UA_ByteString_calcSize(&(p->identifier.byteString));
  659. break;
  660. default:
  661. break;
  662. }
  663. }
  664. return length;
  665. }
  666. UA_TYPE_START_ENCODEBINARY(UA_NodeId)
  667. // temporary variables for endian-save code
  668. UA_Byte srcByte;
  669. UA_UInt16 srcUInt16;
  670. int retval = UA_SUCCESS;
  671. retval |= UA_Byte_encodeBinary(&(src->encodingByte),pos,dst);
  672. switch (src->encodingByte & UA_NODEIDTYPE_MASK) {
  673. case UA_NODEIDTYPE_TWOBYTE:
  674. srcByte = src->identifier.numeric;
  675. retval |= UA_Byte_encodeBinary(&srcByte,pos,dst);
  676. break;
  677. case UA_NODEIDTYPE_FOURBYTE:
  678. srcByte = src->namespace;
  679. srcUInt16 = src->identifier.numeric;
  680. retval |= UA_Byte_encodeBinary(&srcByte,pos,dst);
  681. retval |= UA_UInt16_encodeBinary(&srcUInt16,pos,dst);
  682. break;
  683. case UA_NODEIDTYPE_NUMERIC:
  684. retval |= UA_UInt16_encodeBinary(&(src->namespace), pos, dst);
  685. retval |= UA_UInt32_encodeBinary(&(src->identifier.numeric), pos, dst);
  686. break;
  687. case UA_NODEIDTYPE_STRING:
  688. retval |= UA_UInt16_encodeBinary(&(src->namespace), pos, dst);
  689. retval |= UA_String_encodeBinary(&(src->identifier.string), pos, dst);
  690. break;
  691. case UA_NODEIDTYPE_GUID:
  692. retval |= UA_UInt16_encodeBinary(&(src->namespace), pos, dst);
  693. retval |= UA_Guid_encodeBinary(&(src->identifier.guid), pos, dst);
  694. break;
  695. case UA_NODEIDTYPE_BYTESTRING:
  696. retval |= UA_UInt16_encodeBinary(&(src->namespace), pos, dst);
  697. retval |= UA_ByteString_encodeBinary(&(src->identifier.byteString), pos, dst);
  698. break;
  699. }
  700. UA_TYPE_END_XXCODEBINARY
  701. UA_Int32 UA_NodeId_decodeBinary(UA_ByteString const * src, UA_Int32* pos, UA_NodeId *dst) {
  702. int retval = UA_SUCCESS;
  703. // temporary variables to overcome decoder's non-endian-saveness for datatypes with different length
  704. UA_Byte dstByte = 0;
  705. UA_UInt16 dstUInt16 = 0;
  706. retval |= UA_Byte_decodeBinary(src,pos,&(dst->encodingByte));
  707. switch (dst->encodingByte & UA_NODEIDTYPE_MASK) {
  708. case UA_NODEIDTYPE_TWOBYTE: // Table 7
  709. retval |=UA_Byte_decodeBinary(src, pos, &dstByte);
  710. dst->identifier.numeric = dstByte;
  711. dst->namespace = 0; // default namespace
  712. break;
  713. case UA_NODEIDTYPE_FOURBYTE: // Table 8
  714. retval |=UA_Byte_decodeBinary(src, pos, &dstByte);
  715. dst->namespace= dstByte;
  716. retval |=UA_UInt16_decodeBinary(src, pos, &dstUInt16);
  717. dst->identifier.numeric = dstUInt16;
  718. break;
  719. case UA_NODEIDTYPE_NUMERIC: // Table 6, first entry
  720. retval |=UA_UInt16_decodeBinary(src,pos,&(dst->namespace));
  721. retval |=UA_UInt32_decodeBinary(src,pos,&(dst->identifier.numeric));
  722. break;
  723. case UA_NODEIDTYPE_STRING: // Table 6, second entry
  724. retval |=UA_UInt16_decodeBinary(src,pos,&(dst->namespace));
  725. retval |=UA_String_decodeBinary(src,pos,&(dst->identifier.string));
  726. break;
  727. case UA_NODEIDTYPE_GUID: // Table 6, third entry
  728. retval |=UA_UInt16_decodeBinary(src,pos,&(dst->namespace));
  729. retval |=UA_Guid_decodeBinary(src,pos,&(dst->identifier.guid));
  730. break;
  731. case UA_NODEIDTYPE_BYTESTRING: // Table 6, "OPAQUE"
  732. retval |=UA_UInt16_decodeBinary(src,pos,&(dst->namespace));
  733. retval |=UA_ByteString_decodeBinary(src,pos,&(dst->identifier.byteString));
  734. break;
  735. }
  736. return retval;
  737. }
  738. UA_TYPE_METHOD_DELETE_STRUCT(UA_NodeId)
  739. UA_Int32 UA_NodeId_deleteMembers(UA_NodeId* p) {
  740. int retval = UA_SUCCESS;
  741. switch (p->encodingByte & UA_NODEIDTYPE_MASK) {
  742. case UA_NODEIDTYPE_TWOBYTE:
  743. case UA_NODEIDTYPE_FOURBYTE:
  744. case UA_NODEIDTYPE_NUMERIC:
  745. // nothing to do
  746. break;
  747. case UA_NODEIDTYPE_STRING: // Table 6, second entry
  748. retval |= UA_String_deleteMembers(&(p->identifier.string));
  749. break;
  750. case UA_NODEIDTYPE_GUID: // Table 6, third entry
  751. retval |= UA_Guid_deleteMembers(&(p->identifier.guid));
  752. break;
  753. case UA_NODEIDTYPE_BYTESTRING: // Table 6, "OPAQUE"
  754. retval |= UA_ByteString_deleteMembers(&(p->identifier.byteString));
  755. break;
  756. }
  757. return retval;
  758. }
  759. void UA_NodeId_printf(char* label, const UA_NodeId* node) {
  760. int l;
  761. printf("%s {encodingByte=%d, namespace=%d,", label,
  762. (int)( node->encodingByte), (int) (node->namespace));
  763. switch (node->encodingByte & UA_NODEIDTYPE_MASK) {
  764. case UA_NODEIDTYPE_TWOBYTE:
  765. case UA_NODEIDTYPE_FOURBYTE:
  766. case UA_NODEIDTYPE_NUMERIC:
  767. printf("identifier=%d\n", node->identifier.numeric);
  768. break;
  769. case UA_NODEIDTYPE_STRING:
  770. l = ( node->identifier.string.length < 0 ) ? 0 : node->identifier.string.length;
  771. printf("identifier={length=%d, data=%.*s}",
  772. node->identifier.string.length, l,
  773. (char*) (node->identifier.string.data));
  774. break;
  775. case UA_NODEIDTYPE_BYTESTRING:
  776. l = ( node->identifier.byteString.length < 0 ) ? 0 : node->identifier.byteString.length;
  777. printf("identifier={Length=%d, data=%.*s}",
  778. node->identifier.byteString.length, l,
  779. (char*) (node->identifier.byteString.data));
  780. break;
  781. case UA_NODEIDTYPE_GUID:
  782. printf(
  783. "guid={data1=%d, data2=%d, data3=%d, data4={length=%d, data=%.*s}}",
  784. node->identifier.guid.data1, node->identifier.guid.data2,
  785. node->identifier.guid.data3, 8,
  786. 8,
  787. (char*) (node->identifier.guid.data4));
  788. break;
  789. default:
  790. printf("ups! shit happens");
  791. break;
  792. }
  793. printf("}\n");
  794. }
  795. UA_Int32 UA_NodeId_compare(const UA_NodeId *n1, const UA_NodeId *n2) {
  796. if (n1 == UA_NULL || n2 == UA_NULL || n1->encodingByte != n2->encodingByte || n1->namespace != n2->namespace)
  797. return FALSE;
  798. switch (n1->encodingByte & UA_NODEIDTYPE_MASK) {
  799. case UA_NODEIDTYPE_TWOBYTE:
  800. case UA_NODEIDTYPE_FOURBYTE:
  801. case UA_NODEIDTYPE_NUMERIC:
  802. if(n1->identifier.numeric == n2->identifier.numeric)
  803. return UA_EQUAL;
  804. else
  805. return UA_NOT_EQUAL;
  806. case UA_NODEIDTYPE_STRING:
  807. return UA_String_compare(&(n1->identifier.string), &(n2->identifier.string));
  808. case UA_NODEIDTYPE_GUID:
  809. return UA_Guid_compare(&(n1->identifier.guid), &(n2->identifier.guid));
  810. case UA_NODEIDTYPE_BYTESTRING:
  811. return UA_ByteString_compare(&(n1->identifier.byteString), &(n2->identifier.byteString));
  812. }
  813. return UA_NOT_EQUAL;
  814. }
  815. UA_Int32 UA_NodeId_init(UA_NodeId* p){
  816. if(p==UA_NULL)return UA_ERROR;
  817. p->encodingByte = UA_NODEIDTYPE_TWOBYTE;
  818. p->namespace = 0;
  819. memset(&(p->identifier),0,sizeof(p->identifier));
  820. return UA_SUCCESS;
  821. }
  822. UA_TYPE_METHOD_NEW_DEFAULT(UA_NodeId)
  823. UA_Int32 UA_ExpandedNodeId_calcSize(UA_ExpandedNodeId const * p) {
  824. UA_Int32 length = 0;
  825. if (p == UA_NULL) {
  826. length = sizeof(UA_ExpandedNodeId);
  827. } else {
  828. length = UA_NodeId_calcSize(&(p->nodeId));
  829. if (p->nodeId.encodingByte & UA_NODEIDTYPE_NAMESPACE_URI_FLAG) {
  830. length += UA_String_calcSize(&(p->namespaceUri)); //p->namespaceUri
  831. }
  832. if (p->nodeId.encodingByte & UA_NODEIDTYPE_SERVERINDEX_FLAG) {
  833. length += sizeof(UA_UInt32); //p->serverIndex
  834. }
  835. }
  836. return length;
  837. }
  838. UA_TYPE_START_ENCODEBINARY(UA_ExpandedNodeId)
  839. retval |= UA_NodeId_encodeBinary(&(src->nodeId),pos,dst);
  840. if (src->nodeId.encodingByte & UA_NODEIDTYPE_NAMESPACE_URI_FLAG) {
  841. retval |= UA_String_encodeBinary(&(src->namespaceUri),pos,dst);
  842. }
  843. if (src->nodeId.encodingByte & UA_NODEIDTYPE_SERVERINDEX_FLAG) {
  844. retval |= UA_UInt32_encodeBinary(&(src->serverIndex),pos,dst);
  845. }
  846. UA_TYPE_END_XXCODEBINARY
  847. UA_Int32 UA_ExpandedNodeId_decodeBinary(UA_ByteString const * src, UA_Int32* pos,
  848. UA_ExpandedNodeId *dst) {
  849. UA_UInt32 retval = UA_SUCCESS;
  850. retval |= UA_NodeId_decodeBinary(src,pos,&(dst->nodeId));
  851. if (dst->nodeId.encodingByte & UA_NODEIDTYPE_NAMESPACE_URI_FLAG) {
  852. dst->nodeId.namespace = 0;
  853. retval |= UA_String_decodeBinary(src,pos,&(dst->namespaceUri));
  854. } else {
  855. retval |= UA_String_copy(&UA_String_null, &(dst->namespaceUri));
  856. }
  857. if (dst->nodeId.encodingByte & UA_NODEIDTYPE_SERVERINDEX_FLAG) {
  858. retval |= UA_UInt32_decodeBinary(src,pos,&(dst->serverIndex));
  859. }
  860. return retval;
  861. }
  862. UA_TYPE_METHOD_DELETE_STRUCT(UA_ExpandedNodeId)
  863. UA_Int32 UA_ExpandedNodeId_deleteMembers(UA_ExpandedNodeId* p) {
  864. UA_Int32 retval = UA_SUCCESS;
  865. retval |= UA_NodeId_deleteMembers(&(p->nodeId));
  866. retval |= UA_String_deleteMembers(&(p->namespaceUri));
  867. return retval;
  868. }
  869. UA_Int32 UA_ExpandedNodeId_init(UA_ExpandedNodeId* p){
  870. if(p==UA_NULL)return UA_ERROR;
  871. UA_NodeId_init(&(p->nodeId));
  872. UA_String_init(&(p->namespaceUri));
  873. p->serverIndex = 0;
  874. return UA_SUCCESS;
  875. }
  876. UA_TYPE_METHOD_NEW_DEFAULT(UA_ExpandedNodeId)
  877. UA_Int32 UA_ExtensionObject_calcSize(UA_ExtensionObject const * p) {
  878. UA_Int32 length = 0;
  879. if (p == UA_NULL) {
  880. length = sizeof(UA_ExtensionObject);
  881. } else {
  882. length += UA_NodeId_calcSize(&(p->typeId));
  883. length += 1; //p->encoding
  884. switch (p->encoding) {
  885. case UA_EXTENSIONOBJECT_ENCODINGMASK_BODYISBYTESTRING:
  886. length += UA_ByteString_calcSize(&(p->body));
  887. break;
  888. case UA_EXTENSIONOBJECT_ENCODINGMASK_BODYISXML:
  889. length += UA_XmlElement_calcSize((UA_XmlElement*)&(p->body));
  890. break;
  891. }
  892. }
  893. return length;
  894. }
  895. UA_TYPE_START_ENCODEBINARY(UA_ExtensionObject)
  896. retval |= UA_NodeId_encodeBinary(&(src->typeId),pos,dst);
  897. retval |= UA_Byte_encodeBinary(&(src->encoding),pos,dst);
  898. switch (src->encoding) {
  899. case UA_EXTENSIONOBJECT_ENCODINGMASK_NOBODYISENCODED:
  900. break;
  901. case UA_EXTENSIONOBJECT_ENCODINGMASK_BODYISBYTESTRING:
  902. case UA_EXTENSIONOBJECT_ENCODINGMASK_BODYISXML:
  903. retval |= UA_ByteString_encodeBinary(&(src->body),pos,dst);
  904. break;
  905. }
  906. UA_TYPE_END_XXCODEBINARY
  907. UA_Int32 UA_ExtensionObject_decodeBinary(UA_ByteString const * src, UA_Int32 *pos,
  908. UA_ExtensionObject *dst) {
  909. UA_Int32 retval = UA_SUCCESS;
  910. retval |= UA_NodeId_decodeBinary(src,pos,&(dst->typeId));
  911. retval |= UA_Byte_decodeBinary(src,pos,&(dst->encoding));
  912. retval |= UA_String_copy(&UA_String_null, (UA_String*) &(dst->body));
  913. switch (dst->encoding) {
  914. case UA_EXTENSIONOBJECT_ENCODINGMASK_NOBODYISENCODED:
  915. break;
  916. case UA_EXTENSIONOBJECT_ENCODINGMASK_BODYISBYTESTRING:
  917. case UA_EXTENSIONOBJECT_ENCODINGMASK_BODYISXML:
  918. retval |= UA_ByteString_decodeBinary(src,pos,&(dst->body));
  919. break;
  920. }
  921. return retval;
  922. }
  923. UA_TYPE_METHOD_DELETE_STRUCT(UA_ExtensionObject)
  924. UA_Int32 UA_ExtensionObject_deleteMembers(UA_ExtensionObject *p) {
  925. UA_Int32 retval = UA_SUCCESS;
  926. retval |= UA_NodeId_deleteMembers(&(p->typeId));
  927. retval |= UA_ByteString_deleteMembers(&(p->body));
  928. return retval;
  929. }
  930. UA_Int32 UA_ExtensionObject_init(UA_ExtensionObject* p){
  931. if(p==UA_NULL)return UA_ERROR;
  932. UA_ByteString_init(&(p->body));
  933. p->encoding = 0;
  934. UA_NodeId_init(&(p->typeId));
  935. return UA_SUCCESS;
  936. }
  937. UA_TYPE_METHOD_NEW_DEFAULT(UA_ExtensionObject)
  938. /** DiagnosticInfo - Part: 4, Chapter: 7.9, Page: 116 */
  939. UA_Int32 UA_DiagnosticInfo_calcSize(UA_DiagnosticInfo const * ptr) {
  940. UA_Int32 length = 0;
  941. if (ptr == UA_NULL) {
  942. length = sizeof(UA_DiagnosticInfo);
  943. } else {
  944. UA_Byte mask;
  945. length += sizeof(UA_Byte); // EncodingMask
  946. for (mask = 0x01; mask <= 0x40; mask *= 2) {
  947. switch (mask & (ptr->encodingMask)) {
  948. case UA_DIAGNOSTICINFO_ENCODINGMASK_SYMBOLICID:
  949. // puts("diagnosticInfo symbolic id");
  950. length += sizeof(UA_Int32);
  951. break;
  952. case UA_DIAGNOSTICINFO_ENCODINGMASK_NAMESPACE:
  953. length += sizeof(UA_Int32);
  954. break;
  955. case UA_DIAGNOSTICINFO_ENCODINGMASK_LOCALIZEDTEXT:
  956. length += sizeof(UA_Int32);
  957. break;
  958. case UA_DIAGNOSTICINFO_ENCODINGMASK_LOCALE:
  959. length += sizeof(UA_Int32);
  960. break;
  961. case UA_DIAGNOSTICINFO_ENCODINGMASK_ADDITIONALINFO:
  962. length += UA_String_calcSize(&(ptr->additionalInfo));
  963. break;
  964. case UA_DIAGNOSTICINFO_ENCODINGMASK_INNERSTATUSCODE:
  965. length += sizeof(UA_StatusCode);
  966. break;
  967. case UA_DIAGNOSTICINFO_ENCODINGMASK_INNERDIAGNOSTICINFO:
  968. length += UA_DiagnosticInfo_calcSize(ptr->innerDiagnosticInfo);
  969. break;
  970. }
  971. }
  972. }
  973. return length;
  974. }
  975. UA_Int32 UA_DiagnosticInfo_decodeBinary(UA_ByteString const * src, UA_Int32 *pos, UA_DiagnosticInfo *dst) {
  976. UA_Int32 retval = UA_SUCCESS;
  977. int i;
  978. retval |= UA_Byte_decodeBinary(src, pos, &(dst->encodingMask));
  979. for (i = 0; i < 7; i++) {
  980. switch ( (0x01 << i) & dst->encodingMask) {
  981. case UA_DIAGNOSTICINFO_ENCODINGMASK_SYMBOLICID:
  982. retval |= UA_Int32_decodeBinary(src, pos, &(dst->symbolicId));
  983. break;
  984. case UA_DIAGNOSTICINFO_ENCODINGMASK_NAMESPACE:
  985. retval |= UA_Int32_decodeBinary(src, pos, &(dst->namespaceUri));
  986. break;
  987. case UA_DIAGNOSTICINFO_ENCODINGMASK_LOCALIZEDTEXT:
  988. retval |= UA_Int32_decodeBinary(src, pos, &(dst->localizedText));
  989. break;
  990. case UA_DIAGNOSTICINFO_ENCODINGMASK_LOCALE:
  991. retval |= UA_Int32_decodeBinary(src, pos, &(dst->locale));
  992. break;
  993. case UA_DIAGNOSTICINFO_ENCODINGMASK_ADDITIONALINFO:
  994. retval |= UA_String_decodeBinary(src, pos, &(dst->additionalInfo));
  995. break;
  996. case UA_DIAGNOSTICINFO_ENCODINGMASK_INNERSTATUSCODE:
  997. retval |= UA_StatusCode_decodeBinary(src, pos, &(dst->innerStatusCode));
  998. break;
  999. case UA_DIAGNOSTICINFO_ENCODINGMASK_INNERDIAGNOSTICINFO:
  1000. // innerDiagnosticInfo is a pointer to struct, therefore allocate
  1001. retval |= UA_alloc((void **) &(dst->innerDiagnosticInfo),UA_DiagnosticInfo_calcSize(UA_NULL));
  1002. retval |= UA_DiagnosticInfo_decodeBinary(src, pos, dst->innerDiagnosticInfo);
  1003. break;
  1004. }
  1005. }
  1006. return retval;
  1007. }
  1008. UA_TYPE_START_ENCODEBINARY(UA_DiagnosticInfo)
  1009. int i;
  1010. retval |= UA_Byte_encodeBinary(&(src->encodingMask), pos, dst);
  1011. for (i = 0; i < 7; i++) {
  1012. switch ( (0x01 << i) & src->encodingMask) {
  1013. case UA_DIAGNOSTICINFO_ENCODINGMASK_SYMBOLICID:
  1014. retval |= UA_Int32_encodeBinary(&(src->symbolicId), pos, dst);
  1015. break;
  1016. case UA_DIAGNOSTICINFO_ENCODINGMASK_NAMESPACE:
  1017. retval |= UA_Int32_encodeBinary( &(src->namespaceUri), pos, dst);
  1018. break;
  1019. case UA_DIAGNOSTICINFO_ENCODINGMASK_LOCALIZEDTEXT:
  1020. retval |= UA_Int32_encodeBinary(&(src->localizedText), pos, dst);
  1021. break;
  1022. case UA_DIAGNOSTICINFO_ENCODINGMASK_LOCALE:
  1023. retval |= UA_Int32_encodeBinary(&(src->locale), pos, dst);
  1024. break;
  1025. case UA_DIAGNOSTICINFO_ENCODINGMASK_ADDITIONALINFO:
  1026. retval |= UA_String_encodeBinary(&(src->additionalInfo), pos, dst);
  1027. break;
  1028. case UA_DIAGNOSTICINFO_ENCODINGMASK_INNERSTATUSCODE:
  1029. retval |= UA_StatusCode_encodeBinary(&(src->innerStatusCode), pos, dst);
  1030. break;
  1031. case UA_DIAGNOSTICINFO_ENCODINGMASK_INNERDIAGNOSTICINFO:
  1032. retval |= UA_DiagnosticInfo_encodeBinary(src->innerDiagnosticInfo, pos, dst);
  1033. break;
  1034. }
  1035. }
  1036. UA_TYPE_END_XXCODEBINARY
  1037. UA_TYPE_METHOD_DELETE_STRUCT(UA_DiagnosticInfo)
  1038. UA_Int32 UA_DiagnosticInfo_deleteMembers(UA_DiagnosticInfo *p) {
  1039. UA_Int32 retval = UA_SUCCESS;
  1040. if (p->encodingMask & UA_DIAGNOSTICINFO_ENCODINGMASK_INNERDIAGNOSTICINFO) {
  1041. retval |= UA_DiagnosticInfo_deleteMembers(p->innerDiagnosticInfo);
  1042. retval |= UA_free(p->innerDiagnosticInfo);
  1043. }
  1044. return retval;
  1045. }
  1046. UA_Int32 UA_DiagnosticInfo_init(UA_DiagnosticInfo* p){
  1047. if(p==UA_NULL)return UA_ERROR;
  1048. UA_String_init(&(p->additionalInfo));
  1049. p->encodingMask = 0;
  1050. p->innerDiagnosticInfo = UA_NULL;
  1051. UA_StatusCode_init(&(p->innerStatusCode));
  1052. p->locale = 0;
  1053. p->localizedText = 0;
  1054. p->namespaceUri = 0;
  1055. p->symbolicId = 0;
  1056. return UA_SUCCESS;
  1057. }
  1058. UA_TYPE_METHOD_NEW_DEFAULT(UA_DiagnosticInfo)
  1059. UA_TYPE_METHOD_PROTOTYPES_AS(UA_DateTime,UA_Int64)
  1060. UA_TYPE_METHOD_NEW_DEFAULT(UA_DateTime)
  1061. #include <sys/time.h>
  1062. // Number of seconds from 1 Jan. 1601 00:00 to 1 Jan 1970 00:00 UTC
  1063. #define FILETIME_UNIXTIME_BIAS_SEC 11644473600LL
  1064. // Factors
  1065. #define HUNDRED_NANOSEC_PER_USEC 10LL
  1066. #define HUNDRED_NANOSEC_PER_SEC (HUNDRED_NANOSEC_PER_USEC * 1000000LL)
  1067. // IEC 62541-6 §5.2.2.5 A DateTime value shall be encoded as a 64-bit signed integer
  1068. // which represents the number of 100 nanosecond intervals since January 1, 1601 (UTC).
  1069. UA_DateTime UA_DateTime_now() {
  1070. UA_DateTime dateTime;
  1071. struct timeval tv;
  1072. gettimeofday(&tv, UA_NULL);
  1073. dateTime = (tv.tv_sec + FILETIME_UNIXTIME_BIAS_SEC)
  1074. * HUNDRED_NANOSEC_PER_SEC + tv.tv_usec * HUNDRED_NANOSEC_PER_USEC;
  1075. return dateTime;
  1076. }
  1077. //toDo
  1078. UA_DateTimeStruct UA_DateTime_toStruct(UA_DateTime time){
  1079. UA_DateTimeStruct dateTimeStruct;
  1080. //calcualting the the milli-, micro- and nanoseconds
  1081. UA_DateTime timeTemp;
  1082. timeTemp = (time-((time/10)*10))*100; //getting the last digit -> *100 for the 100 nanaseconds resolution
  1083. dateTimeStruct.nanoSec = timeTemp; //123 456 7 -> 700 nanosec;
  1084. timeTemp = (time-((time/10000)*10000))/10;
  1085. dateTimeStruct.microSec = timeTemp; //123 456 7 -> 456 microsec
  1086. timeTemp = (time-((time/10000000)*10000000))/10000;
  1087. dateTimeStruct.milliSec = timeTemp; //123 456 7 -> 123 millisec
  1088. //calculating the unix time with #include <time.h>
  1089. time_t timeInSec = time/10000000; //converting the nanoseconds time in unixtime
  1090. struct tm ts;
  1091. ts = *gmtime(&timeInSec);
  1092. //strftime(buf, sizeof(buf), "%a %Y-%m-%d %H:%M:%S %Z", &ts);
  1093. //printf("%s\n", buf);
  1094. dateTimeStruct.sec = ts.tm_sec;
  1095. dateTimeStruct.min = ts.tm_min;
  1096. dateTimeStruct.hour = ts.tm_hour;
  1097. dateTimeStruct.day = ts.tm_mday;
  1098. dateTimeStruct.mounth = ts.tm_mon+1;
  1099. dateTimeStruct.year = ts.tm_year + 1900;
  1100. return dateTimeStruct;
  1101. }
  1102. UA_Int32 UA_DateTime_toString(UA_DateTime time, UA_String* timeString){
  1103. char *charBuf = (char*)(*timeString).data;
  1104. UA_DateTimeStruct tSt = UA_DateTime_toStruct(time);
  1105. sprintf(charBuf, "%2d/%2d/%4d %2d:%2d:%2d.%3d.%3d.%3d", tSt.mounth, tSt.day, tSt.year, tSt.hour, tSt.min, tSt.sec, tSt.milliSec, tSt.microSec, tSt.nanoSec);
  1106. return UA_SUCCESS;
  1107. }
  1108. UA_TYPE_METHOD_PROTOTYPES_AS(UA_XmlElement, UA_ByteString)
  1109. UA_TYPE_METHOD_NEW_DEFAULT(UA_XmlElement)
  1110. /** IntegerId - Part: 4, Chapter: 7.13, Page: 118 */
  1111. UA_TYPE_METHOD_PROTOTYPES_AS(UA_IntegerId, UA_Int32)
  1112. UA_TYPE_METHOD_NEW_DEFAULT(UA_IntegerId)
  1113. UA_TYPE_METHOD_PROTOTYPES_AS(UA_StatusCode, UA_UInt32)
  1114. UA_TYPE_METHOD_NEW_DEFAULT(UA_StatusCode)
  1115. /** QualifiedName - Part 4, Chapter
  1116. * but see Part 6, Chapter 5.2.2.13 for Binary Encoding
  1117. */
  1118. UA_Int32 UA_QualifiedName_calcSize(UA_QualifiedName const * p) {
  1119. UA_Int32 length = 0;
  1120. if (p == NULL) return sizeof(UA_QualifiedName);
  1121. length += sizeof(UA_UInt16); //qualifiedName->namespaceIndex
  1122. // length += sizeof(UA_UInt16); //qualifiedName->reserved
  1123. length += UA_String_calcSize(&(p->name)); //qualifiedName->name
  1124. return length;
  1125. }
  1126. UA_Int32 UA_QualifiedName_decodeBinary(UA_ByteString const * src, UA_Int32 *pos,
  1127. UA_QualifiedName *dst) {
  1128. UA_Int32 retval = UA_SUCCESS;
  1129. retval |= UA_UInt16_decodeBinary(src,pos,&(dst->namespaceIndex));
  1130. //retval |= UA_UInt16_decodeBinary(src,pos,&(dst->reserved));
  1131. retval |= UA_String_decodeBinary(src,pos,&(dst->name));
  1132. return retval;
  1133. }
  1134. UA_TYPE_START_ENCODEBINARY(UA_QualifiedName)
  1135. retval |= UA_UInt16_encodeBinary(&(src->namespaceIndex),pos,dst);
  1136. //retval |= UA_UInt16_encodeBinary(&(src->reserved),pos,dst);
  1137. retval |= UA_String_encodeBinary(&(src->name),pos,dst);
  1138. UA_TYPE_END_XXCODEBINARY
  1139. UA_Int32 UA_QualifiedName_delete(UA_QualifiedName * p) {
  1140. UA_Int32 retval = UA_SUCCESS;
  1141. retval |= UA_QualifiedName_deleteMembers(p);
  1142. retval |= UA_free(p);
  1143. return retval;
  1144. }
  1145. UA_Int32 UA_QualifiedName_deleteMembers(UA_QualifiedName * p) {
  1146. UA_Int32 retval = UA_SUCCESS;
  1147. retval |= UA_String_deleteMembers(&(p->name));
  1148. return retval;
  1149. }
  1150. UA_Int32 UA_QualifiedName_init(UA_QualifiedName * p){
  1151. if(p==UA_NULL)return UA_ERROR;
  1152. UA_String_init(&(p->name));
  1153. p->namespaceIndex=0;
  1154. p->reserved=0;
  1155. return UA_SUCCESS;
  1156. }
  1157. UA_TYPE_METHOD_NEW_DEFAULT(UA_QualifiedName)
  1158. UA_Int32 UA_Variant_calcSize(UA_Variant const * p) {
  1159. UA_Int32 length = 0;
  1160. if (p == UA_NULL) return sizeof(UA_Variant);
  1161. UA_UInt32 ns0Id = p->encodingMask & 0x1F; // Bits 1-5
  1162. UA_Boolean isArray = p->encodingMask & (0x01 << 7); // Bit 7
  1163. UA_Boolean hasDimensions = p->encodingMask & (0x01 << 6); // Bit 6
  1164. int i;
  1165. if (p->vt == UA_NULL || ns0Id != p->vt->ns0Id) {
  1166. return UA_ERR_INCONSISTENT;
  1167. }
  1168. length += sizeof(UA_Byte); //p->encodingMask
  1169. if (isArray) { // array length is encoded
  1170. length += sizeof(UA_Int32); //p->arrayLength
  1171. if (p->arrayLength > 0) {
  1172. // TODO: add suggestions of @jfpr to not iterate over arrays with fixed len elements
  1173. // FIXME: the concept of calcSize delivering the storageSize given an UA_Null argument
  1174. // fails for arrays with null-ptrs, see test case
  1175. // UA_Variant_calcSizeVariableSizeArrayWithNullPtrWillReturnWrongEncodingSize
  1176. // Simply do not allow?
  1177. for (i=0;i<p->arrayLength;i++) {
  1178. length += p->vt->calcSize(p->data[i]);
  1179. }
  1180. }
  1181. } else { //single value to encode
  1182. if (p->data == UA_NULL) {
  1183. if (p->vt->ns0Id != UA_INVALIDTYPE_NS0) {
  1184. length += p->vt->calcSize(UA_NULL);
  1185. } else {
  1186. length += 0;
  1187. }
  1188. } else {
  1189. length += p->vt->calcSize(p->data[0]);
  1190. }
  1191. }
  1192. if (hasDimensions) {
  1193. //ToDo: tobeInsert: length += the calcSize for dimensions
  1194. }
  1195. return length;
  1196. }
  1197. UA_TYPE_START_ENCODEBINARY(UA_Variant)
  1198. int i = 0;
  1199. if (src->vt == UA_NULL || ( src->encodingMask & UA_VARIANT_ENCODINGMASKTYPE_TYPEID_MASK) != src->vt->ns0Id) {
  1200. return UA_ERR_INCONSISTENT;
  1201. }
  1202. retval |= UA_Byte_encodeBinary(&(src->encodingMask),pos,dst);
  1203. if (src->encodingMask & UA_VARIANT_ENCODINGMASKTYPE_ARRAY) { // encode array length
  1204. retval |= UA_Int32_encodeBinary(&(src->arrayLength),pos,dst);
  1205. }
  1206. if (src->arrayLength > 0) {
  1207. //encode array as given by variant type
  1208. for (i=0;i<src->arrayLength;i++) {
  1209. retval |= src->vt->encodeBinary(src->data[i],pos,dst);
  1210. }
  1211. } else {
  1212. if (src->data == UA_NULL) {
  1213. if (src->vt->ns0Id == UA_INVALIDTYPE_NS0) {
  1214. retval = UA_SUCCESS;
  1215. } else {
  1216. retval = UA_ERR_NO_MEMORY;
  1217. }
  1218. } else {
  1219. retval |= src->vt->encodeBinary(src->data[i],pos,dst);
  1220. }
  1221. }
  1222. if (src->encodingMask & UA_VARIANT_ENCODINGMASKTYPE_DIMENSIONS) { // encode array dimension field
  1223. // FIXME: encode array dimension field
  1224. printf("shit happens - encode array dimension field wanted");
  1225. }
  1226. UA_TYPE_END_XXCODEBINARY
  1227. UA_Int32 UA_Variant_decodeBinary(UA_ByteString const * src, UA_Int32 *pos, UA_Variant *dst) {
  1228. UA_Int32 retval = UA_SUCCESS;
  1229. UA_Int32 ns0Id, uaIdx;
  1230. retval |= UA_Byte_decodeBinary(src,pos,&(dst->encodingMask));
  1231. ns0Id = dst->encodingMask & UA_VARIANT_ENCODINGMASKTYPE_TYPEID_MASK;
  1232. // initialize vTable
  1233. if ((uaIdx = UA_toIndex(ns0Id)) < 0) {
  1234. return uaIdx;
  1235. } else {
  1236. dst->vt = &UA_[uaIdx];
  1237. }
  1238. // get size of array
  1239. if (dst->encodingMask & UA_VARIANT_ENCODINGMASKTYPE_ARRAY) { // encode array length
  1240. retval |= UA_Int32_decodeBinary(src,pos,&(dst->arrayLength));
  1241. } else {
  1242. dst->arrayLength = 1;
  1243. }
  1244. if (retval == UA_SUCCESS) {
  1245. if (ns0Id == UA_INVALIDTYPE_NS0) { // handle NULL-Variant !
  1246. dst->data = UA_NULL;
  1247. dst->arrayLength = -1;
  1248. } else {
  1249. // allocate array and decode
  1250. retval |= UA_Array_new((void**)&(dst->data),dst->arrayLength,UA_toIndex(ns0Id));
  1251. retval |= UA_Array_decodeBinary(src,dst->arrayLength,UA_toIndex(ns0Id),pos,dst->data);
  1252. }
  1253. }
  1254. if (dst->encodingMask & UA_VARIANT_ENCODINGMASKTYPE_DIMENSIONS) {
  1255. // TODO: decode array dimension field
  1256. printf("shit happens - decode array dimension field wanted");
  1257. }
  1258. return retval;
  1259. }
  1260. UA_TYPE_METHOD_DELETE_STRUCT(UA_Variant)
  1261. UA_Int32 UA_Variant_deleteMembers(UA_Variant * p) {
  1262. UA_Int32 retval = UA_SUCCESS;
  1263. retval |= UA_Array_delete(p->data,p->arrayLength,UA_toIndex(p->vt->ns0Id));
  1264. return retval;
  1265. }
  1266. UA_Int32 UA_Variant_init(UA_Variant * p){
  1267. if(p==UA_NULL)return UA_ERROR;
  1268. p->arrayLength = -1; // no element, p->data == UA_NULL
  1269. p->data = UA_NULL;
  1270. p->encodingMask = 0;
  1271. p->vt = &UA_[UA_INVALIDTYPE];
  1272. return UA_SUCCESS;
  1273. }
  1274. UA_TYPE_METHOD_NEW_DEFAULT(UA_Variant)
  1275. //TODO: place this define at the server configuration
  1276. #define MAX_PICO_SECONDS 1000
  1277. UA_Int32 UA_DataValue_decodeBinary(UA_ByteString const * src, UA_Int32* pos, UA_DataValue* dst) {
  1278. UA_Int32 retval = UA_SUCCESS;
  1279. retval |= UA_Byte_decodeBinary(src,pos,&(dst->encodingMask));
  1280. if (dst->encodingMask & UA_DATAVALUE_ENCODINGMASK_VARIANT) {
  1281. retval |= UA_Variant_decodeBinary(src,pos,&(dst->value));
  1282. }
  1283. if (dst->encodingMask & UA_DATAVALUE_ENCODINGMASK_STATUSCODE) {
  1284. retval |= UA_StatusCode_decodeBinary(src,pos,&(dst->status));
  1285. }
  1286. if (dst->encodingMask & UA_DATAVALUE_ENCODINGMASK_SOURCETIMESTAMP) {
  1287. retval |= UA_DateTime_decodeBinary(src,pos,&(dst->sourceTimestamp));
  1288. }
  1289. if (dst->encodingMask & UA_DATAVALUE_ENCODINGMASK_SOURCEPICOSECONDS) {
  1290. retval |= UA_Int16_decodeBinary(src,pos,&(dst->sourcePicoseconds));
  1291. if (dst->sourcePicoseconds > MAX_PICO_SECONDS) {
  1292. dst->sourcePicoseconds = MAX_PICO_SECONDS;
  1293. }
  1294. }
  1295. if (dst->encodingMask & UA_DATAVALUE_ENCODINGMASK_SERVERTIMESTAMP) {
  1296. retval |= UA_DateTime_decodeBinary(src,pos,&(dst->serverTimestamp));
  1297. }
  1298. if (dst->encodingMask & UA_DATAVALUE_ENCODINGMASK_SERVERPICOSECONDS) {
  1299. retval |= UA_Int16_decodeBinary(src,pos,&(dst->serverPicoseconds));
  1300. if (dst->serverPicoseconds > MAX_PICO_SECONDS) {
  1301. dst->serverPicoseconds = MAX_PICO_SECONDS;
  1302. }
  1303. }
  1304. return retval;
  1305. }
  1306. UA_TYPE_START_ENCODEBINARY(UA_DataValue)
  1307. retval |= UA_Byte_encodeBinary(&(src->encodingMask),pos,dst);
  1308. if (src->encodingMask & UA_DATAVALUE_ENCODINGMASK_VARIANT) {
  1309. retval |= UA_Variant_encodeBinary(&(src->value),pos,dst);
  1310. }
  1311. if (src->encodingMask & UA_DATAVALUE_ENCODINGMASK_STATUSCODE) {
  1312. retval |= UA_StatusCode_encodeBinary(&(src->status),pos,dst);
  1313. }
  1314. if (src->encodingMask & UA_DATAVALUE_ENCODINGMASK_SOURCETIMESTAMP) {
  1315. retval |= UA_DateTime_encodeBinary(&(src->sourceTimestamp),pos,dst);
  1316. }
  1317. if (src->encodingMask & UA_DATAVALUE_ENCODINGMASK_SOURCEPICOSECONDS) {
  1318. retval |= UA_Int16_encodeBinary(&(src->sourcePicoseconds),pos,dst);
  1319. }
  1320. if (src->encodingMask & UA_DATAVALUE_ENCODINGMASK_SERVERTIMESTAMP) {
  1321. retval |= UA_DateTime_encodeBinary(&(src->serverTimestamp),pos,dst);
  1322. }
  1323. if (src->encodingMask & UA_DATAVALUE_ENCODINGMASK_SERVERPICOSECONDS) {
  1324. retval |= UA_Int16_encodeBinary(&(src->serverPicoseconds),pos,dst);
  1325. }
  1326. UA_TYPE_END_XXCODEBINARY
  1327. UA_Int32 UA_DataValue_calcSize(UA_DataValue const * p) {
  1328. UA_Int32 length = 0;
  1329. if (p == UA_NULL) { // get static storage size
  1330. length = sizeof(UA_DataValue);
  1331. } else { // get decoding size
  1332. length = sizeof(UA_Byte);
  1333. if (p->encodingMask & UA_DATAVALUE_ENCODINGMASK_VARIANT) {
  1334. // FIXME: this one can return with an error value instead of a size
  1335. length += UA_Variant_calcSize(&(p->value));
  1336. }
  1337. if (p->encodingMask & UA_DATAVALUE_ENCODINGMASK_STATUSCODE) {
  1338. length += sizeof(UA_UInt32); //dataValue->status
  1339. }
  1340. if (p->encodingMask & UA_DATAVALUE_ENCODINGMASK_SOURCETIMESTAMP) {
  1341. length += sizeof(UA_DateTime); //dataValue->sourceTimestamp
  1342. }
  1343. if (p->encodingMask & UA_DATAVALUE_ENCODINGMASK_SOURCEPICOSECONDS) {
  1344. length += sizeof(UA_Int64); //dataValue->sourcePicoseconds
  1345. }
  1346. if (p->encodingMask & UA_DATAVALUE_ENCODINGMASK_SERVERTIMESTAMP) {
  1347. length += sizeof(UA_DateTime); //dataValue->serverTimestamp
  1348. }
  1349. if (p->encodingMask & UA_DATAVALUE_ENCODINGMASK_SERVERPICOSECONDS) {
  1350. length += sizeof(UA_Int64); //dataValue->serverPicoseconds
  1351. }
  1352. }
  1353. return length;
  1354. }
  1355. UA_TYPE_METHOD_DELETE_STRUCT(UA_DataValue)
  1356. UA_Int32 UA_DataValue_deleteMembers(UA_DataValue * p) {
  1357. UA_Int32 retval = UA_SUCCESS;
  1358. UA_Variant_deleteMembers(&(p->value));
  1359. return retval;
  1360. }
  1361. UA_Int32 UA_DataValue_init(UA_DataValue * p){
  1362. if(p==UA_NULL)return UA_ERROR;
  1363. p->encodingMask = 0;
  1364. p->serverPicoseconds = 0;
  1365. UA_DateTime_init(&(p->serverTimestamp));
  1366. p->sourcePicoseconds = 0;
  1367. UA_DateTime_init(&(p->sourceTimestamp));
  1368. UA_StatusCode_init(&(p->status));
  1369. UA_Variant_init(&(p->value));
  1370. return UA_SUCCESS;
  1371. }
  1372. UA_TYPE_METHOD_NEW_DEFAULT(UA_DataValue)
  1373. /* UA_InvalidType - internal type necessary to handle inited Variants correctly */
  1374. UA_Int32 UA_InvalidType_calcSize(UA_InvalidType const * p) {
  1375. return 0;
  1376. }
  1377. UA_TYPE_START_ENCODEBINARY(UA_InvalidType)
  1378. retval = UA_ERR_INVALID_VALUE;
  1379. UA_TYPE_END_XXCODEBINARY
  1380. UA_TYPE_START_DECODEBINARY(UA_InvalidType)
  1381. retval = UA_ERR_INVALID_VALUE;
  1382. UA_TYPE_END_XXCODEBINARY
  1383. UA_Int32 UA_InvalidType_free(UA_InvalidType* p) {
  1384. return UA_ERR_INVALID_VALUE;
  1385. }
  1386. UA_Int32 UA_InvalidType_delete(UA_InvalidType* p) {
  1387. return UA_ERR_INVALID_VALUE;
  1388. }
  1389. UA_Int32 UA_InvalidType_deleteMembers(UA_InvalidType* p) {
  1390. return UA_ERR_INVALID_VALUE;
  1391. }
  1392. UA_Int32 UA_InvalidType_init(UA_InvalidType* p) {
  1393. return UA_ERR_INVALID_VALUE;
  1394. }
  1395. UA_Int32 UA_InvalidType_new(UA_InvalidType** p) {
  1396. return UA_ERR_INVALID_VALUE;
  1397. }