common/cmd_fdos.c

   1 /*
   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  */
  40 int 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) {
  56         name = "pImage";
  57     }
  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  */
 120 int 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