#include <stdio.h>#include <ctype.h>#include "packet.h"Include dependency graph for ptypes2tcl.cc:
Go to the source code of this file.
Functions | |
| void | printLine (char *s) |
| char * | lcase (const char *s) |
| int | main () |
|
|
Definition at line 30 of file ptypes2tcl.cc. Referenced by main().
00030 {
00031 static char charbuf[512];
00032 char* to = charbuf;
00033 while ((*to++ = tolower(*s++)))
00034 /* NOTHING */;
00035 *to = '\0';
00036 return charbuf;
00037 }
|
|
|
Definition at line 39 of file ptypes2tcl.cc. References lcase(), p_info::name(), packet_t, printLine(), and PT_NTYPE.
00039 {
00040 p_info pinfo;
00041
00042 #ifdef TCL2C_INT
00043 printf("static const char code[] = {\n");
00044 #else
00045 printLine("static const char code[] = \"");
00046 #endif
00047 printLine("global ptype pvals");
00048 printLine("set ptype(error) -1");
00049 printLine("set pvals(-1) error");
00050 char strbuf[512];
00051 for (int i = 0; i < PT_NTYPE; i++) {
00052 sprintf(strbuf, "set ptype(%s) %d", lcase(pinfo.name(packet_t(i))), i);
00053 printLine(strbuf);
00054 sprintf(strbuf, "set pvals(%d) %s", i, pinfo.name(packet_t(i)));
00055 printLine(strbuf);
00056 }
00057 printLine("proc ptype2val {str} {");
00058 printLine("global ptype");
00059 printLine("set str [string tolower $str]");
00060 printLine("if ![info exists ptype($str)] {");
00061 printLine("set str error");
00062 printLine("}");
00063 printLine("set ptype($str)");
00064 printLine("}");
00065 printLine("proc pval2type {val} {");
00066 printLine("global pvals");
00067 printLine("if ![info exists pvals($val)] {");
00068 printLine("set val -1");
00069 printLine("}");
00070 printLine("set pvals($val)");
00071 printLine("}");
00072 #ifdef TCL2C_INT
00073 printf("0 };\n");
00074 #else
00075 printf("\";\n");
00076 #endif
00077 printf("#include \"config.h\"\n");
00078 printf("EmbeddedTcl et_ns_ptypes(code);\n");
00079 return 0;
00080 }
|
Here is the call graph for this function:
|
|
Definition at line 16 of file ptypes2tcl.cc. Referenced by main().
00016 {
00017 #ifdef TCL2C_INT
00018 for (unsigned int i = 0; i < strlen(s); i++)
00019 if ((i > 0) && ((i % 20) == 0))
00020 printf("%u,\n", s[i]);
00021 else
00022 printf("%u,", s[i]);
00023 printf("%u,%u,\n", '\\', '\n');
00024 #else
00025 printf("%s\\n\\\n", s);
00026 #endif
00027 }
|
1.3.3