1 /* $NetBSD: rawfs.c,v 1.11 2009/10/21 23:12:09 snj 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 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 26 */ 27 28 /* 29 * Raw file system - for stream devices like tapes. 30 * No random access, only sequential read allowed. 31 * This exists only to allow upper level code to be 32 * shielded from the fact that the device must be 33 * read only with whole block position and size. 34 */ 35 36 #include <sys/param.h> 37 #include <lib/libsa/stand.h> 38 #include <rawfs.h> 39 40 extern int debug; 41 42 #define RAWFS_BSIZE 8192 43 44 /* 45 * In-core open file. 46 */ 47 struct file { 48 daddr_t fs_nextblk; /* block number to read next */ 49 daddr_t fs_curblk; /* block number currently in buffer */ 50 int fs_len; /* amount left in f_buf */ 51 char *fs_ptr; /* read pointer into f_buf */ 52 char fs_buf[RAWFS_BSIZE]; 53 }; 54 55 static int rawfs_get_block(struct open_file *); 56 57 int rawfs_open(const char *path, struct open_file *f) 58 { 59 struct file *fs; 60 61 /* 62 * The actual PROM driver has already been opened. 63 * Just allocate the I/O buffer, etc. 64 */ 65 fs = alloc(sizeof(struct file)); 66 fs->fs_nextblk = 0; 67 fs->fs_curblk = -1; 68 fs->fs_len = 0; 69 fs->fs_ptr = fs->fs_buf; 70 71 f->f_fsdata = fs; 72 return 0; 73 } 74 75 int rawfs_close(struct open_file *f) 76 { 77 struct file *fs; 78 79 fs = (struct file *)f->f_fsdata; 80 f->f_fsdata = NULL; 81 82 if (fs != NULL) 83 dealloc(fs, sizeof(*fs)); 84 85 return 0; 86 } 87 88 int rawfs_read(struct open_file *f, void *start, u_int size, u_int *resid) 89 { 90 struct file *fs = (struct file *)f->f_fsdata; 91 char *addr = start; 92 int error = 0; 93 size_t csize; 94 95 while (size != 0) { 96 97 if (fs->fs_len == 0) 98 if ((error = rawfs_get_block(f)) != 0) 99 break; 100 101 if (fs->fs_len <= 0) 102 break; /* EOF */ 103 104 csize = size; 105 if (csize > fs->fs_len) 106 csize = fs->fs_len; 107 108 memcpy(addr, fs->fs_ptr, csize); 109 fs->fs_ptr += csize; 110 fs->fs_len -= csize; 111 addr += csize; 112 size -= csize; 113 } 114 if (resid) 115 *resid = size; 116 117 if (error) { 118 errno = error; 119 error = -1; 120 } 121 122 return error; 123 } 124 125 int rawfs_write(struct open_file *f, void *start, size_t size, size_t *resid) 126 { 127 128 errno = EROFS; 129 return -1; 130 } 131 132 off_t rawfs_seek(struct open_file *f, off_t offset, int where) 133 { 134 struct file *fs = (struct file *)f->f_fsdata; 135 daddr_t curblk, targblk; 136 off_t newoff; 137 int err, idx; 138 139 /* 140 * We support a very minimal feature set for lseek(2); just 141 * enough to allow loadfile() to work with the parameters 142 * we pass to it on boot. 143 * 144 * In all cases, we can't seek back past the start of the 145 * current block. 146 */ 147 curblk = (fs->fs_curblk < 0) ? 0 : fs->fs_curblk; 148 149 /* 150 * Only support SEEK_SET and SEEK_CUR which result in offsets 151 * which don't require seeking backwards. 152 */ 153 switch (where) { 154 case SEEK_SET: 155 newoff = offset; 156 break; 157 158 case SEEK_CUR: 159 if (fs->fs_curblk < 0) 160 newoff = 0; 161 else { 162 newoff = fs->fs_curblk * RAWFS_BSIZE; 163 newoff += RAWFS_BSIZE - fs->fs_len; 164 } 165 newoff += offset; 166 break; 167 168 default: 169 errno = EINVAL; 170 return -1; 171 } 172 173 if (newoff < (curblk * RAWFS_BSIZE)) { 174 errno = EINVAL; 175 return -1; 176 } 177 178 targblk = newoff / RAWFS_BSIZE; 179 180 /* 181 * If necessary, skip blocks until we hit the required target 182 */ 183 err = 0; 184 while (fs->fs_curblk != targblk && (err = rawfs_get_block(f)) == 0) 185 ; 186 187 if (err) { 188 errno = err; 189 return -1; 190 } 191 192 /* 193 * Update the index within the loaded block 194 */ 195 idx = newoff % RAWFS_BSIZE; 196 fs->fs_len = RAWFS_BSIZE - idx; 197 fs->fs_ptr = &fs->fs_buf[idx]; 198 199 return newoff; 200 } 201 202 int rawfs_stat(struct open_file *f, struct stat *sb) 203 { 204 205 errno = EFTYPE; 206 return -1; 207 } 208 209 210 /* 211 * Read a block from the underlying stream device 212 * (In our case, a tape drive.) 213 */ 214 static int 215 rawfs_get_block(struct open_file *f) 216 { 217 struct file *fs; 218 int error; 219 size_t len; 220 221 fs = (struct file *)f->f_fsdata; 222 fs->fs_ptr = fs->fs_buf; 223 224 twiddle(); 225 error = f->f_dev->dv_strategy(f->f_devdata, F_READ, 226 fs->fs_nextblk * (RAWFS_BSIZE / DEV_BSIZE), 227 RAWFS_BSIZE, fs->fs_buf, &len); 228 229 if (error == 0) { 230 fs->fs_len = len; 231 fs->fs_curblk = fs->fs_nextblk; 232 fs->fs_nextblk += 1; 233 } else { 234 errno = error; 235 error = -1; 236 } 237 238 return error; 239 } 240