home *** CD-ROM | disk | FTP | other *** search
/ Personal Computing Magazine 1988 September / SEPT_1988 / TOOLKIT / PCI.C next >
Encoding:
C/C++ Source or Header  |  1988-01-01  |  6.4 KB  |  195 lines
  1. /*==============================================================*/
  2. /* PCI        Version 1.2    by Colin J Smith (c) 1988    */
  3. /*                                                              */
  4. /* A program to display 'Personal Computer Information'         */
  5. /*                                                              */
  6. /* Written in Turbo C v1.5                                      */
  7. /*==============================================================*/
  8.  
  9. #include <dir.h>
  10. #include <dos.h>
  11.  
  12. #define DRVE      0x0001  /* masks for isolating status bits    */
  13. #define DRV_MASK  0x00c0  /* bits to mask off no of disk drives */
  14. #define DRV_SHIFT 0x06
  15. #define PRN_SHIFT 0x0E
  16. #define EQUIPCK   0x11    /* check equipment function           */
  17. #define VIDEO     0x0030  /* mask to find initial video mode    */
  18. #define EGA      0x0000  /* determines EGA monitor fitted      */
  19. #define BW4025    0x0010  /* determines if Black/White 40x25    */
  20. #define BW8025      0x0020  /* determines if Black/White 80x25    */
  21. #define HERC      0x0030  /* determines if Monochrome Hercules  */
  22.  
  23. /*==============================================================*/
  24.  
  25. char *current_directory(char *path)
  26. {
  27.     strcpy(path, "X:\\");           /* routine to find current directory */
  28.     path[0] = 'A' + getdisk();
  29.     getcurdir(0, path+3);
  30.     return(path);
  31.  
  32. } /* end of CURRENT DIRECTORY */
  33.  
  34. /*==============================================================*/
  35.  
  36. main()
  37. {
  38.     int number;    
  39.         int index;
  40.         int done;
  41.  
  42.         char curdir[MAXPATH];
  43.  
  44.         unsigned long diskfree;
  45.         unsigned long diskcap;
  46.         unsigned long diskused;
  47.     unsigned ax;
  48.     unsigned int equip;
  49.  
  50.     struct ffblk ffblk;
  51.         struct date today;
  52.         struct time now;
  53.  
  54.     union REGS iregs, oregs;
  55.     
  56. /* print heading */
  57.     printf("PCI - Personal Computer Information (c) CJS \'88 -- VER. 1.2\n");
  58.  
  59. /* print time */
  60.     gettime(&now);
  61.     printf("At %02d:%02d:%02d.%02d ",now.ti_hour,now.ti_min,
  62.         now.ti_sec,now.ti_hund);
  63.  
  64. /* print todays date */
  65.     getdate(&today);
  66.         printf("on %02d/%02d/%02d\n", today.da_day, today.da_mon,today.da_year);
  67.  
  68. /* print version of MD-DOS */
  69.     printf("\nOperating System%23s%d.%d\n","» MS-DOS ",_osmajor,_osminor);
  70.  
  71. /* get equipment status value */
  72.         equip = int86( EQUIPCK, &iregs, &oregs);
  73.  
  74. /* find number of disk drives attached */
  75.     number = ((equip & DRV_MASK) >> DRV_SHIFT) +1;
  76.         printf("No. of disk drives connected  » ");
  77.  
  78. /* print number of disk drives attached */
  79.     if ( equip & DRVE != DRVE )
  80.           printf("0");
  81.     else
  82.           printf("%d",number);
  83.  
  84. /* print number of printers attached */
  85.     number =  equip >> PRN_SHIFT;
  86.     printf("\nNo. of printers connected%5s» %d [PARALLEL-CENTRONICS]\n","",number);
  87.  
  88. /* print number of comms cards attached */
  89.         number = ((equip & 0x0e00) >>9);
  90.         printf("No. of communication cards%4s» %d [SERIAL-RS232]","",number);
  91.  
  92. /* print initial video mode */
  93.     printf("\nInitial video mode setup%6s» ","");
  94.     switch(equip & VIDEO) {
  95.          case HERC   : printf ("Monochrome Hercules 80 X 25 B/W [TEXT]"); break;
  96.          case BW8025 : printf ("CGA card 80 X 25 B/W [TEXT]"); break;
  97.          case BW4025 : printf ("CGA card 40 X 25 B/W [TEXT]"); break;
  98.          case EGA    : printf ("EGA card [TEXT]");
  99.     }
  100.     printf("\nCurrent video mode%12s» ","");
  101.  
  102. /* find and print current video mode */    
  103.         iregs.h.ah = 15;
  104.         int86( 0x10, &iregs, &oregs);
  105.         switch(oregs.h.al) {
  106.              case 0 : printf ("CGA 40 X 25 B/W [TEXT]"); break;
  107.              case 1 : printf ("CGA 40 X 25 Colour [TEXT]"); break;
  108.              case 2 : printf ("CGA 80 X 25 B/W [TEXT]"); break;
  109.              case 3 : printf ("CGA 80 X 25 Colour [TEXT]"); break;
  110.              case 4 : printf ("CGA 320 X 200 Colour [GRAPHICS]"); break;
  111.              case 5 : printf ("CGA 320 X 200 B/W [GRAPHICS]"); break;
  112.              case 6 : printf ("CGA 640 X 200 B/W [GRAPHICS]"); break;
  113.                default : printf ("Monochrome Hercules 80 X 25 B/W [TEXT]");
  114.         }
  115.  
  116. /* print whether co-processor attached */
  117.     printf("\nFloating point co-processor   » ");
  118.     if (((equip & 0x0002) >> 1) == 1)
  119.         printf("[YES]");
  120.     else
  121.         printf("[NO]");
  122.  
  123. /* print whether game card installed */
  124.     printf("\nGame card (Input/Output)%6s» ","");
  125.     number = ((equip & 0x1000) >> 12);
  126.         switch(number){
  127.         case 0: printf("[NO]");break;
  128.         case 1: printf("[YES]");
  129.     }
  130.  
  131. /* print whether mouse is installed */
  132.         printf("\nMouse%25s» ","");
  133.         iregs.h.al = 0;
  134.         iregs.h.ah = 0;
  135.         int86(0x33, &iregs, &oregs);
  136.         if (oregs.h.al == 0)
  137.             printf("[NO]");
  138.         else
  139.              printf("[YES]");
  140.  
  141. /* print size of motherboard memory */
  142.     printf("\nMotherboard memory%12s» %u Kilo-bytes","",(((equip & 0x000c) >> 2)*16)+16);
  143.  
  144. /* print size of main memory */
  145.     printf("\nMain memory%19s» %d Kilo-bytes","",biosmemory());
  146.  
  147. /* print location of program segment */
  148.     printf("\nProgram segment address%7s» %05X hex\n","",_psp);
  149.  
  150. /* print current directory */
  151.     current_directory(curdir);
  152.     printf("Current directory%13s» %s","",curdir);
  153.  
  154. /* print number of files in current directory */
  155.     number = 0;
  156.     strcat(curdir,"*.*");
  157.     done = findfirst(curdir,&ffblk,0);
  158.         while(!done) {
  159.              number +=1;
  160.              done = findnext(&ffblk);
  161.         }
  162.         printf("\nNo. of files in current dir.  » %d",number);
  163.  
  164. /* find information about disk */
  165.     iregs.h.ah = 0x36;
  166.     iregs.h.dl = 0;
  167.     int86(0x21, &iregs, &oregs);
  168.  
  169. /* print information about disk */
  170.         printf("\nMaximum no. of clusters%7s» %u","",oregs.x.dx);
  171.     printf("\nNo. of unused clusters%8s» %u","",oregs.x.bx);
  172.     printf("\nNo. of sectors per cluster%4s» %u","",oregs.x.ax);
  173.     printf("\nNo. of bytes per sector%7s» %u","",oregs.x.cx);
  174.  
  175. /* calculate information about disk */
  176.     diskfree = (unsigned long)oregs.x.ax* (unsigned long) oregs.x.cx*(unsigned long)oregs.x.bx;
  177.     diskcap = (unsigned long)oregs.x.ax*(unsigned long)oregs.x.cx*(unsigned long)oregs.x.dx;
  178.     diskused = diskcap-diskfree;
  179.  
  180. /* print MAX disk capacity */
  181.         ultoa(diskcap,curdir,10);
  182.     printf("\nMaximum disk capacity%9s» %s bytes","",curdir);
  183.  
  184. /* print SPACE used */
  185.     ultoa(diskused,curdir,10);
  186.     printf("\nDisk space used%15s» %s bytes","",curdir);
  187.  
  188. /* print SPACE unused */
  189.     ultoa(diskfree,curdir,10);
  190.     printf("\nTotal disc space free%9s» %s bytes","",curdir);
  191.  
  192. } /* end of MAIN */
  193.  
  194. /*==============================================================*/
  195.