source: buchla-68k/orig/GEMDOS/PARDUMP.C

/*
   =============================================================================
        pardump.c -- Dump GEMDOS partition information
        Version 1 -- 1988-09-23 -- D.N. Lynx Crowe
   =============================================================================
*/

#include "stddefs.h"
#include "osbind.h"
#include "stdio.h"
#include "bootsec.h"

#define MAXSECLN        512

struct ParInfo {                /* partition information structure */

        char    p_flg;          /* partition presence flag */
        char    p_id[3];        /* partition ID */
        long    p_st;           /* partition starting sector */
        long    p_siz;          /* partition size */
};

short   secbuf[MAXSECLN];

/* 

*/

/*
   =============================================================================
        main() -- dump partition data for the Atari hard disk
   =============================================================================
*/

main(argc, argv)
int argc;
char *argv[];
{
        register struct BootSec *bsp;
        register struct ParInfo *pip;
        register short i;
        register short *wp;
        register long *lp;

        if (Rwabs(2, secbuf, 1, 0, 2)) {

                printf("ERROR -- Sector 0 of Drive C is unreadable\n");
                exit(1);
        }

        bsp = (struct BootSec *)secbuf;

        lp  = &bsp->boot[422];

        pip = &bsp->boot[426];

        printf("Hard Disk Partition Information\n\n");

        printf("Hard disk size:  %ld sectors\n\n", *lp);

        for (i = 0; i < 4; i++) {

                if (pip->p_flg) {

                        printf("Partition %d:  \"%3.3s\" is at %ld and has %ld sectors\n",
                                (i + 1), pip->p_id, pip->p_st, pip->p_siz);
                } else {

                        printf("Partition %d:  Inactive partition\n", (i + 1));
                }

                ++pip;
        }

        printf("\n");

/* 

*/

        lp = &bsp->boot[474];
        wp = &bsp->boot[478];

        if (*lp) {

                printf("Bad Sector Map is at %ld,  %d entries\n",
                        *lp, *wp);

        } else {

                printf("Bad Sector Map not present\n");
        }

        exit(0);
}