blob: 4b411b3d37f4e99890347dd793354a3460b29dd7 [file] [log] [blame]
wdenk2262cfe2002-11-18 00:14:45 +00001/*
2 * (C) Copyright 2002
3 * Stäubli Faverges - <www.staubli.com>
4 * Pierre AUBERT p.aubert@staubli.com
5 *
6 * See file CREDITS for list of people who contributed to this
7 * project.
8 *
9 * This program is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU General Public License as
11 * published by the Free Software Foundation; either version 2 of
12 * the License, or (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
22 * MA 02111-1307 USA
23 */
24
25/*
26 * Dos floppy support
27 */
28
29#include <common.h>
30#include <config.h>
31#include <command.h>
32#include <fdc.h>
33
34#if (CONFIG_COMMANDS & CFG_CMD_FDOS)
35
36/*-----------------------------------------------------------------------------
37 * do_fdosboot --
38 *-----------------------------------------------------------------------------
39 */
40int do_fdosboot(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
41{
42 char *name;
43 char *ep;
44 int size;
45 int rcode = 0;
46 char buf [10];
47 int drive = CFG_FDC_DRIVE_NUMBER;
48
49 /* pre-set load_addr */
50 if ((ep = getenv("loadaddr")) != NULL) {
51 load_addr = simple_strtoul(ep, NULL, 16);
52 }
53
54 /* pre-set Boot file name */
55 if ((name = getenv("bootfile")) == NULL) {
wdenk3bac3512003-03-12 10:41:04 +000056 name = "uImage";
wdenk2262cfe2002-11-18 00:14:45 +000057 }
58
59 switch (argc) {
60 case 1:
61 break;
62 case 2:
63 /* only one arg - accept two forms:
64 * just load address, or just boot file name.
65 * The latter form must be written "filename" here.
66 */
67 if (argv[1][0] == '"') { /* just boot filename */
68 name = argv [1];
69 } else { /* load address */
70 load_addr = simple_strtoul(argv[1], NULL, 16);
71 }
72 break;
73 case 3:
74 load_addr = simple_strtoul(argv[1], NULL, 16);
75 name = argv [2];
76 break;
77 default:
78 printf ("Usage:\n%s\n", cmdtp->usage);
79 break;
80 }
81
82 /* Init physical layer */
83 if (!fdc_fdos_init (drive)) {
84 return (-1);
85 }
86
87 /* Open file */
88 if (dos_open (name) < 0) {
89 printf ("Unable to open %s\n", name);
90 return 1;
91 }
92 if ((size = dos_read (load_addr)) < 0) {
93 printf ("boot error\n");
94 return 1;
95 }
96 flush_cache (load_addr, size);
97
98 sprintf(buf, "%x", size);
99 setenv("filesize", buf);
100
101 printf("Floppy DOS load complete: %d bytes loaded to 0x%lx\n",
102 size, load_addr);
103
104 /* Check if we should attempt an auto-start */
105 if (((ep = getenv("autostart")) != NULL) && (strcmp(ep,"yes") == 0)) {
106 char *local_args[2];
107 extern int do_bootm (cmd_tbl_t *, int, int, char *[]);
108 local_args[0] = argv[0];
109 local_args[1] = NULL;
110 printf ("Automatic boot of image at addr 0x%08lX ...\n", load_addr);
111 rcode = do_bootm (cmdtp, 0, 1, local_args);
112 }
113 return rcode;
114}
115
116/*-----------------------------------------------------------------------------
117 * do_fdosls --
118 *-----------------------------------------------------------------------------
119 */
120int do_fdosls(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
121{
122 char *path = "";
123 int drive = CFG_FDC_DRIVE_NUMBER;
124
125 switch (argc) {
126 case 1:
127 break;
128 case 2:
129 path = argv [1];
130 break;
131 }
132
133 /* Init physical layer */
134 if (!fdc_fdos_init (drive)) {
135 return (-1);
136 }
137 /* Open directory */
138 if (dos_open (path) < 0) {
139 printf ("Unable to open %s\n", path);
140 return 1;
141 }
142 return (dos_dir ());
143}
144
145#endif