WebSVN – SvarDOS – Diff – /sved/trunk/sved.c

     *uidirtyto = 0xff;
+  }
+}
+/* a custom argv-parsing routine that looks directly inside the PSP, avoids the need
+ * of argc and argv, saves some 330 bytes of binary size */
-int main(int argc, char **argv) {
+static char *parseargv(void) {
+  char *tail = (void *)0x81; /* THIS WORKS ONLY IN SMALL MEMORY MODEL */
+  unsigned char count = 0;
+  char *argv[4];
+  mdr_coutraw_puts(tail);
+  while (count < 4) {
+    /* jump to nearest arg */
+    while (*tail == ' ') {
+      *tail = 0;
+      tail++;
+    }
+    if (*tail == '\r') {
+      *tail = 0;
+      break;
+    }
+    argv[count++] = tail;
+    /* jump to next delimiter */
+    while ((*tail != ' ') && (*tail != '\r')) tail++;
+  }
+  /* check args now */
+  if (count != 1) return(NULL);
+  return(argv[0]);
+}
+int main(void) {
   int fd;
-  const char *fname = NULL;
+  const char *fname;
   char buff[1024];
   struct linedb db;
   unsigned char screenw = 0, screenh = 0;
   unsigned char cursorposx = 0, cursorposy = 0;
   unsigned char uidirtyfrom = 0, uidirtyto = 0xff; /* make sure to redraw entire UI at first run */
   bzero(&db, sizeof(db));
   svarlang_autoload_nlspath("sved");
+  fname = parseargv();
-  if ((argc != 2) || (argv[1][0] == '/')) {
+  if (fname == NULL) {
     mdr_coutraw_puts("usage: sved file.txt");
     return(0);
+  }
-  fname = argv[1];
   mdr_coutraw_puts("");
   if (_dos_open(fname, O_RDONLY, &fd) != 0) {
     mdr_coutraw_puts("Failed to open file:");
     mdr_coutraw_puts(fname);

Subversion Repositories SvarDOS