1 /* $NetBSD: saio.c,v 1.9 2006/09/20 13:03:49 he Exp $ */ 2 3 /* 4 * Copyright (c) 1992, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * This code is derived from software contributed to Berkeley by 8 * Van Jacobson of Lawrence Berkeley Laboratory and Ralph Campbell. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. Neither the name of the University nor the names of its contributors 19 * may be used to endorse or promote products derived from this software 20 * without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 32 * SUCH DAMAGE. 33 * 34 * @(#)rz.c 8.1 (Berkeley) 6/10/93 35 */ 36 37 #include <lib/libsa/stand.h> 38 #include <lib/libkern/libkern.h> 39 #include <machine/prom.h> 40 #include <machine/stdarg.h> 41 42 #include <sys/param.h> 43 #include <sys/disklabel.h> 44 45 #include "common.h" 46 #include "saio.h" 47 48 struct saio_softc { 49 int sc_fd; /* PROM file id */ 50 int sc_ctlr; /* controller number */ 51 int sc_unit; /* disk unit number */ 52 int sc_part; /* disk partition number */ 53 struct disklabel sc_label; /* disk label for this disk */ 54 }; 55 56 struct io_arg { 57 int retval; 58 unsigned long sectst; 59 unsigned long memaddr; 60 unsigned long datasz; 61 }; 62 63 #define IOB_BUFSZ 512 64 #define IOB_INODESZ 316 65 66 struct device_table { 67 char *dt_string; /* device name */ 68 int (*dt_init) (int); /* device init routine */ 69 int (*dt_open) __P((int)); /* device open routine */ 70 int (*dt_strategy) __P((int)); /* device strategy routine, returns cnt */ 71 int (*dt_close) __P((int)); /* device close routine */ 72 int (*dt_ioctl) __P((int)); /* device ioctl routine */ 73 int dt_type; /* device "type" */ 74 int dt_fs; /* file system type */ 75 char *dt_desc; /* device description */ 76 }; 77 78 struct sa_iob { 79 char i_buf[IOB_BUFSZ]; /* file system or tape header */ 80 char i_ino_dir[IOB_INODESZ]; /* inode or disk/tape directory */ 81 82 int i_flgs; /* see F_ below */ 83 int i_ctlr; /* controller board */ 84 int i_unit; /* pseudo device unit */ 85 int i_part; /* disk partition */ 86 char *i_ma; /* memory address of i/o buffer */ 87 int i_cc; /* character count of transfer */ 88 int32_t i_offset; /* seek offset in file */ 89 /* XXX ondisk32 */ 90 int32_t i_bn; /* 1st block # of next read */ 91 int i_fstype; /* file system type */ 92 int i_errno; /* error # return */ 93 unsigned int i_devaddr; /* csr address */ 94 struct device_table *i_dp; /* pointer into device_table */ 95 char *i_bufp; /* i/o buffer for blk devs */ 96 }__attribute__((__packed__)); 97 98 extern struct sa_iob *saiob[]; 99 100 int 101 saiostrategy(devdata, rw, bn, reqcnt, addr, cnt) 102 void *devdata; 103 int rw; 104 daddr_t bn; 105 size_t reqcnt; 106 void *addr; 107 size_t *cnt; /* out: number of bytes transfered */ 108 { 109 struct saio_softc *sc = (struct saio_softc *)devdata; 110 int part = sc->sc_part; 111 struct partition *pp = &sc->sc_label.d_partitions[part]; 112 int s; 113 long offset; 114 struct sa_iob *iob; 115 char *adr; 116 117 offset = bn * DEV_BSIZE; 118 *cnt = 0; 119 120 /* 121 * Partial-block transfers not handled. 122 */ 123 if (reqcnt & (DEV_BSIZE - 1)) { 124 return (EINVAL); 125 } 126 offset += pp->p_offset * DEV_BSIZE; 127 128 iob = saiob[sc->sc_fd]; 129 iob->i_offset = offset; 130 131 #if notyet 132 if (prom_lseek(sc->sc_fd, offset, 0) < 0) 133 return (EIO); 134 #endif 135 136 adr = (char *)addr; 137 while (*cnt < reqcnt) { 138 s = prom_read(sc->sc_fd, iob->i_buf, 512); 139 if (s < 0) { 140 return (EIO); 141 } 142 memcpy(adr, iob->i_buf, s); 143 *cnt += s; 144 adr += s; 145 } 146 return (0); 147 } 148 149 int 150 saioopen(struct open_file *f, ...) 151 { 152 int ctlr, unit, part; 153 154 struct saio_softc *sc; 155 struct disklabel *lp; 156 int i; 157 char *msg; 158 char buf[DEV_BSIZE]; 159 int cnt; 160 static char device[] = "dksd(0,0,10)"; 161 162 va_list ap; 163 164 va_start(ap, f); 165 166 ctlr = va_arg(ap, int); 167 unit = va_arg(ap, int); 168 part = va_arg(ap, int); 169 170 va_end(ap); 171 172 device[5] = '0' + ctlr; 173 device[7] = '0' + unit; 174 175 i = prom_open(device, 0); 176 if (i < 0) { 177 printf("open failed\n"); 178 return (ENXIO); 179 } 180 181 sc = alloc(sizeof(struct saio_softc)); 182 memset(sc, 0, sizeof(struct saio_softc)); 183 f->f_devdata = (void *)sc; 184 185 sc->sc_fd = i; 186 sc->sc_ctlr = ctlr; 187 sc->sc_unit = unit; 188 sc->sc_part = part; 189 190 /* try to read disk label and partition table information */ 191 lp = &sc->sc_label; 192 lp->d_secsize = DEV_BSIZE; 193 lp->d_secpercyl = 1; 194 lp->d_npartitions = MAXPARTITIONS; 195 lp->d_partitions[part].p_offset = 0; 196 lp->d_partitions[part].p_size = 0x7fffffff; 197 198 i = saiostrategy(sc, F_READ, (daddr_t)LABELSECTOR, DEV_BSIZE, buf, &cnt); 199 if (i || cnt != DEV_BSIZE) { 200 printf("%s: error reading disk label\n", device); 201 goto bad; 202 } 203 204 msg = getdisklabel(buf, lp); 205 if (msg) { 206 #ifdef LIBSA_NO_DISKLABEL_MSGS 207 printf("%s: no disklabel\n", device); 208 #else 209 printf("getlabel: %s\n", msg); 210 #endif 211 return (0); 212 } 213 if (part >= lp->d_npartitions || lp->d_partitions[part].p_size == 0) { 214 bad: 215 dealloc(sc, sizeof(struct saio_softc)); 216 return (ENXIO); 217 } 218 return (0); 219 } 220 221 #ifndef LIBSA_NO_DEV_CLOSE 222 int 223 saioclose(f) 224 struct open_file *f; 225 { 226 227 prom_close(((struct saio_softc *)f->f_devdata)->sc_fd); 228 dealloc(f->f_devdata, sizeof(struct saio_softc)); 229 f->f_devdata = (void *)0; 230 return (0); 231 } 232 #endif 233