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