projects / unix-history / blame
| Commit | Line | Data |
|---|---|---|
| 55b4dbd0 KM |
1 | /* |
| 2 | * Copyright (c) 1982 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 6.2 (Berkeley) %G% | |
| 7 | */ | |
| f2a29127 BJ |
8 | |
| 9 | /* | |
| 99fe9747 | 10 | * RK611/RK07 |
| f2a29127 | 11 | */ |
| faeec66d | 12 | #include "../machine/pte.h" |
| f2a29127 BJ |
13 | |
| 14 | #include "../h/param.h" | |
| 15 | #include "../h/inode.h" | |
| b5d17f4d | 16 | #include "../h/fs.h" |
| a031a31b SL |
17 | |
| 18 | #include "../vaxuba/ubareg.h" | |
| 19 | #include "../vaxuba/rkreg.h" | |
| 20 | ||
| f2a29127 | 21 | #include "saio.h" |
| 99fe9747 | 22 | #include "savax.h" |
| f2a29127 | 23 | |
| 99fe9747 BJ |
24 | u_short rkstd[] = { 0777440 }; |
| 25 | short rk_off[] = { 0, 241, 0, -1, -1, -1, 393, -1 }; | |
| f2a29127 BJ |
26 | |
| 27 | rkopen(io) | |
| 99fe9747 | 28 | register struct iob *io; |
| f2a29127 | 29 | { |
| 10899d3a | 30 | register struct rkdevice *rkaddr = (struct rkdevice *)ubamem(io->i_unit, rkstd[0]); |
| f2a29127 | 31 | |
| 99fe9747 | 32 | if (rk_off[io->i_boff] == -1 || |
| f2a29127 BJ |
33 | io->i_boff < 0 || io->i_boff > 7) |
| 34 | _stop("rk bad unit"); | |
| 99fe9747 | 35 | io->i_boff = rk_off[io->i_boff] * NRKSECT*NRKTRK; |
| 10899d3a BJ |
36 | rkaddr->rkcs2 = RKCS2_SCLR; |
| 37 | rkwait(rkaddr); | |
| f2a29127 BJ |
38 | } |
| 39 | ||
| 40 | rkstrategy(io, func) | |
| 99fe9747 | 41 | register struct iob *io; |
| f2a29127 | 42 | { |
| 99fe9747 BJ |
43 | register struct rkdevice *rkaddr = (struct rkdevice *)ubamem(io->i_unit, rkstd[0]); |
| 44 | int com; | |
| f2a29127 BJ |
45 | daddr_t bn; |
| 46 | short dn, cn, sn, tn; | |
| 10899d3a | 47 | int ubinfo, errcnt = 0; |
| f2a29127 | 48 | |
| 10899d3a | 49 | retry: |
| f2a29127 BJ |
50 | ubinfo = ubasetup(io, 1); |
| 51 | bn = io->i_bn; | |
| 52 | dn = io->i_unit; | |
| 99fe9747 BJ |
53 | cn = bn/(NRKSECT*NRKTRK); |
| 54 | sn = bn%NRKSECT; | |
| 55 | tn = (bn / NRKSECT) % NRKTRK; | |
| 56 | rkaddr->rkcs2 = dn; | |
| 57 | rkaddr->rkcs1 = RK_CDT|RK_PACK|RK_GO; | |
| 58 | rkwait(rkaddr); | |
| 10899d3a BJ |
59 | rkaddr->rkcs1 = RK_CDT|RK_DCLR|RK_GO; |
| 60 | rkwait(rkaddr); | |
| 99fe9747 BJ |
61 | rkaddr->rkda = sn | (tn << 8); |
| 62 | rkaddr->rkcyl = cn; | |
| 63 | rkaddr->rkba = ubinfo; | |
| 64 | rkaddr->rkwc = -(io->i_cc >> 1); | |
| 46fa6ed3 | 65 | com = RK_CDT|((ubinfo>>8)&0x300)|RK_GO; |
| 99fe9747 BJ |
66 | if (func == READ) |
| 67 | com |= RK_READ; | |
| 68 | else | |
| 69 | com |= RK_WRITE; | |
| 70 | rkaddr->rkcs1 = com; | |
| 71 | rkwait(rkaddr); | |
| 10899d3a | 72 | while ((rkaddr->rkds & RKDS_SVAL) == 0) |
| f2a29127 | 73 | ; |
| 99fe9747 BJ |
74 | ubafree(io, ubinfo); |
| 75 | if (rkaddr->rkcs1 & RK_CERR) { | |
| 10899d3a BJ |
76 | printf("rk error: (cyl,trk,sec)=(%d,%d,%d) cs2=%b er=%b\n", |
| 77 | cn, tn, sn, rkaddr->rkcs2, RKCS2_BITS, | |
| 78 | rkaddr->rker, RKER_BITS); | |
| 79 | rkaddr->rkcs1 = RK_CDT|RK_DCLR|RK_GO; | |
| 99fe9747 | 80 | rkwait(rkaddr); |
| 10899d3a BJ |
81 | if (errcnt == 10) { |
| 82 | printf("rk: unrecovered error\n"); | |
| 83 | return (-1); | |
| 84 | } | |
| 85 | errcnt++; | |
| 86 | goto retry; | |
| f2a29127 | 87 | } |
| 10899d3a BJ |
88 | if (errcnt) |
| 89 | printf("rk: recovered by retry\n"); | |
| f2a29127 BJ |
90 | return (io->i_cc); |
| 91 | } | |
| 99fe9747 BJ |
92 | |
| 93 | rkwait(rkaddr) | |
| 94 | register struct rkdevice *rkaddr; | |
| 95 | { | |
| 96 | ||
| 97 | while ((rkaddr->rkcs1 & RK_CRDY) == 0) | |
| 98 | ; | |
| 99 | } | |
| 75f313ad SL |
100 | |
| 101 | /*ARGSUSED*/ | |
| 102 | rkioctl(io, cmd, arg) | |
| 103 | struct iob *io; | |
| 104 | int cmd; | |
| 105 | caddr_t arg; | |
| 106 | { | |
| 107 | ||
| 108 | return (ECMD); | |
| 109 | } |