1 /* 2 * Copyright (c) 1982, 1986 Regents of the University of California. 3 * All rights reserved. The Berkeley software License Agreement 4 * specifies the terms and conditions for redistribution. 5 * 6 * @(#)rk.c 7.3 (Berkeley) 01/28/88 7 */ 8 9 /* 10 * RK611/RK07 11 */ 12 #include "param.h" 13 #include "inode.h" 14 #include "fs.h" 15 #include "disklabel.h" 16 17 #include "../vax/pte.h" 18 19 #include "../vaxuba/ubareg.h" 20 #include "../vaxuba/rkreg.h" 21 22 #include "saio.h" 23 #include "savax.h" 24 25 #define SECTSIZ 512 /* sector size in bytes */ 26 27 u_short rkstd[] = { 0777440 }; 28 struct disklabel rklabel[MAXNUBA*8]; 29 char lbuf[SECTSIZ]; 30 31 rkopen(io) 32 register struct iob *io; 33 { 34 register struct rkdevice *rkaddr = (struct rkdevice *)ubamem(io->i_unit, rkstd[0]); 35 register struct disklabel *lp = &rklabel[io->i_unit]; 36 struct iob tio; 37 38 if (badaddr((char *)rkaddr, sizeof(short))) { 39 printf("nonexistent device"); 40 return (ENXIO); 41 } 42 rkaddr->rkcs2 = RKCS2_SCLR; 43 rkwait(rkaddr); 44 /* 45 * Read in the pack label. 46 */ 47 lp->d_nsectors = NRKSECT; 48 lp->d_secpercyl = NRKTRK*NRKSECT; 49 tio = *io; 50 tio.i_bn = LABELSECTOR; 51 tio.i_ma = lbuf; 52 tio.i_cc = SECTSIZ; 53 tio.i_flgs |= F_RDDATA; 54 if (rkstrategy(&tio, READ) != SECTSIZ) { 55 printf("can't read disk label"); 56 return (EIO); 57 } 58 *lp = *(struct disklabel *)(lbuf + LABELOFFSET); 59 if (lp->d_magic != DISKMAGIC || lp->d_magic2 != DISKMAGIC) { 60 printf("hk%d: unlabeled\n", io->i_unit); 61 #ifdef COMPAT_42 62 rkmaptype(io, lp); 63 #else 64 return (ENXIO); 65 #endif 66 } 67 if ((unsigned)io->i_boff >= lp->d_npartitions || 68 (io->i_boff = lp->d_partitions[io->i_boff].p_offset) == -1) { 69 printf("rk: bad partition"); 70 return (EUNIT); 71 } 72 return (0); 73 } 74 75 #ifdef COMPAT_42 76 u_long rk_off[] = { 0, 241, 0, -1, -1, -1, 393, -1 }; 77 78 rkmaptype(io, lp) 79 struct iob *io; 80 register struct disklabel *lp; 81 { 82 register struct partition *pp; 83 register i; 84 register u_long *off = rk_off; 85 86 lp->d_npartitions = 8; 87 pp = lp->d_partitions; 88 for (i = 0; i < 8; i++, pp++) 89 pp->p_offset = *off++; 90 } 91 #endif 92 93 rkstrategy(io, func) 94 register struct iob *io; 95 { 96 register struct rkdevice *rkaddr = (struct rkdevice *)ubamem(io->i_unit, rkstd[0]); 97 int com; 98 register daddr_t bn; 99 short cn, sn, tn; 100 int ubinfo, errcnt = 0; 101 102 retry: 103 ubinfo = ubasetup(io, 1); 104 bn = io->i_bn; 105 cn = bn / (NRKSECT*NRKTRK); 106 sn = bn % NRKSECT; 107 tn = (bn / NRKSECT) % NRKTRK; 108 rkaddr->rkcs2 = UNITTODRIVE(io->i_unit); 109 rkaddr->rkcs1 = RK_CDT|RK_PACK|RK_GO; 110 rkwait(rkaddr); 111 rkaddr->rkcs1 = RK_CDT|RK_DCLR|RK_GO; 112 rkwait(rkaddr); 113 rkaddr->rkda = sn | (tn << 8); 114 rkaddr->rkcyl = cn; 115 rkaddr->rkba = ubinfo; 116 rkaddr->rkwc = -(io->i_cc >> 1); 117 com = RK_CDT|((ubinfo>>8)&0x300)|RK_GO; 118 if (func == READ) 119 com |= RK_READ; 120 else 121 com |= RK_WRITE; 122 rkaddr->rkcs1 = com; 123 rkwait(rkaddr); 124 while ((rkaddr->rkds & RKDS_SVAL) == 0) 125 ; 126 ubafree(io, ubinfo); 127 if (rkaddr->rkcs1 & RK_CERR) { 128 printf("rk error: (cyl,trk,sec)=(%d,%d,%d) cs2=%b er=%b\n", 129 cn, tn, sn, rkaddr->rkcs2, RKCS2_BITS, 130 rkaddr->rker, RKER_BITS); 131 rkaddr->rkcs1 = RK_CDT|RK_DCLR|RK_GO; 132 rkwait(rkaddr); 133 if (errcnt == 10) { 134 printf("rk: unrecovered error\n"); 135 return (-1); 136 } 137 errcnt++; 138 goto retry; 139 } 140 if (errcnt) 141 printf("rk: recovered by retry\n"); 142 return (io->i_cc); 143 } 144 145 rkwait(rkaddr) 146 register struct rkdevice *rkaddr; 147 { 148 149 while ((rkaddr->rkcs1 & RK_CRDY) == 0) 150 ; 151 } 152 153 /*ARGSUSED*/ 154 rkioctl(io, cmd, arg) 155 struct iob *io; 156 int cmd; 157 caddr_t arg; 158 { 159 160 return (ECMD); 161 } 162