blob: dc02b3595c2a64035faf7021e7a3013b459c87ee [file] [log] [blame]
wdenk591dda52002-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/*-----------------------------------------------------------------------------
wdenk57b2d802003-06-27 21:31:46 +000037 * do_fdosboot --
wdenk591dda52002-11-18 00:14:45 +000038 *-----------------------------------------------------------------------------
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;
wdenk7182b0f2003-10-06 21:55:32 +000046 char buf [12];
wdenk591dda52002-11-18 00:14:45 +000047 int drive = CFG_FDC_DRIVE_NUMBER;
wdenk57b2d802003-06-27 21:31:46 +000048
wdenk591dda52002-11-18 00:14:45 +000049 /* pre-set load_addr */
50 if ((ep = getenv("loadaddr")) != NULL) {
wdenk57b2d802003-06-27 21:31:46 +000051 load_addr = simple_strtoul(ep, NULL, 16);
wdenk591dda52002-11-18 00:14:45 +000052 }
53
54 /* pre-set Boot file name */
55 if ((name = getenv("bootfile")) == NULL) {
wdenk57b2d802003-06-27 21:31:46 +000056 name = "uImage";
wdenk591dda52002-11-18 00:14:45 +000057 }
58
59 switch (argc) {
60 case 1:
wdenk57b2d802003-06-27 21:31:46 +000061 break;
wdenk591dda52002-11-18 00:14:45 +000062 case 2:
63 /* only one arg - accept two forms:
wdenk57b2d802003-06-27 21:31:46 +000064 * 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;
wdenk591dda52002-11-18 00:14:45 +000073 case 3:
wdenk57b2d802003-06-27 21:31:46 +000074 load_addr = simple_strtoul(argv[1], NULL, 16);
75 name = argv [2];
76 break;
wdenk591dda52002-11-18 00:14:45 +000077 default:
wdenk57b2d802003-06-27 21:31:46 +000078 printf ("Usage:\n%s\n", cmdtp->usage);
79 break;
wdenk591dda52002-11-18 00:14:45 +000080 }
81
82 /* Init physical layer */
83 if (!fdc_fdos_init (drive)) {
wdenk57b2d802003-06-27 21:31:46 +000084 return (-1);
wdenk591dda52002-11-18 00:14:45 +000085 }
wdenk57b2d802003-06-27 21:31:46 +000086
wdenk591dda52002-11-18 00:14:45 +000087 /* Open file */
88 if (dos_open (name) < 0) {
wdenk57b2d802003-06-27 21:31:46 +000089 printf ("Unable to open %s\n", name);
90 return 1;
wdenk591dda52002-11-18 00:14:45 +000091 }
92 if ((size = dos_read (load_addr)) < 0) {
wdenk57b2d802003-06-27 21:31:46 +000093 printf ("boot error\n");
94 return 1;
wdenk591dda52002-11-18 00:14:45 +000095 }
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",
wdenk57b2d802003-06-27 21:31:46 +0000102 size, load_addr);
103
wdenk591dda52002-11-18 00:14:45 +0000104 /* Check if we should attempt an auto-start */
105 if (((ep = getenv("autostart")) != NULL) && (strcmp(ep,"yes") == 0)) {
wdenk57b2d802003-06-27 21:31:46 +0000106 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);
wdenk591dda52002-11-18 00:14:45 +0000112 }
113 return rcode;
114}
115
116/*-----------------------------------------------------------------------------
wdenk57b2d802003-06-27 21:31:46 +0000117 * do_fdosls --
wdenk591dda52002-11-18 00:14:45 +0000118 *-----------------------------------------------------------------------------
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;
wdenk57b2d802003-06-27 21:31:46 +0000124
wdenk591dda52002-11-18 00:14:45 +0000125 switch (argc) {
126 case 1:
wdenk57b2d802003-06-27 21:31:46 +0000127 break;
wdenk591dda52002-11-18 00:14:45 +0000128 case 2:
wdenk57b2d802003-06-27 21:31:46 +0000129 path = argv [1];
130 break;
wdenk591dda52002-11-18 00:14:45 +0000131 }
132
133 /* Init physical layer */
134 if (!fdc_fdos_init (drive)) {
wdenk57b2d802003-06-27 21:31:46 +0000135 return (-1);
wdenk591dda52002-11-18 00:14:45 +0000136 }
137 /* Open directory */
138 if (dos_open (path) < 0) {
wdenk57b2d802003-06-27 21:31:46 +0000139 printf ("Unable to open %s\n", path);
140 return 1;
wdenk591dda52002-11-18 00:14:45 +0000141 }
142 return (dos_dir ());
143}
144
wdenkf287a242003-07-01 21:06:45 +0000145U_BOOT_CMD(
146 fdosboot, 3, 0, do_fdosboot,
wdenk57b2d802003-06-27 21:31:46 +0000147 "fdosboot- boot from a dos floppy file\n",
148 "[loadAddr] [filename]\n"
149);
150
wdenkf287a242003-07-01 21:06:45 +0000151U_BOOT_CMD(
152 fdosls, 2, 0, do_fdosls,
wdenk57b2d802003-06-27 21:31:46 +0000153 "fdosls - list files in a directory\n",
154 "[directory]\n"
155);
156
157#endif /* CONFIG_COMMANDS & CFG_CMD_FDOS */