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