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