]>
Commit | Line | Data |
---|---|---|
71f95118 WD |
1 | /* |
2 | * fat.c | |
3 | * | |
4 | * R/O (V)FAT 12/16/32 filesystem implementation by Marcus Sundberg | |
5 | * | |
6 | * 2002-07-28 - rjones@nexus-tech.net - ported to ppcboot v1.1.6 | |
7 | * 2003-03-10 - kharris@nexus-tech.net - ported to uboot | |
8 | * | |
1a459660 | 9 | * SPDX-License-Identifier: GPL-2.0+ |
71f95118 WD |
10 | */ |
11 | ||
12 | #include <common.h> | |
2a981dc2 | 13 | #include <blk.h> |
71f95118 | 14 | #include <config.h> |
ac497771 | 15 | #include <exports.h> |
71f95118 WD |
16 | #include <fat.h> |
17 | #include <asm/byteorder.h> | |
7205e407 | 18 | #include <part.h> |
9a800ac7 | 19 | #include <malloc.h> |
cf92e05c | 20 | #include <memalign.h> |
9a800ac7 | 21 | #include <linux/compiler.h> |
fb7e16cc | 22 | #include <linux/ctype.h> |
71f95118 | 23 | |
cb940c7e RG |
24 | #ifdef CONFIG_SUPPORT_VFAT |
25 | static const int vfat_enabled = 1; | |
26 | #else | |
27 | static const int vfat_enabled = 0; | |
28 | #endif | |
29 | ||
71f95118 WD |
30 | /* |
31 | * Convert a string to lowercase. | |
32 | */ | |
9795e07b | 33 | static void downcase(char *str) |
71f95118 WD |
34 | { |
35 | while (*str != '\0') { | |
fb7e16cc | 36 | *str = tolower(*str); |
71f95118 WD |
37 | str++; |
38 | } | |
39 | } | |
40 | ||
4101f687 | 41 | static struct blk_desc *cur_dev; |
9813b750 | 42 | static disk_partition_t cur_part_info; |
7385c28e | 43 | |
9813b750 | 44 | #define DOS_BOOT_MAGIC_OFFSET 0x1fe |
7205e407 | 45 | #define DOS_FS_TYPE_OFFSET 0x36 |
66c2d73c | 46 | #define DOS_FS32_TYPE_OFFSET 0x52 |
71f95118 | 47 | |
9813b750 | 48 | static int disk_read(__u32 block, __u32 nr_blocks, void *buf) |
71f95118 | 49 | { |
0a04ed86 ŁM |
50 | ulong ret; |
51 | ||
2a981dc2 | 52 | if (!cur_dev) |
7205e407 | 53 | return -1; |
7385c28e | 54 | |
2a981dc2 | 55 | ret = blk_dread(cur_dev, cur_part_info.start + block, nr_blocks, buf); |
0a04ed86 ŁM |
56 | |
57 | if (nr_blocks && ret == 0) | |
58 | return -1; | |
59 | ||
60 | return ret; | |
71f95118 WD |
61 | } |
62 | ||
4101f687 | 63 | int fat_set_blk_dev(struct blk_desc *dev_desc, disk_partition_t *info) |
71f95118 | 64 | { |
9a800ac7 | 65 | ALLOC_CACHE_ALIGN_BUFFER(unsigned char, buffer, dev_desc->blksz); |
7205e407 | 66 | |
5e8f9831 SW |
67 | cur_dev = dev_desc; |
68 | cur_part_info = *info; | |
9813b750 KM |
69 | |
70 | /* Make sure it has a valid FAT header */ | |
71 | if (disk_read(0, 1, buffer) != 1) { | |
72 | cur_dev = NULL; | |
73 | return -1; | |
bf1060ea | 74 | } |
9813b750 KM |
75 | |
76 | /* Check if it's actually a DOS volume */ | |
77 | if (memcmp(buffer + DOS_BOOT_MAGIC_OFFSET, "\x55\xAA", 2)) { | |
78 | cur_dev = NULL; | |
79 | return -1; | |
80 | } | |
81 | ||
82 | /* Check for FAT12/FAT16/FAT32 filesystem */ | |
83 | if (!memcmp(buffer + DOS_FS_TYPE_OFFSET, "FAT", 3)) | |
84 | return 0; | |
85 | if (!memcmp(buffer + DOS_FS32_TYPE_OFFSET, "FAT32", 5)) | |
86 | return 0; | |
87 | ||
88 | cur_dev = NULL; | |
89 | return -1; | |
71f95118 WD |
90 | } |
91 | ||
4101f687 | 92 | int fat_register_device(struct blk_desc *dev_desc, int part_no) |
5e8f9831 SW |
93 | { |
94 | disk_partition_t info; | |
95 | ||
96 | /* First close any currently found FAT filesystem */ | |
97 | cur_dev = NULL; | |
98 | ||
99 | /* Read the partition table, if present */ | |
3e8bd469 | 100 | if (part_get_info(dev_desc, part_no, &info)) { |
5e8f9831 SW |
101 | if (part_no != 0) { |
102 | printf("** Partition %d not valid on device %d **\n", | |
bcce53d0 | 103 | part_no, dev_desc->devnum); |
5e8f9831 SW |
104 | return -1; |
105 | } | |
106 | ||
107 | info.start = 0; | |
108 | info.size = dev_desc->lba; | |
109 | info.blksz = dev_desc->blksz; | |
110 | info.name[0] = 0; | |
111 | info.type[0] = 0; | |
112 | info.bootable = 0; | |
b331cd62 | 113 | #if CONFIG_IS_ENABLED(PARTITION_UUIDS) |
5e8f9831 SW |
114 | info.uuid[0] = 0; |
115 | #endif | |
116 | } | |
117 | ||
118 | return fat_set_blk_dev(dev_desc, &info); | |
119 | } | |
9813b750 | 120 | |
71f95118 WD |
121 | /* |
122 | * Get the first occurence of a directory delimiter ('/' or '\') in a string. | |
123 | * Return index into string if found, -1 otherwise. | |
124 | */ | |
9795e07b | 125 | static int dirdelim(char *str) |
71f95118 WD |
126 | { |
127 | char *start = str; | |
128 | ||
129 | while (*str != '\0') { | |
7385c28e WD |
130 | if (ISDIRDELIM(*str)) |
131 | return str - start; | |
71f95118 WD |
132 | str++; |
133 | } | |
134 | return -1; | |
135 | } | |
136 | ||
71f95118 WD |
137 | /* |
138 | * Extract zero terminated short name from a directory entry. | |
139 | */ | |
9795e07b | 140 | static void get_name(dir_entry *dirent, char *s_name) |
71f95118 WD |
141 | { |
142 | char *ptr; | |
143 | ||
7385c28e | 144 | memcpy(s_name, dirent->name, 8); |
71f95118 WD |
145 | s_name[8] = '\0'; |
146 | ptr = s_name; | |
147 | while (*ptr && *ptr != ' ') | |
148 | ptr++; | |
149 | if (dirent->ext[0] && dirent->ext[0] != ' ') { | |
150 | *ptr = '.'; | |
151 | ptr++; | |
7385c28e | 152 | memcpy(ptr, dirent->ext, 3); |
71f95118 WD |
153 | ptr[3] = '\0'; |
154 | while (*ptr && *ptr != ' ') | |
155 | ptr++; | |
156 | } | |
157 | *ptr = '\0'; | |
158 | if (*s_name == DELETED_FLAG) | |
159 | *s_name = '\0'; | |
160 | else if (*s_name == aRING) | |
3c2c2f42 | 161 | *s_name = DELETED_FLAG; |
7385c28e | 162 | downcase(s_name); |
71f95118 WD |
163 | } |
164 | ||
b8948d2a SB |
165 | static int flush_dirty_fat_buffer(fsdata *mydata); |
166 | #if !defined(CONFIG_FAT_WRITE) | |
167 | /* Stub for read only operation */ | |
168 | int flush_dirty_fat_buffer(fsdata *mydata) | |
169 | { | |
170 | (void)(mydata); | |
171 | return 0; | |
172 | } | |
173 | #endif | |
174 | ||
71f95118 WD |
175 | /* |
176 | * Get the entry at index 'entry' in a FAT (12/16/32) table. | |
177 | * On failure 0x00 is returned. | |
178 | */ | |
9795e07b | 179 | static __u32 get_fatent(fsdata *mydata, __u32 entry) |
71f95118 WD |
180 | { |
181 | __u32 bufnum; | |
b352caea | 182 | __u32 offset, off8; |
71f95118 WD |
183 | __u32 ret = 0x00; |
184 | ||
b8948d2a SB |
185 | if (CHECK_CLUST(entry, mydata->fatsize)) { |
186 | printf("Error: Invalid FAT entry: 0x%08x\n", entry); | |
187 | return ret; | |
188 | } | |
189 | ||
71f95118 WD |
190 | switch (mydata->fatsize) { |
191 | case 32: | |
192 | bufnum = entry / FAT32BUFSIZE; | |
193 | offset = entry - bufnum * FAT32BUFSIZE; | |
194 | break; | |
195 | case 16: | |
196 | bufnum = entry / FAT16BUFSIZE; | |
197 | offset = entry - bufnum * FAT16BUFSIZE; | |
198 | break; | |
199 | case 12: | |
200 | bufnum = entry / FAT12BUFSIZE; | |
201 | offset = entry - bufnum * FAT12BUFSIZE; | |
202 | break; | |
203 | ||
204 | default: | |
205 | /* Unsupported FAT size */ | |
206 | return ret; | |
207 | } | |
208 | ||
b8948d2a | 209 | debug("FAT%d: entry: 0x%08x = %d, offset: 0x%04x = %d\n", |
7385c28e | 210 | mydata->fatsize, entry, entry, offset, offset); |
2aa98c66 | 211 | |
71f95118 WD |
212 | /* Read a new block of FAT entries into the cache. */ |
213 | if (bufnum != mydata->fatbufnum) { | |
60b36f0f | 214 | __u32 getsize = FATBUFBLOCKS; |
71f95118 WD |
215 | __u8 *bufptr = mydata->fatbuf; |
216 | __u32 fatlength = mydata->fatlength; | |
217 | __u32 startblock = bufnum * FATBUFBLOCKS; | |
218 | ||
6c1a8080 | 219 | /* Cap length if fatlength is not a multiple of FATBUFBLOCKS */ |
8006dd2e BT |
220 | if (startblock + getsize > fatlength) |
221 | getsize = fatlength - startblock; | |
60b36f0f | 222 | |
71f95118 WD |
223 | startblock += mydata->fat_sect; /* Offset from start of disk */ |
224 | ||
b8948d2a SB |
225 | /* Write back the fatbuf to the disk */ |
226 | if (flush_dirty_fat_buffer(mydata) < 0) | |
227 | return -1; | |
228 | ||
71f95118 | 229 | if (disk_read(startblock, getsize, bufptr) < 0) { |
7385c28e | 230 | debug("Error reading FAT blocks\n"); |
71f95118 WD |
231 | return ret; |
232 | } | |
233 | mydata->fatbufnum = bufnum; | |
234 | } | |
235 | ||
236 | /* Get the actual entry from the table */ | |
237 | switch (mydata->fatsize) { | |
238 | case 32: | |
7385c28e | 239 | ret = FAT2CPU32(((__u32 *) mydata->fatbuf)[offset]); |
71f95118 WD |
240 | break; |
241 | case 16: | |
7385c28e | 242 | ret = FAT2CPU16(((__u16 *) mydata->fatbuf)[offset]); |
71f95118 | 243 | break; |
7385c28e | 244 | case 12: |
b352caea SB |
245 | off8 = (offset * 3) / 2; |
246 | /* fatbut + off8 may be unaligned, read in byte granularity */ | |
247 | ret = mydata->fatbuf[off8] + (mydata->fatbuf[off8 + 1] << 8); | |
8d48c92b SB |
248 | |
249 | if (offset & 0x1) | |
250 | ret >>= 4; | |
251 | ret &= 0xfff; | |
71f95118 | 252 | } |
b8948d2a SB |
253 | debug("FAT%d: ret: 0x%08x, entry: 0x%08x, offset: 0x%04x\n", |
254 | mydata->fatsize, ret, entry, offset); | |
71f95118 WD |
255 | |
256 | return ret; | |
257 | } | |
258 | ||
71f95118 WD |
259 | /* |
260 | * Read at most 'size' bytes from the specified cluster into 'buffer'. | |
261 | * Return 0 on success, -1 otherwise. | |
262 | */ | |
263 | static int | |
9795e07b | 264 | get_cluster(fsdata *mydata, __u32 clustnum, __u8 *buffer, unsigned long size) |
71f95118 | 265 | { |
3f270f42 | 266 | __u32 idx = 0; |
71f95118 | 267 | __u32 startsect; |
46236b14 | 268 | int ret; |
71f95118 WD |
269 | |
270 | if (clustnum > 0) { | |
7385c28e WD |
271 | startsect = mydata->data_begin + |
272 | clustnum * mydata->clust_size; | |
71f95118 WD |
273 | } else { |
274 | startsect = mydata->rootdir_sect; | |
275 | } | |
276 | ||
7385c28e WD |
277 | debug("gc - clustnum: %d, startsect: %d\n", clustnum, startsect); |
278 | ||
cc63b25e | 279 | if ((unsigned long)buffer & (ARCH_DMA_MINALIGN - 1)) { |
9a800ac7 | 280 | ALLOC_CACHE_ALIGN_BUFFER(__u8, tmpbuf, mydata->sect_size); |
7385c28e | 281 | |
cc63b25e BT |
282 | printf("FAT: Misaligned buffer address (%p)\n", buffer); |
283 | ||
284 | while (size >= mydata->sect_size) { | |
285 | ret = disk_read(startsect++, 1, tmpbuf); | |
286 | if (ret != 1) { | |
287 | debug("Error reading data (got %d)\n", ret); | |
288 | return -1; | |
289 | } | |
290 | ||
291 | memcpy(buffer, tmpbuf, mydata->sect_size); | |
292 | buffer += mydata->sect_size; | |
293 | size -= mydata->sect_size; | |
294 | } | |
295 | } else { | |
ac497771 | 296 | idx = size / mydata->sect_size; |
cc63b25e BT |
297 | ret = disk_read(startsect, idx, buffer); |
298 | if (ret != idx) { | |
299 | debug("Error reading data (got %d)\n", ret); | |
300 | return -1; | |
301 | } | |
302 | startsect += idx; | |
303 | idx *= mydata->sect_size; | |
304 | buffer += idx; | |
305 | size -= idx; | |
306 | } | |
307 | if (size) { | |
308 | ALLOC_CACHE_ALIGN_BUFFER(__u8, tmpbuf, mydata->sect_size); | |
309 | ||
310 | ret = disk_read(startsect, 1, tmpbuf); | |
46236b14 KM |
311 | if (ret != 1) { |
312 | debug("Error reading data (got %d)\n", ret); | |
7205e407 | 313 | return -1; |
71f95118 | 314 | } |
7205e407 | 315 | |
cc63b25e | 316 | memcpy(buffer, tmpbuf, size); |
71f95118 WD |
317 | } |
318 | ||
319 | return 0; | |
320 | } | |
321 | ||
71f95118 | 322 | /* |
1170e634 | 323 | * Read at most 'maxsize' bytes from 'pos' in the file associated with 'dentptr' |
71f95118 | 324 | * into 'buffer'. |
1ad0b98a | 325 | * Update the number of bytes read in *gotsize or return -1 on fatal errors. |
71f95118 | 326 | */ |
1170e634 BT |
327 | __u8 get_contents_vfatname_block[MAX_CLUSTSIZE] |
328 | __aligned(ARCH_DMA_MINALIGN); | |
329 | ||
1ad0b98a SR |
330 | static int get_contents(fsdata *mydata, dir_entry *dentptr, loff_t pos, |
331 | __u8 *buffer, loff_t maxsize, loff_t *gotsize) | |
71f95118 | 332 | { |
1ad0b98a | 333 | loff_t filesize = FAT2CPU32(dentptr->size); |
ac497771 | 334 | unsigned int bytesperclust = mydata->clust_size * mydata->sect_size; |
71f95118 | 335 | __u32 curclust = START(dentptr); |
7205e407 | 336 | __u32 endclust, newclust; |
1ad0b98a | 337 | loff_t actsize; |
71f95118 | 338 | |
1ad0b98a SR |
339 | *gotsize = 0; |
340 | debug("Filesize: %llu bytes\n", filesize); | |
71f95118 | 341 | |
1170e634 | 342 | if (pos >= filesize) { |
1ad0b98a SR |
343 | debug("Read position past EOF: %llu\n", pos); |
344 | return 0; | |
1170e634 BT |
345 | } |
346 | ||
347 | if (maxsize > 0 && filesize > pos + maxsize) | |
348 | filesize = pos + maxsize; | |
71f95118 | 349 | |
1ad0b98a | 350 | debug("%llu bytes\n", filesize); |
7385c28e | 351 | |
1170e634 BT |
352 | actsize = bytesperclust; |
353 | ||
354 | /* go to cluster at pos */ | |
355 | while (actsize <= pos) { | |
356 | curclust = get_fatent(mydata, curclust); | |
357 | if (CHECK_CLUST(curclust, mydata->fatsize)) { | |
358 | debug("curclust: 0x%x\n", curclust); | |
359 | debug("Invalid FAT entry\n"); | |
1ad0b98a | 360 | return 0; |
1170e634 BT |
361 | } |
362 | actsize += bytesperclust; | |
363 | } | |
364 | ||
365 | /* actsize > pos */ | |
366 | actsize -= bytesperclust; | |
367 | filesize -= actsize; | |
368 | pos -= actsize; | |
369 | ||
370 | /* align to beginning of next cluster if any */ | |
371 | if (pos) { | |
1ad0b98a | 372 | actsize = min(filesize, (loff_t)bytesperclust); |
1170e634 BT |
373 | if (get_cluster(mydata, curclust, get_contents_vfatname_block, |
374 | (int)actsize) != 0) { | |
375 | printf("Error reading cluster\n"); | |
376 | return -1; | |
377 | } | |
378 | filesize -= actsize; | |
379 | actsize -= pos; | |
380 | memcpy(buffer, get_contents_vfatname_block + pos, actsize); | |
1ad0b98a | 381 | *gotsize += actsize; |
1170e634 | 382 | if (!filesize) |
1ad0b98a | 383 | return 0; |
1170e634 BT |
384 | buffer += actsize; |
385 | ||
386 | curclust = get_fatent(mydata, curclust); | |
387 | if (CHECK_CLUST(curclust, mydata->fatsize)) { | |
388 | debug("curclust: 0x%x\n", curclust); | |
389 | debug("Invalid FAT entry\n"); | |
1ad0b98a | 390 | return 0; |
1170e634 BT |
391 | } |
392 | } | |
393 | ||
7385c28e WD |
394 | actsize = bytesperclust; |
395 | endclust = curclust; | |
71f95118 WD |
396 | |
397 | do { | |
7205e407 | 398 | /* search for consecutive clusters */ |
7385c28e | 399 | while (actsize < filesize) { |
7205e407 | 400 | newclust = get_fatent(mydata, endclust); |
7385c28e | 401 | if ((newclust - 1) != endclust) |
7205e407 | 402 | goto getit; |
8ce4e5c2 | 403 | if (CHECK_CLUST(newclust, mydata->fatsize)) { |
7385c28e WD |
404 | debug("curclust: 0x%x\n", newclust); |
405 | debug("Invalid FAT entry\n"); | |
1ad0b98a | 406 | return 0; |
7205e407 | 407 | } |
7385c28e WD |
408 | endclust = newclust; |
409 | actsize += bytesperclust; | |
7205e407 | 410 | } |
7385c28e | 411 | |
7205e407 | 412 | /* get remaining bytes */ |
7385c28e | 413 | actsize = filesize; |
0880e5bb | 414 | if (get_cluster(mydata, curclust, buffer, (int)actsize) != 0) { |
7385c28e | 415 | printf("Error reading cluster\n"); |
7205e407 WD |
416 | return -1; |
417 | } | |
1ad0b98a SR |
418 | *gotsize += actsize; |
419 | return 0; | |
7205e407 WD |
420 | getit: |
421 | if (get_cluster(mydata, curclust, buffer, (int)actsize) != 0) { | |
7385c28e | 422 | printf("Error reading cluster\n"); |
7205e407 WD |
423 | return -1; |
424 | } | |
1ad0b98a | 425 | *gotsize += (int)actsize; |
7205e407 WD |
426 | filesize -= actsize; |
427 | buffer += actsize; | |
7385c28e | 428 | |
7205e407 | 429 | curclust = get_fatent(mydata, endclust); |
8ce4e5c2 | 430 | if (CHECK_CLUST(curclust, mydata->fatsize)) { |
7385c28e WD |
431 | debug("curclust: 0x%x\n", curclust); |
432 | printf("Invalid FAT entry\n"); | |
1ad0b98a | 433 | return 0; |
71f95118 | 434 | } |
7385c28e WD |
435 | actsize = bytesperclust; |
436 | endclust = curclust; | |
71f95118 WD |
437 | } while (1); |
438 | } | |
439 | ||
71f95118 WD |
440 | /* |
441 | * Extract the file name information from 'slotptr' into 'l_name', | |
442 | * starting at l_name[*idx]. | |
443 | * Return 1 if terminator (zero byte) is found, 0 otherwise. | |
444 | */ | |
9795e07b | 445 | static int slot2str(dir_slot *slotptr, char *l_name, int *idx) |
71f95118 WD |
446 | { |
447 | int j; | |
448 | ||
449 | for (j = 0; j <= 8; j += 2) { | |
450 | l_name[*idx] = slotptr->name0_4[j]; | |
7385c28e WD |
451 | if (l_name[*idx] == 0x00) |
452 | return 1; | |
71f95118 WD |
453 | (*idx)++; |
454 | } | |
455 | for (j = 0; j <= 10; j += 2) { | |
456 | l_name[*idx] = slotptr->name5_10[j]; | |
7385c28e WD |
457 | if (l_name[*idx] == 0x00) |
458 | return 1; | |
71f95118 WD |
459 | (*idx)++; |
460 | } | |
461 | for (j = 0; j <= 2; j += 2) { | |
462 | l_name[*idx] = slotptr->name11_12[j]; | |
7385c28e WD |
463 | if (l_name[*idx] == 0x00) |
464 | return 1; | |
71f95118 WD |
465 | (*idx)++; |
466 | } | |
467 | ||
468 | return 0; | |
469 | } | |
470 | ||
71f95118 WD |
471 | /* |
472 | * Extract the full long filename starting at 'retdent' (which is really | |
473 | * a slot) into 'l_name'. If successful also copy the real directory entry | |
474 | * into 'retdent' | |
475 | * Return 0 on success, -1 otherwise. | |
476 | */ | |
477 | static int | |
9795e07b BT |
478 | get_vfatname(fsdata *mydata, int curclust, __u8 *cluster, |
479 | dir_entry *retdent, char *l_name) | |
71f95118 WD |
480 | { |
481 | dir_entry *realdent; | |
7385c28e | 482 | dir_slot *slotptr = (dir_slot *)retdent; |
025421ea SS |
483 | __u8 *buflimit = cluster + mydata->sect_size * ((curclust == 0) ? |
484 | PREFETCH_BLOCKS : | |
485 | mydata->clust_size); | |
7385c28e | 486 | __u8 counter = (slotptr->id & ~LAST_LONG_ENTRY_MASK) & 0xff; |
71f95118 WD |
487 | int idx = 0; |
488 | ||
3831530d MZ |
489 | if (counter > VFAT_MAXSEQ) { |
490 | debug("Error: VFAT name is too long\n"); | |
491 | return -1; | |
492 | } | |
493 | ||
494 | while ((__u8 *)slotptr < buflimit) { | |
7385c28e WD |
495 | if (counter == 0) |
496 | break; | |
2d1a537d WD |
497 | if (((slotptr->id & ~LAST_LONG_ENTRY_MASK) & 0xff) != counter) |
498 | return -1; | |
71f95118 WD |
499 | slotptr++; |
500 | counter--; | |
501 | } | |
502 | ||
3831530d | 503 | if ((__u8 *)slotptr >= buflimit) { |
71f95118 WD |
504 | dir_slot *slotptr2; |
505 | ||
3831530d MZ |
506 | if (curclust == 0) |
507 | return -1; | |
71f95118 | 508 | curclust = get_fatent(mydata, curclust); |
8ce4e5c2 | 509 | if (CHECK_CLUST(curclust, mydata->fatsize)) { |
7385c28e WD |
510 | debug("curclust: 0x%x\n", curclust); |
511 | printf("Invalid FAT entry\n"); | |
71f95118 WD |
512 | return -1; |
513 | } | |
7385c28e | 514 | |
1170e634 | 515 | if (get_cluster(mydata, curclust, get_contents_vfatname_block, |
ac497771 | 516 | mydata->clust_size * mydata->sect_size) != 0) { |
7385c28e | 517 | debug("Error: reading directory block\n"); |
71f95118 WD |
518 | return -1; |
519 | } | |
7385c28e | 520 | |
1170e634 | 521 | slotptr2 = (dir_slot *)get_contents_vfatname_block; |
3831530d MZ |
522 | while (counter > 0) { |
523 | if (((slotptr2->id & ~LAST_LONG_ENTRY_MASK) | |
524 | & 0xff) != counter) | |
525 | return -1; | |
71f95118 | 526 | slotptr2++; |
3831530d MZ |
527 | counter--; |
528 | } | |
7385c28e | 529 | |
71f95118 | 530 | /* Save the real directory entry */ |
3831530d | 531 | realdent = (dir_entry *)slotptr2; |
1170e634 | 532 | while ((__u8 *)slotptr2 > get_contents_vfatname_block) { |
71f95118 | 533 | slotptr2--; |
3831530d | 534 | slot2str(slotptr2, l_name, &idx); |
71f95118 WD |
535 | } |
536 | } else { | |
537 | /* Save the real directory entry */ | |
7385c28e | 538 | realdent = (dir_entry *)slotptr; |
71f95118 WD |
539 | } |
540 | ||
541 | do { | |
542 | slotptr--; | |
7385c28e WD |
543 | if (slot2str(slotptr, l_name, &idx)) |
544 | break; | |
2d1a537d | 545 | } while (!(slotptr->id & LAST_LONG_ENTRY_MASK)); |
71f95118 WD |
546 | |
547 | l_name[idx] = '\0'; | |
7385c28e WD |
548 | if (*l_name == DELETED_FLAG) |
549 | *l_name = '\0'; | |
550 | else if (*l_name == aRING) | |
551 | *l_name = DELETED_FLAG; | |
71f95118 WD |
552 | downcase(l_name); |
553 | ||
554 | /* Return the real directory entry */ | |
555 | memcpy(retdent, realdent, sizeof(dir_entry)); | |
556 | ||
557 | return 0; | |
558 | } | |
559 | ||
71f95118 | 560 | /* Calculate short name checksum */ |
ff04f6d1 | 561 | static __u8 mkcksum(const char name[8], const char ext[3]) |
71f95118 WD |
562 | { |
563 | int i; | |
7385c28e | 564 | |
71f95118 WD |
565 | __u8 ret = 0; |
566 | ||
6ad77d88 | 567 | for (i = 0; i < 8; i++) |
ff04f6d1 | 568 | ret = (((ret & 1) << 7) | ((ret & 0xfe) >> 1)) + name[i]; |
6ad77d88 | 569 | for (i = 0; i < 3; i++) |
ff04f6d1 | 570 | ret = (((ret & 1) << 7) | ((ret & 0xfe) >> 1)) + ext[i]; |
71f95118 WD |
571 | |
572 | return ret; | |
573 | } | |
71f95118 WD |
574 | |
575 | /* | |
576 | * Get the directory entry associated with 'filename' from the directory | |
577 | * starting at 'startsect' | |
578 | */ | |
9a800ac7 EN |
579 | __u8 get_dentfromdir_block[MAX_CLUSTSIZE] |
580 | __aligned(ARCH_DMA_MINALIGN); | |
7385c28e | 581 | |
9795e07b BT |
582 | static dir_entry *get_dentfromdir(fsdata *mydata, int startsect, |
583 | char *filename, dir_entry *retdent, | |
584 | int dols) | |
71f95118 | 585 | { |
7385c28e WD |
586 | __u16 prevcksum = 0xffff; |
587 | __u32 curclust = START(retdent); | |
588 | int files = 0, dirs = 0; | |
71f95118 | 589 | |
7385c28e | 590 | debug("get_dentfromdir: %s\n", filename); |
71f95118 | 591 | |
7385c28e WD |
592 | while (1) { |
593 | dir_entry *dentptr; | |
594 | ||
595 | int i; | |
596 | ||
597 | if (get_cluster(mydata, curclust, get_dentfromdir_block, | |
ac497771 | 598 | mydata->clust_size * mydata->sect_size) != 0) { |
7385c28e WD |
599 | debug("Error: reading directory block\n"); |
600 | return NULL; | |
601 | } | |
602 | ||
603 | dentptr = (dir_entry *)get_dentfromdir_block; | |
604 | ||
605 | for (i = 0; i < DIRENTSPERCLUST; i++) { | |
3831530d | 606 | char s_name[14], l_name[VFAT_MAXLEN_BYTES]; |
7385c28e WD |
607 | |
608 | l_name[0] = '\0'; | |
609 | if (dentptr->name[0] == DELETED_FLAG) { | |
610 | dentptr++; | |
611 | continue; | |
612 | } | |
613 | if ((dentptr->attr & ATTR_VOLUME)) { | |
cb940c7e RG |
614 | if (vfat_enabled && |
615 | (dentptr->attr & ATTR_VFAT) == ATTR_VFAT && | |
206d68fd | 616 | (dentptr->name[0] & LAST_LONG_ENTRY_MASK)) { |
7385c28e WD |
617 | prevcksum = ((dir_slot *)dentptr)->alias_checksum; |
618 | get_vfatname(mydata, curclust, | |
619 | get_dentfromdir_block, | |
620 | dentptr, l_name); | |
621 | if (dols) { | |
622 | int isdir; | |
623 | char dirc; | |
624 | int doit = 0; | |
625 | ||
626 | isdir = (dentptr->attr & ATTR_DIR); | |
627 | ||
628 | if (isdir) { | |
629 | dirs++; | |
630 | dirc = '/'; | |
631 | doit = 1; | |
632 | } else { | |
633 | dirc = ' '; | |
634 | if (l_name[0] != 0) { | |
635 | files++; | |
636 | doit = 1; | |
637 | } | |
638 | } | |
639 | if (doit) { | |
640 | if (dirc == ' ') { | |
1ad0b98a SR |
641 | printf(" %8u %s%c\n", |
642 | FAT2CPU32(dentptr->size), | |
7385c28e WD |
643 | l_name, |
644 | dirc); | |
645 | } else { | |
646 | printf(" %s%c\n", | |
647 | l_name, | |
648 | dirc); | |
649 | } | |
650 | } | |
651 | dentptr++; | |
652 | continue; | |
653 | } | |
654 | debug("vfatname: |%s|\n", l_name); | |
cb940c7e | 655 | } else { |
7385c28e WD |
656 | /* Volume label or VFAT entry */ |
657 | dentptr++; | |
658 | continue; | |
659 | } | |
71f95118 | 660 | } |
7385c28e WD |
661 | if (dentptr->name[0] == 0) { |
662 | if (dols) { | |
663 | printf("\n%d file(s), %d dir(s)\n\n", | |
664 | files, dirs); | |
665 | } | |
666 | debug("Dentname == NULL - %d\n", i); | |
667 | return NULL; | |
71f95118 | 668 | } |
cb940c7e RG |
669 | if (vfat_enabled) { |
670 | __u8 csum = mkcksum(dentptr->name, dentptr->ext); | |
671 | if (dols && csum == prevcksum) { | |
672 | prevcksum = 0xffff; | |
673 | dentptr++; | |
674 | continue; | |
675 | } | |
7385c28e | 676 | } |
cb940c7e | 677 | |
7385c28e WD |
678 | get_name(dentptr, s_name); |
679 | if (dols) { | |
680 | int isdir = (dentptr->attr & ATTR_DIR); | |
681 | char dirc; | |
682 | int doit = 0; | |
683 | ||
684 | if (isdir) { | |
685 | dirs++; | |
686 | dirc = '/'; | |
687 | doit = 1; | |
688 | } else { | |
689 | dirc = ' '; | |
690 | if (s_name[0] != 0) { | |
691 | files++; | |
692 | doit = 1; | |
693 | } | |
694 | } | |
695 | ||
696 | if (doit) { | |
697 | if (dirc == ' ') { | |
1ad0b98a SR |
698 | printf(" %8u %s%c\n", |
699 | FAT2CPU32(dentptr->size), | |
7385c28e WD |
700 | s_name, dirc); |
701 | } else { | |
702 | printf(" %s%c\n", | |
703 | s_name, dirc); | |
704 | } | |
705 | } | |
706 | ||
707 | dentptr++; | |
708 | continue; | |
709 | } | |
710 | ||
711 | if (strcmp(filename, s_name) | |
712 | && strcmp(filename, l_name)) { | |
713 | debug("Mismatch: |%s|%s|\n", s_name, l_name); | |
714 | dentptr++; | |
715 | continue; | |
716 | } | |
717 | ||
718 | memcpy(retdent, dentptr, sizeof(dir_entry)); | |
719 | ||
720 | debug("DentName: %s", s_name); | |
721 | debug(", start: 0x%x", START(dentptr)); | |
722 | debug(", size: 0x%x %s\n", | |
723 | FAT2CPU32(dentptr->size), | |
724 | (dentptr->attr & ATTR_DIR) ? "(DIR)" : ""); | |
725 | ||
726 | return retdent; | |
71f95118 | 727 | } |
7385c28e WD |
728 | |
729 | curclust = get_fatent(mydata, curclust); | |
730 | if (CHECK_CLUST(curclust, mydata->fatsize)) { | |
731 | debug("curclust: 0x%x\n", curclust); | |
732 | printf("Invalid FAT entry\n"); | |
733 | return NULL; | |
71f95118 | 734 | } |
71f95118 | 735 | } |
71f95118 | 736 | |
7385c28e | 737 | return NULL; |
71f95118 WD |
738 | } |
739 | ||
71f95118 WD |
740 | /* |
741 | * Read boot sector and volume info from a FAT filesystem | |
742 | */ | |
743 | static int | |
9795e07b | 744 | read_bootsectandvi(boot_sector *bs, volume_info *volinfo, int *fatsize) |
71f95118 | 745 | { |
ac497771 | 746 | __u8 *block; |
71f95118 | 747 | volume_info *vistart; |
ac497771 SS |
748 | int ret = 0; |
749 | ||
750 | if (cur_dev == NULL) { | |
751 | debug("Error: no device selected\n"); | |
752 | return -1; | |
753 | } | |
754 | ||
9a800ac7 | 755 | block = memalign(ARCH_DMA_MINALIGN, cur_dev->blksz); |
ac497771 SS |
756 | if (block == NULL) { |
757 | debug("Error: allocating block\n"); | |
758 | return -1; | |
759 | } | |
71f95118 | 760 | |
9795e07b | 761 | if (disk_read(0, 1, block) < 0) { |
7385c28e | 762 | debug("Error: reading block\n"); |
ac497771 | 763 | goto fail; |
71f95118 WD |
764 | } |
765 | ||
766 | memcpy(bs, block, sizeof(boot_sector)); | |
7385c28e WD |
767 | bs->reserved = FAT2CPU16(bs->reserved); |
768 | bs->fat_length = FAT2CPU16(bs->fat_length); | |
769 | bs->secs_track = FAT2CPU16(bs->secs_track); | |
770 | bs->heads = FAT2CPU16(bs->heads); | |
771 | bs->total_sect = FAT2CPU32(bs->total_sect); | |
71f95118 WD |
772 | |
773 | /* FAT32 entries */ | |
774 | if (bs->fat_length == 0) { | |
775 | /* Assume FAT32 */ | |
776 | bs->fat32_length = FAT2CPU32(bs->fat32_length); | |
7385c28e | 777 | bs->flags = FAT2CPU16(bs->flags); |
71f95118 | 778 | bs->root_cluster = FAT2CPU32(bs->root_cluster); |
7385c28e WD |
779 | bs->info_sector = FAT2CPU16(bs->info_sector); |
780 | bs->backup_boot = FAT2CPU16(bs->backup_boot); | |
781 | vistart = (volume_info *)(block + sizeof(boot_sector)); | |
71f95118 WD |
782 | *fatsize = 32; |
783 | } else { | |
7385c28e | 784 | vistart = (volume_info *)&(bs->fat32_length); |
71f95118 WD |
785 | *fatsize = 0; |
786 | } | |
787 | memcpy(volinfo, vistart, sizeof(volume_info)); | |
788 | ||
71f95118 | 789 | if (*fatsize == 32) { |
7385c28e | 790 | if (strncmp(FAT32_SIGN, vistart->fs_type, SIGNLEN) == 0) |
ac497771 | 791 | goto exit; |
71f95118 | 792 | } else { |
651351fe | 793 | if (strncmp(FAT12_SIGN, vistart->fs_type, SIGNLEN) == 0) { |
71f95118 | 794 | *fatsize = 12; |
ac497771 | 795 | goto exit; |
71f95118 | 796 | } |
651351fe | 797 | if (strncmp(FAT16_SIGN, vistart->fs_type, SIGNLEN) == 0) { |
71f95118 | 798 | *fatsize = 16; |
ac497771 | 799 | goto exit; |
71f95118 WD |
800 | } |
801 | } | |
802 | ||
7385c28e | 803 | debug("Error: broken fs_type sign\n"); |
ac497771 SS |
804 | fail: |
805 | ret = -1; | |
806 | exit: | |
807 | free(block); | |
808 | return ret; | |
71f95118 WD |
809 | } |
810 | ||
1170e634 | 811 | __u8 do_fat_read_at_block[MAX_CLUSTSIZE] |
9a800ac7 | 812 | __aligned(ARCH_DMA_MINALIGN); |
7385c28e | 813 | |
1ad0b98a SR |
814 | int do_fat_read_at(const char *filename, loff_t pos, void *buffer, |
815 | loff_t maxsize, int dols, int dogetsize, loff_t *size) | |
71f95118 | 816 | { |
7385c28e WD |
817 | char fnamecopy[2048]; |
818 | boot_sector bs; | |
819 | volume_info volinfo; | |
820 | fsdata datablock; | |
821 | fsdata *mydata = &datablock; | |
cd1b042c | 822 | dir_entry *dentptr = NULL; |
7385c28e WD |
823 | __u16 prevcksum = 0xffff; |
824 | char *subname = ""; | |
3f270f42 | 825 | __u32 cursect; |
7385c28e WD |
826 | int idx, isdir = 0; |
827 | int files = 0, dirs = 0; | |
1ad0b98a | 828 | int ret = -1; |
7385c28e | 829 | int firsttime; |
40e21916 | 830 | __u32 root_cluster = 0; |
64f65e1e | 831 | __u32 read_blk; |
3f270f42 | 832 | int rootdir_size = 0; |
64f65e1e PM |
833 | int buffer_blk_cnt; |
834 | int do_read; | |
835 | __u8 *dir_ptr; | |
7385c28e WD |
836 | |
837 | if (read_bootsectandvi(&bs, &volinfo, &mydata->fatsize)) { | |
838 | debug("Error: reading boot sector\n"); | |
839 | return -1; | |
840 | } | |
841 | ||
40e21916 SS |
842 | if (mydata->fatsize == 32) { |
843 | root_cluster = bs.root_cluster; | |
7385c28e | 844 | mydata->fatlength = bs.fat32_length; |
40e21916 | 845 | } else { |
7385c28e | 846 | mydata->fatlength = bs.fat_length; |
40e21916 | 847 | } |
7385c28e WD |
848 | |
849 | mydata->fat_sect = bs.reserved; | |
850 | ||
851 | cursect = mydata->rootdir_sect | |
852 | = mydata->fat_sect + mydata->fatlength * bs.fats; | |
853 | ||
ac497771 | 854 | mydata->sect_size = (bs.sector_size[1] << 8) + bs.sector_size[0]; |
7385c28e | 855 | mydata->clust_size = bs.cluster_size; |
46236b14 KM |
856 | if (mydata->sect_size != cur_part_info.blksz) { |
857 | printf("Error: FAT sector size mismatch (fs=%hu, dev=%lu)\n", | |
858 | mydata->sect_size, cur_part_info.blksz); | |
859 | return -1; | |
860 | } | |
7385c28e WD |
861 | |
862 | if (mydata->fatsize == 32) { | |
863 | mydata->data_begin = mydata->rootdir_sect - | |
864 | (mydata->clust_size * 2); | |
865 | } else { | |
7385c28e WD |
866 | rootdir_size = ((bs.dir_entries[1] * (int)256 + |
867 | bs.dir_entries[0]) * | |
868 | sizeof(dir_entry)) / | |
ac497771 | 869 | mydata->sect_size; |
7385c28e WD |
870 | mydata->data_begin = mydata->rootdir_sect + |
871 | rootdir_size - | |
872 | (mydata->clust_size * 2); | |
873 | } | |
874 | ||
875 | mydata->fatbufnum = -1; | |
3c0ed9c3 | 876 | mydata->fat_dirty = 0; |
9a800ac7 | 877 | mydata->fatbuf = memalign(ARCH_DMA_MINALIGN, FATBUFSIZE); |
ac497771 SS |
878 | if (mydata->fatbuf == NULL) { |
879 | debug("Error: allocating memory\n"); | |
880 | return -1; | |
881 | } | |
71f95118 | 882 | |
cb940c7e RG |
883 | if (vfat_enabled) |
884 | debug("VFAT Support enabled\n"); | |
885 | ||
7385c28e WD |
886 | debug("FAT%d, fat_sect: %d, fatlength: %d\n", |
887 | mydata->fatsize, mydata->fat_sect, mydata->fatlength); | |
888 | debug("Rootdir begins at cluster: %d, sector: %d, offset: %x\n" | |
889 | "Data begins at: %d\n", | |
890 | root_cluster, | |
891 | mydata->rootdir_sect, | |
ac497771 SS |
892 | mydata->rootdir_sect * mydata->sect_size, mydata->data_begin); |
893 | debug("Sector size: %d, cluster size: %d\n", mydata->sect_size, | |
894 | mydata->clust_size); | |
7385c28e WD |
895 | |
896 | /* "cwd" is always the root... */ | |
897 | while (ISDIRDELIM(*filename)) | |
898 | filename++; | |
899 | ||
900 | /* Make a copy of the filename and convert it to lowercase */ | |
901 | strcpy(fnamecopy, filename); | |
902 | downcase(fnamecopy); | |
903 | ||
18a10d46 | 904 | root_reparse: |
7385c28e WD |
905 | if (*fnamecopy == '\0') { |
906 | if (!dols) | |
ac497771 | 907 | goto exit; |
71f95118 | 908 | |
7385c28e WD |
909 | dols = LS_ROOT; |
910 | } else if ((idx = dirdelim(fnamecopy)) >= 0) { | |
911 | isdir = 1; | |
912 | fnamecopy[idx] = '\0'; | |
913 | subname = fnamecopy + idx + 1; | |
914 | ||
915 | /* Handle multiple delimiters */ | |
916 | while (ISDIRDELIM(*subname)) | |
917 | subname++; | |
918 | } else if (dols) { | |
919 | isdir = 1; | |
71f95118 | 920 | } |
71f95118 | 921 | |
64f65e1e PM |
922 | buffer_blk_cnt = 0; |
923 | firsttime = 1; | |
7385c28e WD |
924 | while (1) { |
925 | int i; | |
926 | ||
64f65e1e PM |
927 | if (mydata->fatsize == 32 || firsttime) { |
928 | dir_ptr = do_fat_read_at_block; | |
929 | firsttime = 0; | |
930 | } else { | |
931 | /** | |
932 | * FAT16 sector buffer modification: | |
933 | * Each loop, the second buffered block is moved to | |
934 | * the buffer begin, and two next sectors are read | |
935 | * next to the previously moved one. So the sector | |
936 | * buffer keeps always 3 sectors for fat16. | |
937 | * And the current sector is the buffer second sector | |
938 | * beside the "firsttime" read, when it is the first one. | |
939 | * | |
940 | * PREFETCH_BLOCKS is 2 for FAT16 == loop[0:1] | |
941 | * n = computed root dir sector | |
942 | * loop | cursect-1 | cursect | cursect+1 | | |
943 | * 0 | sector n+0 | sector n+1 | none | | |
944 | * 1 | none | sector n+0 | sector n+1 | | |
945 | * 0 | sector n+1 | sector n+2 | sector n+3 | | |
946 | * 1 | sector n+3 | ... | |
947 | */ | |
948 | dir_ptr = (do_fat_read_at_block + mydata->sect_size); | |
949 | memcpy(do_fat_read_at_block, dir_ptr, mydata->sect_size); | |
950 | } | |
951 | ||
952 | do_read = 1; | |
953 | ||
954 | if (mydata->fatsize == 32 && buffer_blk_cnt) | |
955 | do_read = 0; | |
956 | ||
957 | if (do_read) { | |
958 | read_blk = (mydata->fatsize == 32) ? | |
959 | mydata->clust_size : PREFETCH_BLOCKS; | |
960 | ||
961 | debug("FAT read(sect=%d, cnt:%d), clust_size=%d, DIRENTSPERBLOCK=%zd\n", | |
962 | cursect, read_blk, mydata->clust_size, DIRENTSPERBLOCK); | |
7385c28e | 963 | |
64f65e1e | 964 | if (disk_read(cursect, read_blk, dir_ptr) < 0) { |
cd1b042c BT |
965 | debug("Error: reading rootdir block\n"); |
966 | goto exit; | |
967 | } | |
7385c28e | 968 | |
64f65e1e | 969 | dentptr = (dir_entry *)dir_ptr; |
cd1b042c | 970 | } |
7385c28e WD |
971 | |
972 | for (i = 0; i < DIRENTSPERBLOCK; i++) { | |
3831530d | 973 | char s_name[14], l_name[VFAT_MAXLEN_BYTES]; |
ff04f6d1 | 974 | __u8 csum; |
7385c28e WD |
975 | |
976 | l_name[0] = '\0'; | |
3831530d MZ |
977 | if (dentptr->name[0] == DELETED_FLAG) { |
978 | dentptr++; | |
979 | continue; | |
980 | } | |
ff04f6d1 | 981 | |
cb940c7e RG |
982 | if (vfat_enabled) |
983 | csum = mkcksum(dentptr->name, dentptr->ext); | |
984 | ||
ff04f6d1 | 985 | if (dentptr->attr & ATTR_VOLUME) { |
cb940c7e RG |
986 | if (vfat_enabled && |
987 | (dentptr->attr & ATTR_VFAT) == ATTR_VFAT && | |
7385c28e WD |
988 | (dentptr->name[0] & LAST_LONG_ENTRY_MASK)) { |
989 | prevcksum = | |
990 | ((dir_slot *)dentptr)->alias_checksum; | |
991 | ||
3831530d | 992 | get_vfatname(mydata, |
40e21916 | 993 | root_cluster, |
64f65e1e | 994 | dir_ptr, |
7385c28e WD |
995 | dentptr, l_name); |
996 | ||
997 | if (dols == LS_ROOT) { | |
998 | char dirc; | |
999 | int doit = 0; | |
1000 | int isdir = | |
1001 | (dentptr->attr & ATTR_DIR); | |
1002 | ||
1003 | if (isdir) { | |
1004 | dirs++; | |
1005 | dirc = '/'; | |
1006 | doit = 1; | |
1007 | } else { | |
1008 | dirc = ' '; | |
1009 | if (l_name[0] != 0) { | |
1010 | files++; | |
1011 | doit = 1; | |
1012 | } | |
1013 | } | |
1014 | if (doit) { | |
1015 | if (dirc == ' ') { | |
1ad0b98a SR |
1016 | printf(" %8u %s%c\n", |
1017 | FAT2CPU32(dentptr->size), | |
7385c28e WD |
1018 | l_name, |
1019 | dirc); | |
1020 | } else { | |
1021 | printf(" %s%c\n", | |
1022 | l_name, | |
1023 | dirc); | |
1024 | } | |
1025 | } | |
1026 | dentptr++; | |
1027 | continue; | |
1028 | } | |
1029 | debug("Rootvfatname: |%s|\n", | |
1030 | l_name); | |
cb940c7e | 1031 | } else { |
7385c28e WD |
1032 | /* Volume label or VFAT entry */ |
1033 | dentptr++; | |
1034 | continue; | |
1035 | } | |
1036 | } else if (dentptr->name[0] == 0) { | |
1037 | debug("RootDentname == NULL - %d\n", i); | |
1038 | if (dols == LS_ROOT) { | |
1039 | printf("\n%d file(s), %d dir(s)\n\n", | |
1040 | files, dirs); | |
ac497771 | 1041 | ret = 0; |
7385c28e | 1042 | } |
ac497771 | 1043 | goto exit; |
71f95118 | 1044 | } |
cb940c7e RG |
1045 | else if (vfat_enabled && |
1046 | dols == LS_ROOT && csum == prevcksum) { | |
bf34e7d9 | 1047 | prevcksum = 0xffff; |
7385c28e WD |
1048 | dentptr++; |
1049 | continue; | |
71f95118 | 1050 | } |
cb940c7e | 1051 | |
7385c28e WD |
1052 | get_name(dentptr, s_name); |
1053 | ||
1054 | if (dols == LS_ROOT) { | |
1055 | int isdir = (dentptr->attr & ATTR_DIR); | |
1056 | char dirc; | |
1057 | int doit = 0; | |
1058 | ||
1059 | if (isdir) { | |
1060 | dirc = '/'; | |
1061 | if (s_name[0] != 0) { | |
1062 | dirs++; | |
1063 | doit = 1; | |
1064 | } | |
1065 | } else { | |
1066 | dirc = ' '; | |
1067 | if (s_name[0] != 0) { | |
1068 | files++; | |
1069 | doit = 1; | |
1070 | } | |
1071 | } | |
1072 | if (doit) { | |
1073 | if (dirc == ' ') { | |
1ad0b98a SR |
1074 | printf(" %8u %s%c\n", |
1075 | FAT2CPU32(dentptr->size), | |
7385c28e WD |
1076 | s_name, dirc); |
1077 | } else { | |
1078 | printf(" %s%c\n", | |
1079 | s_name, dirc); | |
1080 | } | |
1081 | } | |
1082 | dentptr++; | |
1083 | continue; | |
1084 | } | |
1085 | ||
1086 | if (strcmp(fnamecopy, s_name) | |
1087 | && strcmp(fnamecopy, l_name)) { | |
1088 | debug("RootMismatch: |%s|%s|\n", s_name, | |
1089 | l_name); | |
1090 | dentptr++; | |
1091 | continue; | |
1092 | } | |
1093 | ||
1094 | if (isdir && !(dentptr->attr & ATTR_DIR)) | |
ac497771 | 1095 | goto exit; |
7385c28e WD |
1096 | |
1097 | debug("RootName: %s", s_name); | |
1098 | debug(", start: 0x%x", START(dentptr)); | |
1099 | debug(", size: 0x%x %s\n", | |
1100 | FAT2CPU32(dentptr->size), | |
1101 | isdir ? "(DIR)" : ""); | |
1102 | ||
1103 | goto rootdir_done; /* We got a match */ | |
71f95118 | 1104 | } |
64f65e1e | 1105 | debug("END LOOP: buffer_blk_cnt=%d clust_size=%d\n", buffer_blk_cnt, |
7385c28e WD |
1106 | mydata->clust_size); |
1107 | ||
1108 | /* | |
1109 | * On FAT32 we must fetch the FAT entries for the next | |
1110 | * root directory clusters when a cluster has been | |
1111 | * completely processed. | |
1112 | */ | |
64f65e1e | 1113 | ++buffer_blk_cnt; |
cd1b042c BT |
1114 | int rootdir_end = 0; |
1115 | if (mydata->fatsize == 32) { | |
64f65e1e | 1116 | if (buffer_blk_cnt == mydata->clust_size) { |
cd1b042c BT |
1117 | int nxtsect = 0; |
1118 | int nxt_clust = 0; | |
7385c28e | 1119 | |
cd1b042c BT |
1120 | nxt_clust = get_fatent(mydata, root_cluster); |
1121 | rootdir_end = CHECK_CLUST(nxt_clust, 32); | |
7385c28e | 1122 | |
cd1b042c BT |
1123 | nxtsect = mydata->data_begin + |
1124 | (nxt_clust * mydata->clust_size); | |
7385c28e | 1125 | |
cd1b042c | 1126 | root_cluster = nxt_clust; |
7385c28e | 1127 | |
cd1b042c | 1128 | cursect = nxtsect; |
64f65e1e | 1129 | buffer_blk_cnt = 0; |
cd1b042c | 1130 | } |
71f95118 | 1131 | } else { |
64f65e1e PM |
1132 | if (buffer_blk_cnt == PREFETCH_BLOCKS) |
1133 | buffer_blk_cnt = 0; | |
cd1b042c BT |
1134 | |
1135 | rootdir_end = (++cursect - mydata->rootdir_sect >= | |
1136 | rootdir_size); | |
71f95118 | 1137 | } |
3f270f42 EH |
1138 | |
1139 | /* If end of rootdir reached */ | |
cd1b042c | 1140 | if (rootdir_end) { |
3f270f42 EH |
1141 | if (dols == LS_ROOT) { |
1142 | printf("\n%d file(s), %d dir(s)\n\n", | |
1143 | files, dirs); | |
1ad0b98a | 1144 | *size = 0; |
3f270f42 | 1145 | } |
ac497771 | 1146 | goto exit; |
3f270f42 | 1147 | } |
7385c28e WD |
1148 | } |
1149 | rootdir_done: | |
71f95118 | 1150 | |
7385c28e | 1151 | firsttime = 1; |
71f95118 | 1152 | |
7385c28e WD |
1153 | while (isdir) { |
1154 | int startsect = mydata->data_begin | |
1155 | + START(dentptr) * mydata->clust_size; | |
1156 | dir_entry dent; | |
1157 | char *nextname = NULL; | |
71f95118 | 1158 | |
7385c28e WD |
1159 | dent = *dentptr; |
1160 | dentptr = &dent; | |
71f95118 | 1161 | |
7385c28e WD |
1162 | idx = dirdelim(subname); |
1163 | ||
1164 | if (idx >= 0) { | |
1165 | subname[idx] = '\0'; | |
1166 | nextname = subname + idx + 1; | |
1167 | /* Handle multiple delimiters */ | |
1168 | while (ISDIRDELIM(*nextname)) | |
1169 | nextname++; | |
1170 | if (dols && *nextname == '\0') | |
1171 | firsttime = 0; | |
1172 | } else { | |
1173 | if (dols && firsttime) { | |
1174 | firsttime = 0; | |
1175 | } else { | |
1176 | isdir = 0; | |
1177 | } | |
1178 | } | |
1179 | ||
1180 | if (get_dentfromdir(mydata, startsect, subname, dentptr, | |
1181 | isdir ? 0 : dols) == NULL) { | |
1182 | if (dols && !isdir) | |
1ad0b98a | 1183 | *size = 0; |
ac497771 | 1184 | goto exit; |
7385c28e WD |
1185 | } |
1186 | ||
7ee46ceb BT |
1187 | if (isdir && !(dentptr->attr & ATTR_DIR)) |
1188 | goto exit; | |
1189 | ||
18a10d46 SW |
1190 | /* |
1191 | * If we are looking for a directory, and found a directory | |
1192 | * type entry, and the entry is for the root directory (as | |
1193 | * denoted by a cluster number of 0), jump back to the start | |
1194 | * of the function, since at least on FAT12/16, the root dir | |
1195 | * lives in a hard-coded location and needs special handling | |
1196 | * to parse, rather than simply following the cluster linked | |
1197 | * list in the FAT, like other directories. | |
1198 | */ | |
1199 | if (isdir && (dentptr->attr & ATTR_DIR) && !START(dentptr)) { | |
1200 | /* | |
1201 | * Modify the filename to remove the prefix that gets | |
1202 | * back to the root directory, so the initial root dir | |
1203 | * parsing code can continue from where we are without | |
1204 | * confusion. | |
1205 | */ | |
1206 | strcpy(fnamecopy, nextname ?: ""); | |
1207 | /* | |
1208 | * Set up state the same way as the function does when | |
1209 | * first started. This is required for the root dir | |
1210 | * parsing code operates in its expected environment. | |
1211 | */ | |
1212 | subname = ""; | |
1213 | cursect = mydata->rootdir_sect; | |
1214 | isdir = 0; | |
1215 | goto root_reparse; | |
1216 | } | |
1217 | ||
7ee46ceb | 1218 | if (idx >= 0) |
7385c28e | 1219 | subname = nextname; |
71f95118 | 1220 | } |
71f95118 | 1221 | |
1ad0b98a SR |
1222 | if (dogetsize) { |
1223 | *size = FAT2CPU32(dentptr->size); | |
1224 | ret = 0; | |
1225 | } else { | |
1226 | ret = get_contents(mydata, dentptr, pos, buffer, maxsize, size); | |
1227 | } | |
1228 | debug("Size: %u, got: %llu\n", FAT2CPU32(dentptr->size), *size); | |
71f95118 | 1229 | |
ac497771 SS |
1230 | exit: |
1231 | free(mydata->fatbuf); | |
7385c28e WD |
1232 | return ret; |
1233 | } | |
71f95118 | 1234 | |
1ad0b98a SR |
1235 | int do_fat_read(const char *filename, void *buffer, loff_t maxsize, int dols, |
1236 | loff_t *actread) | |
1170e634 | 1237 | { |
1ad0b98a | 1238 | return do_fat_read_at(filename, 0, buffer, maxsize, dols, 0, actread); |
1170e634 BT |
1239 | } |
1240 | ||
9795e07b | 1241 | int file_fat_detectfs(void) |
71f95118 | 1242 | { |
7385c28e WD |
1243 | boot_sector bs; |
1244 | volume_info volinfo; | |
1245 | int fatsize; | |
1246 | char vol_label[12]; | |
71f95118 | 1247 | |
7385c28e | 1248 | if (cur_dev == NULL) { |
7205e407 WD |
1249 | printf("No current device\n"); |
1250 | return 1; | |
1251 | } | |
7385c28e | 1252 | |
fc843a02 | 1253 | #if defined(CONFIG_IDE) || \ |
8c5170a7 | 1254 | defined(CONFIG_CMD_SATA) || \ |
c649e3c9 | 1255 | defined(CONFIG_SCSI) || \ |
dd60d122 | 1256 | defined(CONFIG_CMD_USB) || \ |
21f6f963 | 1257 | defined(CONFIG_MMC) |
7205e407 | 1258 | printf("Interface: "); |
7385c28e WD |
1259 | switch (cur_dev->if_type) { |
1260 | case IF_TYPE_IDE: | |
1261 | printf("IDE"); | |
1262 | break; | |
1263 | case IF_TYPE_SATA: | |
1264 | printf("SATA"); | |
1265 | break; | |
1266 | case IF_TYPE_SCSI: | |
1267 | printf("SCSI"); | |
1268 | break; | |
1269 | case IF_TYPE_ATAPI: | |
1270 | printf("ATAPI"); | |
1271 | break; | |
1272 | case IF_TYPE_USB: | |
1273 | printf("USB"); | |
1274 | break; | |
1275 | case IF_TYPE_DOC: | |
1276 | printf("DOC"); | |
1277 | break; | |
1278 | case IF_TYPE_MMC: | |
1279 | printf("MMC"); | |
1280 | break; | |
1281 | default: | |
1282 | printf("Unknown"); | |
7205e407 | 1283 | } |
7385c28e | 1284 | |
bcce53d0 | 1285 | printf("\n Device %d: ", cur_dev->devnum); |
7205e407 WD |
1286 | dev_print(cur_dev); |
1287 | #endif | |
7385c28e WD |
1288 | |
1289 | if (read_bootsectandvi(&bs, &volinfo, &fatsize)) { | |
7205e407 WD |
1290 | printf("\nNo valid FAT fs found\n"); |
1291 | return 1; | |
1292 | } | |
7385c28e WD |
1293 | |
1294 | memcpy(vol_label, volinfo.volume_label, 11); | |
7205e407 | 1295 | vol_label[11] = '\0'; |
7385c28e WD |
1296 | volinfo.fs_type[5] = '\0'; |
1297 | ||
461f86e6 | 1298 | printf("Filesystem: %s \"%s\"\n", volinfo.fs_type, vol_label); |
7385c28e | 1299 | |
7205e407 | 1300 | return 0; |
71f95118 WD |
1301 | } |
1302 | ||
9795e07b | 1303 | int file_fat_ls(const char *dir) |
71f95118 | 1304 | { |
1ad0b98a SR |
1305 | loff_t size; |
1306 | ||
1307 | return do_fat_read(dir, NULL, 0, LS_YES, &size); | |
71f95118 WD |
1308 | } |
1309 | ||
b7b5f319 SW |
1310 | int fat_exists(const char *filename) |
1311 | { | |
1ad0b98a SR |
1312 | int ret; |
1313 | loff_t size; | |
1314 | ||
1315 | ret = do_fat_read_at(filename, 0, NULL, 0, LS_NO, 1, &size); | |
1316 | return ret == 0; | |
b7b5f319 SW |
1317 | } |
1318 | ||
d455d878 | 1319 | int fat_size(const char *filename, loff_t *size) |
cf659819 | 1320 | { |
d455d878 | 1321 | return do_fat_read_at(filename, 0, NULL, 0, LS_NO, 1, size); |
cf659819 SW |
1322 | } |
1323 | ||
1ad0b98a SR |
1324 | int file_fat_read_at(const char *filename, loff_t pos, void *buffer, |
1325 | loff_t maxsize, loff_t *actread) | |
71f95118 | 1326 | { |
7385c28e | 1327 | printf("reading %s\n", filename); |
1ad0b98a SR |
1328 | return do_fat_read_at(filename, pos, buffer, maxsize, LS_NO, 0, |
1329 | actread); | |
1170e634 BT |
1330 | } |
1331 | ||
1ad0b98a | 1332 | int file_fat_read(const char *filename, void *buffer, int maxsize) |
1170e634 | 1333 | { |
1ad0b98a SR |
1334 | loff_t actread; |
1335 | int ret; | |
1336 | ||
1337 | ret = file_fat_read_at(filename, 0, buffer, maxsize, &actread); | |
1338 | if (ret) | |
1339 | return ret; | |
1340 | else | |
1341 | return actread; | |
71f95118 | 1342 | } |
e6d52415 | 1343 | |
d455d878 SR |
1344 | int fat_read_file(const char *filename, void *buf, loff_t offset, loff_t len, |
1345 | loff_t *actread) | |
e6d52415 | 1346 | { |
1ad0b98a | 1347 | int ret; |
e6d52415 | 1348 | |
d455d878 SR |
1349 | ret = file_fat_read_at(filename, offset, buf, len, actread); |
1350 | if (ret) | |
e6d52415 | 1351 | printf("** Unable to read file %s **\n", filename); |
e6d52415 | 1352 | |
d455d878 | 1353 | return ret; |
e6d52415 SG |
1354 | } |
1355 | ||
1356 | void fat_close(void) | |
1357 | { | |
1358 | } |