OpenSSL: update to 1.0.1m
[tomato.git] / release / src / router / openssl / test / dummytest.c
blob554acc221ffcd7ed667a5fb5a0386c5bbf5fcf57
1 #include <stdio.h>
2 #include <stdlib.h>
3 #include <string.h>
4 #include <ctype.h>
5 #include <openssl/e_os2.h>
6 #include <openssl/buffer.h>
7 #include <openssl/crypto.h>
9 int main(int argc, char *argv[])
11 char *p, *q = 0, *program;
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);
36 if (!p)
37 program = BUF_strdup("(unknown)");
38 else {
39 program = OPENSSL_malloc((q - p) + 1);
40 strncpy(program, p, q - p);
41 program[q - p] = '\0';
44 for (p = program; *p; p++)
45 if (islower((unsigned char)(*p)))
46 *p = toupper((unsigned char)(*p));
48 q = strstr(program, "TEST");
49 if (q > p && q[-1] == '_')
50 q--;
51 *q = '\0';
53 printf("No %s support\n", program);
55 OPENSSL_free(program);
56 return (0);