second/fs_of.c

   1 /*
   2  *  fs_of.c - an implementation for OpenFirmware supported filesystems
   3  *
   4  *  Copyright (C) 2001, 2002 Ethan Benson
   5  *
   6  *  Copyright (C) 1999 Benjamin Herrenschmidt
   7  *
   8  *  This program is free software; you can redistribute it and/or modify
   9  *  it under the terms of the GNU General Public License as published by
  10  *  the Free Software Foundation; either version 2 of the License, or
  11  *  (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, MA  02111-1307, USA.
  21  */
  22
  23 /*
  24  * BrokenFirmware cannot "read" from the network. We use tftp "load"
  25  * method for network boot for now, we may provide our own NFS
  26  * implementation in a later version. That means that we allocate a
  27  * huge block of memory for the entire file before loading it. We use
  28  * the location where the kernel puts RTAS, it's not used by the
  29  * bootloader and if freed when the kernel is booted.  This will have
  30  * to be changed if we plan to instanciate RTAS in the bootloader
  31  * itself
  32  */
  33
  34 #include "ctype.h"
  35 #include "types.h"
  36 #include "stddef.h"
  37 #include "stdlib.h"
  38 #include "file.h"
  39 #include "prom.h"
  40 #include "string.h"
  41 #include "partition.h"
  42 #include "fdisk-part.h"
  43 #include "fs.h"
  44 #include "errors.h"
  45 #include "debug.h"
  46
  47 #define LOAD_BUFFER_POS         0x1000000
  48 #define LOAD_BUFFER_SIZE        0x1400000
  49
  50 static int of_open(struct boot_file_t* file,
  51                    struct partition_t* part, struct boot_fspec_t* fspec);
  52 static int of_read(struct boot_file_t* file, unsigned int size, void* buffer);
  53 static int of_seek(struct boot_file_t* file, unsigned int newpos);
  54 static int of_close(struct boot_file_t* file);
  55
  56
  57 static int of_net_open(struct boot_file_t* file,
  58                        struct partition_t* part, struct boot_fspec_t* fspec);
  59 static int of_net_read(struct boot_file_t* file, unsigned int size, void* buffer);
  60 static int of_net_seek(struct boot_file_t* file, unsigned int newpos);
  61
  62
  63 struct fs_t of_filesystem =
  64 {
  65      "built-in",
  66      of_open,
  67      of_read,
  68      of_seek,
  69      of_close
  70 };
  71
  72 struct fs_t of_net_filesystem =
  73 {
  74      "built-in network",
  75      of_net_open,
  76      of_net_read,
  77      of_net_seek,
  78      of_close
  79 };
  80
  81 static int
  82 of_open(struct boot_file_t* file,
  83         struct partition_t* part, struct boot_fspec_t* fspec)
  84 {
  85      static char        buffer[1024];
  86      char               *filename;
  87      char               *p;
  88
  89      DEBUG_ENTER;
  90      DEBUG_OPEN;
  91
  92      strncpy(buffer, fspec->dev, 768);
  93      strcat(buffer, ":");
  94      if (part) {
  95           if (part->sys_ind == LINUX_RAID) {
  96                DEBUG_F("skipping because partition is marked LINUX_RAID\n");
  97                DEBUG_LEAVE(FILE_ERR_BAD_FSYS);
  98                return FILE_ERR_BAD_FSYS;
  99           }
 100           char pn[3];
 101           sprintf(pn, "%02d", part->part_number);
 102           strcat(buffer, pn);
 103      }
 104      if (fspec->file && strlen(fspec->file)) {
 105           if (part)
 106                strcat(buffer, ",");
 107           filename = strdup(fspec->file);
 108           for (p = filename; *p; p++)
 109                if (*p == '/')
 110                     *p = '\\';
 111           strcat(buffer, filename);
 112           free(filename);
 113      }
 114
 115      DEBUG_F("opening: \"%s\"\n", buffer);
 116
 117      file->of_device = prom_open(buffer);
 118
 119      DEBUG_F("file->of_device = %p\n", file->of_device);
 120
 121      file->pos = 0;
 122      file->buffer = NULL;
 123      if ((file->of_device == PROM_INVALID_HANDLE) || (file->of_device == 0))
 124      {
 125           DEBUG_LEAVE(FILE_ERR_BAD_FSYS);
 126           return FILE_ERR_BAD_FSYS;
 127      }
 128
 129      DEBUG_LEAVE(FILE_ERR_OK);
 130      return FILE_ERR_OK;
 131 }
 132
 133 static int
 134 of_net_open(struct boot_file_t* file,
 135             struct partition_t* part, struct boot_fspec_t* fspec)
 136 {
 137      static char        buffer[1024];
 138      char               *filename = NULL;
 139      char               *p;
 140
 141      DEBUG_ENTER;
 142      DEBUG_OPEN;
 143
 144      if (fspec->file && strlen(fspec->file)) {
 145           filename = strdup(fspec->file);
 146           for (p = filename; *p; p++)
 147                if (*p == '/')
 148                     *p = '\\';
 149      }
 150
 151      DEBUG_F("siaddr <%s>; filename <%s>; ciaddr <%s>; giaddr <%s>;\n",
 152                 fspec->siaddr, filename, fspec->ciaddr, fspec->giaddr);
 153      strncpy(buffer, fspec->dev, 768);
 154      /* If we didn't get a ':' include one */
 155      if (fspec->dev[strlen(fspec->dev)-1] != ':')
 156           strcat(buffer, ":");
 157      strcat(buffer, fspec->siaddr);
 158      strcat(buffer, ",");
 159      strcat(buffer, filename);
 160      strcat(buffer, ",");
 161      strcat(buffer, fspec->ciaddr);
 162      strcat(buffer, ",");
 163      strcat(buffer, fspec->giaddr);
 164
 165      /* If /packages/cas exists the we have a "new skool" tftp */
 166      if (prom_finddevice("/packages/cas") != PROM_INVALID_HANDLE) {
 167           strcat(buffer, ",");
 168           strcat(buffer, fspec->bootp_retries);
 169           strcat(buffer, ",");
 170           strcat(buffer, fspec->tftp_retries);
 171           strcat(buffer, ",");
 172           strcat(buffer, fspec->addl_params);
 173      } else {
 174           DEBUG_F("No \"/packages/cas\" using simple args\n")
 175      }
 176
 177      DEBUG_F("Opening: \"%s\"\n", buffer);
 178
 179      file->of_device = prom_open(buffer);
 180
 181      DEBUG_F("file->of_device = %p\n", file->of_device);
 182
 183      file->pos = 0;
 184      if ((file->of_device == PROM_INVALID_HANDLE) || (file->of_device == 0))
 185      {
 186           DEBUG_LEAVE(FILE_ERR_BAD_FSYS);
 187           return FILE_ERR_BAD_FSYS;
 188      }
 189
 190
 191      file->buffer = prom_claim_chunk((void *)LOAD_BUFFER_POS,
 192                                      LOAD_BUFFER_SIZE, 0);
 193      if (file->buffer == (void *)-1) {
 194           prom_printf("Can't claim memory for TFTP download\n");
 195           prom_close(file->of_device);
 196           DEBUG_LEAVE(FILE_IOERR);
 197           return FILE_IOERR;
 198      }
 199      memset(file->buffer, 0, LOAD_BUFFER_SIZE);
 200
 201      DEBUG_F("TFP...\n");
 202
 203      file->len = prom_loadmethod(file->of_device, file->buffer);
 204
 205      DEBUG_F("result: %Ld\n", file->len);
 206
 207      DEBUG_LEAVE(FILE_ERR_OK);
 208      return FILE_ERR_OK;
 209 }
 210
 211 static int
 212 of_read(struct boot_file_t* file, unsigned int size, void* buffer)
 213 {
 214      unsigned int count;
 215
 216      count = prom_read(file->of_device, buffer, size);
 217      file->pos += count;
 218      return count;
 219 }
 220
 221 static int
 222 of_net_read(struct boot_file_t* file, unsigned int size, void* buffer)
 223 {
 224      unsigned int count, av;
 225
 226      av = file->len - file->pos;
 227      count = size > av ? av : size;
 228      memcpy(buffer, file->buffer + file->pos, count);
 229      file->pos += count;
 230      return count;
 231 }
 232
 233 static int
 234 of_seek(struct boot_file_t* file, unsigned int newpos)
 235 {
 236      if (prom_seek(file->of_device, newpos)) {
 237           file->pos = newpos;
 238           return FILE_ERR_OK;
 239      }
 240
 241      return FILE_CANT_SEEK;
 242 }
 243
 244 static int
 245 of_net_seek(struct boot_file_t* file, unsigned int newpos)
 246 {
 247      file->pos = (newpos > file->len) ? file->len : newpos;
 248      return FILE_ERR_OK;
 249 }
 250
 251 static int
 252 of_close(struct boot_file_t* file)
 253 {
 254
 255      DEBUG_ENTER;
 256      DEBUG_F("<@%p>\n", file->of_device);
 257
 258      if (file->buffer) {
 259           prom_release(file->buffer, LOAD_BUFFER_SIZE);
 260      }
 261      prom_close(file->of_device);
 262      DEBUG_F("of_close called\n");
 263
 264      DEBUG_LEAVE(0);
 265      return 0;
 266 }
 267
 268 /*
 269  * Local variables:
 270  * c-file-style: "k&r"
 271  * c-basic-offset: 5
 272  * End:
 273  */