Subversion Repositories SvarDOS

Rev

Rev 363 | Rev 365 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 363 Rev 364
Line 3... Line 3...
3 
 * returns -1 or exit code if processed
3 
 * returns -1 or exit code if processed
4 
 * returns -2 if command unrecognized */
 4 
 * returns -2 if command unrecognized */
5 
 
 5 
 
6 
#include <i86.h>
 6 
#include <i86.h>
7 
#include <stdio.h>
 7 
#include <stdio.h>
- 
 
 8 
#include <stdlib.h>
8 
 
 9 
 
9 
#include "doserr.h"
 10 
#include "doserr.h"
10 
#include "helpers.h"
 11 
#include "helpers.h"
11 
 
 12 
 
- 
 
 13 
struct cmd_funcparam {
- 
 
 14 
  int argc;
- 
 
 15 
  const char *argv[256];
- 
 
 16 
  unsigned short env_seg;
- 
 
 17 
  const char far *cmdline;
- 
 
 18 
};
- 
 
 19 
 
12 
#include "cmd/cd.c"
 20 
#include "cmd/cd.c"
- 
 
 21 
#include "cmd/exit.c"
13 
#include "cmd/set.c"
 22 
#include "cmd/set.c"
14 
 
 23 
 
15 
#include "cmd.h"
 24 
#include "cmd.h"
16 
 
 25 
 
17 
int cmd_process(int argc, const char **argv, unsigned short env_seg, const char far *cmdline) {
 - 
 
18 
 
 26 
 
- 
 
 27 
struct CMD_ID {
- 
 
 28 
  const char *cmd;
- 
 
 29 
  int (*func_ptr)(const struct cmd_funcparam *); /* pointer to handling function */
- 
 
 30 
};
- 
 
 31 
 
- 
 
 32 
const struct CMD_ID INTERNAL_CMDS[] = {
- 
 
 33 
  {"CD",      cmd_cd},
- 
 
 34 
  {"CHDIR",   cmd_cd},
- 
 
 35 
  {"EXIT",    cmd_exit},
- 
 
 36 
  {"SET",     cmd_set},
- 
 
 37 
  {NULL,      NULL}
- 
 
 38 
};
- 
 
 39 
 
- 
 
 40 
 
- 
 
 41 
/* NULL if cmdline is not matching an internal command, otherwise returns a
- 
 
 42 
 * pointer to a CMD_ID struct */
19 
  if ((imatch(argv[0], "cd")) || (imatch(argv[0], "chdir"))) return(cmd_cd(argc, argv));
 43 
static const struct CMD_ID *cmd_match(const char far *cmdline, unsigned short *argoffset) {
- 
 
 44 
  unsigned short i;
- 
 
 45 
  char buff[10];
- 
 
 46 
 
- 
 
 47 
  /* copy command to buffer, until space, NULL, tab, return, dot, slash or backslash */
- 
 
 48 
  for (i = 0; i < 9; i++) {
- 
 
 49 
    if (cmdline[i] == ' ') break;
- 
 
 50 
    if (cmdline[i] == 0) break;
- 
 
 51 
    if (cmdline[i] == '\t') break;
- 
 
 52 
    if (cmdline[i] == '\r') break;
- 
 
 53 
    if (cmdline[i] == '.') break;
- 
 
 54 
    if (cmdline[i] == '/') break;
- 
 
 55 
    if (cmdline[i] == '\\') break;
- 
 
 56 
    buff[i] = cmdline[i];
- 
 
 57 
  }
- 
 
 58 
  buff[i] = 0;
- 
 
 59 
 
- 
 
 60 
  /* advance to nearest non-space to find where arguments start */
- 
 
 61 
  while (cmdline[i] == ' ') i++;
- 
 
 62 
  *argoffset = i;
- 
 
 63 
 
- 
 
 64 
  /* try matching an internal command */
- 
 
 65 
  for (i = 0; INTERNAL_CMDS[i].cmd != NULL; i++) {
- 
 
 66 
    /*printf("imatch(%s,%s)\r\n", buff, INTERNAL_CMDS[i].cmd); */
- 
 
 67 
    if (imatch(buff, INTERNAL_CMDS[i].cmd)) {
- 
 
 68 
      /*printf("match cmd i=%u (buff=%s)\r\n", i, buff);*/
- 
 
 69 
      return(&(INTERNAL_CMDS[i]));
- 
 
 70 
    }
- 
 
 71 
  }
- 
 
 72 
 
- 
 
 73 
  return(NULL); /* command is not recognized as internal */
- 
 
 74 
}
- 
 
 75 
 
- 
 
 76 
 
- 
 
 77 
/* explodes a command into an array of arguments where last arg is NULL
- 
 
 78 
 * returns number of args */
- 
 
 79 
unsigned short cmd_explode(char *buff, const char far *s, char const **argvlist) {
- 
 
 80 
  int si = 0, argc = 0, i = 0;
- 
 
 81 
  for (;;) {
- 
 
 82 
    /* skip to next non-space character */
- 
 
 83 
    while (s[si] == ' ') si++;
- 
 
 84 
    /* end of string? */
- 
 
 85 
    if (s[si] == 0) break;
- 
 
 86 
    /* set argv ptr */
- 
 
 87 
    argvlist[argc++] = buff + i;
- 
 
 88 
    /* find next space while copying arg to local buffer */
- 
 
 89 
    do {
- 
 
 90 
      buff[i++] = s[si++];
- 
 
 91 
    } while (s[si] != ' ' && s[si] != 0 && s[si] != '/');
- 
 
 92 
    buff[i++] = 0;
- 
 
 93 
    /* is this end of string? */
- 
 
 94 
    if (s[si] == 0) break;
- 
 
 95 
  }
- 
 
 96 
  argvlist[argc] = NULL;
- 
 
 97 
  return(argc);
- 
 
 98 
}
- 
 
 99 
 
- 
 
 100 
 
20 
  if (imatch(argv[0], "set")) return(cmd_set(argc, argv, env_seg, cmdline));
 101 
int cmd_process(unsigned short env_seg, const char far *cmdline) {
- 
 
 102 
  const struct CMD_ID *cmdptr;
- 
 
 103 
  struct cmd_funcparam p;
- 
 
 104 
  unsigned short argoffset;
- 
 
 105 
  char cmdbuff[256];
- 
 
 106 
 
- 
 
 107 
  cmdptr = cmd_match(cmdline, &argoffset);
- 
 
 108 
  if (cmdptr == NULL) return(-2); /* command is not recognized as internal */
- 
 
 109 
 
- 
 
 110 
  /* printf("recognized internal command: '%s', tail of command at offset %u\r\n", cmdptr->cmd, argoffset); */
- 
 
 111 
 
- 
 
 112 
  /* prepare function parameters and feed it to the cmd handling function */
- 
 
 113 
  p.argc = cmd_explode(cmdbuff, cmdline + argoffset, p.argv);
- 
 
 114 
  p.env_seg = env_seg;
- 
 
 115 
  p.cmdline = cmdline;
21 
 
 116 
 
22 
  return(-2); /* command is not recognized as internal */
 117 
  return((cmdptr->func_ptr)(&p));
23 
}
 118 
}