xref: /netbsd-src/sys/arch/hp300/stand/common/rawfs.c (revision de1dfb1250df962f1ff3a011772cf58e605aed11)
1 /*	$NetBSD: rawfs.c,v 1.3 2003/11/14 16:52:40 tsutsui Exp $	*/
2 
3 /*
4  * Copyright (c) 1995 Gordon W. Ross
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. The name of the author may not be used to endorse or promote products
16  *    derived from this software without specific prior written permission.
17  * 4. All advertising materials mentioning features or use of this software
18  *    must display the following acknowledgement:
19  *      This product includes software developed by Gordon W. Ross
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31  */
32 
33 /*
34  * Raw file system - for stream devices like tapes.
35  * No random access, only sequential read allowed.
36  * This exists only to allow upper level code to be
37  * shielded from the fact that the device must be
38  * read only with whole block position and size.
39  */
40 
41 #include <sys/param.h>
42 
43 #include <lib/libsa/stand.h>
44 #include <hp300/stand/common/rawfs.h>
45 
46 extern int debug;
47 
48 /* Our devices are generally willing to do 8K transfers. */
49 #define	RAWFS_BSIZE	0x2000
50 
51 /*
52  * In-core open file.
53  */
54 struct rawfs_file {
55 	daddr_t		fs_nextblk;	/* block number to read next */
56 	int		fs_len;		/* amount left in f_buf */
57 	char *		fs_ptr;		/* read pointer into f_buf */
58 	char		fs_buf[RAWFS_BSIZE];
59 };
60 
61 static int rawfs_get_block(struct open_file *);
62 
63 int
64 rawfs_open(path, f)
65 	const char *path;
66 	struct open_file *f;
67 {
68 	struct rawfs_file *fs;
69 
70 	/*
71 	 * The actual tape driver has already been opened.
72 	 * Just allocate the I/O buffer, etc.
73 	 */
74 	fs = alloc(sizeof(struct rawfs_file));
75 	fs->fs_nextblk = 0;
76 	fs->fs_len = 0;
77 	fs->fs_ptr = fs->fs_buf;
78 
79 #ifdef	DEBUG_RAWFS
80 	printf("rawfs_open: fs=0x%x\n", (u_long)fs);
81 #endif
82 
83 	f->f_fsdata = fs;
84 	return 0;
85 }
86 
87 int
88 rawfs_close(f)
89 	struct open_file *f;
90 {
91 	struct rawfs_file *fs;
92 
93 	fs = (struct rawfs_file *) f->f_fsdata;
94 	f->f_fsdata = (void *)0;
95 
96 #ifdef	DEBUG_RAWFS
97 	printf("rawfs_close: fs=0x%x\n", (u_long)fs);
98 #endif
99 
100 	if (fs != (struct rawfs_file *)0)
101 		free(fs, sizeof(*fs));
102 
103 	return 0;
104 }
105 
106 int
107 rawfs_read(f, start, size, resid)
108 	struct open_file *f;
109 	void *start;
110 	u_int size;
111 	u_int *resid;
112 {
113 	struct rawfs_file *fs = (struct rawfs_file *)f->f_fsdata;
114 	char *addr = start;
115 	int error = 0;
116 	size_t csize;
117 
118 #ifdef DEBUG_RAWFS
119 	printf("rawfs_read: file=0x%x, start=0x%x, size=%d, resid=0x%x\n",
120 	    (u_long)f, (u_long)start, size, resid);
121 	printf("            fs=0x%x\n", (u_long)fs);
122 #endif
123 
124 	while (size != 0) {
125 
126 		if (fs->fs_len == 0)
127 			if ((error = rawfs_get_block(f)) != 0)
128 				break;
129 
130 		if (fs->fs_len <= 0)
131 			break;	/* EOF */
132 
133 		csize = size;
134 		if (csize > fs->fs_len)
135 			csize = fs->fs_len;
136 
137 		memcpy(addr, fs->fs_ptr, csize);
138 		fs->fs_ptr += csize;
139 		fs->fs_len -= csize;
140 		addr += csize;
141 		size -= csize;
142 	}
143 	if (resid)
144 		*resid = size;
145 	return error;
146 }
147 
148 int
149 rawfs_write(f, start, size, resid)
150 	struct open_file *f;
151 	void *start;
152 	size_t size;
153 	size_t *resid;	/* out */
154 {
155 #ifdef	DEBUG_RAWFS
156 	printf("rawfs_write: YOU'RE NOT SUPPOSED TO GET HERE!\n");
157 #endif
158 	return EROFS;
159 }
160 
161 off_t
162 rawfs_seek(f, offset, where)
163 	struct open_file *f;
164 	off_t offset;
165 	int where;
166 {
167 
168 #ifdef	DEBUG_RAWFS
169 	printf("rawfs_seek: YOU'RE NOT SUPPOSED TO GET HERE!\n");
170 #endif
171 	return EFTYPE;
172 }
173 
174 int
175 rawfs_stat(f, sb)
176 	struct open_file *f;
177 	struct stat *sb;
178 {
179 
180 #ifdef	DEBUG_RAWFS
181 	printf("rawfs_stat: I'll let you live only because of exec.c\n");
182 #endif
183 	/*
184 	 * Clear out the stat buffer so that the uid check
185 	 * won't fail.  See sys/lib/libsa/exec.c
186 	 */
187 	memset(sb, 0, sizeof(*sb));
188 
189 	return EFTYPE;
190 }
191 
192 /*
193  * Read a block from the underlying stream device
194  * (In our case, a tape drive.)
195  */
196 static int
197 rawfs_get_block(f)
198 	struct open_file *f;
199 {
200 	struct rawfs_file *fs;
201 	int error, len;
202 
203 	fs = (struct rawfs_file *)f->f_fsdata;
204 	fs->fs_ptr = fs->fs_buf;
205 
206 	twiddle();
207 #ifdef DEBUG_RAWFS
208 	printf("rawfs_get_block: calling strategy\n");
209 #endif
210 	error = f->f_dev->dv_strategy(f->f_devdata, F_READ,
211 		fs->fs_nextblk, RAWFS_BSIZE, fs->fs_buf, &len);
212 #ifdef DEBUG_RAWFS
213 	printf("rawfs_get_block: strategy returned %d\n", error);
214 #endif
215 
216 	if (!error) {
217 		fs->fs_len = len;
218 		fs->fs_nextblk += (RAWFS_BSIZE / DEV_BSIZE);
219 	}
220 
221 	return error;
222 }
223