/*
* ngIRCd -- The Next Generation IRC Daemon
- * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
+ * Copyright (c)2001-2014 Alexander Barton (alex@barton.de) and Contributors.
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
* Please read the file COPYING, README and AUTHORS for more information.
- *
- * test program for portab.h and friends ;-)
*/
-
#include "portab.h"
-static char UNUSED id[] = "$Id: portabtest.c,v 1.13 2005/07/31 20:13:11 alex Exp $";
+/**
+ * @file
+ * Test program for portab.h and friends ;-)
+ */
-#include "imp.h"
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
-#include "exp.h"
+int allow_severity = 0, deny_severity = 0;
+static void
+Panic(char *Reason)
+{
+ /* Oops, something failed!? */
+ fprintf(stderr, "Oops, test for %s failed!?\n", Reason);
+ exit(1);
+} /* Panic */
-static void Panic PARAMS (( char *Reason, int Code ));
+static void
+Check_snprintf(void)
+{
+ char str[5];
+ snprintf(str, sizeof(str), "%s", "1234567890");
+ if (str[4] != '\0')
+ Panic("snprintf NULL byte");
+ if (strlen(str) != 4)
+ Panic("snprintf string length");
+}
-GLOBAL int
-main( void )
+static void
+Check_strdup(void)
{
- /* validate datatypes */
- if( false != 0 ) Panic( "false", 1 );
- if( true != 1 ) Panic( "true", 1 );
- if( sizeof( UINT8 ) != 1 ) Panic( "UINT8", 1 );
- if( sizeof( UINT16 ) != 2 ) Panic( "UINT16", 1 );
- if( sizeof( UINT32 ) != 4 ) Panic( "UINT32", 1 );
+ char *ptr;
+
+ ptr = strdup("1234567890");
+ if (!ptr)
+ Panic("strdup");
+ if (ptr[10] != '\0')
+ Panic("strdup NULL byte");
+ if (strlen(ptr) != 10)
+ Panic("strdup string length");
+ free(ptr);
+}
+
+static void
+Check_strndup(void)
+{
+ char *ptr;
+
+ ptr = strndup("1234567890", 5);
+ if (!ptr)
+ Panic("strndup");
+ if (ptr[5] != '\0')
+ Panic("strndup NULL byte");
+ if (strlen(ptr) != 5)
+ Panic("strndup string length");
+ free(ptr);
+}
+
+static void
+Check_strlcpy(void)
+{
+ char str[5];
+
+ if (strlcpy(str, "1234567890", sizeof(str)) != 10)
+ Panic("strlcpy return code");
+ if (str[4] != '\0')
+ Panic("strlcpy NULL byte");
+ if (strlen(str) != 4)
+ Panic("strlcpy string length");
+}
+
+static void
+Check_strlcat(void)
+{
+ char str[5];
+
+ if (strlcpy(str, "12", sizeof(str)) != 2)
+ Panic("strlcpy for strlcat");
+ if (strlcat(str, "1234567890", sizeof(str)) != 12)
+ Panic("strlcat return code");
+ if (str[4] != '\0')
+ Panic("strlcat NULL byte");
+ if (strlen(str) != 4)
+ Panic("strlcat string length");
+}
+
+static void
+Check_strtok_r(void)
+{
+ char *ptr, *last;
+
+ ptr = strdup("12,abc");
+
+ ptr = strtok_r(ptr, ",", &last);
+ if (!ptr)
+ Panic("strtok_r result #1");
+ if (strcmp(ptr, "12") != 0)
+ Panic("strtok_r token #1");
+
+ ptr = strtok_r(NULL, ",", &last);
+ if (!ptr)
+ Panic("strtok_r result #2");
+ if (strcmp(ptr, "abc") != 0)
+ Panic("strtok_r token #2");
+
+ ptr = strtok_r(NULL, ",", &last);
+ if (ptr)
+ Panic("strtok_r result #3");
+}
#ifdef PROTOTYPES
- /* check functions */
- if( ! snprintf ) Panic( "snprintf", 2 );
- if( ! vsnprintf ) Panic( "vsnprintf", 2 );
- if( ! strlcpy ) Panic( "strlcpy", 2 );
- if( ! strlcat ) Panic( "strlcat", 2 );
+static void
+Check_vsnprintf(const int Len, const char *Format, ...)
+#else
+static void
+Check_vsnprintf(Len, Format, va_alist)
+const int Len;
+const char *Format;
+va_dcl
#endif
-
- /* ok, no error */
- return 0;
-} /* portab_check_types */
+{
+ char str[5];
+ va_list ap;
+ int r;
+#ifdef PROTOTYPES
+ va_start(ap, Format);
+#else
+ va_start(ap);
+#endif
+ r = vsnprintf(str, sizeof(str), Format, ap);
+ va_end(ap);
+ if (r != Len) {
+ /* C99 states that vsnprintf() "returns the number of
+ * characters that would have been printed if the n were
+ * unlimited", but according to the Linux manual page "glibc
+ * until 2.0.6 would return -1 when the output was truncated",
+ * and other implementations (libUTIL on A/UX) even return the
+ * number of characters processed ... so we only test our own
+ * implementation and warn on errors otherwise :-/ */
+#ifdef HAVE_VSNPRINTF
+ fprintf(stderr,
+ "\n ** WARNING: The vsnprintf() function of this system isn't standard\n");
+ fprintf(stderr,
+ " ** conformant and returns a WRONG result: %d (should be %d)! The test\n",
+ r, Len);
+ fprintf(stderr,
+ " ** result has been ignored but may lead to errors during execution!\n\n");
+#else
+ Panic("vsnprintf return code");
+#endif
+ }
+ if (str[4] != '\0')
+ Panic("vsnprintf NULL byte");
+ if (strlen(str) != 4)
+ Panic("vsnprintf string length");
+}
-static void
-Panic( char *Reason, int Code )
+GLOBAL int
+main(void)
{
- /* Oops, something failed!? */
- fprintf( stderr, "Oops, test for %s failed!?", Reason );
- exit( Code );
-} /* Panic */
+ /* validate datatypes */
+ if (false != 0)
+ Panic("false");
+ if (true != 1)
+ Panic("true");
+ if (sizeof(UINT8) != 1)
+ Panic("UINT8");
+ if (sizeof(UINT16) != 2)
+ Panic("UINT16");
+ if (sizeof(UINT32) != 4)
+ Panic("UINT32");
+ /* check functions */
+ Check_snprintf();
+ Check_strdup();
+ Check_strndup();
+ Check_strlcpy();
+ Check_strlcat();
+ Check_strtok_r();
+ Check_vsnprintf(2+10, "%s%s", "ab", "1234567890");
+
+ return 0;
+}
/* -eof- */