biostest.c

linux1.0的源码

/* biostest.c */
#include <stdio.h>
#include <bios.h>

static unsigned char diskbuf[2048];

void main(void)
{
    struct diskinfo_t di;
    unsigned i, j, status, port;
    unsigned char *p, linebuf[17];
    union
    {                               /* Access equiment either as:    */
        unsigned u;                   /*   unsigned or                 */
        struct                        /*   bit fields                  */
        {
unsigned diskflag : 1;      /* Diskette drive installed?     */
unsigned coprocessor : 1;   /* Coprocessor? (except on PC)   */
unsigned sysram : 2;        /* RAM on system board           */
unsigned video : 2;         /* Startup video mode            */
unsigned disks : 2;         /* Drives 00=1, 01=2, 10=3, 11=4 */
unsigned dma : 1;           /* 0=Yes, 1=No (1 for PC Jr.)    */
unsigned comports : 3;      /* Serial ports                  */
unsigned game : 1;          /* Game adapter installed?       */
unsigned modem : 1;         /* Internal modem?               */
unsigned printers : 2;      /* Number of printers            */
        } bits;
    } equip;


    /* _bios_equiplist() test */
    equip.u = _bios_equiplist();
    printf( "Disk drive:          %s\n", equip.bits.diskflag ? "Yes" : "No" );
    printf( "Coprocessor:         %s\n", equip.bits.coprocessor ? "Yes" : "No" );
    printf( "Game adapter:        %s\n", equip.bits.game ? "Yes" : "No" );
    printf( "Serial ports:        %d\n", equip.bits.comports);
    printf( "Number of printers:  %d\n\n", equip.bits.printers);


    /* _bios_memsize() test */
    printf( "Size of memory:      %i K\n\n", _bios_memsize());


    /* _bios_printer() test */
    puts("Test of paralel ports:");
    for(port=0; port < equip.bits.printers; port++)
    {
        status = _bios_printer(_PRINTER_STATUS, port, 0);
        printf("  LPT%c status: PRINTER IS %s\n", '1' + port, ( status == 0x90 ) ? "READY" : "NOT READY");
    }


    /* _bios_serialcom() test */
    puts("\nTest of serial ports:");
    for(port=0; port < equip.bits.comports; port++)
    {
        status = _bios_serialcom(_COM_STATUS, port, 0);

        /* Report status of each serial port and test whether there is a
         * responding device (such as a modem) for each. If data-set-ready
         * and clear-to-send bits are set, a device is responding.
         */
        printf("  COM%c status: DEVICE IS %s\n", '1' + port, (status & 0x0030) ? "ACTIVE" : "NOT ACTIVE" );
    }


    /* _bios_disk() test, read the partition table from C: drive. */
    puts("\nContents of master boot sector:");
    di.drive    = 0x80;
    di.head     = 0;
    di.track    = 0;
    di.sector   = 1;
    di.nsectors = 1;
    di.buffer   = diskbuf;

    /* Try reading disk three times before giving up. */
    for(i=0; i<3; i++)
    {
        status = _bios_disk(_DISK_READ, &di) >> 8;
        if ( !status )
            break;
    }
    if ( status )
        printf("Disk error: 0x%.2x\n", status);
    else
    {
        for(p=diskbuf, i=j=0; i<512; i++, p++)
        {
            linebuf[j++] = (*p > 32) ? *p : '.';
            printf("%.2x ", *p);
            if (j == 16)
            {
                linebuf[j] = '\0';
                printf(" %16s\n", linebuf);
                j = 0;
            }
        }
    }

}