Subversion Repositories SvarDOS

Rev

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

Rev 461 Rev 464
Line 406... Line 406...
406
  if ((ext != NULL) && (imatch(ext, "bat"))) {
406
  if ((ext != NULL) && (imatch(ext, "bat"))) {
407
    outputnl("batch processing not supported yet");
407
    outputnl("batch processing not supported yet");
408
    return;
408
    return;
409
  }
409
  }
410
 
410
 
411
  /* printf("Exec: '%s'\r\n", cmdfile); */
-
 
412
 
-
 
413
  /* find cmdtail */
411
  /* find cmdtail */
414
  cmdtail = cmdline;
412
  cmdtail = cmdline;
415
  while (*cmdtail == ' ') cmdtail++;
413
  while (*cmdtail == ' ') cmdtail++;
416
  while ((*cmdtail != ' ') && (*cmdtail != '/') && (*cmdtail != '+') && (*cmdtail != 0)) {
414
  while ((*cmdtail != ' ') && (*cmdtail != '/') && (*cmdtail != '+') && (*cmdtail != 0)) {
417
    cmdtail++;
415
    cmdtail++;
Line 424... Line 422...
424
  /* copy cmdtail to rmod's PSP and compute its len */
422
  /* copy cmdtail to rmod's PSP and compute its len */
425
  for (i = 0; cmdtail[i] != 0; i++) rmod_cmdtail[i] = cmdtail[i];
423
  for (i = 0; cmdtail[i] != 0; i++) rmod_cmdtail[i] = cmdtail[i];
426
  rmod_cmdtail[i] = '\r';
424
  rmod_cmdtail[i] = '\r';
427
  rmod_cmdtail[-1] = i;
425
  rmod_cmdtail[-1] = i;
428
 
426
 
429
  printf("Exec: '");
-
 
430
  for (i = 0; rmod_execprog[i] != 0; i++) {
-
 
431
    printf("%c", rmod_execprog[i]);
-
 
432
  }
-
 
433
  printf("'\r\n");
-
 
434
 
-
 
435
  /* set up rmod to execute the command */
427
  /* set up rmod to execute the command */
436
 
428
 
437
  ExecParam->envseg = 0; /* 0 = use parent's env segment */
429
  ExecParam->envseg = envseg;
438
  ExecParam->cmdtail = (unsigned long)MK_FP(rmod->rmodseg, 0x80); /* farptr, must be in PSP format (lenbyte args \r) */
430
  ExecParam->cmdtail = (unsigned long)MK_FP(rmod->rmodseg, 0x80); /* farptr, must be in PSP format (lenbyte args \r) */
439
  ExecParam->fcb1 = 0; /* TODO farptr */
431
  ExecParam->fcb1 = 0; /* TODO farptr */
440
  ExecParam->fcb2 = 0; /* TODO farptr */
432
  ExecParam->fcb2 = 0; /* TODO farptr */
441
  exit(0); /* let rmod do the job now */
433
  exit(0); /* let rmod do the job now */
442
}
434
}