A Command Interpreter with support for used defined commands, subsystems, macros, help and parameter parsing.

Committer:
wvd_vegt
Date:
Thu Mar 24 21:40:58 2011 +0000
Revision:
16:ec8147828286
Parent:
14:c652ce068f6c
Child:
17:7e6a723d65de
Fixed some index/id mix-ups.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
wvd_vegt 6:76b033971c3c 1 /*
wvd_vegt 6:76b033971c3c 2 _____________________________________________________________________________
wvd_vegt 6:76b033971c3c 3
wvd_vegt 6:76b033971c3c 4 Project: mBed Command Interpreter
wvd_vegt 6:76b033971c3c 5 Filename: cmdb.h
wvd_vegt 6:76b033971c3c 6 Version: 0.5.0
wvd_vegt 6:76b033971c3c 7 _____________________________________________________________________________
wvd_vegt 6:76b033971c3c 8 Date Comment
wvd_vegt 6:76b033971c3c 9 -------- --------------------------------------------------------------
wvd_vegt 6:76b033971c3c 10 10022011 -Rewritten into C++ class.
wvd_vegt 6:76b033971c3c 11 -Pass Serial into constructor for printf, putc and getc.
wvd_vegt 6:76b033971c3c 12 -CID_<subsystem> must be handled internally.
wvd_vegt 6:76b033971c3c 13 -Fixed a number of old Index/Id conflicts.
wvd_vegt 6:76b033971c3c 14 -Got a working version. Much work to be done though.
wvd_vegt 6:76b033971c3c 15 -Handle CID_HELP internally (like all system commands (IDLE/MACRO etc).
wvd_vegt 14:c652ce068f6c 16 -Handle subsystems internally.
wvd_vegt 7:269c2445b8f5 17 -Removed CMD_TBL_LEN.
wvd_vegt 7:269c2445b8f5 18 -CID_LAST is now defined as CID_HELP+1.
wvd_vegt 14:c652ce068f6c 19 11022011 -Added Documentation.
wvd_vegt 7:269c2445b8f5 20 -Added code to take number limits from the C++ Runtime instead of hard defined values.
wvd_vegt 8:83edd6addbd5 21 -Renamed id to cid in cmd.
wvd_vegt 7:269c2445b8f5 22 -Added MAX_LONG and MIN_LONG (long==int on mbed).
wvd_vegt 7:269c2445b8f5 23 -Removed cmdb_ prefix from members.
wvd_vegt 8:83edd6addbd5 24 -Tested Macro Support and added it to the Demo.
wvd_vegt 9:dc9faec79298 25 -Added CID_COMMANDS.
wvd_vegt 16:ec8147828286 26 -Fixed a small bug in parse.
wvd_vegt 16:ec8147828286 27 -v0.76
wvd_vegt 16:ec8147828286 28 24032011 -Fixed some left-over bugs caused by index/id mixup.
wvd_vegt 6:76b033971c3c 29 -------- --------------------------------------------------------------
wvd_vegt 6:76b033971c3c 30 TODO's
wvd_vegt 7:269c2445b8f5 31 10022011 -Tweak and Review Documentation.
wvd_vegt 7:269c2445b8f5 32 11022011 -Check & Test **PARM masks.
wvd_vegt 7:269c2445b8f5 33 -Remove prefix from class members?
wvd_vegt 6:76b033971c3c 34 -------- --------------------------------------------------------------
wvd_vegt 6:76b033971c3c 35 _____________________________________________________________________________
wvd_vegt 6:76b033971c3c 36 */
wvd_vegt 6:76b033971c3c 37
wvd_vegt 3:abbf43fab7d5 38 #include <vector>
wvd_vegt 3:abbf43fab7d5 39 #include <stdlib.h>
wvd_vegt 3:abbf43fab7d5 40 #include <stdio.h>
wvd_vegt 3:abbf43fab7d5 41 #include <stdarg.h>
wvd_vegt 3:abbf43fab7d5 42 #include <ctype.h>
wvd_vegt 3:abbf43fab7d5 43 #include <string.h>
wvd_vegt 3:abbf43fab7d5 44
wvd_vegt 3:abbf43fab7d5 45 #include "cmdb.h"
wvd_vegt 3:abbf43fab7d5 46 #include "mbed.h"
wvd_vegt 3:abbf43fab7d5 47
wvd_vegt 7:269c2445b8f5 48 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 49
wvd_vegt 7:269c2445b8f5 50 Cmdb::Cmdb(const Serial& serial, const std::vector<cmd>& cmds, void (*callback)(Cmdb&,int)) :
wvd_vegt 7:269c2445b8f5 51 serial(serial), cmds(cmds) {
wvd_vegt 3:abbf43fab7d5 52 echo = true;
wvd_vegt 3:abbf43fab7d5 53 bold = true;
wvd_vegt 8:83edd6addbd5 54
wvd_vegt 3:abbf43fab7d5 55 subsystem = -1;
wvd_vegt 3:abbf43fab7d5 56
wvd_vegt 13:c18957fb06e4 57 user_callback = callback;
wvd_vegt 6:76b033971c3c 58
wvd_vegt 7:269c2445b8f5 59 init(true);
wvd_vegt 3:abbf43fab7d5 60 }
wvd_vegt 3:abbf43fab7d5 61
wvd_vegt 7:269c2445b8f5 62 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 63 // Public Stuff.
wvd_vegt 7:269c2445b8f5 64 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 65
wvd_vegt 7:269c2445b8f5 66 bool Cmdb::macro_hasnext() {
wvd_vegt 3:abbf43fab7d5 67 return macro_ptr!=-1 && macro_ptr<MAX_CMD_LEN && macro_buf[macro_ptr];
wvd_vegt 3:abbf43fab7d5 68 }
wvd_vegt 3:abbf43fab7d5 69
wvd_vegt 7:269c2445b8f5 70 char Cmdb::macro_next() {
wvd_vegt 3:abbf43fab7d5 71 char ch = macro_buf[macro_ptr++];
wvd_vegt 6:76b033971c3c 72
wvd_vegt 3:abbf43fab7d5 73 if (macro_ptr==MAX_CMD_LEN) {
wvd_vegt 7:269c2445b8f5 74 macro_reset();
wvd_vegt 3:abbf43fab7d5 75 }
wvd_vegt 6:76b033971c3c 76
wvd_vegt 8:83edd6addbd5 77 //Translate Special Characters Back
wvd_vegt 8:83edd6addbd5 78 switch (ch) {
wvd_vegt 8:83edd6addbd5 79 case '|':
wvd_vegt 8:83edd6addbd5 80 return cr;
wvd_vegt 8:83edd6addbd5 81 case '_':
wvd_vegt 8:83edd6addbd5 82 return sp;
wvd_vegt 8:83edd6addbd5 83 default:
wvd_vegt 8:83edd6addbd5 84 return ch;
wvd_vegt 8:83edd6addbd5 85 }
wvd_vegt 3:abbf43fab7d5 86 }
wvd_vegt 3:abbf43fab7d5 87
wvd_vegt 7:269c2445b8f5 88 char Cmdb::macro_peek() {
wvd_vegt 3:abbf43fab7d5 89 return macro_buf[macro_ptr];
wvd_vegt 3:abbf43fab7d5 90 }
wvd_vegt 3:abbf43fab7d5 91
wvd_vegt 7:269c2445b8f5 92 void Cmdb::macro_reset() {
wvd_vegt 3:abbf43fab7d5 93 macro_ptr = -1;
wvd_vegt 3:abbf43fab7d5 94 macro_buf[0] = '\0';
wvd_vegt 3:abbf43fab7d5 95 }
wvd_vegt 3:abbf43fab7d5 96
wvd_vegt 7:269c2445b8f5 97 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 98
wvd_vegt 7:269c2445b8f5 99 bool Cmdb::hasnext() {
wvd_vegt 7:269c2445b8f5 100 return serial.readable()==1;
wvd_vegt 7:269c2445b8f5 101 }
wvd_vegt 7:269c2445b8f5 102
wvd_vegt 7:269c2445b8f5 103 char Cmdb::next() {
wvd_vegt 7:269c2445b8f5 104 return serial.getc();
wvd_vegt 3:abbf43fab7d5 105 }
wvd_vegt 3:abbf43fab7d5 106
wvd_vegt 7:269c2445b8f5 107 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 108
wvd_vegt 7:269c2445b8f5 109 bool Cmdb::scan(const char c) {
wvd_vegt 7:269c2445b8f5 110 int i;
wvd_vegt 7:269c2445b8f5 111
wvd_vegt 7:269c2445b8f5 112 //See http://www.interfacebus.com/ASCII_Table.html
wvd_vegt 7:269c2445b8f5 113
wvd_vegt 7:269c2445b8f5 114 if (c == '\r') { // cr?
wvd_vegt 7:269c2445b8f5 115 print(crlf); // Output it and ...
wvd_vegt 7:269c2445b8f5 116 if (cmdndx) {
wvd_vegt 7:269c2445b8f5 117 strncpy(lstbuf,cmdbuf,cmdndx);
wvd_vegt 7:269c2445b8f5 118 lstbuf[cmdndx]='\0';
wvd_vegt 7:269c2445b8f5 119
wvd_vegt 7:269c2445b8f5 120 cmd_dispatcher(cmdbuf);
wvd_vegt 7:269c2445b8f5 121 }
wvd_vegt 7:269c2445b8f5 122 init(false);
wvd_vegt 7:269c2445b8f5 123 prompt();
wvd_vegt 7:269c2445b8f5 124
wvd_vegt 7:269c2445b8f5 125 return true;
wvd_vegt 7:269c2445b8f5 126 }
wvd_vegt 7:269c2445b8f5 127
wvd_vegt 7:269c2445b8f5 128 //TODO BACKSPACE NOT CORRECT FOR TELNET!
wvd_vegt 7:269c2445b8f5 129
wvd_vegt 7:269c2445b8f5 130 if (c == '\b') { // Backspace
wvd_vegt 7:269c2445b8f5 131 if (cmdndx != 0) {
wvd_vegt 7:269c2445b8f5 132 print(bs);
wvd_vegt 7:269c2445b8f5 133 cmdbuf [--cmdndx] = '\0';
wvd_vegt 7:269c2445b8f5 134 } else {
wvd_vegt 7:269c2445b8f5 135 printch(bell); // Output Error
wvd_vegt 7:269c2445b8f5 136 }
wvd_vegt 7:269c2445b8f5 137 return false;
wvd_vegt 7:269c2445b8f5 138 }
wvd_vegt 7:269c2445b8f5 139
wvd_vegt 7:269c2445b8f5 140 if (c == '\177') { // Delete
wvd_vegt 7:269c2445b8f5 141 while (cmdndx>0) {
wvd_vegt 7:269c2445b8f5 142 print(bs);
wvd_vegt 7:269c2445b8f5 143 cmdbuf [--cmdndx] = '\0';
wvd_vegt 7:269c2445b8f5 144 }
wvd_vegt 7:269c2445b8f5 145 return false;
wvd_vegt 7:269c2445b8f5 146 }
wvd_vegt 7:269c2445b8f5 147
wvd_vegt 7:269c2445b8f5 148 //Reset Escape Buffer.
wvd_vegt 7:269c2445b8f5 149 if (c == '\033') {
wvd_vegt 7:269c2445b8f5 150 if (escndx!=0) {
wvd_vegt 7:269c2445b8f5 151 //_putchar(bell); // Output Error
wvd_vegt 7:269c2445b8f5 152 //printf("%s\r\n",escbuf);
wvd_vegt 7:269c2445b8f5 153 }
wvd_vegt 7:269c2445b8f5 154 escndx = 0;
wvd_vegt 7:269c2445b8f5 155 escbuf [escndx] = '\0'; // NULL-Terminate buffer
wvd_vegt 7:269c2445b8f5 156 }
wvd_vegt 7:269c2445b8f5 157
wvd_vegt 7:269c2445b8f5 158 //Extract Escape Sequence.
wvd_vegt 7:269c2445b8f5 159 if (c == '\033' || escndx ) { // Wait for escape
wvd_vegt 7:269c2445b8f5 160 escbuf [escndx++] = (unsigned char) c; // Add to the buffer
wvd_vegt 7:269c2445b8f5 161 escbuf [escndx] = '\0'; // NULL-Terminate buffer
wvd_vegt 7:269c2445b8f5 162 if (isalpha(c)) {
wvd_vegt 7:269c2445b8f5 163 switch (escid_search(escbuf)) {
wvd_vegt 7:269c2445b8f5 164 case EID_CURSOR_LEFT : {
wvd_vegt 7:269c2445b8f5 165 if (cmdndx != 0) { // Backspace?
wvd_vegt 7:269c2445b8f5 166 print(bs);
wvd_vegt 7:269c2445b8f5 167 cmdbuf [--cmdndx] = '\0';
wvd_vegt 7:269c2445b8f5 168 } else {
wvd_vegt 7:269c2445b8f5 169 printch(bell); // Output char
wvd_vegt 7:269c2445b8f5 170 }
wvd_vegt 7:269c2445b8f5 171 break;
wvd_vegt 7:269c2445b8f5 172 }
wvd_vegt 7:269c2445b8f5 173 case EID_CURSOR_UP : {
wvd_vegt 7:269c2445b8f5 174 for (i=0;i<cmdndx;i++) {
wvd_vegt 7:269c2445b8f5 175 print(bs);
wvd_vegt 7:269c2445b8f5 176 }
wvd_vegt 7:269c2445b8f5 177 cmdndx=strlen(lstbuf);
wvd_vegt 7:269c2445b8f5 178 strncpy(cmdbuf,lstbuf,cmdndx);
wvd_vegt 7:269c2445b8f5 179 cmdbuf[cmdndx]='\0';
wvd_vegt 7:269c2445b8f5 180 printf("%s",cmdbuf);
wvd_vegt 7:269c2445b8f5 181 break;
wvd_vegt 7:269c2445b8f5 182 }
wvd_vegt 7:269c2445b8f5 183 case EID_CURSOR_RIGHT:
wvd_vegt 7:269c2445b8f5 184 break;
wvd_vegt 7:269c2445b8f5 185 case EID_CURSOR_DOWN :
wvd_vegt 7:269c2445b8f5 186 break;
wvd_vegt 7:269c2445b8f5 187 case EID_LAST :
wvd_vegt 7:269c2445b8f5 188 break;
wvd_vegt 7:269c2445b8f5 189 default :
wvd_vegt 7:269c2445b8f5 190 printch(bell);
wvd_vegt 7:269c2445b8f5 191 break;
wvd_vegt 7:269c2445b8f5 192 }
wvd_vegt 7:269c2445b8f5 193 escndx=0;
wvd_vegt 7:269c2445b8f5 194 escbuf [escndx] = '\0'; // NULL-Terminate buffer
wvd_vegt 7:269c2445b8f5 195 }
wvd_vegt 7:269c2445b8f5 196 return false;
wvd_vegt 7:269c2445b8f5 197 }
wvd_vegt 7:269c2445b8f5 198
wvd_vegt 7:269c2445b8f5 199 if (c=='\n') { // LF
wvd_vegt 7:269c2445b8f5 200 return false; // Dump it
wvd_vegt 7:269c2445b8f5 201 }
wvd_vegt 7:269c2445b8f5 202
wvd_vegt 7:269c2445b8f5 203 if (!isprint (c)) { // Printable character?
wvd_vegt 7:269c2445b8f5 204 printch(bell);
wvd_vegt 7:269c2445b8f5 205 return false;
wvd_vegt 7:269c2445b8f5 206 }
wvd_vegt 7:269c2445b8f5 207
wvd_vegt 7:269c2445b8f5 208 if (cmdndx >= MAX_CMD_LEN) { // Past buffer length?
wvd_vegt 7:269c2445b8f5 209 printch(bell);
wvd_vegt 7:269c2445b8f5 210 return false;
wvd_vegt 7:269c2445b8f5 211 }
wvd_vegt 7:269c2445b8f5 212
wvd_vegt 7:269c2445b8f5 213 cmdbuf [cmdndx++] = (unsigned char) c; // Add to the buffer
wvd_vegt 7:269c2445b8f5 214 cmdbuf [cmdndx] = '\0'; // NULL-Terminate buffer
wvd_vegt 7:269c2445b8f5 215
wvd_vegt 7:269c2445b8f5 216 if (echo) {
wvd_vegt 7:269c2445b8f5 217 printch(c); // Output char
wvd_vegt 7:269c2445b8f5 218 }
wvd_vegt 7:269c2445b8f5 219
wvd_vegt 7:269c2445b8f5 220 return false;
wvd_vegt 3:abbf43fab7d5 221 }
wvd_vegt 3:abbf43fab7d5 222
wvd_vegt 7:269c2445b8f5 223 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 224
wvd_vegt 7:269c2445b8f5 225 int Cmdb::printf(const char *format, ...) {
wvd_vegt 7:269c2445b8f5 226 int cnt;
wvd_vegt 7:269c2445b8f5 227
wvd_vegt 7:269c2445b8f5 228 va_list args;
wvd_vegt 7:269c2445b8f5 229 char buf[1024];
wvd_vegt 7:269c2445b8f5 230
wvd_vegt 7:269c2445b8f5 231 memset(buf,'\0',sizeof(buf));
wvd_vegt 7:269c2445b8f5 232
wvd_vegt 7:269c2445b8f5 233 va_start(args, format);
wvd_vegt 7:269c2445b8f5 234 cnt = vsnprintf(buf, sizeof(buf), format, args);
wvd_vegt 7:269c2445b8f5 235 if (cnt==-1) {
wvd_vegt 7:269c2445b8f5 236 //Error
wvd_vegt 7:269c2445b8f5 237 }
wvd_vegt 7:269c2445b8f5 238 va_end(args);
wvd_vegt 7:269c2445b8f5 239
wvd_vegt 7:269c2445b8f5 240 return print(buf);
wvd_vegt 7:269c2445b8f5 241 }
wvd_vegt 7:269c2445b8f5 242
wvd_vegt 7:269c2445b8f5 243 int Cmdb::print(const char *msg) {
wvd_vegt 7:269c2445b8f5 244 return serial.printf(msg);
wvd_vegt 7:269c2445b8f5 245 }
wvd_vegt 7:269c2445b8f5 246
wvd_vegt 7:269c2445b8f5 247 char Cmdb::printch(const char ch) {
wvd_vegt 7:269c2445b8f5 248 return serial.putc(ch);
wvd_vegt 7:269c2445b8f5 249 }
wvd_vegt 3:abbf43fab7d5 250
wvd_vegt 7:269c2445b8f5 251 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 252
wvd_vegt 7:269c2445b8f5 253 void Cmdb::init(const char full) {
wvd_vegt 7:269c2445b8f5 254 if (full) {
wvd_vegt 7:269c2445b8f5 255 echo = true;
wvd_vegt 7:269c2445b8f5 256 bold = true;
wvd_vegt 7:269c2445b8f5 257
wvd_vegt 7:269c2445b8f5 258 subsystem = -1;
wvd_vegt 7:269c2445b8f5 259
wvd_vegt 7:269c2445b8f5 260 lstbuf [cmdndx] = '\0';
wvd_vegt 7:269c2445b8f5 261
wvd_vegt 7:269c2445b8f5 262 macro_reset();
wvd_vegt 7:269c2445b8f5 263
wvd_vegt 7:269c2445b8f5 264 prompt();
wvd_vegt 7:269c2445b8f5 265 }
wvd_vegt 7:269c2445b8f5 266
wvd_vegt 7:269c2445b8f5 267 cmdndx = 0;
wvd_vegt 7:269c2445b8f5 268 cmdbuf [cmdndx] = '\0';
wvd_vegt 7:269c2445b8f5 269
wvd_vegt 7:269c2445b8f5 270 escndx = 0;
wvd_vegt 7:269c2445b8f5 271 escbuf [escndx] = '\0';
wvd_vegt 7:269c2445b8f5 272 }
wvd_vegt 7:269c2445b8f5 273
wvd_vegt 7:269c2445b8f5 274 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 275 //Private Stuff.
wvd_vegt 7:269c2445b8f5 276 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 277
wvd_vegt 7:269c2445b8f5 278 int Cmdb::escid_search(char *escstr) {
wvd_vegt 3:abbf43fab7d5 279 for (int i=0; i<ESC_TBL_LEN; i++) {
wvd_vegt 3:abbf43fab7d5 280 if (strcmp (esc_tbl[i].escstr, escstr) == 0)
wvd_vegt 3:abbf43fab7d5 281 return (esc_tbl[i].id);
wvd_vegt 3:abbf43fab7d5 282 }
wvd_vegt 3:abbf43fab7d5 283
wvd_vegt 3:abbf43fab7d5 284 return (EID_LAST);
wvd_vegt 3:abbf43fab7d5 285 }
wvd_vegt 3:abbf43fab7d5 286
wvd_vegt 7:269c2445b8f5 287 int Cmdb::cmdid_search(char *cmdstr) {
wvd_vegt 3:abbf43fab7d5 288 //Warning, we return the ID but somewhere assume it's equal to the array index!
wvd_vegt 7:269c2445b8f5 289 for (int i=0; i<cmds.size(); i++) {
wvd_vegt 7:269c2445b8f5 290 if ((stricmp(cmds[i].cmdstr, cmdstr) == 0) && ((cmds[i].subs == subsystem) || (cmds[i].subs<0)))
wvd_vegt 7:269c2445b8f5 291 return (cmds[i].cid);
wvd_vegt 3:abbf43fab7d5 292 }
wvd_vegt 3:abbf43fab7d5 293
wvd_vegt 6:76b033971c3c 294 return CID_LAST;
wvd_vegt 3:abbf43fab7d5 295 }
wvd_vegt 3:abbf43fab7d5 296
wvd_vegt 7:269c2445b8f5 297 int Cmdb::cmdid_index(int cmdid) {
wvd_vegt 7:269c2445b8f5 298 for (int i=0; i<cmds.size(); i++) {
wvd_vegt 7:269c2445b8f5 299 if (cmds[i].cid==cmdid)
wvd_vegt 3:abbf43fab7d5 300 return i;
wvd_vegt 3:abbf43fab7d5 301 }
wvd_vegt 3:abbf43fab7d5 302
wvd_vegt 3:abbf43fab7d5 303 return -1;
wvd_vegt 3:abbf43fab7d5 304 }
wvd_vegt 3:abbf43fab7d5 305
wvd_vegt 7:269c2445b8f5 306 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 307
wvd_vegt 7:269c2445b8f5 308 int Cmdb::parse(char *cmd) {
wvd_vegt 3:abbf43fab7d5 309 //Command
wvd_vegt 3:abbf43fab7d5 310 char cmdstr_buf [1 + MAX_CMD_LEN];
wvd_vegt 3:abbf43fab7d5 311
wvd_vegt 3:abbf43fab7d5 312 //Parameters
wvd_vegt 3:abbf43fab7d5 313 char argstr_buf [1 + MAX_CMD_LEN];
wvd_vegt 3:abbf43fab7d5 314 char *argsep;
wvd_vegt 3:abbf43fab7d5 315
wvd_vegt 3:abbf43fab7d5 316 char prmstr_buf [1 + MAX_CMD_LEN]; //copy of sscanf pattern
wvd_vegt 3:abbf43fab7d5 317 char *tok; //current token
wvd_vegt 3:abbf43fab7d5 318 void *toks[MAX_ARGS]; //pointers to string tokens IN commandline (argstr_buf)
wvd_vegt 3:abbf43fab7d5 319 char *prms[MAX_ARGS]; //patterns IN copy of sscanf string (*parms)
wvd_vegt 3:abbf43fab7d5 320
wvd_vegt 3:abbf43fab7d5 321 char typ = '\0'; //Var type
wvd_vegt 3:abbf43fab7d5 322 char mod = '\0'; //Var modifier (for cardinal types)
wvd_vegt 3:abbf43fab7d5 323 unsigned int base; //Var number base (8,10,16)
wvd_vegt 3:abbf43fab7d5 324 //unsigned int bytes; //Var size in bytes (used for malloc)
wvd_vegt 3:abbf43fab7d5 325
wvd_vegt 3:abbf43fab7d5 326 float f; //Temp var for conversion, 4 bytes
wvd_vegt 3:abbf43fab7d5 327 //unsigned char b; //Temp var for conversion, 1 byte
wvd_vegt 3:abbf43fab7d5 328 //char c; //Temp var for conversion, 1 byte
wvd_vegt 3:abbf43fab7d5 329 //short h; //Temp var for conversion, 2 bytes
wvd_vegt 3:abbf43fab7d5 330 //int k; //Temp var for conversion, 2 bytes
wvd_vegt 3:abbf43fab7d5 331 long l; //Temp var for conversion, 4 bytes
wvd_vegt 3:abbf43fab7d5 332
wvd_vegt 3:abbf43fab7d5 333 char* endptr; //strtoXX() Error detection
wvd_vegt 3:abbf43fab7d5 334
wvd_vegt 6:76b033971c3c 335 int cid = -1; //Signals empty string...
wvd_vegt 6:76b033971c3c 336 int ndx = -1;
wvd_vegt 3:abbf43fab7d5 337
wvd_vegt 3:abbf43fab7d5 338 //Init (global) variables.
wvd_vegt 3:abbf43fab7d5 339 argfnd=0;
wvd_vegt 3:abbf43fab7d5 340 argcnt=0;
wvd_vegt 3:abbf43fab7d5 341 error =0;
wvd_vegt 3:abbf43fab7d5 342
wvd_vegt 3:abbf43fab7d5 343 //Zero the two string buffers for splitting cmd string into.
wvd_vegt 3:abbf43fab7d5 344 zeromemory((char*)cmdstr_buf,sizeof(cmdstr_buf));
wvd_vegt 3:abbf43fab7d5 345 zeromemory(argstr_buf,sizeof(argstr_buf));
wvd_vegt 3:abbf43fab7d5 346
wvd_vegt 3:abbf43fab7d5 347 //Make it worse in Lint
wvd_vegt 6:76b033971c3c 348 for (int i=0;i<MAX_ARGS;i++) {
wvd_vegt 3:abbf43fab7d5 349 parms[i].type=PARM_UNUSED;
wvd_vegt 3:abbf43fab7d5 350 zeromemory((char*)&(parms[i].val),sizeof(parms[i].val));
wvd_vegt 3:abbf43fab7d5 351 }
wvd_vegt 3:abbf43fab7d5 352
wvd_vegt 3:abbf43fab7d5 353 /*------------------------------------------------
wvd_vegt 3:abbf43fab7d5 354 First, copy the command and convert it to all
wvd_vegt 3:abbf43fab7d5 355 uppercase.
wvd_vegt 3:abbf43fab7d5 356 ------------------------------------------------*/
wvd_vegt 3:abbf43fab7d5 357
wvd_vegt 3:abbf43fab7d5 358 strncpy(cmdstr_buf, cmd, sizeof (cmdstr_buf) - 1);
wvd_vegt 3:abbf43fab7d5 359 cmdstr_buf [sizeof (cmdstr_buf) - 1] = '\0';
wvd_vegt 3:abbf43fab7d5 360
wvd_vegt 3:abbf43fab7d5 361 /*------------------------------------------------
wvd_vegt 3:abbf43fab7d5 362 Next, find the end of the first thing in the
wvd_vegt 3:abbf43fab7d5 363 buffer. Since the command ends with a space,
wvd_vegt 3:abbf43fab7d5 364 we'll look for that. NULL-Terminate the command
wvd_vegt 3:abbf43fab7d5 365 and keep a pointer to the arguments.
wvd_vegt 3:abbf43fab7d5 366 ------------------------------------------------*/
wvd_vegt 3:abbf43fab7d5 367
wvd_vegt 3:abbf43fab7d5 368 argsep = strchr(cmdstr_buf, ' ');
wvd_vegt 3:abbf43fab7d5 369
wvd_vegt 3:abbf43fab7d5 370 if (argsep == NULL) {
wvd_vegt 3:abbf43fab7d5 371 argstr_buf [0] = '\0';
wvd_vegt 3:abbf43fab7d5 372 } else {
wvd_vegt 3:abbf43fab7d5 373 strcpy (argstr_buf, argsep + 1);
wvd_vegt 3:abbf43fab7d5 374 *argsep = '\0';
wvd_vegt 3:abbf43fab7d5 375 }
wvd_vegt 3:abbf43fab7d5 376
wvd_vegt 3:abbf43fab7d5 377 /*------------------------------------------------
wvd_vegt 6:76b033971c3c 378 Search for a command ID, then switch on it.
wvd_vegt 3:abbf43fab7d5 379 ------------------------------------------------*/
wvd_vegt 3:abbf43fab7d5 380
wvd_vegt 3:abbf43fab7d5 381 //1) Find the Command Id
wvd_vegt 7:269c2445b8f5 382 cid = cmdid_search(cmdstr_buf);
wvd_vegt 3:abbf43fab7d5 383
wvd_vegt 6:76b033971c3c 384 if (cid!=CID_LAST) {
wvd_vegt 3:abbf43fab7d5 385 //2) Tokenize a copy of the parms from the cmd_tbl.
wvd_vegt 3:abbf43fab7d5 386
wvd_vegt 7:269c2445b8f5 387 ndx = cmdid_index(cid);
wvd_vegt 6:76b033971c3c 388
wvd_vegt 3:abbf43fab7d5 389 //Get Format patterns from cmd_tbl[id].parms.
wvd_vegt 7:269c2445b8f5 390 //note: strtok inserts \0 into the original string. Hence the copy.
wvd_vegt 3:abbf43fab7d5 391 zeromemory((char *)(&prmstr_buf),sizeof(prmstr_buf));
wvd_vegt 3:abbf43fab7d5 392
wvd_vegt 7:269c2445b8f5 393 strncpy (prmstr_buf, cmds[ndx].parms, sizeof (prmstr_buf) - 1);
wvd_vegt 3:abbf43fab7d5 394
wvd_vegt 3:abbf43fab7d5 395 argcnt=0;
wvd_vegt 3:abbf43fab7d5 396 tok = strtok(prmstr_buf, " ");
wvd_vegt 3:abbf43fab7d5 397 while (tok != NULL) {
wvd_vegt 3:abbf43fab7d5 398 //Store Pointers
wvd_vegt 3:abbf43fab7d5 399 prms[argcnt++] = tok;
wvd_vegt 3:abbf43fab7d5 400
wvd_vegt 7:269c2445b8f5 401 //printf("prm_%2.2d='%s'\r\n",argcnt, tok);
wvd_vegt 3:abbf43fab7d5 402
wvd_vegt 3:abbf43fab7d5 403 tok = strtok(NULL, " ");
wvd_vegt 3:abbf43fab7d5 404 }
wvd_vegt 3:abbf43fab7d5 405
wvd_vegt 3:abbf43fab7d5 406 //3) Tokenize the commandline.
wvd_vegt 3:abbf43fab7d5 407
wvd_vegt 3:abbf43fab7d5 408 //Get Tokens from arguments.
wvd_vegt 3:abbf43fab7d5 409 //Note: strtok inserts \0 into the original string. Won't harm here as we do not re-use it.
wvd_vegt 3:abbf43fab7d5 410
wvd_vegt 3:abbf43fab7d5 411 argfnd=0;
wvd_vegt 3:abbf43fab7d5 412
wvd_vegt 3:abbf43fab7d5 413 if (strlen(argstr_buf)!=0) {
wvd_vegt 3:abbf43fab7d5 414 tok = strtok(argstr_buf, " ");
wvd_vegt 3:abbf43fab7d5 415 } else {
wvd_vegt 3:abbf43fab7d5 416 tok=NULL;
wvd_vegt 3:abbf43fab7d5 417 }
wvd_vegt 3:abbf43fab7d5 418
wvd_vegt 3:abbf43fab7d5 419 while (tok != NULL) {
wvd_vegt 3:abbf43fab7d5 420 //Store Pointers
wvd_vegt 3:abbf43fab7d5 421 toks[argfnd++]=tok;
wvd_vegt 3:abbf43fab7d5 422
wvd_vegt 7:269c2445b8f5 423 //printf("tok_%2.2d='%s'\r\n",argfnd, tok);
wvd_vegt 3:abbf43fab7d5 424
wvd_vegt 3:abbf43fab7d5 425 tok = strtok(NULL, " ");
wvd_vegt 3:abbf43fab7d5 426 }
wvd_vegt 3:abbf43fab7d5 427
wvd_vegt 6:76b033971c3c 428 if (argfnd==argcnt || (cid==CID_HELP && argfnd==0)) {
wvd_vegt 3:abbf43fab7d5 429
wvd_vegt 3:abbf43fab7d5 430 error = 0;
wvd_vegt 3:abbf43fab7d5 431
wvd_vegt 6:76b033971c3c 432 for (int i=0;i<argcnt;i++) {
wvd_vegt 7:269c2445b8f5 433 //printf("prm_%2.2d=%s\r\n",i, prms[i]);
wvd_vegt 3:abbf43fab7d5 434
wvd_vegt 3:abbf43fab7d5 435 switch (strlen(prms[i])) {
wvd_vegt 3:abbf43fab7d5 436 case 0:
wvd_vegt 3:abbf43fab7d5 437 break;
wvd_vegt 3:abbf43fab7d5 438 case 1:
wvd_vegt 3:abbf43fab7d5 439 break;
wvd_vegt 3:abbf43fab7d5 440 case 2: //Simple pattern, no modifier
wvd_vegt 3:abbf43fab7d5 441 mod='\0';
wvd_vegt 3:abbf43fab7d5 442 typ=prms[i][1];
wvd_vegt 3:abbf43fab7d5 443
wvd_vegt 3:abbf43fab7d5 444 break;
wvd_vegt 3:abbf43fab7d5 445 case 3: //pattern with Modifier.
wvd_vegt 3:abbf43fab7d5 446 mod=prms[i][1];
wvd_vegt 3:abbf43fab7d5 447 typ=prms[i][2];
wvd_vegt 3:abbf43fab7d5 448
wvd_vegt 3:abbf43fab7d5 449 break;
wvd_vegt 3:abbf43fab7d5 450 default:
wvd_vegt 3:abbf43fab7d5 451 break;
wvd_vegt 3:abbf43fab7d5 452 }
wvd_vegt 3:abbf43fab7d5 453
wvd_vegt 3:abbf43fab7d5 454 switch (typ) {
wvd_vegt 3:abbf43fab7d5 455 case 'o' :
wvd_vegt 3:abbf43fab7d5 456 base=8;
wvd_vegt 3:abbf43fab7d5 457 break;
wvd_vegt 3:abbf43fab7d5 458 case 'x' :
wvd_vegt 3:abbf43fab7d5 459 base=16;
wvd_vegt 3:abbf43fab7d5 460 break;
wvd_vegt 3:abbf43fab7d5 461 default:
wvd_vegt 3:abbf43fab7d5 462 base=10;
wvd_vegt 3:abbf43fab7d5 463 break;
wvd_vegt 3:abbf43fab7d5 464 }
wvd_vegt 3:abbf43fab7d5 465
wvd_vegt 3:abbf43fab7d5 466 endptr = (char*)toks[i];
wvd_vegt 3:abbf43fab7d5 467
wvd_vegt 3:abbf43fab7d5 468 //Cardinal Types
wvd_vegt 3:abbf43fab7d5 469 switch (typ) {
wvd_vegt 3:abbf43fab7d5 470 case 'd' : //Check mod
wvd_vegt 3:abbf43fab7d5 471 case 'i' : //Check mod
wvd_vegt 3:abbf43fab7d5 472 case 'u' : //Check mod
wvd_vegt 3:abbf43fab7d5 473 case 'o' : //Check mod
wvd_vegt 3:abbf43fab7d5 474 case 'x' : //Check mod
wvd_vegt 3:abbf43fab7d5 475 switch (mod) {
wvd_vegt 3:abbf43fab7d5 476 case 'b' : //char
wvd_vegt 3:abbf43fab7d5 477 //test range
wvd_vegt 3:abbf43fab7d5 478 l=strtol((char*)toks[i], &endptr, base);
wvd_vegt 3:abbf43fab7d5 479 if (l>=MIN_BYTE && l<=MAX_BYTE) {
wvd_vegt 3:abbf43fab7d5 480 parms[i].type=PARM_CHAR;
wvd_vegt 3:abbf43fab7d5 481 parms[i].val.uc =(unsigned char)l;
wvd_vegt 3:abbf43fab7d5 482 } else {
wvd_vegt 3:abbf43fab7d5 483 error = i+1;
wvd_vegt 3:abbf43fab7d5 484 }
wvd_vegt 3:abbf43fab7d5 485
wvd_vegt 3:abbf43fab7d5 486 break;
wvd_vegt 3:abbf43fab7d5 487 case 'h' : //short
wvd_vegt 3:abbf43fab7d5 488 l=strtol((char*)toks[i], &endptr, base);
wvd_vegt 3:abbf43fab7d5 489 if (l>=MIN_SHORT && l<=MAX_SHORT) {
wvd_vegt 3:abbf43fab7d5 490 parms[i].type=PARM_SHORT;
wvd_vegt 3:abbf43fab7d5 491 parms[i].val.w=(short)l;
wvd_vegt 3:abbf43fab7d5 492 } else {
wvd_vegt 3:abbf43fab7d5 493 error = i+1;
wvd_vegt 3:abbf43fab7d5 494 }
wvd_vegt 3:abbf43fab7d5 495
wvd_vegt 3:abbf43fab7d5 496 break;
wvd_vegt 3:abbf43fab7d5 497 case 'l' : //long
wvd_vegt 3:abbf43fab7d5 498 l=strtol((char*)toks[i], &endptr, base);
wvd_vegt 3:abbf43fab7d5 499 parms[i].type=PARM_LONG;
wvd_vegt 3:abbf43fab7d5 500 parms[i].val.l=l;
wvd_vegt 3:abbf43fab7d5 501
wvd_vegt 3:abbf43fab7d5 502 break;
wvd_vegt 7:269c2445b8f5 503 default: //int
wvd_vegt 3:abbf43fab7d5 504 l=strtol((char*)toks[i], &endptr, base);
wvd_vegt 3:abbf43fab7d5 505 if (l>=MIN_INT && l<=MAX_INT) {
wvd_vegt 3:abbf43fab7d5 506 parms[i].type=PARM_INT;
wvd_vegt 3:abbf43fab7d5 507 parms[i].val.l=(int)l;
wvd_vegt 3:abbf43fab7d5 508 } else {
wvd_vegt 3:abbf43fab7d5 509 error = i+1;
wvd_vegt 3:abbf43fab7d5 510 }
wvd_vegt 3:abbf43fab7d5 511 break;
wvd_vegt 3:abbf43fab7d5 512 }
wvd_vegt 3:abbf43fab7d5 513
wvd_vegt 3:abbf43fab7d5 514 if (error==0 &&
wvd_vegt 3:abbf43fab7d5 515 (endptr==toks[i] //No Conversion at all.
wvd_vegt 3:abbf43fab7d5 516 || *endptr)) { //Incomplete conversion.
wvd_vegt 3:abbf43fab7d5 517 error = i+1;
wvd_vegt 3:abbf43fab7d5 518 }
wvd_vegt 3:abbf43fab7d5 519
wvd_vegt 3:abbf43fab7d5 520 break;
wvd_vegt 3:abbf43fab7d5 521 }
wvd_vegt 3:abbf43fab7d5 522
wvd_vegt 3:abbf43fab7d5 523 //Floating Point Types
wvd_vegt 3:abbf43fab7d5 524 switch (typ) {
wvd_vegt 3:abbf43fab7d5 525 case 'e' :
wvd_vegt 3:abbf43fab7d5 526 case 'f' :
wvd_vegt 3:abbf43fab7d5 527 case 'g' :
wvd_vegt 3:abbf43fab7d5 528 f = strtod((char*)toks[i], &endptr);
wvd_vegt 3:abbf43fab7d5 529
wvd_vegt 3:abbf43fab7d5 530 parms[i].type=PARM_FLOAT;
wvd_vegt 3:abbf43fab7d5 531 parms[i].val.f=f;
wvd_vegt 3:abbf43fab7d5 532
wvd_vegt 3:abbf43fab7d5 533 if (error==0 &&
wvd_vegt 3:abbf43fab7d5 534 (endptr==toks[i] //No Conversion at all.
wvd_vegt 3:abbf43fab7d5 535 || *endptr)) { //Incomplete conversion.
wvd_vegt 3:abbf43fab7d5 536 error = i;
wvd_vegt 3:abbf43fab7d5 537 }
wvd_vegt 3:abbf43fab7d5 538
wvd_vegt 3:abbf43fab7d5 539 break;
wvd_vegt 3:abbf43fab7d5 540 }
wvd_vegt 3:abbf43fab7d5 541
wvd_vegt 3:abbf43fab7d5 542 //String types
wvd_vegt 3:abbf43fab7d5 543 switch (typ) {
wvd_vegt 3:abbf43fab7d5 544 case 'c' :
wvd_vegt 3:abbf43fab7d5 545 parms[i].type=PARM_CHAR;
wvd_vegt 3:abbf43fab7d5 546 parms[i].val.c=((char*)toks[i])[0];
wvd_vegt 3:abbf43fab7d5 547
wvd_vegt 3:abbf43fab7d5 548 if (error==0 && strlen((char*)toks[i])!=1) { //Incomplete conversion.
wvd_vegt 3:abbf43fab7d5 549 error = i;
wvd_vegt 3:abbf43fab7d5 550 }
wvd_vegt 3:abbf43fab7d5 551
wvd_vegt 3:abbf43fab7d5 552 break;
wvd_vegt 3:abbf43fab7d5 553
wvd_vegt 3:abbf43fab7d5 554 case 's' :
wvd_vegt 3:abbf43fab7d5 555 parms[i].type=PARM_STRING;
wvd_vegt 3:abbf43fab7d5 556 strncpy(parms[i].val.s,(char*)toks[i], strlen((char*)toks[i]));
wvd_vegt 3:abbf43fab7d5 557
wvd_vegt 3:abbf43fab7d5 558 break;
wvd_vegt 3:abbf43fab7d5 559 }
wvd_vegt 3:abbf43fab7d5 560 }
wvd_vegt 3:abbf43fab7d5 561 } else {
wvd_vegt 14:c652ce068f6c 562 //cid=CID_LAST;
wvd_vegt 3:abbf43fab7d5 563 }
wvd_vegt 3:abbf43fab7d5 564 }
wvd_vegt 3:abbf43fab7d5 565
wvd_vegt 6:76b033971c3c 566 return cid;
wvd_vegt 3:abbf43fab7d5 567 }
wvd_vegt 3:abbf43fab7d5 568
wvd_vegt 7:269c2445b8f5 569 //------------------------------------------------------------------------------
wvd_vegt 7:269c2445b8f5 570
wvd_vegt 7:269c2445b8f5 571 void Cmdb::cmd_dispatcher(char *cmd) {
wvd_vegt 3:abbf43fab7d5 572 int cid;
wvd_vegt 3:abbf43fab7d5 573 int ndx;
wvd_vegt 3:abbf43fab7d5 574
wvd_vegt 7:269c2445b8f5 575 cid = parse(cmd);
wvd_vegt 7:269c2445b8f5 576 ndx = cmdid_index(cid);
wvd_vegt 3:abbf43fab7d5 577
wvd_vegt 3:abbf43fab7d5 578 if (cid!=-1) {
wvd_vegt 7:269c2445b8f5 579 //printf("cmds[%d]=%d\r\n",ndx, cid);
wvd_vegt 3:abbf43fab7d5 580
wvd_vegt 3:abbf43fab7d5 581 /*------------------------------------------------
wvd_vegt 3:abbf43fab7d5 582 Process the command and it's arguments that are
wvd_vegt 3:abbf43fab7d5 583 found. id contains the command id and argcnt &
wvd_vegt 3:abbf43fab7d5 584 argfnd the number of found and expected paramaters
wvd_vegt 3:abbf43fab7d5 585 parms contains the parsed argument values and their
wvd_vegt 3:abbf43fab7d5 586 types.
wvd_vegt 3:abbf43fab7d5 587 ------------------------------------------------*/
wvd_vegt 3:abbf43fab7d5 588
wvd_vegt 14:c652ce068f6c 589 //printf("cmds[%d]=%d\r\n",ndx, cid);
wvd_vegt 14:c652ce068f6c 590
wvd_vegt 3:abbf43fab7d5 591 if (cid==CID_LAST) {
wvd_vegt 7:269c2445b8f5 592 print("Unknown command, type 'Help' for a list of available commands.\r\n");
wvd_vegt 3:abbf43fab7d5 593 } else {
wvd_vegt 9:dc9faec79298 594 //printf("cmds[%d]=%d [%s]\r\n",ndx, cid, cmds[ndx].cmdstr);
wvd_vegt 3:abbf43fab7d5 595
wvd_vegt 3:abbf43fab7d5 596 //Test for more commandline than allowed too.
wvd_vegt 3:abbf43fab7d5 597 //i.e. run 1 is wrong.
wvd_vegt 3:abbf43fab7d5 598
wvd_vegt 7:269c2445b8f5 599 if (argcnt==0 && argfnd==0 && error==0 && ndx!=-1 && cmds[ndx].subs==SUBSYSTEM) {
wvd_vegt 6:76b033971c3c 600 //Handle all SubSystems.
wvd_vegt 3:abbf43fab7d5 601 subsystem=cid;
wvd_vegt 3:abbf43fab7d5 602 } else if ( ((cid==CID_HELP) || (argcnt==argfnd)) && error==0 ) {
wvd_vegt 3:abbf43fab7d5 603 switch (cid) {
wvd_vegt 3:abbf43fab7d5 604
wvd_vegt 7:269c2445b8f5 605 #ifdef ENABLEMACROS
wvd_vegt 3:abbf43fab7d5 606 /////// GLOBAL MACRO COMMANDS ///////
wvd_vegt 3:abbf43fab7d5 607
wvd_vegt 3:abbf43fab7d5 608 //Define Macro from commandline
wvd_vegt 3:abbf43fab7d5 609 case CID_MACRO:
wvd_vegt 3:abbf43fab7d5 610 macro_ptr=-1;
wvd_vegt 9:dc9faec79298 611
wvd_vegt 8:83edd6addbd5 612 zeromemory((char*)macro_buf, sizeof(macro_buf));
wvd_vegt 3:abbf43fab7d5 613 strncpy(macro_buf, STRINGPARM(0), sizeof(macro_buf) - 1);
wvd_vegt 9:dc9faec79298 614
wvd_vegt 8:83edd6addbd5 615 //DEBUG
wvd_vegt 8:83edd6addbd5 616 printf("Macro=%s\r\n",macro_buf);
wvd_vegt 3:abbf43fab7d5 617 break;
wvd_vegt 3:abbf43fab7d5 618
wvd_vegt 3:abbf43fab7d5 619 //Run Macro
wvd_vegt 3:abbf43fab7d5 620 case CID_RUN:
wvd_vegt 3:abbf43fab7d5 621 macro_ptr=0;
wvd_vegt 3:abbf43fab7d5 622 break;
wvd_vegt 3:abbf43fab7d5 623
wvd_vegt 3:abbf43fab7d5 624 //List Macro's
wvd_vegt 3:abbf43fab7d5 625 case CID_MACROS:
wvd_vegt 7:269c2445b8f5 626 print("[Macro]\r\n");
wvd_vegt 8:83edd6addbd5 627 if (macro_buf[0]!='\0') {
wvd_vegt 7:269c2445b8f5 628 printf("Value=%s\r\n",macro_buf);
wvd_vegt 3:abbf43fab7d5 629 } else {
wvd_vegt 7:269c2445b8f5 630 printf(";No Macro Defined\r\n");
wvd_vegt 3:abbf43fab7d5 631 }
wvd_vegt 3:abbf43fab7d5 632 break;
wvd_vegt 3:abbf43fab7d5 633
wvd_vegt 7:269c2445b8f5 634 #endif //ENABLEMACROS
wvd_vegt 3:abbf43fab7d5 635
wvd_vegt 3:abbf43fab7d5 636 #ifdef STATEMACHINE
wvd_vegt 7:269c2445b8f5 637 /////// GLOBAL STATEMACHINE COMMANDS ///////
wvd_vegt 3:abbf43fab7d5 638
wvd_vegt 3:abbf43fab7d5 639 //Start State Machine
wvd_vegt 3:abbf43fab7d5 640 case CID_STATE:
wvd_vegt 3:abbf43fab7d5 641 statemachine(BYTEPARM(0));
wvd_vegt 3:abbf43fab7d5 642
wvd_vegt 3:abbf43fab7d5 643 break;
wvd_vegt 3:abbf43fab7d5 644 #endif
wvd_vegt 3:abbf43fab7d5 645
wvd_vegt 3:abbf43fab7d5 646 /////// GLOBAL COMMANDS ///////
wvd_vegt 9:dc9faec79298 647 case CID_COMMANDS:
wvd_vegt 9:dc9faec79298 648 cmd_dump();
wvd_vegt 9:dc9faec79298 649 break;
wvd_vegt 3:abbf43fab7d5 650
wvd_vegt 3:abbf43fab7d5 651 //Echo
wvd_vegt 3:abbf43fab7d5 652 case CID_ECHO:
wvd_vegt 3:abbf43fab7d5 653 echo = BOOLPARM(0);
wvd_vegt 3:abbf43fab7d5 654 break;
wvd_vegt 3:abbf43fab7d5 655
wvd_vegt 3:abbf43fab7d5 656 //Bold
wvd_vegt 3:abbf43fab7d5 657 case CID_BOLD:
wvd_vegt 3:abbf43fab7d5 658 bold = BOOLPARM(0);
wvd_vegt 3:abbf43fab7d5 659 break;
wvd_vegt 3:abbf43fab7d5 660
wvd_vegt 3:abbf43fab7d5 661 //Warm Boot
wvd_vegt 3:abbf43fab7d5 662 case CID_BOOT:
wvd_vegt 7:269c2445b8f5 663 mbed_reset();
wvd_vegt 3:abbf43fab7d5 664 break;
wvd_vegt 3:abbf43fab7d5 665
wvd_vegt 3:abbf43fab7d5 666 //Sends an ANSI escape code to clear the screen.
wvd_vegt 3:abbf43fab7d5 667 case CID_CLS:
wvd_vegt 7:269c2445b8f5 668 print(cls);
wvd_vegt 3:abbf43fab7d5 669 break;
wvd_vegt 3:abbf43fab7d5 670
wvd_vegt 3:abbf43fab7d5 671 //Returns to CMD> prompt where most commands are disabled.
wvd_vegt 3:abbf43fab7d5 672 case CID_IDLE:
wvd_vegt 3:abbf43fab7d5 673 subsystem=-1;
wvd_vegt 3:abbf43fab7d5 674 break;
wvd_vegt 3:abbf43fab7d5 675
wvd_vegt 3:abbf43fab7d5 676 //Help
wvd_vegt 3:abbf43fab7d5 677 case CID_HELP: {
wvd_vegt 7:269c2445b8f5 678 print("\r\n");
wvd_vegt 3:abbf43fab7d5 679
wvd_vegt 3:abbf43fab7d5 680 if (argfnd>0) {
wvd_vegt 7:269c2445b8f5 681 cid = cmdid_search(STRINGPARM(0));
wvd_vegt 3:abbf43fab7d5 682 } else {
wvd_vegt 3:abbf43fab7d5 683 cid=CID_LAST;
wvd_vegt 3:abbf43fab7d5 684 }
wvd_vegt 3:abbf43fab7d5 685
wvd_vegt 3:abbf43fab7d5 686 if (argfnd>0 && cid!=CID_LAST) {
wvd_vegt 3:abbf43fab7d5 687
wvd_vegt 3:abbf43fab7d5 688 //Help with a valid command as first parameter
wvd_vegt 7:269c2445b8f5 689 ndx = cmdid_index(cid);
wvd_vegt 7:269c2445b8f5 690
wvd_vegt 7:269c2445b8f5 691 switch (cmds[ndx].subs) {
wvd_vegt 7:269c2445b8f5 692 case SUBSYSTEM: { //Dump whole subsystem
wvd_vegt 7:269c2445b8f5 693 printf("%s subsystem commands:\r\n\r\n",cmds[ndx].cmdstr);
wvd_vegt 3:abbf43fab7d5 694
wvd_vegt 7:269c2445b8f5 695 //Count SubSystem Commands.
wvd_vegt 7:269c2445b8f5 696 int subcmds =0;
wvd_vegt 7:269c2445b8f5 697 for (int i=0;i<cmds.size();i++) {
wvd_vegt 7:269c2445b8f5 698 if (cmds[i].subs==cid) {
wvd_vegt 7:269c2445b8f5 699 subcmds++;
wvd_vegt 3:abbf43fab7d5 700 }
wvd_vegt 3:abbf43fab7d5 701 }
wvd_vegt 3:abbf43fab7d5 702
wvd_vegt 7:269c2445b8f5 703 //Print SubSystem Commands.
wvd_vegt 7:269c2445b8f5 704 for (int i=0;i<cmds.size()-1;i++) {
wvd_vegt 7:269c2445b8f5 705 if (cmds[i].subs==cid) {
wvd_vegt 7:269c2445b8f5 706 subcmds--;
wvd_vegt 7:269c2445b8f5 707 if (subcmds!=0) {
wvd_vegt 9:dc9faec79298 708 cmd_help("",i,",\r\n");
wvd_vegt 7:269c2445b8f5 709 } else {
wvd_vegt 9:dc9faec79298 710 cmd_help("",i,".\r\n");
wvd_vegt 7:269c2445b8f5 711 }
wvd_vegt 7:269c2445b8f5 712 }
wvd_vegt 7:269c2445b8f5 713 }
wvd_vegt 7:269c2445b8f5 714 }
wvd_vegt 7:269c2445b8f5 715 break;
wvd_vegt 3:abbf43fab7d5 716
wvd_vegt 3:abbf43fab7d5 717 case GLOBALCMD: //Dump command only
wvd_vegt 7:269c2445b8f5 718 //print("Global command:\r\n\r\n",cmd_tbl[cmd_tbl[ndx].subs].cmdstr);
wvd_vegt 9:dc9faec79298 719 cmd_help("Syntax: ",ndx,".\r\n");
wvd_vegt 16:ec8147828286 720
wvd_vegt 3:abbf43fab7d5 721 break;
wvd_vegt 3:abbf43fab7d5 722
wvd_vegt 16:ec8147828286 723 default: { //Dump one subsystem command
wvd_vegt 16:ec8147828286 724 int sndx = cmdid_index(cmds[ndx].subs);
wvd_vegt 16:ec8147828286 725
wvd_vegt 16:ec8147828286 726 printf("%s subsystem command:\r\n\r\n",cmds[sndx].cmdstr);
wvd_vegt 16:ec8147828286 727
wvd_vegt 9:dc9faec79298 728 cmd_help("Syntax: ",ndx,".\r\n");
wvd_vegt 16:ec8147828286 729 }
wvd_vegt 16:ec8147828286 730 break;
wvd_vegt 3:abbf43fab7d5 731 }
wvd_vegt 3:abbf43fab7d5 732 } else {
wvd_vegt 3:abbf43fab7d5 733 if (argfnd>0) {
wvd_vegt 3:abbf43fab7d5 734 //Help with invalid command as first parameter
wvd_vegt 7:269c2445b8f5 735 print("Unknown command, type 'Help' for a list of available commands.\r\n");
wvd_vegt 3:abbf43fab7d5 736 } else {
wvd_vegt 3:abbf43fab7d5 737 //Help
wvd_vegt 3:abbf43fab7d5 738
wvd_vegt 3:abbf43fab7d5 739 //Dump Active Subsystem, Global & Other (dormant) Subsystems
wvd_vegt 7:269c2445b8f5 740 //-1 because we want comma's and for the last a .
wvd_vegt 7:269c2445b8f5 741 for (int i=0;i<cmds.size()-1;i++) {
wvd_vegt 7:269c2445b8f5 742 if ((cmds[i].subs<0) || (cmds[i].subs==subsystem)) {
wvd_vegt 9:dc9faec79298 743 cmd_help("",i,",\r\n");
wvd_vegt 3:abbf43fab7d5 744 }
wvd_vegt 3:abbf43fab7d5 745 }
wvd_vegt 9:dc9faec79298 746 cmd_help("",cmds.size()-1,".\r\n");
wvd_vegt 3:abbf43fab7d5 747 }
wvd_vegt 3:abbf43fab7d5 748 }
wvd_vegt 7:269c2445b8f5 749 print("\r\n");
wvd_vegt 3:abbf43fab7d5 750 break;
wvd_vegt 3:abbf43fab7d5 751 } //CID_HELP
wvd_vegt 7:269c2445b8f5 752
wvd_vegt 6:76b033971c3c 753 default : {
wvd_vegt 7:269c2445b8f5 754 // Do a Call to the Application's Command Dispatcher.
wvd_vegt 13:c18957fb06e4 755 (*user_callback)(*this, cid);
wvd_vegt 6:76b033971c3c 756 }
wvd_vegt 3:abbf43fab7d5 757 }
wvd_vegt 3:abbf43fab7d5 758 } else {
wvd_vegt 9:dc9faec79298 759 cmd_help("Syntax: ",ndx,".\r\n");
wvd_vegt 3:abbf43fab7d5 760 }
wvd_vegt 6:76b033971c3c 761
wvd_vegt 7:269c2445b8f5 762 }
wvd_vegt 3:abbf43fab7d5 763
wvd_vegt 3:abbf43fab7d5 764 } else {
wvd_vegt 7:269c2445b8f5 765 //cid==-1
wvd_vegt 3:abbf43fab7d5 766 }
wvd_vegt 3:abbf43fab7d5 767 }
wvd_vegt 3:abbf43fab7d5 768
wvd_vegt 9:dc9faec79298 769 //------------------------------------------------------------------------------
wvd_vegt 9:dc9faec79298 770 //----Dump commands table as a ini file.
wvd_vegt 9:dc9faec79298 771 //------------------------------------------------------------------------------
wvd_vegt 9:dc9faec79298 772
wvd_vegt 9:dc9faec79298 773 void Cmdb::cmd_dump() {
wvd_vegt 9:dc9faec79298 774 int ndx;
wvd_vegt 9:dc9faec79298 775 int j;
wvd_vegt 9:dc9faec79298 776 int k;
wvd_vegt 9:dc9faec79298 777 int lastmod;
wvd_vegt 9:dc9faec79298 778
wvd_vegt 9:dc9faec79298 779 k = 0;
wvd_vegt 9:dc9faec79298 780 lastmod = 0;
wvd_vegt 9:dc9faec79298 781
wvd_vegt 9:dc9faec79298 782 for (ndx=0;ndx<cmds.size();ndx++) {
wvd_vegt 9:dc9faec79298 783
wvd_vegt 9:dc9faec79298 784 #ifndef SHOWHIDDEN
wvd_vegt 9:dc9faec79298 785 if (cmds[ndx].subs==HIDDENSUB) {
wvd_vegt 9:dc9faec79298 786 continue;
wvd_vegt 9:dc9faec79298 787 }
wvd_vegt 9:dc9faec79298 788 #endif
wvd_vegt 9:dc9faec79298 789
wvd_vegt 9:dc9faec79298 790 switch (cmds[ndx].subs) {
wvd_vegt 9:dc9faec79298 791 case SUBSYSTEM :
wvd_vegt 9:dc9faec79298 792 printf("[command%2.2d]\r\n",ndx+1);
wvd_vegt 9:dc9faec79298 793 print("type=Subsystem\r\n");
wvd_vegt 9:dc9faec79298 794 print("subsystem=Global\r\n");
wvd_vegt 9:dc9faec79298 795 break;
wvd_vegt 9:dc9faec79298 796 case HIDDENSUB :
wvd_vegt 9:dc9faec79298 797 #ifdef SHOWHIDDEN
wvd_vegt 9:dc9faec79298 798 printf("[command%2.2d]\r\n",ndx+1);
wvd_vegt 9:dc9faec79298 799 print("type=HiddenSubystem\r\n");
wvd_vegt 9:dc9faec79298 800 print("subsystem=Global\r\n");
wvd_vegt 9:dc9faec79298 801 #endif
wvd_vegt 9:dc9faec79298 802 break;
wvd_vegt 9:dc9faec79298 803 case GLOBALCMD :
wvd_vegt 9:dc9faec79298 804 printf("[command%2.2d]\r\n",ndx+1);
wvd_vegt 9:dc9faec79298 805 print("type=GlobalCommand\r\n");
wvd_vegt 9:dc9faec79298 806 print("subsystem=Global\r\n");
wvd_vegt 9:dc9faec79298 807 break;
wvd_vegt 9:dc9faec79298 808 default :
wvd_vegt 16:ec8147828286 809 int sndx = cmdid_index(cmds[ndx].subs);
wvd_vegt 16:ec8147828286 810
wvd_vegt 16:ec8147828286 811 if (cmds[sndx].subs==HIDDENSUB) {
wvd_vegt 9:dc9faec79298 812 #ifdef SHOWHIDDEN
wvd_vegt 9:dc9faec79298 813 printf("[command%2.2d]\r\n",ndx+1);
wvd_vegt 9:dc9faec79298 814 print("type=HiddenCommand\r\n");
wvd_vegt 9:dc9faec79298 815 print("subsystem=HiddenSubystem\r\n");
wvd_vegt 9:dc9faec79298 816 #endif
wvd_vegt 9:dc9faec79298 817 continue;
wvd_vegt 9:dc9faec79298 818 }
wvd_vegt 16:ec8147828286 819
wvd_vegt 9:dc9faec79298 820 printf("[command%2.2d]\r\n",ndx+1);
wvd_vegt 9:dc9faec79298 821 print("type=Command\r\n");
wvd_vegt 16:ec8147828286 822 printf("subsystem=%s\r\n",cmds[sndx].cmdstr);
wvd_vegt 9:dc9faec79298 823 }
wvd_vegt 9:dc9faec79298 824
wvd_vegt 9:dc9faec79298 825 if (cmds[ndx].subs==HIDDENSUB) {
wvd_vegt 9:dc9faec79298 826 continue;
wvd_vegt 9:dc9faec79298 827 }
wvd_vegt 9:dc9faec79298 828
wvd_vegt 9:dc9faec79298 829 printf("command=%s\r\n",cmds[ndx].cmdstr);
wvd_vegt 9:dc9faec79298 830 printf("helpmsg=%s\r\n",cmds[ndx].cmddescr);
wvd_vegt 9:dc9faec79298 831 print("parameters=");
wvd_vegt 9:dc9faec79298 832 for (j=0;j<strlen(cmds[ndx].parms);j++) {
wvd_vegt 9:dc9faec79298 833 switch (cmds[ndx].parms[j]) {
wvd_vegt 9:dc9faec79298 834 case '%' :
wvd_vegt 9:dc9faec79298 835 lastmod=0;
wvd_vegt 9:dc9faec79298 836 break;
wvd_vegt 9:dc9faec79298 837
wvd_vegt 9:dc9faec79298 838 case 'b' :
wvd_vegt 9:dc9faec79298 839 lastmod=8;
wvd_vegt 9:dc9faec79298 840 break;
wvd_vegt 9:dc9faec79298 841 case 'h' :
wvd_vegt 9:dc9faec79298 842 lastmod=16;
wvd_vegt 9:dc9faec79298 843 break;
wvd_vegt 9:dc9faec79298 844 case 'l' :
wvd_vegt 9:dc9faec79298 845 lastmod=32;
wvd_vegt 9:dc9faec79298 846 break;
wvd_vegt 9:dc9faec79298 847
wvd_vegt 9:dc9faec79298 848 case 'd' :
wvd_vegt 9:dc9faec79298 849 case 'i' : {
wvd_vegt 9:dc9faec79298 850 switch (lastmod) {
wvd_vegt 9:dc9faec79298 851 case 0 :
wvd_vegt 9:dc9faec79298 852 case 16 :
wvd_vegt 9:dc9faec79298 853 print("int");
wvd_vegt 9:dc9faec79298 854 k+=3;
wvd_vegt 9:dc9faec79298 855 break;
wvd_vegt 9:dc9faec79298 856 case 8 :
wvd_vegt 9:dc9faec79298 857 print("shortint");
wvd_vegt 9:dc9faec79298 858 k+=8;
wvd_vegt 9:dc9faec79298 859 break;
wvd_vegt 9:dc9faec79298 860 case 32:
wvd_vegt 9:dc9faec79298 861 print("longint");
wvd_vegt 9:dc9faec79298 862 k+=7;
wvd_vegt 9:dc9faec79298 863 break;
wvd_vegt 9:dc9faec79298 864 }
wvd_vegt 9:dc9faec79298 865 break;
wvd_vegt 9:dc9faec79298 866 }
wvd_vegt 9:dc9faec79298 867
wvd_vegt 9:dc9faec79298 868 case 'u' :
wvd_vegt 9:dc9faec79298 869 case 'o' :
wvd_vegt 9:dc9faec79298 870 case 'x' : {
wvd_vegt 9:dc9faec79298 871 switch (lastmod) {
wvd_vegt 9:dc9faec79298 872 case 0 :
wvd_vegt 9:dc9faec79298 873 case 16 :
wvd_vegt 9:dc9faec79298 874 print("word");
wvd_vegt 9:dc9faec79298 875 k+=4;
wvd_vegt 9:dc9faec79298 876 break;
wvd_vegt 9:dc9faec79298 877 case 8 :
wvd_vegt 9:dc9faec79298 878 print("byte");
wvd_vegt 9:dc9faec79298 879 k+=4;
wvd_vegt 9:dc9faec79298 880 break;
wvd_vegt 9:dc9faec79298 881 case 32 :
wvd_vegt 9:dc9faec79298 882 print("dword");
wvd_vegt 9:dc9faec79298 883 k+=5;
wvd_vegt 9:dc9faec79298 884 break;
wvd_vegt 9:dc9faec79298 885 }
wvd_vegt 9:dc9faec79298 886
wvd_vegt 9:dc9faec79298 887 switch (cmds[ndx].parms[j]) {
wvd_vegt 9:dc9faec79298 888 case 'o' :
wvd_vegt 9:dc9faec79298 889 print("[o]");
wvd_vegt 9:dc9faec79298 890 k+=3;
wvd_vegt 9:dc9faec79298 891 break;
wvd_vegt 9:dc9faec79298 892 case 'x' :
wvd_vegt 9:dc9faec79298 893 print("[h]");
wvd_vegt 9:dc9faec79298 894 k+=3;
wvd_vegt 9:dc9faec79298 895 break;
wvd_vegt 9:dc9faec79298 896 }
wvd_vegt 9:dc9faec79298 897
wvd_vegt 9:dc9faec79298 898 break;
wvd_vegt 9:dc9faec79298 899 }
wvd_vegt 9:dc9faec79298 900
wvd_vegt 9:dc9faec79298 901 case 'e' :
wvd_vegt 9:dc9faec79298 902 case 'f' :
wvd_vegt 9:dc9faec79298 903 case 'g' :
wvd_vegt 9:dc9faec79298 904 print("float");
wvd_vegt 9:dc9faec79298 905 k+=5;
wvd_vegt 9:dc9faec79298 906 break;
wvd_vegt 9:dc9faec79298 907
wvd_vegt 9:dc9faec79298 908 case 'c' :
wvd_vegt 9:dc9faec79298 909 print("char");
wvd_vegt 9:dc9faec79298 910 k+=4;
wvd_vegt 9:dc9faec79298 911 break;
wvd_vegt 9:dc9faec79298 912
wvd_vegt 9:dc9faec79298 913 case 's' :
wvd_vegt 9:dc9faec79298 914 print("string");
wvd_vegt 9:dc9faec79298 915 k+=6;
wvd_vegt 9:dc9faec79298 916 break;
wvd_vegt 9:dc9faec79298 917
wvd_vegt 9:dc9faec79298 918 case ' ' :
wvd_vegt 9:dc9faec79298 919 printch(sp);
wvd_vegt 9:dc9faec79298 920 k++;
wvd_vegt 9:dc9faec79298 921 break;
wvd_vegt 9:dc9faec79298 922 }
wvd_vegt 9:dc9faec79298 923 }
wvd_vegt 9:dc9faec79298 924 print("\r\n");
wvd_vegt 9:dc9faec79298 925 printf("syntax=%s\r\n",cmds[ndx].parmdescr);
wvd_vegt 9:dc9faec79298 926 }
wvd_vegt 9:dc9faec79298 927 }
wvd_vegt 9:dc9faec79298 928
wvd_vegt 7:269c2445b8f5 929 void Cmdb::prompt(void) {
wvd_vegt 7:269c2445b8f5 930 #ifdef SUBSYSTEMPROMPTS
wvd_vegt 7:269c2445b8f5 931 if (subsystem!=-1) {
wvd_vegt 7:269c2445b8f5 932 int ndx = cmdid_index(subsystem);
wvd_vegt 3:abbf43fab7d5 933
wvd_vegt 9:dc9faec79298 934 printf("%s>",cmds[ndx].cmdstr);
wvd_vegt 7:269c2445b8f5 935
wvd_vegt 7:269c2445b8f5 936 return;
wvd_vegt 3:abbf43fab7d5 937 }
wvd_vegt 7:269c2445b8f5 938 #endif //SUBSYSTEMPROMPTS
wvd_vegt 3:abbf43fab7d5 939
wvd_vegt 7:269c2445b8f5 940 printf(PROMPT);
wvd_vegt 3:abbf43fab7d5 941 }
wvd_vegt 3:abbf43fab7d5 942
wvd_vegt 9:dc9faec79298 943 void Cmdb::cmd_help(char *pre, int ndx, char *post) {
wvd_vegt 3:abbf43fab7d5 944 int j;
wvd_vegt 3:abbf43fab7d5 945 int k;
wvd_vegt 3:abbf43fab7d5 946 int lastmod;
wvd_vegt 3:abbf43fab7d5 947
wvd_vegt 3:abbf43fab7d5 948 k=0;
wvd_vegt 3:abbf43fab7d5 949 lastmod=0;
wvd_vegt 3:abbf43fab7d5 950
wvd_vegt 7:269c2445b8f5 951 switch (cmds[ndx].subs) {
wvd_vegt 3:abbf43fab7d5 952 case SUBSYSTEM :
wvd_vegt 3:abbf43fab7d5 953 break;
wvd_vegt 3:abbf43fab7d5 954 case GLOBALCMD :
wvd_vegt 3:abbf43fab7d5 955 break;
wvd_vegt 3:abbf43fab7d5 956 case HIDDENSUB :
wvd_vegt 3:abbf43fab7d5 957 return;
wvd_vegt 3:abbf43fab7d5 958 default :
wvd_vegt 3:abbf43fab7d5 959 if (strlen(pre)==0 && bold) {
wvd_vegt 7:269c2445b8f5 960 print(boldon);
wvd_vegt 3:abbf43fab7d5 961 }
wvd_vegt 3:abbf43fab7d5 962 break;
wvd_vegt 3:abbf43fab7d5 963 }
wvd_vegt 3:abbf43fab7d5 964
wvd_vegt 7:269c2445b8f5 965 print(pre);
wvd_vegt 3:abbf43fab7d5 966 k+=strlen(pre);
wvd_vegt 3:abbf43fab7d5 967
wvd_vegt 3:abbf43fab7d5 968 if (k==0) {
wvd_vegt 7:269c2445b8f5 969 printf("%12s",cmds[ndx].cmdstr);
wvd_vegt 3:abbf43fab7d5 970 k+=12;
wvd_vegt 3:abbf43fab7d5 971 } else {
wvd_vegt 3:abbf43fab7d5 972 if (strlen(pre)>0 && bold) {
wvd_vegt 7:269c2445b8f5 973 print(boldon);
wvd_vegt 3:abbf43fab7d5 974 }
wvd_vegt 3:abbf43fab7d5 975
wvd_vegt 7:269c2445b8f5 976 printf("%s",cmds[ndx].cmdstr);
wvd_vegt 7:269c2445b8f5 977 k+=strlen(cmds[ndx].cmdstr);
wvd_vegt 3:abbf43fab7d5 978
wvd_vegt 3:abbf43fab7d5 979 if (strlen(pre)>0 && bold) {
wvd_vegt 7:269c2445b8f5 980 print(boldoff);
wvd_vegt 3:abbf43fab7d5 981 }
wvd_vegt 3:abbf43fab7d5 982 }
wvd_vegt 3:abbf43fab7d5 983
wvd_vegt 7:269c2445b8f5 984 if (strlen(cmds[ndx].parms)) {
wvd_vegt 7:269c2445b8f5 985 printch(sp);
wvd_vegt 3:abbf43fab7d5 986 k++;
wvd_vegt 3:abbf43fab7d5 987 }
wvd_vegt 3:abbf43fab7d5 988
wvd_vegt 7:269c2445b8f5 989 for (j=0;j<strlen(cmds[ndx].parms);j++) {
wvd_vegt 7:269c2445b8f5 990 switch (cmds[ndx].parms[j]) {
wvd_vegt 3:abbf43fab7d5 991 case '%' :
wvd_vegt 3:abbf43fab7d5 992 lastmod=0;
wvd_vegt 3:abbf43fab7d5 993 break;
wvd_vegt 3:abbf43fab7d5 994
wvd_vegt 3:abbf43fab7d5 995 case 'b' :
wvd_vegt 3:abbf43fab7d5 996 lastmod=8;
wvd_vegt 3:abbf43fab7d5 997 break;
wvd_vegt 3:abbf43fab7d5 998 case 'h' :
wvd_vegt 3:abbf43fab7d5 999 lastmod=16;
wvd_vegt 3:abbf43fab7d5 1000 break;
wvd_vegt 3:abbf43fab7d5 1001 case 'l' :
wvd_vegt 3:abbf43fab7d5 1002 lastmod=32;
wvd_vegt 3:abbf43fab7d5 1003 break;
wvd_vegt 3:abbf43fab7d5 1004
wvd_vegt 3:abbf43fab7d5 1005 case 'd' :
wvd_vegt 3:abbf43fab7d5 1006 case 'i' : {
wvd_vegt 3:abbf43fab7d5 1007 switch (lastmod) {
wvd_vegt 3:abbf43fab7d5 1008 case 0 :
wvd_vegt 3:abbf43fab7d5 1009 case 16 :
wvd_vegt 7:269c2445b8f5 1010 print("int");
wvd_vegt 3:abbf43fab7d5 1011 k+=3;
wvd_vegt 3:abbf43fab7d5 1012 break;
wvd_vegt 3:abbf43fab7d5 1013 case 8 :
wvd_vegt 7:269c2445b8f5 1014 print("shortint");
wvd_vegt 3:abbf43fab7d5 1015 k+=8;
wvd_vegt 3:abbf43fab7d5 1016 break;
wvd_vegt 3:abbf43fab7d5 1017 case 32:
wvd_vegt 7:269c2445b8f5 1018 print("longint");
wvd_vegt 3:abbf43fab7d5 1019 k+=7;
wvd_vegt 3:abbf43fab7d5 1020 break;
wvd_vegt 3:abbf43fab7d5 1021 }
wvd_vegt 3:abbf43fab7d5 1022 break;
wvd_vegt 3:abbf43fab7d5 1023 }
wvd_vegt 3:abbf43fab7d5 1024
wvd_vegt 3:abbf43fab7d5 1025 case 'u' :
wvd_vegt 3:abbf43fab7d5 1026 case 'o' :
wvd_vegt 3:abbf43fab7d5 1027 case 'x' : {
wvd_vegt 3:abbf43fab7d5 1028 switch (lastmod) {
wvd_vegt 3:abbf43fab7d5 1029 case 0 :
wvd_vegt 3:abbf43fab7d5 1030 case 16 :
wvd_vegt 7:269c2445b8f5 1031 print("word");
wvd_vegt 3:abbf43fab7d5 1032 k+=4;
wvd_vegt 3:abbf43fab7d5 1033 break;
wvd_vegt 3:abbf43fab7d5 1034 case 8 :
wvd_vegt 7:269c2445b8f5 1035 print("byte");
wvd_vegt 3:abbf43fab7d5 1036 k+=4;
wvd_vegt 3:abbf43fab7d5 1037 break;
wvd_vegt 3:abbf43fab7d5 1038 case 32 :
wvd_vegt 7:269c2445b8f5 1039 print("dword");
wvd_vegt 3:abbf43fab7d5 1040 k+=5;
wvd_vegt 3:abbf43fab7d5 1041 break;
wvd_vegt 3:abbf43fab7d5 1042 }
wvd_vegt 3:abbf43fab7d5 1043
wvd_vegt 7:269c2445b8f5 1044 switch (cmds[ndx].parms[j]) {
wvd_vegt 3:abbf43fab7d5 1045 case 'o' :
wvd_vegt 7:269c2445b8f5 1046 print("[o]");
wvd_vegt 3:abbf43fab7d5 1047 k+=3;
wvd_vegt 3:abbf43fab7d5 1048 break;
wvd_vegt 3:abbf43fab7d5 1049 case 'x' :
wvd_vegt 7:269c2445b8f5 1050 print("[h]");
wvd_vegt 3:abbf43fab7d5 1051 k+=3;
wvd_vegt 3:abbf43fab7d5 1052 break;
wvd_vegt 3:abbf43fab7d5 1053 }
wvd_vegt 3:abbf43fab7d5 1054
wvd_vegt 3:abbf43fab7d5 1055 break;
wvd_vegt 3:abbf43fab7d5 1056 }
wvd_vegt 3:abbf43fab7d5 1057
wvd_vegt 3:abbf43fab7d5 1058 case 'e' :
wvd_vegt 3:abbf43fab7d5 1059 case 'f' :
wvd_vegt 3:abbf43fab7d5 1060 case 'g' :
wvd_vegt 7:269c2445b8f5 1061 print("float");
wvd_vegt 3:abbf43fab7d5 1062 k+=5;
wvd_vegt 3:abbf43fab7d5 1063 break;
wvd_vegt 3:abbf43fab7d5 1064
wvd_vegt 3:abbf43fab7d5 1065 case 'c' :
wvd_vegt 7:269c2445b8f5 1066 print("char");
wvd_vegt 3:abbf43fab7d5 1067 k+=4;
wvd_vegt 3:abbf43fab7d5 1068 break;
wvd_vegt 3:abbf43fab7d5 1069
wvd_vegt 3:abbf43fab7d5 1070 case 's' :
wvd_vegt 7:269c2445b8f5 1071 print("string");
wvd_vegt 3:abbf43fab7d5 1072 k+=6;
wvd_vegt 3:abbf43fab7d5 1073 break;
wvd_vegt 3:abbf43fab7d5 1074
wvd_vegt 3:abbf43fab7d5 1075 case ' ' :
wvd_vegt 7:269c2445b8f5 1076 printch(sp);
wvd_vegt 3:abbf43fab7d5 1077 k++;
wvd_vegt 3:abbf43fab7d5 1078 break;
wvd_vegt 3:abbf43fab7d5 1079 }
wvd_vegt 3:abbf43fab7d5 1080 }
wvd_vegt 3:abbf43fab7d5 1081
wvd_vegt 7:269c2445b8f5 1082 for (j=k;j<40;j++) printch(sp);
wvd_vegt 3:abbf43fab7d5 1083
wvd_vegt 7:269c2445b8f5 1084 switch (cmds[ndx].subs) {
wvd_vegt 3:abbf43fab7d5 1085 case SUBSYSTEM :
wvd_vegt 3:abbf43fab7d5 1086 if (ndx==subsystem) {
wvd_vegt 7:269c2445b8f5 1087 printf("- %s (active subsystem)%s",cmds[ndx].cmddescr,post);
wvd_vegt 3:abbf43fab7d5 1088 } else {
wvd_vegt 7:269c2445b8f5 1089 printf("- %s (dormant subsystem)%s",cmds[ndx].cmddescr,post);
wvd_vegt 3:abbf43fab7d5 1090 }
wvd_vegt 3:abbf43fab7d5 1091 break;
wvd_vegt 3:abbf43fab7d5 1092 case HIDDENSUB :
wvd_vegt 3:abbf43fab7d5 1093 break;
wvd_vegt 3:abbf43fab7d5 1094 case GLOBALCMD :
wvd_vegt 7:269c2445b8f5 1095 printf("- %s (global command)%s",cmds[ndx].cmddescr,post);
wvd_vegt 3:abbf43fab7d5 1096 break;
wvd_vegt 3:abbf43fab7d5 1097 default :
wvd_vegt 7:269c2445b8f5 1098 printf("- %s%s",cmds[ndx].cmddescr,post);
wvd_vegt 3:abbf43fab7d5 1099 if (strlen(pre)==0 && bold) {
wvd_vegt 7:269c2445b8f5 1100 print(boldoff);
wvd_vegt 3:abbf43fab7d5 1101 }
wvd_vegt 3:abbf43fab7d5 1102 break;
wvd_vegt 3:abbf43fab7d5 1103 }
wvd_vegt 3:abbf43fab7d5 1104
wvd_vegt 7:269c2445b8f5 1105 if (strlen(pre)>0 && strlen(cmds[ndx].parmdescr)) {
wvd_vegt 7:269c2445b8f5 1106 printf("Params: %s",cmds[ndx].parmdescr);
wvd_vegt 7:269c2445b8f5 1107 print("\r\n");
wvd_vegt 3:abbf43fab7d5 1108 }
wvd_vegt 3:abbf43fab7d5 1109 }
wvd_vegt 3:abbf43fab7d5 1110
wvd_vegt 3:abbf43fab7d5 1111 //------------------------------------------------------------------------------
wvd_vegt 3:abbf43fab7d5 1112 //----Wrappers
wvd_vegt 3:abbf43fab7d5 1113 //------------------------------------------------------------------------------
wvd_vegt 3:abbf43fab7d5 1114
wvd_vegt 3:abbf43fab7d5 1115 void Cmdb::zeromemory(char *p,unsigned int siz) {
wvd_vegt 3:abbf43fab7d5 1116 memset(p,'\0',siz);
wvd_vegt 3:abbf43fab7d5 1117 }
wvd_vegt 3:abbf43fab7d5 1118
wvd_vegt 3:abbf43fab7d5 1119 int Cmdb::stricmp (char *s1, char *s2) {
wvd_vegt 3:abbf43fab7d5 1120 int i;
wvd_vegt 3:abbf43fab7d5 1121 int len1,len2;
wvd_vegt 3:abbf43fab7d5 1122
wvd_vegt 3:abbf43fab7d5 1123 len1=strlen(s1);
wvd_vegt 3:abbf43fab7d5 1124 len2=strlen(s2);
wvd_vegt 3:abbf43fab7d5 1125
wvd_vegt 3:abbf43fab7d5 1126 for (i = 0; (i<len1) && (i<len2);i++) {
wvd_vegt 3:abbf43fab7d5 1127 if ( toupper (s1[i])<toupper(s2[i]) ) return (-1);
wvd_vegt 3:abbf43fab7d5 1128 if ( toupper (s1[i])>toupper(s2[i]) ) return (+1);
wvd_vegt 3:abbf43fab7d5 1129 }
wvd_vegt 3:abbf43fab7d5 1130
wvd_vegt 3:abbf43fab7d5 1131 if (len1<len2) return (-1);
wvd_vegt 3:abbf43fab7d5 1132 if (len1>len2) return (+1);
wvd_vegt 3:abbf43fab7d5 1133
wvd_vegt 3:abbf43fab7d5 1134 return (0);
wvd_vegt 3:abbf43fab7d5 1135 }
wvd_vegt 7:269c2445b8f5 1136
wvd_vegt 7:269c2445b8f5 1137 //------------------------------------------------------------------------------