Enhance the parseing of IPv4 information.
[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         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  */