.. | .. |
---|
| 1 | +// SPDX-License-Identifier: GPL-2.0-only |
---|
1 | 2 | /* |
---|
2 | 3 | * linux/fs/adfs/map.c |
---|
3 | 4 | * |
---|
4 | 5 | * Copyright (C) 1997-2002 Russell King |
---|
5 | | - * |
---|
6 | | - * This program is free software; you can redistribute it and/or modify |
---|
7 | | - * it under the terms of the GNU General Public License version 2 as |
---|
8 | | - * published by the Free Software Foundation. |
---|
9 | 6 | */ |
---|
10 | | -#include <linux/buffer_head.h> |
---|
| 7 | +#include <linux/slab.h> |
---|
| 8 | +#include <linux/statfs.h> |
---|
11 | 9 | #include <asm/unaligned.h> |
---|
12 | 10 | #include "adfs.h" |
---|
13 | 11 | |
---|
.. | .. |
---|
67 | 65 | * output of: |
---|
68 | 66 | * gcc -D__KERNEL__ -O2 -I../../include -o - -S map.c |
---|
69 | 67 | */ |
---|
70 | | -static int |
---|
71 | | -lookup_zone(const struct adfs_discmap *dm, const unsigned int idlen, |
---|
72 | | - const unsigned int frag_id, unsigned int *offset) |
---|
| 68 | +static int lookup_zone(const struct adfs_discmap *dm, const unsigned int idlen, |
---|
| 69 | + const u32 frag_id, unsigned int *offset) |
---|
73 | 70 | { |
---|
74 | | - const unsigned int mapsize = dm->dm_endbit; |
---|
| 71 | + const unsigned int endbit = dm->dm_endbit; |
---|
75 | 72 | const u32 idmask = (1 << idlen) - 1; |
---|
76 | | - unsigned char *map = dm->dm_bh->b_data + 4; |
---|
| 73 | + unsigned char *map = dm->dm_bh->b_data; |
---|
77 | 74 | unsigned int start = dm->dm_startbit; |
---|
78 | | - unsigned int mapptr; |
---|
| 75 | + unsigned int freelink, fragend; |
---|
79 | 76 | u32 frag; |
---|
| 77 | + |
---|
| 78 | + frag = GET_FRAG_ID(map, 8, idmask & 0x7fff); |
---|
| 79 | + freelink = frag ? 8 + frag : 0; |
---|
80 | 80 | |
---|
81 | 81 | do { |
---|
82 | 82 | frag = GET_FRAG_ID(map, start, idmask); |
---|
83 | | - mapptr = start + idlen; |
---|
84 | 83 | |
---|
85 | | - /* |
---|
86 | | - * find end of fragment |
---|
87 | | - */ |
---|
88 | | - { |
---|
89 | | - __le32 *_map = (__le32 *)map; |
---|
90 | | - u32 v = le32_to_cpu(_map[mapptr >> 5]) >> (mapptr & 31); |
---|
91 | | - while (v == 0) { |
---|
92 | | - mapptr = (mapptr & ~31) + 32; |
---|
93 | | - if (mapptr >= mapsize) |
---|
94 | | - goto error; |
---|
95 | | - v = le32_to_cpu(_map[mapptr >> 5]); |
---|
96 | | - } |
---|
| 84 | + fragend = find_next_bit_le(map, endbit, start + idlen); |
---|
| 85 | + if (fragend >= endbit) |
---|
| 86 | + goto error; |
---|
97 | 87 | |
---|
98 | | - mapptr += 1 + ffz(~v); |
---|
| 88 | + if (start == freelink) { |
---|
| 89 | + freelink += frag & 0x7fff; |
---|
| 90 | + } else if (frag == frag_id) { |
---|
| 91 | + unsigned int length = fragend + 1 - start; |
---|
| 92 | + |
---|
| 93 | + if (*offset < length) |
---|
| 94 | + return start + *offset; |
---|
| 95 | + *offset -= length; |
---|
99 | 96 | } |
---|
100 | 97 | |
---|
101 | | - if (frag == frag_id) |
---|
102 | | - goto found; |
---|
103 | | -again: |
---|
104 | | - start = mapptr; |
---|
105 | | - } while (mapptr < mapsize); |
---|
| 98 | + start = fragend + 1; |
---|
| 99 | + } while (start < endbit); |
---|
106 | 100 | return -1; |
---|
107 | 101 | |
---|
108 | 102 | error: |
---|
109 | 103 | printk(KERN_ERR "adfs: oversized fragment 0x%x at 0x%x-0x%x\n", |
---|
110 | | - frag, start, mapptr); |
---|
| 104 | + frag, start, fragend); |
---|
111 | 105 | return -1; |
---|
112 | | - |
---|
113 | | -found: |
---|
114 | | - { |
---|
115 | | - int length = mapptr - start; |
---|
116 | | - if (*offset >= length) { |
---|
117 | | - *offset -= length; |
---|
118 | | - goto again; |
---|
119 | | - } |
---|
120 | | - } |
---|
121 | | - return start + *offset; |
---|
122 | 106 | } |
---|
123 | 107 | |
---|
124 | 108 | /* |
---|
.. | .. |
---|
130 | 114 | static unsigned int |
---|
131 | 115 | scan_free_map(struct adfs_sb_info *asb, struct adfs_discmap *dm) |
---|
132 | 116 | { |
---|
133 | | - const unsigned int mapsize = dm->dm_endbit + 32; |
---|
| 117 | + const unsigned int endbit = dm->dm_endbit; |
---|
134 | 118 | const unsigned int idlen = asb->s_idlen; |
---|
135 | 119 | const unsigned int frag_idlen = idlen <= 15 ? idlen : 15; |
---|
136 | 120 | const u32 idmask = (1 << frag_idlen) - 1; |
---|
137 | 121 | unsigned char *map = dm->dm_bh->b_data; |
---|
138 | | - unsigned int start = 8, mapptr; |
---|
| 122 | + unsigned int start = 8, fragend; |
---|
139 | 123 | u32 frag; |
---|
140 | 124 | unsigned long total = 0; |
---|
141 | 125 | |
---|
.. | .. |
---|
154 | 138 | do { |
---|
155 | 139 | start += frag; |
---|
156 | 140 | |
---|
157 | | - /* |
---|
158 | | - * get fragment id |
---|
159 | | - */ |
---|
160 | 141 | frag = GET_FRAG_ID(map, start, idmask); |
---|
161 | | - mapptr = start + idlen; |
---|
162 | 142 | |
---|
163 | | - /* |
---|
164 | | - * find end of fragment |
---|
165 | | - */ |
---|
166 | | - { |
---|
167 | | - __le32 *_map = (__le32 *)map; |
---|
168 | | - u32 v = le32_to_cpu(_map[mapptr >> 5]) >> (mapptr & 31); |
---|
169 | | - while (v == 0) { |
---|
170 | | - mapptr = (mapptr & ~31) + 32; |
---|
171 | | - if (mapptr >= mapsize) |
---|
172 | | - goto error; |
---|
173 | | - v = le32_to_cpu(_map[mapptr >> 5]); |
---|
174 | | - } |
---|
| 143 | + fragend = find_next_bit_le(map, endbit, start + idlen); |
---|
| 144 | + if (fragend >= endbit) |
---|
| 145 | + goto error; |
---|
175 | 146 | |
---|
176 | | - mapptr += 1 + ffz(~v); |
---|
177 | | - } |
---|
178 | | - |
---|
179 | | - total += mapptr - start; |
---|
| 147 | + total += fragend + 1 - start; |
---|
180 | 148 | } while (frag >= idlen + 1); |
---|
181 | 149 | |
---|
182 | 150 | if (frag != 0) |
---|
.. | .. |
---|
188 | 156 | return 0; |
---|
189 | 157 | } |
---|
190 | 158 | |
---|
191 | | -static int |
---|
192 | | -scan_map(struct adfs_sb_info *asb, unsigned int zone, |
---|
193 | | - const unsigned int frag_id, unsigned int mapoff) |
---|
| 159 | +static int scan_map(struct adfs_sb_info *asb, unsigned int zone, |
---|
| 160 | + const u32 frag_id, unsigned int mapoff) |
---|
194 | 161 | { |
---|
195 | 162 | const unsigned int idlen = asb->s_idlen; |
---|
196 | 163 | struct adfs_discmap *dm, *dm_end; |
---|
.. | .. |
---|
226 | 193 | * total_free = E(free_in_zone_n) |
---|
227 | 194 | * nzones |
---|
228 | 195 | */ |
---|
229 | | -unsigned int |
---|
230 | | -adfs_map_free(struct super_block *sb) |
---|
| 196 | +void adfs_map_statfs(struct super_block *sb, struct kstatfs *buf) |
---|
231 | 197 | { |
---|
232 | 198 | struct adfs_sb_info *asb = ADFS_SB(sb); |
---|
| 199 | + struct adfs_discrecord *dr = adfs_map_discrecord(asb->s_map); |
---|
233 | 200 | struct adfs_discmap *dm; |
---|
234 | 201 | unsigned int total = 0; |
---|
235 | 202 | unsigned int zone; |
---|
.. | .. |
---|
241 | 208 | total += scan_free_map(asb, dm++); |
---|
242 | 209 | } while (--zone > 0); |
---|
243 | 210 | |
---|
244 | | - return signed_asl(total, asb->s_map2blk); |
---|
| 211 | + buf->f_blocks = adfs_disc_size(dr) >> sb->s_blocksize_bits; |
---|
| 212 | + buf->f_files = asb->s_ids_per_zone * asb->s_map_size; |
---|
| 213 | + buf->f_bavail = |
---|
| 214 | + buf->f_bfree = signed_asl(total, asb->s_map2blk); |
---|
245 | 215 | } |
---|
246 | 216 | |
---|
247 | | -int |
---|
248 | | -adfs_map_lookup(struct super_block *sb, unsigned int frag_id, |
---|
249 | | - unsigned int offset) |
---|
| 217 | +int adfs_map_lookup(struct super_block *sb, u32 frag_id, unsigned int offset) |
---|
250 | 218 | { |
---|
251 | 219 | struct adfs_sb_info *asb = ADFS_SB(sb); |
---|
252 | 220 | unsigned int zone, mapoff; |
---|
.. | .. |
---|
288 | 256 | frag_id, zone, asb->s_map_size); |
---|
289 | 257 | return 0; |
---|
290 | 258 | } |
---|
| 259 | + |
---|
| 260 | +static unsigned char adfs_calczonecheck(struct super_block *sb, unsigned char *map) |
---|
| 261 | +{ |
---|
| 262 | + unsigned int v0, v1, v2, v3; |
---|
| 263 | + int i; |
---|
| 264 | + |
---|
| 265 | + v0 = v1 = v2 = v3 = 0; |
---|
| 266 | + for (i = sb->s_blocksize - 4; i; i -= 4) { |
---|
| 267 | + v0 += map[i] + (v3 >> 8); |
---|
| 268 | + v3 &= 0xff; |
---|
| 269 | + v1 += map[i + 1] + (v0 >> 8); |
---|
| 270 | + v0 &= 0xff; |
---|
| 271 | + v2 += map[i + 2] + (v1 >> 8); |
---|
| 272 | + v1 &= 0xff; |
---|
| 273 | + v3 += map[i + 3] + (v2 >> 8); |
---|
| 274 | + v2 &= 0xff; |
---|
| 275 | + } |
---|
| 276 | + v0 += v3 >> 8; |
---|
| 277 | + v1 += map[1] + (v0 >> 8); |
---|
| 278 | + v2 += map[2] + (v1 >> 8); |
---|
| 279 | + v3 += map[3] + (v2 >> 8); |
---|
| 280 | + |
---|
| 281 | + return v0 ^ v1 ^ v2 ^ v3; |
---|
| 282 | +} |
---|
| 283 | + |
---|
| 284 | +static int adfs_checkmap(struct super_block *sb, struct adfs_discmap *dm) |
---|
| 285 | +{ |
---|
| 286 | + unsigned char crosscheck = 0, zonecheck = 1; |
---|
| 287 | + int i; |
---|
| 288 | + |
---|
| 289 | + for (i = 0; i < ADFS_SB(sb)->s_map_size; i++) { |
---|
| 290 | + unsigned char *map; |
---|
| 291 | + |
---|
| 292 | + map = dm[i].dm_bh->b_data; |
---|
| 293 | + |
---|
| 294 | + if (adfs_calczonecheck(sb, map) != map[0]) { |
---|
| 295 | + adfs_error(sb, "zone %d fails zonecheck", i); |
---|
| 296 | + zonecheck = 0; |
---|
| 297 | + } |
---|
| 298 | + crosscheck ^= map[3]; |
---|
| 299 | + } |
---|
| 300 | + if (crosscheck != 0xff) |
---|
| 301 | + adfs_error(sb, "crosscheck != 0xff"); |
---|
| 302 | + return crosscheck == 0xff && zonecheck; |
---|
| 303 | +} |
---|
| 304 | + |
---|
| 305 | +/* |
---|
| 306 | + * Layout the map - the first zone contains a copy of the disc record, |
---|
| 307 | + * and the last zone must be limited to the size of the filesystem. |
---|
| 308 | + */ |
---|
| 309 | +static void adfs_map_layout(struct adfs_discmap *dm, unsigned int nzones, |
---|
| 310 | + struct adfs_discrecord *dr) |
---|
| 311 | +{ |
---|
| 312 | + unsigned int zone, zone_size; |
---|
| 313 | + u64 size; |
---|
| 314 | + |
---|
| 315 | + zone_size = (8 << dr->log2secsize) - le16_to_cpu(dr->zone_spare); |
---|
| 316 | + |
---|
| 317 | + dm[0].dm_bh = NULL; |
---|
| 318 | + dm[0].dm_startblk = 0; |
---|
| 319 | + dm[0].dm_startbit = 32 + ADFS_DR_SIZE_BITS; |
---|
| 320 | + dm[0].dm_endbit = 32 + zone_size; |
---|
| 321 | + |
---|
| 322 | + for (zone = 1; zone < nzones; zone++) { |
---|
| 323 | + dm[zone].dm_bh = NULL; |
---|
| 324 | + dm[zone].dm_startblk = zone * zone_size - ADFS_DR_SIZE_BITS; |
---|
| 325 | + dm[zone].dm_startbit = 32; |
---|
| 326 | + dm[zone].dm_endbit = 32 + zone_size; |
---|
| 327 | + } |
---|
| 328 | + |
---|
| 329 | + size = adfs_disc_size(dr) >> dr->log2bpmb; |
---|
| 330 | + size -= (nzones - 1) * zone_size - ADFS_DR_SIZE_BITS; |
---|
| 331 | + dm[nzones - 1].dm_endbit = 32 + size; |
---|
| 332 | +} |
---|
| 333 | + |
---|
| 334 | +static int adfs_map_read(struct adfs_discmap *dm, struct super_block *sb, |
---|
| 335 | + unsigned int map_addr, unsigned int nzones) |
---|
| 336 | +{ |
---|
| 337 | + unsigned int zone; |
---|
| 338 | + |
---|
| 339 | + for (zone = 0; zone < nzones; zone++) { |
---|
| 340 | + dm[zone].dm_bh = sb_bread(sb, map_addr + zone); |
---|
| 341 | + if (!dm[zone].dm_bh) |
---|
| 342 | + return -EIO; |
---|
| 343 | + } |
---|
| 344 | + |
---|
| 345 | + return 0; |
---|
| 346 | +} |
---|
| 347 | + |
---|
| 348 | +static void adfs_map_relse(struct adfs_discmap *dm, unsigned int nzones) |
---|
| 349 | +{ |
---|
| 350 | + unsigned int zone; |
---|
| 351 | + |
---|
| 352 | + for (zone = 0; zone < nzones; zone++) |
---|
| 353 | + brelse(dm[zone].dm_bh); |
---|
| 354 | +} |
---|
| 355 | + |
---|
| 356 | +struct adfs_discmap *adfs_read_map(struct super_block *sb, struct adfs_discrecord *dr) |
---|
| 357 | +{ |
---|
| 358 | + struct adfs_sb_info *asb = ADFS_SB(sb); |
---|
| 359 | + struct adfs_discmap *dm; |
---|
| 360 | + unsigned int map_addr, zone_size, nzones; |
---|
| 361 | + int ret; |
---|
| 362 | + |
---|
| 363 | + nzones = dr->nzones | dr->nzones_high << 8; |
---|
| 364 | + zone_size = (8 << dr->log2secsize) - le16_to_cpu(dr->zone_spare); |
---|
| 365 | + |
---|
| 366 | + asb->s_idlen = dr->idlen; |
---|
| 367 | + asb->s_map_size = nzones; |
---|
| 368 | + asb->s_map2blk = dr->log2bpmb - dr->log2secsize; |
---|
| 369 | + asb->s_log2sharesize = dr->log2sharesize; |
---|
| 370 | + asb->s_ids_per_zone = zone_size / (asb->s_idlen + 1); |
---|
| 371 | + |
---|
| 372 | + map_addr = (nzones >> 1) * zone_size - |
---|
| 373 | + ((nzones > 1) ? ADFS_DR_SIZE_BITS : 0); |
---|
| 374 | + map_addr = signed_asl(map_addr, asb->s_map2blk); |
---|
| 375 | + |
---|
| 376 | + dm = kmalloc_array(nzones, sizeof(*dm), GFP_KERNEL); |
---|
| 377 | + if (dm == NULL) { |
---|
| 378 | + adfs_error(sb, "not enough memory"); |
---|
| 379 | + return ERR_PTR(-ENOMEM); |
---|
| 380 | + } |
---|
| 381 | + |
---|
| 382 | + adfs_map_layout(dm, nzones, dr); |
---|
| 383 | + |
---|
| 384 | + ret = adfs_map_read(dm, sb, map_addr, nzones); |
---|
| 385 | + if (ret) { |
---|
| 386 | + adfs_error(sb, "unable to read map"); |
---|
| 387 | + goto error_free; |
---|
| 388 | + } |
---|
| 389 | + |
---|
| 390 | + if (adfs_checkmap(sb, dm)) |
---|
| 391 | + return dm; |
---|
| 392 | + |
---|
| 393 | + adfs_error(sb, "map corrupted"); |
---|
| 394 | + |
---|
| 395 | +error_free: |
---|
| 396 | + adfs_map_relse(dm, nzones); |
---|
| 397 | + kfree(dm); |
---|
| 398 | + return ERR_PTR(-EIO); |
---|
| 399 | +} |
---|
| 400 | + |
---|
| 401 | +void adfs_free_map(struct super_block *sb) |
---|
| 402 | +{ |
---|
| 403 | + struct adfs_sb_info *asb = ADFS_SB(sb); |
---|
| 404 | + |
---|
| 405 | + adfs_map_relse(asb->s_map, asb->s_map_size); |
---|
| 406 | + kfree(asb->s_map); |
---|
| 407 | +} |
---|