Merge commit 'upstream/master'
[platform/kernel/u-boot.git] / common / cmd_fat.c
1 /*
2  * (C) Copyright 2002
3  * Richard Jones, rjones@nexus-tech.net
4  *
5  * See file CREDITS for list of people who contributed to this
6  * project.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License as
10  * published by the Free Software Foundation; either version 2 of
11  * the License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21  * MA 02111-1307 USA
22  */
23
24 /*
25  * Boot support
26  */
27 #include <common.h>
28 #include <command.h>
29 #include <s_record.h>
30 #include <net.h>
31 #include <ata.h>
32 #include <part.h>
33
34 #if defined(CONFIG_CMD_FAT)
35
36 #undef  DEBUG
37
38 #include <fat.h>
39
40
41 int do_fat_fsload (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
42 {
43         long size;
44         unsigned long offset;
45         unsigned long count;
46         char buf [12];
47         block_dev_desc_t *dev_desc=NULL;
48         int dev=0;
49         int part=1;
50         char *ep;
51
52         if (argc < 5) {
53                 printf ("usage: fatload <interface> <dev[:part]> <addr> <filename> [bytes]\n");
54                 return 1;
55         }
56         dev = (int)simple_strtoul (argv[2], &ep, 16);
57         dev_desc=get_dev(argv[1],dev);
58         if (dev_desc==NULL) {
59                 puts ("\n** Invalid boot device **\n");
60                 return 1;
61         }
62         if (*ep) {
63                 if (*ep != ':') {
64                         puts ("\n** Invalid boot device, use `dev[:part]' **\n");
65                         return 1;
66                 }
67                 part = (int)simple_strtoul(++ep, NULL, 16);
68         }
69         if (fat_register_device(dev_desc,part)!=0) {
70                 printf ("\n** Unable to use %s %d:%d for fatload **\n",argv[1],dev,part);
71                 return 1;
72         }
73         offset = simple_strtoul (argv[3], NULL, 16);
74         if (argc == 6)
75                 count = simple_strtoul (argv[5], NULL, 16);
76         else
77                 count = 0;
78         size = file_fat_read (argv[4], (unsigned char *) offset, count);
79
80         if(size==-1) {
81                 printf("\n** Unable to read \"%s\" from %s %d:%d **\n",argv[4],argv[1],dev,part);
82                 return 1;
83         }
84
85         printf ("\n%ld bytes read\n", size);
86
87         sprintf(buf, "%lX", size);
88         setenv("filesize", buf);
89
90         return 0;
91 }
92
93
94 U_BOOT_CMD(
95         fatload,        6,      0,      do_fat_fsload,
96         "fatload - load binary file from a dos filesystem\n",
97         "<interface> <dev[:part]>  <addr> <filename> [bytes]\n"
98         "    - load binary file 'filename' from 'dev' on 'interface'\n"
99         "      to address 'addr' from dos filesystem\n"
100 );
101
102 int do_fat_ls (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
103 {
104         char *filename = "/";
105         int ret;
106         int dev=0;
107         int part=1;
108         char *ep;
109         block_dev_desc_t *dev_desc=NULL;
110
111         if (argc < 3) {
112                 printf ("usage: fatls <interface> <dev[:part]> [directory]\n");
113                 return (0);
114         }
115         dev = (int)simple_strtoul (argv[2], &ep, 16);
116         dev_desc=get_dev(argv[1],dev);
117         if (dev_desc==NULL) {
118                 puts ("\n** Invalid boot device **\n");
119                 return 1;
120         }
121         if (*ep) {
122                 if (*ep != ':') {
123                         puts ("\n** Invalid boot device, use `dev[:part]' **\n");
124                         return 1;
125                 }
126                 part = (int)simple_strtoul(++ep, NULL, 16);
127         }
128         if (fat_register_device(dev_desc,part)!=0) {
129                 printf ("\n** Unable to use %s %d:%d for fatls **\n",argv[1],dev,part);
130                 return 1;
131         }
132         if (argc == 4)
133                 ret = file_fat_ls (argv[3]);
134         else
135                 ret = file_fat_ls (filename);
136
137         if(ret!=0)
138                 printf("No Fat FS detected\n");
139         return (ret);
140 }
141
142 U_BOOT_CMD(
143         fatls,  4,      1,      do_fat_ls,
144         "fatls   - list files in a directory (default /)\n",
145         "<interface> <dev[:part]> [directory]\n"
146         "    - list files from 'dev' on 'interface' in a 'directory'\n"
147 );
148
149 int do_fat_fsinfo (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
150 {
151         int dev=0;
152         int part=1;
153         char *ep;
154         block_dev_desc_t *dev_desc=NULL;
155
156         if (argc < 2) {
157                 printf ("usage: fatinfo <interface> <dev[:part]>\n");
158                 return (0);
159         }
160         dev = (int)simple_strtoul (argv[2], &ep, 16);
161         dev_desc=get_dev(argv[1],dev);
162         if (dev_desc==NULL) {
163                 puts ("\n** Invalid boot device **\n");
164                 return 1;
165         }
166         if (*ep) {
167                 if (*ep != ':') {
168                         puts ("\n** Invalid boot device, use `dev[:part]' **\n");
169                         return 1;
170                 }
171                 part = (int)simple_strtoul(++ep, NULL, 16);
172         }
173         if (fat_register_device(dev_desc,part)!=0) {
174                 printf ("\n** Unable to use %s %d:%d for fatinfo **\n",argv[1],dev,part);
175                 return 1;
176         }
177         return (file_fat_detectfs ());
178 }
179
180 U_BOOT_CMD(
181         fatinfo,        3,      1,      do_fat_fsinfo,
182         "fatinfo - print information about filesystem\n",
183         "<interface> <dev[:part]>\n"
184         "    - print information about filesystem from 'dev' on 'interface'\n"
185 );
186
187 #ifdef NOT_IMPLEMENTED_YET
188 /* find first device whose first partition is a DOS filesystem */
189 int find_fat_partition (void)
190 {
191         int i, j;
192         block_dev_desc_t *dev_desc;
193         unsigned char *part_table;
194         unsigned char buffer[ATA_BLOCKSIZE];
195
196         for (i = 0; i < CFG_IDE_MAXDEVICE; i++) {
197                 dev_desc = ide_get_dev (i);
198                 if (!dev_desc) {
199                         debug ("couldn't get ide device!\n");
200                         return (-1);
201                 }
202                 if (dev_desc->part_type == PART_TYPE_DOS) {
203                         if (dev_desc->
204                                 block_read (dev_desc->dev, 0, 1, (ulong *) buffer) != 1) {
205                                 debug ("can't perform block_read!\n");
206                                 return (-1);
207                         }
208                         part_table = &buffer[0x1be];    /* start with partition #4 */
209                         for (j = 0; j < 4; j++) {
210                                 if ((part_table[4] == 1 ||      /* 12-bit FAT */
211                                      part_table[4] == 4 ||      /* 16-bit FAT */
212                                      part_table[4] == 6) &&     /* > 32Meg part */
213                                     part_table[0] == 0x80) {    /* bootable? */
214                                         curr_dev = i;
215                                         part_offset = part_table[11];
216                                         part_offset <<= 8;
217                                         part_offset |= part_table[10];
218                                         part_offset <<= 8;
219                                         part_offset |= part_table[9];
220                                         part_offset <<= 8;
221                                         part_offset |= part_table[8];
222                                         debug ("found partition start at %ld\n", part_offset);
223                                         return (0);
224                                 }
225                                 part_table += 16;
226                         }
227                 }
228         }
229
230         debug ("no valid devices found!\n");
231         return (-1);
232 }
233
234 int
235 do_fat_dump (cmd_tbl_t *cmdtp, bd_t *bd, int flag, int argc, char *argv[])
236 {
237         __u8 block[1024];
238         int ret;
239         int bknum;
240
241         ret = 0;
242
243         if (argc != 2) {
244                 printf ("needs an argument!\n");
245                 return (0);
246         }
247
248         bknum = simple_strtoul (argv[1], NULL, 10);
249
250         if (disk_read (0, bknum, block) != 0) {
251                 printf ("Error: reading block\n");
252                 return -1;
253         }
254         printf ("FAT dump: %d\n", bknum);
255         hexdump (512, block);
256
257         return (ret);
258 }
259
260 int disk_read (__u32 startblock, __u32 getsize, __u8 *bufptr)
261 {
262         ulong tot;
263         block_dev_desc_t *dev_desc;
264
265         if (curr_dev < 0) {
266                 if (find_fat_partition () != 0)
267                         return (-1);
268         }
269
270         dev_desc = ide_get_dev (curr_dev);
271         if (!dev_desc) {
272                 debug ("couldn't get ide device\n");
273                 return (-1);
274         }
275
276         tot = dev_desc->block_read (0, startblock + part_offset,
277                                     getsize, (ulong *) bufptr);
278
279         /* should we do this here?
280            flush_cache ((ulong)buf, cnt*ide_dev_desc[device].blksz);
281          */
282
283         if (tot == getsize)
284                 return (0);
285
286         debug ("unable to read from device!\n");
287
288         return (-1);
289 }
290
291
292 static int isprint (unsigned char ch)
293 {
294         if (ch >= 32 && ch < 127)
295                 return (1);
296
297         return (0);
298 }
299
300
301 void hexdump (int cnt, unsigned char *data)
302 {
303         int i;
304         int run;
305         int offset;
306
307         offset = 0;
308         while (cnt) {
309                 printf ("%04X : ", offset);
310                 if (cnt >= 16)
311                         run = 16;
312                 else
313                         run = cnt;
314                 cnt -= run;
315                 for (i = 0; i < run; i++)
316                         printf ("%02X ", (unsigned int) data[i]);
317                 printf (": ");
318                 for (i = 0; i < run; i++)
319                         printf ("%c", isprint (data[i]) ? data[i] : '.');
320                 printf ("\n");
321                 data = &data[16];
322                 offset += run;
323         }
324 }
325 #endif  /* NOT_IMPLEMENTED_YET */
326
327 #endif