udf_subr.c revision 1.10.2.4
1 1.10.2.4 yamt /* $NetBSD: udf_subr.c,v 1.10.2.4 2007/02/26 09:11:01 yamt Exp $ */ 2 1.10.2.2 yamt 3 1.10.2.2 yamt /* 4 1.10.2.2 yamt * Copyright (c) 2006 Reinoud Zandijk 5 1.10.2.2 yamt * All rights reserved. 6 1.10.2.2 yamt * 7 1.10.2.2 yamt * Redistribution and use in source and binary forms, with or without 8 1.10.2.2 yamt * modification, are permitted provided that the following conditions 9 1.10.2.2 yamt * are met: 10 1.10.2.2 yamt * 1. Redistributions of source code must retain the above copyright 11 1.10.2.2 yamt * notice, this list of conditions and the following disclaimer. 12 1.10.2.2 yamt * 2. Redistributions in binary form must reproduce the above copyright 13 1.10.2.2 yamt * notice, this list of conditions and the following disclaimer in the 14 1.10.2.2 yamt * documentation and/or other materials provided with the distribution. 15 1.10.2.2 yamt * 3. All advertising materials mentioning features or use of this software 16 1.10.2.2 yamt * must display the following acknowledgement: 17 1.10.2.2 yamt * This product includes software developed for the 18 1.10.2.2 yamt * NetBSD Project. See http://www.NetBSD.org/ for 19 1.10.2.2 yamt * information about NetBSD. 20 1.10.2.2 yamt * 4. The name of the author may not be used to endorse or promote products 21 1.10.2.2 yamt * derived from this software without specific prior written permission. 22 1.10.2.2 yamt * 23 1.10.2.2 yamt * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 24 1.10.2.2 yamt * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 25 1.10.2.2 yamt * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 26 1.10.2.2 yamt * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 27 1.10.2.2 yamt * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 28 1.10.2.2 yamt * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 29 1.10.2.2 yamt * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 30 1.10.2.2 yamt * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 31 1.10.2.2 yamt * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 32 1.10.2.2 yamt * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 33 1.10.2.2 yamt * 34 1.10.2.2 yamt */ 35 1.10.2.2 yamt 36 1.10.2.2 yamt 37 1.10.2.2 yamt #include <sys/cdefs.h> 38 1.10.2.2 yamt #ifndef lint 39 1.10.2.4 yamt __RCSID("$NetBSD: udf_subr.c,v 1.10.2.4 2007/02/26 09:11:01 yamt Exp $"); 40 1.10.2.2 yamt #endif /* not lint */ 41 1.10.2.2 yamt 42 1.10.2.2 yamt 43 1.10.2.2 yamt #if defined(_KERNEL_OPT) 44 1.10.2.2 yamt #include "opt_quota.h" 45 1.10.2.2 yamt #include "opt_compat_netbsd.h" 46 1.10.2.2 yamt #endif 47 1.10.2.2 yamt 48 1.10.2.2 yamt #include <sys/param.h> 49 1.10.2.2 yamt #include <sys/systm.h> 50 1.10.2.2 yamt #include <sys/sysctl.h> 51 1.10.2.2 yamt #include <sys/namei.h> 52 1.10.2.2 yamt #include <sys/proc.h> 53 1.10.2.2 yamt #include <sys/kernel.h> 54 1.10.2.2 yamt #include <sys/vnode.h> 55 1.10.2.2 yamt #include <miscfs/genfs/genfs_node.h> 56 1.10.2.2 yamt #include <sys/mount.h> 57 1.10.2.2 yamt #include <sys/buf.h> 58 1.10.2.2 yamt #include <sys/file.h> 59 1.10.2.2 yamt #include <sys/device.h> 60 1.10.2.2 yamt #include <sys/disklabel.h> 61 1.10.2.2 yamt #include <sys/ioctl.h> 62 1.10.2.2 yamt #include <sys/malloc.h> 63 1.10.2.2 yamt #include <sys/dirent.h> 64 1.10.2.2 yamt #include <sys/stat.h> 65 1.10.2.2 yamt #include <sys/conf.h> 66 1.10.2.2 yamt #include <sys/kauth.h> 67 1.10.2.4 yamt #include <dev/clock_subr.h> 68 1.10.2.2 yamt 69 1.10.2.2 yamt #include <fs/udf/ecma167-udf.h> 70 1.10.2.2 yamt #include <fs/udf/udf_mount.h> 71 1.10.2.2 yamt 72 1.10.2.2 yamt #include "udf.h" 73 1.10.2.2 yamt #include "udf_subr.h" 74 1.10.2.2 yamt #include "udf_bswap.h" 75 1.10.2.2 yamt 76 1.10.2.2 yamt 77 1.10.2.2 yamt #define VTOI(vnode) ((struct udf_node *) vnode->v_data) 78 1.10.2.2 yamt 79 1.10.2.2 yamt 80 1.10.2.2 yamt /* predefines */ 81 1.10.2.2 yamt 82 1.10.2.2 yamt 83 1.10.2.2 yamt #if 0 84 1.10.2.2 yamt { 85 1.10.2.2 yamt int i, j, dlen; 86 1.10.2.2 yamt uint8_t *blob; 87 1.10.2.2 yamt 88 1.10.2.2 yamt blob = (uint8_t *) fid; 89 1.10.2.2 yamt dlen = file_size - (*offset); 90 1.10.2.2 yamt 91 1.10.2.2 yamt printf("blob = %p\n", blob); 92 1.10.2.2 yamt printf("dump of %d bytes\n", dlen); 93 1.10.2.2 yamt 94 1.10.2.2 yamt for (i = 0; i < dlen; i+ = 16) { 95 1.10.2.2 yamt printf("%04x ", i); 96 1.10.2.2 yamt for (j = 0; j < 16; j++) { 97 1.10.2.2 yamt if (i+j < dlen) { 98 1.10.2.2 yamt printf("%02x ", blob[i+j]); 99 1.10.2.2 yamt } else { 100 1.10.2.2 yamt printf(" "); 101 1.10.2.2 yamt } 102 1.10.2.2 yamt } 103 1.10.2.2 yamt for (j = 0; j < 16; j++) { 104 1.10.2.2 yamt if (i+j < dlen) { 105 1.10.2.2 yamt if (blob[i+j]>32 && blob[i+j]! = 127) { 106 1.10.2.2 yamt printf("%c", blob[i+j]); 107 1.10.2.2 yamt } else { 108 1.10.2.2 yamt printf("."); 109 1.10.2.2 yamt } 110 1.10.2.2 yamt } 111 1.10.2.2 yamt } 112 1.10.2.2 yamt printf("\n"); 113 1.10.2.2 yamt } 114 1.10.2.2 yamt printf("\n"); 115 1.10.2.2 yamt } 116 1.10.2.2 yamt Debugger(); 117 1.10.2.2 yamt #endif 118 1.10.2.2 yamt 119 1.10.2.2 yamt 120 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 121 1.10.2.2 yamt 122 1.10.2.2 yamt /* STUB */ 123 1.10.2.2 yamt 124 1.10.2.2 yamt static int 125 1.10.2.2 yamt udf_bread(struct udf_mount *ump, uint32_t sector, struct buf **bpp) 126 1.10.2.2 yamt { 127 1.10.2.2 yamt int sector_size = ump->discinfo.sector_size; 128 1.10.2.2 yamt int blks = sector_size / DEV_BSIZE; 129 1.10.2.2 yamt 130 1.10.2.2 yamt /* NOTE bread() checks if block is in cache or not */ 131 1.10.2.2 yamt return bread(ump->devvp, sector*blks, sector_size, NOCRED, bpp); 132 1.10.2.2 yamt } 133 1.10.2.2 yamt 134 1.10.2.2 yamt 135 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 136 1.10.2.2 yamt 137 1.10.2.2 yamt /* 138 1.10.2.2 yamt * Check if the blob starts with a good UDF tag. Tags are protected by a 139 1.10.2.2 yamt * checksum over the reader except one byte at position 4 that is the checksum 140 1.10.2.2 yamt * itself. 141 1.10.2.2 yamt */ 142 1.10.2.2 yamt 143 1.10.2.2 yamt int 144 1.10.2.2 yamt udf_check_tag(void *blob) 145 1.10.2.2 yamt { 146 1.10.2.2 yamt struct desc_tag *tag = blob; 147 1.10.2.2 yamt uint8_t *pos, sum, cnt; 148 1.10.2.2 yamt 149 1.10.2.2 yamt /* check TAG header checksum */ 150 1.10.2.2 yamt pos = (uint8_t *) tag; 151 1.10.2.2 yamt sum = 0; 152 1.10.2.2 yamt 153 1.10.2.2 yamt for(cnt = 0; cnt < 16; cnt++) { 154 1.10.2.2 yamt if (cnt != 4) 155 1.10.2.2 yamt sum += *pos; 156 1.10.2.2 yamt pos++; 157 1.10.2.2 yamt } 158 1.10.2.2 yamt if (sum != tag->cksum) { 159 1.10.2.2 yamt /* bad tag header checksum; this is not a valid tag */ 160 1.10.2.2 yamt return EINVAL; 161 1.10.2.2 yamt } 162 1.10.2.2 yamt 163 1.10.2.2 yamt return 0; 164 1.10.2.2 yamt } 165 1.10.2.2 yamt 166 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 167 1.10.2.2 yamt 168 1.10.2.2 yamt /* 169 1.10.2.2 yamt * check tag payload will check descriptor CRC as specified. 170 1.10.2.2 yamt * If the descriptor is too short, it will return EIO otherwise EINVAL. 171 1.10.2.2 yamt */ 172 1.10.2.2 yamt 173 1.10.2.2 yamt int 174 1.10.2.2 yamt udf_check_tag_payload(void *blob, uint32_t max_length) 175 1.10.2.2 yamt { 176 1.10.2.2 yamt struct desc_tag *tag = blob; 177 1.10.2.2 yamt uint16_t crc, crc_len; 178 1.10.2.2 yamt 179 1.10.2.2 yamt crc_len = udf_rw16(tag->desc_crc_len); 180 1.10.2.2 yamt 181 1.10.2.2 yamt /* check payload CRC if applicable */ 182 1.10.2.2 yamt if (crc_len == 0) 183 1.10.2.2 yamt return 0; 184 1.10.2.2 yamt 185 1.10.2.2 yamt if (crc_len > max_length) 186 1.10.2.2 yamt return EIO; 187 1.10.2.2 yamt 188 1.10.2.2 yamt crc = udf_cksum(((uint8_t *) tag) + UDF_DESC_TAG_LENGTH, crc_len); 189 1.10.2.2 yamt if (crc != udf_rw16(tag->desc_crc)) { 190 1.10.2.2 yamt /* bad payload CRC; this is a broken tag */ 191 1.10.2.2 yamt return EINVAL; 192 1.10.2.2 yamt } 193 1.10.2.2 yamt 194 1.10.2.2 yamt return 0; 195 1.10.2.2 yamt } 196 1.10.2.2 yamt 197 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 198 1.10.2.2 yamt 199 1.10.2.2 yamt int 200 1.10.2.2 yamt udf_validate_tag_sum(void *blob) 201 1.10.2.2 yamt { 202 1.10.2.2 yamt struct desc_tag *tag = blob; 203 1.10.2.2 yamt uint8_t *pos, sum, cnt; 204 1.10.2.2 yamt 205 1.10.2.2 yamt /* calculate TAG header checksum */ 206 1.10.2.2 yamt pos = (uint8_t *) tag; 207 1.10.2.2 yamt sum = 0; 208 1.10.2.2 yamt 209 1.10.2.2 yamt for(cnt = 0; cnt < 16; cnt++) { 210 1.10.2.2 yamt if (cnt != 4) sum += *pos; 211 1.10.2.2 yamt pos++; 212 1.10.2.2 yamt } 213 1.10.2.2 yamt tag->cksum = sum; /* 8 bit */ 214 1.10.2.2 yamt 215 1.10.2.2 yamt return 0; 216 1.10.2.2 yamt } 217 1.10.2.2 yamt 218 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 219 1.10.2.2 yamt 220 1.10.2.2 yamt /* assumes sector number of descriptor to be saved already present */ 221 1.10.2.2 yamt 222 1.10.2.2 yamt int 223 1.10.2.2 yamt udf_validate_tag_and_crc_sums(void *blob) 224 1.10.2.2 yamt { 225 1.10.2.2 yamt struct desc_tag *tag = blob; 226 1.10.2.2 yamt uint8_t *btag = (uint8_t *) tag; 227 1.10.2.2 yamt uint16_t crc, crc_len; 228 1.10.2.2 yamt 229 1.10.2.2 yamt crc_len = udf_rw16(tag->desc_crc_len); 230 1.10.2.2 yamt 231 1.10.2.2 yamt /* check payload CRC if applicable */ 232 1.10.2.2 yamt if (crc_len > 0) { 233 1.10.2.2 yamt crc = udf_cksum(btag + UDF_DESC_TAG_LENGTH, crc_len); 234 1.10.2.2 yamt tag->desc_crc = udf_rw16(crc); 235 1.10.2.2 yamt } 236 1.10.2.2 yamt 237 1.10.2.2 yamt /* calculate TAG header checksum */ 238 1.10.2.2 yamt return udf_validate_tag_sum(blob); 239 1.10.2.2 yamt } 240 1.10.2.2 yamt 241 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 242 1.10.2.2 yamt 243 1.10.2.2 yamt /* 244 1.10.2.2 yamt * XXX note the different semantics from udfclient: for FIDs it still rounds 245 1.10.2.2 yamt * up to sectors. Use udf_fidsize() for a correct length. 246 1.10.2.2 yamt */ 247 1.10.2.2 yamt 248 1.10.2.2 yamt int 249 1.10.2.2 yamt udf_tagsize(union dscrptr *dscr, uint32_t udf_sector_size) 250 1.10.2.2 yamt { 251 1.10.2.2 yamt uint32_t size, tag_id, num_secs, elmsz; 252 1.10.2.2 yamt 253 1.10.2.2 yamt tag_id = udf_rw16(dscr->tag.id); 254 1.10.2.2 yamt 255 1.10.2.2 yamt switch (tag_id) { 256 1.10.2.2 yamt case TAGID_LOGVOL : 257 1.10.2.2 yamt size = sizeof(struct logvol_desc) - 1; 258 1.10.2.2 yamt size += udf_rw32(dscr->lvd.mt_l); 259 1.10.2.2 yamt break; 260 1.10.2.2 yamt case TAGID_UNALLOC_SPACE : 261 1.10.2.2 yamt elmsz = sizeof(struct extent_ad); 262 1.10.2.2 yamt size = sizeof(struct unalloc_sp_desc) - elmsz; 263 1.10.2.2 yamt size += udf_rw32(dscr->usd.alloc_desc_num) * elmsz; 264 1.10.2.2 yamt break; 265 1.10.2.2 yamt case TAGID_FID : 266 1.10.2.2 yamt size = UDF_FID_SIZE + dscr->fid.l_fi + udf_rw16(dscr->fid.l_iu); 267 1.10.2.2 yamt size = (size + 3) & ~3; 268 1.10.2.2 yamt break; 269 1.10.2.2 yamt case TAGID_LOGVOL_INTEGRITY : 270 1.10.2.2 yamt size = sizeof(struct logvol_int_desc) - sizeof(uint32_t); 271 1.10.2.2 yamt size += udf_rw32(dscr->lvid.l_iu); 272 1.10.2.2 yamt size += (2 * udf_rw32(dscr->lvid.num_part) * sizeof(uint32_t)); 273 1.10.2.2 yamt break; 274 1.10.2.2 yamt case TAGID_SPACE_BITMAP : 275 1.10.2.2 yamt size = sizeof(struct space_bitmap_desc) - 1; 276 1.10.2.2 yamt size += udf_rw32(dscr->sbd.num_bytes); 277 1.10.2.2 yamt break; 278 1.10.2.2 yamt case TAGID_SPARING_TABLE : 279 1.10.2.2 yamt elmsz = sizeof(struct spare_map_entry); 280 1.10.2.2 yamt size = sizeof(struct udf_sparing_table) - elmsz; 281 1.10.2.2 yamt size += udf_rw16(dscr->spt.rt_l) * elmsz; 282 1.10.2.2 yamt break; 283 1.10.2.2 yamt case TAGID_FENTRY : 284 1.10.2.2 yamt size = sizeof(struct file_entry); 285 1.10.2.2 yamt size += udf_rw32(dscr->fe.l_ea) + udf_rw32(dscr->fe.l_ad)-1; 286 1.10.2.2 yamt break; 287 1.10.2.2 yamt case TAGID_EXTFENTRY : 288 1.10.2.2 yamt size = sizeof(struct extfile_entry); 289 1.10.2.2 yamt size += udf_rw32(dscr->efe.l_ea) + udf_rw32(dscr->efe.l_ad)-1; 290 1.10.2.2 yamt break; 291 1.10.2.2 yamt case TAGID_FSD : 292 1.10.2.2 yamt size = sizeof(struct fileset_desc); 293 1.10.2.2 yamt break; 294 1.10.2.2 yamt default : 295 1.10.2.2 yamt size = sizeof(union dscrptr); 296 1.10.2.2 yamt break; 297 1.10.2.2 yamt } 298 1.10.2.2 yamt 299 1.10.2.2 yamt if ((size == 0) || (udf_sector_size == 0)) return 0; 300 1.10.2.2 yamt 301 1.10.2.2 yamt /* round up in sectors */ 302 1.10.2.2 yamt num_secs = (size + udf_sector_size -1) / udf_sector_size; 303 1.10.2.2 yamt return num_secs * udf_sector_size; 304 1.10.2.2 yamt } 305 1.10.2.2 yamt 306 1.10.2.2 yamt 307 1.10.2.2 yamt static int 308 1.10.2.2 yamt udf_fidsize(struct fileid_desc *fid, uint32_t udf_sector_size) 309 1.10.2.2 yamt { 310 1.10.2.2 yamt uint32_t size; 311 1.10.2.2 yamt 312 1.10.2.2 yamt if (udf_rw16(fid->tag.id) != TAGID_FID) 313 1.10.2.2 yamt panic("got udf_fidsize on non FID\n"); 314 1.10.2.2 yamt 315 1.10.2.2 yamt size = UDF_FID_SIZE + fid->l_fi + udf_rw16(fid->l_iu); 316 1.10.2.2 yamt size = (size + 3) & ~3; 317 1.10.2.2 yamt 318 1.10.2.2 yamt return size; 319 1.10.2.2 yamt } 320 1.10.2.2 yamt 321 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 322 1.10.2.2 yamt 323 1.10.2.2 yamt /* 324 1.10.2.2 yamt * Problem with read_descriptor are long descriptors spanning more than one 325 1.10.2.2 yamt * sector. Luckily long descriptors can't be in `logical space'. 326 1.10.2.2 yamt * 327 1.10.2.2 yamt * Size of allocated piece is returned in multiple of sector size due to 328 1.10.2.2 yamt * udf_calc_udf_malloc_size(). 329 1.10.2.2 yamt */ 330 1.10.2.2 yamt 331 1.10.2.2 yamt int 332 1.10.2.2 yamt udf_read_descriptor(struct udf_mount *ump, uint32_t sector, 333 1.10.2.2 yamt struct malloc_type *mtype, union dscrptr **dstp) 334 1.10.2.2 yamt { 335 1.10.2.2 yamt union dscrptr *src, *dst; 336 1.10.2.2 yamt struct buf *bp; 337 1.10.2.2 yamt uint8_t *pos; 338 1.10.2.2 yamt int blks, blk, dscrlen; 339 1.10.2.2 yamt int i, error, sector_size; 340 1.10.2.2 yamt 341 1.10.2.2 yamt sector_size = ump->discinfo.sector_size; 342 1.10.2.2 yamt 343 1.10.2.2 yamt *dstp = dst = NULL; 344 1.10.2.2 yamt dscrlen = sector_size; 345 1.10.2.2 yamt 346 1.10.2.2 yamt /* read initial piece */ 347 1.10.2.2 yamt error = udf_bread(ump, sector, &bp); 348 1.10.2.2 yamt DPRINTFIF(DESCRIPTOR, error, ("read error (%d)\n", error)); 349 1.10.2.2 yamt 350 1.10.2.2 yamt if (!error) { 351 1.10.2.2 yamt /* check if its a valid tag */ 352 1.10.2.2 yamt error = udf_check_tag(bp->b_data); 353 1.10.2.2 yamt if (error) { 354 1.10.2.2 yamt /* check if its an empty block */ 355 1.10.2.2 yamt pos = bp->b_data; 356 1.10.2.2 yamt for (i = 0; i < sector_size; i++, pos++) { 357 1.10.2.2 yamt if (*pos) break; 358 1.10.2.2 yamt } 359 1.10.2.2 yamt if (i == sector_size) { 360 1.10.2.2 yamt /* return no error but with no dscrptr */ 361 1.10.2.2 yamt /* dispose first block */ 362 1.10.2.2 yamt brelse(bp); 363 1.10.2.2 yamt return 0; 364 1.10.2.2 yamt } 365 1.10.2.2 yamt } 366 1.10.2.2 yamt } 367 1.10.2.2 yamt DPRINTFIF(DESCRIPTOR, error, ("bad tag checksum\n")); 368 1.10.2.2 yamt if (!error) { 369 1.10.2.2 yamt src = (union dscrptr *) bp->b_data; 370 1.10.2.2 yamt dscrlen = udf_tagsize(src, sector_size); 371 1.10.2.2 yamt dst = malloc(dscrlen, mtype, M_WAITOK); 372 1.10.2.3 yamt memcpy(dst, src, sector_size); 373 1.10.2.2 yamt } 374 1.10.2.2 yamt /* dispose first block */ 375 1.10.2.2 yamt bp->b_flags |= B_AGE; 376 1.10.2.2 yamt brelse(bp); 377 1.10.2.2 yamt 378 1.10.2.2 yamt if (!error && (dscrlen > sector_size)) { 379 1.10.2.2 yamt DPRINTF(DESCRIPTOR, ("multi block descriptor read\n")); 380 1.10.2.2 yamt /* 381 1.10.2.2 yamt * Read the rest of descriptor. Since it is only used at mount 382 1.10.2.2 yamt * time its overdone to define and use a specific udf_breadn 383 1.10.2.2 yamt * for this alone. 384 1.10.2.2 yamt */ 385 1.10.2.2 yamt blks = (dscrlen + sector_size -1) / sector_size; 386 1.10.2.2 yamt for (blk = 1; blk < blks; blk++) { 387 1.10.2.2 yamt error = udf_bread(ump, sector + blk, &bp); 388 1.10.2.2 yamt if (error) { 389 1.10.2.2 yamt brelse(bp); 390 1.10.2.2 yamt break; 391 1.10.2.2 yamt } 392 1.10.2.2 yamt pos = (uint8_t *) dst + blk*sector_size; 393 1.10.2.2 yamt memcpy(pos, bp->b_data, sector_size); 394 1.10.2.2 yamt 395 1.10.2.2 yamt /* dispose block */ 396 1.10.2.2 yamt bp->b_flags |= B_AGE; 397 1.10.2.2 yamt brelse(bp); 398 1.10.2.2 yamt } 399 1.10.2.2 yamt DPRINTFIF(DESCRIPTOR, error, ("read error on multi (%d)\n", 400 1.10.2.2 yamt error)); 401 1.10.2.2 yamt } 402 1.10.2.2 yamt if (!error) { 403 1.10.2.2 yamt error = udf_check_tag_payload(dst, dscrlen); 404 1.10.2.2 yamt DPRINTFIF(DESCRIPTOR, error, ("bad payload check sum\n")); 405 1.10.2.2 yamt } 406 1.10.2.2 yamt if (error && dst) { 407 1.10.2.2 yamt free(dst, mtype); 408 1.10.2.2 yamt dst = NULL; 409 1.10.2.2 yamt } 410 1.10.2.2 yamt *dstp = dst; 411 1.10.2.2 yamt 412 1.10.2.2 yamt return error; 413 1.10.2.2 yamt } 414 1.10.2.2 yamt 415 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 416 1.10.2.2 yamt #ifdef DEBUG 417 1.10.2.2 yamt static void 418 1.10.2.2 yamt udf_dump_discinfo(struct udf_mount *ump) 419 1.10.2.2 yamt { 420 1.10.2.2 yamt char bits[128]; 421 1.10.2.2 yamt struct mmc_discinfo *di = &ump->discinfo; 422 1.10.2.2 yamt 423 1.10.2.2 yamt if ((udf_verbose & UDF_DEBUG_VOLUMES) == 0) 424 1.10.2.2 yamt return; 425 1.10.2.2 yamt 426 1.10.2.2 yamt printf("Device/media info :\n"); 427 1.10.2.2 yamt printf("\tMMC profile 0x%02x\n", di->mmc_profile); 428 1.10.2.2 yamt printf("\tderived class %d\n", di->mmc_class); 429 1.10.2.2 yamt printf("\tsector size %d\n", di->sector_size); 430 1.10.2.2 yamt printf("\tdisc state %d\n", di->disc_state); 431 1.10.2.2 yamt printf("\tlast ses state %d\n", di->last_session_state); 432 1.10.2.2 yamt printf("\tbg format state %d\n", di->bg_format_state); 433 1.10.2.2 yamt printf("\tfrst track %d\n", di->first_track); 434 1.10.2.2 yamt printf("\tfst on last ses %d\n", di->first_track_last_session); 435 1.10.2.2 yamt printf("\tlst on last ses %d\n", di->last_track_last_session); 436 1.10.2.2 yamt printf("\tlink block penalty %d\n", di->link_block_penalty); 437 1.10.2.2 yamt bitmask_snprintf(di->disc_flags, MMC_DFLAGS_FLAGBITS, bits, 438 1.10.2.2 yamt sizeof(bits)); 439 1.10.2.2 yamt printf("\tdisc flags %s\n", bits); 440 1.10.2.2 yamt printf("\tdisc id %x\n", di->disc_id); 441 1.10.2.2 yamt printf("\tdisc barcode %"PRIx64"\n", di->disc_barcode); 442 1.10.2.2 yamt 443 1.10.2.2 yamt printf("\tnum sessions %d\n", di->num_sessions); 444 1.10.2.2 yamt printf("\tnum tracks %d\n", di->num_tracks); 445 1.10.2.2 yamt 446 1.10.2.2 yamt bitmask_snprintf(di->mmc_cur, MMC_CAP_FLAGBITS, bits, sizeof(bits)); 447 1.10.2.2 yamt printf("\tcapabilities cur %s\n", bits); 448 1.10.2.2 yamt bitmask_snprintf(di->mmc_cap, MMC_CAP_FLAGBITS, bits, sizeof(bits)); 449 1.10.2.2 yamt printf("\tcapabilities cap %s\n", bits); 450 1.10.2.2 yamt } 451 1.10.2.2 yamt #else 452 1.10.2.2 yamt #define udf_dump_discinfo(a); 453 1.10.2.2 yamt #endif 454 1.10.2.2 yamt 455 1.10.2.2 yamt /* not called often */ 456 1.10.2.2 yamt int 457 1.10.2.2 yamt udf_update_discinfo(struct udf_mount *ump) 458 1.10.2.2 yamt { 459 1.10.2.2 yamt struct vnode *devvp = ump->devvp; 460 1.10.2.2 yamt struct partinfo dpart; 461 1.10.2.2 yamt struct mmc_discinfo *di; 462 1.10.2.2 yamt int error; 463 1.10.2.2 yamt 464 1.10.2.2 yamt DPRINTF(VOLUMES, ("read/update disc info\n")); 465 1.10.2.2 yamt di = &ump->discinfo; 466 1.10.2.2 yamt memset(di, 0, sizeof(struct mmc_discinfo)); 467 1.10.2.2 yamt 468 1.10.2.2 yamt /* check if we're on a MMC capable device, i.e. CD/DVD */ 469 1.10.2.2 yamt error = VOP_IOCTL(devvp, MMCGETDISCINFO, di, FKIOCTL, NOCRED, NULL); 470 1.10.2.2 yamt if (error == 0) { 471 1.10.2.2 yamt udf_dump_discinfo(ump); 472 1.10.2.2 yamt return 0; 473 1.10.2.2 yamt } 474 1.10.2.2 yamt 475 1.10.2.2 yamt /* disc partition support */ 476 1.10.2.2 yamt error = VOP_IOCTL(devvp, DIOCGPART, &dpart, FREAD, NOCRED, NULL); 477 1.10.2.2 yamt if (error) 478 1.10.2.2 yamt return ENODEV; 479 1.10.2.2 yamt 480 1.10.2.2 yamt /* set up a disc info profile for partitions */ 481 1.10.2.2 yamt di->mmc_profile = 0x01; /* disc type */ 482 1.10.2.2 yamt di->mmc_class = MMC_CLASS_DISC; 483 1.10.2.2 yamt di->disc_state = MMC_STATE_CLOSED; 484 1.10.2.2 yamt di->last_session_state = MMC_STATE_CLOSED; 485 1.10.2.2 yamt di->bg_format_state = MMC_BGFSTATE_COMPLETED; 486 1.10.2.2 yamt di->link_block_penalty = 0; 487 1.10.2.2 yamt 488 1.10.2.2 yamt di->mmc_cur = MMC_CAP_RECORDABLE | MMC_CAP_REWRITABLE | 489 1.10.2.2 yamt MMC_CAP_ZEROLINKBLK | MMC_CAP_HW_DEFECTFREE; 490 1.10.2.2 yamt di->mmc_cap = di->mmc_cur; 491 1.10.2.2 yamt di->disc_flags = MMC_DFLAGS_UNRESTRICTED; 492 1.10.2.2 yamt 493 1.10.2.2 yamt /* TODO problem with last_possible_lba on resizable VND; request */ 494 1.10.2.2 yamt di->last_possible_lba = dpart.part->p_size; 495 1.10.2.2 yamt di->sector_size = dpart.disklab->d_secsize; 496 1.10.2.2 yamt di->blockingnr = 1; 497 1.10.2.2 yamt 498 1.10.2.2 yamt di->num_sessions = 1; 499 1.10.2.2 yamt di->num_tracks = 1; 500 1.10.2.2 yamt 501 1.10.2.2 yamt di->first_track = 1; 502 1.10.2.2 yamt di->first_track_last_session = di->last_track_last_session = 1; 503 1.10.2.2 yamt 504 1.10.2.2 yamt udf_dump_discinfo(ump); 505 1.10.2.2 yamt return 0; 506 1.10.2.2 yamt } 507 1.10.2.2 yamt 508 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 509 1.10.2.2 yamt 510 1.10.2.2 yamt int 511 1.10.2.2 yamt udf_update_trackinfo(struct udf_mount *ump, struct mmc_trackinfo *ti) 512 1.10.2.2 yamt { 513 1.10.2.2 yamt struct vnode *devvp = ump->devvp; 514 1.10.2.2 yamt struct mmc_discinfo *di = &ump->discinfo; 515 1.10.2.2 yamt int error, class; 516 1.10.2.2 yamt 517 1.10.2.2 yamt DPRINTF(VOLUMES, ("read track info\n")); 518 1.10.2.2 yamt 519 1.10.2.2 yamt class = di->mmc_class; 520 1.10.2.2 yamt if (class != MMC_CLASS_DISC) { 521 1.10.2.2 yamt /* tracknr specified in struct ti */ 522 1.10.2.2 yamt error = VOP_IOCTL(devvp, MMCGETTRACKINFO, ti, FKIOCTL, 523 1.10.2.2 yamt NOCRED, NULL); 524 1.10.2.2 yamt return error; 525 1.10.2.2 yamt } 526 1.10.2.2 yamt 527 1.10.2.2 yamt /* disc partition support */ 528 1.10.2.2 yamt if (ti->tracknr != 1) 529 1.10.2.2 yamt return EIO; 530 1.10.2.2 yamt 531 1.10.2.2 yamt /* create fake ti (TODO check for resized vnds) */ 532 1.10.2.2 yamt ti->sessionnr = 1; 533 1.10.2.2 yamt 534 1.10.2.2 yamt ti->track_mode = 0; /* XXX */ 535 1.10.2.2 yamt ti->data_mode = 0; /* XXX */ 536 1.10.2.2 yamt ti->flags = MMC_TRACKINFO_LRA_VALID | MMC_TRACKINFO_NWA_VALID; 537 1.10.2.2 yamt 538 1.10.2.2 yamt ti->track_start = 0; 539 1.10.2.2 yamt ti->packet_size = 1; 540 1.10.2.2 yamt 541 1.10.2.2 yamt /* TODO support for resizable vnd */ 542 1.10.2.2 yamt ti->track_size = di->last_possible_lba; 543 1.10.2.2 yamt ti->next_writable = di->last_possible_lba; 544 1.10.2.2 yamt ti->last_recorded = ti->next_writable; 545 1.10.2.2 yamt ti->free_blocks = 0; 546 1.10.2.2 yamt 547 1.10.2.2 yamt return 0; 548 1.10.2.2 yamt } 549 1.10.2.2 yamt 550 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 551 1.10.2.2 yamt 552 1.10.2.2 yamt /* track/session searching for mounting */ 553 1.10.2.2 yamt 554 1.10.2.2 yamt static int 555 1.10.2.2 yamt udf_search_tracks(struct udf_mount *ump, struct udf_args *args, 556 1.10.2.2 yamt int *first_tracknr, int *last_tracknr) 557 1.10.2.2 yamt { 558 1.10.2.2 yamt struct mmc_trackinfo trackinfo; 559 1.10.2.2 yamt uint32_t tracknr, start_track, num_tracks; 560 1.10.2.2 yamt int error; 561 1.10.2.2 yamt 562 1.10.2.2 yamt /* if negative, sessionnr is relative to last session */ 563 1.10.2.2 yamt if (args->sessionnr < 0) { 564 1.10.2.2 yamt args->sessionnr += ump->discinfo.num_sessions; 565 1.10.2.2 yamt /* sanity */ 566 1.10.2.2 yamt if (args->sessionnr < 0) 567 1.10.2.2 yamt args->sessionnr = 0; 568 1.10.2.2 yamt } 569 1.10.2.2 yamt 570 1.10.2.2 yamt /* sanity */ 571 1.10.2.2 yamt if (args->sessionnr > ump->discinfo.num_sessions) 572 1.10.2.2 yamt args->sessionnr = ump->discinfo.num_sessions; 573 1.10.2.2 yamt 574 1.10.2.2 yamt /* search the tracks for this session, zero session nr indicates last */ 575 1.10.2.2 yamt if (args->sessionnr == 0) { 576 1.10.2.2 yamt args->sessionnr = ump->discinfo.num_sessions; 577 1.10.2.2 yamt if (ump->discinfo.last_session_state == MMC_STATE_EMPTY) { 578 1.10.2.2 yamt args->sessionnr--; 579 1.10.2.2 yamt } 580 1.10.2.2 yamt } 581 1.10.2.2 yamt 582 1.10.2.2 yamt /* search the first and last track of the specified session */ 583 1.10.2.2 yamt num_tracks = ump->discinfo.num_tracks; 584 1.10.2.2 yamt start_track = ump->discinfo.first_track; 585 1.10.2.2 yamt 586 1.10.2.2 yamt /* search for first track of this session */ 587 1.10.2.2 yamt for (tracknr = start_track; tracknr <= num_tracks; tracknr++) { 588 1.10.2.2 yamt /* get track info */ 589 1.10.2.2 yamt trackinfo.tracknr = tracknr; 590 1.10.2.2 yamt error = udf_update_trackinfo(ump, &trackinfo); 591 1.10.2.2 yamt if (error) 592 1.10.2.2 yamt return error; 593 1.10.2.2 yamt 594 1.10.2.2 yamt if (trackinfo.sessionnr == args->sessionnr) 595 1.10.2.2 yamt break; 596 1.10.2.2 yamt } 597 1.10.2.2 yamt *first_tracknr = tracknr; 598 1.10.2.2 yamt 599 1.10.2.2 yamt /* search for last track of this session */ 600 1.10.2.2 yamt for (;tracknr <= num_tracks; tracknr++) { 601 1.10.2.2 yamt /* get track info */ 602 1.10.2.2 yamt trackinfo.tracknr = tracknr; 603 1.10.2.2 yamt error = udf_update_trackinfo(ump, &trackinfo); 604 1.10.2.2 yamt if (error || (trackinfo.sessionnr != args->sessionnr)) { 605 1.10.2.2 yamt tracknr--; 606 1.10.2.2 yamt break; 607 1.10.2.2 yamt } 608 1.10.2.2 yamt } 609 1.10.2.2 yamt if (tracknr > num_tracks) 610 1.10.2.2 yamt tracknr--; 611 1.10.2.2 yamt 612 1.10.2.2 yamt *last_tracknr = tracknr; 613 1.10.2.2 yamt 614 1.10.2.2 yamt assert(*last_tracknr >= *first_tracknr); 615 1.10.2.2 yamt return 0; 616 1.10.2.2 yamt } 617 1.10.2.2 yamt 618 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 619 1.10.2.2 yamt 620 1.10.2.2 yamt static int 621 1.10.2.2 yamt udf_read_anchor(struct udf_mount *ump, uint32_t sector, struct anchor_vdp **dst) 622 1.10.2.2 yamt { 623 1.10.2.2 yamt int error; 624 1.10.2.2 yamt 625 1.10.2.2 yamt error = udf_read_descriptor(ump, sector, M_UDFVOLD, 626 1.10.2.2 yamt (union dscrptr **) dst); 627 1.10.2.2 yamt if (!error) { 628 1.10.2.2 yamt /* blank terminator blocks are not allowed here */ 629 1.10.2.2 yamt if (*dst == NULL) 630 1.10.2.2 yamt return ENOENT; 631 1.10.2.2 yamt if (udf_rw16((*dst)->tag.id) != TAGID_ANCHOR) { 632 1.10.2.2 yamt error = ENOENT; 633 1.10.2.2 yamt free(*dst, M_UDFVOLD); 634 1.10.2.2 yamt *dst = NULL; 635 1.10.2.2 yamt DPRINTF(VOLUMES, ("Not an anchor\n")); 636 1.10.2.2 yamt } 637 1.10.2.2 yamt } 638 1.10.2.2 yamt 639 1.10.2.2 yamt return error; 640 1.10.2.2 yamt } 641 1.10.2.2 yamt 642 1.10.2.2 yamt 643 1.10.2.2 yamt int 644 1.10.2.2 yamt udf_read_anchors(struct udf_mount *ump, struct udf_args *args) 645 1.10.2.2 yamt { 646 1.10.2.2 yamt struct mmc_trackinfo first_track; 647 1.10.2.2 yamt struct mmc_trackinfo last_track; 648 1.10.2.2 yamt struct anchor_vdp **anchorsp; 649 1.10.2.2 yamt uint32_t track_start; 650 1.10.2.2 yamt uint32_t track_end; 651 1.10.2.2 yamt uint32_t positions[4]; 652 1.10.2.2 yamt int first_tracknr, last_tracknr; 653 1.10.2.2 yamt int error, anch, ok, first_anchor; 654 1.10.2.2 yamt 655 1.10.2.2 yamt /* search the first and last track of the specified session */ 656 1.10.2.2 yamt error = udf_search_tracks(ump, args, &first_tracknr, &last_tracknr); 657 1.10.2.2 yamt if (!error) { 658 1.10.2.2 yamt first_track.tracknr = first_tracknr; 659 1.10.2.2 yamt error = udf_update_trackinfo(ump, &first_track); 660 1.10.2.2 yamt } 661 1.10.2.2 yamt if (!error) { 662 1.10.2.2 yamt last_track.tracknr = last_tracknr; 663 1.10.2.2 yamt error = udf_update_trackinfo(ump, &last_track); 664 1.10.2.2 yamt } 665 1.10.2.2 yamt if (error) { 666 1.10.2.2 yamt printf("UDF mount: reading disc geometry failed\n"); 667 1.10.2.2 yamt return 0; 668 1.10.2.2 yamt } 669 1.10.2.2 yamt 670 1.10.2.2 yamt track_start = first_track.track_start; 671 1.10.2.2 yamt 672 1.10.2.2 yamt /* `end' is not as straitforward as start. */ 673 1.10.2.2 yamt track_end = last_track.track_start 674 1.10.2.2 yamt + last_track.track_size - last_track.free_blocks - 1; 675 1.10.2.2 yamt 676 1.10.2.2 yamt if (ump->discinfo.mmc_cur & MMC_CAP_SEQUENTIAL) { 677 1.10.2.2 yamt /* end of track is not straitforward here */ 678 1.10.2.2 yamt if (last_track.flags & MMC_TRACKINFO_LRA_VALID) 679 1.10.2.2 yamt track_end = last_track.last_recorded; 680 1.10.2.2 yamt else if (last_track.flags & MMC_TRACKINFO_NWA_VALID) 681 1.10.2.2 yamt track_end = last_track.next_writable 682 1.10.2.2 yamt - ump->discinfo.link_block_penalty; 683 1.10.2.2 yamt } 684 1.10.2.2 yamt 685 1.10.2.2 yamt /* its no use reading a blank track */ 686 1.10.2.2 yamt first_anchor = 0; 687 1.10.2.2 yamt if (first_track.flags & MMC_TRACKINFO_BLANK) 688 1.10.2.2 yamt first_anchor = 1; 689 1.10.2.2 yamt 690 1.10.2.2 yamt /* read anchors start+256, start+512, end-256, end */ 691 1.10.2.2 yamt positions[0] = track_start+256; 692 1.10.2.2 yamt positions[1] = track_end-256; 693 1.10.2.2 yamt positions[2] = track_end; 694 1.10.2.2 yamt positions[3] = track_start+512; /* [UDF 2.60/6.11.2] */ 695 1.10.2.2 yamt /* XXX shouldn't +512 be prefered above +256 for compat with Roxio CD */ 696 1.10.2.2 yamt 697 1.10.2.2 yamt ok = 0; 698 1.10.2.2 yamt anchorsp = ump->anchors; 699 1.10.2.2 yamt for (anch = first_anchor; anch < 4; anch++) { 700 1.10.2.2 yamt DPRINTF(VOLUMES, ("Read anchor %d at sector %d\n", anch, 701 1.10.2.2 yamt positions[anch])); 702 1.10.2.2 yamt error = udf_read_anchor(ump, positions[anch], anchorsp); 703 1.10.2.2 yamt if (!error) { 704 1.10.2.2 yamt anchorsp++; 705 1.10.2.2 yamt ok++; 706 1.10.2.2 yamt } 707 1.10.2.2 yamt } 708 1.10.2.2 yamt 709 1.10.2.3 yamt /* VATs are only recorded on sequential media, but initialise */ 710 1.10.2.3 yamt ump->first_possible_vat_location = track_start + 256 + 1; 711 1.10.2.3 yamt ump->last_possible_vat_location = track_end 712 1.10.2.3 yamt + ump->discinfo.blockingnr; 713 1.10.2.3 yamt 714 1.10.2.2 yamt return ok; 715 1.10.2.2 yamt } 716 1.10.2.2 yamt 717 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 718 1.10.2.2 yamt 719 1.10.2.2 yamt /* we dont try to be smart; we just record the parts */ 720 1.10.2.2 yamt #define UDF_UPDATE_DSCR(name, dscr) \ 721 1.10.2.2 yamt if (name) \ 722 1.10.2.2 yamt free(name, M_UDFVOLD); \ 723 1.10.2.2 yamt name = dscr; 724 1.10.2.2 yamt 725 1.10.2.2 yamt static int 726 1.10.2.2 yamt udf_process_vds_descriptor(struct udf_mount *ump, union dscrptr *dscr) 727 1.10.2.2 yamt { 728 1.10.2.2 yamt uint16_t partnr; 729 1.10.2.2 yamt 730 1.10.2.2 yamt DPRINTF(VOLUMES, ("\tprocessing VDS descr %d\n", 731 1.10.2.2 yamt udf_rw16(dscr->tag.id))); 732 1.10.2.2 yamt switch (udf_rw16(dscr->tag.id)) { 733 1.10.2.2 yamt case TAGID_PRI_VOL : /* primary partition */ 734 1.10.2.2 yamt UDF_UPDATE_DSCR(ump->primary_vol, &dscr->pvd); 735 1.10.2.2 yamt break; 736 1.10.2.2 yamt case TAGID_LOGVOL : /* logical volume */ 737 1.10.2.2 yamt UDF_UPDATE_DSCR(ump->logical_vol, &dscr->lvd); 738 1.10.2.2 yamt break; 739 1.10.2.2 yamt case TAGID_UNALLOC_SPACE : /* unallocated space */ 740 1.10.2.2 yamt UDF_UPDATE_DSCR(ump->unallocated, &dscr->usd); 741 1.10.2.2 yamt break; 742 1.10.2.2 yamt case TAGID_IMP_VOL : /* implementation */ 743 1.10.2.2 yamt /* XXX do we care about multiple impl. descr ? */ 744 1.10.2.2 yamt UDF_UPDATE_DSCR(ump->implementation, &dscr->ivd); 745 1.10.2.2 yamt break; 746 1.10.2.2 yamt case TAGID_PARTITION : /* physical partition */ 747 1.10.2.2 yamt /* not much use if its not allocated */ 748 1.10.2.2 yamt if ((udf_rw16(dscr->pd.flags) & UDF_PART_FLAG_ALLOCATED) == 0) { 749 1.10.2.2 yamt free(dscr, M_UDFVOLD); 750 1.10.2.2 yamt break; 751 1.10.2.2 yamt } 752 1.10.2.2 yamt 753 1.10.2.2 yamt /* check partnr boundaries */ 754 1.10.2.2 yamt partnr = udf_rw16(dscr->pd.part_num); 755 1.10.2.3 yamt if (partnr >= UDF_PARTITIONS) { 756 1.10.2.3 yamt free(dscr, M_UDFVOLD); 757 1.10.2.2 yamt return EINVAL; 758 1.10.2.3 yamt } 759 1.10.2.2 yamt 760 1.10.2.2 yamt UDF_UPDATE_DSCR(ump->partitions[partnr], &dscr->pd); 761 1.10.2.2 yamt break; 762 1.10.2.2 yamt case TAGID_VOL : /* volume space extender; rare */ 763 1.10.2.2 yamt DPRINTF(VOLUMES, ("VDS extender ignored\n")); 764 1.10.2.2 yamt free(dscr, M_UDFVOLD); 765 1.10.2.2 yamt break; 766 1.10.2.2 yamt default : 767 1.10.2.2 yamt DPRINTF(VOLUMES, ("Unhandled VDS type %d\n", 768 1.10.2.2 yamt udf_rw16(dscr->tag.id))); 769 1.10.2.2 yamt free(dscr, M_UDFVOLD); 770 1.10.2.2 yamt } 771 1.10.2.2 yamt 772 1.10.2.2 yamt return 0; 773 1.10.2.2 yamt } 774 1.10.2.2 yamt #undef UDF_UPDATE_DSCR 775 1.10.2.2 yamt 776 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 777 1.10.2.2 yamt 778 1.10.2.2 yamt static int 779 1.10.2.2 yamt udf_read_vds_extent(struct udf_mount *ump, uint32_t loc, uint32_t len) 780 1.10.2.2 yamt { 781 1.10.2.2 yamt union dscrptr *dscr; 782 1.10.2.2 yamt uint32_t sector_size, dscr_size; 783 1.10.2.2 yamt int error; 784 1.10.2.2 yamt 785 1.10.2.2 yamt sector_size = ump->discinfo.sector_size; 786 1.10.2.2 yamt 787 1.10.2.2 yamt /* loc is sectornr, len is in bytes */ 788 1.10.2.2 yamt error = EIO; 789 1.10.2.2 yamt while (len) { 790 1.10.2.2 yamt error = udf_read_descriptor(ump, loc, M_UDFVOLD, &dscr); 791 1.10.2.2 yamt if (error) 792 1.10.2.2 yamt return error; 793 1.10.2.2 yamt 794 1.10.2.2 yamt /* blank block is a terminator */ 795 1.10.2.2 yamt if (dscr == NULL) 796 1.10.2.2 yamt return 0; 797 1.10.2.2 yamt 798 1.10.2.2 yamt /* TERM descriptor is a terminator */ 799 1.10.2.3 yamt if (udf_rw16(dscr->tag.id) == TAGID_TERM) { 800 1.10.2.3 yamt free(dscr, M_UDFVOLD); 801 1.10.2.2 yamt return 0; 802 1.10.2.3 yamt } 803 1.10.2.2 yamt 804 1.10.2.2 yamt /* process all others */ 805 1.10.2.2 yamt dscr_size = udf_tagsize(dscr, sector_size); 806 1.10.2.2 yamt error = udf_process_vds_descriptor(ump, dscr); 807 1.10.2.2 yamt if (error) { 808 1.10.2.2 yamt free(dscr, M_UDFVOLD); 809 1.10.2.2 yamt break; 810 1.10.2.2 yamt } 811 1.10.2.2 yamt assert((dscr_size % sector_size) == 0); 812 1.10.2.2 yamt 813 1.10.2.2 yamt len -= dscr_size; 814 1.10.2.2 yamt loc += dscr_size / sector_size; 815 1.10.2.2 yamt } 816 1.10.2.2 yamt 817 1.10.2.2 yamt return error; 818 1.10.2.2 yamt } 819 1.10.2.2 yamt 820 1.10.2.2 yamt 821 1.10.2.2 yamt int 822 1.10.2.2 yamt udf_read_vds_space(struct udf_mount *ump) 823 1.10.2.2 yamt { 824 1.10.2.2 yamt struct anchor_vdp *anchor, *anchor2; 825 1.10.2.2 yamt size_t size; 826 1.10.2.2 yamt uint32_t main_loc, main_len; 827 1.10.2.2 yamt uint32_t reserve_loc, reserve_len; 828 1.10.2.2 yamt int error; 829 1.10.2.2 yamt 830 1.10.2.2 yamt /* 831 1.10.2.2 yamt * read in VDS space provided by the anchors; if one descriptor read 832 1.10.2.2 yamt * fails, try the mirror sector. 833 1.10.2.2 yamt * 834 1.10.2.2 yamt * check if 2nd anchor is different from 1st; if so, go for 2nd. This 835 1.10.2.2 yamt * avoids the `compatibility features' of DirectCD that may confuse 836 1.10.2.2 yamt * stuff completely. 837 1.10.2.2 yamt */ 838 1.10.2.2 yamt 839 1.10.2.2 yamt anchor = ump->anchors[0]; 840 1.10.2.2 yamt anchor2 = ump->anchors[1]; 841 1.10.2.2 yamt assert(anchor); 842 1.10.2.2 yamt 843 1.10.2.2 yamt if (anchor2) { 844 1.10.2.2 yamt size = sizeof(struct extent_ad); 845 1.10.2.2 yamt if (memcmp(&anchor->main_vds_ex, &anchor2->main_vds_ex, size)) 846 1.10.2.2 yamt anchor = anchor2; 847 1.10.2.2 yamt /* reserve is specified to be a literal copy of main */ 848 1.10.2.2 yamt } 849 1.10.2.2 yamt 850 1.10.2.2 yamt main_loc = udf_rw32(anchor->main_vds_ex.loc); 851 1.10.2.2 yamt main_len = udf_rw32(anchor->main_vds_ex.len); 852 1.10.2.2 yamt 853 1.10.2.2 yamt reserve_loc = udf_rw32(anchor->reserve_vds_ex.loc); 854 1.10.2.2 yamt reserve_len = udf_rw32(anchor->reserve_vds_ex.len); 855 1.10.2.2 yamt 856 1.10.2.2 yamt error = udf_read_vds_extent(ump, main_loc, main_len); 857 1.10.2.2 yamt if (error) { 858 1.10.2.2 yamt printf("UDF mount: reading in reserve VDS extent\n"); 859 1.10.2.2 yamt error = udf_read_vds_extent(ump, reserve_loc, reserve_len); 860 1.10.2.2 yamt } 861 1.10.2.2 yamt 862 1.10.2.2 yamt return error; 863 1.10.2.2 yamt } 864 1.10.2.2 yamt 865 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 866 1.10.2.2 yamt 867 1.10.2.2 yamt /* 868 1.10.2.2 yamt * Read in the logical volume integrity sequence pointed to by our logical 869 1.10.2.2 yamt * volume descriptor. Its a sequence that can be extended using fields in the 870 1.10.2.2 yamt * integrity descriptor itself. On sequential media only one is found, on 871 1.10.2.2 yamt * rewritable media a sequence of descriptors can be found as a form of 872 1.10.2.2 yamt * history keeping and on non sequential write-once media the chain is vital 873 1.10.2.2 yamt * to allow more and more descriptors to be written. The last descriptor 874 1.10.2.2 yamt * written in an extent needs to claim space for a new extent. 875 1.10.2.2 yamt */ 876 1.10.2.2 yamt 877 1.10.2.2 yamt static int 878 1.10.2.2 yamt udf_retrieve_lvint(struct udf_mount *ump, struct logvol_int_desc **lvintp) 879 1.10.2.2 yamt { 880 1.10.2.2 yamt union dscrptr *dscr; 881 1.10.2.2 yamt struct logvol_int_desc *lvint; 882 1.10.2.2 yamt uint32_t sector_size, sector, len; 883 1.10.2.2 yamt int dscr_type, error; 884 1.10.2.2 yamt 885 1.10.2.2 yamt sector_size = ump->discinfo.sector_size; 886 1.10.2.2 yamt len = udf_rw32(ump->logical_vol->integrity_seq_loc.len); 887 1.10.2.2 yamt sector = udf_rw32(ump->logical_vol->integrity_seq_loc.loc); 888 1.10.2.2 yamt 889 1.10.2.2 yamt lvint = NULL; 890 1.10.2.2 yamt dscr = NULL; 891 1.10.2.2 yamt error = 0; 892 1.10.2.2 yamt while (len) { 893 1.10.2.2 yamt /* read in our integrity descriptor */ 894 1.10.2.2 yamt error = udf_read_descriptor(ump, sector, M_UDFVOLD, &dscr); 895 1.10.2.2 yamt if (!error) { 896 1.10.2.2 yamt if (dscr == NULL) 897 1.10.2.2 yamt break; /* empty terminates */ 898 1.10.2.2 yamt dscr_type = udf_rw16(dscr->tag.id); 899 1.10.2.2 yamt if (dscr_type == TAGID_TERM) { 900 1.10.2.2 yamt break; /* clean terminator */ 901 1.10.2.2 yamt } 902 1.10.2.2 yamt if (dscr_type != TAGID_LOGVOL_INTEGRITY) { 903 1.10.2.2 yamt /* fatal... corrupt disc */ 904 1.10.2.2 yamt error = ENOENT; 905 1.10.2.2 yamt break; 906 1.10.2.2 yamt } 907 1.10.2.2 yamt if (lvint) 908 1.10.2.2 yamt free(lvint, M_UDFVOLD); 909 1.10.2.2 yamt lvint = &dscr->lvid; 910 1.10.2.2 yamt dscr = NULL; 911 1.10.2.2 yamt } /* else hope for the best... maybe the next is ok */ 912 1.10.2.2 yamt 913 1.10.2.2 yamt DPRINTFIF(VOLUMES, lvint, ("logvol integrity read, state %s\n", 914 1.10.2.2 yamt udf_rw32(lvint->integrity_type) ? "CLOSED" : "OPEN")); 915 1.10.2.2 yamt 916 1.10.2.2 yamt /* proceed sequential */ 917 1.10.2.2 yamt sector += 1; 918 1.10.2.2 yamt len -= sector_size; 919 1.10.2.2 yamt 920 1.10.2.2 yamt /* are we linking to a new piece? */ 921 1.10.2.2 yamt if (lvint->next_extent.len) { 922 1.10.2.2 yamt len = udf_rw32(lvint->next_extent.len); 923 1.10.2.2 yamt sector = udf_rw32(lvint->next_extent.loc); 924 1.10.2.2 yamt } 925 1.10.2.2 yamt } 926 1.10.2.2 yamt 927 1.10.2.2 yamt /* clean up the mess, esp. when there is an error */ 928 1.10.2.2 yamt if (dscr) 929 1.10.2.2 yamt free(dscr, M_UDFVOLD); 930 1.10.2.2 yamt 931 1.10.2.2 yamt if (error && lvint) { 932 1.10.2.2 yamt free(lvint, M_UDFVOLD); 933 1.10.2.2 yamt lvint = NULL; 934 1.10.2.2 yamt } 935 1.10.2.2 yamt 936 1.10.2.2 yamt if (!lvint) 937 1.10.2.2 yamt error = ENOENT; 938 1.10.2.2 yamt 939 1.10.2.2 yamt *lvintp = lvint; 940 1.10.2.2 yamt return error; 941 1.10.2.2 yamt } 942 1.10.2.2 yamt 943 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 944 1.10.2.2 yamt 945 1.10.2.2 yamt /* 946 1.10.2.2 yamt * Checks if ump's vds information is correct and complete 947 1.10.2.2 yamt */ 948 1.10.2.2 yamt 949 1.10.2.2 yamt int 950 1.10.2.3 yamt udf_process_vds(struct udf_mount *ump, struct udf_args *args) 951 1.10.2.3 yamt { 952 1.10.2.2 yamt union udf_pmap *mapping; 953 1.10.2.2 yamt struct logvol_int_desc *lvint; 954 1.10.2.2 yamt struct udf_logvol_info *lvinfo; 955 1.10.2.2 yamt uint32_t n_pm, mt_l; 956 1.10.2.2 yamt uint8_t *pmap_pos; 957 1.10.2.2 yamt char *domain_name, *map_name; 958 1.10.2.2 yamt const char *check_name; 959 1.10.2.2 yamt int pmap_stype, pmap_size; 960 1.10.2.2 yamt int pmap_type, log_part, phys_part; 961 1.10.2.2 yamt int n_phys, n_virt, n_spar, n_meta; 962 1.10.2.2 yamt int len, error; 963 1.10.2.2 yamt 964 1.10.2.2 yamt if (ump == NULL) 965 1.10.2.2 yamt return ENOENT; 966 1.10.2.2 yamt 967 1.10.2.2 yamt /* we need at least an anchor (trivial, but for safety) */ 968 1.10.2.2 yamt if (ump->anchors[0] == NULL) 969 1.10.2.2 yamt return EINVAL; 970 1.10.2.2 yamt 971 1.10.2.2 yamt /* we need at least one primary and one logical volume descriptor */ 972 1.10.2.2 yamt if ((ump->primary_vol == NULL) || (ump->logical_vol) == NULL) 973 1.10.2.2 yamt return EINVAL; 974 1.10.2.2 yamt 975 1.10.2.2 yamt /* we need at least one partition descriptor */ 976 1.10.2.2 yamt if (ump->partitions[0] == NULL) 977 1.10.2.2 yamt return EINVAL; 978 1.10.2.2 yamt 979 1.10.2.2 yamt /* check logical volume sector size verses device sector size */ 980 1.10.2.2 yamt if (udf_rw32(ump->logical_vol->lb_size) != ump->discinfo.sector_size) { 981 1.10.2.2 yamt printf("UDF mount: format violation, lb_size != sector size\n"); 982 1.10.2.2 yamt return EINVAL; 983 1.10.2.2 yamt } 984 1.10.2.2 yamt 985 1.10.2.2 yamt domain_name = ump->logical_vol->domain_id.id; 986 1.10.2.2 yamt if (strncmp(domain_name, "*OSTA UDF Compliant", 20)) { 987 1.10.2.2 yamt printf("mount_udf: disc not OSTA UDF Compliant, aborting\n"); 988 1.10.2.2 yamt return EINVAL; 989 1.10.2.2 yamt } 990 1.10.2.2 yamt 991 1.10.2.2 yamt /* retrieve logical volume integrity sequence */ 992 1.10.2.2 yamt error = udf_retrieve_lvint(ump, &ump->logvol_integrity); 993 1.10.2.2 yamt 994 1.10.2.2 yamt /* 995 1.10.2.2 yamt * We need at least one logvol integrity descriptor recorded. Note 996 1.10.2.2 yamt * that its OK to have an open logical volume integrity here. The VAT 997 1.10.2.2 yamt * will close/update the integrity. 998 1.10.2.2 yamt */ 999 1.10.2.2 yamt if (ump->logvol_integrity == NULL) 1000 1.10.2.2 yamt return EINVAL; 1001 1.10.2.2 yamt 1002 1.10.2.2 yamt /* process derived structures */ 1003 1.10.2.2 yamt n_pm = udf_rw32(ump->logical_vol->n_pm); /* num partmaps */ 1004 1.10.2.2 yamt lvint = ump->logvol_integrity; 1005 1.10.2.2 yamt lvinfo = (struct udf_logvol_info *) (&lvint->tables[2 * n_pm]); 1006 1.10.2.2 yamt ump->logvol_info = lvinfo; 1007 1.10.2.2 yamt 1008 1.10.2.2 yamt /* TODO check udf versions? */ 1009 1.10.2.2 yamt 1010 1.10.2.2 yamt /* 1011 1.10.2.2 yamt * check logvol mappings: effective virt->log partmap translation 1012 1.10.2.2 yamt * check and recording of the mapping results. Saves expensive 1013 1.10.2.2 yamt * strncmp() in tight places. 1014 1.10.2.2 yamt */ 1015 1.10.2.2 yamt DPRINTF(VOLUMES, ("checking logvol mappings\n")); 1016 1.10.2.2 yamt n_pm = udf_rw32(ump->logical_vol->n_pm); /* num partmaps */ 1017 1.10.2.2 yamt mt_l = udf_rw32(ump->logical_vol->mt_l); /* partmaps data length */ 1018 1.10.2.2 yamt pmap_pos = ump->logical_vol->maps; 1019 1.10.2.2 yamt 1020 1.10.2.2 yamt if (n_pm > UDF_PMAPS) { 1021 1.10.2.2 yamt printf("UDF mount: too many mappings\n"); 1022 1.10.2.2 yamt return EINVAL; 1023 1.10.2.2 yamt } 1024 1.10.2.2 yamt 1025 1.10.2.2 yamt n_phys = n_virt = n_spar = n_meta = 0; 1026 1.10.2.2 yamt for (log_part = 0; log_part < n_pm; log_part++) { 1027 1.10.2.2 yamt mapping = (union udf_pmap *) pmap_pos; 1028 1.10.2.2 yamt pmap_stype = pmap_pos[0]; 1029 1.10.2.2 yamt pmap_size = pmap_pos[1]; 1030 1.10.2.2 yamt switch (pmap_stype) { 1031 1.10.2.2 yamt case 1: /* physical mapping */ 1032 1.10.2.2 yamt /* volseq = udf_rw16(mapping->pm1.vol_seq_num); */ 1033 1.10.2.2 yamt phys_part = udf_rw16(mapping->pm1.part_num); 1034 1.10.2.2 yamt pmap_type = UDF_VTOP_TYPE_PHYS; 1035 1.10.2.2 yamt n_phys++; 1036 1.10.2.2 yamt break; 1037 1.10.2.2 yamt case 2: /* virtual/sparable/meta mapping */ 1038 1.10.2.2 yamt map_name = mapping->pm2.part_id.id; 1039 1.10.2.2 yamt /* volseq = udf_rw16(mapping->pm2.vol_seq_num); */ 1040 1.10.2.2 yamt phys_part = udf_rw16(mapping->pm2.part_num); 1041 1.10.2.2 yamt pmap_type = UDF_VTOP_TYPE_UNKNOWN; 1042 1.10.2.2 yamt len = UDF_REGID_ID_SIZE; 1043 1.10.2.2 yamt 1044 1.10.2.2 yamt check_name = "*UDF Virtual Partition"; 1045 1.10.2.2 yamt if (strncmp(map_name, check_name, len) == 0) { 1046 1.10.2.2 yamt pmap_type = UDF_VTOP_TYPE_VIRT; 1047 1.10.2.2 yamt n_virt++; 1048 1.10.2.2 yamt break; 1049 1.10.2.2 yamt } 1050 1.10.2.2 yamt check_name = "*UDF Sparable Partition"; 1051 1.10.2.2 yamt if (strncmp(map_name, check_name, len) == 0) { 1052 1.10.2.2 yamt pmap_type = UDF_VTOP_TYPE_SPARABLE; 1053 1.10.2.2 yamt n_spar++; 1054 1.10.2.2 yamt break; 1055 1.10.2.2 yamt } 1056 1.10.2.2 yamt check_name = "*UDF Metadata Partition"; 1057 1.10.2.2 yamt if (strncmp(map_name, check_name, len) == 0) { 1058 1.10.2.2 yamt pmap_type = UDF_VTOP_TYPE_META; 1059 1.10.2.2 yamt n_meta++; 1060 1.10.2.2 yamt break; 1061 1.10.2.2 yamt } 1062 1.10.2.2 yamt break; 1063 1.10.2.2 yamt default: 1064 1.10.2.2 yamt return EINVAL; 1065 1.10.2.2 yamt } 1066 1.10.2.2 yamt 1067 1.10.2.2 yamt DPRINTF(VOLUMES, ("\t%d -> %d type %d\n", log_part, phys_part, 1068 1.10.2.2 yamt pmap_type)); 1069 1.10.2.2 yamt if (pmap_type == UDF_VTOP_TYPE_UNKNOWN) 1070 1.10.2.2 yamt return EINVAL; 1071 1.10.2.2 yamt 1072 1.10.2.2 yamt ump->vtop [log_part] = phys_part; 1073 1.10.2.2 yamt ump->vtop_tp[log_part] = pmap_type; 1074 1.10.2.2 yamt 1075 1.10.2.2 yamt pmap_pos += pmap_size; 1076 1.10.2.2 yamt } 1077 1.10.2.2 yamt /* not winning the beauty contest */ 1078 1.10.2.2 yamt ump->vtop_tp[UDF_VTOP_RAWPART] = UDF_VTOP_TYPE_RAW; 1079 1.10.2.2 yamt 1080 1.10.2.2 yamt /* test some basic UDF assertions/requirements */ 1081 1.10.2.2 yamt if ((n_virt > 1) || (n_spar > 1) || (n_meta > 1)) 1082 1.10.2.2 yamt return EINVAL; 1083 1.10.2.2 yamt 1084 1.10.2.2 yamt if (n_virt) { 1085 1.10.2.2 yamt if ((n_phys == 0) || n_spar || n_meta) 1086 1.10.2.2 yamt return EINVAL; 1087 1.10.2.2 yamt } 1088 1.10.2.2 yamt if (n_spar + n_phys == 0) 1089 1.10.2.2 yamt return EINVAL; 1090 1.10.2.2 yamt 1091 1.10.2.2 yamt /* vat's can only be on a sequential media */ 1092 1.10.2.2 yamt ump->data_alloc = UDF_ALLOC_SPACEMAP; 1093 1.10.2.2 yamt if (n_virt) 1094 1.10.2.2 yamt ump->data_alloc = UDF_ALLOC_SEQUENTIAL; 1095 1.10.2.2 yamt 1096 1.10.2.2 yamt ump->meta_alloc = UDF_ALLOC_SPACEMAP; 1097 1.10.2.2 yamt if (n_virt) 1098 1.10.2.2 yamt ump->meta_alloc = UDF_ALLOC_VAT; 1099 1.10.2.2 yamt if (n_meta) 1100 1.10.2.2 yamt ump->meta_alloc = UDF_ALLOC_METABITMAP; 1101 1.10.2.2 yamt 1102 1.10.2.2 yamt /* special cases for pseudo-overwrite */ 1103 1.10.2.2 yamt if (ump->discinfo.mmc_cur & MMC_CAP_PSEUDOOVERWRITE) { 1104 1.10.2.2 yamt ump->data_alloc = UDF_ALLOC_SEQUENTIAL; 1105 1.10.2.2 yamt if (n_meta) { 1106 1.10.2.2 yamt ump->meta_alloc = UDF_ALLOC_METASEQUENTIAL; 1107 1.10.2.2 yamt } else { 1108 1.10.2.2 yamt ump->meta_alloc = UDF_ALLOC_RELAXEDSEQUENTIAL; 1109 1.10.2.2 yamt } 1110 1.10.2.2 yamt } 1111 1.10.2.2 yamt 1112 1.10.2.2 yamt DPRINTF(VOLUMES, ("\tdata alloc scheme %d, meta alloc scheme %d\n", 1113 1.10.2.2 yamt ump->data_alloc, ump->meta_alloc)); 1114 1.10.2.2 yamt /* TODO determine partitions to write data and metadata ? */ 1115 1.10.2.2 yamt 1116 1.10.2.2 yamt /* signal its OK for now */ 1117 1.10.2.2 yamt return 0; 1118 1.10.2.2 yamt } 1119 1.10.2.2 yamt 1120 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1121 1.10.2.2 yamt 1122 1.10.2.2 yamt /* 1123 1.10.2.2 yamt * Read in complete VAT file and check if its indeed a VAT file descriptor 1124 1.10.2.2 yamt */ 1125 1.10.2.2 yamt 1126 1.10.2.2 yamt static int 1127 1.10.2.2 yamt udf_check_for_vat(struct udf_node *vat_node) 1128 1.10.2.2 yamt { 1129 1.10.2.2 yamt struct udf_mount *ump; 1130 1.10.2.2 yamt struct icb_tag *icbtag; 1131 1.10.2.2 yamt struct timestamp *mtime; 1132 1.10.2.2 yamt struct regid *regid; 1133 1.10.2.2 yamt struct udf_vat *vat; 1134 1.10.2.2 yamt struct udf_logvol_info *lvinfo; 1135 1.10.2.2 yamt uint32_t vat_length, alloc_length; 1136 1.10.2.2 yamt uint32_t vat_offset, vat_entries; 1137 1.10.2.2 yamt uint32_t sector_size; 1138 1.10.2.2 yamt uint32_t sectors; 1139 1.10.2.2 yamt uint32_t *raw_vat; 1140 1.10.2.2 yamt char *regid_name; 1141 1.10.2.2 yamt int filetype; 1142 1.10.2.2 yamt int error; 1143 1.10.2.2 yamt 1144 1.10.2.2 yamt /* vat_length is really 64 bits though impossible */ 1145 1.10.2.2 yamt 1146 1.10.2.2 yamt DPRINTF(VOLUMES, ("Checking for VAT\n")); 1147 1.10.2.2 yamt if (!vat_node) 1148 1.10.2.2 yamt return ENOENT; 1149 1.10.2.2 yamt 1150 1.10.2.2 yamt /* get mount info */ 1151 1.10.2.2 yamt ump = vat_node->ump; 1152 1.10.2.2 yamt 1153 1.10.2.2 yamt /* check assertions */ 1154 1.10.2.2 yamt assert(vat_node->fe || vat_node->efe); 1155 1.10.2.2 yamt assert(ump->logvol_integrity); 1156 1.10.2.2 yamt 1157 1.10.2.2 yamt /* get information from fe/efe */ 1158 1.10.2.2 yamt if (vat_node->fe) { 1159 1.10.2.2 yamt vat_length = udf_rw64(vat_node->fe->inf_len); 1160 1.10.2.2 yamt icbtag = &vat_node->fe->icbtag; 1161 1.10.2.2 yamt mtime = &vat_node->fe->mtime; 1162 1.10.2.2 yamt } else { 1163 1.10.2.2 yamt vat_length = udf_rw64(vat_node->efe->inf_len); 1164 1.10.2.2 yamt icbtag = &vat_node->efe->icbtag; 1165 1.10.2.2 yamt mtime = &vat_node->efe->mtime; 1166 1.10.2.2 yamt } 1167 1.10.2.2 yamt 1168 1.10.2.2 yamt /* Check icb filetype! it has to be 0 or UDF_ICB_FILETYPE_VAT */ 1169 1.10.2.2 yamt filetype = icbtag->file_type; 1170 1.10.2.2 yamt if ((filetype != 0) && (filetype != UDF_ICB_FILETYPE_VAT)) 1171 1.10.2.2 yamt return ENOENT; 1172 1.10.2.2 yamt 1173 1.10.2.2 yamt DPRINTF(VOLUMES, ("\tPossible VAT length %d\n", vat_length)); 1174 1.10.2.2 yamt /* place a sanity check on the length; currently 1Mb in size */ 1175 1.10.2.2 yamt if (vat_length > 1*1024*1024) 1176 1.10.2.2 yamt return ENOENT; 1177 1.10.2.2 yamt 1178 1.10.2.2 yamt /* get sector size */ 1179 1.10.2.2 yamt sector_size = vat_node->ump->discinfo.sector_size; 1180 1.10.2.2 yamt 1181 1.10.2.2 yamt /* calculate how many sectors to read in and how much to allocate */ 1182 1.10.2.2 yamt sectors = (vat_length + sector_size -1) / sector_size; 1183 1.10.2.2 yamt alloc_length = (sectors + 2) * sector_size; 1184 1.10.2.2 yamt 1185 1.10.2.2 yamt /* try to allocate the space */ 1186 1.10.2.2 yamt ump->vat_table_alloc_length = alloc_length; 1187 1.10.2.3 yamt ump->vat_table = malloc(alloc_length, M_UDFVOLD, M_CANFAIL | M_WAITOK); 1188 1.10.2.2 yamt if (!ump->vat_table) 1189 1.10.2.2 yamt return ENOMEM; /* impossible to allocate */ 1190 1.10.2.2 yamt DPRINTF(VOLUMES, ("\talloced fine\n")); 1191 1.10.2.2 yamt 1192 1.10.2.2 yamt /* read it in! */ 1193 1.10.2.2 yamt raw_vat = (uint32_t *) ump->vat_table; 1194 1.10.2.2 yamt error = udf_read_file_extent(vat_node, 0, sectors, (uint8_t *) raw_vat); 1195 1.10.2.2 yamt if (error) { 1196 1.10.2.2 yamt DPRINTF(VOLUMES, ("\tread failed : %d\n", error)); 1197 1.10.2.2 yamt /* not completely readable... :( bomb out */ 1198 1.10.2.3 yamt free(ump->vat_table, M_UDFVOLD); 1199 1.10.2.2 yamt ump->vat_table = NULL; 1200 1.10.2.2 yamt return error; 1201 1.10.2.2 yamt } 1202 1.10.2.2 yamt DPRINTF(VOLUMES, ("VAT read in fine!\n")); 1203 1.10.2.2 yamt 1204 1.10.2.2 yamt /* 1205 1.10.2.2 yamt * check contents of the file if its the old 1.50 VAT table format. 1206 1.10.2.2 yamt * Its notoriously broken and allthough some implementations support an 1207 1.10.2.2 yamt * extention as defined in the UDF 1.50 errata document, its doubtfull 1208 1.10.2.2 yamt * to be useable since a lot of implementations don't maintain it. 1209 1.10.2.2 yamt */ 1210 1.10.2.2 yamt lvinfo = ump->logvol_info; 1211 1.10.2.2 yamt 1212 1.10.2.2 yamt if (filetype == 0) { 1213 1.10.2.2 yamt /* definition */ 1214 1.10.2.2 yamt vat_offset = 0; 1215 1.10.2.2 yamt vat_entries = (vat_length-36)/4; 1216 1.10.2.2 yamt 1217 1.10.2.2 yamt /* check 1.50 VAT */ 1218 1.10.2.2 yamt regid = (struct regid *) (raw_vat + vat_entries); 1219 1.10.2.2 yamt regid_name = (char *) regid->id; 1220 1.10.2.2 yamt error = strncmp(regid_name, "*UDF Virtual Alloc Tbl", 22); 1221 1.10.2.2 yamt if (error) { 1222 1.10.2.2 yamt DPRINTF(VOLUMES, ("VAT format 1.50 rejected\n")); 1223 1.10.2.3 yamt free(ump->vat_table, M_UDFVOLD); 1224 1.10.2.2 yamt ump->vat_table = NULL; 1225 1.10.2.2 yamt return ENOENT; 1226 1.10.2.2 yamt } 1227 1.10.2.2 yamt /* TODO update LVID from "*UDF VAT LVExtension" ext. attr. */ 1228 1.10.2.2 yamt } else { 1229 1.10.2.2 yamt vat = (struct udf_vat *) raw_vat; 1230 1.10.2.2 yamt 1231 1.10.2.2 yamt /* definition */ 1232 1.10.2.2 yamt vat_offset = vat->header_len; 1233 1.10.2.2 yamt vat_entries = (vat_length - vat_offset)/4; 1234 1.10.2.2 yamt 1235 1.10.2.2 yamt assert(lvinfo); 1236 1.10.2.2 yamt lvinfo->num_files = vat->num_files; 1237 1.10.2.2 yamt lvinfo->num_directories = vat->num_directories; 1238 1.10.2.2 yamt lvinfo->min_udf_readver = vat->min_udf_readver; 1239 1.10.2.2 yamt lvinfo->min_udf_writever = vat->min_udf_writever; 1240 1.10.2.2 yamt lvinfo->max_udf_writever = vat->max_udf_writever; 1241 1.10.2.2 yamt } 1242 1.10.2.2 yamt 1243 1.10.2.2 yamt ump->vat_offset = vat_offset; 1244 1.10.2.2 yamt ump->vat_entries = vat_entries; 1245 1.10.2.2 yamt 1246 1.10.2.2 yamt DPRINTF(VOLUMES, ("VAT format accepted, marking it closed\n")); 1247 1.10.2.2 yamt ump->logvol_integrity->integrity_type = udf_rw32(UDF_INTEGRITY_CLOSED); 1248 1.10.2.2 yamt ump->logvol_integrity->time = *mtime; 1249 1.10.2.2 yamt 1250 1.10.2.2 yamt return 0; /* success! */ 1251 1.10.2.2 yamt } 1252 1.10.2.2 yamt 1253 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1254 1.10.2.2 yamt 1255 1.10.2.2 yamt static int 1256 1.10.2.2 yamt udf_search_vat(struct udf_mount *ump, union udf_pmap *mapping) 1257 1.10.2.2 yamt { 1258 1.10.2.2 yamt struct udf_node *vat_node; 1259 1.10.2.2 yamt struct long_ad icb_loc; 1260 1.10.2.2 yamt uint32_t early_vat_loc, late_vat_loc, vat_loc; 1261 1.10.2.2 yamt int error; 1262 1.10.2.2 yamt 1263 1.10.2.2 yamt /* mapping info not needed */ 1264 1.10.2.2 yamt mapping = mapping; 1265 1.10.2.2 yamt 1266 1.10.2.3 yamt vat_loc = ump->last_possible_vat_location; 1267 1.10.2.3 yamt early_vat_loc = vat_loc - 2 * ump->discinfo.blockingnr; 1268 1.10.2.3 yamt early_vat_loc = MAX(early_vat_loc, ump->first_possible_vat_location); 1269 1.10.2.2 yamt late_vat_loc = vat_loc + 1024; 1270 1.10.2.2 yamt 1271 1.10.2.2 yamt /* TODO first search last sector? */ 1272 1.10.2.2 yamt do { 1273 1.10.2.2 yamt DPRINTF(VOLUMES, ("Checking for VAT at sector %d\n", vat_loc)); 1274 1.10.2.2 yamt icb_loc.loc.part_num = udf_rw16(UDF_VTOP_RAWPART); 1275 1.10.2.2 yamt icb_loc.loc.lb_num = udf_rw32(vat_loc); 1276 1.10.2.2 yamt 1277 1.10.2.2 yamt error = udf_get_node(ump, &icb_loc, &vat_node); 1278 1.10.2.2 yamt if (!error) error = udf_check_for_vat(vat_node); 1279 1.10.2.2 yamt if (!error) break; 1280 1.10.2.2 yamt if (vat_node) { 1281 1.10.2.2 yamt vput(vat_node->vnode); 1282 1.10.2.2 yamt udf_dispose_node(vat_node); 1283 1.10.2.2 yamt } 1284 1.10.2.2 yamt vat_loc--; /* walk backwards */ 1285 1.10.2.2 yamt } while (vat_loc >= early_vat_loc); 1286 1.10.2.2 yamt 1287 1.10.2.2 yamt /* we don't need our VAT node anymore */ 1288 1.10.2.2 yamt if (vat_node) { 1289 1.10.2.2 yamt vput(vat_node->vnode); 1290 1.10.2.2 yamt udf_dispose_node(vat_node); 1291 1.10.2.2 yamt } 1292 1.10.2.2 yamt 1293 1.10.2.2 yamt return error; 1294 1.10.2.2 yamt } 1295 1.10.2.2 yamt 1296 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1297 1.10.2.2 yamt 1298 1.10.2.2 yamt static int 1299 1.10.2.2 yamt udf_read_sparables(struct udf_mount *ump, union udf_pmap *mapping) 1300 1.10.2.2 yamt { 1301 1.10.2.2 yamt union dscrptr *dscr; 1302 1.10.2.4 yamt struct part_map_spare *pms = &mapping->pms; 1303 1.10.2.2 yamt uint32_t lb_num; 1304 1.10.2.2 yamt int spar, error; 1305 1.10.2.2 yamt 1306 1.10.2.2 yamt /* 1307 1.10.2.2 yamt * The partition mapping passed on to us specifies the information we 1308 1.10.2.2 yamt * need to locate and initialise the sparable partition mapping 1309 1.10.2.2 yamt * information we need. 1310 1.10.2.2 yamt */ 1311 1.10.2.2 yamt 1312 1.10.2.2 yamt DPRINTF(VOLUMES, ("Read sparable table\n")); 1313 1.10.2.2 yamt ump->sparable_packet_len = udf_rw16(pms->packet_len); 1314 1.10.2.2 yamt for (spar = 0; spar < pms->n_st; spar++) { 1315 1.10.2.2 yamt lb_num = pms->st_loc[spar]; 1316 1.10.2.2 yamt DPRINTF(VOLUMES, ("Checking for sparing table %d\n", lb_num)); 1317 1.10.2.2 yamt error = udf_read_descriptor(ump, lb_num, M_UDFVOLD, &dscr); 1318 1.10.2.2 yamt if (!error && dscr) { 1319 1.10.2.2 yamt if (udf_rw16(dscr->tag.id) == TAGID_SPARING_TABLE) { 1320 1.10.2.2 yamt if (ump->sparing_table) 1321 1.10.2.2 yamt free(ump->sparing_table, M_UDFVOLD); 1322 1.10.2.2 yamt ump->sparing_table = &dscr->spt; 1323 1.10.2.2 yamt dscr = NULL; 1324 1.10.2.2 yamt DPRINTF(VOLUMES, 1325 1.10.2.2 yamt ("Sparing table accepted (%d entries)\n", 1326 1.10.2.2 yamt udf_rw16(ump->sparing_table->rt_l))); 1327 1.10.2.2 yamt break; /* we're done */ 1328 1.10.2.2 yamt } 1329 1.10.2.2 yamt } 1330 1.10.2.2 yamt if (dscr) 1331 1.10.2.2 yamt free(dscr, M_UDFVOLD); 1332 1.10.2.2 yamt } 1333 1.10.2.2 yamt 1334 1.10.2.2 yamt if (ump->sparing_table) 1335 1.10.2.2 yamt return 0; 1336 1.10.2.2 yamt 1337 1.10.2.2 yamt return ENOENT; 1338 1.10.2.2 yamt } 1339 1.10.2.2 yamt 1340 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1341 1.10.2.2 yamt 1342 1.10.2.4 yamt #define UDF_SET_SYSTEMFILE(vp) \ 1343 1.10.2.4 yamt simple_lock(&(vp)->v_interlock); \ 1344 1.10.2.4 yamt (vp)->v_flag |= VSYSTEM; \ 1345 1.10.2.4 yamt simple_unlock(&(vp)->v_interlock);\ 1346 1.10.2.4 yamt vref(vp); \ 1347 1.10.2.4 yamt vput(vp); \ 1348 1.10.2.4 yamt 1349 1.10.2.4 yamt static int 1350 1.10.2.4 yamt udf_read_metadata_files(struct udf_mount *ump, union udf_pmap *mapping) 1351 1.10.2.4 yamt { 1352 1.10.2.4 yamt struct part_map_meta *pmm = &mapping->pmm; 1353 1.10.2.4 yamt struct long_ad icb_loc; 1354 1.10.2.4 yamt struct vnode *vp; 1355 1.10.2.4 yamt int error; 1356 1.10.2.4 yamt 1357 1.10.2.4 yamt DPRINTF(VOLUMES, ("Reading in Metadata files\n")); 1358 1.10.2.4 yamt icb_loc.loc.part_num = pmm->part_num; 1359 1.10.2.4 yamt icb_loc.loc.lb_num = pmm->meta_file_lbn; 1360 1.10.2.4 yamt DPRINTF(VOLUMES, ("Metadata file\n")); 1361 1.10.2.4 yamt error = udf_get_node(ump, &icb_loc, &ump->metadata_file); 1362 1.10.2.4 yamt if (ump->metadata_file) { 1363 1.10.2.4 yamt vp = ump->metadata_file->vnode; 1364 1.10.2.4 yamt UDF_SET_SYSTEMFILE(vp); 1365 1.10.2.4 yamt } 1366 1.10.2.4 yamt 1367 1.10.2.4 yamt icb_loc.loc.lb_num = pmm->meta_mirror_file_lbn; 1368 1.10.2.4 yamt if (icb_loc.loc.lb_num != -1) { 1369 1.10.2.4 yamt DPRINTF(VOLUMES, ("Metadata copy file\n")); 1370 1.10.2.4 yamt error = udf_get_node(ump, &icb_loc, &ump->metadatamirror_file); 1371 1.10.2.4 yamt if (ump->metadatamirror_file) { 1372 1.10.2.4 yamt vp = ump->metadatamirror_file->vnode; 1373 1.10.2.4 yamt UDF_SET_SYSTEMFILE(vp); 1374 1.10.2.4 yamt } 1375 1.10.2.4 yamt } 1376 1.10.2.4 yamt 1377 1.10.2.4 yamt icb_loc.loc.lb_num = pmm->meta_bitmap_file_lbn; 1378 1.10.2.4 yamt if (icb_loc.loc.lb_num != -1) { 1379 1.10.2.4 yamt DPRINTF(VOLUMES, ("Metadata bitmap file\n")); 1380 1.10.2.4 yamt error = udf_get_node(ump, &icb_loc, &ump->metadatabitmap_file); 1381 1.10.2.4 yamt if (ump->metadatabitmap_file) { 1382 1.10.2.4 yamt vp = ump->metadatabitmap_file->vnode; 1383 1.10.2.4 yamt UDF_SET_SYSTEMFILE(vp); 1384 1.10.2.4 yamt } 1385 1.10.2.4 yamt } 1386 1.10.2.4 yamt 1387 1.10.2.4 yamt /* if we're mounting read-only we relax the requirements */ 1388 1.10.2.4 yamt if (ump->vfs_mountp->mnt_flag & MNT_RDONLY) { 1389 1.10.2.4 yamt error = EFAULT; 1390 1.10.2.4 yamt if (ump->metadata_file) 1391 1.10.2.4 yamt error = 0; 1392 1.10.2.4 yamt if ((ump->metadata_file == NULL) && (ump->metadatamirror_file)) { 1393 1.10.2.4 yamt printf( "udf mount: Metadata file not readable, " 1394 1.10.2.4 yamt "substituting Metadata copy file\n"); 1395 1.10.2.4 yamt ump->metadata_file = ump->metadatamirror_file; 1396 1.10.2.4 yamt ump->metadatamirror_file = NULL; 1397 1.10.2.4 yamt error = 0; 1398 1.10.2.4 yamt } 1399 1.10.2.4 yamt } else { 1400 1.10.2.4 yamt /* mounting read/write */ 1401 1.10.2.4 yamt DPRINTF(VOLUMES, ("udf mount: read only file system\n")); 1402 1.10.2.4 yamt error = EROFS; 1403 1.10.2.4 yamt } 1404 1.10.2.4 yamt DPRINTFIF(VOLUMES, error, ("udf mount: failed to read " 1405 1.10.2.4 yamt "metadata files\n")); 1406 1.10.2.4 yamt return error; 1407 1.10.2.4 yamt } 1408 1.10.2.4 yamt #undef UDF_SET_SYSTEMFILE 1409 1.10.2.4 yamt 1410 1.10.2.4 yamt /* --------------------------------------------------------------------- */ 1411 1.10.2.4 yamt 1412 1.10.2.2 yamt int 1413 1.10.2.2 yamt udf_read_vds_tables(struct udf_mount *ump, struct udf_args *args) 1414 1.10.2.2 yamt { 1415 1.10.2.2 yamt union udf_pmap *mapping; 1416 1.10.2.2 yamt uint32_t n_pm, mt_l; 1417 1.10.2.2 yamt uint32_t log_part; 1418 1.10.2.2 yamt uint8_t *pmap_pos; 1419 1.10.2.2 yamt int pmap_size; 1420 1.10.2.2 yamt int error; 1421 1.10.2.2 yamt 1422 1.10.2.2 yamt /* We have to iterate again over the part mappings for locations */ 1423 1.10.2.2 yamt n_pm = udf_rw32(ump->logical_vol->n_pm); /* num partmaps */ 1424 1.10.2.2 yamt mt_l = udf_rw32(ump->logical_vol->mt_l); /* partmaps data length */ 1425 1.10.2.2 yamt pmap_pos = ump->logical_vol->maps; 1426 1.10.2.2 yamt 1427 1.10.2.2 yamt for (log_part = 0; log_part < n_pm; log_part++) { 1428 1.10.2.2 yamt mapping = (union udf_pmap *) pmap_pos; 1429 1.10.2.2 yamt switch (ump->vtop_tp[log_part]) { 1430 1.10.2.2 yamt case UDF_VTOP_TYPE_PHYS : 1431 1.10.2.2 yamt /* nothing */ 1432 1.10.2.2 yamt break; 1433 1.10.2.2 yamt case UDF_VTOP_TYPE_VIRT : 1434 1.10.2.2 yamt /* search and load VAT */ 1435 1.10.2.2 yamt error = udf_search_vat(ump, mapping); 1436 1.10.2.2 yamt if (error) 1437 1.10.2.2 yamt return ENOENT; 1438 1.10.2.2 yamt break; 1439 1.10.2.2 yamt case UDF_VTOP_TYPE_SPARABLE : 1440 1.10.2.2 yamt /* load one of the sparable tables */ 1441 1.10.2.2 yamt error = udf_read_sparables(ump, mapping); 1442 1.10.2.3 yamt if (error) 1443 1.10.2.3 yamt return ENOENT; 1444 1.10.2.2 yamt break; 1445 1.10.2.2 yamt case UDF_VTOP_TYPE_META : 1446 1.10.2.4 yamt /* load the associated file descriptors */ 1447 1.10.2.4 yamt error = udf_read_metadata_files(ump, mapping); 1448 1.10.2.4 yamt if (error) 1449 1.10.2.4 yamt return ENOENT; 1450 1.10.2.4 yamt break; 1451 1.10.2.2 yamt default: 1452 1.10.2.2 yamt break; 1453 1.10.2.2 yamt } 1454 1.10.2.2 yamt pmap_size = pmap_pos[1]; 1455 1.10.2.2 yamt pmap_pos += pmap_size; 1456 1.10.2.2 yamt } 1457 1.10.2.2 yamt 1458 1.10.2.2 yamt return 0; 1459 1.10.2.2 yamt } 1460 1.10.2.2 yamt 1461 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1462 1.10.2.2 yamt 1463 1.10.2.2 yamt int 1464 1.10.2.2 yamt udf_read_rootdirs(struct udf_mount *ump, struct udf_args *args) 1465 1.10.2.2 yamt { 1466 1.10.2.2 yamt struct udf_node *rootdir_node, *streamdir_node; 1467 1.10.2.2 yamt union dscrptr *dscr; 1468 1.10.2.2 yamt struct long_ad fsd_loc, *dir_loc; 1469 1.10.2.2 yamt uint32_t lb_num, dummy; 1470 1.10.2.2 yamt uint32_t fsd_len; 1471 1.10.2.2 yamt int dscr_type; 1472 1.10.2.2 yamt int error; 1473 1.10.2.2 yamt 1474 1.10.2.3 yamt /* TODO implement FSD reading in separate function like integrity? */ 1475 1.10.2.2 yamt /* get fileset descriptor sequence */ 1476 1.10.2.2 yamt fsd_loc = ump->logical_vol->lv_fsd_loc; 1477 1.10.2.2 yamt fsd_len = udf_rw32(fsd_loc.len); 1478 1.10.2.2 yamt 1479 1.10.2.2 yamt dscr = NULL; 1480 1.10.2.2 yamt error = 0; 1481 1.10.2.2 yamt while (fsd_len || error) { 1482 1.10.2.2 yamt DPRINTF(VOLUMES, ("fsd_len = %d\n", fsd_len)); 1483 1.10.2.2 yamt /* translate fsd_loc to lb_num */ 1484 1.10.2.2 yamt error = udf_translate_vtop(ump, &fsd_loc, &lb_num, &dummy); 1485 1.10.2.2 yamt if (error) 1486 1.10.2.2 yamt break; 1487 1.10.2.2 yamt DPRINTF(VOLUMES, ("Reading FSD at lb %d\n", lb_num)); 1488 1.10.2.2 yamt error = udf_read_descriptor(ump, lb_num, M_UDFVOLD, &dscr); 1489 1.10.2.2 yamt /* end markers */ 1490 1.10.2.2 yamt if (error || (dscr == NULL)) 1491 1.10.2.2 yamt break; 1492 1.10.2.2 yamt 1493 1.10.2.2 yamt /* analyse */ 1494 1.10.2.2 yamt dscr_type = udf_rw16(dscr->tag.id); 1495 1.10.2.2 yamt if (dscr_type == TAGID_TERM) 1496 1.10.2.2 yamt break; 1497 1.10.2.2 yamt if (dscr_type != TAGID_FSD) { 1498 1.10.2.2 yamt free(dscr, M_UDFVOLD); 1499 1.10.2.2 yamt return ENOENT; 1500 1.10.2.2 yamt } 1501 1.10.2.2 yamt 1502 1.10.2.2 yamt /* 1503 1.10.2.2 yamt * TODO check for multiple fileset descriptors; its only 1504 1.10.2.2 yamt * picking the last now. Also check for FSD 1505 1.10.2.2 yamt * correctness/interpretability 1506 1.10.2.2 yamt */ 1507 1.10.2.2 yamt 1508 1.10.2.2 yamt /* update */ 1509 1.10.2.2 yamt if (ump->fileset_desc) { 1510 1.10.2.2 yamt free(ump->fileset_desc, M_UDFVOLD); 1511 1.10.2.2 yamt } 1512 1.10.2.2 yamt ump->fileset_desc = &dscr->fsd; 1513 1.10.2.2 yamt dscr = NULL; 1514 1.10.2.2 yamt 1515 1.10.2.2 yamt /* continue to the next fsd */ 1516 1.10.2.2 yamt fsd_len -= ump->discinfo.sector_size; 1517 1.10.2.2 yamt fsd_loc.loc.lb_num = udf_rw32(udf_rw32(fsd_loc.loc.lb_num)+1); 1518 1.10.2.2 yamt 1519 1.10.2.2 yamt /* follow up to fsd->next_ex (long_ad) if its not null */ 1520 1.10.2.2 yamt if (udf_rw32(ump->fileset_desc->next_ex.len)) { 1521 1.10.2.2 yamt DPRINTF(VOLUMES, ("follow up FSD extent\n")); 1522 1.10.2.2 yamt fsd_loc = ump->fileset_desc->next_ex; 1523 1.10.2.2 yamt fsd_len = udf_rw32(ump->fileset_desc->next_ex.len); 1524 1.10.2.2 yamt } 1525 1.10.2.2 yamt } 1526 1.10.2.2 yamt if (dscr) 1527 1.10.2.2 yamt free(dscr, M_UDFVOLD); 1528 1.10.2.2 yamt 1529 1.10.2.2 yamt /* there has to be one */ 1530 1.10.2.2 yamt if (ump->fileset_desc == NULL) 1531 1.10.2.2 yamt return ENOENT; 1532 1.10.2.2 yamt 1533 1.10.2.2 yamt DPRINTF(VOLUMES, ("FSD read in fine\n")); 1534 1.10.2.2 yamt 1535 1.10.2.2 yamt /* 1536 1.10.2.2 yamt * Now the FSD is known, read in the rootdirectory and if one exists, 1537 1.10.2.2 yamt * the system stream dir. Some files in the system streamdir are not 1538 1.10.2.2 yamt * wanted in this implementation since they are not maintained. If 1539 1.10.2.2 yamt * writing is enabled we'll delete these files if they exist. 1540 1.10.2.2 yamt */ 1541 1.10.2.2 yamt 1542 1.10.2.2 yamt rootdir_node = streamdir_node = NULL; 1543 1.10.2.2 yamt dir_loc = NULL; 1544 1.10.2.2 yamt 1545 1.10.2.2 yamt /* try to read in the rootdir */ 1546 1.10.2.2 yamt dir_loc = &ump->fileset_desc->rootdir_icb; 1547 1.10.2.2 yamt error = udf_get_node(ump, dir_loc, &rootdir_node); 1548 1.10.2.2 yamt if (error) 1549 1.10.2.2 yamt return ENOENT; 1550 1.10.2.2 yamt 1551 1.10.2.2 yamt /* aparently it read in fine */ 1552 1.10.2.2 yamt 1553 1.10.2.2 yamt /* 1554 1.10.2.2 yamt * Try the system stream directory; not very likely in the ones we 1555 1.10.2.2 yamt * test, but for completeness. 1556 1.10.2.2 yamt */ 1557 1.10.2.2 yamt dir_loc = &ump->fileset_desc->streamdir_icb; 1558 1.10.2.2 yamt if (udf_rw32(dir_loc->len)) { 1559 1.10.2.2 yamt error = udf_get_node(ump, dir_loc, &streamdir_node); 1560 1.10.2.2 yamt if (error) 1561 1.10.2.2 yamt printf("udf mount: streamdir defined but ignored\n"); 1562 1.10.2.2 yamt if (!error) { 1563 1.10.2.2 yamt /* 1564 1.10.2.2 yamt * TODO process streamdir `baddies' i.e. files we dont 1565 1.10.2.2 yamt * want if R/W 1566 1.10.2.2 yamt */ 1567 1.10.2.2 yamt } 1568 1.10.2.2 yamt } 1569 1.10.2.2 yamt 1570 1.10.2.2 yamt DPRINTF(VOLUMES, ("Rootdir(s) read in fine\n")); 1571 1.10.2.2 yamt 1572 1.10.2.2 yamt /* release the vnodes again; they'll be auto-recycled later */ 1573 1.10.2.2 yamt if (streamdir_node) { 1574 1.10.2.2 yamt vput(streamdir_node->vnode); 1575 1.10.2.2 yamt } 1576 1.10.2.2 yamt if (rootdir_node) { 1577 1.10.2.2 yamt vput(rootdir_node->vnode); 1578 1.10.2.2 yamt } 1579 1.10.2.2 yamt 1580 1.10.2.2 yamt return 0; 1581 1.10.2.2 yamt } 1582 1.10.2.2 yamt 1583 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1584 1.10.2.2 yamt 1585 1.10.2.2 yamt int 1586 1.10.2.2 yamt udf_translate_vtop(struct udf_mount *ump, struct long_ad *icb_loc, 1587 1.10.2.2 yamt uint32_t *lb_numres, uint32_t *extres) 1588 1.10.2.2 yamt { 1589 1.10.2.2 yamt struct part_desc *pdesc; 1590 1.10.2.2 yamt struct spare_map_entry *sme; 1591 1.10.2.4 yamt struct file_entry *fe; 1592 1.10.2.4 yamt struct extfile_entry *efe; 1593 1.10.2.4 yamt struct short_ad *s_ad; 1594 1.10.2.4 yamt struct long_ad *l_ad; 1595 1.10.2.4 yamt uint64_t cur_offset; 1596 1.10.2.2 yamt uint32_t *trans; 1597 1.10.2.4 yamt uint32_t lb_num, plb_num, lb_rel, lb_packet; 1598 1.10.2.4 yamt uint32_t sector_size, len, alloclen; 1599 1.10.2.4 yamt uint8_t *pos; 1600 1.10.2.4 yamt int rel, vpart, part, addr_type, icblen, icbflags, flags; 1601 1.10.2.2 yamt 1602 1.10.2.2 yamt assert(ump && icb_loc && lb_numres); 1603 1.10.2.2 yamt 1604 1.10.2.2 yamt vpart = udf_rw16(icb_loc->loc.part_num); 1605 1.10.2.2 yamt lb_num = udf_rw32(icb_loc->loc.lb_num); 1606 1.10.2.2 yamt if (vpart < 0 || vpart > UDF_VTOP_RAWPART) 1607 1.10.2.2 yamt return EINVAL; 1608 1.10.2.2 yamt 1609 1.10.2.4 yamt part = ump->vtop[vpart]; 1610 1.10.2.4 yamt pdesc = ump->partitions[part]; 1611 1.10.2.4 yamt 1612 1.10.2.2 yamt switch (ump->vtop_tp[vpart]) { 1613 1.10.2.2 yamt case UDF_VTOP_TYPE_RAW : 1614 1.10.2.2 yamt /* 1:1 to the end of the device */ 1615 1.10.2.2 yamt *lb_numres = lb_num; 1616 1.10.2.2 yamt *extres = INT_MAX; 1617 1.10.2.2 yamt return 0; 1618 1.10.2.2 yamt case UDF_VTOP_TYPE_PHYS : 1619 1.10.2.2 yamt /* transform into its disc logical block */ 1620 1.10.2.2 yamt if (lb_num > udf_rw32(pdesc->part_len)) 1621 1.10.2.2 yamt return EINVAL; 1622 1.10.2.2 yamt *lb_numres = lb_num + udf_rw32(pdesc->start_loc); 1623 1.10.2.2 yamt 1624 1.10.2.2 yamt /* extent from here to the end of the partition */ 1625 1.10.2.2 yamt *extres = udf_rw32(pdesc->part_len) - lb_num; 1626 1.10.2.2 yamt return 0; 1627 1.10.2.2 yamt case UDF_VTOP_TYPE_VIRT : 1628 1.10.2.2 yamt /* only maps one sector, lookup in VAT */ 1629 1.10.2.2 yamt if (lb_num >= ump->vat_entries) /* XXX > or >= ? */ 1630 1.10.2.2 yamt return EINVAL; 1631 1.10.2.2 yamt 1632 1.10.2.2 yamt /* lookup in virtual allocation table */ 1633 1.10.2.2 yamt trans = (uint32_t *) (ump->vat_table + ump->vat_offset); 1634 1.10.2.2 yamt lb_num = udf_rw32(trans[lb_num]); 1635 1.10.2.2 yamt 1636 1.10.2.2 yamt /* transform into its disc logical block */ 1637 1.10.2.2 yamt if (lb_num > udf_rw32(pdesc->part_len)) 1638 1.10.2.2 yamt return EINVAL; 1639 1.10.2.2 yamt *lb_numres = lb_num + udf_rw32(pdesc->start_loc); 1640 1.10.2.2 yamt 1641 1.10.2.2 yamt /* just one logical block */ 1642 1.10.2.2 yamt *extres = 1; 1643 1.10.2.2 yamt return 0; 1644 1.10.2.2 yamt case UDF_VTOP_TYPE_SPARABLE : 1645 1.10.2.2 yamt /* check if the packet containing the lb_num is remapped */ 1646 1.10.2.2 yamt lb_packet = lb_num / ump->sparable_packet_len; 1647 1.10.2.2 yamt lb_rel = lb_num % ump->sparable_packet_len; 1648 1.10.2.2 yamt 1649 1.10.2.2 yamt for (rel = 0; rel < udf_rw16(ump->sparing_table->rt_l); rel++) { 1650 1.10.2.2 yamt sme = &ump->sparing_table->entries[rel]; 1651 1.10.2.2 yamt if (lb_packet == udf_rw32(sme->org)) { 1652 1.10.2.2 yamt /* NOTE maps to absolute disc logical block! */ 1653 1.10.2.2 yamt *lb_numres = udf_rw32(sme->map) + lb_rel; 1654 1.10.2.2 yamt *extres = ump->sparable_packet_len - lb_rel; 1655 1.10.2.2 yamt return 0; 1656 1.10.2.2 yamt } 1657 1.10.2.2 yamt } 1658 1.10.2.2 yamt 1659 1.10.2.2 yamt /* transform into its disc logical block */ 1660 1.10.2.2 yamt if (lb_num > udf_rw32(pdesc->part_len)) 1661 1.10.2.2 yamt return EINVAL; 1662 1.10.2.2 yamt *lb_numres = lb_num + udf_rw32(pdesc->start_loc); 1663 1.10.2.2 yamt 1664 1.10.2.2 yamt /* rest of block */ 1665 1.10.2.2 yamt *extres = ump->sparable_packet_len - lb_rel; 1666 1.10.2.2 yamt return 0; 1667 1.10.2.2 yamt case UDF_VTOP_TYPE_META : 1668 1.10.2.4 yamt /* we have to look into the file's allocation descriptors */ 1669 1.10.2.4 yamt /* free after udf_translate_file_extent() */ 1670 1.10.2.4 yamt /* XXX sector size or lb_size? */ 1671 1.10.2.4 yamt sector_size = ump->discinfo.sector_size; 1672 1.10.2.4 yamt /* XXX should we claim exclusive access to the metafile ? */ 1673 1.10.2.4 yamt fe = ump->metadata_file->fe; 1674 1.10.2.4 yamt efe = ump->metadata_file->efe; 1675 1.10.2.4 yamt if (fe) { 1676 1.10.2.4 yamt alloclen = udf_rw32(fe->l_ad); 1677 1.10.2.4 yamt pos = &fe->data[0] + udf_rw32(fe->l_ea); 1678 1.10.2.4 yamt icbflags = udf_rw16(fe->icbtag.flags); 1679 1.10.2.4 yamt } else { 1680 1.10.2.4 yamt assert(efe); 1681 1.10.2.4 yamt alloclen = udf_rw32(efe->l_ad); 1682 1.10.2.4 yamt pos = &efe->data[0] + udf_rw32(efe->l_ea); 1683 1.10.2.4 yamt icbflags = udf_rw16(efe->icbtag.flags); 1684 1.10.2.4 yamt } 1685 1.10.2.4 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 1686 1.10.2.4 yamt 1687 1.10.2.4 yamt cur_offset = 0; 1688 1.10.2.4 yamt while (alloclen) { 1689 1.10.2.4 yamt if (addr_type == UDF_ICB_SHORT_ALLOC) { 1690 1.10.2.4 yamt icblen = sizeof(struct short_ad); 1691 1.10.2.4 yamt s_ad = (struct short_ad *) pos; 1692 1.10.2.4 yamt len = udf_rw32(s_ad->len); 1693 1.10.2.4 yamt plb_num = udf_rw32(s_ad->lb_num); 1694 1.10.2.4 yamt } else { 1695 1.10.2.4 yamt /* should not be present, but why not */ 1696 1.10.2.4 yamt icblen = sizeof(struct long_ad); 1697 1.10.2.4 yamt l_ad = (struct long_ad *) pos; 1698 1.10.2.4 yamt len = udf_rw32(l_ad->len); 1699 1.10.2.4 yamt plb_num = udf_rw32(l_ad->loc.lb_num); 1700 1.10.2.4 yamt /* pvpart_num = udf_rw16(l_ad->loc.part_num); */ 1701 1.10.2.4 yamt } 1702 1.10.2.4 yamt /* process extent */ 1703 1.10.2.4 yamt flags = UDF_EXT_FLAGS(len); 1704 1.10.2.4 yamt len = UDF_EXT_LEN(len); 1705 1.10.2.4 yamt 1706 1.10.2.4 yamt if (cur_offset + len > lb_num * sector_size) { 1707 1.10.2.4 yamt if (flags != UDF_EXT_ALLOCATED) 1708 1.10.2.4 yamt return EINVAL; 1709 1.10.2.4 yamt lb_rel = lb_num - cur_offset / sector_size; 1710 1.10.2.4 yamt /* remainder of this extent */ 1711 1.10.2.4 yamt *lb_numres = plb_num + lb_rel + 1712 1.10.2.4 yamt udf_rw32(pdesc->start_loc); 1713 1.10.2.4 yamt *extres = (len / sector_size) - lb_rel; 1714 1.10.2.4 yamt return 0; 1715 1.10.2.4 yamt } 1716 1.10.2.4 yamt cur_offset += len; 1717 1.10.2.4 yamt pos += icblen; 1718 1.10.2.4 yamt alloclen -= icblen; 1719 1.10.2.4 yamt } 1720 1.10.2.4 yamt /* not found */ 1721 1.10.2.4 yamt DPRINTF(TRANSLATE, ("Metadata partition translation failed\n")); 1722 1.10.2.4 yamt return EINVAL; 1723 1.10.2.2 yamt default: 1724 1.10.2.2 yamt printf("UDF vtop translation scheme %d unimplemented yet\n", 1725 1.10.2.2 yamt ump->vtop_tp[vpart]); 1726 1.10.2.2 yamt } 1727 1.10.2.2 yamt 1728 1.10.2.2 yamt return EINVAL; 1729 1.10.2.2 yamt } 1730 1.10.2.2 yamt 1731 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1732 1.10.2.2 yamt 1733 1.10.2.2 yamt /* To make absolutely sure we are NOT returning zero, add one :) */ 1734 1.10.2.2 yamt 1735 1.10.2.2 yamt long 1736 1.10.2.2 yamt udf_calchash(struct long_ad *icbptr) 1737 1.10.2.2 yamt { 1738 1.10.2.2 yamt /* ought to be enough since each mountpoint has its own chain */ 1739 1.10.2.2 yamt return udf_rw32(icbptr->loc.lb_num) + 1; 1740 1.10.2.2 yamt } 1741 1.10.2.2 yamt 1742 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1743 1.10.2.2 yamt 1744 1.10.2.2 yamt static struct udf_node * 1745 1.10.2.2 yamt udf_hashget(struct udf_mount *ump, struct long_ad *icbptr) 1746 1.10.2.2 yamt { 1747 1.10.2.2 yamt struct udf_node *unp; 1748 1.10.2.2 yamt struct vnode *vp; 1749 1.10.2.2 yamt uint32_t hashline; 1750 1.10.2.2 yamt 1751 1.10.2.2 yamt loop: 1752 1.10.2.2 yamt simple_lock(&ump->ihash_slock); 1753 1.10.2.2 yamt 1754 1.10.2.2 yamt hashline = udf_calchash(icbptr) & UDF_INODE_HASHMASK; 1755 1.10.2.2 yamt LIST_FOREACH(unp, &ump->udf_nodes[hashline], hashchain) { 1756 1.10.2.2 yamt assert(unp); 1757 1.10.2.2 yamt if (unp->loc.loc.lb_num == icbptr->loc.lb_num && 1758 1.10.2.2 yamt unp->loc.loc.part_num == icbptr->loc.part_num) { 1759 1.10.2.2 yamt vp = unp->vnode; 1760 1.10.2.2 yamt assert(vp); 1761 1.10.2.2 yamt simple_lock(&vp->v_interlock); 1762 1.10.2.2 yamt simple_unlock(&ump->ihash_slock); 1763 1.10.2.2 yamt if (vget(vp, LK_EXCLUSIVE | LK_INTERLOCK)) 1764 1.10.2.2 yamt goto loop; 1765 1.10.2.2 yamt return unp; 1766 1.10.2.2 yamt } 1767 1.10.2.2 yamt } 1768 1.10.2.2 yamt simple_unlock(&ump->ihash_slock); 1769 1.10.2.2 yamt 1770 1.10.2.2 yamt return NULL; 1771 1.10.2.2 yamt } 1772 1.10.2.2 yamt 1773 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1774 1.10.2.2 yamt 1775 1.10.2.2 yamt static void 1776 1.10.2.2 yamt udf_hashins(struct udf_node *unp) 1777 1.10.2.2 yamt { 1778 1.10.2.2 yamt struct udf_mount *ump; 1779 1.10.2.2 yamt uint32_t hashline; 1780 1.10.2.2 yamt 1781 1.10.2.2 yamt ump = unp->ump; 1782 1.10.2.2 yamt simple_lock(&ump->ihash_slock); 1783 1.10.2.2 yamt 1784 1.10.2.2 yamt hashline = udf_calchash(&unp->loc) & UDF_INODE_HASHMASK; 1785 1.10.2.2 yamt LIST_INSERT_HEAD(&ump->udf_nodes[hashline], unp, hashchain); 1786 1.10.2.2 yamt 1787 1.10.2.2 yamt simple_unlock(&ump->ihash_slock); 1788 1.10.2.2 yamt } 1789 1.10.2.2 yamt 1790 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1791 1.10.2.2 yamt 1792 1.10.2.2 yamt static void 1793 1.10.2.2 yamt udf_hashrem(struct udf_node *unp) 1794 1.10.2.2 yamt { 1795 1.10.2.2 yamt struct udf_mount *ump; 1796 1.10.2.2 yamt 1797 1.10.2.2 yamt ump = unp->ump; 1798 1.10.2.2 yamt simple_lock(&ump->ihash_slock); 1799 1.10.2.2 yamt 1800 1.10.2.2 yamt LIST_REMOVE(unp, hashchain); 1801 1.10.2.2 yamt 1802 1.10.2.2 yamt simple_unlock(&ump->ihash_slock); 1803 1.10.2.2 yamt } 1804 1.10.2.2 yamt 1805 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1806 1.10.2.2 yamt 1807 1.10.2.2 yamt int 1808 1.10.2.2 yamt udf_dispose_locked_node(struct udf_node *node) 1809 1.10.2.2 yamt { 1810 1.10.2.2 yamt if (!node) 1811 1.10.2.2 yamt return 0; 1812 1.10.2.2 yamt if (node->vnode) 1813 1.10.2.2 yamt VOP_UNLOCK(node->vnode, 0); 1814 1.10.2.2 yamt return udf_dispose_node(node); 1815 1.10.2.2 yamt } 1816 1.10.2.2 yamt 1817 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1818 1.10.2.2 yamt 1819 1.10.2.2 yamt int 1820 1.10.2.2 yamt udf_dispose_node(struct udf_node *node) 1821 1.10.2.2 yamt { 1822 1.10.2.2 yamt struct vnode *vp; 1823 1.10.2.2 yamt 1824 1.10.2.2 yamt DPRINTF(NODE, ("udf_dispose_node called on node %p\n", node)); 1825 1.10.2.2 yamt if (!node) { 1826 1.10.2.2 yamt DPRINTF(NODE, ("UDF: Dispose node on node NULL, ignoring\n")); 1827 1.10.2.2 yamt return 0; 1828 1.10.2.2 yamt } 1829 1.10.2.2 yamt 1830 1.10.2.2 yamt vp = node->vnode; 1831 1.10.2.2 yamt 1832 1.10.2.2 yamt /* TODO extended attributes and streamdir */ 1833 1.10.2.2 yamt 1834 1.10.2.2 yamt /* remove from our hash lookup table */ 1835 1.10.2.2 yamt udf_hashrem(node); 1836 1.10.2.2 yamt 1837 1.10.2.4 yamt /* destroy genfs structures */ 1838 1.10.2.4 yamt genfs_node_destroy(vp); 1839 1.10.2.4 yamt 1840 1.10.2.2 yamt /* dissociate our udf_node from the vnode */ 1841 1.10.2.2 yamt vp->v_data = NULL; 1842 1.10.2.2 yamt 1843 1.10.2.2 yamt /* free associated memory and the node itself */ 1844 1.10.2.2 yamt if (node->fe) 1845 1.10.2.3 yamt pool_put(node->ump->desc_pool, node->fe); 1846 1.10.2.2 yamt if (node->efe) 1847 1.10.2.3 yamt pool_put(node->ump->desc_pool, node->efe); 1848 1.10.2.2 yamt pool_put(&udf_node_pool, node); 1849 1.10.2.2 yamt 1850 1.10.2.2 yamt return 0; 1851 1.10.2.2 yamt } 1852 1.10.2.2 yamt 1853 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1854 1.10.2.2 yamt 1855 1.10.2.2 yamt /* 1856 1.10.2.2 yamt * Genfs interfacing 1857 1.10.2.2 yamt * 1858 1.10.2.2 yamt * static const struct genfs_ops udffs_genfsops = { 1859 1.10.2.2 yamt * .gop_size = genfs_size, 1860 1.10.2.2 yamt * size of transfers 1861 1.10.2.2 yamt * .gop_alloc = udf_gop_alloc, 1862 1.10.2.2 yamt * unknown 1863 1.10.2.2 yamt * .gop_write = genfs_gop_write, 1864 1.10.2.2 yamt * putpages interface code 1865 1.10.2.2 yamt * .gop_markupdate = udf_gop_markupdate, 1866 1.10.2.2 yamt * set update/modify flags etc. 1867 1.10.2.2 yamt * } 1868 1.10.2.2 yamt */ 1869 1.10.2.2 yamt 1870 1.10.2.2 yamt /* 1871 1.10.2.2 yamt * Genfs interface. These four functions are the only ones defined though not 1872 1.10.2.2 yamt * documented... great.... why is chosen for the `.' initialisers i dont know 1873 1.10.2.2 yamt * but other filingsystems seem to use it this way. 1874 1.10.2.2 yamt */ 1875 1.10.2.2 yamt 1876 1.10.2.2 yamt static int 1877 1.10.2.3 yamt udf_gop_alloc(struct vnode *vp, off_t off, 1878 1.10.2.3 yamt off_t len, int flags, kauth_cred_t cred) 1879 1.10.2.2 yamt { 1880 1.10.2.2 yamt return 0; 1881 1.10.2.2 yamt } 1882 1.10.2.2 yamt 1883 1.10.2.2 yamt 1884 1.10.2.2 yamt static void 1885 1.10.2.2 yamt udf_gop_markupdate(struct vnode *vp, int flags) 1886 1.10.2.2 yamt { 1887 1.10.2.2 yamt struct udf_node *udf_node = VTOI(vp); 1888 1.10.2.2 yamt u_long mask; 1889 1.10.2.2 yamt 1890 1.10.2.2 yamt udf_node = udf_node; /* shut up gcc */ 1891 1.10.2.2 yamt 1892 1.10.2.2 yamt mask = 0; 1893 1.10.2.2 yamt #ifdef notyet 1894 1.10.2.2 yamt if ((flags & GOP_UPDATE_ACCESSED) != 0) { 1895 1.10.2.2 yamt mask = UDF_SET_ACCESS; 1896 1.10.2.2 yamt } 1897 1.10.2.2 yamt if ((flags & GOP_UPDATE_MODIFIED) != 0) { 1898 1.10.2.2 yamt mask |= UDF_SET_UPDATE; 1899 1.10.2.2 yamt } 1900 1.10.2.2 yamt if (mask) { 1901 1.10.2.2 yamt udf_node->update_flag |= mask; 1902 1.10.2.2 yamt } 1903 1.10.2.2 yamt #endif 1904 1.10.2.2 yamt /* msdosfs doesn't do it, but shouldn't we update the times here? */ 1905 1.10.2.2 yamt } 1906 1.10.2.2 yamt 1907 1.10.2.2 yamt 1908 1.10.2.2 yamt static const struct genfs_ops udf_genfsops = { 1909 1.10.2.2 yamt .gop_size = genfs_size, 1910 1.10.2.2 yamt .gop_alloc = udf_gop_alloc, 1911 1.10.2.2 yamt .gop_write = genfs_gop_write, 1912 1.10.2.2 yamt .gop_markupdate = udf_gop_markupdate, 1913 1.10.2.2 yamt }; 1914 1.10.2.2 yamt 1915 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 1916 1.10.2.2 yamt 1917 1.10.2.2 yamt /* 1918 1.10.2.2 yamt * Each node can have an attached streamdir node though not 1919 1.10.2.2 yamt * recursively. These are otherwise known as named substreams/named 1920 1.10.2.2 yamt * extended attributes that have no size limitations. 1921 1.10.2.2 yamt * 1922 1.10.2.2 yamt * `Normal' extended attributes are indicated with a number and are recorded 1923 1.10.2.2 yamt * in either the fe/efe descriptor itself for small descriptors or recorded in 1924 1.10.2.2 yamt * the attached extended attribute file. Since this file can get fragmented, 1925 1.10.2.2 yamt * care ought to be taken. 1926 1.10.2.2 yamt */ 1927 1.10.2.2 yamt 1928 1.10.2.2 yamt int 1929 1.10.2.2 yamt udf_get_node(struct udf_mount *ump, struct long_ad *node_icb_loc, 1930 1.10.2.2 yamt struct udf_node **noderes) 1931 1.10.2.2 yamt { 1932 1.10.2.2 yamt union dscrptr *dscr, *tmpdscr; 1933 1.10.2.2 yamt struct udf_node *node; 1934 1.10.2.2 yamt struct vnode *nvp; 1935 1.10.2.2 yamt struct long_ad icb_loc; 1936 1.10.2.2 yamt extern int (**udf_vnodeop_p)(void *); 1937 1.10.2.2 yamt uint64_t file_size; 1938 1.10.2.2 yamt uint32_t lb_size, sector, dummy; 1939 1.10.2.2 yamt int udf_file_type, dscr_type, strat, strat4096, needs_indirect; 1940 1.10.2.2 yamt int error; 1941 1.10.2.2 yamt 1942 1.10.2.2 yamt DPRINTF(NODE, ("udf_get_node called\n")); 1943 1.10.2.2 yamt *noderes = node = NULL; 1944 1.10.2.2 yamt 1945 1.10.2.2 yamt /* lock to disallow simultanious creation of same node */ 1946 1.10.2.2 yamt lockmgr(&ump->get_node_lock, LK_EXCLUSIVE, NULL); 1947 1.10.2.2 yamt 1948 1.10.2.2 yamt DPRINTF(NODE, ("\tlookup in hash table\n")); 1949 1.10.2.2 yamt /* lookup in hash table */ 1950 1.10.2.2 yamt assert(ump); 1951 1.10.2.2 yamt assert(node_icb_loc); 1952 1.10.2.2 yamt node = udf_hashget(ump, node_icb_loc); 1953 1.10.2.2 yamt if (node) { 1954 1.10.2.2 yamt DPRINTF(NODE, ("\tgot it from the hash!\n")); 1955 1.10.2.2 yamt /* vnode is returned locked */ 1956 1.10.2.2 yamt *noderes = node; 1957 1.10.2.2 yamt lockmgr(&ump->get_node_lock, LK_RELEASE, NULL); 1958 1.10.2.2 yamt return 0; 1959 1.10.2.2 yamt } 1960 1.10.2.2 yamt 1961 1.10.2.2 yamt /* garbage check: translate node_icb_loc to sectornr */ 1962 1.10.2.2 yamt error = udf_translate_vtop(ump, node_icb_loc, §or, &dummy); 1963 1.10.2.2 yamt if (error) { 1964 1.10.2.2 yamt /* no use, this will fail anyway */ 1965 1.10.2.2 yamt lockmgr(&ump->get_node_lock, LK_RELEASE, NULL); 1966 1.10.2.2 yamt return EINVAL; 1967 1.10.2.2 yamt } 1968 1.10.2.2 yamt 1969 1.10.2.2 yamt /* build node (do initialise!) */ 1970 1.10.2.2 yamt node = pool_get(&udf_node_pool, PR_WAITOK); 1971 1.10.2.2 yamt memset(node, 0, sizeof(struct udf_node)); 1972 1.10.2.2 yamt 1973 1.10.2.2 yamt DPRINTF(NODE, ("\tget new vnode\n")); 1974 1.10.2.2 yamt /* give it a vnode */ 1975 1.10.2.2 yamt error = getnewvnode(VT_UDF, ump->vfs_mountp, udf_vnodeop_p, &nvp); 1976 1.10.2.2 yamt if (error) { 1977 1.10.2.2 yamt pool_put(&udf_node_pool, node); 1978 1.10.2.2 yamt lockmgr(&ump->get_node_lock, LK_RELEASE, NULL); 1979 1.10.2.2 yamt return error; 1980 1.10.2.2 yamt } 1981 1.10.2.2 yamt 1982 1.10.2.2 yamt /* allways return locked vnode */ 1983 1.10.2.2 yamt if ((error = vn_lock(nvp, LK_EXCLUSIVE | LK_RETRY))) { 1984 1.10.2.2 yamt /* recycle vnode and unlock; simultanious will fail too */ 1985 1.10.2.2 yamt ungetnewvnode(nvp); 1986 1.10.2.2 yamt lockmgr(&ump->get_node_lock, LK_RELEASE, NULL); 1987 1.10.2.2 yamt return error; 1988 1.10.2.2 yamt } 1989 1.10.2.2 yamt 1990 1.10.2.2 yamt /* initialise crosslinks, note location of fe/efe for hashing */ 1991 1.10.2.2 yamt node->ump = ump; 1992 1.10.2.2 yamt node->vnode = nvp; 1993 1.10.2.2 yamt nvp->v_data = node; 1994 1.10.2.2 yamt node->loc = *node_icb_loc; 1995 1.10.2.2 yamt node->lockf = 0; 1996 1.10.2.2 yamt 1997 1.10.2.2 yamt /* insert into the hash lookup */ 1998 1.10.2.2 yamt udf_hashins(node); 1999 1.10.2.2 yamt 2000 1.10.2.2 yamt /* safe to unlock, the entry is in the hash table, vnode is locked */ 2001 1.10.2.2 yamt lockmgr(&ump->get_node_lock, LK_RELEASE, NULL); 2002 1.10.2.2 yamt 2003 1.10.2.2 yamt icb_loc = *node_icb_loc; 2004 1.10.2.2 yamt needs_indirect = 0; 2005 1.10.2.2 yamt strat4096 = 0; 2006 1.10.2.2 yamt udf_file_type = UDF_ICB_FILETYPE_UNKNOWN; 2007 1.10.2.2 yamt file_size = 0; 2008 1.10.2.2 yamt lb_size = udf_rw32(ump->logical_vol->lb_size); 2009 1.10.2.2 yamt 2010 1.10.2.2 yamt do { 2011 1.10.2.2 yamt error = udf_translate_vtop(ump, &icb_loc, §or, &dummy); 2012 1.10.2.2 yamt if (error) 2013 1.10.2.2 yamt break; 2014 1.10.2.2 yamt 2015 1.10.2.2 yamt /* try to read in fe/efe */ 2016 1.10.2.2 yamt error = udf_read_descriptor(ump, sector, M_UDFTEMP, &tmpdscr); 2017 1.10.2.2 yamt 2018 1.10.2.2 yamt /* blank sector marks end of sequence, check this */ 2019 1.10.2.2 yamt if ((tmpdscr == NULL) && (!strat4096)) 2020 1.10.2.2 yamt error = ENOENT; 2021 1.10.2.2 yamt 2022 1.10.2.2 yamt /* break if read error or blank sector */ 2023 1.10.2.2 yamt if (error || (tmpdscr == NULL)) 2024 1.10.2.2 yamt break; 2025 1.10.2.2 yamt 2026 1.10.2.2 yamt /* process descriptor based on the descriptor type */ 2027 1.10.2.2 yamt dscr_type = udf_rw16(tmpdscr->tag.id); 2028 1.10.2.2 yamt 2029 1.10.2.2 yamt /* if dealing with an indirect entry, follow the link */ 2030 1.10.2.2 yamt if (dscr_type == TAGID_INDIRECT_ENTRY) { 2031 1.10.2.2 yamt needs_indirect = 0; 2032 1.10.2.2 yamt icb_loc = tmpdscr->inde.indirect_icb; 2033 1.10.2.2 yamt free(tmpdscr, M_UDFTEMP); 2034 1.10.2.2 yamt continue; 2035 1.10.2.2 yamt } 2036 1.10.2.2 yamt 2037 1.10.2.2 yamt /* only file entries and extended file entries allowed here */ 2038 1.10.2.2 yamt if ((dscr_type != TAGID_FENTRY) && 2039 1.10.2.2 yamt (dscr_type != TAGID_EXTFENTRY)) { 2040 1.10.2.2 yamt free(tmpdscr, M_UDFTEMP); 2041 1.10.2.2 yamt error = ENOENT; 2042 1.10.2.2 yamt break; 2043 1.10.2.2 yamt } 2044 1.10.2.2 yamt 2045 1.10.2.2 yamt /* get descriptor space from our pool */ 2046 1.10.2.2 yamt KASSERT(udf_tagsize(tmpdscr, lb_size) == lb_size); 2047 1.10.2.2 yamt 2048 1.10.2.3 yamt dscr = pool_get(ump->desc_pool, PR_WAITOK); 2049 1.10.2.2 yamt memcpy(dscr, tmpdscr, lb_size); 2050 1.10.2.2 yamt free(tmpdscr, M_UDFTEMP); 2051 1.10.2.2 yamt 2052 1.10.2.2 yamt /* record and process/update (ext)fentry */ 2053 1.10.2.2 yamt if (dscr_type == TAGID_FENTRY) { 2054 1.10.2.2 yamt if (node->fe) 2055 1.10.2.3 yamt pool_put(ump->desc_pool, node->fe); 2056 1.10.2.2 yamt node->fe = &dscr->fe; 2057 1.10.2.2 yamt strat = udf_rw16(node->fe->icbtag.strat_type); 2058 1.10.2.2 yamt udf_file_type = node->fe->icbtag.file_type; 2059 1.10.2.2 yamt file_size = udf_rw64(node->fe->inf_len); 2060 1.10.2.2 yamt } else { 2061 1.10.2.2 yamt if (node->efe) 2062 1.10.2.3 yamt pool_put(ump->desc_pool, node->efe); 2063 1.10.2.2 yamt node->efe = &dscr->efe; 2064 1.10.2.2 yamt strat = udf_rw16(node->efe->icbtag.strat_type); 2065 1.10.2.2 yamt udf_file_type = node->efe->icbtag.file_type; 2066 1.10.2.2 yamt file_size = udf_rw64(node->efe->inf_len); 2067 1.10.2.2 yamt } 2068 1.10.2.2 yamt 2069 1.10.2.2 yamt /* check recording strategy (structure) */ 2070 1.10.2.2 yamt 2071 1.10.2.2 yamt /* 2072 1.10.2.2 yamt * Strategy 4096 is a daisy linked chain terminating with an 2073 1.10.2.2 yamt * unrecorded sector or a TERM descriptor. The next 2074 1.10.2.2 yamt * descriptor is to be found in the sector that follows the 2075 1.10.2.2 yamt * current sector. 2076 1.10.2.2 yamt */ 2077 1.10.2.2 yamt if (strat == 4096) { 2078 1.10.2.2 yamt strat4096 = 1; 2079 1.10.2.2 yamt needs_indirect = 1; 2080 1.10.2.2 yamt 2081 1.10.2.2 yamt icb_loc.loc.lb_num = udf_rw32(icb_loc.loc.lb_num) + 1; 2082 1.10.2.2 yamt } 2083 1.10.2.2 yamt 2084 1.10.2.2 yamt /* 2085 1.10.2.2 yamt * Strategy 4 is the normal strategy and terminates, but if 2086 1.10.2.2 yamt * we're in strategy 4096, we can't have strategy 4 mixed in 2087 1.10.2.2 yamt */ 2088 1.10.2.2 yamt 2089 1.10.2.2 yamt if (strat == 4) { 2090 1.10.2.2 yamt if (strat4096) { 2091 1.10.2.2 yamt error = EINVAL; 2092 1.10.2.2 yamt break; 2093 1.10.2.2 yamt } 2094 1.10.2.2 yamt break; /* done */ 2095 1.10.2.2 yamt } 2096 1.10.2.2 yamt } while (!error); 2097 1.10.2.2 yamt 2098 1.10.2.2 yamt if (error) { 2099 1.10.2.2 yamt /* recycle udf_node */ 2100 1.10.2.2 yamt udf_dispose_node(node); 2101 1.10.2.2 yamt 2102 1.10.2.2 yamt /* recycle vnode */ 2103 1.10.2.2 yamt nvp->v_data = NULL; 2104 1.10.2.2 yamt ungetnewvnode(nvp); 2105 1.10.2.2 yamt 2106 1.10.2.2 yamt return EINVAL; /* error code ok? */ 2107 1.10.2.2 yamt } 2108 1.10.2.2 yamt 2109 1.10.2.2 yamt /* post process and initialise node */ 2110 1.10.2.2 yamt 2111 1.10.2.2 yamt /* assert no references to dscr anymore beyong this point */ 2112 1.10.2.2 yamt assert((node->fe) || (node->efe)); 2113 1.10.2.2 yamt dscr = NULL; 2114 1.10.2.2 yamt 2115 1.10.2.2 yamt /* 2116 1.10.2.2 yamt * Record where to record an updated version of the descriptor. If 2117 1.10.2.2 yamt * there is a sequence of indirect entries, icb_loc will have been 2118 1.10.2.2 yamt * updated. Its the write disipline to allocate new space and to make 2119 1.10.2.2 yamt * sure the chain is maintained. 2120 1.10.2.2 yamt * 2121 1.10.2.2 yamt * `needs_indirect' flags if the next location is to be filled with 2122 1.10.2.2 yamt * with an indirect entry. 2123 1.10.2.2 yamt */ 2124 1.10.2.2 yamt node->next_loc = icb_loc; 2125 1.10.2.2 yamt node->needs_indirect = needs_indirect; 2126 1.10.2.2 yamt 2127 1.10.2.2 yamt /* 2128 1.10.2.2 yamt * Translate UDF filetypes into vnode types. 2129 1.10.2.2 yamt * 2130 1.10.2.2 yamt * Systemfiles like the meta main and mirror files are not treated as 2131 1.10.2.2 yamt * normal files, so we type them as having no type. UDF dictates that 2132 1.10.2.2 yamt * they are not allowed to be visible. 2133 1.10.2.2 yamt */ 2134 1.10.2.2 yamt 2135 1.10.2.2 yamt /* TODO specfs, fifofs etc etc. vnops setting */ 2136 1.10.2.2 yamt switch (udf_file_type) { 2137 1.10.2.2 yamt case UDF_ICB_FILETYPE_DIRECTORY : 2138 1.10.2.2 yamt case UDF_ICB_FILETYPE_STREAMDIR : 2139 1.10.2.2 yamt nvp->v_type = VDIR; 2140 1.10.2.2 yamt break; 2141 1.10.2.2 yamt case UDF_ICB_FILETYPE_BLOCKDEVICE : 2142 1.10.2.2 yamt nvp->v_type = VBLK; 2143 1.10.2.2 yamt break; 2144 1.10.2.2 yamt case UDF_ICB_FILETYPE_CHARDEVICE : 2145 1.10.2.2 yamt nvp->v_type = VCHR; 2146 1.10.2.2 yamt break; 2147 1.10.2.2 yamt case UDF_ICB_FILETYPE_SYMLINK : 2148 1.10.2.2 yamt nvp->v_type = VLNK; 2149 1.10.2.2 yamt break; 2150 1.10.2.4 yamt case UDF_ICB_FILETYPE_VAT : 2151 1.10.2.2 yamt case UDF_ICB_FILETYPE_META_MAIN : 2152 1.10.2.2 yamt case UDF_ICB_FILETYPE_META_MIRROR : 2153 1.10.2.2 yamt nvp->v_type = VNON; 2154 1.10.2.2 yamt break; 2155 1.10.2.2 yamt case UDF_ICB_FILETYPE_RANDOMACCESS : 2156 1.10.2.4 yamt case UDF_ICB_FILETYPE_REALTIME : 2157 1.10.2.2 yamt nvp->v_type = VREG; 2158 1.10.2.2 yamt break; 2159 1.10.2.2 yamt default: 2160 1.10.2.2 yamt /* YIKES, either a block/char device, fifo or something else */ 2161 1.10.2.2 yamt nvp->v_type = VNON; 2162 1.10.2.2 yamt } 2163 1.10.2.2 yamt 2164 1.10.2.2 yamt /* initialise genfs */ 2165 1.10.2.2 yamt genfs_node_init(nvp, &udf_genfsops); 2166 1.10.2.2 yamt 2167 1.10.2.2 yamt /* don't forget to set vnode's v_size */ 2168 1.10.2.2 yamt nvp->v_size = file_size; 2169 1.10.2.2 yamt 2170 1.10.2.2 yamt /* TODO ext attr and streamdir nodes */ 2171 1.10.2.2 yamt 2172 1.10.2.2 yamt *noderes = node; 2173 1.10.2.2 yamt 2174 1.10.2.2 yamt return 0; 2175 1.10.2.2 yamt } 2176 1.10.2.2 yamt 2177 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2178 1.10.2.2 yamt 2179 1.10.2.2 yamt /* UDF<->unix converters */ 2180 1.10.2.2 yamt 2181 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2182 1.10.2.2 yamt 2183 1.10.2.2 yamt static mode_t 2184 1.10.2.2 yamt udf_perm_to_unix_mode(uint32_t perm) 2185 1.10.2.2 yamt { 2186 1.10.2.2 yamt mode_t mode; 2187 1.10.2.2 yamt 2188 1.10.2.2 yamt mode = ((perm & UDF_FENTRY_PERM_USER_MASK) ); 2189 1.10.2.2 yamt mode |= ((perm & UDF_FENTRY_PERM_GRP_MASK ) >> 2); 2190 1.10.2.2 yamt mode |= ((perm & UDF_FENTRY_PERM_OWNER_MASK) >> 4); 2191 1.10.2.2 yamt 2192 1.10.2.2 yamt return mode; 2193 1.10.2.2 yamt } 2194 1.10.2.2 yamt 2195 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2196 1.10.2.2 yamt 2197 1.10.2.2 yamt #ifdef notyet 2198 1.10.2.2 yamt static uint32_t 2199 1.10.2.2 yamt unix_mode_to_udf_perm(mode_t mode) 2200 1.10.2.2 yamt { 2201 1.10.2.2 yamt uint32_t perm; 2202 1.10.2.2 yamt 2203 1.10.2.2 yamt perm = ((mode & S_IRWXO) ); 2204 1.10.2.2 yamt perm |= ((mode & S_IRWXG) << 2); 2205 1.10.2.2 yamt perm |= ((mode & S_IRWXU) << 4); 2206 1.10.2.2 yamt perm |= ((mode & S_IWOTH) << 3); 2207 1.10.2.2 yamt perm |= ((mode & S_IWGRP) << 5); 2208 1.10.2.2 yamt perm |= ((mode & S_IWUSR) << 7); 2209 1.10.2.2 yamt 2210 1.10.2.2 yamt return perm; 2211 1.10.2.2 yamt } 2212 1.10.2.2 yamt #endif 2213 1.10.2.2 yamt 2214 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2215 1.10.2.2 yamt 2216 1.10.2.2 yamt static uint32_t 2217 1.10.2.2 yamt udf_icb_to_unix_filetype(uint32_t icbftype) 2218 1.10.2.2 yamt { 2219 1.10.2.2 yamt switch (icbftype) { 2220 1.10.2.2 yamt case UDF_ICB_FILETYPE_DIRECTORY : 2221 1.10.2.2 yamt case UDF_ICB_FILETYPE_STREAMDIR : 2222 1.10.2.2 yamt return S_IFDIR; 2223 1.10.2.2 yamt case UDF_ICB_FILETYPE_FIFO : 2224 1.10.2.2 yamt return S_IFIFO; 2225 1.10.2.2 yamt case UDF_ICB_FILETYPE_CHARDEVICE : 2226 1.10.2.2 yamt return S_IFCHR; 2227 1.10.2.2 yamt case UDF_ICB_FILETYPE_BLOCKDEVICE : 2228 1.10.2.2 yamt return S_IFBLK; 2229 1.10.2.2 yamt case UDF_ICB_FILETYPE_RANDOMACCESS : 2230 1.10.2.4 yamt case UDF_ICB_FILETYPE_REALTIME : 2231 1.10.2.2 yamt return S_IFREG; 2232 1.10.2.2 yamt case UDF_ICB_FILETYPE_SYMLINK : 2233 1.10.2.2 yamt return S_IFLNK; 2234 1.10.2.2 yamt case UDF_ICB_FILETYPE_SOCKET : 2235 1.10.2.2 yamt return S_IFSOCK; 2236 1.10.2.2 yamt } 2237 1.10.2.2 yamt /* no idea what this is */ 2238 1.10.2.2 yamt return 0; 2239 1.10.2.2 yamt } 2240 1.10.2.2 yamt 2241 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2242 1.10.2.2 yamt 2243 1.10.2.2 yamt /* TODO KNF-ify */ 2244 1.10.2.2 yamt 2245 1.10.2.2 yamt void 2246 1.10.2.2 yamt udf_to_unix_name(char *result, char *id, int len, struct charspec *chsp) 2247 1.10.2.2 yamt { 2248 1.10.2.2 yamt uint16_t *raw_name, *unix_name; 2249 1.10.2.2 yamt uint16_t *inchp, ch; 2250 1.10.2.2 yamt uint8_t *outchp; 2251 1.10.2.2 yamt int ucode_chars, nice_uchars; 2252 1.10.2.2 yamt 2253 1.10.2.3 yamt raw_name = malloc(2048 * sizeof(uint16_t), M_UDFTEMP, M_WAITOK); 2254 1.10.2.3 yamt unix_name = raw_name + 1024; /* split space in half */ 2255 1.10.2.2 yamt assert(sizeof(char) == sizeof(uint8_t)); 2256 1.10.2.2 yamt outchp = (uint8_t *) result; 2257 1.10.2.2 yamt if ((chsp->type == 0) && (strcmp((char*) chsp->inf, "OSTA Compressed Unicode") == 0)) { 2258 1.10.2.2 yamt *raw_name = *unix_name = 0; 2259 1.10.2.2 yamt ucode_chars = udf_UncompressUnicode(len, (uint8_t *) id, raw_name); 2260 1.10.2.2 yamt ucode_chars = MIN(ucode_chars, UnicodeLength((unicode_t *) raw_name)); 2261 1.10.2.2 yamt nice_uchars = UDFTransName(unix_name, raw_name, ucode_chars); 2262 1.10.2.2 yamt for (inchp = unix_name; nice_uchars>0; inchp++, nice_uchars--) { 2263 1.10.2.2 yamt ch = *inchp; 2264 1.10.2.2 yamt /* XXX sloppy unicode -> latin */ 2265 1.10.2.2 yamt *outchp++ = ch & 255; 2266 1.10.2.2 yamt if (!ch) break; 2267 1.10.2.2 yamt } 2268 1.10.2.2 yamt *outchp++ = 0; 2269 1.10.2.2 yamt } else { 2270 1.10.2.2 yamt /* assume 8bit char length byte latin-1 */ 2271 1.10.2.2 yamt assert(*id == 8); 2272 1.10.2.2 yamt strncpy((char *) result, (char *) (id+1), strlen((char *) (id+1))); 2273 1.10.2.2 yamt } 2274 1.10.2.2 yamt free(raw_name, M_UDFTEMP); 2275 1.10.2.2 yamt } 2276 1.10.2.2 yamt 2277 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2278 1.10.2.2 yamt 2279 1.10.2.2 yamt /* TODO KNF-ify */ 2280 1.10.2.2 yamt 2281 1.10.2.2 yamt void 2282 1.10.2.2 yamt unix_to_udf_name(char *result, char *name, 2283 1.10.2.2 yamt uint8_t *result_len, struct charspec *chsp) 2284 1.10.2.2 yamt { 2285 1.10.2.2 yamt uint16_t *raw_name; 2286 1.10.2.2 yamt int udf_chars, name_len; 2287 1.10.2.2 yamt char *inchp; 2288 1.10.2.2 yamt uint16_t *outchp; 2289 1.10.2.2 yamt 2290 1.10.2.2 yamt raw_name = malloc(1024, M_UDFTEMP, M_WAITOK); 2291 1.10.2.2 yamt /* convert latin-1 or whatever to unicode-16 */ 2292 1.10.2.2 yamt *raw_name = 0; 2293 1.10.2.2 yamt name_len = 0; 2294 1.10.2.2 yamt inchp = name; 2295 1.10.2.2 yamt outchp = raw_name; 2296 1.10.2.2 yamt while (*inchp) { 2297 1.10.2.2 yamt *outchp++ = (uint16_t) (*inchp++); 2298 1.10.2.2 yamt name_len++; 2299 1.10.2.2 yamt } 2300 1.10.2.2 yamt 2301 1.10.2.2 yamt if ((chsp->type == 0) && (strcmp((char *) chsp->inf, "OSTA Compressed Unicode") == 0)) { 2302 1.10.2.2 yamt udf_chars = udf_CompressUnicode(name_len, 8, (unicode_t *) raw_name, (byte *) result); 2303 1.10.2.2 yamt } else { 2304 1.10.2.2 yamt /* XXX assume 8bit char length byte latin-1 */ 2305 1.10.2.2 yamt *result++ = 8; udf_chars = 1; 2306 1.10.2.2 yamt strncpy(result, name + 1, strlen(name+1)); 2307 1.10.2.2 yamt udf_chars += strlen(name); 2308 1.10.2.2 yamt } 2309 1.10.2.2 yamt *result_len = udf_chars; 2310 1.10.2.2 yamt free(raw_name, M_UDFTEMP); 2311 1.10.2.2 yamt } 2312 1.10.2.2 yamt 2313 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2314 1.10.2.2 yamt 2315 1.10.2.2 yamt void 2316 1.10.2.2 yamt udf_timestamp_to_timespec(struct udf_mount *ump, 2317 1.10.2.2 yamt struct timestamp *timestamp, 2318 1.10.2.4 yamt struct timespec *timespec) 2319 1.10.2.2 yamt { 2320 1.10.2.4 yamt struct clock_ymdhms ymdhms; 2321 1.10.2.2 yamt uint32_t usecs, secs, nsecs; 2322 1.10.2.2 yamt uint16_t tz; 2323 1.10.2.2 yamt 2324 1.10.2.4 yamt /* fill in ymdhms structure from timestamp */ 2325 1.10.2.4 yamt memset(&ymdhms, 0, sizeof(ymdhms)); 2326 1.10.2.4 yamt ymdhms.dt_year = udf_rw16(timestamp->year); 2327 1.10.2.4 yamt ymdhms.dt_mon = timestamp->month; 2328 1.10.2.4 yamt ymdhms.dt_day = timestamp->day; 2329 1.10.2.4 yamt ymdhms.dt_wday = 0; /* ? */ 2330 1.10.2.4 yamt ymdhms.dt_hour = timestamp->hour; 2331 1.10.2.4 yamt ymdhms.dt_min = timestamp->minute; 2332 1.10.2.4 yamt ymdhms.dt_sec = timestamp->second; 2333 1.10.2.2 yamt 2334 1.10.2.4 yamt secs = clock_ymdhms_to_secs(&ymdhms); 2335 1.10.2.2 yamt usecs = timestamp->usec + 2336 1.10.2.2 yamt 100*timestamp->hund_usec + 10000*timestamp->centisec; 2337 1.10.2.2 yamt nsecs = usecs * 1000; 2338 1.10.2.2 yamt 2339 1.10.2.2 yamt /* 2340 1.10.2.2 yamt * Calculate the time zone. The timezone is 12 bit signed 2's 2341 1.10.2.2 yamt * compliment, so we gotta do some extra magic to handle it right. 2342 1.10.2.2 yamt */ 2343 1.10.2.2 yamt tz = udf_rw16(timestamp->type_tz); 2344 1.10.2.2 yamt tz &= 0x0fff; /* only lower 12 bits are significant */ 2345 1.10.2.2 yamt if (tz & 0x0800) /* sign extention */ 2346 1.10.2.2 yamt tz |= 0xf000; 2347 1.10.2.2 yamt 2348 1.10.2.2 yamt /* TODO check timezone conversion */ 2349 1.10.2.2 yamt /* check if we are specified a timezone to convert */ 2350 1.10.2.2 yamt if (udf_rw16(timestamp->type_tz) & 0x1000) { 2351 1.10.2.2 yamt if ((int16_t) tz != -2047) 2352 1.10.2.2 yamt secs -= (int16_t) tz * 60; 2353 1.10.2.2 yamt } else { 2354 1.10.2.2 yamt secs -= ump->mount_args.gmtoff; 2355 1.10.2.2 yamt } 2356 1.10.2.2 yamt 2357 1.10.2.2 yamt timespec->tv_sec = secs; 2358 1.10.2.2 yamt timespec->tv_nsec = nsecs; 2359 1.10.2.2 yamt } 2360 1.10.2.2 yamt 2361 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2362 1.10.2.2 yamt 2363 1.10.2.2 yamt /* 2364 1.10.2.2 yamt * Attribute and filetypes converters with get/set pairs 2365 1.10.2.2 yamt */ 2366 1.10.2.2 yamt 2367 1.10.2.2 yamt uint32_t 2368 1.10.2.2 yamt udf_getaccessmode(struct udf_node *udf_node) 2369 1.10.2.2 yamt { 2370 1.10.2.2 yamt struct file_entry *fe; 2371 1.10.2.2 yamt struct extfile_entry *efe; 2372 1.10.2.2 yamt uint32_t udf_perm, icbftype; 2373 1.10.2.2 yamt uint32_t mode, ftype; 2374 1.10.2.2 yamt uint16_t icbflags; 2375 1.10.2.2 yamt 2376 1.10.2.2 yamt if (udf_node->fe) { 2377 1.10.2.2 yamt fe = udf_node->fe; 2378 1.10.2.2 yamt udf_perm = udf_rw32(fe->perm); 2379 1.10.2.2 yamt icbftype = fe->icbtag.file_type; 2380 1.10.2.2 yamt icbflags = udf_rw16(fe->icbtag.flags); 2381 1.10.2.2 yamt } else { 2382 1.10.2.2 yamt assert(udf_node->efe); 2383 1.10.2.2 yamt efe = udf_node->efe; 2384 1.10.2.2 yamt udf_perm = udf_rw32(efe->perm); 2385 1.10.2.2 yamt icbftype = efe->icbtag.file_type; 2386 1.10.2.2 yamt icbflags = udf_rw16(efe->icbtag.flags); 2387 1.10.2.2 yamt } 2388 1.10.2.2 yamt 2389 1.10.2.2 yamt mode = udf_perm_to_unix_mode(udf_perm); 2390 1.10.2.2 yamt ftype = udf_icb_to_unix_filetype(icbftype); 2391 1.10.2.2 yamt 2392 1.10.2.2 yamt /* set suid, sgid, sticky from flags in fe/efe */ 2393 1.10.2.2 yamt if (icbflags & UDF_ICB_TAG_FLAGS_SETUID) 2394 1.10.2.2 yamt mode |= S_ISUID; 2395 1.10.2.2 yamt if (icbflags & UDF_ICB_TAG_FLAGS_SETGID) 2396 1.10.2.2 yamt mode |= S_ISGID; 2397 1.10.2.2 yamt if (icbflags & UDF_ICB_TAG_FLAGS_STICKY) 2398 1.10.2.2 yamt mode |= S_ISVTX; 2399 1.10.2.2 yamt 2400 1.10.2.2 yamt return mode | ftype; 2401 1.10.2.2 yamt } 2402 1.10.2.2 yamt 2403 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2404 1.10.2.2 yamt 2405 1.10.2.2 yamt /* 2406 1.10.2.2 yamt * Directory read and manipulation functions 2407 1.10.2.2 yamt */ 2408 1.10.2.2 yamt 2409 1.10.2.2 yamt int 2410 1.10.2.2 yamt udf_lookup_name_in_dir(struct vnode *vp, const char *name, int namelen, 2411 1.10.2.2 yamt struct long_ad *icb_loc) 2412 1.10.2.2 yamt { 2413 1.10.2.2 yamt struct udf_node *dir_node = VTOI(vp); 2414 1.10.2.2 yamt struct file_entry *fe; 2415 1.10.2.2 yamt struct extfile_entry *efe; 2416 1.10.2.2 yamt struct fileid_desc *fid; 2417 1.10.2.2 yamt struct dirent dirent; 2418 1.10.2.2 yamt uint64_t file_size, diroffset; 2419 1.10.2.2 yamt uint32_t lb_size; 2420 1.10.2.2 yamt int found, error; 2421 1.10.2.2 yamt 2422 1.10.2.2 yamt /* get directory filesize */ 2423 1.10.2.2 yamt if (dir_node->fe) { 2424 1.10.2.2 yamt fe = dir_node->fe; 2425 1.10.2.2 yamt file_size = udf_rw64(fe->inf_len); 2426 1.10.2.2 yamt } else { 2427 1.10.2.2 yamt assert(dir_node->efe); 2428 1.10.2.2 yamt efe = dir_node->efe; 2429 1.10.2.2 yamt file_size = udf_rw64(efe->inf_len); 2430 1.10.2.2 yamt } 2431 1.10.2.2 yamt 2432 1.10.2.2 yamt /* allocate temporary space for fid */ 2433 1.10.2.2 yamt lb_size = udf_rw32(dir_node->ump->logical_vol->lb_size); 2434 1.10.2.2 yamt fid = malloc(lb_size, M_TEMP, M_WAITOK); 2435 1.10.2.2 yamt 2436 1.10.2.2 yamt found = 0; 2437 1.10.2.3 yamt diroffset = dir_node->last_diroffset; 2438 1.10.2.4 yamt 2439 1.10.2.4 yamt /* 2440 1.10.2.4 yamt * if the directory is trunced or if we have never visited it yet, 2441 1.10.2.4 yamt * start at the end. 2442 1.10.2.4 yamt */ 2443 1.10.2.4 yamt if ((diroffset >= file_size) || (diroffset == 0)) { 2444 1.10.2.4 yamt diroffset = dir_node->last_diroffset = file_size; 2445 1.10.2.4 yamt } 2446 1.10.2.4 yamt 2447 1.10.2.3 yamt while (!found) { 2448 1.10.2.4 yamt /* if at the end, go trough zero */ 2449 1.10.2.3 yamt if (diroffset >= file_size) 2450 1.10.2.3 yamt diroffset = 0; 2451 1.10.2.3 yamt 2452 1.10.2.2 yamt /* transfer a new fid/dirent */ 2453 1.10.2.2 yamt error = udf_read_fid_stream(vp, &diroffset, fid, &dirent); 2454 1.10.2.2 yamt if (error) 2455 1.10.2.2 yamt break; 2456 1.10.2.2 yamt 2457 1.10.2.2 yamt /* skip deleted entries */ 2458 1.10.2.3 yamt if ((fid->file_char & UDF_FILE_CHAR_DEL) == 0) { 2459 1.10.2.3 yamt if ((strlen(dirent.d_name) == namelen) && 2460 1.10.2.3 yamt (strncmp(dirent.d_name, name, namelen) == 0)) { 2461 1.10.2.3 yamt found = 1; 2462 1.10.2.3 yamt *icb_loc = fid->icb; 2463 1.10.2.3 yamt } 2464 1.10.2.3 yamt } 2465 1.10.2.2 yamt 2466 1.10.2.3 yamt if (diroffset == dir_node->last_diroffset) { 2467 1.10.2.3 yamt /* we have cycled */ 2468 1.10.2.3 yamt break; 2469 1.10.2.2 yamt } 2470 1.10.2.2 yamt } 2471 1.10.2.2 yamt free(fid, M_TEMP); 2472 1.10.2.3 yamt dir_node->last_diroffset = diroffset; 2473 1.10.2.2 yamt 2474 1.10.2.2 yamt return found; 2475 1.10.2.2 yamt } 2476 1.10.2.2 yamt 2477 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2478 1.10.2.2 yamt 2479 1.10.2.2 yamt /* 2480 1.10.2.2 yamt * Read one fid and process it into a dirent and advance to the next (*fid) 2481 1.10.2.2 yamt * has to be allocated a logical block in size, (*dirent) struct dirent length 2482 1.10.2.2 yamt */ 2483 1.10.2.2 yamt 2484 1.10.2.2 yamt int 2485 1.10.2.2 yamt udf_read_fid_stream(struct vnode *vp, uint64_t *offset, 2486 1.10.2.2 yamt struct fileid_desc *fid, struct dirent *dirent) 2487 1.10.2.2 yamt { 2488 1.10.2.2 yamt struct udf_node *dir_node = VTOI(vp); 2489 1.10.2.2 yamt struct udf_mount *ump = dir_node->ump; 2490 1.10.2.2 yamt struct file_entry *fe; 2491 1.10.2.2 yamt struct extfile_entry *efe; 2492 1.10.2.2 yamt struct uio dir_uio; 2493 1.10.2.2 yamt struct iovec dir_iovec; 2494 1.10.2.2 yamt uint32_t entry_length, lb_size; 2495 1.10.2.2 yamt uint64_t file_size; 2496 1.10.2.2 yamt char *fid_name; 2497 1.10.2.2 yamt int enough, error; 2498 1.10.2.2 yamt 2499 1.10.2.2 yamt assert(fid); 2500 1.10.2.2 yamt assert(dirent); 2501 1.10.2.2 yamt assert(dir_node); 2502 1.10.2.2 yamt assert(offset); 2503 1.10.2.2 yamt assert(*offset != 1); 2504 1.10.2.2 yamt 2505 1.10.2.2 yamt DPRINTF(FIDS, ("read_fid_stream called\n")); 2506 1.10.2.2 yamt /* check if we're past the end of the directory */ 2507 1.10.2.2 yamt if (dir_node->fe) { 2508 1.10.2.2 yamt fe = dir_node->fe; 2509 1.10.2.2 yamt file_size = udf_rw64(fe->inf_len); 2510 1.10.2.2 yamt } else { 2511 1.10.2.2 yamt assert(dir_node->efe); 2512 1.10.2.2 yamt efe = dir_node->efe; 2513 1.10.2.2 yamt file_size = udf_rw64(efe->inf_len); 2514 1.10.2.2 yamt } 2515 1.10.2.2 yamt if (*offset >= file_size) 2516 1.10.2.2 yamt return EINVAL; 2517 1.10.2.2 yamt 2518 1.10.2.2 yamt /* get maximum length of FID descriptor */ 2519 1.10.2.2 yamt lb_size = udf_rw32(ump->logical_vol->lb_size); 2520 1.10.2.2 yamt 2521 1.10.2.2 yamt /* initialise return values */ 2522 1.10.2.2 yamt entry_length = 0; 2523 1.10.2.2 yamt memset(dirent, 0, sizeof(struct dirent)); 2524 1.10.2.2 yamt memset(fid, 0, lb_size); 2525 1.10.2.2 yamt 2526 1.10.2.2 yamt /* TODO use vn_rdwr instead of creating our own uio */ 2527 1.10.2.2 yamt /* read part of the directory */ 2528 1.10.2.2 yamt memset(&dir_uio, 0, sizeof(struct uio)); 2529 1.10.2.2 yamt dir_uio.uio_rw = UIO_READ; /* read into this space */ 2530 1.10.2.2 yamt dir_uio.uio_iovcnt = 1; 2531 1.10.2.2 yamt dir_uio.uio_iov = &dir_iovec; 2532 1.10.2.2 yamt UIO_SETUP_SYSSPACE(&dir_uio); 2533 1.10.2.2 yamt dir_iovec.iov_base = fid; 2534 1.10.2.2 yamt dir_iovec.iov_len = lb_size; 2535 1.10.2.2 yamt dir_uio.uio_offset = *offset; 2536 1.10.2.2 yamt 2537 1.10.2.2 yamt /* limit length of read in piece */ 2538 1.10.2.2 yamt dir_uio.uio_resid = MIN(file_size - (*offset), lb_size); 2539 1.10.2.2 yamt 2540 1.10.2.2 yamt /* read the part into the fid space */ 2541 1.10.2.2 yamt error = VOP_READ(vp, &dir_uio, IO_ALTSEMANTICS, NOCRED); 2542 1.10.2.2 yamt if (error) 2543 1.10.2.2 yamt return error; 2544 1.10.2.2 yamt 2545 1.10.2.2 yamt /* 2546 1.10.2.2 yamt * Check if we got a whole descriptor. 2547 1.10.2.2 yamt * XXX Try to `resync' directory stream when something is very wrong. 2548 1.10.2.2 yamt * 2549 1.10.2.2 yamt */ 2550 1.10.2.2 yamt enough = (dir_uio.uio_offset - (*offset) >= UDF_FID_SIZE); 2551 1.10.2.2 yamt if (!enough) { 2552 1.10.2.2 yamt /* short dir ... */ 2553 1.10.2.2 yamt return EIO; 2554 1.10.2.2 yamt } 2555 1.10.2.2 yamt 2556 1.10.2.2 yamt /* check if our FID header is OK */ 2557 1.10.2.2 yamt error = udf_check_tag(fid); 2558 1.10.2.2 yamt DPRINTFIF(FIDS, error, ("read fids: tag check failed\n")); 2559 1.10.2.2 yamt if (!error) { 2560 1.10.2.2 yamt if (udf_rw16(fid->tag.id) != TAGID_FID) 2561 1.10.2.2 yamt error = ENOENT; 2562 1.10.2.2 yamt } 2563 1.10.2.2 yamt DPRINTFIF(FIDS, !error, ("\ttag checked ok: got TAGID_FID\n")); 2564 1.10.2.2 yamt 2565 1.10.2.2 yamt /* check for length */ 2566 1.10.2.2 yamt if (!error) { 2567 1.10.2.2 yamt entry_length = udf_fidsize(fid, lb_size); 2568 1.10.2.2 yamt enough = (dir_uio.uio_offset - (*offset) >= entry_length); 2569 1.10.2.2 yamt } 2570 1.10.2.2 yamt DPRINTFIF(FIDS, !error, ("\tentry_length = %d, enough = %s\n", 2571 1.10.2.2 yamt entry_length, enough?"yes":"no")); 2572 1.10.2.2 yamt 2573 1.10.2.2 yamt if (!enough) { 2574 1.10.2.2 yamt /* short dir ... bomb out */ 2575 1.10.2.2 yamt return EIO; 2576 1.10.2.2 yamt } 2577 1.10.2.2 yamt 2578 1.10.2.2 yamt /* check FID contents */ 2579 1.10.2.2 yamt if (!error) { 2580 1.10.2.2 yamt error = udf_check_tag_payload((union dscrptr *) fid, lb_size); 2581 1.10.2.2 yamt DPRINTF(FIDS, ("\tpayload checked ok\n")); 2582 1.10.2.2 yamt } 2583 1.10.2.2 yamt if (error) { 2584 1.10.2.2 yamt /* note that is sometimes a bit quick to report */ 2585 1.10.2.2 yamt printf("BROKEN DIRECTORY ENTRY\n"); 2586 1.10.2.2 yamt /* RESYNC? */ 2587 1.10.2.2 yamt /* TODO: use udf_resync_fid_stream */ 2588 1.10.2.2 yamt return EIO; 2589 1.10.2.2 yamt } 2590 1.10.2.2 yamt DPRINTF(FIDS, ("\tinterpret FID\n")); 2591 1.10.2.2 yamt 2592 1.10.2.2 yamt /* we got a whole and valid descriptor! */ 2593 1.10.2.2 yamt 2594 1.10.2.2 yamt /* create resulting dirent structure */ 2595 1.10.2.2 yamt fid_name = (char *) fid->data + udf_rw16(fid->l_iu); 2596 1.10.2.2 yamt udf_to_unix_name(dirent->d_name, 2597 1.10.2.2 yamt fid_name, fid->l_fi, &ump->logical_vol->desc_charset); 2598 1.10.2.2 yamt 2599 1.10.2.2 yamt /* '..' has no name, so provide one */ 2600 1.10.2.2 yamt if (fid->file_char & UDF_FILE_CHAR_PAR) 2601 1.10.2.2 yamt strcpy(dirent->d_name, ".."); 2602 1.10.2.2 yamt 2603 1.10.2.2 yamt dirent->d_fileno = udf_calchash(&fid->icb); /* inode hash XXX */ 2604 1.10.2.2 yamt dirent->d_namlen = strlen(dirent->d_name); 2605 1.10.2.2 yamt dirent->d_reclen = _DIRENT_SIZE(dirent); 2606 1.10.2.2 yamt 2607 1.10.2.2 yamt /* 2608 1.10.2.2 yamt * Note that its not worth trying to go for the filetypes now... its 2609 1.10.2.2 yamt * too expensive too 2610 1.10.2.2 yamt */ 2611 1.10.2.2 yamt dirent->d_type = DT_UNKNOWN; 2612 1.10.2.2 yamt 2613 1.10.2.2 yamt /* initial guess for filetype we can make */ 2614 1.10.2.2 yamt if (fid->file_char & UDF_FILE_CHAR_DIR) 2615 1.10.2.2 yamt dirent->d_type = DT_DIR; 2616 1.10.2.2 yamt 2617 1.10.2.2 yamt /* advance */ 2618 1.10.2.2 yamt *offset += entry_length; 2619 1.10.2.2 yamt 2620 1.10.2.2 yamt return error; 2621 1.10.2.2 yamt } 2622 1.10.2.2 yamt 2623 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2624 1.10.2.2 yamt 2625 1.10.2.2 yamt /* 2626 1.10.2.2 yamt * block based file reading and writing 2627 1.10.2.2 yamt */ 2628 1.10.2.2 yamt 2629 1.10.2.2 yamt static int 2630 1.10.2.2 yamt udf_read_internal(struct udf_node *node, uint8_t *blob) 2631 1.10.2.2 yamt { 2632 1.10.2.2 yamt struct udf_mount *ump; 2633 1.10.2.2 yamt struct file_entry *fe; 2634 1.10.2.2 yamt struct extfile_entry *efe; 2635 1.10.2.2 yamt uint64_t inflen; 2636 1.10.2.2 yamt uint32_t sector_size; 2637 1.10.2.2 yamt uint8_t *pos; 2638 1.10.2.2 yamt int icbflags, addr_type; 2639 1.10.2.2 yamt 2640 1.10.2.2 yamt /* shut up gcc */ 2641 1.10.2.2 yamt inflen = addr_type = icbflags = 0; 2642 1.10.2.2 yamt pos = NULL; 2643 1.10.2.2 yamt 2644 1.10.2.2 yamt /* get extent and do some paranoia checks */ 2645 1.10.2.2 yamt ump = node->ump; 2646 1.10.2.2 yamt sector_size = ump->discinfo.sector_size; 2647 1.10.2.2 yamt 2648 1.10.2.2 yamt fe = node->fe; 2649 1.10.2.2 yamt efe = node->efe; 2650 1.10.2.2 yamt if (fe) { 2651 1.10.2.2 yamt inflen = udf_rw64(fe->inf_len); 2652 1.10.2.2 yamt pos = &fe->data[0] + udf_rw32(fe->l_ea); 2653 1.10.2.2 yamt icbflags = udf_rw16(fe->icbtag.flags); 2654 1.10.2.2 yamt } 2655 1.10.2.2 yamt if (efe) { 2656 1.10.2.2 yamt inflen = udf_rw64(efe->inf_len); 2657 1.10.2.2 yamt pos = &efe->data[0] + udf_rw32(efe->l_ea); 2658 1.10.2.2 yamt icbflags = udf_rw16(efe->icbtag.flags); 2659 1.10.2.2 yamt } 2660 1.10.2.2 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 2661 1.10.2.2 yamt 2662 1.10.2.2 yamt assert(addr_type == UDF_ICB_INTERN_ALLOC); 2663 1.10.2.2 yamt assert(inflen < sector_size); 2664 1.10.2.2 yamt 2665 1.10.2.2 yamt /* copy out info */ 2666 1.10.2.2 yamt memset(blob, 0, sector_size); 2667 1.10.2.2 yamt memcpy(blob, pos, inflen); 2668 1.10.2.2 yamt 2669 1.10.2.2 yamt return 0; 2670 1.10.2.2 yamt } 2671 1.10.2.2 yamt 2672 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2673 1.10.2.2 yamt 2674 1.10.2.2 yamt /* 2675 1.10.2.2 yamt * Read file extent reads an extent specified in sectors from the file. It is 2676 1.10.2.2 yamt * sector based; i.e. no `fancy' offsets. 2677 1.10.2.2 yamt */ 2678 1.10.2.2 yamt 2679 1.10.2.2 yamt int 2680 1.10.2.2 yamt udf_read_file_extent(struct udf_node *node, 2681 1.10.2.2 yamt uint32_t from, uint32_t sectors, 2682 1.10.2.2 yamt uint8_t *blob) 2683 1.10.2.2 yamt { 2684 1.10.2.2 yamt struct buf buf; 2685 1.10.2.2 yamt uint32_t sector_size; 2686 1.10.2.2 yamt 2687 1.10.2.2 yamt BUF_INIT(&buf); 2688 1.10.2.2 yamt 2689 1.10.2.2 yamt sector_size = node->ump->discinfo.sector_size; 2690 1.10.2.2 yamt 2691 1.10.2.2 yamt buf.b_bufsize = sectors * sector_size; 2692 1.10.2.2 yamt buf.b_data = blob; 2693 1.10.2.2 yamt buf.b_bcount = buf.b_bufsize; 2694 1.10.2.2 yamt buf.b_resid = buf.b_bcount; 2695 1.10.2.2 yamt buf.b_flags = B_BUSY | B_READ; 2696 1.10.2.2 yamt buf.b_vp = node->vnode; 2697 1.10.2.2 yamt buf.b_proc = NULL; 2698 1.10.2.2 yamt 2699 1.10.2.2 yamt buf.b_blkno = from; 2700 1.10.2.2 yamt buf.b_lblkno = 0; 2701 1.10.2.2 yamt BIO_SETPRIO(&buf, BPRIO_TIMELIMITED); 2702 1.10.2.2 yamt 2703 1.10.2.2 yamt udf_read_filebuf(node, &buf); 2704 1.10.2.2 yamt return biowait(&buf); 2705 1.10.2.2 yamt } 2706 1.10.2.2 yamt 2707 1.10.2.2 yamt 2708 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2709 1.10.2.2 yamt 2710 1.10.2.2 yamt /* 2711 1.10.2.2 yamt * Read file extent in the buffer. 2712 1.10.2.2 yamt * 2713 1.10.2.3 yamt * The splitup of the extent into separate request-buffers is to minimise 2714 1.10.2.2 yamt * copying around as much as possible. 2715 1.10.2.2 yamt */ 2716 1.10.2.2 yamt 2717 1.10.2.2 yamt 2718 1.10.2.3 yamt /* maximum of 128 translations (!) (64 kb in 512 byte sectors) */ 2719 1.10.2.2 yamt #define FILEBUFSECT 128 2720 1.10.2.2 yamt 2721 1.10.2.2 yamt void 2722 1.10.2.2 yamt udf_read_filebuf(struct udf_node *node, struct buf *buf) 2723 1.10.2.2 yamt { 2724 1.10.2.2 yamt struct buf *nestbuf; 2725 1.10.2.2 yamt uint64_t *mapping; 2726 1.10.2.2 yamt uint64_t run_start; 2727 1.10.2.2 yamt uint32_t sector_size; 2728 1.10.2.2 yamt uint32_t buf_offset, sector, rbuflen, rblk; 2729 1.10.2.2 yamt uint8_t *buf_pos; 2730 1.10.2.2 yamt int error, run_length; 2731 1.10.2.2 yamt 2732 1.10.2.2 yamt uint32_t from; 2733 1.10.2.2 yamt uint32_t sectors; 2734 1.10.2.2 yamt 2735 1.10.2.2 yamt sector_size = node->ump->discinfo.sector_size; 2736 1.10.2.2 yamt 2737 1.10.2.2 yamt from = buf->b_blkno; 2738 1.10.2.2 yamt sectors = buf->b_bcount / sector_size; 2739 1.10.2.2 yamt 2740 1.10.2.2 yamt /* assure we have enough translation slots */ 2741 1.10.2.2 yamt KASSERT(buf->b_bcount / sector_size <= FILEBUFSECT); 2742 1.10.2.2 yamt KASSERT(MAXPHYS / sector_size <= FILEBUFSECT); 2743 1.10.2.2 yamt 2744 1.10.2.2 yamt if (sectors > FILEBUFSECT) { 2745 1.10.2.2 yamt printf("udf_read_filebuf: implementation limit on bufsize\n"); 2746 1.10.2.2 yamt buf->b_error = EIO; 2747 1.10.2.2 yamt buf->b_flags |= B_ERROR; 2748 1.10.2.2 yamt biodone(buf); 2749 1.10.2.2 yamt return; 2750 1.10.2.2 yamt } 2751 1.10.2.2 yamt 2752 1.10.2.2 yamt mapping = malloc(sizeof(*mapping) * FILEBUFSECT, M_TEMP, M_WAITOK); 2753 1.10.2.2 yamt 2754 1.10.2.2 yamt error = 0; 2755 1.10.2.2 yamt DPRINTF(READ, ("\ttranslate %d-%d\n", from, sectors)); 2756 1.10.2.2 yamt error = udf_translate_file_extent(node, from, sectors, mapping); 2757 1.10.2.2 yamt if (error) { 2758 1.10.2.2 yamt buf->b_error = error; 2759 1.10.2.2 yamt buf->b_flags |= B_ERROR; 2760 1.10.2.2 yamt biodone(buf); 2761 1.10.2.2 yamt goto out; 2762 1.10.2.2 yamt } 2763 1.10.2.2 yamt DPRINTF(READ, ("\ttranslate extent went OK\n")); 2764 1.10.2.2 yamt 2765 1.10.2.2 yamt /* pre-check if internal or parts are zero */ 2766 1.10.2.2 yamt if (*mapping == UDF_TRANS_INTERN) { 2767 1.10.2.2 yamt error = udf_read_internal(node, (uint8_t *) buf->b_data); 2768 1.10.2.2 yamt if (error) { 2769 1.10.2.2 yamt buf->b_error = error; 2770 1.10.2.2 yamt buf->b_flags |= B_ERROR; 2771 1.10.2.2 yamt } 2772 1.10.2.2 yamt biodone(buf); 2773 1.10.2.2 yamt goto out; 2774 1.10.2.2 yamt } 2775 1.10.2.2 yamt DPRINTF(READ, ("\tnot intern\n")); 2776 1.10.2.2 yamt 2777 1.10.2.3 yamt /* request read-in of data from disc scheduler */ 2778 1.10.2.2 yamt buf->b_resid = buf->b_bcount; 2779 1.10.2.2 yamt for (sector = 0; sector < sectors; sector++) { 2780 1.10.2.2 yamt buf_offset = sector * sector_size; 2781 1.10.2.2 yamt buf_pos = (uint8_t *) buf->b_data + buf_offset; 2782 1.10.2.2 yamt DPRINTF(READ, ("\tprocessing rel sector %d\n", sector)); 2783 1.10.2.2 yamt 2784 1.10.2.2 yamt switch (mapping[sector]) { 2785 1.10.2.2 yamt case UDF_TRANS_UNMAPPED: 2786 1.10.2.2 yamt case UDF_TRANS_ZERO: 2787 1.10.2.2 yamt /* copy zero sector */ 2788 1.10.2.2 yamt memset(buf_pos, 0, sector_size); 2789 1.10.2.2 yamt DPRINTF(READ, ("\treturning zero sector\n")); 2790 1.10.2.2 yamt nestiobuf_done(buf, sector_size, 0); 2791 1.10.2.2 yamt break; 2792 1.10.2.2 yamt default : 2793 1.10.2.2 yamt DPRINTF(READ, ("\tread sector " 2794 1.10.2.2 yamt "%"PRIu64"\n", mapping[sector])); 2795 1.10.2.2 yamt 2796 1.10.2.2 yamt run_start = mapping[sector]; 2797 1.10.2.2 yamt run_length = 1; 2798 1.10.2.2 yamt while (sector < sectors-1) { 2799 1.10.2.2 yamt if (mapping[sector+1] != mapping[sector]+1) 2800 1.10.2.2 yamt break; 2801 1.10.2.2 yamt run_length++; 2802 1.10.2.2 yamt sector++; 2803 1.10.2.2 yamt } 2804 1.10.2.2 yamt 2805 1.10.2.2 yamt /* 2806 1.10.2.2 yamt * nest an iobuf and mark it for async reading. Since 2807 1.10.2.2 yamt * we're using nested buffers, they can't be cached by 2808 1.10.2.2 yamt * design. 2809 1.10.2.2 yamt */ 2810 1.10.2.2 yamt rbuflen = run_length * sector_size; 2811 1.10.2.2 yamt rblk = run_start * (sector_size/DEV_BSIZE); 2812 1.10.2.2 yamt 2813 1.10.2.2 yamt nestbuf = getiobuf(); 2814 1.10.2.2 yamt nestiobuf_setup(buf, nestbuf, buf_offset, rbuflen); 2815 1.10.2.2 yamt /* nestbuf is B_ASYNC */ 2816 1.10.2.2 yamt 2817 1.10.2.3 yamt /* CD schedules on raw blkno */ 2818 1.10.2.2 yamt nestbuf->b_blkno = rblk; 2819 1.10.2.2 yamt nestbuf->b_proc = NULL; 2820 1.10.2.2 yamt nestbuf->b_cylinder = 0; 2821 1.10.2.2 yamt nestbuf->b_rawblkno = rblk; 2822 1.10.2.2 yamt VOP_STRATEGY(node->ump->devvp, nestbuf); 2823 1.10.2.2 yamt } 2824 1.10.2.2 yamt } 2825 1.10.2.2 yamt out: 2826 1.10.2.2 yamt DPRINTF(READ, ("\tend of read_filebuf\n")); 2827 1.10.2.2 yamt free(mapping, M_TEMP); 2828 1.10.2.2 yamt return; 2829 1.10.2.2 yamt } 2830 1.10.2.2 yamt #undef FILEBUFSECT 2831 1.10.2.2 yamt 2832 1.10.2.2 yamt 2833 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2834 1.10.2.2 yamt 2835 1.10.2.2 yamt /* 2836 1.10.2.2 yamt * Translate an extent (in sectors) into sector numbers; used for read and 2837 1.10.2.2 yamt * write operations. DOESNT't check extents. 2838 1.10.2.2 yamt */ 2839 1.10.2.2 yamt 2840 1.10.2.2 yamt int 2841 1.10.2.2 yamt udf_translate_file_extent(struct udf_node *node, 2842 1.10.2.2 yamt uint32_t from, uint32_t pages, 2843 1.10.2.2 yamt uint64_t *map) 2844 1.10.2.2 yamt { 2845 1.10.2.2 yamt struct udf_mount *ump; 2846 1.10.2.2 yamt struct file_entry *fe; 2847 1.10.2.2 yamt struct extfile_entry *efe; 2848 1.10.2.2 yamt struct short_ad *s_ad; 2849 1.10.2.2 yamt struct long_ad *l_ad, t_ad; 2850 1.10.2.2 yamt uint64_t transsec; 2851 1.10.2.2 yamt uint32_t sector_size, transsec32; 2852 1.10.2.2 yamt uint32_t overlap, translen; 2853 1.10.2.2 yamt uint32_t vpart_num, lb_num, len, alloclen; 2854 1.10.2.2 yamt uint8_t *pos; 2855 1.10.2.2 yamt int error, flags, addr_type, icblen, icbflags; 2856 1.10.2.2 yamt 2857 1.10.2.2 yamt if (!node) 2858 1.10.2.2 yamt return ENOENT; 2859 1.10.2.2 yamt 2860 1.10.2.2 yamt /* shut up gcc */ 2861 1.10.2.2 yamt alloclen = addr_type = icbflags = 0; 2862 1.10.2.2 yamt pos = NULL; 2863 1.10.2.2 yamt 2864 1.10.2.2 yamt /* do the work */ 2865 1.10.2.2 yamt ump = node->ump; 2866 1.10.2.2 yamt sector_size = ump->discinfo.sector_size; 2867 1.10.2.2 yamt fe = node->fe; 2868 1.10.2.2 yamt efe = node->efe; 2869 1.10.2.2 yamt if (fe) { 2870 1.10.2.2 yamt alloclen = udf_rw32(fe->l_ad); 2871 1.10.2.2 yamt pos = &fe->data[0] + udf_rw32(fe->l_ea); 2872 1.10.2.2 yamt icbflags = udf_rw16(fe->icbtag.flags); 2873 1.10.2.2 yamt } 2874 1.10.2.2 yamt if (efe) { 2875 1.10.2.2 yamt alloclen = udf_rw32(efe->l_ad); 2876 1.10.2.2 yamt pos = &efe->data[0] + udf_rw32(efe->l_ea); 2877 1.10.2.2 yamt icbflags = udf_rw16(efe->icbtag.flags); 2878 1.10.2.2 yamt } 2879 1.10.2.2 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 2880 1.10.2.2 yamt 2881 1.10.2.2 yamt DPRINTF(TRANSLATE, ("udf trans: alloc_len = %d, addr_type %d, " 2882 1.10.2.2 yamt "fe %p, efe %p\n", alloclen, addr_type, fe, efe)); 2883 1.10.2.2 yamt 2884 1.10.2.2 yamt vpart_num = udf_rw16(node->loc.loc.part_num); 2885 1.10.2.2 yamt lb_num = len = icblen = 0; /* shut up gcc */ 2886 1.10.2.2 yamt while (pages && alloclen) { 2887 1.10.2.2 yamt DPRINTF(TRANSLATE, ("\taddr_type %d\n", addr_type)); 2888 1.10.2.2 yamt switch (addr_type) { 2889 1.10.2.2 yamt case UDF_ICB_INTERN_ALLOC : 2890 1.10.2.2 yamt /* TODO check extents? */ 2891 1.10.2.2 yamt *map = UDF_TRANS_INTERN; 2892 1.10.2.2 yamt return 0; 2893 1.10.2.2 yamt case UDF_ICB_SHORT_ALLOC : 2894 1.10.2.2 yamt icblen = sizeof(struct short_ad); 2895 1.10.2.2 yamt s_ad = (struct short_ad *) pos; 2896 1.10.2.2 yamt len = udf_rw32(s_ad->len); 2897 1.10.2.2 yamt lb_num = udf_rw32(s_ad->lb_num); 2898 1.10.2.2 yamt break; 2899 1.10.2.2 yamt case UDF_ICB_LONG_ALLOC : 2900 1.10.2.2 yamt icblen = sizeof(struct long_ad); 2901 1.10.2.2 yamt l_ad = (struct long_ad *) pos; 2902 1.10.2.2 yamt len = udf_rw32(l_ad->len); 2903 1.10.2.2 yamt lb_num = udf_rw32(l_ad->loc.lb_num); 2904 1.10.2.2 yamt vpart_num = udf_rw16(l_ad->loc.part_num); 2905 1.10.2.2 yamt DPRINTFIF(TRANSLATE, 2906 1.10.2.2 yamt (l_ad->impl.im_used.flags & 2907 1.10.2.2 yamt UDF_ADIMP_FLAGS_EXTENT_ERASED), 2908 1.10.2.2 yamt ("UDF: got an `extent erased' flag in long_ad\n")); 2909 1.10.2.2 yamt break; 2910 1.10.2.2 yamt default: 2911 1.10.2.2 yamt /* can't be here */ 2912 1.10.2.2 yamt return EINVAL; /* for sure */ 2913 1.10.2.2 yamt } 2914 1.10.2.2 yamt 2915 1.10.2.2 yamt /* process extent */ 2916 1.10.2.2 yamt flags = UDF_EXT_FLAGS(len); 2917 1.10.2.2 yamt len = UDF_EXT_LEN(len); 2918 1.10.2.2 yamt 2919 1.10.2.2 yamt overlap = (len + sector_size -1) / sector_size; 2920 1.10.2.2 yamt if (from) { 2921 1.10.2.2 yamt if (from > overlap) { 2922 1.10.2.2 yamt from -= overlap; 2923 1.10.2.2 yamt overlap = 0; 2924 1.10.2.2 yamt } else { 2925 1.10.2.2 yamt lb_num += from; /* advance in extent */ 2926 1.10.2.2 yamt overlap -= from; 2927 1.10.2.2 yamt from = 0; 2928 1.10.2.2 yamt } 2929 1.10.2.2 yamt } 2930 1.10.2.2 yamt 2931 1.10.2.2 yamt overlap = MIN(overlap, pages); 2932 1.10.2.2 yamt while (overlap) { 2933 1.10.2.2 yamt switch (flags) { 2934 1.10.2.2 yamt case UDF_EXT_REDIRECT : 2935 1.10.2.2 yamt /* no support for allocation extentions yet */ 2936 1.10.2.2 yamt /* TODO support for allocation extention */ 2937 1.10.2.2 yamt return ENOENT; 2938 1.10.2.2 yamt case UDF_EXT_FREED : 2939 1.10.2.2 yamt case UDF_EXT_FREE : 2940 1.10.2.2 yamt transsec = UDF_TRANS_ZERO; 2941 1.10.2.2 yamt translen = overlap; 2942 1.10.2.2 yamt while (overlap && pages && translen) { 2943 1.10.2.2 yamt *map++ = transsec; 2944 1.10.2.3 yamt lb_num++; 2945 1.10.2.2 yamt overlap--; pages--; translen--; 2946 1.10.2.2 yamt } 2947 1.10.2.2 yamt break; 2948 1.10.2.2 yamt case UDF_EXT_ALLOCATED : 2949 1.10.2.2 yamt t_ad.loc.lb_num = udf_rw32(lb_num); 2950 1.10.2.2 yamt t_ad.loc.part_num = udf_rw16(vpart_num); 2951 1.10.2.2 yamt error = udf_translate_vtop(ump, 2952 1.10.2.2 yamt &t_ad, &transsec32, &translen); 2953 1.10.2.2 yamt transsec = transsec32; 2954 1.10.2.2 yamt if (error) 2955 1.10.2.2 yamt return error; 2956 1.10.2.2 yamt while (overlap && pages && translen) { 2957 1.10.2.2 yamt *map++ = transsec; 2958 1.10.2.3 yamt lb_num++; transsec++; 2959 1.10.2.2 yamt overlap--; pages--; translen--; 2960 1.10.2.2 yamt } 2961 1.10.2.2 yamt break; 2962 1.10.2.2 yamt } 2963 1.10.2.2 yamt } 2964 1.10.2.2 yamt pos += icblen; 2965 1.10.2.2 yamt alloclen -= icblen; 2966 1.10.2.2 yamt } 2967 1.10.2.2 yamt return 0; 2968 1.10.2.2 yamt } 2969 1.10.2.2 yamt 2970 1.10.2.2 yamt /* --------------------------------------------------------------------- */ 2971 1.10.2.2 yamt 2972
Indexes created Tue Sep 30 06:09:59 GMT 2025