d9caa3226be9b24a29779354cf6fded84b193fb9
[yaboot.git] / 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  */