udf_allocation.c revision 1.1.2.2
1 1.1.2.2 yamt /* $NetBSD: udf_allocation.c,v 1.1.2.2 2008/05/16 02:25:21 yamt Exp $ */ 2 1.1.2.2 yamt 3 1.1.2.2 yamt /* 4 1.1.2.2 yamt * Copyright (c) 2006, 2008 Reinoud Zandijk 5 1.1.2.2 yamt * All rights reserved. 6 1.1.2.2 yamt * 7 1.1.2.2 yamt * Redistribution and use in source and binary forms, with or without 8 1.1.2.2 yamt * modification, are permitted provided that the following conditions 9 1.1.2.2 yamt * are met: 10 1.1.2.2 yamt * 1. Redistributions of source code must retain the above copyright 11 1.1.2.2 yamt * notice, this list of conditions and the following disclaimer. 12 1.1.2.2 yamt * 2. Redistributions in binary form must reproduce the above copyright 13 1.1.2.2 yamt * notice, this list of conditions and the following disclaimer in the 14 1.1.2.2 yamt * documentation and/or other materials provided with the distribution. 15 1.1.2.2 yamt * 16 1.1.2.2 yamt * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 17 1.1.2.2 yamt * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 18 1.1.2.2 yamt * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 19 1.1.2.2 yamt * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 20 1.1.2.2 yamt * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 21 1.1.2.2 yamt * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 22 1.1.2.2 yamt * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 23 1.1.2.2 yamt * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 24 1.1.2.2 yamt * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 25 1.1.2.2 yamt * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 26 1.1.2.2 yamt * 27 1.1.2.2 yamt */ 28 1.1.2.2 yamt 29 1.1.2.2 yamt #include <sys/cdefs.h> 30 1.1.2.2 yamt #ifndef lint 31 1.1.2.2 yamt __KERNEL_RCSID(0, "$NetBSD: udf_allocation.c,v 1.1.2.2 2008/05/16 02:25:21 yamt Exp $"); 32 1.1.2.2 yamt #endif /* not lint */ 33 1.1.2.2 yamt 34 1.1.2.2 yamt 35 1.1.2.2 yamt #if defined(_KERNEL_OPT) 36 1.1.2.2 yamt #include "opt_quota.h" 37 1.1.2.2 yamt #include "opt_compat_netbsd.h" 38 1.1.2.2 yamt #endif 39 1.1.2.2 yamt 40 1.1.2.2 yamt /* TODO strip */ 41 1.1.2.2 yamt #include <sys/param.h> 42 1.1.2.2 yamt #include <sys/systm.h> 43 1.1.2.2 yamt #include <sys/sysctl.h> 44 1.1.2.2 yamt #include <sys/namei.h> 45 1.1.2.2 yamt #include <sys/proc.h> 46 1.1.2.2 yamt #include <sys/kernel.h> 47 1.1.2.2 yamt #include <sys/vnode.h> 48 1.1.2.2 yamt #include <miscfs/genfs/genfs_node.h> 49 1.1.2.2 yamt #include <sys/mount.h> 50 1.1.2.2 yamt #include <sys/buf.h> 51 1.1.2.2 yamt #include <sys/file.h> 52 1.1.2.2 yamt #include <sys/device.h> 53 1.1.2.2 yamt #include <sys/disklabel.h> 54 1.1.2.2 yamt #include <sys/ioctl.h> 55 1.1.2.2 yamt #include <sys/malloc.h> 56 1.1.2.2 yamt #include <sys/dirent.h> 57 1.1.2.2 yamt #include <sys/stat.h> 58 1.1.2.2 yamt #include <sys/conf.h> 59 1.1.2.2 yamt #include <sys/kauth.h> 60 1.1.2.2 yamt #include <sys/kthread.h> 61 1.1.2.2 yamt #include <dev/clock_subr.h> 62 1.1.2.2 yamt 63 1.1.2.2 yamt #include <fs/udf/ecma167-udf.h> 64 1.1.2.2 yamt #include <fs/udf/udf_mount.h> 65 1.1.2.2 yamt 66 1.1.2.2 yamt #if defined(_KERNEL_OPT) 67 1.1.2.2 yamt #include "opt_udf.h" 68 1.1.2.2 yamt #endif 69 1.1.2.2 yamt 70 1.1.2.2 yamt #include "udf.h" 71 1.1.2.2 yamt #include "udf_subr.h" 72 1.1.2.2 yamt #include "udf_bswap.h" 73 1.1.2.2 yamt 74 1.1.2.2 yamt 75 1.1.2.2 yamt #define VTOI(vnode) ((struct udf_node *) vnode->v_data) 76 1.1.2.2 yamt 77 1.1.2.2 yamt static void udf_record_allocation_in_node(struct udf_mount *ump, 78 1.1.2.2 yamt struct buf *buf, uint16_t vpart_num, uint64_t *mapping, 79 1.1.2.2 yamt struct long_ad *node_ad_cpy); 80 1.1.2.2 yamt 81 1.1.2.2 yamt /* 82 1.1.2.2 yamt * IDEA/BUSY: Each udf_node gets its own extentwalker state for all operations; 83 1.1.2.2 yamt * this will hopefully/likely reduce O(nlog(n)) to O(1) for most functionality 84 1.1.2.2 yamt * since actions are most likely sequencial and thus seeking doesn't need 85 1.1.2.2 yamt * searching for the same or adjacent position again. 86 1.1.2.2 yamt */ 87 1.1.2.2 yamt 88 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 89 1.1.2.2 yamt //#ifdef DEBUG 90 1.1.2.2 yamt #if 1 91 1.1.2.2 yamt #if 1 92 1.1.2.2 yamt static void 93 1.1.2.2 yamt udf_node_dump(struct udf_node *udf_node) { 94 1.1.2.2 yamt struct file_entry *fe; 95 1.1.2.2 yamt struct extfile_entry *efe; 96 1.1.2.2 yamt struct icb_tag *icbtag; 97 1.1.2.2 yamt struct short_ad *short_ad; 98 1.1.2.2 yamt struct long_ad *long_ad; 99 1.1.2.2 yamt uint64_t inflen; 100 1.1.2.2 yamt uint32_t icbflags, addr_type, max_l_ad; 101 1.1.2.2 yamt uint32_t len, lb_num; 102 1.1.2.2 yamt uint8_t *data_pos; 103 1.1.2.2 yamt int part_num; 104 1.1.2.2 yamt int adlen, ad_off, dscr_size, l_ea, l_ad, lb_size, flags; 105 1.1.2.2 yamt 106 1.1.2.2 yamt if ((udf_verbose & UDF_DEBUG_ADWLK) == 0) 107 1.1.2.2 yamt return; 108 1.1.2.2 yamt 109 1.1.2.2 yamt lb_size = udf_rw32(udf_node->ump->logical_vol->lb_size); 110 1.1.2.2 yamt 111 1.1.2.2 yamt fe = udf_node->fe; 112 1.1.2.2 yamt efe = udf_node->efe; 113 1.1.2.2 yamt if (fe) { 114 1.1.2.2 yamt icbtag = &fe->icbtag; 115 1.1.2.2 yamt inflen = udf_rw64(fe->inf_len); 116 1.1.2.2 yamt dscr_size = sizeof(struct file_entry) -1; 117 1.1.2.2 yamt l_ea = udf_rw32(fe->l_ea); 118 1.1.2.2 yamt l_ad = udf_rw32(fe->l_ad); 119 1.1.2.2 yamt data_pos = (uint8_t *) fe + dscr_size + l_ea; 120 1.1.2.2 yamt } else { 121 1.1.2.2 yamt icbtag = &efe->icbtag; 122 1.1.2.2 yamt inflen = udf_rw64(efe->inf_len); 123 1.1.2.2 yamt dscr_size = sizeof(struct extfile_entry) -1; 124 1.1.2.2 yamt l_ea = udf_rw32(efe->l_ea); 125 1.1.2.2 yamt l_ad = udf_rw32(efe->l_ad); 126 1.1.2.2 yamt data_pos = (uint8_t *) efe + dscr_size + l_ea; 127 1.1.2.2 yamt } 128 1.1.2.2 yamt max_l_ad = lb_size - dscr_size - l_ea; 129 1.1.2.2 yamt 130 1.1.2.2 yamt icbflags = udf_rw16(icbtag->flags); 131 1.1.2.2 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 132 1.1.2.2 yamt 133 1.1.2.2 yamt printf("udf_node_dump:\n"); 134 1.1.2.2 yamt printf("\tudf_node %p\n", udf_node); 135 1.1.2.2 yamt 136 1.1.2.2 yamt if (addr_type == UDF_ICB_INTERN_ALLOC) { 137 1.1.2.2 yamt printf("\t\tIntern alloc, len = %"PRIu64"\n", inflen); 138 1.1.2.2 yamt return; 139 1.1.2.2 yamt } 140 1.1.2.2 yamt 141 1.1.2.2 yamt printf("\t\tInflen = %"PRIu64"\n", inflen); 142 1.1.2.2 yamt printf("\t\tl_ad = %d\n", l_ad); 143 1.1.2.2 yamt 144 1.1.2.2 yamt if (addr_type == UDF_ICB_SHORT_ALLOC) { 145 1.1.2.2 yamt adlen = sizeof(struct short_ad); 146 1.1.2.2 yamt } else { 147 1.1.2.2 yamt adlen = sizeof(struct long_ad); 148 1.1.2.2 yamt } 149 1.1.2.2 yamt 150 1.1.2.2 yamt printf("\t\t"); 151 1.1.2.2 yamt for (ad_off = 0; ad_off < max_l_ad-adlen; ad_off += adlen) { 152 1.1.2.2 yamt if (addr_type == UDF_ICB_SHORT_ALLOC) { 153 1.1.2.2 yamt short_ad = (struct short_ad *) (data_pos + ad_off); 154 1.1.2.2 yamt len = udf_rw32(short_ad->len); 155 1.1.2.2 yamt lb_num = udf_rw32(short_ad->lb_num); 156 1.1.2.2 yamt part_num = -1; 157 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 158 1.1.2.2 yamt len = UDF_EXT_LEN(len); 159 1.1.2.2 yamt } else { 160 1.1.2.2 yamt long_ad = (struct long_ad *) (data_pos + ad_off); 161 1.1.2.2 yamt len = udf_rw32(long_ad->len); 162 1.1.2.2 yamt lb_num = udf_rw32(long_ad->loc.lb_num); 163 1.1.2.2 yamt part_num = udf_rw16(long_ad->loc.part_num); 164 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 165 1.1.2.2 yamt len = UDF_EXT_LEN(len); 166 1.1.2.2 yamt } 167 1.1.2.2 yamt printf("["); 168 1.1.2.2 yamt if (part_num >= 0) 169 1.1.2.2 yamt printf("part %d, ", part_num); 170 1.1.2.2 yamt printf("lb_num %d, len %d", lb_num, len); 171 1.1.2.2 yamt if (flags) 172 1.1.2.2 yamt printf(", flags %d", flags); 173 1.1.2.2 yamt printf("] "); 174 1.1.2.2 yamt if (ad_off + adlen == l_ad) 175 1.1.2.2 yamt printf("\n\t\tl_ad END\n\t\t"); 176 1.1.2.2 yamt } 177 1.1.2.2 yamt printf("\n"); 178 1.1.2.2 yamt } 179 1.1.2.2 yamt #else 180 1.1.2.2 yamt #define udf_node_dump(a) 181 1.1.2.2 yamt #endif 182 1.1.2.2 yamt 183 1.1.2.2 yamt static void 184 1.1.2.2 yamt udf_node_sanity_check(struct udf_node *udf_node, 185 1.1.2.2 yamt uint64_t *cnt_inflen, uint64_t *cnt_logblksrec) { 186 1.1.2.2 yamt struct file_entry *fe; 187 1.1.2.2 yamt struct extfile_entry *efe; 188 1.1.2.2 yamt struct icb_tag *icbtag; 189 1.1.2.2 yamt struct short_ad *short_ad; 190 1.1.2.2 yamt struct long_ad *long_ad; 191 1.1.2.2 yamt uint64_t inflen, logblksrec; 192 1.1.2.2 yamt uint32_t icbflags, addr_type, max_l_ad; 193 1.1.2.2 yamt uint32_t len, lb_num; 194 1.1.2.2 yamt uint8_t *data_pos; 195 1.1.2.2 yamt int part_num; 196 1.1.2.2 yamt int adlen, ad_off, dscr_size, l_ea, l_ad, lb_size, flags, whole_lb; 197 1.1.2.2 yamt 198 1.1.2.2 yamt /* only lock mutex; we're not changing and its a debug checking func */ 199 1.1.2.2 yamt mutex_enter(&udf_node->node_mutex); 200 1.1.2.2 yamt 201 1.1.2.2 yamt lb_size = udf_rw32(udf_node->ump->logical_vol->lb_size); 202 1.1.2.2 yamt 203 1.1.2.2 yamt fe = udf_node->fe; 204 1.1.2.2 yamt efe = udf_node->efe; 205 1.1.2.2 yamt if (fe) { 206 1.1.2.2 yamt icbtag = &fe->icbtag; 207 1.1.2.2 yamt inflen = udf_rw64(fe->inf_len); 208 1.1.2.2 yamt logblksrec = udf_rw64(fe->logblks_rec); 209 1.1.2.2 yamt dscr_size = sizeof(struct file_entry) -1; 210 1.1.2.2 yamt l_ea = udf_rw32(fe->l_ea); 211 1.1.2.2 yamt l_ad = udf_rw32(fe->l_ad); 212 1.1.2.2 yamt data_pos = (uint8_t *) fe + dscr_size + l_ea; 213 1.1.2.2 yamt } else { 214 1.1.2.2 yamt icbtag = &efe->icbtag; 215 1.1.2.2 yamt inflen = udf_rw64(efe->inf_len); 216 1.1.2.2 yamt logblksrec = udf_rw64(efe->logblks_rec); 217 1.1.2.2 yamt dscr_size = sizeof(struct extfile_entry) -1; 218 1.1.2.2 yamt l_ea = udf_rw32(efe->l_ea); 219 1.1.2.2 yamt l_ad = udf_rw32(efe->l_ad); 220 1.1.2.2 yamt data_pos = (uint8_t *) efe + dscr_size + l_ea; 221 1.1.2.2 yamt } 222 1.1.2.2 yamt max_l_ad = lb_size - dscr_size - l_ea; 223 1.1.2.2 yamt icbflags = udf_rw16(icbtag->flags); 224 1.1.2.2 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 225 1.1.2.2 yamt 226 1.1.2.2 yamt /* reset counters */ 227 1.1.2.2 yamt *cnt_inflen = 0; 228 1.1.2.2 yamt *cnt_logblksrec = 0; 229 1.1.2.2 yamt 230 1.1.2.2 yamt if (addr_type == UDF_ICB_INTERN_ALLOC) { 231 1.1.2.2 yamt KASSERT(l_ad <= max_l_ad); 232 1.1.2.2 yamt KASSERT(l_ad == inflen); 233 1.1.2.2 yamt *cnt_inflen = inflen; 234 1.1.2.2 yamt mutex_exit(&udf_node->node_mutex); 235 1.1.2.2 yamt return; 236 1.1.2.2 yamt } 237 1.1.2.2 yamt 238 1.1.2.2 yamt if (addr_type == UDF_ICB_SHORT_ALLOC) { 239 1.1.2.2 yamt adlen = sizeof(struct short_ad); 240 1.1.2.2 yamt } else { 241 1.1.2.2 yamt adlen = sizeof(struct long_ad); 242 1.1.2.2 yamt } 243 1.1.2.2 yamt 244 1.1.2.2 yamt /* start counting */ 245 1.1.2.2 yamt whole_lb = 1; 246 1.1.2.2 yamt for (ad_off = 0; ad_off < l_ad; ad_off += adlen) { 247 1.1.2.2 yamt KASSERT(whole_lb == 1); 248 1.1.2.2 yamt if (addr_type == UDF_ICB_SHORT_ALLOC) { 249 1.1.2.2 yamt short_ad = (struct short_ad *) (data_pos + ad_off); 250 1.1.2.2 yamt len = udf_rw32(short_ad->len); 251 1.1.2.2 yamt lb_num = udf_rw32(short_ad->lb_num); 252 1.1.2.2 yamt part_num = -1; 253 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 254 1.1.2.2 yamt len = UDF_EXT_LEN(len); 255 1.1.2.2 yamt } else { 256 1.1.2.2 yamt long_ad = (struct long_ad *) (data_pos + ad_off); 257 1.1.2.2 yamt len = udf_rw32(long_ad->len); 258 1.1.2.2 yamt lb_num = udf_rw32(long_ad->loc.lb_num); 259 1.1.2.2 yamt part_num = udf_rw16(long_ad->loc.part_num); 260 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 261 1.1.2.2 yamt len = UDF_EXT_LEN(len); 262 1.1.2.2 yamt } 263 1.1.2.2 yamt KASSERT(flags != UDF_EXT_REDIRECT); /* not implemented yet */ 264 1.1.2.2 yamt *cnt_inflen += len; 265 1.1.2.2 yamt if (flags == UDF_EXT_ALLOCATED) { 266 1.1.2.2 yamt *cnt_logblksrec += (len + lb_size -1) / lb_size; 267 1.1.2.2 yamt } 268 1.1.2.2 yamt whole_lb = ((len % lb_size) == 0); 269 1.1.2.2 yamt } 270 1.1.2.2 yamt /* rest should be zero (ad_off > l_ad < max_l_ad - adlen) */ 271 1.1.2.2 yamt 272 1.1.2.2 yamt KASSERT(*cnt_inflen == inflen); 273 1.1.2.2 yamt KASSERT(*cnt_logblksrec == logblksrec); 274 1.1.2.2 yamt 275 1.1.2.2 yamt mutex_exit(&udf_node->node_mutex); 276 1.1.2.2 yamt if (0) 277 1.1.2.2 yamt udf_node_dump(udf_node); 278 1.1.2.2 yamt } 279 1.1.2.2 yamt #else 280 1.1.2.2 yamt #define udf_node_sanity_check(a, b, c) 281 1.1.2.2 yamt #endif 282 1.1.2.2 yamt 283 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 284 1.1.2.2 yamt 285 1.1.2.2 yamt int 286 1.1.2.2 yamt udf_translate_vtop(struct udf_mount *ump, struct long_ad *icb_loc, 287 1.1.2.2 yamt uint32_t *lb_numres, uint32_t *extres) 288 1.1.2.2 yamt { 289 1.1.2.2 yamt struct part_desc *pdesc; 290 1.1.2.2 yamt struct spare_map_entry *sme; 291 1.1.2.2 yamt struct long_ad s_icb_loc; 292 1.1.2.2 yamt uint64_t foffset, end_foffset; 293 1.1.2.2 yamt uint32_t lb_size, len; 294 1.1.2.2 yamt uint32_t lb_num, lb_rel, lb_packet; 295 1.1.2.2 yamt uint32_t udf_rw32_lbmap, ext_offset; 296 1.1.2.2 yamt uint16_t vpart; 297 1.1.2.2 yamt int rel, part, error, eof, slot, flags; 298 1.1.2.2 yamt 299 1.1.2.2 yamt assert(ump && icb_loc && lb_numres); 300 1.1.2.2 yamt 301 1.1.2.2 yamt vpart = udf_rw16(icb_loc->loc.part_num); 302 1.1.2.2 yamt lb_num = udf_rw32(icb_loc->loc.lb_num); 303 1.1.2.2 yamt if (vpart > UDF_VTOP_RAWPART) 304 1.1.2.2 yamt return EINVAL; 305 1.1.2.2 yamt 306 1.1.2.2 yamt translate_again: 307 1.1.2.2 yamt part = ump->vtop[vpart]; 308 1.1.2.2 yamt pdesc = ump->partitions[part]; 309 1.1.2.2 yamt 310 1.1.2.2 yamt switch (ump->vtop_tp[vpart]) { 311 1.1.2.2 yamt case UDF_VTOP_TYPE_RAW : 312 1.1.2.2 yamt /* 1:1 to the end of the device */ 313 1.1.2.2 yamt *lb_numres = lb_num; 314 1.1.2.2 yamt *extres = INT_MAX; 315 1.1.2.2 yamt return 0; 316 1.1.2.2 yamt case UDF_VTOP_TYPE_PHYS : 317 1.1.2.2 yamt /* transform into its disc logical block */ 318 1.1.2.2 yamt if (lb_num > udf_rw32(pdesc->part_len)) 319 1.1.2.2 yamt return EINVAL; 320 1.1.2.2 yamt *lb_numres = lb_num + udf_rw32(pdesc->start_loc); 321 1.1.2.2 yamt 322 1.1.2.2 yamt /* extent from here to the end of the partition */ 323 1.1.2.2 yamt *extres = udf_rw32(pdesc->part_len) - lb_num; 324 1.1.2.2 yamt return 0; 325 1.1.2.2 yamt case UDF_VTOP_TYPE_VIRT : 326 1.1.2.2 yamt /* only maps one logical block, lookup in VAT */ 327 1.1.2.2 yamt if (lb_num >= ump->vat_entries) /* XXX > or >= ? */ 328 1.1.2.2 yamt return EINVAL; 329 1.1.2.2 yamt 330 1.1.2.2 yamt /* lookup in virtual allocation table file */ 331 1.1.2.2 yamt mutex_enter(&ump->allocate_mutex); 332 1.1.2.2 yamt error = udf_vat_read(ump->vat_node, 333 1.1.2.2 yamt (uint8_t *) &udf_rw32_lbmap, 4, 334 1.1.2.2 yamt ump->vat_offset + lb_num * 4); 335 1.1.2.2 yamt mutex_exit(&ump->allocate_mutex); 336 1.1.2.2 yamt 337 1.1.2.2 yamt if (error) 338 1.1.2.2 yamt return error; 339 1.1.2.2 yamt 340 1.1.2.2 yamt lb_num = udf_rw32(udf_rw32_lbmap); 341 1.1.2.2 yamt 342 1.1.2.2 yamt /* transform into its disc logical block */ 343 1.1.2.2 yamt if (lb_num > udf_rw32(pdesc->part_len)) 344 1.1.2.2 yamt return EINVAL; 345 1.1.2.2 yamt *lb_numres = lb_num + udf_rw32(pdesc->start_loc); 346 1.1.2.2 yamt 347 1.1.2.2 yamt /* just one logical block */ 348 1.1.2.2 yamt *extres = 1; 349 1.1.2.2 yamt return 0; 350 1.1.2.2 yamt case UDF_VTOP_TYPE_SPARABLE : 351 1.1.2.2 yamt /* check if the packet containing the lb_num is remapped */ 352 1.1.2.2 yamt lb_packet = lb_num / ump->sparable_packet_size; 353 1.1.2.2 yamt lb_rel = lb_num % ump->sparable_packet_size; 354 1.1.2.2 yamt 355 1.1.2.2 yamt for (rel = 0; rel < udf_rw16(ump->sparing_table->rt_l); rel++) { 356 1.1.2.2 yamt sme = &ump->sparing_table->entries[rel]; 357 1.1.2.2 yamt if (lb_packet == udf_rw32(sme->org)) { 358 1.1.2.2 yamt /* NOTE maps to absolute disc logical block! */ 359 1.1.2.2 yamt *lb_numres = udf_rw32(sme->map) + lb_rel; 360 1.1.2.2 yamt *extres = ump->sparable_packet_size - lb_rel; 361 1.1.2.2 yamt return 0; 362 1.1.2.2 yamt } 363 1.1.2.2 yamt } 364 1.1.2.2 yamt 365 1.1.2.2 yamt /* transform into its disc logical block */ 366 1.1.2.2 yamt if (lb_num > udf_rw32(pdesc->part_len)) 367 1.1.2.2 yamt return EINVAL; 368 1.1.2.2 yamt *lb_numres = lb_num + udf_rw32(pdesc->start_loc); 369 1.1.2.2 yamt 370 1.1.2.2 yamt /* rest of block */ 371 1.1.2.2 yamt *extres = ump->sparable_packet_size - lb_rel; 372 1.1.2.2 yamt return 0; 373 1.1.2.2 yamt case UDF_VTOP_TYPE_META : 374 1.1.2.2 yamt /* we have to look into the file's allocation descriptors */ 375 1.1.2.2 yamt 376 1.1.2.2 yamt /* use metadatafile allocation mutex */ 377 1.1.2.2 yamt lb_size = udf_rw32(ump->logical_vol->lb_size); 378 1.1.2.2 yamt 379 1.1.2.2 yamt UDF_LOCK_NODE(ump->metadata_node, 0); 380 1.1.2.2 yamt 381 1.1.2.2 yamt /* get first overlapping extent */ 382 1.1.2.2 yamt foffset = 0; 383 1.1.2.2 yamt slot = 0; 384 1.1.2.2 yamt for (;;) { 385 1.1.2.2 yamt udf_get_adslot(ump->metadata_node, 386 1.1.2.2 yamt slot, &s_icb_loc, &eof); 387 1.1.2.2 yamt if (eof) { 388 1.1.2.2 yamt DPRINTF(TRANSLATE, 389 1.1.2.2 yamt ("Meta partition translation " 390 1.1.2.2 yamt "failed: can't seek location\n")); 391 1.1.2.2 yamt UDF_UNLOCK_NODE(ump->metadata_node, 0); 392 1.1.2.2 yamt return EINVAL; 393 1.1.2.2 yamt } 394 1.1.2.2 yamt len = udf_rw32(s_icb_loc.len); 395 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 396 1.1.2.2 yamt len = UDF_EXT_LEN(len); 397 1.1.2.2 yamt 398 1.1.2.2 yamt end_foffset = foffset + len; 399 1.1.2.2 yamt 400 1.1.2.2 yamt if (end_foffset > lb_num * lb_size) 401 1.1.2.2 yamt break; /* found */ 402 1.1.2.2 yamt if (flags != UDF_EXT_REDIRECT) 403 1.1.2.2 yamt foffset = end_foffset; 404 1.1.2.2 yamt slot++; 405 1.1.2.2 yamt } 406 1.1.2.2 yamt /* found overlapping slot */ 407 1.1.2.2 yamt ext_offset = lb_num * lb_size - foffset; 408 1.1.2.2 yamt 409 1.1.2.2 yamt /* process extent offset */ 410 1.1.2.2 yamt lb_num = udf_rw32(s_icb_loc.loc.lb_num); 411 1.1.2.2 yamt vpart = udf_rw16(s_icb_loc.loc.part_num); 412 1.1.2.2 yamt lb_num += (ext_offset + lb_size -1) / lb_size; 413 1.1.2.2 yamt len -= ext_offset; 414 1.1.2.2 yamt ext_offset = 0; 415 1.1.2.2 yamt 416 1.1.2.2 yamt flags = UDF_EXT_FLAGS(s_icb_loc.len); 417 1.1.2.2 yamt 418 1.1.2.2 yamt UDF_UNLOCK_NODE(ump->metadata_node, 0); 419 1.1.2.2 yamt if (flags != UDF_EXT_ALLOCATED) { 420 1.1.2.2 yamt DPRINTF(TRANSLATE, ("Metadata partition translation " 421 1.1.2.2 yamt "failed: not allocated\n")); 422 1.1.2.2 yamt return EINVAL; 423 1.1.2.2 yamt } 424 1.1.2.2 yamt 425 1.1.2.2 yamt /* 426 1.1.2.2 yamt * vpart and lb_num are updated, translate again since we 427 1.1.2.2 yamt * might be mapped on sparable media 428 1.1.2.2 yamt */ 429 1.1.2.2 yamt goto translate_again; 430 1.1.2.2 yamt default: 431 1.1.2.2 yamt printf("UDF vtop translation scheme %d unimplemented yet\n", 432 1.1.2.2 yamt ump->vtop_tp[vpart]); 433 1.1.2.2 yamt } 434 1.1.2.2 yamt 435 1.1.2.2 yamt return EINVAL; 436 1.1.2.2 yamt } 437 1.1.2.2 yamt 438 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 439 1.1.2.2 yamt 440 1.1.2.2 yamt /* 441 1.1.2.2 yamt * Translate an extent (in logical_blocks) into logical block numbers; used 442 1.1.2.2 yamt * for read and write operations. DOESNT't check extents. 443 1.1.2.2 yamt */ 444 1.1.2.2 yamt 445 1.1.2.2 yamt int 446 1.1.2.2 yamt udf_translate_file_extent(struct udf_node *udf_node, 447 1.1.2.2 yamt uint32_t from, uint32_t num_lb, 448 1.1.2.2 yamt uint64_t *map) 449 1.1.2.2 yamt { 450 1.1.2.2 yamt struct udf_mount *ump; 451 1.1.2.2 yamt struct icb_tag *icbtag; 452 1.1.2.2 yamt struct long_ad t_ad, s_ad; 453 1.1.2.2 yamt uint64_t transsec; 454 1.1.2.2 yamt uint64_t foffset, end_foffset; 455 1.1.2.2 yamt uint32_t transsec32; 456 1.1.2.2 yamt uint32_t lb_size; 457 1.1.2.2 yamt uint32_t ext_offset; 458 1.1.2.2 yamt uint32_t lb_num, len; 459 1.1.2.2 yamt uint32_t overlap, translen; 460 1.1.2.2 yamt uint16_t vpart_num; 461 1.1.2.2 yamt int eof, error, flags; 462 1.1.2.2 yamt int slot, addr_type, icbflags; 463 1.1.2.2 yamt 464 1.1.2.2 yamt if (!udf_node) 465 1.1.2.2 yamt return ENOENT; 466 1.1.2.2 yamt 467 1.1.2.2 yamt KASSERT(num_lb > 0); 468 1.1.2.2 yamt 469 1.1.2.2 yamt UDF_LOCK_NODE(udf_node, 0); 470 1.1.2.2 yamt 471 1.1.2.2 yamt /* initialise derivative vars */ 472 1.1.2.2 yamt ump = udf_node->ump; 473 1.1.2.2 yamt lb_size = udf_rw32(ump->logical_vol->lb_size); 474 1.1.2.2 yamt 475 1.1.2.2 yamt if (udf_node->fe) { 476 1.1.2.2 yamt icbtag = &udf_node->fe->icbtag; 477 1.1.2.2 yamt } else { 478 1.1.2.2 yamt icbtag = &udf_node->efe->icbtag; 479 1.1.2.2 yamt } 480 1.1.2.2 yamt icbflags = udf_rw16(icbtag->flags); 481 1.1.2.2 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 482 1.1.2.2 yamt 483 1.1.2.2 yamt /* do the work */ 484 1.1.2.2 yamt if (addr_type == UDF_ICB_INTERN_ALLOC) { 485 1.1.2.2 yamt *map = UDF_TRANS_INTERN; 486 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 487 1.1.2.2 yamt return 0; 488 1.1.2.2 yamt } 489 1.1.2.2 yamt 490 1.1.2.2 yamt /* find first overlapping extent */ 491 1.1.2.2 yamt foffset = 0; 492 1.1.2.2 yamt slot = 0; 493 1.1.2.2 yamt for (;;) { 494 1.1.2.2 yamt udf_get_adslot(udf_node, slot, &s_ad, &eof); 495 1.1.2.2 yamt if (eof) { 496 1.1.2.2 yamt DPRINTF(TRANSLATE, 497 1.1.2.2 yamt ("Translate file extent " 498 1.1.2.2 yamt "failed: can't seek location\n")); 499 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 500 1.1.2.2 yamt return EINVAL; 501 1.1.2.2 yamt } 502 1.1.2.2 yamt len = udf_rw32(s_ad.len); 503 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 504 1.1.2.2 yamt len = UDF_EXT_LEN(len); 505 1.1.2.2 yamt lb_num = udf_rw32(s_ad.loc.lb_num); 506 1.1.2.2 yamt 507 1.1.2.2 yamt if (flags == UDF_EXT_REDIRECT) { 508 1.1.2.2 yamt slot++; 509 1.1.2.2 yamt continue; 510 1.1.2.2 yamt } 511 1.1.2.2 yamt 512 1.1.2.2 yamt end_foffset = foffset + len; 513 1.1.2.2 yamt 514 1.1.2.2 yamt if (end_foffset > from * lb_size) 515 1.1.2.2 yamt break; /* found */ 516 1.1.2.2 yamt foffset = end_foffset; 517 1.1.2.2 yamt slot++; 518 1.1.2.2 yamt } 519 1.1.2.2 yamt /* found overlapping slot */ 520 1.1.2.2 yamt ext_offset = from * lb_size - foffset; 521 1.1.2.2 yamt 522 1.1.2.2 yamt for (;;) { 523 1.1.2.2 yamt udf_get_adslot(udf_node, slot, &s_ad, &eof); 524 1.1.2.2 yamt if (eof) { 525 1.1.2.2 yamt DPRINTF(TRANSLATE, 526 1.1.2.2 yamt ("Translate file extent " 527 1.1.2.2 yamt "failed: past eof\n")); 528 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 529 1.1.2.2 yamt return EINVAL; 530 1.1.2.2 yamt } 531 1.1.2.2 yamt 532 1.1.2.2 yamt len = udf_rw32(s_ad.len); 533 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 534 1.1.2.2 yamt len = UDF_EXT_LEN(len); 535 1.1.2.2 yamt 536 1.1.2.2 yamt lb_num = udf_rw32(s_ad.loc.lb_num); 537 1.1.2.2 yamt vpart_num = udf_rw16(s_ad.loc.part_num); 538 1.1.2.2 yamt 539 1.1.2.2 yamt end_foffset = foffset + len; 540 1.1.2.2 yamt 541 1.1.2.2 yamt /* process extent, don't forget to advance on ext_offset! */ 542 1.1.2.2 yamt lb_num += (ext_offset + lb_size -1) / lb_size; 543 1.1.2.2 yamt overlap = (len - ext_offset + lb_size -1) / lb_size; 544 1.1.2.2 yamt ext_offset = 0; 545 1.1.2.2 yamt 546 1.1.2.2 yamt /* 547 1.1.2.2 yamt * note that the while(){} is nessisary for the extent that 548 1.1.2.2 yamt * the udf_translate_vtop() returns doens't have to span the 549 1.1.2.2 yamt * whole extent. 550 1.1.2.2 yamt */ 551 1.1.2.2 yamt 552 1.1.2.2 yamt overlap = MIN(overlap, num_lb); 553 1.1.2.2 yamt while (overlap) { 554 1.1.2.2 yamt switch (flags) { 555 1.1.2.2 yamt case UDF_EXT_FREE : 556 1.1.2.2 yamt case UDF_EXT_ALLOCATED_BUT_NOT_USED : 557 1.1.2.2 yamt transsec = UDF_TRANS_ZERO; 558 1.1.2.2 yamt translen = overlap; 559 1.1.2.2 yamt while (overlap && num_lb && translen) { 560 1.1.2.2 yamt *map++ = transsec; 561 1.1.2.2 yamt lb_num++; 562 1.1.2.2 yamt overlap--; num_lb--; translen--; 563 1.1.2.2 yamt } 564 1.1.2.2 yamt break; 565 1.1.2.2 yamt case UDF_EXT_ALLOCATED : 566 1.1.2.2 yamt t_ad.loc.lb_num = udf_rw32(lb_num); 567 1.1.2.2 yamt t_ad.loc.part_num = udf_rw16(vpart_num); 568 1.1.2.2 yamt error = udf_translate_vtop(ump, 569 1.1.2.2 yamt &t_ad, &transsec32, &translen); 570 1.1.2.2 yamt transsec = transsec32; 571 1.1.2.2 yamt if (error) { 572 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 573 1.1.2.2 yamt return error; 574 1.1.2.2 yamt } 575 1.1.2.2 yamt while (overlap && num_lb && translen) { 576 1.1.2.2 yamt *map++ = transsec; 577 1.1.2.2 yamt lb_num++; transsec++; 578 1.1.2.2 yamt overlap--; num_lb--; translen--; 579 1.1.2.2 yamt } 580 1.1.2.2 yamt break; 581 1.1.2.2 yamt default: /* UDF_EXT_REDIRECT */ 582 1.1.2.2 yamt /* ignore, not a mapping */ 583 1.1.2.2 yamt break; 584 1.1.2.2 yamt } 585 1.1.2.2 yamt } 586 1.1.2.2 yamt if (num_lb == 0) 587 1.1.2.2 yamt break; 588 1.1.2.2 yamt 589 1.1.2.2 yamt if (flags != UDF_EXT_REDIRECT) 590 1.1.2.2 yamt foffset = end_foffset; 591 1.1.2.2 yamt slot++; 592 1.1.2.2 yamt } 593 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 594 1.1.2.2 yamt 595 1.1.2.2 yamt return 0; 596 1.1.2.2 yamt } 597 1.1.2.2 yamt 598 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 599 1.1.2.2 yamt 600 1.1.2.2 yamt static int 601 1.1.2.2 yamt udf_search_free_vatloc(struct udf_mount *ump, uint32_t *lbnumres) 602 1.1.2.2 yamt { 603 1.1.2.2 yamt uint32_t lb_size, lb_num, lb_map, udf_rw32_lbmap; 604 1.1.2.2 yamt uint8_t *blob; 605 1.1.2.2 yamt int entry, chunk, found, error; 606 1.1.2.2 yamt 607 1.1.2.2 yamt KASSERT(ump); 608 1.1.2.2 yamt KASSERT(ump->logical_vol); 609 1.1.2.2 yamt 610 1.1.2.2 yamt lb_size = udf_rw32(ump->logical_vol->lb_size); 611 1.1.2.2 yamt blob = malloc(lb_size, M_UDFTEMP, M_WAITOK); 612 1.1.2.2 yamt 613 1.1.2.2 yamt /* TODO static allocation of search chunk */ 614 1.1.2.2 yamt 615 1.1.2.2 yamt lb_num = MIN(ump->vat_entries, ump->vat_last_free_lb); 616 1.1.2.2 yamt found = 0; 617 1.1.2.2 yamt error = 0; 618 1.1.2.2 yamt entry = 0; 619 1.1.2.2 yamt do { 620 1.1.2.2 yamt chunk = MIN(lb_size, (ump->vat_entries - lb_num) * 4); 621 1.1.2.2 yamt if (chunk <= 0) 622 1.1.2.2 yamt break; 623 1.1.2.2 yamt /* load in chunk */ 624 1.1.2.2 yamt error = udf_vat_read(ump->vat_node, blob, chunk, 625 1.1.2.2 yamt ump->vat_offset + lb_num * 4); 626 1.1.2.2 yamt 627 1.1.2.2 yamt if (error) 628 1.1.2.2 yamt break; 629 1.1.2.2 yamt 630 1.1.2.2 yamt /* search this chunk */ 631 1.1.2.2 yamt for (entry=0; entry < chunk /4; entry++, lb_num++) { 632 1.1.2.2 yamt udf_rw32_lbmap = *((uint32_t *) (blob + entry * 4)); 633 1.1.2.2 yamt lb_map = udf_rw32(udf_rw32_lbmap); 634 1.1.2.2 yamt if (lb_map == 0xffffffff) { 635 1.1.2.2 yamt found = 1; 636 1.1.2.2 yamt break; 637 1.1.2.2 yamt } 638 1.1.2.2 yamt } 639 1.1.2.2 yamt } while (!found); 640 1.1.2.2 yamt if (error) { 641 1.1.2.2 yamt printf("udf_search_free_vatloc: error reading in vat chunk " 642 1.1.2.2 yamt "(lb %d, size %d)\n", lb_num, chunk); 643 1.1.2.2 yamt } 644 1.1.2.2 yamt 645 1.1.2.2 yamt if (!found) { 646 1.1.2.2 yamt /* extend VAT */ 647 1.1.2.2 yamt DPRINTF(WRITE, ("udf_search_free_vatloc: extending\n")); 648 1.1.2.2 yamt lb_num = ump->vat_entries; 649 1.1.2.2 yamt ump->vat_entries++; 650 1.1.2.2 yamt } 651 1.1.2.2 yamt 652 1.1.2.2 yamt /* mark entry with initialiser just in case */ 653 1.1.2.2 yamt lb_map = udf_rw32(0xfffffffe); 654 1.1.2.2 yamt udf_vat_write(ump->vat_node, (uint8_t *) &lb_map, 4, 655 1.1.2.2 yamt ump->vat_offset + lb_num *4); 656 1.1.2.2 yamt ump->vat_last_free_lb = lb_num; 657 1.1.2.2 yamt 658 1.1.2.2 yamt free(blob, M_UDFTEMP); 659 1.1.2.2 yamt *lbnumres = lb_num; 660 1.1.2.2 yamt return 0; 661 1.1.2.2 yamt } 662 1.1.2.2 yamt 663 1.1.2.2 yamt 664 1.1.2.2 yamt static void 665 1.1.2.2 yamt udf_bitmap_allocate(struct udf_bitmap *bitmap, int ismetadata, 666 1.1.2.2 yamt uint32_t ptov, uint32_t *num_lb, uint64_t *pmappos, uint64_t *lmappos) 667 1.1.2.2 yamt { 668 1.1.2.2 yamt uint32_t offset, lb_num, bit; 669 1.1.2.2 yamt int32_t diff; 670 1.1.2.2 yamt uint8_t *bpos; 671 1.1.2.2 yamt int pass; 672 1.1.2.2 yamt 673 1.1.2.2 yamt if (!ismetadata) { 674 1.1.2.2 yamt /* heuristic to keep the two pointers not too close */ 675 1.1.2.2 yamt diff = bitmap->data_pos - bitmap->metadata_pos; 676 1.1.2.2 yamt if ((diff >= 0) && (diff < 1024)) 677 1.1.2.2 yamt bitmap->data_pos = bitmap->metadata_pos + 1024; 678 1.1.2.2 yamt } 679 1.1.2.2 yamt offset = ismetadata ? bitmap->metadata_pos : bitmap->data_pos; 680 1.1.2.2 yamt offset &= ~7; 681 1.1.2.2 yamt for (pass = 0; pass < 2; pass++) { 682 1.1.2.2 yamt if (offset >= bitmap->max_offset) 683 1.1.2.2 yamt offset = 0; 684 1.1.2.2 yamt 685 1.1.2.2 yamt while (offset < bitmap->max_offset) { 686 1.1.2.2 yamt if (*num_lb == 0) 687 1.1.2.2 yamt break; 688 1.1.2.2 yamt 689 1.1.2.2 yamt /* use first bit not set */ 690 1.1.2.2 yamt bpos = bitmap->bits + offset/8; 691 1.1.2.2 yamt bit = ffs(*bpos); 692 1.1.2.2 yamt if (bit == 0) { 693 1.1.2.2 yamt offset += 8; 694 1.1.2.2 yamt continue; 695 1.1.2.2 yamt } 696 1.1.2.2 yamt *bpos &= ~(1 << (bit-1)); 697 1.1.2.2 yamt lb_num = offset + bit-1; 698 1.1.2.2 yamt *lmappos++ = lb_num; 699 1.1.2.2 yamt *pmappos++ = lb_num + ptov; 700 1.1.2.2 yamt *num_lb = *num_lb - 1; 701 1.1.2.2 yamt // offset = (offset & ~7); 702 1.1.2.2 yamt } 703 1.1.2.2 yamt } 704 1.1.2.2 yamt 705 1.1.2.2 yamt if (ismetadata) { 706 1.1.2.2 yamt bitmap->metadata_pos = offset; 707 1.1.2.2 yamt } else { 708 1.1.2.2 yamt bitmap->data_pos = offset; 709 1.1.2.2 yamt } 710 1.1.2.2 yamt } 711 1.1.2.2 yamt 712 1.1.2.2 yamt 713 1.1.2.2 yamt static void 714 1.1.2.2 yamt udf_bitmap_free(struct udf_bitmap *bitmap, uint32_t lb_num, uint32_t num_lb) 715 1.1.2.2 yamt { 716 1.1.2.2 yamt uint32_t offset; 717 1.1.2.2 yamt uint32_t bit, bitval; 718 1.1.2.2 yamt uint8_t *bpos; 719 1.1.2.2 yamt 720 1.1.2.2 yamt offset = lb_num; 721 1.1.2.2 yamt 722 1.1.2.2 yamt /* starter bits */ 723 1.1.2.2 yamt bpos = bitmap->bits + offset/8; 724 1.1.2.2 yamt bit = offset % 8; 725 1.1.2.2 yamt while ((bit != 0) && (num_lb > 0)) { 726 1.1.2.2 yamt bitval = (1 << bit); 727 1.1.2.2 yamt KASSERT((*bpos & bitval) == 0); 728 1.1.2.2 yamt *bpos |= bitval; 729 1.1.2.2 yamt offset++; num_lb--; 730 1.1.2.2 yamt bit = (bit + 1) % 8; 731 1.1.2.2 yamt } 732 1.1.2.2 yamt if (num_lb == 0) 733 1.1.2.2 yamt return; 734 1.1.2.2 yamt 735 1.1.2.2 yamt /* whole bytes */ 736 1.1.2.2 yamt KASSERT(bit == 0); 737 1.1.2.2 yamt bpos = bitmap->bits + offset / 8; 738 1.1.2.2 yamt while (num_lb >= 8) { 739 1.1.2.2 yamt KASSERT((*bpos == 0)); 740 1.1.2.2 yamt *bpos = 255; 741 1.1.2.2 yamt offset += 8; num_lb -= 8; 742 1.1.2.2 yamt bpos++; 743 1.1.2.2 yamt } 744 1.1.2.2 yamt 745 1.1.2.2 yamt /* stop bits */ 746 1.1.2.2 yamt KASSERT(num_lb < 8); 747 1.1.2.2 yamt bit = 0; 748 1.1.2.2 yamt while (num_lb > 0) { 749 1.1.2.2 yamt bitval = (1 << bit); 750 1.1.2.2 yamt KASSERT((*bpos & bitval) == 0); 751 1.1.2.2 yamt *bpos |= bitval; 752 1.1.2.2 yamt offset++; num_lb--; 753 1.1.2.2 yamt bit = (bit + 1) % 8; 754 1.1.2.2 yamt } 755 1.1.2.2 yamt } 756 1.1.2.2 yamt 757 1.1.2.2 yamt 758 1.1.2.2 yamt /* allocate a contiguous sequence of sectornumbers */ 759 1.1.2.2 yamt static int 760 1.1.2.2 yamt udf_allocate_space(struct udf_mount *ump, int ismetadata, int alloc_type, 761 1.1.2.2 yamt int num_lb, uint16_t *alloc_partp, 762 1.1.2.2 yamt uint64_t *lmapping, uint64_t *pmapping) 763 1.1.2.2 yamt { 764 1.1.2.2 yamt struct mmc_trackinfo *alloc_track, *other_track; 765 1.1.2.2 yamt struct udf_bitmap *bitmap; 766 1.1.2.2 yamt struct part_desc *pdesc; 767 1.1.2.2 yamt struct logvol_int_desc *lvid; 768 1.1.2.2 yamt uint64_t *lmappos, *pmappos; 769 1.1.2.2 yamt uint32_t ptov, lb_num, *freepos, free_lbs; 770 1.1.2.2 yamt int lb_size, alloc_num_lb; 771 1.1.2.2 yamt int alloc_part; 772 1.1.2.2 yamt int error; 773 1.1.2.2 yamt 774 1.1.2.2 yamt mutex_enter(&ump->allocate_mutex); 775 1.1.2.2 yamt 776 1.1.2.2 yamt lb_size = udf_rw32(ump->logical_vol->lb_size); 777 1.1.2.2 yamt KASSERT(lb_size == ump->discinfo.sector_size); 778 1.1.2.2 yamt 779 1.1.2.2 yamt if (ismetadata) { 780 1.1.2.2 yamt alloc_part = ump->metadata_part; 781 1.1.2.2 yamt alloc_track = &ump->metadata_track; 782 1.1.2.2 yamt other_track = &ump->data_track; 783 1.1.2.2 yamt } else { 784 1.1.2.2 yamt alloc_part = ump->data_part; 785 1.1.2.2 yamt alloc_track = &ump->data_track; 786 1.1.2.2 yamt other_track = &ump->metadata_track; 787 1.1.2.2 yamt } 788 1.1.2.2 yamt 789 1.1.2.2 yamt *alloc_partp = alloc_part; 790 1.1.2.2 yamt 791 1.1.2.2 yamt error = 0; 792 1.1.2.2 yamt /* XXX check disc space */ 793 1.1.2.2 yamt 794 1.1.2.2 yamt pdesc = ump->partitions[ump->vtop[alloc_part]]; 795 1.1.2.2 yamt lmappos = lmapping; 796 1.1.2.2 yamt pmappos = pmapping; 797 1.1.2.2 yamt 798 1.1.2.2 yamt switch (alloc_type) { 799 1.1.2.2 yamt case UDF_ALLOC_VAT : 800 1.1.2.2 yamt /* search empty slot in VAT file */ 801 1.1.2.2 yamt KASSERT(num_lb == 1); 802 1.1.2.2 yamt error = udf_search_free_vatloc(ump, &lb_num); 803 1.1.2.2 yamt if (!error) { 804 1.1.2.2 yamt *lmappos = lb_num; 805 1.1.2.2 yamt *pmappos = 0; /* will get late-allocated */ 806 1.1.2.2 yamt } 807 1.1.2.2 yamt break; 808 1.1.2.2 yamt case UDF_ALLOC_SEQUENTIAL : 809 1.1.2.2 yamt /* sequential allocation on recordable media */ 810 1.1.2.2 yamt /* calculate offset from physical base partition */ 811 1.1.2.2 yamt ptov = udf_rw32(pdesc->start_loc); 812 1.1.2.2 yamt 813 1.1.2.2 yamt for (lb_num = 0; lb_num < num_lb; lb_num++) { 814 1.1.2.2 yamt *pmappos++ = alloc_track->next_writable; 815 1.1.2.2 yamt *lmappos++ = alloc_track->next_writable - ptov; 816 1.1.2.2 yamt alloc_track->next_writable++; 817 1.1.2.2 yamt alloc_track->free_blocks--; 818 1.1.2.2 yamt } 819 1.1.2.2 yamt if (alloc_track->tracknr == other_track->tracknr) 820 1.1.2.2 yamt memcpy(other_track, alloc_track, 821 1.1.2.2 yamt sizeof(struct mmc_trackinfo)); 822 1.1.2.2 yamt break; 823 1.1.2.2 yamt case UDF_ALLOC_SPACEMAP : 824 1.1.2.2 yamt ptov = udf_rw32(pdesc->start_loc); 825 1.1.2.2 yamt 826 1.1.2.2 yamt /* allocate on unallocated bits page */ 827 1.1.2.2 yamt alloc_num_lb = num_lb; 828 1.1.2.2 yamt bitmap = &ump->part_unalloc_bits[alloc_part]; 829 1.1.2.2 yamt udf_bitmap_allocate(bitmap, ismetadata, ptov, &alloc_num_lb, 830 1.1.2.2 yamt pmappos, lmappos); 831 1.1.2.2 yamt ump->lvclose |= UDF_WRITE_PART_BITMAPS; 832 1.1.2.2 yamt if (alloc_num_lb) { 833 1.1.2.2 yamt /* TODO convert freed to unalloc and try again */ 834 1.1.2.2 yamt /* free allocated piece for now */ 835 1.1.2.2 yamt lmappos = lmapping; 836 1.1.2.2 yamt for (lb_num=0; lb_num < num_lb-alloc_num_lb; lb_num++) { 837 1.1.2.2 yamt udf_bitmap_free(bitmap, *lmappos++, 1); 838 1.1.2.2 yamt } 839 1.1.2.2 yamt error = ENOSPC; 840 1.1.2.2 yamt } 841 1.1.2.2 yamt if (!error) { 842 1.1.2.2 yamt /* adjust freecount */ 843 1.1.2.2 yamt lvid = ump->logvol_integrity; 844 1.1.2.2 yamt freepos = &lvid->tables[0] + alloc_part; 845 1.1.2.2 yamt free_lbs = udf_rw32(*freepos); 846 1.1.2.2 yamt *freepos = udf_rw32(free_lbs - num_lb); 847 1.1.2.2 yamt } 848 1.1.2.2 yamt break; 849 1.1.2.2 yamt case UDF_ALLOC_METABITMAP : 850 1.1.2.2 yamt case UDF_ALLOC_METASEQUENTIAL : 851 1.1.2.2 yamt case UDF_ALLOC_RELAXEDSEQUENTIAL : 852 1.1.2.2 yamt printf("ALERT: udf_allocate_space : allocation %d " 853 1.1.2.2 yamt "not implemented yet!\n", alloc_type); 854 1.1.2.2 yamt /* TODO implement, doesn't have to be contiguous */ 855 1.1.2.2 yamt error = ENOSPC; 856 1.1.2.2 yamt break; 857 1.1.2.2 yamt } 858 1.1.2.2 yamt 859 1.1.2.2 yamt #ifdef DEBUG 860 1.1.2.2 yamt if (udf_verbose & UDF_DEBUG_ALLOC) { 861 1.1.2.2 yamt lmappos = lmapping; 862 1.1.2.2 yamt pmappos = pmapping; 863 1.1.2.2 yamt printf("udf_allocate_space, mapping l->p:\n"); 864 1.1.2.2 yamt for (lb_num = 0; lb_num < num_lb; lb_num++) { 865 1.1.2.2 yamt printf("\t%"PRIu64" -> %"PRIu64"\n", 866 1.1.2.2 yamt *lmappos++, *pmappos++); 867 1.1.2.2 yamt } 868 1.1.2.2 yamt } 869 1.1.2.2 yamt #endif 870 1.1.2.2 yamt mutex_exit(&ump->allocate_mutex); 871 1.1.2.2 yamt 872 1.1.2.2 yamt return error; 873 1.1.2.2 yamt } 874 1.1.2.2 yamt 875 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 876 1.1.2.2 yamt 877 1.1.2.2 yamt void 878 1.1.2.2 yamt udf_free_allocated_space(struct udf_mount *ump, uint32_t lb_num, 879 1.1.2.2 yamt uint16_t vpart_num, uint32_t num_lb) 880 1.1.2.2 yamt { 881 1.1.2.2 yamt struct udf_bitmap *bitmap; 882 1.1.2.2 yamt struct part_desc *pdesc; 883 1.1.2.2 yamt struct logvol_int_desc *lvid; 884 1.1.2.2 yamt uint32_t ptov, lb_map, udf_rw32_lbmap; 885 1.1.2.2 yamt uint32_t *freepos, free_lbs; 886 1.1.2.2 yamt int phys_part; 887 1.1.2.2 yamt int error; 888 1.1.2.2 yamt 889 1.1.2.2 yamt DPRINTF(ALLOC, ("udf_free_allocated_space: freeing virt lbnum %d " 890 1.1.2.2 yamt "part %d + %d sect\n", lb_num, vpart_num, num_lb)); 891 1.1.2.2 yamt 892 1.1.2.2 yamt mutex_enter(&ump->allocate_mutex); 893 1.1.2.2 yamt 894 1.1.2.2 yamt /* get partition backing up this vpart_num */ 895 1.1.2.2 yamt pdesc = ump->partitions[ump->vtop[vpart_num]]; 896 1.1.2.2 yamt 897 1.1.2.2 yamt switch (ump->vtop_tp[vpart_num]) { 898 1.1.2.2 yamt case UDF_VTOP_TYPE_PHYS : 899 1.1.2.2 yamt case UDF_VTOP_TYPE_SPARABLE : 900 1.1.2.2 yamt /* free space to freed or unallocated space bitmap */ 901 1.1.2.2 yamt ptov = udf_rw32(pdesc->start_loc); 902 1.1.2.2 yamt phys_part = ump->vtop[vpart_num]; 903 1.1.2.2 yamt 904 1.1.2.2 yamt /* first try freed space bitmap */ 905 1.1.2.2 yamt bitmap = &ump->part_freed_bits[phys_part]; 906 1.1.2.2 yamt 907 1.1.2.2 yamt /* if not defined, use unallocated bitmap */ 908 1.1.2.2 yamt if (bitmap->bits == NULL) 909 1.1.2.2 yamt bitmap = &ump->part_unalloc_bits[phys_part]; 910 1.1.2.2 yamt 911 1.1.2.2 yamt /* if no bitmaps are defined, bail out */ 912 1.1.2.2 yamt if (bitmap->bits == NULL) 913 1.1.2.2 yamt break; 914 1.1.2.2 yamt 915 1.1.2.2 yamt /* free bits if its defined */ 916 1.1.2.2 yamt KASSERT(bitmap->bits); 917 1.1.2.2 yamt ump->lvclose |= UDF_WRITE_PART_BITMAPS; 918 1.1.2.2 yamt udf_bitmap_free(bitmap, lb_num, num_lb); 919 1.1.2.2 yamt 920 1.1.2.2 yamt /* adjust freecount */ 921 1.1.2.2 yamt lvid = ump->logvol_integrity; 922 1.1.2.2 yamt freepos = &lvid->tables[0] + vpart_num; 923 1.1.2.2 yamt free_lbs = udf_rw32(*freepos); 924 1.1.2.2 yamt *freepos = udf_rw32(free_lbs + num_lb); 925 1.1.2.2 yamt break; 926 1.1.2.2 yamt case UDF_VTOP_TYPE_VIRT : 927 1.1.2.2 yamt /* free this VAT entry */ 928 1.1.2.2 yamt KASSERT(num_lb == 1); 929 1.1.2.2 yamt 930 1.1.2.2 yamt lb_map = 0xffffffff; 931 1.1.2.2 yamt udf_rw32_lbmap = udf_rw32(lb_map); 932 1.1.2.2 yamt error = udf_vat_write(ump->vat_node, 933 1.1.2.2 yamt (uint8_t *) &udf_rw32_lbmap, 4, 934 1.1.2.2 yamt ump->vat_offset + lb_num * 4); 935 1.1.2.2 yamt KASSERT(error == 0); 936 1.1.2.2 yamt ump->vat_last_free_lb = MIN(ump->vat_last_free_lb, lb_num); 937 1.1.2.2 yamt break; 938 1.1.2.2 yamt case UDF_VTOP_TYPE_META : 939 1.1.2.2 yamt /* free space in the metadata bitmap */ 940 1.1.2.2 yamt default: 941 1.1.2.2 yamt printf("ALERT: udf_free_allocated_space : allocation %d " 942 1.1.2.2 yamt "not implemented yet!\n", ump->vtop_tp[vpart_num]); 943 1.1.2.2 yamt break; 944 1.1.2.2 yamt } 945 1.1.2.2 yamt 946 1.1.2.2 yamt mutex_exit(&ump->allocate_mutex); 947 1.1.2.2 yamt } 948 1.1.2.2 yamt 949 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 950 1.1.2.2 yamt 951 1.1.2.2 yamt int 952 1.1.2.2 yamt udf_pre_allocate_space(struct udf_mount *ump, int udf_c_type, int num_lb, 953 1.1.2.2 yamt uint16_t *alloc_partp, uint64_t *lmapping, uint64_t *pmapping) 954 1.1.2.2 yamt { 955 1.1.2.2 yamt int ismetadata, alloc_type; 956 1.1.2.2 yamt 957 1.1.2.2 yamt ismetadata = (udf_c_type == UDF_C_NODE); 958 1.1.2.2 yamt alloc_type = ismetadata? ump->meta_alloc : ump->data_alloc; 959 1.1.2.2 yamt 960 1.1.2.2 yamt #ifdef DIAGNOSTIC 961 1.1.2.2 yamt if ((alloc_type == UDF_ALLOC_VAT) && (udf_c_type != UDF_C_NODE)) { 962 1.1.2.2 yamt panic("udf_pre_allocate_space: bad c_type on VAT!\n"); 963 1.1.2.2 yamt } 964 1.1.2.2 yamt #endif 965 1.1.2.2 yamt 966 1.1.2.2 yamt /* reserve size for VAT allocated data */ 967 1.1.2.2 yamt if (alloc_type == UDF_ALLOC_VAT) { 968 1.1.2.2 yamt mutex_enter(&ump->allocate_mutex); 969 1.1.2.2 yamt ump->uncomitted_lb += num_lb; 970 1.1.2.2 yamt mutex_exit(&ump->allocate_mutex); 971 1.1.2.2 yamt } 972 1.1.2.2 yamt 973 1.1.2.2 yamt return udf_allocate_space(ump, ismetadata, alloc_type, 974 1.1.2.2 yamt num_lb, alloc_partp, lmapping, pmapping); 975 1.1.2.2 yamt } 976 1.1.2.2 yamt 977 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 978 1.1.2.2 yamt 979 1.1.2.2 yamt /* 980 1.1.2.2 yamt * Allocate a buf on disc for direct write out. The space doesn't have to be 981 1.1.2.2 yamt * contiguous as the caller takes care of this. 982 1.1.2.2 yamt */ 983 1.1.2.2 yamt 984 1.1.2.2 yamt void 985 1.1.2.2 yamt udf_late_allocate_buf(struct udf_mount *ump, struct buf *buf, 986 1.1.2.2 yamt uint64_t *lmapping, uint64_t *pmapping, struct long_ad *node_ad_cpy) 987 1.1.2.2 yamt { 988 1.1.2.2 yamt struct udf_node *udf_node = VTOI(buf->b_vp); 989 1.1.2.2 yamt uint16_t vpart_num; 990 1.1.2.2 yamt int lb_size, blks, udf_c_type; 991 1.1.2.2 yamt int ismetadata, alloc_type; 992 1.1.2.2 yamt int num_lb; 993 1.1.2.2 yamt int error, s; 994 1.1.2.2 yamt 995 1.1.2.2 yamt /* 996 1.1.2.2 yamt * for each sector in the buf, allocate a sector on disc and record 997 1.1.2.2 yamt * its position in the provided mapping array. 998 1.1.2.2 yamt * 999 1.1.2.2 yamt * If its userdata or FIDs, record its location in its node. 1000 1.1.2.2 yamt */ 1001 1.1.2.2 yamt 1002 1.1.2.2 yamt lb_size = udf_rw32(ump->logical_vol->lb_size); 1003 1.1.2.2 yamt num_lb = (buf->b_bcount + lb_size -1) / lb_size; 1004 1.1.2.2 yamt blks = lb_size / DEV_BSIZE; 1005 1.1.2.2 yamt udf_c_type = buf->b_udf_c_type; 1006 1.1.2.2 yamt 1007 1.1.2.2 yamt KASSERT(lb_size == ump->discinfo.sector_size); 1008 1.1.2.2 yamt 1009 1.1.2.2 yamt ismetadata = (udf_c_type == UDF_C_NODE); 1010 1.1.2.2 yamt alloc_type = ismetadata? ump->meta_alloc : ump->data_alloc; 1011 1.1.2.2 yamt 1012 1.1.2.2 yamt #ifdef DIAGNOSTIC 1013 1.1.2.2 yamt if ((alloc_type == UDF_ALLOC_VAT) && (udf_c_type != UDF_C_NODE)) { 1014 1.1.2.2 yamt panic("udf_late_allocate_buf: bad c_type on VAT!\n"); 1015 1.1.2.2 yamt } 1016 1.1.2.2 yamt #endif 1017 1.1.2.2 yamt 1018 1.1.2.2 yamt if (udf_c_type == UDF_C_NODE) { 1019 1.1.2.2 yamt /* if not VAT, its allready allocated */ 1020 1.1.2.2 yamt if (alloc_type != UDF_ALLOC_VAT) 1021 1.1.2.2 yamt return; 1022 1.1.2.2 yamt 1023 1.1.2.2 yamt /* allocate sequential */ 1024 1.1.2.2 yamt alloc_type = UDF_ALLOC_SEQUENTIAL; 1025 1.1.2.2 yamt } 1026 1.1.2.2 yamt 1027 1.1.2.2 yamt error = udf_allocate_space(ump, ismetadata, alloc_type, 1028 1.1.2.2 yamt num_lb, &vpart_num, lmapping, pmapping); 1029 1.1.2.2 yamt if (error) { 1030 1.1.2.2 yamt /* ARGH! we've not done our accounting right! */ 1031 1.1.2.2 yamt panic("UDF disc allocation accounting gone wrong"); 1032 1.1.2.2 yamt } 1033 1.1.2.2 yamt 1034 1.1.2.2 yamt /* commit our sector count */ 1035 1.1.2.2 yamt mutex_enter(&ump->allocate_mutex); 1036 1.1.2.2 yamt if (num_lb > ump->uncomitted_lb) { 1037 1.1.2.2 yamt ump->uncomitted_lb = 0; 1038 1.1.2.2 yamt } else { 1039 1.1.2.2 yamt ump->uncomitted_lb -= num_lb; 1040 1.1.2.2 yamt } 1041 1.1.2.2 yamt mutex_exit(&ump->allocate_mutex); 1042 1.1.2.2 yamt 1043 1.1.2.2 yamt buf->b_blkno = (*pmapping) * blks; 1044 1.1.2.2 yamt 1045 1.1.2.2 yamt /* If its userdata or FIDs, record its allocation in its node. */ 1046 1.1.2.2 yamt if ((udf_c_type == UDF_C_USERDATA) || (udf_c_type == UDF_C_FIDS)) { 1047 1.1.2.2 yamt udf_record_allocation_in_node(ump, buf, vpart_num, lmapping, 1048 1.1.2.2 yamt node_ad_cpy); 1049 1.1.2.2 yamt /* decrement our outstanding bufs counter */ 1050 1.1.2.2 yamt s = splbio(); 1051 1.1.2.2 yamt udf_node->outstanding_bufs--; 1052 1.1.2.2 yamt splx(s); 1053 1.1.2.2 yamt } 1054 1.1.2.2 yamt } 1055 1.1.2.2 yamt 1056 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 1057 1.1.2.2 yamt 1058 1.1.2.2 yamt /* 1059 1.1.2.2 yamt * Try to merge a1 with the new piece a2. udf_ads_merge returns error when not 1060 1.1.2.2 yamt * possible (anymore); a2 returns the rest piece. 1061 1.1.2.2 yamt */ 1062 1.1.2.2 yamt 1063 1.1.2.2 yamt static int 1064 1.1.2.2 yamt udf_ads_merge(uint32_t lb_size, struct long_ad *a1, struct long_ad *a2) 1065 1.1.2.2 yamt { 1066 1.1.2.2 yamt uint32_t max_len, merge_len; 1067 1.1.2.2 yamt uint32_t a1_len, a2_len; 1068 1.1.2.2 yamt uint32_t a1_flags, a2_flags; 1069 1.1.2.2 yamt uint32_t a1_lbnum, a2_lbnum; 1070 1.1.2.2 yamt uint16_t a1_part, a2_part; 1071 1.1.2.2 yamt 1072 1.1.2.2 yamt max_len = ((UDF_EXT_MAXLEN / lb_size) * lb_size); 1073 1.1.2.2 yamt 1074 1.1.2.2 yamt a1_flags = UDF_EXT_FLAGS(udf_rw32(a1->len)); 1075 1.1.2.2 yamt a1_len = UDF_EXT_LEN(udf_rw32(a1->len)); 1076 1.1.2.2 yamt a1_lbnum = udf_rw32(a1->loc.lb_num); 1077 1.1.2.2 yamt a1_part = udf_rw16(a1->loc.part_num); 1078 1.1.2.2 yamt 1079 1.1.2.2 yamt a2_flags = UDF_EXT_FLAGS(udf_rw32(a2->len)); 1080 1.1.2.2 yamt a2_len = UDF_EXT_LEN(udf_rw32(a2->len)); 1081 1.1.2.2 yamt a2_lbnum = udf_rw32(a2->loc.lb_num); 1082 1.1.2.2 yamt a2_part = udf_rw16(a2->loc.part_num); 1083 1.1.2.2 yamt 1084 1.1.2.2 yamt /* defines same space */ 1085 1.1.2.2 yamt if (a1_flags != a2_flags) 1086 1.1.2.2 yamt return 1; 1087 1.1.2.2 yamt 1088 1.1.2.2 yamt if (a1_flags != UDF_EXT_FREE) { 1089 1.1.2.2 yamt /* the same partition */ 1090 1.1.2.2 yamt if (a1_part != a2_part) 1091 1.1.2.2 yamt return 1; 1092 1.1.2.2 yamt 1093 1.1.2.2 yamt /* a2 is successor of a1 */ 1094 1.1.2.2 yamt if (a1_lbnum * lb_size + a1_len != a2_lbnum * lb_size) 1095 1.1.2.2 yamt return 1; 1096 1.1.2.2 yamt } 1097 1.1.2.2 yamt 1098 1.1.2.2 yamt /* merge as most from a2 if possible */ 1099 1.1.2.2 yamt merge_len = MIN(a2_len, max_len - a1_len); 1100 1.1.2.2 yamt a1_len += merge_len; 1101 1.1.2.2 yamt a2_len -= merge_len; 1102 1.1.2.2 yamt a2_lbnum += merge_len/lb_size; 1103 1.1.2.2 yamt 1104 1.1.2.2 yamt a1->len = udf_rw32(a1_len | a1_flags); 1105 1.1.2.2 yamt a2->len = udf_rw32(a2_len | a2_flags); 1106 1.1.2.2 yamt a2->loc.lb_num = udf_rw32(a2_lbnum); 1107 1.1.2.2 yamt 1108 1.1.2.2 yamt if (a2_len > 0) 1109 1.1.2.2 yamt return 1; 1110 1.1.2.2 yamt 1111 1.1.2.2 yamt /* there is space over to merge */ 1112 1.1.2.2 yamt return 0; 1113 1.1.2.2 yamt } 1114 1.1.2.2 yamt 1115 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 1116 1.1.2.2 yamt 1117 1.1.2.2 yamt static void 1118 1.1.2.2 yamt udf_wipe_adslots(struct udf_node *udf_node) 1119 1.1.2.2 yamt { 1120 1.1.2.2 yamt struct file_entry *fe; 1121 1.1.2.2 yamt struct extfile_entry *efe; 1122 1.1.2.2 yamt struct alloc_ext_entry *ext; 1123 1.1.2.2 yamt uint64_t inflen, objsize; 1124 1.1.2.2 yamt uint32_t lb_size, dscr_size, l_ea, l_ad, max_l_ad, crclen; 1125 1.1.2.2 yamt uint8_t *data_pos; 1126 1.1.2.2 yamt int extnr; 1127 1.1.2.2 yamt 1128 1.1.2.2 yamt lb_size = udf_rw32(udf_node->ump->logical_vol->lb_size); 1129 1.1.2.2 yamt 1130 1.1.2.2 yamt fe = udf_node->fe; 1131 1.1.2.2 yamt efe = udf_node->efe; 1132 1.1.2.2 yamt if (fe) { 1133 1.1.2.2 yamt inflen = udf_rw64(fe->inf_len); 1134 1.1.2.2 yamt objsize = inflen; 1135 1.1.2.2 yamt dscr_size = sizeof(struct file_entry) -1; 1136 1.1.2.2 yamt l_ea = udf_rw32(fe->l_ea); 1137 1.1.2.2 yamt l_ad = udf_rw32(fe->l_ad); 1138 1.1.2.2 yamt data_pos = (uint8_t *) fe + dscr_size + l_ea; 1139 1.1.2.2 yamt } else { 1140 1.1.2.2 yamt inflen = udf_rw64(efe->inf_len); 1141 1.1.2.2 yamt objsize = udf_rw64(efe->obj_size); 1142 1.1.2.2 yamt dscr_size = sizeof(struct extfile_entry) -1; 1143 1.1.2.2 yamt l_ea = udf_rw32(efe->l_ea); 1144 1.1.2.2 yamt l_ad = udf_rw32(efe->l_ad); 1145 1.1.2.2 yamt data_pos = (uint8_t *) efe + dscr_size + l_ea; 1146 1.1.2.2 yamt } 1147 1.1.2.2 yamt max_l_ad = lb_size - dscr_size - l_ea; 1148 1.1.2.2 yamt 1149 1.1.2.2 yamt /* wipe fe/efe */ 1150 1.1.2.2 yamt memset(data_pos, 0, max_l_ad); 1151 1.1.2.2 yamt crclen = dscr_size - UDF_DESC_TAG_LENGTH + l_ea; 1152 1.1.2.2 yamt if (fe) { 1153 1.1.2.2 yamt fe->l_ad = udf_rw32(0); 1154 1.1.2.2 yamt fe->logblks_rec = udf_rw64(0); 1155 1.1.2.2 yamt fe->tag.desc_crc_len = udf_rw32(crclen); 1156 1.1.2.2 yamt } else { 1157 1.1.2.2 yamt efe->l_ad = udf_rw32(0); 1158 1.1.2.2 yamt efe->logblks_rec = udf_rw64(0); 1159 1.1.2.2 yamt efe->tag.desc_crc_len = udf_rw32(crclen); 1160 1.1.2.2 yamt } 1161 1.1.2.2 yamt 1162 1.1.2.2 yamt /* wipe all allocation extent entries */ 1163 1.1.2.2 yamt for (extnr = 0; extnr < udf_node->num_extensions; extnr++) { 1164 1.1.2.2 yamt ext = udf_node->ext[extnr]; 1165 1.1.2.2 yamt dscr_size = sizeof(struct alloc_ext_entry) -1; 1166 1.1.2.2 yamt max_l_ad = lb_size - dscr_size; 1167 1.1.2.2 yamt memset(data_pos, 0, max_l_ad); 1168 1.1.2.2 yamt ext->l_ad = udf_rw32(0); 1169 1.1.2.2 yamt 1170 1.1.2.2 yamt crclen = dscr_size - UDF_DESC_TAG_LENGTH; 1171 1.1.2.2 yamt ext->tag.desc_crc_len = udf_rw32(crclen); 1172 1.1.2.2 yamt } 1173 1.1.2.2 yamt } 1174 1.1.2.2 yamt 1175 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 1176 1.1.2.2 yamt 1177 1.1.2.2 yamt void 1178 1.1.2.2 yamt udf_get_adslot(struct udf_node *udf_node, int slot, struct long_ad *icb, 1179 1.1.2.2 yamt int *eof) { 1180 1.1.2.2 yamt struct file_entry *fe; 1181 1.1.2.2 yamt struct extfile_entry *efe; 1182 1.1.2.2 yamt struct alloc_ext_entry *ext; 1183 1.1.2.2 yamt struct icb_tag *icbtag; 1184 1.1.2.2 yamt struct short_ad *short_ad; 1185 1.1.2.2 yamt struct long_ad *long_ad; 1186 1.1.2.2 yamt uint32_t offset; 1187 1.1.2.2 yamt uint32_t lb_size, dscr_size, l_ea, l_ad, max_l_ad; 1188 1.1.2.2 yamt uint8_t *data_pos; 1189 1.1.2.2 yamt int icbflags, addr_type, adlen, extnr; 1190 1.1.2.2 yamt 1191 1.1.2.2 yamt /* determine what descriptor we are in */ 1192 1.1.2.2 yamt lb_size = udf_rw32(udf_node->ump->logical_vol->lb_size); 1193 1.1.2.2 yamt 1194 1.1.2.2 yamt fe = udf_node->fe; 1195 1.1.2.2 yamt efe = udf_node->efe; 1196 1.1.2.2 yamt if (fe) { 1197 1.1.2.2 yamt icbtag = &fe->icbtag; 1198 1.1.2.2 yamt dscr_size = sizeof(struct file_entry) -1; 1199 1.1.2.2 yamt l_ea = udf_rw32(fe->l_ea); 1200 1.1.2.2 yamt l_ad = udf_rw32(fe->l_ad); 1201 1.1.2.2 yamt data_pos = (uint8_t *) fe + dscr_size + l_ea; 1202 1.1.2.2 yamt } else { 1203 1.1.2.2 yamt icbtag = &efe->icbtag; 1204 1.1.2.2 yamt dscr_size = sizeof(struct extfile_entry) -1; 1205 1.1.2.2 yamt l_ea = udf_rw32(efe->l_ea); 1206 1.1.2.2 yamt l_ad = udf_rw32(efe->l_ad); 1207 1.1.2.2 yamt data_pos = (uint8_t *) efe + dscr_size + l_ea; 1208 1.1.2.2 yamt } 1209 1.1.2.2 yamt max_l_ad = lb_size - dscr_size - l_ea; 1210 1.1.2.2 yamt 1211 1.1.2.2 yamt icbflags = udf_rw16(icbtag->flags); 1212 1.1.2.2 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 1213 1.1.2.2 yamt 1214 1.1.2.2 yamt /* just in case we're called on an intern, its EOF */ 1215 1.1.2.2 yamt if (addr_type == UDF_ICB_INTERN_ALLOC) { 1216 1.1.2.2 yamt memset(icb, 0, sizeof(struct long_ad)); 1217 1.1.2.2 yamt *eof = 1; 1218 1.1.2.2 yamt return; 1219 1.1.2.2 yamt } 1220 1.1.2.2 yamt 1221 1.1.2.2 yamt adlen = 0; 1222 1.1.2.2 yamt if (addr_type == UDF_ICB_SHORT_ALLOC) { 1223 1.1.2.2 yamt adlen = sizeof(struct short_ad); 1224 1.1.2.2 yamt } else if (addr_type == UDF_ICB_LONG_ALLOC) { 1225 1.1.2.2 yamt adlen = sizeof(struct long_ad); 1226 1.1.2.2 yamt } 1227 1.1.2.2 yamt 1228 1.1.2.2 yamt /* if offset too big, we go to the allocation extensions */ 1229 1.1.2.2 yamt offset = slot * adlen; 1230 1.1.2.2 yamt extnr = 0; 1231 1.1.2.2 yamt while (offset > max_l_ad) { 1232 1.1.2.2 yamt offset -= max_l_ad; 1233 1.1.2.2 yamt ext = udf_node->ext[extnr]; 1234 1.1.2.2 yamt dscr_size = sizeof(struct alloc_ext_entry) -1; 1235 1.1.2.2 yamt l_ad = udf_rw32(ext->l_ad); 1236 1.1.2.2 yamt max_l_ad = lb_size - dscr_size; 1237 1.1.2.2 yamt data_pos = (uint8_t *) ext + dscr_size + l_ea; 1238 1.1.2.2 yamt extnr++; 1239 1.1.2.2 yamt if (extnr > udf_node->num_extensions) { 1240 1.1.2.2 yamt l_ad = 0; /* force EOF */ 1241 1.1.2.2 yamt break; 1242 1.1.2.2 yamt } 1243 1.1.2.2 yamt } 1244 1.1.2.2 yamt 1245 1.1.2.2 yamt *eof = (offset >= l_ad) || (l_ad == 0); 1246 1.1.2.2 yamt if (*eof) { 1247 1.1.2.2 yamt memset(icb, 0, sizeof(struct long_ad)); 1248 1.1.2.2 yamt return; 1249 1.1.2.2 yamt } 1250 1.1.2.2 yamt 1251 1.1.2.2 yamt /* get the element */ 1252 1.1.2.2 yamt if (addr_type == UDF_ICB_SHORT_ALLOC) { 1253 1.1.2.2 yamt short_ad = (struct short_ad *) (data_pos + offset); 1254 1.1.2.2 yamt icb->len = short_ad->len; 1255 1.1.2.2 yamt icb->loc.part_num = udf_rw16(0); /* ignore */ 1256 1.1.2.2 yamt icb->loc.lb_num = short_ad->lb_num; 1257 1.1.2.2 yamt } else if (addr_type == UDF_ICB_LONG_ALLOC) { 1258 1.1.2.2 yamt long_ad = (struct long_ad *) (data_pos + offset); 1259 1.1.2.2 yamt *icb = *long_ad; 1260 1.1.2.2 yamt } 1261 1.1.2.2 yamt } 1262 1.1.2.2 yamt 1263 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 1264 1.1.2.2 yamt 1265 1.1.2.2 yamt int 1266 1.1.2.2 yamt udf_append_adslot(struct udf_node *udf_node, int slot, struct long_ad *icb) { 1267 1.1.2.2 yamt union dscrptr *dscr; 1268 1.1.2.2 yamt struct file_entry *fe; 1269 1.1.2.2 yamt struct extfile_entry *efe; 1270 1.1.2.2 yamt struct alloc_ext_entry *ext; 1271 1.1.2.2 yamt struct icb_tag *icbtag; 1272 1.1.2.2 yamt struct short_ad *short_ad; 1273 1.1.2.2 yamt struct long_ad *long_ad, o_icb; 1274 1.1.2.2 yamt uint64_t logblks_rec, *logblks_rec_p; 1275 1.1.2.2 yamt uint32_t offset, rest, len; 1276 1.1.2.2 yamt uint32_t lb_size, dscr_size, l_ea, l_ad, *l_ad_p, max_l_ad, crclen; 1277 1.1.2.2 yamt uint8_t *data_pos; 1278 1.1.2.2 yamt int icbflags, addr_type, adlen, extnr; 1279 1.1.2.2 yamt 1280 1.1.2.2 yamt /* determine what descriptor we are in */ 1281 1.1.2.2 yamt lb_size = udf_rw32(udf_node->ump->logical_vol->lb_size); 1282 1.1.2.2 yamt 1283 1.1.2.2 yamt fe = udf_node->fe; 1284 1.1.2.2 yamt efe = udf_node->efe; 1285 1.1.2.2 yamt if (fe) { 1286 1.1.2.2 yamt icbtag = &fe->icbtag; 1287 1.1.2.2 yamt dscr = (union dscrptr *) fe; 1288 1.1.2.2 yamt dscr_size = sizeof(struct file_entry) -1; 1289 1.1.2.2 yamt 1290 1.1.2.2 yamt l_ea = udf_rw32(fe->l_ea); 1291 1.1.2.2 yamt l_ad_p = &fe->l_ad; 1292 1.1.2.2 yamt logblks_rec_p = &fe->logblks_rec; 1293 1.1.2.2 yamt } else { 1294 1.1.2.2 yamt icbtag = &efe->icbtag; 1295 1.1.2.2 yamt dscr = (union dscrptr *) efe; 1296 1.1.2.2 yamt dscr_size = sizeof(struct extfile_entry) -1; 1297 1.1.2.2 yamt 1298 1.1.2.2 yamt l_ea = udf_rw32(efe->l_ea); 1299 1.1.2.2 yamt l_ad_p = &efe->l_ad; 1300 1.1.2.2 yamt logblks_rec_p = &efe->logblks_rec; 1301 1.1.2.2 yamt } 1302 1.1.2.2 yamt data_pos = (uint8_t *) dscr + dscr_size + l_ea; 1303 1.1.2.2 yamt max_l_ad = lb_size - dscr_size - l_ea; 1304 1.1.2.2 yamt 1305 1.1.2.2 yamt icbflags = udf_rw16(icbtag->flags); 1306 1.1.2.2 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 1307 1.1.2.2 yamt 1308 1.1.2.2 yamt /* just in case we're called on an intern, its EOF */ 1309 1.1.2.2 yamt if (addr_type == UDF_ICB_INTERN_ALLOC) { 1310 1.1.2.2 yamt panic("udf_append_adslot on UDF_ICB_INTERN_ALLOC\n"); 1311 1.1.2.2 yamt } 1312 1.1.2.2 yamt 1313 1.1.2.2 yamt adlen = 0; 1314 1.1.2.2 yamt if (addr_type == UDF_ICB_SHORT_ALLOC) { 1315 1.1.2.2 yamt adlen = sizeof(struct short_ad); 1316 1.1.2.2 yamt } else if (addr_type == UDF_ICB_LONG_ALLOC) { 1317 1.1.2.2 yamt adlen = sizeof(struct long_ad); 1318 1.1.2.2 yamt } 1319 1.1.2.2 yamt 1320 1.1.2.2 yamt /* if offset too big, we go to the allocation extensions */ 1321 1.1.2.2 yamt offset = slot * adlen; 1322 1.1.2.2 yamt extnr = 0; 1323 1.1.2.2 yamt while (offset > max_l_ad) { 1324 1.1.2.2 yamt offset -= max_l_ad; 1325 1.1.2.2 yamt ext = udf_node->ext[extnr]; 1326 1.1.2.2 yamt dscr = (union dscrptr *) ext; 1327 1.1.2.2 yamt dscr_size = sizeof(struct alloc_ext_entry) -1; 1328 1.1.2.2 yamt 1329 1.1.2.2 yamt KASSERT(ext != NULL); 1330 1.1.2.2 yamt l_ad_p = &ext->l_ad; 1331 1.1.2.2 yamt max_l_ad = lb_size - dscr_size; 1332 1.1.2.2 yamt data_pos = (uint8_t *) dscr + dscr_size; 1333 1.1.2.2 yamt 1334 1.1.2.2 yamt extnr++; 1335 1.1.2.2 yamt } 1336 1.1.2.2 yamt /* offset is offset within the current (E)FE/AED */ 1337 1.1.2.2 yamt l_ad = udf_rw32(*l_ad_p); 1338 1.1.2.2 yamt crclen = udf_rw32(dscr->tag.desc_crc_len); 1339 1.1.2.2 yamt logblks_rec = udf_rw64(*logblks_rec_p); 1340 1.1.2.2 yamt 1341 1.1.2.2 yamt if (extnr > udf_node->num_extensions) 1342 1.1.2.2 yamt return EFBIG; /* too fragmented */ 1343 1.1.2.2 yamt 1344 1.1.2.2 yamt /* overwriting old piece? */ 1345 1.1.2.2 yamt if (offset < l_ad) { 1346 1.1.2.2 yamt /* overwrite entry; compensate for the old element */ 1347 1.1.2.2 yamt if (addr_type == UDF_ICB_SHORT_ALLOC) { 1348 1.1.2.2 yamt short_ad = (struct short_ad *) (data_pos + offset); 1349 1.1.2.2 yamt o_icb.len = short_ad->len; 1350 1.1.2.2 yamt o_icb.loc.part_num = udf_rw16(0); /* ignore */ 1351 1.1.2.2 yamt o_icb.loc.lb_num = short_ad->lb_num; 1352 1.1.2.2 yamt } else if (addr_type == UDF_ICB_LONG_ALLOC) { 1353 1.1.2.2 yamt long_ad = (struct long_ad *) (data_pos + offset); 1354 1.1.2.2 yamt o_icb = *long_ad; 1355 1.1.2.2 yamt } else { 1356 1.1.2.2 yamt panic("Invalid address type in udf_append_adslot\n"); 1357 1.1.2.2 yamt } 1358 1.1.2.2 yamt 1359 1.1.2.2 yamt len = udf_rw32(o_icb.len); 1360 1.1.2.2 yamt if (UDF_EXT_FLAGS(len) == UDF_EXT_ALLOCATED) { 1361 1.1.2.2 yamt /* adjust counts */ 1362 1.1.2.2 yamt len = UDF_EXT_LEN(len); 1363 1.1.2.2 yamt logblks_rec -= (len + lb_size -1) / lb_size; 1364 1.1.2.2 yamt } 1365 1.1.2.2 yamt } 1366 1.1.2.2 yamt 1367 1.1.2.2 yamt /* calculate rest space in this descriptor */ 1368 1.1.2.2 yamt rest = max_l_ad - offset; 1369 1.1.2.2 yamt if (rest <= adlen) { 1370 1.1.2.2 yamt /* create redirect and link new allocation extension */ 1371 1.1.2.2 yamt printf("udf_append_to_adslot: can't create allocation extention yet\n"); 1372 1.1.2.2 yamt return EFBIG; 1373 1.1.2.2 yamt } 1374 1.1.2.2 yamt 1375 1.1.2.2 yamt /* write out the element */ 1376 1.1.2.2 yamt if (addr_type == UDF_ICB_SHORT_ALLOC) { 1377 1.1.2.2 yamt short_ad = (struct short_ad *) (data_pos + offset); 1378 1.1.2.2 yamt short_ad->len = icb->len; 1379 1.1.2.2 yamt short_ad->lb_num = icb->loc.lb_num; 1380 1.1.2.2 yamt } else if (addr_type == UDF_ICB_LONG_ALLOC) { 1381 1.1.2.2 yamt long_ad = (struct long_ad *) (data_pos + offset); 1382 1.1.2.2 yamt *long_ad = *icb; 1383 1.1.2.2 yamt } 1384 1.1.2.2 yamt 1385 1.1.2.2 yamt /* adjust logblks recorded count */ 1386 1.1.2.2 yamt if (UDF_EXT_FLAGS(icb->len) == UDF_EXT_ALLOCATED) 1387 1.1.2.2 yamt logblks_rec += (UDF_EXT_LEN(icb->len) + lb_size -1) / lb_size; 1388 1.1.2.2 yamt *logblks_rec_p = udf_rw64(logblks_rec); 1389 1.1.2.2 yamt 1390 1.1.2.2 yamt /* adjust l_ad and crclen when needed */ 1391 1.1.2.2 yamt if (offset >= l_ad) { 1392 1.1.2.2 yamt l_ad += adlen; 1393 1.1.2.2 yamt crclen += adlen; 1394 1.1.2.2 yamt dscr->tag.desc_crc_len = udf_rw32(crclen); 1395 1.1.2.2 yamt *l_ad_p = udf_rw32(l_ad); 1396 1.1.2.2 yamt } 1397 1.1.2.2 yamt 1398 1.1.2.2 yamt return 0; 1399 1.1.2.2 yamt } 1400 1.1.2.2 yamt 1401 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 1402 1.1.2.2 yamt 1403 1.1.2.2 yamt /* 1404 1.1.2.2 yamt * Adjust the node's allocation descriptors to reflect the new mapping; do 1405 1.1.2.2 yamt * take note that we might glue to existing allocation descriptors. 1406 1.1.2.2 yamt * 1407 1.1.2.2 yamt * XXX Note there can only be one allocation being recorded/mount; maybe 1408 1.1.2.2 yamt * explicit allocation in shedule thread? 1409 1.1.2.2 yamt */ 1410 1.1.2.2 yamt 1411 1.1.2.2 yamt static void 1412 1.1.2.2 yamt udf_record_allocation_in_node(struct udf_mount *ump, struct buf *buf, 1413 1.1.2.2 yamt uint16_t vpart_num, uint64_t *mapping, struct long_ad *node_ad_cpy) 1414 1.1.2.2 yamt { 1415 1.1.2.2 yamt struct vnode *vp = buf->b_vp; 1416 1.1.2.2 yamt struct udf_node *udf_node = VTOI(vp); 1417 1.1.2.2 yamt struct file_entry *fe; 1418 1.1.2.2 yamt struct extfile_entry *efe; 1419 1.1.2.2 yamt struct icb_tag *icbtag; 1420 1.1.2.2 yamt struct long_ad s_ad, c_ad; 1421 1.1.2.2 yamt uint64_t inflen, from, till; 1422 1.1.2.2 yamt uint64_t foffset, end_foffset, restart_foffset; 1423 1.1.2.2 yamt uint64_t orig_inflen, orig_lbrec, new_inflen, new_lbrec; 1424 1.1.2.2 yamt uint32_t num_lb, len, flags, lb_num; 1425 1.1.2.2 yamt uint32_t run_start; 1426 1.1.2.2 yamt uint32_t slot_offset; 1427 1.1.2.2 yamt uint32_t skip_len, skipped; 1428 1.1.2.2 yamt int addr_type, icbflags; 1429 1.1.2.2 yamt int udf_c_type = buf->b_udf_c_type; 1430 1.1.2.2 yamt int lb_size, run_length, eof; 1431 1.1.2.2 yamt int slot, cpy_slot, cpy_slots, restart_slot; 1432 1.1.2.2 yamt int error; 1433 1.1.2.2 yamt 1434 1.1.2.2 yamt DPRINTF(ALLOC, ("udf_record_allocation_in_node\n")); 1435 1.1.2.2 yamt udf_node_sanity_check(udf_node, &orig_inflen, &orig_lbrec); 1436 1.1.2.2 yamt 1437 1.1.2.2 yamt /* sanity check ... should be panic ? */ 1438 1.1.2.2 yamt if ((udf_c_type != UDF_C_USERDATA) && (udf_c_type != UDF_C_FIDS)) 1439 1.1.2.2 yamt return; 1440 1.1.2.2 yamt 1441 1.1.2.2 yamt lb_size = udf_rw32(udf_node->ump->logical_vol->lb_size); 1442 1.1.2.2 yamt 1443 1.1.2.2 yamt /* do the job */ 1444 1.1.2.2 yamt UDF_LOCK_NODE(udf_node, 0); /* XXX can deadlock ? */ 1445 1.1.2.2 yamt 1446 1.1.2.2 yamt fe = udf_node->fe; 1447 1.1.2.2 yamt efe = udf_node->efe; 1448 1.1.2.2 yamt if (fe) { 1449 1.1.2.2 yamt icbtag = &fe->icbtag; 1450 1.1.2.2 yamt inflen = udf_rw64(fe->inf_len); 1451 1.1.2.2 yamt } else { 1452 1.1.2.2 yamt icbtag = &efe->icbtag; 1453 1.1.2.2 yamt inflen = udf_rw64(efe->inf_len); 1454 1.1.2.2 yamt } 1455 1.1.2.2 yamt 1456 1.1.2.2 yamt /* do check if `till' is not past file information length */ 1457 1.1.2.2 yamt from = buf->b_lblkno * lb_size; 1458 1.1.2.2 yamt till = MIN(inflen, from + buf->b_resid); 1459 1.1.2.2 yamt 1460 1.1.2.2 yamt num_lb = (till - from + lb_size -1) / lb_size; 1461 1.1.2.2 yamt 1462 1.1.2.2 yamt DPRINTF(ALLOC, ("record allocation from = %"PRIu64" + %d\n", from, buf->b_bcount)); 1463 1.1.2.2 yamt 1464 1.1.2.2 yamt icbflags = udf_rw16(icbtag->flags); 1465 1.1.2.2 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 1466 1.1.2.2 yamt 1467 1.1.2.2 yamt if (addr_type == UDF_ICB_INTERN_ALLOC) { 1468 1.1.2.2 yamt /* nothing to do */ 1469 1.1.2.2 yamt /* XXX clean up rest of node? just in case? */ 1470 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 1471 1.1.2.2 yamt return; 1472 1.1.2.2 yamt } 1473 1.1.2.2 yamt 1474 1.1.2.2 yamt slot = 0; 1475 1.1.2.2 yamt cpy_slot = 0; 1476 1.1.2.2 yamt foffset = 0; 1477 1.1.2.2 yamt 1478 1.1.2.2 yamt /* 1) copy till first overlap piece to the rewrite buffer */ 1479 1.1.2.2 yamt for (;;) { 1480 1.1.2.2 yamt udf_get_adslot(udf_node, slot, &s_ad, &eof); 1481 1.1.2.2 yamt if (eof) { 1482 1.1.2.2 yamt DPRINTF(WRITE, 1483 1.1.2.2 yamt ("Record allocation in node " 1484 1.1.2.2 yamt "failed: encountered EOF\n")); 1485 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 1486 1.1.2.2 yamt buf->b_error = EINVAL; 1487 1.1.2.2 yamt return; 1488 1.1.2.2 yamt } 1489 1.1.2.2 yamt len = udf_rw32(s_ad.len); 1490 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 1491 1.1.2.2 yamt len = UDF_EXT_LEN(len); 1492 1.1.2.2 yamt 1493 1.1.2.2 yamt if (flags == UDF_EXT_REDIRECT) { 1494 1.1.2.2 yamt slot++; 1495 1.1.2.2 yamt continue; 1496 1.1.2.2 yamt } 1497 1.1.2.2 yamt 1498 1.1.2.2 yamt end_foffset = foffset + len; 1499 1.1.2.2 yamt if (end_foffset > from) 1500 1.1.2.2 yamt break; /* found */ 1501 1.1.2.2 yamt 1502 1.1.2.2 yamt node_ad_cpy[cpy_slot++] = s_ad; 1503 1.1.2.2 yamt 1504 1.1.2.2 yamt DPRINTF(ALLOC, ("\t1: vp %d, lb %d, len %d, flags %d " 1505 1.1.2.2 yamt "-> stack\n", 1506 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), 1507 1.1.2.2 yamt udf_rw32(s_ad.loc.lb_num), 1508 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 1509 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 1510 1.1.2.2 yamt 1511 1.1.2.2 yamt foffset = end_foffset; 1512 1.1.2.2 yamt slot++; 1513 1.1.2.2 yamt } 1514 1.1.2.2 yamt restart_slot = slot; 1515 1.1.2.2 yamt restart_foffset = foffset; 1516 1.1.2.2 yamt 1517 1.1.2.2 yamt /* 2) trunc overlapping slot at overlap and copy it */ 1518 1.1.2.2 yamt slot_offset = from - foffset; 1519 1.1.2.2 yamt if (slot_offset > 0) { 1520 1.1.2.2 yamt DPRINTF(ALLOC, ("\tslot_offset = %d, flags = %d (%d)\n", 1521 1.1.2.2 yamt slot_offset, flags >> 30, flags)); 1522 1.1.2.2 yamt 1523 1.1.2.2 yamt s_ad.len = udf_rw32(slot_offset | flags); 1524 1.1.2.2 yamt node_ad_cpy[cpy_slot++] = s_ad; 1525 1.1.2.2 yamt 1526 1.1.2.2 yamt DPRINTF(ALLOC, ("\t2: vp %d, lb %d, len %d, flags %d " 1527 1.1.2.2 yamt "-> stack\n", 1528 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), 1529 1.1.2.2 yamt udf_rw32(s_ad.loc.lb_num), 1530 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 1531 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 1532 1.1.2.2 yamt } 1533 1.1.2.2 yamt foffset += slot_offset; 1534 1.1.2.2 yamt 1535 1.1.2.2 yamt /* 3) insert new mappings */ 1536 1.1.2.2 yamt memset(&s_ad, 0, sizeof(struct long_ad)); 1537 1.1.2.2 yamt lb_num = 0; 1538 1.1.2.2 yamt for (lb_num = 0; lb_num < num_lb; lb_num++) { 1539 1.1.2.2 yamt run_start = mapping[lb_num]; 1540 1.1.2.2 yamt run_length = 1; 1541 1.1.2.2 yamt while (lb_num < num_lb-1) { 1542 1.1.2.2 yamt if (mapping[lb_num+1] != mapping[lb_num]+1) 1543 1.1.2.2 yamt if (mapping[lb_num+1] != mapping[lb_num]) 1544 1.1.2.2 yamt break; 1545 1.1.2.2 yamt run_length++; 1546 1.1.2.2 yamt lb_num++; 1547 1.1.2.2 yamt } 1548 1.1.2.2 yamt /* insert slot for this mapping */ 1549 1.1.2.2 yamt len = run_length * lb_size; 1550 1.1.2.2 yamt 1551 1.1.2.2 yamt /* bounds checking */ 1552 1.1.2.2 yamt if (foffset + len > till) 1553 1.1.2.2 yamt len = till - foffset; 1554 1.1.2.2 yamt KASSERT(foffset + len <= inflen); 1555 1.1.2.2 yamt 1556 1.1.2.2 yamt s_ad.len = udf_rw32(len | UDF_EXT_ALLOCATED); 1557 1.1.2.2 yamt s_ad.loc.part_num = udf_rw16(vpart_num); 1558 1.1.2.2 yamt s_ad.loc.lb_num = udf_rw32(run_start); 1559 1.1.2.2 yamt 1560 1.1.2.2 yamt foffset += len; 1561 1.1.2.2 yamt 1562 1.1.2.2 yamt /* paranoia */ 1563 1.1.2.2 yamt if (len == 0) { 1564 1.1.2.2 yamt DPRINTF(WRITE, 1565 1.1.2.2 yamt ("Record allocation in node " 1566 1.1.2.2 yamt "failed: insert failed\n")); 1567 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 1568 1.1.2.2 yamt buf->b_error = EINVAL; 1569 1.1.2.2 yamt return; 1570 1.1.2.2 yamt } 1571 1.1.2.2 yamt node_ad_cpy[cpy_slot++] = s_ad; 1572 1.1.2.2 yamt 1573 1.1.2.2 yamt DPRINTF(ALLOC, ("\t3: insert new mapping vp %d lb %d, len %d, " 1574 1.1.2.2 yamt "flags %d -> stack\n", 1575 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), udf_rw32(s_ad.loc.lb_num), 1576 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 1577 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 1578 1.1.2.2 yamt } 1579 1.1.2.2 yamt 1580 1.1.2.2 yamt /* 4) pop replaced length */ 1581 1.1.2.2 yamt slot = restart_slot; 1582 1.1.2.2 yamt foffset = restart_foffset; 1583 1.1.2.2 yamt 1584 1.1.2.2 yamt skip_len = till - foffset; /* relative to start of slot */ 1585 1.1.2.2 yamt slot_offset = from - foffset; 1586 1.1.2.2 yamt for (;;) { 1587 1.1.2.2 yamt udf_get_adslot(udf_node, slot, &s_ad, &eof); 1588 1.1.2.2 yamt if (eof) 1589 1.1.2.2 yamt break; 1590 1.1.2.2 yamt 1591 1.1.2.2 yamt len = udf_rw32(s_ad.len); 1592 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 1593 1.1.2.2 yamt len = UDF_EXT_LEN(len); 1594 1.1.2.2 yamt lb_num = udf_rw32(s_ad.loc.lb_num); 1595 1.1.2.2 yamt 1596 1.1.2.2 yamt if (flags == UDF_EXT_REDIRECT) { 1597 1.1.2.2 yamt slot++; 1598 1.1.2.2 yamt continue; 1599 1.1.2.2 yamt } 1600 1.1.2.2 yamt 1601 1.1.2.2 yamt DPRINTF(ALLOC, ("\t4i: got slot %d, skip_len %d, vp %d, " 1602 1.1.2.2 yamt "lb %d, len %d, flags %d\n", 1603 1.1.2.2 yamt slot, skip_len, udf_rw16(s_ad.loc.part_num), 1604 1.1.2.2 yamt udf_rw32(s_ad.loc.lb_num), 1605 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 1606 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 1607 1.1.2.2 yamt 1608 1.1.2.2 yamt skipped = MIN(len, skip_len); 1609 1.1.2.2 yamt if (flags != UDF_EXT_FREE) { 1610 1.1.2.2 yamt if (slot_offset) { 1611 1.1.2.2 yamt /* skip these blocks first */ 1612 1.1.2.2 yamt num_lb = (slot_offset + lb_size-1) / lb_size; 1613 1.1.2.2 yamt len -= slot_offset; 1614 1.1.2.2 yamt skip_len -= slot_offset; 1615 1.1.2.2 yamt foffset += slot_offset; 1616 1.1.2.2 yamt lb_num += num_lb; 1617 1.1.2.2 yamt skipped -= slot_offset; 1618 1.1.2.2 yamt slot_offset = 0; 1619 1.1.2.2 yamt } 1620 1.1.2.2 yamt /* free space from current position till `skipped' */ 1621 1.1.2.2 yamt num_lb = (skipped + lb_size-1) / lb_size; 1622 1.1.2.2 yamt udf_free_allocated_space(ump, lb_num, 1623 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), num_lb); 1624 1.1.2.2 yamt lb_num += num_lb; 1625 1.1.2.2 yamt } 1626 1.1.2.2 yamt len -= skipped; 1627 1.1.2.2 yamt skip_len -= skipped; 1628 1.1.2.2 yamt foffset += skipped; 1629 1.1.2.2 yamt 1630 1.1.2.2 yamt if (len) { 1631 1.1.2.2 yamt KASSERT(skipped % lb_size == 0); 1632 1.1.2.2 yamt 1633 1.1.2.2 yamt /* we arrived at our point, push remainder */ 1634 1.1.2.2 yamt s_ad.len = udf_rw32(len | flags); 1635 1.1.2.2 yamt s_ad.loc.lb_num = udf_rw32(lb_num); 1636 1.1.2.2 yamt node_ad_cpy[cpy_slot++] = s_ad; 1637 1.1.2.2 yamt foffset += len; 1638 1.1.2.2 yamt slot++; 1639 1.1.2.2 yamt 1640 1.1.2.2 yamt DPRINTF(ALLOC, ("\t4: vp %d, lb %d, len %d, flags %d " 1641 1.1.2.2 yamt "-> stack\n", 1642 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), 1643 1.1.2.2 yamt udf_rw32(s_ad.loc.lb_num), 1644 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 1645 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 1646 1.1.2.2 yamt break; 1647 1.1.2.2 yamt } 1648 1.1.2.2 yamt slot++; 1649 1.1.2.2 yamt } 1650 1.1.2.2 yamt 1651 1.1.2.2 yamt /* 5) copy remainder */ 1652 1.1.2.2 yamt for (;;) { 1653 1.1.2.2 yamt udf_get_adslot(udf_node, slot, &s_ad, &eof); 1654 1.1.2.2 yamt if (eof) 1655 1.1.2.2 yamt break; 1656 1.1.2.2 yamt 1657 1.1.2.2 yamt len = udf_rw32(s_ad.len); 1658 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 1659 1.1.2.2 yamt len = UDF_EXT_LEN(len); 1660 1.1.2.2 yamt 1661 1.1.2.2 yamt if (flags == UDF_EXT_REDIRECT) { 1662 1.1.2.2 yamt slot++; 1663 1.1.2.2 yamt continue; 1664 1.1.2.2 yamt } 1665 1.1.2.2 yamt 1666 1.1.2.2 yamt node_ad_cpy[cpy_slot++] = s_ad; 1667 1.1.2.2 yamt 1668 1.1.2.2 yamt DPRINTF(ALLOC, ("\t5: insert new mapping " 1669 1.1.2.2 yamt "vp %d lb %d, len %d, flags %d " 1670 1.1.2.2 yamt "-> stack\n", 1671 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), 1672 1.1.2.2 yamt udf_rw32(s_ad.loc.lb_num), 1673 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 1674 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 1675 1.1.2.2 yamt 1676 1.1.2.2 yamt slot++; 1677 1.1.2.2 yamt } 1678 1.1.2.2 yamt 1679 1.1.2.2 yamt /* 6) reset node descriptors */ 1680 1.1.2.2 yamt udf_wipe_adslots(udf_node); 1681 1.1.2.2 yamt 1682 1.1.2.2 yamt /* 7) copy back extents; merge when possible. Recounting on the fly */ 1683 1.1.2.2 yamt cpy_slots = cpy_slot; 1684 1.1.2.2 yamt 1685 1.1.2.2 yamt c_ad = node_ad_cpy[0]; 1686 1.1.2.2 yamt slot = 0; 1687 1.1.2.2 yamt DPRINTF(ALLOC, ("\t7s: stack -> got mapping vp %d " 1688 1.1.2.2 yamt "lb %d, len %d, flags %d\n", 1689 1.1.2.2 yamt udf_rw16(c_ad.loc.part_num), 1690 1.1.2.2 yamt udf_rw32(c_ad.loc.lb_num), 1691 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(c_ad.len)), 1692 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(c_ad.len)) >> 30)); 1693 1.1.2.2 yamt 1694 1.1.2.2 yamt for (cpy_slot = 1; cpy_slot < cpy_slots; cpy_slot++) { 1695 1.1.2.2 yamt s_ad = node_ad_cpy[cpy_slot]; 1696 1.1.2.2 yamt 1697 1.1.2.2 yamt DPRINTF(ALLOC, ("\t7i: stack -> got mapping vp %d " 1698 1.1.2.2 yamt "lb %d, len %d, flags %d\n", 1699 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), 1700 1.1.2.2 yamt udf_rw32(s_ad.loc.lb_num), 1701 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 1702 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 1703 1.1.2.2 yamt 1704 1.1.2.2 yamt /* see if we can merge */ 1705 1.1.2.2 yamt if (udf_ads_merge(lb_size, &c_ad, &s_ad)) { 1706 1.1.2.2 yamt /* not mergable (anymore) */ 1707 1.1.2.2 yamt DPRINTF(ALLOC, ("\t7: appending vp %d lb %d, " 1708 1.1.2.2 yamt "len %d, flags %d\n", 1709 1.1.2.2 yamt udf_rw16(c_ad.loc.part_num), 1710 1.1.2.2 yamt udf_rw32(c_ad.loc.lb_num), 1711 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(c_ad.len)), 1712 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(c_ad.len)) >> 30)); 1713 1.1.2.2 yamt 1714 1.1.2.2 yamt error = udf_append_adslot(udf_node, slot, &c_ad); 1715 1.1.2.2 yamt if (error) { 1716 1.1.2.2 yamt buf->b_error = error; 1717 1.1.2.2 yamt goto out; 1718 1.1.2.2 yamt } 1719 1.1.2.2 yamt c_ad = s_ad; 1720 1.1.2.2 yamt slot++; 1721 1.1.2.2 yamt } 1722 1.1.2.2 yamt } 1723 1.1.2.2 yamt 1724 1.1.2.2 yamt /* 8) push rest slot (if any) */ 1725 1.1.2.2 yamt if (UDF_EXT_LEN(c_ad.len) > 0) { 1726 1.1.2.2 yamt DPRINTF(ALLOC, ("\t8: last append vp %d lb %d, " 1727 1.1.2.2 yamt "len %d, flags %d\n", 1728 1.1.2.2 yamt udf_rw16(c_ad.loc.part_num), 1729 1.1.2.2 yamt udf_rw32(c_ad.loc.lb_num), 1730 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(c_ad.len)), 1731 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(c_ad.len)) >> 30)); 1732 1.1.2.2 yamt 1733 1.1.2.2 yamt error = udf_append_adslot(udf_node, slot, &c_ad); 1734 1.1.2.2 yamt if (error) { 1735 1.1.2.2 yamt buf->b_error = error; 1736 1.1.2.2 yamt goto out; 1737 1.1.2.2 yamt } 1738 1.1.2.2 yamt } 1739 1.1.2.2 yamt 1740 1.1.2.2 yamt out: 1741 1.1.2.2 yamt /* the node's descriptors should now be sane */ 1742 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 1743 1.1.2.2 yamt 1744 1.1.2.2 yamt udf_node_sanity_check(udf_node, &new_inflen, &new_lbrec); 1745 1.1.2.2 yamt 1746 1.1.2.2 yamt KASSERT(orig_inflen == new_inflen); 1747 1.1.2.2 yamt KASSERT(new_lbrec >= orig_lbrec); 1748 1.1.2.2 yamt 1749 1.1.2.2 yamt return; 1750 1.1.2.2 yamt } 1751 1.1.2.2 yamt 1752 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 1753 1.1.2.2 yamt 1754 1.1.2.2 yamt int 1755 1.1.2.2 yamt udf_grow_node(struct udf_node *udf_node, uint64_t new_size) 1756 1.1.2.2 yamt { 1757 1.1.2.2 yamt union dscrptr *dscr; 1758 1.1.2.2 yamt struct vnode *vp = udf_node->vnode; 1759 1.1.2.2 yamt struct udf_mount *ump = udf_node->ump; 1760 1.1.2.2 yamt struct file_entry *fe; 1761 1.1.2.2 yamt struct extfile_entry *efe; 1762 1.1.2.2 yamt struct icb_tag *icbtag; 1763 1.1.2.2 yamt struct long_ad c_ad, s_ad; 1764 1.1.2.2 yamt uint64_t size_diff, old_size, inflen, objsize, chunk, append_len; 1765 1.1.2.2 yamt uint64_t foffset, end_foffset; 1766 1.1.2.2 yamt uint64_t orig_inflen, orig_lbrec, new_inflen, new_lbrec; 1767 1.1.2.2 yamt uint32_t lb_size, dscr_size, crclen, lastblock_grow; 1768 1.1.2.2 yamt uint32_t len, flags, max_len; 1769 1.1.2.2 yamt uint32_t max_l_ad, l_ad, l_ea; 1770 1.1.2.2 yamt uint8_t *data_pos, *evacuated_data; 1771 1.1.2.2 yamt int icbflags, addr_type; 1772 1.1.2.2 yamt int slot, cpy_slot; 1773 1.1.2.2 yamt int eof, error; 1774 1.1.2.2 yamt 1775 1.1.2.2 yamt DPRINTF(ALLOC, ("udf_grow_node\n")); 1776 1.1.2.2 yamt udf_node_sanity_check(udf_node, &orig_inflen, &orig_lbrec); 1777 1.1.2.2 yamt 1778 1.1.2.2 yamt UDF_LOCK_NODE(udf_node, 0); 1779 1.1.2.2 yamt lb_size = udf_rw32(ump->logical_vol->lb_size); 1780 1.1.2.2 yamt max_len = ((UDF_EXT_MAXLEN / lb_size) * lb_size); 1781 1.1.2.2 yamt 1782 1.1.2.2 yamt fe = udf_node->fe; 1783 1.1.2.2 yamt efe = udf_node->efe; 1784 1.1.2.2 yamt if (fe) { 1785 1.1.2.2 yamt dscr = (union dscrptr *) fe; 1786 1.1.2.2 yamt icbtag = &fe->icbtag; 1787 1.1.2.2 yamt inflen = udf_rw64(fe->inf_len); 1788 1.1.2.2 yamt objsize = inflen; 1789 1.1.2.2 yamt dscr_size = sizeof(struct file_entry) -1; 1790 1.1.2.2 yamt l_ea = udf_rw32(fe->l_ea); 1791 1.1.2.2 yamt l_ad = udf_rw32(fe->l_ad); 1792 1.1.2.2 yamt } else { 1793 1.1.2.2 yamt dscr = (union dscrptr *) efe; 1794 1.1.2.2 yamt icbtag = &efe->icbtag; 1795 1.1.2.2 yamt inflen = udf_rw64(efe->inf_len); 1796 1.1.2.2 yamt objsize = udf_rw64(efe->obj_size); 1797 1.1.2.2 yamt dscr_size = sizeof(struct extfile_entry) -1; 1798 1.1.2.2 yamt l_ea = udf_rw32(efe->l_ea); 1799 1.1.2.2 yamt l_ad = udf_rw32(efe->l_ad); 1800 1.1.2.2 yamt } 1801 1.1.2.2 yamt data_pos = (uint8_t *) dscr + dscr_size + l_ea; 1802 1.1.2.2 yamt max_l_ad = lb_size - dscr_size - l_ea; 1803 1.1.2.2 yamt 1804 1.1.2.2 yamt icbflags = udf_rw16(icbtag->flags); 1805 1.1.2.2 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 1806 1.1.2.2 yamt 1807 1.1.2.2 yamt old_size = inflen; 1808 1.1.2.2 yamt size_diff = new_size - old_size; 1809 1.1.2.2 yamt 1810 1.1.2.2 yamt DPRINTF(ALLOC, ("\tfrom %"PRIu64" to %"PRIu64"\n", old_size, new_size)); 1811 1.1.2.2 yamt 1812 1.1.2.2 yamt evacuated_data = NULL; 1813 1.1.2.2 yamt if (addr_type == UDF_ICB_INTERN_ALLOC) { 1814 1.1.2.2 yamt if (l_ad + size_diff <= max_l_ad) { 1815 1.1.2.2 yamt /* only reflect size change directly in the node */ 1816 1.1.2.2 yamt inflen += size_diff; 1817 1.1.2.2 yamt objsize += size_diff; 1818 1.1.2.2 yamt l_ad += size_diff; 1819 1.1.2.2 yamt crclen = dscr_size - UDF_DESC_TAG_LENGTH + l_ea + l_ad; 1820 1.1.2.2 yamt if (fe) { 1821 1.1.2.2 yamt fe->inf_len = udf_rw64(inflen); 1822 1.1.2.2 yamt fe->l_ad = udf_rw32(l_ad); 1823 1.1.2.2 yamt fe->tag.desc_crc_len = udf_rw32(crclen); 1824 1.1.2.2 yamt } else { 1825 1.1.2.2 yamt efe->inf_len = udf_rw64(inflen); 1826 1.1.2.2 yamt efe->obj_size = udf_rw64(objsize); 1827 1.1.2.2 yamt efe->l_ad = udf_rw32(l_ad); 1828 1.1.2.2 yamt efe->tag.desc_crc_len = udf_rw32(crclen); 1829 1.1.2.2 yamt } 1830 1.1.2.2 yamt error = 0; 1831 1.1.2.2 yamt 1832 1.1.2.2 yamt /* set new size for uvm */ 1833 1.1.2.2 yamt uvm_vnp_setsize(vp, old_size); 1834 1.1.2.2 yamt uvm_vnp_setwritesize(vp, new_size); 1835 1.1.2.2 yamt 1836 1.1.2.2 yamt #if 0 1837 1.1.2.2 yamt /* zero append space in buffer */ 1838 1.1.2.2 yamt uvm_vnp_zerorange(vp, old_size, new_size - old_size); 1839 1.1.2.2 yamt #endif 1840 1.1.2.2 yamt 1841 1.1.2.2 yamt /* unlock */ 1842 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 1843 1.1.2.2 yamt 1844 1.1.2.2 yamt udf_node_sanity_check(udf_node, &new_inflen, &new_lbrec); 1845 1.1.2.2 yamt KASSERT(new_inflen == orig_inflen + size_diff); 1846 1.1.2.2 yamt KASSERT(new_lbrec == orig_lbrec); 1847 1.1.2.2 yamt KASSERT(new_lbrec == 0); 1848 1.1.2.2 yamt return 0; 1849 1.1.2.2 yamt } 1850 1.1.2.2 yamt 1851 1.1.2.2 yamt DPRINTF(ALLOC, ("\tCONVERT from internal\n")); 1852 1.1.2.2 yamt 1853 1.1.2.2 yamt if (old_size > 0) { 1854 1.1.2.2 yamt /* allocate some space and copy in the stuff to keep */ 1855 1.1.2.2 yamt evacuated_data = malloc(lb_size, M_UDFTEMP, M_WAITOK); 1856 1.1.2.2 yamt memset(evacuated_data, 0, lb_size); 1857 1.1.2.2 yamt 1858 1.1.2.2 yamt /* node is locked, so safe to exit mutex */ 1859 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 1860 1.1.2.2 yamt 1861 1.1.2.2 yamt /* read in using the `normal' vn_rdwr() */ 1862 1.1.2.2 yamt error = vn_rdwr(UIO_READ, udf_node->vnode, 1863 1.1.2.2 yamt evacuated_data, old_size, 0, 1864 1.1.2.2 yamt UIO_SYSSPACE, IO_ALTSEMANTICS | IO_NODELOCKED, 1865 1.1.2.2 yamt FSCRED, NULL, NULL); 1866 1.1.2.2 yamt 1867 1.1.2.2 yamt /* enter again */ 1868 1.1.2.2 yamt UDF_LOCK_NODE(udf_node, 0); 1869 1.1.2.2 yamt } 1870 1.1.2.2 yamt 1871 1.1.2.2 yamt /* convert to a normal alloc */ 1872 1.1.2.2 yamt /* XXX HOWTO selecting allocation method ? */ 1873 1.1.2.2 yamt icbflags &= ~UDF_ICB_TAG_FLAGS_ALLOC_MASK; 1874 1.1.2.2 yamt icbflags |= UDF_ICB_LONG_ALLOC; /* XXX or SHORT_ALLOC */ 1875 1.1.2.2 yamt icbtag->flags = udf_rw16(icbflags); 1876 1.1.2.2 yamt 1877 1.1.2.2 yamt /* wipe old descriptor space */ 1878 1.1.2.2 yamt udf_wipe_adslots(udf_node); 1879 1.1.2.2 yamt 1880 1.1.2.2 yamt memset(&c_ad, 0, sizeof(struct long_ad)); 1881 1.1.2.2 yamt c_ad.len = udf_rw32(old_size | UDF_EXT_FREE); 1882 1.1.2.2 yamt c_ad.loc.part_num = udf_rw16(0); /* not relevant */ 1883 1.1.2.2 yamt c_ad.loc.lb_num = udf_rw32(0); /* not relevant */ 1884 1.1.2.2 yamt 1885 1.1.2.2 yamt slot = 0; 1886 1.1.2.2 yamt } else { 1887 1.1.2.2 yamt /* goto the last entry (if any) */ 1888 1.1.2.2 yamt slot = 0; 1889 1.1.2.2 yamt cpy_slot = 0; 1890 1.1.2.2 yamt foffset = 0; 1891 1.1.2.2 yamt memset(&c_ad, 0, sizeof(struct long_ad)); 1892 1.1.2.2 yamt for (;;) { 1893 1.1.2.2 yamt udf_get_adslot(udf_node, slot, &c_ad, &eof); 1894 1.1.2.2 yamt if (eof) 1895 1.1.2.2 yamt break; 1896 1.1.2.2 yamt 1897 1.1.2.2 yamt len = udf_rw32(c_ad.len); 1898 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 1899 1.1.2.2 yamt len = UDF_EXT_LEN(len); 1900 1.1.2.2 yamt 1901 1.1.2.2 yamt end_foffset = foffset + len; 1902 1.1.2.2 yamt if (flags != UDF_EXT_REDIRECT) 1903 1.1.2.2 yamt foffset = end_foffset; 1904 1.1.2.2 yamt 1905 1.1.2.2 yamt slot++; 1906 1.1.2.2 yamt } 1907 1.1.2.2 yamt /* at end of adslots */ 1908 1.1.2.2 yamt 1909 1.1.2.2 yamt /* special case if the old size was zero, then there is no last slot */ 1910 1.1.2.2 yamt if (old_size == 0) { 1911 1.1.2.2 yamt c_ad.len = udf_rw32(0 | UDF_EXT_FREE); 1912 1.1.2.2 yamt c_ad.loc.part_num = udf_rw16(0); /* not relevant */ 1913 1.1.2.2 yamt c_ad.loc.lb_num = udf_rw32(0); /* not relevant */ 1914 1.1.2.2 yamt } else { 1915 1.1.2.2 yamt /* refetch last slot */ 1916 1.1.2.2 yamt slot--; 1917 1.1.2.2 yamt udf_get_adslot(udf_node, slot, &c_ad, &eof); 1918 1.1.2.2 yamt } 1919 1.1.2.2 yamt } 1920 1.1.2.2 yamt 1921 1.1.2.2 yamt /* 1922 1.1.2.2 yamt * If the length of the last slot is not a multiple of lb_size, adjust 1923 1.1.2.2 yamt * length so that it is; don't forget to adjust `append_len'! relevant for 1924 1.1.2.2 yamt * extending existing files 1925 1.1.2.2 yamt */ 1926 1.1.2.2 yamt len = udf_rw32(c_ad.len); 1927 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 1928 1.1.2.2 yamt len = UDF_EXT_LEN(len); 1929 1.1.2.2 yamt 1930 1.1.2.2 yamt lastblock_grow = 0; 1931 1.1.2.2 yamt if (len % lb_size > 0) { 1932 1.1.2.2 yamt lastblock_grow = lb_size - (len % lb_size); 1933 1.1.2.2 yamt lastblock_grow = MIN(size_diff, lastblock_grow); 1934 1.1.2.2 yamt len += lastblock_grow; 1935 1.1.2.2 yamt c_ad.len = udf_rw32(len | flags); 1936 1.1.2.2 yamt 1937 1.1.2.2 yamt /* TODO zero appened space in buffer! */ 1938 1.1.2.2 yamt /* using uvm_vnp_zerorange(vp, old_size, new_size - old_size); ? */ 1939 1.1.2.2 yamt } 1940 1.1.2.2 yamt memset(&s_ad, 0, sizeof(struct long_ad)); 1941 1.1.2.2 yamt 1942 1.1.2.2 yamt /* size_diff can be bigger than allowed, so grow in chunks */ 1943 1.1.2.2 yamt append_len = size_diff - lastblock_grow; 1944 1.1.2.2 yamt while (append_len > 0) { 1945 1.1.2.2 yamt chunk = MIN(append_len, max_len); 1946 1.1.2.2 yamt s_ad.len = udf_rw32(chunk | UDF_EXT_FREE); 1947 1.1.2.2 yamt s_ad.loc.part_num = udf_rw16(0); 1948 1.1.2.2 yamt s_ad.loc.lb_num = udf_rw32(0); 1949 1.1.2.2 yamt 1950 1.1.2.2 yamt if (udf_ads_merge(lb_size, &c_ad, &s_ad)) { 1951 1.1.2.2 yamt /* not mergable (anymore) */ 1952 1.1.2.2 yamt error = udf_append_adslot(udf_node, slot, &c_ad); 1953 1.1.2.2 yamt if (error) 1954 1.1.2.2 yamt goto errorout; 1955 1.1.2.2 yamt slot++; 1956 1.1.2.2 yamt c_ad = s_ad; 1957 1.1.2.2 yamt memset(&s_ad, 0, sizeof(struct long_ad)); 1958 1.1.2.2 yamt } 1959 1.1.2.2 yamt append_len -= chunk; 1960 1.1.2.2 yamt } 1961 1.1.2.2 yamt 1962 1.1.2.2 yamt /* if there is a rest piece in the accumulator, append it */ 1963 1.1.2.2 yamt if (UDF_EXT_LEN(c_ad.len) > 0) { 1964 1.1.2.2 yamt error = udf_append_adslot(udf_node, slot, &c_ad); 1965 1.1.2.2 yamt if (error) 1966 1.1.2.2 yamt goto errorout; 1967 1.1.2.2 yamt slot++; 1968 1.1.2.2 yamt } 1969 1.1.2.2 yamt 1970 1.1.2.2 yamt /* if there is a rest piece that didn't fit, append it */ 1971 1.1.2.2 yamt if (UDF_EXT_LEN(s_ad.len) > 0) { 1972 1.1.2.2 yamt error = udf_append_adslot(udf_node, slot, &s_ad); 1973 1.1.2.2 yamt if (error) 1974 1.1.2.2 yamt goto errorout; 1975 1.1.2.2 yamt slot++; 1976 1.1.2.2 yamt } 1977 1.1.2.2 yamt 1978 1.1.2.2 yamt inflen += size_diff; 1979 1.1.2.2 yamt objsize += size_diff; 1980 1.1.2.2 yamt if (fe) { 1981 1.1.2.2 yamt fe->inf_len = udf_rw64(inflen); 1982 1.1.2.2 yamt } else { 1983 1.1.2.2 yamt efe->inf_len = udf_rw64(inflen); 1984 1.1.2.2 yamt efe->obj_size = udf_rw64(objsize); 1985 1.1.2.2 yamt } 1986 1.1.2.2 yamt error = 0; 1987 1.1.2.2 yamt 1988 1.1.2.2 yamt if (evacuated_data) { 1989 1.1.2.2 yamt /* set new write size for uvm */ 1990 1.1.2.2 yamt uvm_vnp_setwritesize(vp, old_size); 1991 1.1.2.2 yamt 1992 1.1.2.2 yamt /* write out evacuated data */ 1993 1.1.2.2 yamt error = vn_rdwr(UIO_WRITE, udf_node->vnode, 1994 1.1.2.2 yamt evacuated_data, old_size, 0, 1995 1.1.2.2 yamt UIO_SYSSPACE, IO_ALTSEMANTICS | IO_NODELOCKED, 1996 1.1.2.2 yamt FSCRED, NULL, NULL); 1997 1.1.2.2 yamt uvm_vnp_setsize(vp, old_size); 1998 1.1.2.2 yamt } 1999 1.1.2.2 yamt 2000 1.1.2.2 yamt errorout: 2001 1.1.2.2 yamt if (evacuated_data) 2002 1.1.2.2 yamt free(evacuated_data, M_UDFTEMP); 2003 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 2004 1.1.2.2 yamt 2005 1.1.2.2 yamt udf_node_sanity_check(udf_node, &new_inflen, &new_lbrec); 2006 1.1.2.2 yamt KASSERT(new_inflen == orig_inflen + size_diff); 2007 1.1.2.2 yamt KASSERT(new_lbrec == orig_lbrec); 2008 1.1.2.2 yamt 2009 1.1.2.2 yamt return error; 2010 1.1.2.2 yamt } 2011 1.1.2.2 yamt 2012 1.1.2.2 yamt /* --------------------------------------------------------------------- */ 2013 1.1.2.2 yamt 2014 1.1.2.2 yamt int 2015 1.1.2.2 yamt udf_shrink_node(struct udf_node *udf_node, uint64_t new_size) 2016 1.1.2.2 yamt { 2017 1.1.2.2 yamt struct vnode *vp = udf_node->vnode; 2018 1.1.2.2 yamt struct udf_mount *ump = udf_node->ump; 2019 1.1.2.2 yamt struct file_entry *fe; 2020 1.1.2.2 yamt struct extfile_entry *efe; 2021 1.1.2.2 yamt struct icb_tag *icbtag; 2022 1.1.2.2 yamt struct long_ad c_ad, s_ad, *node_ad_cpy; 2023 1.1.2.2 yamt uint64_t size_diff, old_size, inflen, objsize; 2024 1.1.2.2 yamt uint64_t foffset, end_foffset; 2025 1.1.2.2 yamt uint64_t orig_inflen, orig_lbrec, new_inflen, new_lbrec; 2026 1.1.2.2 yamt uint32_t lb_size, dscr_size, crclen; 2027 1.1.2.2 yamt uint32_t slot_offset; 2028 1.1.2.2 yamt uint32_t len, flags, max_len; 2029 1.1.2.2 yamt uint32_t num_lb, lb_num; 2030 1.1.2.2 yamt uint32_t max_l_ad, l_ad, l_ea; 2031 1.1.2.2 yamt uint16_t vpart_num; 2032 1.1.2.2 yamt uint8_t *data_pos; 2033 1.1.2.2 yamt int icbflags, addr_type; 2034 1.1.2.2 yamt int slot, cpy_slot, cpy_slots; 2035 1.1.2.2 yamt int eof, error; 2036 1.1.2.2 yamt 2037 1.1.2.2 yamt DPRINTF(ALLOC, ("udf_shrink_node\n")); 2038 1.1.2.2 yamt udf_node_sanity_check(udf_node, &orig_inflen, &orig_lbrec); 2039 1.1.2.2 yamt 2040 1.1.2.2 yamt UDF_LOCK_NODE(udf_node, 0); 2041 1.1.2.2 yamt lb_size = udf_rw32(ump->logical_vol->lb_size); 2042 1.1.2.2 yamt max_len = ((UDF_EXT_MAXLEN / lb_size) * lb_size); 2043 1.1.2.2 yamt 2044 1.1.2.2 yamt /* do the work */ 2045 1.1.2.2 yamt fe = udf_node->fe; 2046 1.1.2.2 yamt efe = udf_node->efe; 2047 1.1.2.2 yamt if (fe) { 2048 1.1.2.2 yamt icbtag = &fe->icbtag; 2049 1.1.2.2 yamt inflen = udf_rw64(fe->inf_len); 2050 1.1.2.2 yamt objsize = inflen; 2051 1.1.2.2 yamt dscr_size = sizeof(struct file_entry) -1; 2052 1.1.2.2 yamt l_ea = udf_rw32(fe->l_ea); 2053 1.1.2.2 yamt l_ad = udf_rw32(fe->l_ad); 2054 1.1.2.2 yamt data_pos = (uint8_t *) fe + dscr_size + l_ea; 2055 1.1.2.2 yamt } else { 2056 1.1.2.2 yamt icbtag = &efe->icbtag; 2057 1.1.2.2 yamt inflen = udf_rw64(efe->inf_len); 2058 1.1.2.2 yamt objsize = udf_rw64(efe->obj_size); 2059 1.1.2.2 yamt dscr_size = sizeof(struct extfile_entry) -1; 2060 1.1.2.2 yamt l_ea = udf_rw32(efe->l_ea); 2061 1.1.2.2 yamt l_ad = udf_rw32(efe->l_ad); 2062 1.1.2.2 yamt data_pos = (uint8_t *) efe + dscr_size + l_ea; 2063 1.1.2.2 yamt } 2064 1.1.2.2 yamt max_l_ad = lb_size - dscr_size - l_ea; 2065 1.1.2.2 yamt 2066 1.1.2.2 yamt icbflags = udf_rw16(icbtag->flags); 2067 1.1.2.2 yamt addr_type = icbflags & UDF_ICB_TAG_FLAGS_ALLOC_MASK; 2068 1.1.2.2 yamt 2069 1.1.2.2 yamt old_size = inflen; 2070 1.1.2.2 yamt size_diff = old_size - new_size; 2071 1.1.2.2 yamt 2072 1.1.2.2 yamt DPRINTF(ALLOC, ("\tfrom %"PRIu64" to %"PRIu64"\n", old_size, new_size)); 2073 1.1.2.2 yamt 2074 1.1.2.2 yamt /* shrink the node to its new size */ 2075 1.1.2.2 yamt if (addr_type == UDF_ICB_INTERN_ALLOC) { 2076 1.1.2.2 yamt /* only reflect size change directly in the node */ 2077 1.1.2.2 yamt KASSERT(new_size <= max_l_ad); 2078 1.1.2.2 yamt inflen -= size_diff; 2079 1.1.2.2 yamt objsize -= size_diff; 2080 1.1.2.2 yamt l_ad -= size_diff; 2081 1.1.2.2 yamt crclen = dscr_size - UDF_DESC_TAG_LENGTH + l_ea + l_ad; 2082 1.1.2.2 yamt if (fe) { 2083 1.1.2.2 yamt fe->inf_len = udf_rw64(inflen); 2084 1.1.2.2 yamt fe->l_ad = udf_rw32(l_ad); 2085 1.1.2.2 yamt fe->tag.desc_crc_len = udf_rw32(crclen); 2086 1.1.2.2 yamt } else { 2087 1.1.2.2 yamt efe->inf_len = udf_rw64(inflen); 2088 1.1.2.2 yamt efe->obj_size = udf_rw64(objsize); 2089 1.1.2.2 yamt efe->l_ad = udf_rw32(l_ad); 2090 1.1.2.2 yamt efe->tag.desc_crc_len = udf_rw32(crclen); 2091 1.1.2.2 yamt } 2092 1.1.2.2 yamt error = 0; 2093 1.1.2.2 yamt /* TODO zero appened space in buffer! */ 2094 1.1.2.2 yamt /* using uvm_vnp_zerorange(vp, old_size, old_size - new_size); ? */ 2095 1.1.2.2 yamt 2096 1.1.2.2 yamt /* set new size for uvm */ 2097 1.1.2.2 yamt uvm_vnp_setsize(vp, new_size); 2098 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 2099 1.1.2.2 yamt 2100 1.1.2.2 yamt udf_node_sanity_check(udf_node, &new_inflen, &new_lbrec); 2101 1.1.2.2 yamt KASSERT(new_inflen == orig_inflen - size_diff); 2102 1.1.2.2 yamt KASSERT(new_lbrec == orig_lbrec); 2103 1.1.2.2 yamt KASSERT(new_lbrec == 0); 2104 1.1.2.2 yamt 2105 1.1.2.2 yamt return 0; 2106 1.1.2.2 yamt } 2107 1.1.2.2 yamt 2108 1.1.2.2 yamt /* setup node cleanup extents copy space */ 2109 1.1.2.2 yamt node_ad_cpy = malloc(lb_size * UDF_MAX_ALLOC_EXTENTS, 2110 1.1.2.2 yamt M_UDFMNT, M_WAITOK); 2111 1.1.2.2 yamt memset(node_ad_cpy, 0, lb_size * UDF_MAX_ALLOC_EXTENTS); 2112 1.1.2.2 yamt 2113 1.1.2.2 yamt /* 2114 1.1.2.2 yamt * Shrink the node by releasing the allocations and truncate the last 2115 1.1.2.2 yamt * allocation to the new size. If the new size fits into the 2116 1.1.2.2 yamt * allocation descriptor itself, transform it into an 2117 1.1.2.2 yamt * UDF_ICB_INTERN_ALLOC. 2118 1.1.2.2 yamt */ 2119 1.1.2.2 yamt slot = 0; 2120 1.1.2.2 yamt cpy_slot = 0; 2121 1.1.2.2 yamt foffset = 0; 2122 1.1.2.2 yamt 2123 1.1.2.2 yamt /* 1) copy till first overlap piece to the rewrite buffer */ 2124 1.1.2.2 yamt for (;;) { 2125 1.1.2.2 yamt udf_get_adslot(udf_node, slot, &s_ad, &eof); 2126 1.1.2.2 yamt if (eof) { 2127 1.1.2.2 yamt DPRINTF(WRITE, 2128 1.1.2.2 yamt ("Shrink node failed: " 2129 1.1.2.2 yamt "encountered EOF\n")); 2130 1.1.2.2 yamt error = EINVAL; 2131 1.1.2.2 yamt goto errorout; /* panic? */ 2132 1.1.2.2 yamt } 2133 1.1.2.2 yamt len = udf_rw32(s_ad.len); 2134 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 2135 1.1.2.2 yamt len = UDF_EXT_LEN(len); 2136 1.1.2.2 yamt 2137 1.1.2.2 yamt if (flags == UDF_EXT_REDIRECT) { 2138 1.1.2.2 yamt slot++; 2139 1.1.2.2 yamt continue; 2140 1.1.2.2 yamt } 2141 1.1.2.2 yamt 2142 1.1.2.2 yamt end_foffset = foffset + len; 2143 1.1.2.2 yamt if (end_foffset > new_size) 2144 1.1.2.2 yamt break; /* found */ 2145 1.1.2.2 yamt 2146 1.1.2.2 yamt node_ad_cpy[cpy_slot++] = s_ad; 2147 1.1.2.2 yamt 2148 1.1.2.2 yamt DPRINTF(ALLOC, ("\t1: vp %d, lb %d, len %d, flags %d " 2149 1.1.2.2 yamt "-> stack\n", 2150 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), 2151 1.1.2.2 yamt udf_rw32(s_ad.loc.lb_num), 2152 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 2153 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 2154 1.1.2.2 yamt 2155 1.1.2.2 yamt foffset = end_foffset; 2156 1.1.2.2 yamt slot++; 2157 1.1.2.2 yamt } 2158 1.1.2.2 yamt slot_offset = new_size - foffset; 2159 1.1.2.2 yamt 2160 1.1.2.2 yamt /* 2) trunc overlapping slot at overlap and copy it */ 2161 1.1.2.2 yamt if (slot_offset > 0) { 2162 1.1.2.2 yamt lb_num = udf_rw32(s_ad.loc.lb_num); 2163 1.1.2.2 yamt vpart_num = udf_rw16(s_ad.loc.part_num); 2164 1.1.2.2 yamt 2165 1.1.2.2 yamt if (flags == UDF_EXT_ALLOCATED) { 2166 1.1.2.2 yamt lb_num += (slot_offset + lb_size -1) / lb_size; 2167 1.1.2.2 yamt num_lb = (len - slot_offset + lb_size - 1) / lb_size; 2168 1.1.2.2 yamt 2169 1.1.2.2 yamt udf_free_allocated_space(ump, lb_num, vpart_num, num_lb); 2170 1.1.2.2 yamt } 2171 1.1.2.2 yamt 2172 1.1.2.2 yamt s_ad.len = udf_rw32(slot_offset | flags); 2173 1.1.2.2 yamt node_ad_cpy[cpy_slot++] = s_ad; 2174 1.1.2.2 yamt slot++; 2175 1.1.2.2 yamt 2176 1.1.2.2 yamt DPRINTF(ALLOC, ("\t2: vp %d, lb %d, len %d, flags %d " 2177 1.1.2.2 yamt "-> stack\n", 2178 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), 2179 1.1.2.2 yamt udf_rw32(s_ad.loc.lb_num), 2180 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 2181 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 2182 1.1.2.2 yamt } 2183 1.1.2.2 yamt 2184 1.1.2.2 yamt /* 3) delete remainder */ 2185 1.1.2.2 yamt for (;;) { 2186 1.1.2.2 yamt udf_get_adslot(udf_node, slot, &s_ad, &eof); 2187 1.1.2.2 yamt if (eof) 2188 1.1.2.2 yamt break; 2189 1.1.2.2 yamt 2190 1.1.2.2 yamt len = udf_rw32(s_ad.len); 2191 1.1.2.2 yamt flags = UDF_EXT_FLAGS(len); 2192 1.1.2.2 yamt len = UDF_EXT_LEN(len); 2193 1.1.2.2 yamt 2194 1.1.2.2 yamt if (flags == UDF_EXT_REDIRECT) { 2195 1.1.2.2 yamt slot++; 2196 1.1.2.2 yamt continue; 2197 1.1.2.2 yamt } 2198 1.1.2.2 yamt 2199 1.1.2.2 yamt DPRINTF(ALLOC, ("\t3: delete remainder " 2200 1.1.2.2 yamt "vp %d lb %d, len %d, flags %d\n", 2201 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), 2202 1.1.2.2 yamt udf_rw32(s_ad.loc.lb_num), 2203 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 2204 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 2205 1.1.2.2 yamt 2206 1.1.2.2 yamt if (flags == UDF_EXT_ALLOCATED) { 2207 1.1.2.2 yamt lb_num = udf_rw32(s_ad.loc.lb_num); 2208 1.1.2.2 yamt vpart_num = udf_rw16(s_ad.loc.part_num); 2209 1.1.2.2 yamt num_lb = (len + lb_size - 1) / lb_size; 2210 1.1.2.2 yamt 2211 1.1.2.2 yamt udf_free_allocated_space(ump, lb_num, vpart_num, 2212 1.1.2.2 yamt num_lb); 2213 1.1.2.2 yamt } 2214 1.1.2.2 yamt 2215 1.1.2.2 yamt slot++; 2216 1.1.2.2 yamt } 2217 1.1.2.2 yamt 2218 1.1.2.2 yamt /* 4) if it will fit into the descriptor then convert */ 2219 1.1.2.2 yamt if (new_size < max_l_ad) { 2220 1.1.2.2 yamt /* 2221 1.1.2.2 yamt * resque/evacuate old piece by reading it in, and convert it 2222 1.1.2.2 yamt * to internal alloc. 2223 1.1.2.2 yamt */ 2224 1.1.2.2 yamt if (new_size == 0) { 2225 1.1.2.2 yamt /* XXX/TODO only for zero sizing now */ 2226 1.1.2.2 yamt udf_wipe_adslots(udf_node); 2227 1.1.2.2 yamt 2228 1.1.2.2 yamt icbflags &= ~UDF_ICB_TAG_FLAGS_ALLOC_MASK; 2229 1.1.2.2 yamt icbflags |= UDF_ICB_INTERN_ALLOC; 2230 1.1.2.2 yamt icbtag->flags = udf_rw16(icbflags); 2231 1.1.2.2 yamt 2232 1.1.2.2 yamt inflen -= size_diff; KASSERT(inflen == 0); 2233 1.1.2.2 yamt objsize -= size_diff; 2234 1.1.2.2 yamt l_ad = new_size; 2235 1.1.2.2 yamt crclen = dscr_size - UDF_DESC_TAG_LENGTH + l_ea + l_ad; 2236 1.1.2.2 yamt if (fe) { 2237 1.1.2.2 yamt fe->inf_len = udf_rw64(inflen); 2238 1.1.2.2 yamt fe->l_ad = udf_rw32(l_ad); 2239 1.1.2.2 yamt fe->tag.desc_crc_len = udf_rw32(crclen); 2240 1.1.2.2 yamt } else { 2241 1.1.2.2 yamt efe->inf_len = udf_rw64(inflen); 2242 1.1.2.2 yamt efe->obj_size = udf_rw64(objsize); 2243 1.1.2.2 yamt efe->l_ad = udf_rw32(l_ad); 2244 1.1.2.2 yamt efe->tag.desc_crc_len = udf_rw32(crclen); 2245 1.1.2.2 yamt } 2246 1.1.2.2 yamt /* eventually copy in evacuated piece */ 2247 1.1.2.2 yamt /* set new size for uvm */ 2248 1.1.2.2 yamt uvm_vnp_setsize(vp, new_size); 2249 1.1.2.2 yamt 2250 1.1.2.2 yamt free(node_ad_cpy, M_UDFMNT); 2251 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 2252 1.1.2.2 yamt 2253 1.1.2.2 yamt udf_node_sanity_check(udf_node, &new_inflen, &new_lbrec); 2254 1.1.2.2 yamt KASSERT(new_inflen == orig_inflen - size_diff); 2255 1.1.2.2 yamt KASSERT(new_inflen == 0); 2256 1.1.2.2 yamt KASSERT(new_lbrec == 0); 2257 1.1.2.2 yamt 2258 1.1.2.2 yamt return 0; 2259 1.1.2.2 yamt } 2260 1.1.2.2 yamt 2261 1.1.2.2 yamt printf("UDF_SHRINK_NODE: could convert to internal alloc!\n"); 2262 1.1.2.2 yamt } 2263 1.1.2.2 yamt 2264 1.1.2.2 yamt /* 5) reset node descriptors */ 2265 1.1.2.2 yamt udf_wipe_adslots(udf_node); 2266 1.1.2.2 yamt 2267 1.1.2.2 yamt /* 6) copy back extents; merge when possible. Recounting on the fly */ 2268 1.1.2.2 yamt cpy_slots = cpy_slot; 2269 1.1.2.2 yamt 2270 1.1.2.2 yamt c_ad = node_ad_cpy[0]; 2271 1.1.2.2 yamt slot = 0; 2272 1.1.2.2 yamt for (cpy_slot = 1; cpy_slot < cpy_slots; cpy_slot++) { 2273 1.1.2.2 yamt s_ad = node_ad_cpy[cpy_slot]; 2274 1.1.2.2 yamt 2275 1.1.2.2 yamt DPRINTF(ALLOC, ("\t6: stack -> got mapping vp %d " 2276 1.1.2.2 yamt "lb %d, len %d, flags %d\n", 2277 1.1.2.2 yamt udf_rw16(s_ad.loc.part_num), 2278 1.1.2.2 yamt udf_rw32(s_ad.loc.lb_num), 2279 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(s_ad.len)), 2280 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(s_ad.len)) >> 30)); 2281 1.1.2.2 yamt 2282 1.1.2.2 yamt /* see if we can merge */ 2283 1.1.2.2 yamt if (udf_ads_merge(lb_size, &c_ad, &s_ad)) { 2284 1.1.2.2 yamt /* not mergable (anymore) */ 2285 1.1.2.2 yamt DPRINTF(ALLOC, ("\t6: appending vp %d lb %d, " 2286 1.1.2.2 yamt "len %d, flags %d\n", 2287 1.1.2.2 yamt udf_rw16(c_ad.loc.part_num), 2288 1.1.2.2 yamt udf_rw32(c_ad.loc.lb_num), 2289 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(c_ad.len)), 2290 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(c_ad.len)) >> 30)); 2291 1.1.2.2 yamt 2292 1.1.2.2 yamt error = udf_append_adslot(udf_node, slot, &c_ad); 2293 1.1.2.2 yamt if (error) 2294 1.1.2.2 yamt goto errorout; /* panic? */ 2295 1.1.2.2 yamt c_ad = s_ad; 2296 1.1.2.2 yamt slot++; 2297 1.1.2.2 yamt } 2298 1.1.2.2 yamt } 2299 1.1.2.2 yamt 2300 1.1.2.2 yamt /* 7) push rest slot (if any) */ 2301 1.1.2.2 yamt if (UDF_EXT_LEN(c_ad.len) > 0) { 2302 1.1.2.2 yamt DPRINTF(ALLOC, ("\t7: last append vp %d lb %d, " 2303 1.1.2.2 yamt "len %d, flags %d\n", 2304 1.1.2.2 yamt udf_rw16(c_ad.loc.part_num), 2305 1.1.2.2 yamt udf_rw32(c_ad.loc.lb_num), 2306 1.1.2.2 yamt UDF_EXT_LEN(udf_rw32(c_ad.len)), 2307 1.1.2.2 yamt UDF_EXT_FLAGS(udf_rw32(c_ad.len)) >> 30)); 2308 1.1.2.2 yamt 2309 1.1.2.2 yamt error = udf_append_adslot(udf_node, slot, &c_ad); 2310 1.1.2.2 yamt if (error) 2311 1.1.2.2 yamt goto errorout; /* panic? */ 2312 1.1.2.2 yamt ; 2313 1.1.2.2 yamt } 2314 1.1.2.2 yamt 2315 1.1.2.2 yamt inflen -= size_diff; 2316 1.1.2.2 yamt objsize -= size_diff; 2317 1.1.2.2 yamt if (fe) { 2318 1.1.2.2 yamt fe->inf_len = udf_rw64(inflen); 2319 1.1.2.2 yamt } else { 2320 1.1.2.2 yamt efe->inf_len = udf_rw64(inflen); 2321 1.1.2.2 yamt efe->obj_size = udf_rw64(objsize); 2322 1.1.2.2 yamt } 2323 1.1.2.2 yamt error = 0; 2324 1.1.2.2 yamt 2325 1.1.2.2 yamt /* set new size for uvm */ 2326 1.1.2.2 yamt uvm_vnp_setsize(vp, new_size); 2327 1.1.2.2 yamt 2328 1.1.2.2 yamt errorout: 2329 1.1.2.2 yamt free(node_ad_cpy, M_UDFMNT); 2330 1.1.2.2 yamt UDF_UNLOCK_NODE(udf_node, 0); 2331 1.1.2.2 yamt 2332 1.1.2.2 yamt udf_node_sanity_check(udf_node, &new_inflen, &new_lbrec); 2333 1.1.2.2 yamt KASSERT(new_inflen == orig_inflen - size_diff); 2334 1.1.2.2 yamt KASSERT(new_lbrec == orig_lbrec); 2335 1.1.2.2 yamt 2336 1.1.2.2 yamt return error; 2337 1.1.2.2 yamt } 2338 1.1.2.2 yamt 2339
Indexes created Fri Sep 26 08:10:20 GMT 2025