|
|
Power 6/32 Unix version 1.21
#include "vdfmt.h"
/*
**
*/
format()
{
boolean read_bad_sector_map();
cur.state = fmt;
print("Starting format on ");
printf("controller %d, drive %d, ", cur.controller, cur.drive);
printf("type %s.\n",CURRENT->type_name);
/* Read the flaw map from the disk (where ever it may be) */
if(read_bad_sector_map() == true) {
if(bad_map->bs_id != D_INFO.id) {
print("Module serial numbers do not match!\n");
print("Use `info' to find the real serial number.\n");
_longjmp(abort_environ, 1);
}
}
else
bad_map->bs_id = D_INFO.id;
/* Re-Initialize bad sector map relocation pointers */
zero_bad_sector_map();
write_bad_sector_map();
if(kill_processes == true)
_longjmp(quit_environ, 1);
/* format the disk surface */
format_relocation_area();
format_maintainence_area();
format_users_data_area();
if(kill_processes == true)
_longjmp(quit_environ, 1);
/* verify the surface */
verify_relocation_area();
verify_maintainence_area();
verify_users_data_area();
}
/*
**
*/
format_relocation_area()
{
register long sector_count;
dskadr dskaddr;
cur.substate = sub_fmt;
dskaddr.cylinder = (short)(CURRENT->ncyl - NUMSYS);
dskaddr.track = (char)0;
dskaddr.sector = (char)0;
sector_count = (long)(NUMREL * CURRENT->ntrak * CURRENT->nsec);
format_sectors(&dskaddr, &dskaddr, NRM, sector_count);
}
/*
**
*/
format_users_data_area()
{
register long sector_count;
dskadr dskaddr;
register int cyl;
cur.substate = sub_fmt;
sector_count = (long)(CURRENT->ntrak * CURRENT->nsec);
dskaddr.track = (char)0;
dskaddr.sector = (char)0;
for(cyl=0; cyl < (CURRENT->ncyl - NUMSYS); cyl++) {
dskaddr.cylinder = cyl;
format_sectors(&dskaddr, &dskaddr, NRM, sector_count);
}
}
/*
**
*/
format_maintainence_area()
{
register long sector_count;
dskadr dskaddr;
cur.substate = sub_fmt;
dskaddr.cylinder = (short)(CURRENT->ncyl - NUMMNT - NUMMAP);
dskaddr.track = (char)0;
dskaddr.sector = (char)0;
sector_count = (long)(NUMMNT * CURRENT->ntrak * CURRENT->nsec);
format_sectors(&dskaddr, &dskaddr, NRM, sector_count);
}
/*
**
*/
boolean is_formatted()
{
extern boolean align_buf();
dskadr dskaddr;
dskaddr.cylinder = 0;
dskaddr.track = 0;
dskaddr.sector = 0;
if(C_INFO.type == SMD_ECTLR) {
access_dsk((char *)save, &dskaddr, RD_RAW, 1, 1);
if(align_buf((unsigned long *)save, CDCSYNC) == false)
return true;
return false;
}
else if(access_dsk((char *)save, &dskaddr, RD, 1, 1) & HEADER_ERROR)
return false;
return true;
}
/*
** Vdformat_sectors is used to do the actual formatting of a block.
*/
format_sectors(dskaddr, hdraddr, flags, count)
dskadr *dskaddr, *hdraddr;
short flags;
long count;
{
cur.daddr.cylinder = dskaddr->cylinder & 0xfff;
cur.daddr.track = dskaddr->track;
dcb.opcode = FSECT; /* format sector command */
dcb.intflg = NOINT;
dcb.nxtdcb = (fmt_dcb *)0; /* end of chain */
dcb.operrsta = 0;
dcb.devselect = (char)cur.drive;
dcb.trailcnt = (char)(sizeof(trfmt) / sizeof(long));
dcb.trail.fmtrail.addr = (char *)scratch;
dcb.trail.fmtrail.nsectors = count;
dcb.trail.fmtrail.disk.cylinder = dskaddr->cylinder | flags;
dcb.trail.fmtrail.disk.track = dskaddr->track;
dcb.trail.fmtrail.disk.sector = dskaddr->sector;
dcb.trail.fmtrail.hdr.cylinder = hdraddr->cylinder | flags;
dcb.trail.fmtrail.hdr.track = hdraddr->track;
dcb.trail.fmtrail.hdr.sector = hdraddr->sector;
mdcb.firstdcb = &dcb;
mdcb.vddcstat = 0;
VDDC_ATTENTION(C_INFO.addr, &mdcb, C_INFO.type);
poll((int)(((count+849)/850)+120));
if(vdtimeout <= 0) {
printf(" while formatting sectors.\n");
_longjmp(abort_environ, 1);
}
}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.