00001 static const char code[] = "\n\
00002 global ptype pvals\n\
00003 set ptype(error) -1\n\
00004 set pvals(-1) error\n\
00005 set ptype(tcp) 0\n\
00006 set pvals(0) tcp\n\
00007 set ptype(udp) 1\n\
00008 set pvals(1) udp\n\
00009 set ptype(cbr) 2\n\
00010 set pvals(2) cbr\n\
00011 set ptype(audio) 3\n\
00012 set pvals(3) audio\n\
00013 set ptype(video) 4\n\
00014 set pvals(4) video\n\
00015 set ptype(ack) 5\n\
00016 set pvals(5) ack\n\
00017 set ptype(start) 6\n\
00018 set pvals(6) start\n\
00019 set ptype(stop) 7\n\
00020 set pvals(7) stop\n\
00021 set ptype(prune) 8\n\
00022 set pvals(8) prune\n\
00023 set ptype(graft) 9\n\
00024 set pvals(9) graft\n\
00025 set ptype(graftack) 10\n\
00026 set pvals(10) graftAck\n\
00027 set ptype(join) 11\n\
00028 set pvals(11) join\n\
00029 set ptype(assert) 12\n\
00030 set pvals(12) assert\n\
00031 set ptype(message) 13\n\
00032 set pvals(13) message\n\
00033 set ptype(rtcp) 14\n\
00034 set pvals(14) rtcp\n\
00035 set ptype(rtp) 15\n\
00036 set pvals(15) rtp\n\
00037 set ptype(rtprotodv) 16\n\
00038 set pvals(16) rtProtoDV\n\
00039 set ptype(ctrmcast_encap) 17\n\
00040 set pvals(17) CtrMcast_Encap\n\
00041 set ptype(ctrmcast_decap) 18\n\
00042 set pvals(18) CtrMcast_Decap\n\
00043 set ptype(srm) 19\n\
00044 set pvals(19) SRM\n\
00045 set ptype(sa_req) 20\n\
00046 set pvals(20) sa_req\n\
00047 set ptype(sa_accept) 21\n\
00048 set pvals(21) sa_accept\n\
00049 set ptype(sa_conf) 22\n\
00050 set pvals(22) sa_conf\n\
00051 set ptype(sa_teardown) 23\n\
00052 set pvals(23) sa_teardown\n\
00053 set ptype(live) 24\n\
00054 set pvals(24) live\n\
00055 set ptype(sa_reject) 25\n\
00056 set pvals(25) sa_reject\n\
00057 set ptype(telnet) 26\n\
00058 set pvals(26) telnet\n\
00059 set ptype(ftp) 27\n\
00060 set pvals(27) ftp\n\
00061 set ptype(pareto) 28\n\
00062 set pvals(28) pareto\n\
00063 set ptype(exp) 29\n\
00064 set pvals(29) exp\n\
00065 set ptype(httpinval) 30\n\
00066 set pvals(30) httpInval\n\
00067 set ptype(http) 31\n\
00068 set pvals(31) http\n\
00069 set ptype(encap) 32\n\
00070 set pvals(32) encap\n\
00071 set ptype(mftp) 33\n\
00072 set pvals(33) mftp\n\
00073 set ptype(arp) 34\n\
00074 set pvals(34) ARP\n\
00075 set ptype(mac) 35\n\
00076 set pvals(35) MAC\n\
00077 set ptype(tora) 36\n\
00078 set pvals(36) TORA\n\
00079 set ptype(dsr) 37\n\
00080 set pvals(37) DSR\n\
00081 set ptype(aodv) 38\n\
00082 set pvals(38) AODV\n\
00083 set ptype(imep) 39\n\
00084 set pvals(39) IMEP\n\
00085 set ptype(rap_data) 40\n\
00086 set pvals(40) rap_data\n\
00087 set ptype(rap_ack) 41\n\
00088 set pvals(41) rap_ack\n\
00089 set ptype(tcpfriend) 42\n\
00090 set pvals(42) tcpFriend\n\
00091 set ptype(tcpfriendctl) 43\n\
00092 set pvals(43) tcpFriendCtl\n\
00093 set ptype(ping) 44\n\
00094 set pvals(44) ping\n\
00095 set ptype(diffusion) 45\n\
00096 set pvals(45) diffusion\n\
00097 set ptype(rtprotols) 46\n\
00098 set pvals(46) rtProtoLS\n\
00099 set ptype(ldp) 47\n\
00100 set pvals(47) LDP\n\
00101 set ptype(gaf) 48\n\
00102 set pvals(48) gaf\n\
00103 set ptype(ra) 49\n\
00104 set pvals(49) ra\n\
00105 set ptype(pushback) 50\n\
00106 set pvals(50) pushback\n\
00107 set ptype(pgm) 51\n\
00108 set pvals(51) PGM\n\
00109 set ptype(lms) 52\n\
00110 set pvals(52) LMS\n\
00111 set ptype(lms_setup) 53\n\
00112 set pvals(53) LMS_SETUP\n\
00113 set ptype(sctp) 54\n\
00114 set pvals(54) sctp\n\
00115 set ptype(sctp_app1) 55\n\
00116 set pvals(55) sctp_app1\n\
00117 set ptype(smac) 56\n\
00118 set pvals(56) smac\n\
00119 set ptype(xcp) 57\n\
00120 set pvals(57) xcp\n\
00121 set ptype(hdlc) 58\n\
00122 set pvals(58) HDLC\n\
00123 proc ptype2val {str} {\n\
00124 global ptype\n\
00125 set str [string tolower $str]\n\
00126 if ![info exists ptype($str)] {\n\
00127 set str error\n\
00128 }\n\
00129 set ptype($str)\n\
00130 }\n\
00131 proc pval2type {val} {\n\
00132 global pvals\n\
00133 if ![info exists pvals($val)] {\n\
00134 set val -1\n\
00135 }\n\
00136 set pvals($val)\n\
00137 }\n\
00138 ";
00139 #include "config.h"
00140 EmbeddedTcl et_ns_ptypes(code);
