win32_testsuite/borland/builder6/realistic/gras/datadesc_usage/datadesc_structs.c

   1 /* This file is perl-generated, of course */
   2
   3 #include "gras.h"
   4
   5 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(structs,test,"Logs about the gigantic struct test");
   6
   7
   8 #define READ  0
   9 #define WRITE 1
  10 #define COPY  2
  11 #define RW    3
  12
  13 /* FIXE ME to analyze
  14
  15 #define READ  0
  16 #define WRITE 1
  17 #define RW    2
  18
  19 */
  20
  21 void write_read(gras_datadesc_type_t type,void *src, void *dst, gras_socket_t *sock, int direction);
  22
  23 GRAS_DEFINE_TYPE(cccc,struct cccc { char a; char b; char c;char d;};)
  24 GRAS_DEFINE_TYPE(ccsc,struct ccsc { char a; char b; short int c;char d;};)
  25 GRAS_DEFINE_TYPE(ccic,struct ccic { char a; char b; int c;char d;};)
  26 GRAS_DEFINE_TYPE(cclc,struct cclc { char a; char b; long int c;char d;};)
  27 GRAS_DEFINE_TYPE(ccLc,struct ccLc { char a; char b; long long int c;char d;};)
  28 GRAS_DEFINE_TYPE(ccfc,struct ccfc { char a; char b; float c;char d;};)
  29 GRAS_DEFINE_TYPE(ccdc,struct ccdc { char a; char b; double c;char d;};)
  30 GRAS_DEFINE_TYPE(sccc,struct sccc { short int a; char b; char c;char d;};)
  31 GRAS_DEFINE_TYPE(scsc,struct scsc { short int a; char b; short int c;char d;};)
  32 GRAS_DEFINE_TYPE(scic,struct scic { short int a; char b; int c;char d;};)
  33 GRAS_DEFINE_TYPE(sclc,struct sclc { short int a; char b; long int c;char d;};)
  34 GRAS_DEFINE_TYPE(scLc,struct scLc { short int a; char b; long long int c;char d;};)
  35 GRAS_DEFINE_TYPE(scfc,struct scfc { short int a; char b; float c;char d;};)
  36 GRAS_DEFINE_TYPE(scdc,struct scdc { short int a; char b; double c;char d;};)
  37 GRAS_DEFINE_TYPE(iccc,struct iccc { int a; char b; char c;char d;};)
  38 GRAS_DEFINE_TYPE(icsc,struct icsc { int a; char b; short int c;char d;};)
  39 GRAS_DEFINE_TYPE(icic,struct icic { int a; char b; int c;char d;};)
  40 GRAS_DEFINE_TYPE(iclc,struct iclc { int a; char b; long int c;char d;};)
  41 GRAS_DEFINE_TYPE(icLc,struct icLc { int a; char b; long long int c;char d;};)
  42 GRAS_DEFINE_TYPE(icfc,struct icfc { int a; char b; float c;char d;};)
  43 GRAS_DEFINE_TYPE(icdc,struct icdc { int a; char b; double c;char d;};)
  44 GRAS_DEFINE_TYPE(lccc,struct lccc { long int a; char b; char c;char d;};)
  45 GRAS_DEFINE_TYPE(lcsc,struct lcsc { long int a; char b; short int c;char d;};)
  46 GRAS_DEFINE_TYPE(lcic,struct lcic { long int a; char b; int c;char d;};)
  47 GRAS_DEFINE_TYPE(lclc,struct lclc { long int a; char b; long int c;char d;};)
  48 GRAS_DEFINE_TYPE(lcLc,struct lcLc { long int a; char b; long long int c;char d;};)
  49 GRAS_DEFINE_TYPE(lcfc,struct lcfc { long int a; char b; float c;char d;};)
  50 GRAS_DEFINE_TYPE(lcdc,struct lcdc { long int a; char b; double c;char d;};)
  51 GRAS_DEFINE_TYPE(Lccc,struct Lccc { long long int a; char b; char c;char d;};)
  52 GRAS_DEFINE_TYPE(Lcsc,struct Lcsc { long long int a; char b; short int c;char d;};)
  53 GRAS_DEFINE_TYPE(Lcic,struct Lcic { long long int a; char b; int c;char d;};)
  54 GRAS_DEFINE_TYPE(Lclc,struct Lclc { long long int a; char b; long int c;char d;};)
  55 GRAS_DEFINE_TYPE(LcLc,struct LcLc { long long int a; char b; long long int c;char d;};)
  56 GRAS_DEFINE_TYPE(Lcfc,struct Lcfc { long long int a; char b; float c;char d;};)
  57 GRAS_DEFINE_TYPE(Lcdc,struct Lcdc { long long int a; char b; double c;char d;};)
  58 GRAS_DEFINE_TYPE(fccc,struct fccc { float a; char b; char c;char d;};)
  59 GRAS_DEFINE_TYPE(fcsc,struct fcsc { float a; char b; short int c;char d;};)
  60 GRAS_DEFINE_TYPE(fcic,struct fcic { float a; char b; int c;char d;};)
  61 GRAS_DEFINE_TYPE(fclc,struct fclc { float a; char b; long int c;char d;};)
  62 GRAS_DEFINE_TYPE(fcLc,struct fcLc { float a; char b; long long int c;char d;};)
  63 GRAS_DEFINE_TYPE(fcfc,struct fcfc { float a; char b; float c;char d;};)
  64 GRAS_DEFINE_TYPE(fcdc,struct fcdc { float a; char b; double c;char d;};)
  65 GRAS_DEFINE_TYPE(dccc,struct dccc { double a; char b; char c;char d;};)
  66 GRAS_DEFINE_TYPE(dcsc,struct dcsc { double a; char b; short int c;char d;};)
  67 GRAS_DEFINE_TYPE(dcic,struct dcic { double a; char b; int c;char d;};)
  68 GRAS_DEFINE_TYPE(dclc,struct dclc { double a; char b; long int c;char d;};)
  69 GRAS_DEFINE_TYPE(dcLc,struct dcLc { double a; char b; long long int c;char d;};)
  70 GRAS_DEFINE_TYPE(dcfc,struct dcfc { double a; char b; float c;char d;};)
  71 GRAS_DEFINE_TYPE(dcdc,struct dcdc { double a; char b; double c;char d;};)
  72
  73 #define test(a) xbt_assert(a)
  74 void test_structures(gras_socket_t *sock, int direction);
  75 void test_structures(gras_socket_t *sock, int direction) {
  76   struct cccc my_cccc = {'w'+(char)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_cccc2;
  77   struct ccsc my_ccsc = {'w'+(char)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_ccsc2;
  78   struct ccic my_ccic = {'w'+(char)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_ccic2;
  79   struct cclc my_cclc = {'w'+(char)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_cclc2;
  80   struct ccLc my_ccLc = {'w'+(char)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_ccLc2;
  81   struct ccfc my_ccfc = {'w'+(char)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_ccfc2;
  82   struct ccdc my_ccdc = {'w'+(char)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_ccdc2;
  83   struct sccc my_sccc = {134+(short int)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_sccc2;
  84   struct scsc my_scsc = {134+(short int)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_scsc2;
  85   struct scic my_scic = {134+(short int)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_scic2;
  86   struct sclc my_sclc = {134+(short int)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_sclc2;
  87   struct scLc my_scLc = {134+(short int)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_scLc2;
  88   struct scfc my_scfc = {134+(short int)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_scfc2;
  89   struct scdc my_scdc = {134+(short int)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_scdc2;
  90   struct iccc my_iccc = {-11249+(int)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_iccc2;
  91   struct icsc my_icsc = {-11249+(int)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_icsc2;
  92   struct icic my_icic = {-11249+(int)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_icic2;
  93   struct iclc my_iclc = {-11249+(int)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_iclc2;
  94   struct icLc my_icLc = {-11249+(int)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_icLc2;
  95   struct icfc my_icfc = {-11249+(int)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_icfc2;
  96   struct icdc my_icdc = {-11249+(int)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_icdc2;
  97   struct lccc my_lccc = {31319919+(long int)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_lccc2;
  98   struct lcsc my_lcsc = {31319919+(long int)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_lcsc2;
  99   struct lcic my_lcic = {31319919+(long int)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_lcic2;
 100   struct lclc my_lclc = {31319919+(long int)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_lclc2;
 101   struct lcLc my_lcLc = {31319919+(long int)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_lcLc2;
 102   struct lcfc my_lcfc = {31319919+(long int)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_lcfc2;
 103   struct lcdc my_lcdc = {31319919+(long int)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_lcdc2;
 104   struct Lccc my_Lccc = {-232130010+(long long int)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_Lccc2;
 105   struct Lcsc my_Lcsc = {-232130010+(long long int)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_Lcsc2;
 106   struct Lcic my_Lcic = {-232130010+(long long int)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_Lcic2;
 107   struct Lclc my_Lclc = {-232130010+(long long int)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_Lclc2;
 108   struct LcLc my_LcLc = {-232130010+(long long int)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_LcLc2;
 109   struct Lcfc my_Lcfc = {-232130010+(long long int)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_Lcfc2;
 110   struct Lcdc my_Lcdc = {-232130010+(long long int)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_Lcdc2;
 111   struct fccc my_fccc = {-11313.1135+(float)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_fccc2;
 112   struct fcsc my_fcsc = {-11313.1135+(float)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_fcsc2;
 113   struct fcic my_fcic = {-11313.1135+(float)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_fcic2;
 114   struct fclc my_fclc = {-11313.1135+(float)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_fclc2;
 115   struct fcLc my_fcLc = {-11313.1135+(float)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_fcLc2;
 116   struct fcfc my_fcfc = {-11313.1135+(float)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_fcfc2;
 117   struct fcdc my_fcdc = {-11313.1135+(float)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_fcdc2;
 118   struct dccc my_dccc = {1424420.11331+(double)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_dccc2;
 119   struct dcsc my_dcsc = {1424420.11331+(double)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_dcsc2;
 120   struct dcic my_dcic = {1424420.11331+(double)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_dcic2;
 121   struct dclc my_dclc = {1424420.11331+(double)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_dclc2;
 122   struct dcLc my_dcLc = {1424420.11331+(double)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_dcLc2;
 123   struct dcfc my_dcfc = {1424420.11331+(double)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_dcfc2;
 124   struct dcdc my_dcdc = {1424420.11331+(double)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_dcdc2;
 125   INFO0("---- Test on all possible struct having 3 fields (49 structs) ----");
 126   write_read(gras_datadesc_by_symbol(cccc), &my_cccc, &my_cccc2, sock,direction);
 127   if (direction == READ || direction == RW) {
 128      int failed = 0;
 129      test(my_cccc.a == my_cccc2.a);
 130      test(my_cccc.b == my_cccc2.b);
 131      test(my_cccc.c == my_cccc2.c);
 132      test(my_cccc.d == my_cccc2.d);
 133      if (!failed) VERB0("Passed cccc");
 134   }
 135   write_read(gras_datadesc_by_symbol(ccsc), &my_ccsc, &my_ccsc2, sock,direction);
 136   if (direction == READ || direction == RW) {
 137      int failed = 0;
 138      test(my_ccsc.a == my_ccsc2.a);
 139      test(my_ccsc.b == my_ccsc2.b);
 140      test(my_ccsc.c == my_ccsc2.c);
 141      test(my_ccsc.d == my_ccsc2.d);
 142      if (!failed) VERB0("Passed ccsc");
 143   }
 144   write_read(gras_datadesc_by_symbol(ccic), &my_ccic, &my_ccic2, sock,direction);
 145   if (direction == READ || direction == RW) {
 146      int failed = 0;
 147      test(my_ccic.a == my_ccic2.a);
 148      test(my_ccic.b == my_ccic2.b);
 149      test(my_ccic.c == my_ccic2.c);
 150      test(my_ccic.d == my_ccic2.d);
 151      if (!failed) VERB0("Passed ccic");
 152   }
 153   write_read(gras_datadesc_by_symbol(cclc), &my_cclc, &my_cclc2, sock,direction);
 154   if (direction == READ || direction == RW) {
 155      int failed = 0;
 156      test(my_cclc.a == my_cclc2.a);
 157      test(my_cclc.b == my_cclc2.b);
 158      test(my_cclc.c == my_cclc2.c);
 159      test(my_cclc.d == my_cclc2.d);
 160      if (!failed) VERB0("Passed cclc");
 161   }
 162   write_read(gras_datadesc_by_symbol(ccLc), &my_ccLc, &my_ccLc2, sock,direction);
 163   if (direction == READ || direction == RW) {
 164      int failed = 0;
 165      test(my_ccLc.a == my_ccLc2.a);
 166      test(my_ccLc.b == my_ccLc2.b);
 167      test(my_ccLc.c == my_ccLc2.c);
 168      test(my_ccLc.d == my_ccLc2.d);
 169      if (!failed) VERB0("Passed ccLc");
 170   }
 171   write_read(gras_datadesc_by_symbol(ccfc), &my_ccfc, &my_ccfc2, sock,direction);
 172   if (direction == READ || direction == RW) {
 173      int failed = 0;
 174      test(my_ccfc.a == my_ccfc2.a);
 175      test(my_ccfc.b == my_ccfc2.b);
 176      test(my_ccfc.c == my_ccfc2.c);
 177      test(my_ccfc.d == my_ccfc2.d);
 178      if (!failed) VERB0("Passed ccfc");
 179   }
 180   write_read(gras_datadesc_by_symbol(ccdc), &my_ccdc, &my_ccdc2, sock,direction);
 181   if (direction == READ || direction == RW) {
 182      int failed = 0;
 183      test(my_ccdc.a == my_ccdc2.a);
 184      test(my_ccdc.b == my_ccdc2.b);
 185      test(my_ccdc.c == my_ccdc2.c);
 186      test(my_ccdc.d == my_ccdc2.d);
 187      if (!failed) VERB0("Passed ccdc");
 188   }
 189   write_read(gras_datadesc_by_symbol(sccc), &my_sccc, &my_sccc2, sock,direction);
 190   if (direction == READ || direction == RW) {
 191      int failed = 0;
 192      test(my_sccc.a == my_sccc2.a);
 193      test(my_sccc.b == my_sccc2.b);
 194      test(my_sccc.c == my_sccc2.c);
 195      test(my_sccc.d == my_sccc2.d);
 196      if (!failed) VERB0("Passed sccc");
 197   }
 198   write_read(gras_datadesc_by_symbol(scsc), &my_scsc, &my_scsc2, sock,direction);
 199   if (direction == READ || direction == RW) {
 200      int failed = 0;
 201      test(my_scsc.a == my_scsc2.a);
 202      test(my_scsc.b == my_scsc2.b);
 203      test(my_scsc.c == my_scsc2.c);
 204      test(my_scsc.d == my_scsc2.d);
 205      if (!failed) VERB0("Passed scsc");
 206   }
 207   write_read(gras_datadesc_by_symbol(scic), &my_scic, &my_scic2, sock,direction);
 208   if (direction == READ || direction == RW) {
 209      int failed = 0;
 210      test(my_scic.a == my_scic2.a);
 211      test(my_scic.b == my_scic2.b);
 212      test(my_scic.c == my_scic2.c);
 213      test(my_scic.d == my_scic2.d);
 214      if (!failed) VERB0("Passed scic");
 215   }
 216   write_read(gras_datadesc_by_symbol(sclc), &my_sclc, &my_sclc2, sock,direction);
 217   if (direction == READ || direction == RW) {
 218      int failed = 0;
 219      test(my_sclc.a == my_sclc2.a);
 220      test(my_sclc.b == my_sclc2.b);
 221      test(my_sclc.c == my_sclc2.c);
 222      test(my_sclc.d == my_sclc2.d);
 223      if (!failed) VERB0("Passed sclc");
 224   }
 225   write_read(gras_datadesc_by_symbol(scLc), &my_scLc, &my_scLc2, sock,direction);
 226   if (direction == READ || direction == RW) {
 227      int failed = 0;
 228      test(my_scLc.a == my_scLc2.a);
 229      test(my_scLc.b == my_scLc2.b);
 230      test(my_scLc.c == my_scLc2.c);
 231      test(my_scLc.d == my_scLc2.d);
 232      if (!failed) VERB0("Passed scLc");
 233   }
 234   write_read(gras_datadesc_by_symbol(scfc), &my_scfc, &my_scfc2, sock,direction);
 235   if (direction == READ || direction == RW) {
 236      int failed = 0;
 237      test(my_scfc.a == my_scfc2.a);
 238      test(my_scfc.b == my_scfc2.b);
 239      test(my_scfc.c == my_scfc2.c);
 240      test(my_scfc.d == my_scfc2.d);
 241      if (!failed) VERB0("Passed scfc");
 242   }
 243   write_read(gras_datadesc_by_symbol(scdc), &my_scdc, &my_scdc2, sock,direction);
 244   if (direction == READ || direction == RW) {
 245      int failed = 0;
 246      test(my_scdc.a == my_scdc2.a);
 247      test(my_scdc.b == my_scdc2.b);
 248      test(my_scdc.c == my_scdc2.c);
 249      test(my_scdc.d == my_scdc2.d);
 250      if (!failed) VERB0("Passed scdc");
 251   }
 252   write_read(gras_datadesc_by_symbol(iccc), &my_iccc, &my_iccc2, sock,direction);
 253   if (direction == READ || direction == RW) {
 254      int failed = 0;
 255      test(my_iccc.a == my_iccc2.a);
 256      test(my_iccc.b == my_iccc2.b);
 257      test(my_iccc.c == my_iccc2.c);
 258      test(my_iccc.d == my_iccc2.d);
 259      if (!failed) VERB0("Passed iccc");
 260   }
 261   write_read(gras_datadesc_by_symbol(icsc), &my_icsc, &my_icsc2, sock,direction);
 262   if (direction == READ || direction == RW) {
 263      int failed = 0;
 264      test(my_icsc.a == my_icsc2.a);
 265      test(my_icsc.b == my_icsc2.b);
 266      test(my_icsc.c == my_icsc2.c);
 267      test(my_icsc.d == my_icsc2.d);
 268      if (!failed) VERB0("Passed icsc");
 269   }
 270   write_read(gras_datadesc_by_symbol(icic), &my_icic, &my_icic2, sock,direction);
 271   if (direction == READ || direction == RW) {
 272      int failed = 0;
 273      test(my_icic.a == my_icic2.a);
 274      test(my_icic.b == my_icic2.b);
 275      test(my_icic.c == my_icic2.c);
 276      test(my_icic.d == my_icic2.d);
 277      if (!failed) VERB0("Passed icic");
 278   }
 279   write_read(gras_datadesc_by_symbol(iclc), &my_iclc, &my_iclc2, sock,direction);
 280   if (direction == READ || direction == RW) {
 281      int failed = 0;
 282      test(my_iclc.a == my_iclc2.a);
 283      test(my_iclc.b == my_iclc2.b);
 284      test(my_iclc.c == my_iclc2.c);
 285      test(my_iclc.d == my_iclc2.d);
 286      if (!failed) VERB0("Passed iclc");
 287   }
 288   write_read(gras_datadesc_by_symbol(icLc), &my_icLc, &my_icLc2, sock,direction);
 289   if (direction == READ || direction == RW) {
 290      int failed = 0;
 291      test(my_icLc.a == my_icLc2.a);
 292      test(my_icLc.b == my_icLc2.b);
 293      test(my_icLc.c == my_icLc2.c);
 294      test(my_icLc.d == my_icLc2.d);
 295      if (!failed) VERB0("Passed icLc");
 296   }
 297   write_read(gras_datadesc_by_symbol(icfc), &my_icfc, &my_icfc2, sock,direction);
 298   if (direction == READ || direction == RW) {
 299      int failed = 0;
 300      test(my_icfc.a == my_icfc2.a);
 301      test(my_icfc.b == my_icfc2.b);
 302      test(my_icfc.c == my_icfc2.c);
 303      test(my_icfc.d == my_icfc2.d);
 304      if (!failed) VERB0("Passed icfc");
 305   }
 306   write_read(gras_datadesc_by_symbol(icdc), &my_icdc, &my_icdc2, sock,direction);
 307   if (direction == READ || direction == RW) {
 308      int failed = 0;
 309      test(my_icdc.a == my_icdc2.a);
 310      test(my_icdc.b == my_icdc2.b);
 311      test(my_icdc.c == my_icdc2.c);
 312      test(my_icdc.d == my_icdc2.d);
 313      if (!failed) VERB0("Passed icdc");
 314   }
 315   write_read(gras_datadesc_by_symbol(lccc), &my_lccc, &my_lccc2, sock,direction);
 316   if (direction == READ || direction == RW) {
 317      int failed = 0;
 318      test(my_lccc.a == my_lccc2.a);
 319      test(my_lccc.b == my_lccc2.b);
 320      test(my_lccc.c == my_lccc2.c);
 321      test(my_lccc.d == my_lccc2.d);
 322      if (!failed) VERB0("Passed lccc");
 323   }
 324   write_read(gras_datadesc_by_symbol(lcsc), &my_lcsc, &my_lcsc2, sock,direction);
 325   if (direction == READ || direction == RW) {
 326      int failed = 0;
 327      test(my_lcsc.a == my_lcsc2.a);
 328      test(my_lcsc.b == my_lcsc2.b);
 329      test(my_lcsc.c == my_lcsc2.c);
 330      test(my_lcsc.d == my_lcsc2.d);
 331      if (!failed) VERB0("Passed lcsc");
 332   }
 333   write_read(gras_datadesc_by_symbol(lcic), &my_lcic, &my_lcic2, sock,direction);
 334   if (direction == READ || direction == RW) {
 335      int failed = 0;
 336      test(my_lcic.a == my_lcic2.a);
 337      test(my_lcic.b == my_lcic2.b);
 338      test(my_lcic.c == my_lcic2.c);
 339      test(my_lcic.d == my_lcic2.d);
 340      if (!failed) VERB0("Passed lcic");
 341   }
 342   write_read(gras_datadesc_by_symbol(lclc), &my_lclc, &my_lclc2, sock,direction);
 343   if (direction == READ || direction == RW) {
 344      int failed = 0;
 345      test(my_lclc.a == my_lclc2.a);
 346      test(my_lclc.b == my_lclc2.b);
 347      test(my_lclc.c == my_lclc2.c);
 348      test(my_lclc.d == my_lclc2.d);
 349      if (!failed) VERB0("Passed lclc");
 350   }
 351   write_read(gras_datadesc_by_symbol(lcLc), &my_lcLc, &my_lcLc2, sock,direction);
 352   if (direction == READ || direction == RW) {
 353      int failed = 0;
 354      test(my_lcLc.a == my_lcLc2.a);
 355      test(my_lcLc.b == my_lcLc2.b);
 356      test(my_lcLc.c == my_lcLc2.c);
 357      test(my_lcLc.d == my_lcLc2.d);
 358      if (!failed) VERB0("Passed lcLc");
 359   }
 360   write_read(gras_datadesc_by_symbol(lcfc), &my_lcfc, &my_lcfc2, sock,direction);
 361   if (direction == READ || direction == RW) {
 362      int failed = 0;
 363      test(my_lcfc.a == my_lcfc2.a);
 364      test(my_lcfc.b == my_lcfc2.b);
 365      test(my_lcfc.c == my_lcfc2.c);
 366      test(my_lcfc.d == my_lcfc2.d);
 367      if (!failed) VERB0("Passed lcfc");
 368   }
 369   write_read(gras_datadesc_by_symbol(lcdc), &my_lcdc, &my_lcdc2, sock,direction);
 370   if (direction == READ || direction == RW) {
 371      int failed = 0;
 372      test(my_lcdc.a == my_lcdc2.a);
 373      test(my_lcdc.b == my_lcdc2.b);
 374      test(my_lcdc.c == my_lcdc2.c);
 375      test(my_lcdc.d == my_lcdc2.d);
 376      if (!failed) VERB0("Passed lcdc");
 377   }
 378   write_read(gras_datadesc_by_symbol(Lccc), &my_Lccc, &my_Lccc2, sock,direction);
 379   if (direction == READ || direction == RW) {
 380      int failed = 0;
 381      test(my_Lccc.a == my_Lccc2.a);
 382      test(my_Lccc.b == my_Lccc2.b);
 383      test(my_Lccc.c == my_Lccc2.c);
 384      test(my_Lccc.d == my_Lccc2.d);
 385      if (!failed) VERB0("Passed Lccc");
 386   }
 387   write_read(gras_datadesc_by_symbol(Lcsc), &my_Lcsc, &my_Lcsc2, sock,direction);
 388   if (direction == READ || direction == RW) {
 389      int failed = 0;
 390      test(my_Lcsc.a == my_Lcsc2.a);
 391      test(my_Lcsc.b == my_Lcsc2.b);
 392      test(my_Lcsc.c == my_Lcsc2.c);
 393      test(my_Lcsc.d == my_Lcsc2.d);
 394      if (!failed) VERB0("Passed Lcsc");
 395   }
 396   write_read(gras_datadesc_by_symbol(Lcic), &my_Lcic, &my_Lcic2, sock,direction);
 397   if (direction == READ || direction == RW) {
 398      int failed = 0;
 399      test(my_Lcic.a == my_Lcic2.a);
 400      test(my_Lcic.b == my_Lcic2.b);
 401      test(my_Lcic.c == my_Lcic2.c);
 402      test(my_Lcic.d == my_Lcic2.d);
 403      if (!failed) VERB0("Passed Lcic");
 404   }
 405   write_read(gras_datadesc_by_symbol(Lclc), &my_Lclc, &my_Lclc2, sock,direction);
 406   if (direction == READ || direction == RW) {
 407      int failed = 0;
 408      test(my_Lclc.a == my_Lclc2.a);
 409      test(my_Lclc.b == my_Lclc2.b);
 410      test(my_Lclc.c == my_Lclc2.c);
 411      test(my_Lclc.d == my_Lclc2.d);
 412      if (!failed) VERB0("Passed Lclc");
 413   }
 414   write_read(gras_datadesc_by_symbol(LcLc), &my_LcLc, &my_LcLc2, sock,direction);
 415   if (direction == READ || direction == RW) {
 416      int failed = 0;
 417      test(my_LcLc.a == my_LcLc2.a);
 418      test(my_LcLc.b == my_LcLc2.b);
 419      test(my_LcLc.c == my_LcLc2.c);
 420      test(my_LcLc.d == my_LcLc2.d);
 421      if (!failed) VERB0("Passed LcLc");
 422   }
 423   write_read(gras_datadesc_by_symbol(Lcfc), &my_Lcfc, &my_Lcfc2, sock,direction);
 424   if (direction == READ || direction == RW) {
 425      int failed = 0;
 426      test(my_Lcfc.a == my_Lcfc2.a);
 427      test(my_Lcfc.b == my_Lcfc2.b);
 428      test(my_Lcfc.c == my_Lcfc2.c);
 429      test(my_Lcfc.d == my_Lcfc2.d);
 430      if (!failed) VERB0("Passed Lcfc");
 431   }
 432   write_read(gras_datadesc_by_symbol(Lcdc), &my_Lcdc, &my_Lcdc2, sock,direction);
 433   if (direction == READ || direction == RW) {
 434      int failed = 0;
 435      test(my_Lcdc.a == my_Lcdc2.a);
 436      test(my_Lcdc.b == my_Lcdc2.b);
 437      test(my_Lcdc.c == my_Lcdc2.c);
 438      test(my_Lcdc.d == my_Lcdc2.d);
 439      if (!failed) VERB0("Passed Lcdc");
 440   }
 441   write_read(gras_datadesc_by_symbol(fccc), &my_fccc, &my_fccc2, sock,direction);
 442   if (direction == READ || direction == RW) {
 443      int failed = 0;
 444      test(my_fccc.a == my_fccc2.a);
 445      test(my_fccc.b == my_fccc2.b);
 446      test(my_fccc.c == my_fccc2.c);
 447      test(my_fccc.d == my_fccc2.d);
 448      if (!failed) VERB0("Passed fccc");
 449   }
 450   write_read(gras_datadesc_by_symbol(fcsc), &my_fcsc, &my_fcsc2, sock,direction);
 451   if (direction == READ || direction == RW) {
 452      int failed = 0;
 453      test(my_fcsc.a == my_fcsc2.a);
 454      test(my_fcsc.b == my_fcsc2.b);
 455      test(my_fcsc.c == my_fcsc2.c);
 456      test(my_fcsc.d == my_fcsc2.d);
 457      if (!failed) VERB0("Passed fcsc");
 458   }
 459   write_read(gras_datadesc_by_symbol(fcic), &my_fcic, &my_fcic2, sock,direction);
 460   if (direction == READ || direction == RW) {
 461      int failed = 0;
 462      test(my_fcic.a == my_fcic2.a);
 463      test(my_fcic.b == my_fcic2.b);
 464      test(my_fcic.c == my_fcic2.c);
 465      test(my_fcic.d == my_fcic2.d);
 466      if (!failed) VERB0("Passed fcic");
 467   }
 468   write_read(gras_datadesc_by_symbol(fclc), &my_fclc, &my_fclc2, sock,direction);
 469   if (direction == READ || direction == RW) {
 470      int failed = 0;
 471      test(my_fclc.a == my_fclc2.a);
 472      test(my_fclc.b == my_fclc2.b);
 473      test(my_fclc.c == my_fclc2.c);
 474      test(my_fclc.d == my_fclc2.d);
 475      if (!failed) VERB0("Passed fclc");
 476   }
 477   write_read(gras_datadesc_by_symbol(fcLc), &my_fcLc, &my_fcLc2, sock,direction);
 478   if (direction == READ || direction == RW) {
 479      int failed = 0;
 480      test(my_fcLc.a == my_fcLc2.a);
 481      test(my_fcLc.b == my_fcLc2.b);
 482      test(my_fcLc.c == my_fcLc2.c);
 483      test(my_fcLc.d == my_fcLc2.d);
 484      if (!failed) VERB0("Passed fcLc");
 485   }
 486   write_read(gras_datadesc_by_symbol(fcfc), &my_fcfc, &my_fcfc2, sock,direction);
 487   if (direction == READ || direction == RW) {
 488      int failed = 0;
 489      test(my_fcfc.a == my_fcfc2.a);
 490      test(my_fcfc.b == my_fcfc2.b);
 491      test(my_fcfc.c == my_fcfc2.c);
 492      test(my_fcfc.d == my_fcfc2.d);
 493      if (!failed) VERB0("Passed fcfc");
 494   }
 495   write_read(gras_datadesc_by_symbol(fcdc), &my_fcdc, &my_fcdc2, sock,direction);
 496   if (direction == READ || direction == RW) {
 497      int failed = 0;
 498      test(my_fcdc.a == my_fcdc2.a);
 499      test(my_fcdc.b == my_fcdc2.b);
 500      test(my_fcdc.c == my_fcdc2.c);
 501      test(my_fcdc.d == my_fcdc2.d);
 502      if (!failed) VERB0("Passed fcdc");
 503   }
 504   write_read(gras_datadesc_by_symbol(dccc), &my_dccc, &my_dccc2, sock,direction);
 505   if (direction == READ || direction == RW) {
 506      int failed = 0;
 507      test(my_dccc.a == my_dccc2.a);
 508      test(my_dccc.b == my_dccc2.b);
 509      test(my_dccc.c == my_dccc2.c);
 510      test(my_dccc.d == my_dccc2.d);
 511      if (!failed) VERB0("Passed dccc");
 512   }
 513   write_read(gras_datadesc_by_symbol(dcsc), &my_dcsc, &my_dcsc2, sock,direction);
 514   if (direction == READ || direction == RW) {
 515      int failed = 0;
 516      test(my_dcsc.a == my_dcsc2.a);
 517      test(my_dcsc.b == my_dcsc2.b);
 518      test(my_dcsc.c == my_dcsc2.c);
 519      test(my_dcsc.d == my_dcsc2.d);
 520      if (!failed) VERB0("Passed dcsc");
 521   }
 522   write_read(gras_datadesc_by_symbol(dcic), &my_dcic, &my_dcic2, sock,direction);
 523   if (direction == READ || direction == RW) {
 524      int failed = 0;
 525      test(my_dcic.a == my_dcic2.a);
 526      test(my_dcic.b == my_dcic2.b);
 527      test(my_dcic.c == my_dcic2.c);
 528      test(my_dcic.d == my_dcic2.d);
 529      if (!failed) VERB0("Passed dcic");
 530   }
 531   write_read(gras_datadesc_by_symbol(dclc), &my_dclc, &my_dclc2, sock,direction);
 532   if (direction == READ || direction == RW) {
 533      int failed = 0;
 534      test(my_dclc.a == my_dclc2.a);
 535      test(my_dclc.b == my_dclc2.b);
 536      test(my_dclc.c == my_dclc2.c);
 537      test(my_dclc.d == my_dclc2.d);
 538      if (!failed) VERB0("Passed dclc");
 539   }
 540   write_read(gras_datadesc_by_symbol(dcLc), &my_dcLc, &my_dcLc2, sock,direction);
 541   if (direction == READ || direction == RW) {
 542      int failed = 0;
 543      test(my_dcLc.a == my_dcLc2.a);
 544      test(my_dcLc.b == my_dcLc2.b);
 545      test(my_dcLc.c == my_dcLc2.c);
 546      test(my_dcLc.d == my_dcLc2.d);
 547      if (!failed) VERB0("Passed dcLc");
 548   }
 549   write_read(gras_datadesc_by_symbol(dcfc), &my_dcfc, &my_dcfc2, sock,direction);
 550   if (direction == READ || direction == RW) {
 551      int failed = 0;
 552      test(my_dcfc.a == my_dcfc2.a);
 553      test(my_dcfc.b == my_dcfc2.b);
 554      test(my_dcfc.c == my_dcfc2.c);
 555      test(my_dcfc.d == my_dcfc2.d);
 556      if (!failed) VERB0("Passed dcfc");
 557   }
 558   write_read(gras_datadesc_by_symbol(dcdc), &my_dcdc, &my_dcdc2, sock,direction);
 559   if (direction == READ || direction == RW) {
 560      int failed = 0;
 561      test(my_dcdc.a == my_dcdc2.a);
 562      test(my_dcdc.b == my_dcdc2.b);
 563      test(my_dcdc.c == my_dcdc2.c);
 564      test(my_dcdc.d == my_dcdc2.d);
 565      if (!failed) VERB0("Passed dcdc");
 566   }
 567 }