test/dummytest.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include <ctype.h>
   5 #include <openssl/crypto.h>
   6 #include <openssl/e_os2.h>
   7 #include <openssl/buffer.h>
   8
   9 int main(int argc, char *argv[])
  10 {
  11     char *p, *q = 0, *program;
  12
  13     p = strrchr(argv[0], '/');
  14     if (!p)
  15         p = strrchr(argv[0], '\\');
  16 #ifdef OPENSSL_SYS_VMS
  17     if (!p)
  18         p = strrchr(argv[0], ']');
  19     if (p)
  20         q = strrchr(p, '>');
  21     if (q)
  22         p = q;
  23     if (!p)
  24         p = strrchr(argv[0], ':');
  25     q = 0;
  26 #endif
  27     if (p)
  28         p++;
  29     if (!p)
  30         p = argv[0];
  31     if (p)
  32         q = strchr(p, '.');
  33     if (p && !q)
  34         q = p + strlen(p);
  35
  36     if (!p)
  37         program = OPENSSL_strdup("(unknown)");
  38     else {
  39         program = OPENSSL_malloc((q - p) + 1);
  40         strncpy(program, p, q - p);
  41         program[q - p] = '\0';
  42     }
  43
  44     for (p = program; *p; p++)
  45         if (islower((unsigned char)(*p)))
  46             *p = toupper((unsigned char)(*p));
  47
  48     q = strstr(program, "TEST");
  49     if (q > p && q[-1] == '_')
  50         q--;
  51     *q = '\0';
  52
  53     printf("No %s support\n", program);
  54
  55     OPENSSL_free(program);
  56     return (0);
  57 }