Merge with /home/m8/git/u-boot
[platform/kernel/u-boot.git] / lib_i386 / bios_setup.c
1 /*
2  * (C) Copyright 2002
3  * Daniel Engström, Omicron Ceti AB, daniel@omicron.se
4  *
5  * See file CREDITS for list of people who contributed to this
6  * project.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License as
10  * published by the Free Software Foundation; either version 2 of
11  * the License, or (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,
21  * MA 02111-1307 USA
22  */
23
24
25 /*
26  * Partly based on msbios.c from rolo 1.6:
27  *----------------------------------------------------------------------
28  * (C) Copyright 2000
29  * Sysgo Real-Time Solutions GmbH
30  * Klein-Winternheim, Germany
31  *----------------------------------------------------------------------
32  */
33
34 #include <common.h>
35 #include <pci.h>
36 #include <asm/realmode.h>
37 #include <asm/io.h>
38
39 DECLARE_GLOBAL_DATA_PTR;
40
41 #define NUMVECTS        256
42
43 #define BIOS_DATA        ((char*)0x400)
44 #define BIOS_DATA_SIZE   256
45 #define BIOS_BASE        ((char*)0xf0000)
46 #define BIOS_CS          0xf000
47
48 /* these are defined in a 16bit segment and needs
49  * to be accessed with the RELOC_16_xxxx() macros below
50  */
51 extern u16 ram_in_64kb_chunks;
52 extern u16 bios_equipment;
53 extern u8  pci_last_bus;
54
55 extern void *rm_int00;
56 extern void *rm_int01;
57 extern void *rm_int02;
58 extern void *rm_int03;
59 extern void *rm_int04;
60 extern void *rm_int05;
61 extern void *rm_int06;
62 extern void *rm_int07;
63 extern void *rm_int08;
64 extern void *rm_int09;
65 extern void *rm_int0a;
66 extern void *rm_int0b;
67 extern void *rm_int0c;
68 extern void *rm_int0d;
69 extern void *rm_int0e;
70 extern void *rm_int0f;
71 extern void *rm_int10;
72 extern void *rm_int11;
73 extern void *rm_int12;
74 extern void *rm_int13;
75 extern void *rm_int14;
76 extern void *rm_int15;
77 extern void *rm_int16;
78 extern void *rm_int17;
79 extern void *rm_int18;
80 extern void *rm_int19;
81 extern void *rm_int1a;
82 extern void *rm_int1b;
83 extern void *rm_int1c;
84 extern void *rm_int1d;
85 extern void *rm_int1e;
86 extern void *rm_int1f;
87 extern void *rm_def_int;
88
89 extern void *realmode_reset;
90 extern void *realmode_pci_bios_call_entry;
91
92 static int set_jmp_vector(int entry_point, void *target)
93 {
94         if (entry_point & ~0xffff) {
95                 return -1;
96         }
97
98         if (((u32)target-0xf0000) & ~0xffff) {
99                 return -1;
100         }
101         printf("set_jmp_vector: 0xf000:%04x -> %p\n",
102                entry_point, target);
103
104         /* jmp opcode */
105         writeb(0xea, 0xf0000 + entry_point);
106
107         /* offset */
108         writew(((u32)target-0xf0000), 0xf0000 + entry_point + 1);
109
110         /* segment */
111         writew(0xf000, 0xf0000 + entry_point + 3);
112
113         return 0;
114 }
115
116
117 /*
118  ************************************************************
119  * Install an interrupt vector
120  ************************************************************
121  */
122
123 static void setvector(int vector, u16 segment, void *handler)
124 {
125         u16 *ptr = (u16*)(vector*4);
126         ptr[0] = ((u32)handler - (segment << 4))&0xffff;
127         ptr[1] = segment;
128
129 #if 0
130         printf("setvector: int%02x -> %04x:%04x\n",
131                vector, ptr[1], ptr[0]);
132 #endif
133 }
134
135 #define RELOC_16_LONG(seg, off) *(u32*)(seg << 4 | (u32)&off)
136 #define RELOC_16_WORD(seg, off) *(u16*)(seg << 4 | (u32)&off)
137 #define RELOC_16_BYTE(seg, off) *(u8*)(seg << 4 | (u32)&off)
138
139 int bios_setup(void)
140 {
141         static int done=0;
142         int vector;
143         struct pci_controller *pri_hose;
144
145         if (done) {
146                 return 0;
147         }
148         done = 1;
149
150         if (i386boot_bios_size > 65536) {
151                 printf("BIOS too large (%ld bytes, max is 65536)\n",
152                        i386boot_bios_size);
153                 return -1;
154         }
155
156         memcpy(BIOS_BASE, (void*)i386boot_bios, i386boot_bios_size);
157
158         /* clear bda */
159         memset(BIOS_DATA, 0, BIOS_DATA_SIZE);
160
161         /* enter some values to the bda */
162         writew(0x3f8, BIOS_DATA);   /* com1 addr */
163         writew(0x2f8, BIOS_DATA+2); /* com2 addr */
164         writew(0x3e8, BIOS_DATA+4); /* com3 addr */
165         writew(0x2e8, BIOS_DATA+6); /* com4 addr */
166         writew(0x278, BIOS_DATA+8); /* lpt1 addr */
167         /*
168          * The kernel wants to read the base memory size
169          * from 40:13. Put a zero there to avoid an error message
170          */
171         writew(0, BIOS_DATA+0x13);  /* base memory size */
172
173
174         /* setup realmode interrupt vectors */
175         for (vector = 0; vector < NUMVECTS; vector++) {
176                 setvector(vector, BIOS_CS, &rm_def_int);
177         }
178
179         setvector(0x00, BIOS_CS, &rm_int00);
180         setvector(0x01, BIOS_CS, &rm_int01);
181         setvector(0x02, BIOS_CS, &rm_int02);
182         setvector(0x03, BIOS_CS, &rm_int03);
183         setvector(0x04, BIOS_CS, &rm_int04);
184         setvector(0x05, BIOS_CS, &rm_int05);
185         setvector(0x06, BIOS_CS, &rm_int06);
186         setvector(0x07, BIOS_CS, &rm_int07);
187         setvector(0x08, BIOS_CS, &rm_int08);
188         setvector(0x09, BIOS_CS, &rm_int09);
189         setvector(0x0a, BIOS_CS, &rm_int0a);
190         setvector(0x0b, BIOS_CS, &rm_int0b);
191         setvector(0x0c, BIOS_CS, &rm_int0c);
192         setvector(0x0d, BIOS_CS, &rm_int0d);
193         setvector(0x0e, BIOS_CS, &rm_int0e);
194         setvector(0x0f, BIOS_CS, &rm_int0f);
195         setvector(0x10, BIOS_CS, &rm_int10);
196         setvector(0x11, BIOS_CS, &rm_int11);
197         setvector(0x12, BIOS_CS, &rm_int12);
198         setvector(0x13, BIOS_CS, &rm_int13);
199         setvector(0x14, BIOS_CS, &rm_int14);
200         setvector(0x15, BIOS_CS, &rm_int15);
201         setvector(0x16, BIOS_CS, &rm_int16);
202         setvector(0x17, BIOS_CS, &rm_int17);
203         setvector(0x18, BIOS_CS, &rm_int18);
204         setvector(0x19, BIOS_CS, &rm_int19);
205         setvector(0x1a, BIOS_CS, &rm_int1a);
206         setvector(0x1b, BIOS_CS, &rm_int1b);
207         setvector(0x1c, BIOS_CS, &rm_int1c);
208         setvector(0x1d, BIOS_CS, &rm_int1d);
209         setvector(0x1e, BIOS_CS, &rm_int1e);
210         setvector(0x1f, BIOS_CS, &rm_int1f);
211
212         set_jmp_vector(0xfff0, &realmode_reset);
213         set_jmp_vector(0xfe6e, &realmode_pci_bios_call_entry);
214
215         /* fill in data area */
216         RELOC_16_WORD(0xf000, ram_in_64kb_chunks) = gd->ram_size >> 16;
217         RELOC_16_WORD(0xf000, bios_equipment) = 0; /* FixMe */
218
219         /* If we assume only one PCI hose, this PCI hose
220          * will own PCI bus #0, and the last PCI bus of
221          * that PCI hose will be the last PCI bus in the
222          * system.
223          * (This, ofcause break on multi hose systems,
224          *  but our PCI BIOS only support one hose anyway)
225          */
226         pri_hose = pci_bus_to_hose(0);
227         if (NULL != pri_hose) {
228                 /* fill in last pci bus number for use by the realmode
229                  * PCI BIOS */
230                 RELOC_16_BYTE(0xf000, pci_last_bus) = pri_hose->last_busno;
231         }
232
233         return 0;
234 }