saio.c revision 1.10 1 /* $NetBSD: saio.c,v 1.10 2009/03/14 14:46:03 dsl 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)(int); /* device open routine */
70 int (*dt_strategy)(int); /* device strategy routine, returns cnt */
71 int (*dt_close)(int); /* device close routine */
72 int (*dt_ioctl)(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