Subversion Repositories SvarDOS

Rev

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

Rev 521 Rev 533
Line 27... Line 27...
27 
 */
 27 
 */
28 
 
 28 
 
29 
#define PVER "2021.0"
 29 
#define PVER "2021.0"
30 
#define COPYRDATE "2021"
 30 
#define COPYRDATE "2021"
31 
 
 31 
 
32 
static int cmd_ver(struct cmd_funcparam *p) {
 32 
static enum cmd_result cmd_ver(struct cmd_funcparam *p) {
33 
  char *buff = p->BUFFER;
 33 
  char *buff = p->BUFFER;
34 
  unsigned char maj = 0, min = 0;
 34 
  unsigned char maj = 0, min = 0;
35 
 
 35 
 
36 
  /* help screen */
 36 
  /* help screen */
37 
  if (cmd_ishlp(p)) {
 37 
  if (cmd_ishlp(p)) {
Line 39... Line 39...
39 
    outputnl("");
 39 
    outputnl("");
40 
    outputnl("ver [/about]");
 40 
    outputnl("ver [/about]");
41 
#ifdef VERDBG
 41 
#ifdef VERDBG
42 
    outputnl("ver /dbg");
 42 
    outputnl("ver /dbg");
43 
#endif
43 
#endif
44 
    return(-1);
 44 
    return(CMD_OK);
45 
  }
 45 
  }
46 
 
 46 
 
47 
#ifdef VERDBG
 47 
#ifdef VERDBG
48 
  if ((p->argc == 1) && (imatch(p->argv[0], "/dbg"))) {
 48 
  if ((p->argc == 1) && (imatch(p->argv[0], "/dbg"))) {
49 
    unsigned short far *rmod_envseg = MK_FP(p->rmod->rmodseg, RMOD_OFFSET_ENVSEG);
 49 
    unsigned short far *rmod_envseg = MK_FP(p->rmod->rmodseg, RMOD_OFFSET_ENVSEG);
Line 82... Line 82...
82 
        }
 82 
        }
83 
      }
 83 
      }
84 
      printf("\r\n");
 84 
      printf("\r\n");
85 
    }
 85 
    }
86 
 
 86 
 
87 
    return(-1);
 87 
    return(CMD_OK);
88 
  }
 88 
  }
89 
#endif
89 
#endif
90 
 
 90 
 
91 
  if ((p->argc == 1) && (imatch(p->argv[0], "/about"))) {
 91 
  if ((p->argc == 1) && (imatch(p->argv[0], "/about"))) {
92 
    outputnl("SvarCOM is a shell interpreter for DOS kernels compatible with MS-DOS 5+.");
 92 
    outputnl("SvarCOM is a shell interpreter for DOS kernels compatible with MS-DOS 5+.");
Line 95... Line 95...
95 
    outputnl("Copyright (C) " COPYRDATE " Mateusz Viste");
 95 
    outputnl("Copyright (C) " COPYRDATE " Mateusz Viste");
96 
    outputnl("");
 96 
    outputnl("");
97 
    outputnl("Program ten dedykuje Milenie i Mojmirowi. Zycze wam, byscie w swoim zyciu");
 97 
    outputnl("Program ten dedykuje Milenie i Mojmirowi. Zycze wam, byscie w swoim zyciu");
98 
    outputnl("potrafili docenic wartosci minionych pokolen, jednoczesnie czerpiac radosc");
 98 
    outputnl("potrafili docenic wartosci minionych pokolen, jednoczesnie czerpiac radosc");
99 
    outputnl("z prostych przyjemnosci dnia codziennego.  Lair, jesien 2021.");
 99 
    outputnl("z prostych przyjemnosci dnia codziennego.  Lair, jesien 2021.");
100 
    return(-1);
 100 
    return(CMD_OK);
101 
  }
 101 
  }
102 
 
 102 
 
103 
  if (p->argc != 0) {
 103 
  if (p->argc != 0) {
104 
    outputnl("Invalid parameter");
 104 
    outputnl("Invalid parameter");
105 
    return(-1);
 105 
    return(CMD_FAIL);
106 
  }
 106 
  }
107 
 
 107 
 
108 
  _asm {
 108 
  _asm {
109 
    push ax
 109 
    push ax
110 
    push bx
 110 
    push bx
Line 120... Line 120...
120 
 
 120 
 
121 
  sprintf(buff, "DOS kernel version %u.%u", maj, min);
 121 
  sprintf(buff, "DOS kernel version %u.%u", maj, min);
122 
 
 122 
 
123 
  outputnl(buff);
 123 
  outputnl(buff);
124 
  outputnl("SvarCOM shell ver " PVER);
 124 
  outputnl("SvarCOM shell ver " PVER);
125 
  return(-1);
 125 
  return(CMD_OK);
126 
}
 126 
}