Subversion Repositories SvarDOS

Rev

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

Rev 1086 Rev 1092
Line 29... Line 29...
29 
#define PVER "2022.3"
 29 
#define PVER "2022.3"
30 
#define COPYRDATE "2021-2022"
 30 
#define COPYRDATE "2021-2022"
31 
 
 31 
 
32 
static enum cmd_result 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, truemaj = 0, truemin = 0, rev = 0, verflags = 0;
 34 
  unsigned char maj = 0, min = 0, retcode = 0, truemaj = 0, truemin = 0, rev = 0, verflags = 0;
35 
  unsigned short doserr = 0;
 - 
 
36 
 
 35 
 
37 
  /* help screen */
 36 
  /* help screen */
38 
  if (cmd_ishlp(p)) {
 37 
  if (cmd_ishlp(p)) {
39 
    nls_outputnl(20,0); /* "Displays the DOS version." */
 38 
    nls_outputnl(20,0); /* "Displays the DOS version." */
40 
    outputnl("");
 39 
    outputnl("");
Line 107... Line 106...
107 
    push bx
 106 
    push bx
108 
    push cx
 107 
    push cx
109 
    push dx
 108 
    push dx
110 
 
 109 
 
111 
    /* get the "normal" (spoofable) DOS version */
 110 
    /* get the "normal" (spoofable) DOS version */
112 
    mov ah, 0x30  /* Get DOS version number (DOS 2+) */
 111 
    mov ah, 0x30  /* function supported on DOS 2+ */
113 
    int 0x21      /* AL=maj_ver_num  AH=min_ver_num  BX,CX=OEM */
 112 
    int 0x21      /* AL=maj_ver_num  AH=min_ver_num  BX,CX=OEM */
114 
    mov [maj], al
 113 
    mov [maj], al
115 
    mov [min], ah
 114 
    mov [min], ah
116 
 
 115 
 
117 
    /* get the "true" DOS version, along with a couple of extra data */
 116 
    /* get the "true" DOS version, along with a couple of extra data */
118 
    mov ax, 0x3306 /* Get true DOS version number (DOS 5+) */
 117 
    mov ax, 0x3306     /* function supported on DOS 5+ */
119 
    clc
 118 
    int 0x21
120 
    int 0x21       /* AL=return_code  BL=maj_ver_num  BH=min_ver_num */
 119 
    mov [retcode], al  /* AL=return_code for DOS < 5 */
121 
    jnc GOOD       /* DL=revision  DH=kernel_memory_area */
 120 
    mov [truemaj], bl  /* BL=maj_ver_num  BH=min_ver_num */
122 
    mov [doserr], ax /* DR-DOS sets CF on this call (according to RBIL) */
 - 
 
123 
    GOOD:
 - 
 
124 
    mov [truemaj], bl
 - 
 
125 
    mov [truemin], bh
 121 
    mov [truemin], bh
126 
    mov [rev], dl
 122 
    mov [rev], dl      /* DL=revision  DH=kernel_memory_area */
127 
    mov [verflags], dh
 123 
    mov [verflags], dh
128 
 
 124 
 
129 
    pop dx
 125 
    pop dx
130 
    pop cx
 126 
    pop cx
131 
    pop bx
 127 
    pop bx
132 
    pop ax
 128 
    pop ax
133 
  }
 129 
  }
134 
 
 130 
 
135 
  sprintf(buff, svarlang_str(20,1), maj, min); /* "DOS kernel version %u.%u" */
 131 
  sprintf(buff, svarlang_str(20,1), maj, min); /* "DOS kernel version %u.%u" */
136 
  output(buff);
 132 
  output(buff);
137 
  if ((doserr == 0) && ((maj != truemaj) || (min != truemin))) {
 - 
 
138 
    output(" (");
 - 
 
139 
    sprintf(buff, svarlang_str(20,10), truemaj, truemin); /* "true ver xx.xx" */
 - 
 
140 
    output(buff);
 - 
 
141 
    output(")");
 - 
 
142 
  }
 - 
 
143 
  outputnl("");
 - 
 
144 
 
 133 
 
- 
 
 134 
  /* can we trust in the data returned? */
- 
 
 135 
  /* DR DOS 5&6 return 0x01, MS-DOS 2-4 return 0xff */
- 
 
 136 
  /* 'truemaj' is checked to mitigate the conflict from the CBIS redirector */
- 
 
 137 
  if ((retcode > 1) && (retcode < 255) && (truemaj > 4) && (truemaj < 100)) {
- 
 
 138 
    if ((maj != truemaj) || (min != truemin)) {
- 
 
 139 
      output(" (");
145 
  sprintf(buff, svarlang_str(20,5), 'A' + rev); /* "Revision %c" */
 140 
      sprintf(buff, svarlang_str(20,10), truemaj, truemin); /* "true ver xx.xx" */
146 
  outputnl(buff);
 141 
      output(buff);
- 
 
 142 
      output(")");
- 
 
 143 
    }
- 
 
 144 
    outputnl("");
147 
 
 145 
 
148 
  if (doserr == 0) {
 - 
 
149 
    const char *loc = svarlang_str(20,7);        /* "low memory" */
 - 
 
150 
    if (verflags & 16) loc = svarlang_str(20,8); /* "HMA" */
 - 
 
151 
    if (verflags & 8) loc = svarlang_str(20,9);  /* "ROM" */
 - 
 
152 
    sprintf(buff, svarlang_str(20,6), loc);      /* "DOS is in %s" */
 146 
    sprintf(buff, svarlang_str(20,5), 'A' + rev); /* "Revision %c" */
153 
    outputnl(buff);
 147 
    outputnl(buff);
- 
 
 148 
 
- 
 
 149 
    {
- 
 
 150 
      const char *loc = svarlang_str(20,7);        /* "low memory" */
- 
 
 151 
      if (verflags & 16) loc = svarlang_str(20,8); /* "HMA" */
- 
 
 152 
      if (verflags & 8) loc = svarlang_str(20,9);  /* "ROM" */
- 
 
 153 
      sprintf(buff, svarlang_str(20,6), loc);      /* "DOS is in %s" */
- 
 
 154 
      outputnl(buff);
- 
 
 155 
    }
154 
  }
 156 
  }
155 
 
 157 
 
156 
  outputnl("");
 158 
  outputnl("");
157 
  nls_output(20,2); /* "SvarCOM shell ver" */
 159 
  nls_output(20,2); /* "SvarCOM shell ver" */
158 
  outputnl(" " PVER);
 160 
  outputnl(" " PVER);