lib/silcutil/tests/test_silcatomic.c

   1 /* atomic operation tests */
   2
   3 #include "silcruntime.h"
   4
   5 int main(int argc, char **argv)
   6 {
   7   SilcBool success = FALSE;
   8   SilcAtomic32 ref32;
   9   SilcAtomic16 ref16;
  10   SilcAtomic8 ref8;
  11   SilcAtomicPointer refptr;
  12   SilcUInt8 ret8;
  13   SilcUInt16 ret16;
  14   SilcUInt32 ret32;
  15
  16   if (argc > 1 && !strcmp(argv[1], "-d")) {
  17     silc_log_debug(TRUE);
  18     silc_log_debug_hexdump(TRUE);
  19     silc_log_set_debug_string("*atomic*,*errno*");
  20   }
  21
  22   silc_atomic_init8(&ref8, 1);
  23   silc_atomic_init16(&ref16, 1);
  24   silc_atomic_init32(&ref32, 1);
  25   silc_atomic_init_pointer(&refptr, SILC_32_TO_PTR(0xdeadbeef));
  26
  27   ret8 = silc_atomic_add_int8(&ref8, 7);
  28   SILC_LOG_DEBUG(("ref8: 1 + 7 = %d (8)", ret8));
  29   ret8 = silc_atomic_add_int8(&ref8, 3);
  30   SILC_LOG_DEBUG(("ref8: 8 + 3 = %d (11)", ret8));
  31   ret8 = silc_atomic_sub_int8(&ref8, 10);
  32   SILC_LOG_DEBUG(("ref8: 11 - 10 = %d (1)", ret8));
  33
  34   ret16 = silc_atomic_add_int16(&ref16, 1);
  35   SILC_LOG_DEBUG(("ref16: 1 + 1 = %d (2)", ret16));
  36   ret16 = silc_atomic_add_int16(&ref16, 31020);
  37   SILC_LOG_DEBUG(("ref16: 2 + 31020 = %d (31022)", ret16));
  38   ret16 = silc_atomic_add_int16(&ref16, 34000);
  39   SILC_LOG_DEBUG(("ref16: 31022 + 34000 = %d (65022)", ret16));
  40   ret16 = silc_atomic_sub_int16(&ref16, 0);
  41   SILC_LOG_DEBUG(("ref16: 65022 - 0 = %d (65022)", ret16));
  42   ret16 = silc_atomic_sub_int16(&ref16, (SilcInt16)0xffff);
  43   SILC_LOG_DEBUG(("ref16: 65022 - 0xffff = %d (65023) (underflow)", ret16));
  44
  45   SILC_LOG_DEBUG(("Current value: %d (-513)",
  46                   (SilcInt16)silc_atomic_get_int16(&ref16)));
  47
  48   SILC_LOG_DEBUG(("Swapping -513 with 57392"));
  49   if (!silc_atomic_cas16(&ref16, silc_atomic_get_int16(&ref16), 57392))
  50     goto err;
  51   SILC_LOG_DEBUG(("Current value: %d (57392)",
  52                   silc_atomic_get_int16(&ref16)));
  53   SILC_LOG_DEBUG(("Swapping 57392 with -500"));
  54   if (!silc_atomic_cas16(&ref16, silc_atomic_get_int16(&ref16), -500))
  55     goto err;
  56   SILC_LOG_DEBUG(("Current value: %d (-500)",
  57                   (SilcInt16)silc_atomic_get_int16(&ref16)));
  58
  59   ret32 = silc_atomic_add_int32(&ref32, 1);
  60   SILC_LOG_DEBUG(("ref32: 1 + 1 = %d (2)", ret32));
  61   ret32 = silc_atomic_add_int32(&ref32, 310200);
  62   SILC_LOG_DEBUG(("ref32: 2 + 310200 = %d (310202)", ret32));
  63   ret32 = silc_atomic_add_int32(&ref32, 34000000);
  64   SILC_LOG_DEBUG(("ref32: 310202 + 34000000 = %d (34310202)", ret32));
  65   ret32 = silc_atomic_sub_int32(&ref32, 0);
  66   SILC_LOG_DEBUG(("ref32: 34310202 - 0 = %d (34310202)", ret32));
  67   ret32 = silc_atomic_sub_int32(&ref32, 0xfffffff);
  68   SILC_LOG_DEBUG(("ref32: 34310202 - 0xfffffff = %d (-234125253) "
  69                   "(underflow)", ret32));
  70
  71   SILC_LOG_DEBUG(("Current value: %d (-234125253)",
  72                   silc_atomic_get_int32(&ref32)));
  73
  74   SILC_LOG_DEBUG(("Swapping -234125253 with 76327681"));
  75   if (!silc_atomic_cas32(&ref32, silc_atomic_get_int32(&ref32), 76327681))
  76     goto err;
  77   SILC_LOG_DEBUG(("Current value: %d (76327681)",
  78                   silc_atomic_get_int32(&ref32)));
  79
  80   SILC_LOG_DEBUG(("Current ptr: %p (0xdeadbeef)",
  81                   silc_atomic_get_pointer(&refptr)));
  82   SILC_LOG_DEBUG(("Swapping %p with NULL", silc_atomic_get_pointer(&refptr)));
  83   if (!silc_atomic_cas_pointer(&refptr,
  84                                silc_atomic_get_pointer(&refptr), NULL))
  85     goto err;
  86   SILC_LOG_DEBUG(("Current ptr: %p (NULL)",
  87                   silc_atomic_get_pointer(&refptr)));
  88
  89   SILC_LOG_DEBUG(("Setting val 34322111 (32-bit)"));
  90   silc_atomic_set_int32(&ref32, 34322111);
  91   if (silc_atomic_get_int32(&ref32) != 34322111)
  92     goto err;
  93   SILC_LOG_DEBUG(("Setting val 1432211119 (32-bit)"));
  94   silc_atomic_set_int32(&ref32, 1432211119);
  95   if (silc_atomic_get_int32(&ref32) != 1432211119)
  96     goto err;
  97   SILC_LOG_DEBUG(("Setting val 23422 (16-bit)"));
  98   silc_atomic_set_int16(&ref16, 23422);
  99   if (silc_atomic_get_int16(&ref16) != 23422)
 100     goto err;
 101   SILC_LOG_DEBUG(("Setting val 124 (8-bit)"));
 102   silc_atomic_set_int8(&ref8, 124);
 103   if (silc_atomic_get_int8(&ref8) != 124)
 104     goto err;
 105
 106   silc_atomic_uninit8(&ref8);
 107   silc_atomic_uninit16(&ref16);
 108   silc_atomic_uninit32(&ref32);
 109   silc_atomic_uninit_pointer(&refptr);
 110
 111   success = TRUE;
 112
 113  err:
 114   SILC_LOG_DEBUG(("Testing was %s", success ? "SUCCESS" : "FAILURE"));
 115   fprintf(stderr, "Testing was %s\n", success ? "SUCCESS" : "FAILURE");
 116
 117   return !success;
 118 }