Wim van der Vegt / CMDB

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

cmdb.cpp@14:c652ce068f6c, 2011-02-11 (annotated)

Committer:
wvd_vegt
Date:
Fri Feb 11 19:30:30 2011 +0000
Revision:
14:c652ce068f6c
Parent:
13:c18957fb06e4
Child:
16:ec8147828286
0.76

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