|
|
1.1 root 1: /* VER.C */
2:
3: /* Developed 1990-1997 by Rob Swindell; PO Box 501, Yorba Linda, CA 92885 */
4:
5: #include <dos.h>
6: #include "sbbs.h"
7: #include "riolib.h"
8: #include "riodefs.h"
9: #include "etext.h"
10:
11: extern uint inDV;
12: extern uint asmrev;
13: extern uint emshandle;
14: extern char emsver;
15:
16: char *compile_time=__TIME__,*compile_date=__DATE__;
17:
18: char *decrypt(ulong [], char *str);
19:
20: void ver()
21: {
22: char str[128],tmp[128];
23: int i;
24:
25: i=rioctl(FIFOCTL);
26: CRLF;
27: #if defined(__OS2__)
28: strcpy(str,decrypt(VersionNoticeOS2,0));
29: #elif defined(__WIN32__)
30: strcpy(str,decrypt(VersionNoticeW32,0));
31: #else
32: strcpy(str,decrypt(VersionNoticeDOS,0));
33: #endif
34: center(str);
35: CRLF;
36:
37: sprintf(str,"Revision %c%s %s %.5s "
38: #ifdef __FLAT__
39: "RIOLIB %u.%02u"
40: #else
41: "RCIOL %u"
42: #endif
43: " SMBLIB %s BCC %X.%02X"
44: ,REVISION,BETA,compile_date,compile_time
45: #ifdef __FLAT__
46: ,rioctl(GVERS)/100,rioctl(GVERS)%100
47: #else
48: ,rioctl(GVERS)
49: #endif
1.1.1.2 ! root 50: ,smb_lib_ver()
1.1 root 51: ,__BORLANDC__>>8
52: ,__BORLANDC__&0xff);
53: center(str);
54: CRLF;
55:
56: center(decrypt(CopyrightAddress,0));
57: CRLF;
58:
59: #if defined(__OS2__)
60:
61: sprintf(str,"OS/2 %u.%u (%u.%u)",_osmajor/10,_osminor/10,_osmajor,_osminor);
62:
63: #elif defined(__WIN32__)
64:
65: sprintf(str,"Win32 %u.%02u",_osmajor,_osminor);
66:
67: #else /* DOS */
68:
69: sprintf(str,"DOS %u.%02u",_osmajor,_osminor);
70: if(inDV) {
71: sprintf(tmp," DESQview %u.%02u",inDV>>8,inDV&0xff);
72: strcat(str,tmp); }
73: if(emsver) {
74: sprintf(tmp," EMS %u.%u",(emsver&0xf0)>>4,emsver&0xf);
75: strcat(str,tmp);
76: if(emshandle!=0xffff)
77: strcat(str," (overlay)"); }
78:
79: #endif
80:
81: if(i&0xc0) {
82: strcat(str," 16550 UART");
83: if(i&0xc)
84: strcat(str," FIFO"); }
85: #if DEBUG
86: i=open("NODE.CFG",0);
87: bprintf(" Files (%d)",i);
88: close(i);
89: #endif
90: center(str);
91: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.