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 "fs.h"
  43 #include "errors.h"
  44 #include "debug.h"
  45
  46 #define LOAD_BUFFER_POS         0x600000
  47 #define LOAD_BUFFER_SIZE        0x400000
  48
  49 static int of_open(struct boot_file_t* file, const char* dev_name,
  50                    struct partition_t* part, const char* file_name);
  51 static int of_read(struct boot_file_t* file, unsigned int size, void* buffer);
  52 static int of_seek(struct boot_file_t* file, unsigned int newpos);
  53 static int of_close(struct boot_file_t* file);
  54
  55
  56 static int of_net_open(struct boot_file_t* file, const char* dev_name,
  57                        struct partition_t* part, const char* file_name);
  58 static int of_net_read(struct boot_file_t* file, unsigned int size, void* buffer);
  59 static int of_net_seek(struct boot_file_t* file, unsigned int newpos);
  60
  61
  62 struct fs_t of_filesystem =
  63 {
  64      "built-in",
  65      of_open,
  66      of_read,
  67      of_seek,
  68      of_close
  69 };
  70
  71 struct fs_t of_net_filesystem =
  72 {
  73      "built-in network",
  74      of_net_open,
  75      of_net_read,
  76      of_net_seek,
  77      of_close
  78 };
  79
  80 static int
  81 of_open(struct boot_file_t* file, const char* dev_name,
  82         struct partition_t* part, const char* file_name)
  83 {
  84      static char        buffer[1024];
  85      char               *filename;
  86      char               *p;
  87
  88      DEBUG_ENTER;
  89      DEBUG_OPEN;
  90
  91      strncpy(buffer, dev_name, 768);
  92      strcat(buffer, ":");
  93      if (part) {
  94           char pn[3];
  95           sprintf(pn, "%02d", part->part_number);
  96           strcat(buffer, pn);
  97      }
  98      if (file_name && strlen(file_name)) {
  99           if (part)
 100                strcat(buffer, ",");
 101           filename = strdup(file_name);
 102           for (p = filename; *p; p++)
 103                if (*p == '/')
 104                     *p = '\\';
 105           strcat(buffer, filename);
 106           free(filename);
 107      }
 108
 109      DEBUG_F("opening: \"%s\"\n", buffer);
 110
 111      file->of_device = prom_open(buffer);
 112
 113      DEBUG_F("file->of_device = %p\n", file->of_device);
 114
 115      file->pos = 0;
 116      file->buffer = NULL;
 117      if ((file->of_device == PROM_INVALID_HANDLE) || (file->of_device == 0))
 118      {
 119           DEBUG_LEAVE(FILE_ERR_BAD_FSYS);
 120           return FILE_ERR_BAD_FSYS;
 121      }
 122
 123      DEBUG_LEAVE(FILE_ERR_OK);
 124      return FILE_ERR_OK;
 125 }
 126
 127 static int
 128 of_net_open(struct boot_file_t* file, const char* dev_name,
 129             struct partition_t* part, const char* file_name)
 130 {
 131      static char        buffer[1024];
 132      char               *filename;
 133      char               *p;
 134
 135      DEBUG_ENTER;
 136      DEBUG_OPEN;
 137
 138      strncpy(buffer, dev_name, 768);
 139      if (file_name && strlen(file_name)) {
 140           strcat(buffer, ",");
 141           filename = strdup(file_name);
 142           for (p = filename; *p; p++)
 143                if (*p == '/')
 144                     *p = '\\';
 145           strcat(buffer, filename);
 146           free(filename);
 147      }
 148
 149      DEBUG_F("Opening: \"%s\"\n", buffer);
 150
 151      file->of_device = prom_open(buffer);
 152
 153      DEBUG_F("file->of_device = %p\n", file->of_device);
 154
 155      file->pos = 0;
 156      if ((file->of_device == PROM_INVALID_HANDLE) || (file->of_device == 0))
 157      {
 158           DEBUG_LEAVE(FILE_ERR_BAD_FSYS);
 159           return FILE_ERR_BAD_FSYS;
 160      }
 161
 162      file->buffer = prom_claim((void *)LOAD_BUFFER_POS, LOAD_BUFFER_SIZE, 0);
 163      if (file->buffer == (void *)-1) {
 164           prom_printf("Can't claim memory for TFTP download\n");
 165           prom_close(file->of_device);
 166           DEBUG_LEAVE(FILE_IOERR);
 167           return FILE_IOERR;
 168      }
 169      memset(file->buffer, 0, LOAD_BUFFER_SIZE);
 170
 171      DEBUG_F("TFP...\n");
 172
 173      file->len = prom_loadmethod(file->of_device, file->buffer);
 174
 175      DEBUG_F("result: %Ld\n", file->len);
 176
 177      DEBUG_LEAVE(FILE_ERR_OK);
 178      return FILE_ERR_OK;
 179 }
 180
 181 static int
 182 of_read(struct boot_file_t* file, unsigned int size, void* buffer)
 183 {
 184      unsigned int count;
 185
 186      count = prom_read(file->of_device, buffer, size);
 187      file->pos += count;
 188      return count;
 189 }
 190
 191 static int
 192 of_net_read(struct boot_file_t* file, unsigned int size, void* buffer)
 193 {
 194      unsigned int count, av;
 195
 196      av = file->len - file->pos;
 197      count = size > av ? av : size;
 198      memcpy(buffer, file->buffer + file->pos, count);
 199      file->pos += count;
 200      return count;
 201 }
 202
 203 static int
 204 of_seek(struct boot_file_t* file, unsigned int newpos)
 205 {
 206      if (prom_seek(file->of_device, newpos)) {
 207           file->pos = newpos;
 208           return FILE_ERR_OK;
 209      }
 210
 211      return FILE_CANT_SEEK;
 212 }
 213
 214 static int
 215 of_net_seek(struct boot_file_t* file, unsigned int newpos)
 216 {
 217      file->pos = (newpos > file->len) ? file->len : newpos;
 218      return FILE_ERR_OK;
 219 }
 220
 221 static int
 222 of_close(struct boot_file_t* file)
 223 {
 224
 225      DEBUG_ENTER;
 226      DEBUG_F("<@%p>\n", file->of_device);
 227
 228      if (file->buffer) {
 229           prom_release(file->buffer, LOAD_BUFFER_SIZE);
 230      }
 231      prom_close(file->of_device);
 232      DEBUG_F("of_close called\n");
 233
 234      DEBUG_LEAVE(0);
 235      return 0;
 236 }
 237
 238 /*
 239  * Local variables:
 240  * c-file-style: "k&r"
 241  * c-basic-offset: 5
 242  * End:
 243  */