src/portab/portabtest.c

   1 /*
   2  * ngIRCd -- The Next Generation IRC Daemon
   3  * Copyright (c)2001-2014 Alexander Barton (alex@barton.de) and Contributors.
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  * Please read the file COPYING, README and AUTHORS for more information.
  10  */
  11
  12 #include "portab.h"
  13
  14 /**
  15  * @file
  16  * Test program for portab.h and friends ;-)
  17  */
  18
  19 #include <stdarg.h>
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23
  24 int allow_severity = 0, deny_severity = 0;
  25
  26 static void
  27 Panic(char *Reason)
  28 {
  29         /* Oops, something failed!? */
  30         fprintf(stderr, "Oops, test for %s failed!?\n", Reason);
  31         exit(1);
  32 } /* Panic */
  33
  34 static void
  35 Check_snprintf(void)
  36 {
  37         char str[5];
  38
  39         snprintf(str, sizeof(str), "%s", "1234567890");
  40         if (str[4] != '\0')
  41                 Panic("snprintf NULL byte");
  42         if (strlen(str) != 4)
  43                 Panic("snprintf string length");
  44 }
  45
  46 static void
  47 Check_strdup(void)
  48 {
  49         char *ptr;
  50
  51         ptr = strdup("1234567890");
  52         if (!ptr)
  53                 Panic("strdup");
  54         if (ptr[10] != '\0')
  55                 Panic("strdup NULL byte");
  56         if (strlen(ptr) != 10)
  57                 Panic("strdup string length");
  58         free(ptr);
  59 }
  60
  61 static void
  62 Check_strndup(void)
  63 {
  64         char *ptr;
  65
  66         ptr = strndup("1234567890", 5);
  67         if (!ptr)
  68                 Panic("strndup");
  69         if (ptr[5] != '\0')
  70                 Panic("strndup NULL byte");
  71         if (strlen(ptr) != 5)
  72                 Panic("strndup string length");
  73         free(ptr);
  74 }
  75
  76 static void
  77 Check_strlcpy(void)
  78 {
  79         char str[5];
  80
  81         if (strlcpy(str, "1234567890", sizeof(str)) != 10)
  82                 Panic("strlcpy return code");
  83         if (str[4] != '\0')
  84                 Panic("strlcpy NULL byte");
  85         if (strlen(str) != 4)
  86                 Panic("strlcpy string length");
  87 }
  88
  89 static void
  90 Check_strlcat(void)
  91 {
  92         char str[5];
  93
  94         if (strlcpy(str, "12", sizeof(str)) != 2)
  95                 Panic("strlcpy for strlcat");
  96         if (strlcat(str, "1234567890", sizeof(str)) != 12)
  97                 Panic("strlcat return code");
  98         if (str[4] != '\0')
  99                 Panic("strlcat NULL byte");
 100         if (strlen(str) != 4)
 101                 Panic("strlcat string length");
 102 }
 103
 104 static void
 105 Check_strtok_r(void)
 106 {
 107         char *ptr, *last;
 108
 109         ptr = strdup("12,abc");
 110
 111         ptr = strtok_r(ptr, ",", &last);
 112         if (!ptr)
 113                 Panic("strtok_r result #1");
 114         if (strcmp(ptr, "12") != 0)
 115                 Panic("strtok_r token #1");
 116
 117         ptr = strtok_r(NULL, ",", &last);
 118         if (!ptr)
 119                 Panic("strtok_r result #2");
 120         if (strcmp(ptr, "abc") != 0)
 121                 Panic("strtok_r token #2");
 122
 123         ptr = strtok_r(NULL, ",", &last);
 124         if (ptr)
 125                 Panic("strtok_r result #3");
 126 }
 127
 128 #ifdef PROTOTYPES
 129 static void
 130 Check_vsnprintf(const int Len, const char *Format, ...)
 131 #else
 132 static void
 133 Check_vsnprintf(Len, Format, va_alist)
 134 const int Len;
 135 const char *Format;
 136 va_dcl
 137 #endif
 138 {
 139         char str[5];
 140         va_list ap;
 141         int r;
 142
 143 #ifdef PROTOTYPES
 144         va_start(ap, Format);
 145 #else
 146         va_start(ap);
 147 #endif
 148         r = vsnprintf(str, sizeof(str), Format, ap);
 149         va_end(ap);
 150         if (r != Len) {
 151                 /* C99 states that vsnprintf() "returns the number of
 152                  * characters that would have been printed if the n were
 153                  * unlimited", but according to the Linux manual page "glibc
 154                  * until 2.0.6 would return -1 when the output was truncated",
 155                  * and other implementations (libUTIL on A/UX) even return the
 156                  * number of characters processed ... so we only test our own
 157                  * implementation and warn on errors otherwise :-/ */
 158 #ifdef HAVE_VSNPRINTF
 159                 fprintf(stderr,
 160                         "\n ** WARNING: The vsnprintf() function of this system isn't standard\n");
 161                 fprintf(stderr,
 162                         " ** conformant and returns a WRONG result: %d (should be %d)! The test\n",
 163                         r, Len);
 164                 fprintf(stderr,
 165                         " ** result has been ignored but may lead to errors during execution!\n\n");
 166 #else
 167                 Panic("vsnprintf return code");
 168 #endif
 169         }
 170         if (str[4] != '\0')
 171                 Panic("vsnprintf NULL byte");
 172         if (strlen(str) != 4)
 173                 Panic("vsnprintf string length");
 174 }
 175
 176 GLOBAL int
 177 main(void)
 178 {
 179         /* validate datatypes */
 180         if (false != 0)
 181                 Panic("false");
 182         if (true != 1)
 183                 Panic("true");
 184         if (sizeof(UINT8) != 1)
 185                 Panic("UINT8");
 186         if (sizeof(UINT16) != 2)
 187                 Panic("UINT16");
 188         if (sizeof(UINT32) != 4)
 189                 Panic("UINT32");
 190
 191         /* check functions */
 192         Check_snprintf();
 193         Check_strdup();
 194         Check_strndup();
 195         Check_strlcpy();
 196         Check_strlcat();
 197         Check_strtok_r();
 198         Check_vsnprintf(2+10, "%s%s", "ab", "1234567890");
 199
 200         return 0;
 201 }
 202
 203 /* -eof- */