1 /****************************************************************************
2 *
3 *		     Video BOOT Graphics Card POST Module
4 *
5 *  ========================================================================
6 *   Copyright (C) 2007 Freescale Semiconductor, Inc.
7 *   Jason Jin <Jason.jin@freescale.com>
8 *
9 *   Copyright (C) 1991-2004 SciTech Software, Inc. All rights reserved.
10 *
11 *   This file may be distributed and/or modified under the terms of the
12 *   GNU General Public License version 2.0 as published by the Free
13 *   Software Foundation and appearing in the file LICENSE.GPL included
14 *   in the packaging of this file.
15 *
16 *   Licensees holding a valid Commercial License for this product from
17 *   SciTech Software, Inc. may use this file in accordance with the
18 *   Commercial License Agreement provided with the Software.
19 *
20 *   This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING
21 *   THE WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 *   PURPOSE.
23 *
24 *   See http://www.scitechsoft.com/license/ for information about
25 *   the licensing options available and how to purchase a Commercial
26 *   License Agreement.
27 *
28 *   Contact license@scitechsoft.com if any conditions of this licensing
29 *   are not clear to you, or you have questions about licensing options.
30 *
31 *  ========================================================================
32 *
33 * Language:	ANSI C
34 * Environment:	Linux Kernel
35 * Developer:	Kendall Bennett
36 *
37 * Description:	Module to implement booting PCI/AGP controllers on the
38 *		bus. We use the x86 real mode emulator to run the BIOS on
39 *		graphics controllers to bring the cards up.
40 *
41 *		Note that at present this module does *not* support
42 *		multiple controllers.
43 *
44 *		The orignal name of this file is warmboot.c.
45 *		Jason ported this file to u-boot to run the ATI video card
46 *		BIOS in u-boot.
47 ****************************************************************************/
48 #include <common.h>
49 #include <compiler.h>
50 #include <bios_emul.h>
51 #include <errno.h>
52 #include <log.h>
53 #include <malloc.h>
54 #include <vbe.h>
55 #include <linux/delay.h>
56 #include "biosemui.h"
57 
58 /* Length of the BIOS image */
59 #define MAX_BIOSLEN	    (128 * 1024L)
60 
61 /* Place to save PCI BAR's that we change and later restore */
62 static u32 saveROMBaseAddress;
63 static u32 saveBaseAddress10;
64 static u32 saveBaseAddress14;
65 static u32 saveBaseAddress18;
66 static u32 saveBaseAddress20;
67 
68 /* Addres im memory of VBE region */
69 const int vbe_offset = 0x2000;
70 
71 #ifdef CONFIG_FRAMEBUFFER_SET_VESA_MODE
bios_ptr(const void * buf,BE_VGAInfo * vga_info,u32 x86_dword_ptr)72 static const void *bios_ptr(const void *buf, BE_VGAInfo *vga_info,
73 			    u32 x86_dword_ptr)
74 {
75 	u32 seg_ofs, flat;
76 
77 	seg_ofs = le32_to_cpu(x86_dword_ptr);
78 	flat = ((seg_ofs & 0xffff0000) >> 12) | (seg_ofs & 0xffff);
79 	if (flat >= 0xc0000)
80 		return vga_info->BIOSImage + flat - 0xc0000;
81 	else
82 		return buf + (flat - vbe_offset);
83 }
84 
atibios_debug_mode(BE_VGAInfo * vga_info,RMREGS * regs,int vesa_mode,struct vbe_mode_info * mode_info)85 static int atibios_debug_mode(BE_VGAInfo *vga_info, RMREGS *regs,
86 			      int vesa_mode, struct vbe_mode_info *mode_info)
87 {
88 	void *buffer = (void *)(M.mem_base + vbe_offset);
89 	u16 buffer_seg = (((unsigned long)vbe_offset) >> 4) & 0xff00;
90 	u16 buffer_adr = ((unsigned long)vbe_offset) & 0xffff;
91 	struct vesa_mode_info *vm;
92 	struct vbe_info *info;
93 	const u16 *modes_bios, *ptr;
94 	u16 *modes;
95 	int size;
96 
97 	debug("VBE: Getting information\n");
98 	regs->e.eax = VESA_GET_INFO;
99 	regs->e.esi = buffer_seg;
100 	regs->e.edi = buffer_adr;
101 	info = buffer;
102 	memset(info, '\0', sizeof(*info));
103 	strcpy(info->signature, "VBE2");
104 	BE_int86(0x10, regs, regs);
105 	if (regs->e.eax != 0x4f) {
106 		debug("VESA_GET_INFO: error %x\n", regs->e.eax);
107 		return -ENOSYS;
108 	}
109 	debug("version %x\n", le16_to_cpu(info->version));
110 	debug("oem '%s'\n", (char *)bios_ptr(buffer, vga_info,
111 					     info->oem_string_ptr));
112 	debug("vendor '%s'\n", (char *)bios_ptr(buffer, vga_info,
113 						info->vendor_name_ptr));
114 	debug("product '%s'\n", (char *)bios_ptr(buffer, vga_info,
115 						 info->product_name_ptr));
116 	debug("rev '%s'\n", (char *)bios_ptr(buffer, vga_info,
117 					     info->product_rev_ptr));
118 	modes_bios = bios_ptr(buffer, vga_info, info->modes_ptr);
119 	debug("Modes: ");
120 	for (ptr = modes_bios; *ptr != 0xffff; ptr++)
121 		debug("%x ", le16_to_cpu(*ptr));
122 	debug("\nmemory %dMB\n", le16_to_cpu(info->total_memory) >> 4);
123 	size = (ptr - modes_bios) * sizeof(u16) + 2;
124 	modes = malloc(size);
125 	if (!modes)
126 		return -ENOMEM;
127 	memcpy(modes, modes_bios, size);
128 
129 	regs->e.eax = VESA_GET_CUR_MODE;
130 	BE_int86(0x10, regs, regs);
131 	if (regs->e.eax != 0x4f) {
132 		debug("VESA_GET_CUR_MODE: error %x\n", regs->e.eax);
133 		return -ENOSYS;
134 	}
135 	debug("Current mode %x\n", regs->e.ebx);
136 
137 	for (ptr = modes; *ptr != 0xffff; ptr++) {
138 		int mode = le16_to_cpu(*ptr);
139 		bool linear_ok;
140 		int attr;
141 
142 		debug("Mode %x: ", mode);
143 		memset(buffer, '\0', sizeof(struct vbe_mode_info));
144 		regs->e.eax = VESA_GET_MODE_INFO;
145 		regs->e.ebx = 0;
146 		regs->e.ecx = mode;
147 		regs->e.edx = 0;
148 		regs->e.esi = buffer_seg;
149 		regs->e.edi = buffer_adr;
150 		BE_int86(0x10, regs, regs);
151 		if (regs->e.eax != 0x4f) {
152 			debug("VESA_GET_MODE_INFO: error %x\n", regs->e.eax);
153 			continue;
154 		}
155 		memcpy(mode_info->mode_info_block, buffer,
156 		       sizeof(struct vesa_mode_info));
157 		mode_info->valid = true;
158 		vm = &mode_info->vesa;
159 		attr = le16_to_cpu(vm->mode_attributes);
160 		linear_ok = attr & 0x80;
161 		debug("res %d x %d, %d bpp, mm %d, (Linear %s, attr %02x)\n",
162 		      le16_to_cpu(vm->x_resolution),
163 		      le16_to_cpu(vm->y_resolution),
164 		      vm->bits_per_pixel, vm->memory_model,
165 		      linear_ok ? "OK" : "not available",
166 		      attr);
167 		debug("\tRGB pos=%d,%d,%d, size=%d,%d,%d\n",
168 		      vm->red_mask_pos, vm->green_mask_pos, vm->blue_mask_pos,
169 		      vm->red_mask_size, vm->green_mask_size,
170 		      vm->blue_mask_size);
171 	}
172 
173 	return 0;
174 }
175 
atibios_set_vesa_mode(RMREGS * regs,int vesa_mode,struct vbe_mode_info * mode_info)176 static int atibios_set_vesa_mode(RMREGS *regs, int vesa_mode,
177 				 struct vbe_mode_info *mode_info)
178 {
179 	void *buffer = (void *)(M.mem_base + vbe_offset);
180 	u16 buffer_seg = (((unsigned long)vbe_offset) >> 4) & 0xff00;
181 	u16 buffer_adr = ((unsigned long)vbe_offset) & 0xffff;
182 	struct vesa_mode_info *vm;
183 
184 	debug("VBE: Setting VESA mode %#04x\n", vesa_mode);
185 	regs->e.eax = VESA_SET_MODE;
186 	regs->e.ebx = vesa_mode;
187 	/* request linear framebuffer mode and don't clear display */
188 	regs->e.ebx |= (1 << 14) | (1 << 15);
189 	BE_int86(0x10, regs, regs);
190 	if (regs->e.eax != 0x4f) {
191 		debug("VESA_SET_MODE: error %x\n", regs->e.eax);
192 		return -ENOSYS;
193 	}
194 
195 	memset(buffer, '\0', sizeof(struct vbe_mode_info));
196 	debug("VBE: Geting info for VESA mode %#04x\n", vesa_mode);
197 	regs->e.eax = VESA_GET_MODE_INFO;
198 	regs->e.ecx = vesa_mode;
199 	regs->e.esi = buffer_seg;
200 	regs->e.edi = buffer_adr;
201 	BE_int86(0x10, regs, regs);
202 	if (regs->e.eax != 0x4f) {
203 		debug("VESA_GET_MODE_INFO: error %x\n", regs->e.eax);
204 		return -ENOSYS;
205 	}
206 
207 	memcpy(mode_info->mode_info_block, buffer,
208 		sizeof(struct vesa_mode_info));
209 	mode_info->valid = true;
210 	mode_info->video_mode = vesa_mode;
211 	vm = &mode_info->vesa;
212 	vm->x_resolution = le16_to_cpu(vm->x_resolution);
213 	vm->y_resolution = le16_to_cpu(vm->y_resolution);
214 	vm->bytes_per_scanline = le16_to_cpu(vm->bytes_per_scanline);
215 	vm->phys_base_ptr = le32_to_cpu(vm->phys_base_ptr);
216 	vm->mode_attributes = le16_to_cpu(vm->mode_attributes);
217 	debug("VBE: Init complete\n");
218 
219 	return 0;
220 }
221 #endif /* CONFIG_FRAMEBUFFER_SET_VESA_MODE */
222 
223 /****************************************************************************
224 PARAMETERS:
225 pcidev	- PCI device info for the video card on the bus to boot
226 vga_info - BIOS emulator VGA info structure
227 
228 REMARKS:
229 This function executes the BIOS POST code on the controller. We assume that
230 at this stage the controller has its I/O and memory space enabled and
231 that all other controllers are in a disabled state.
232 ****************************************************************************/
233 #ifdef CONFIG_DM_PCI
PCI_doBIOSPOST(struct udevice * pcidev,BE_VGAInfo * vga_info,int vesa_mode,struct vbe_mode_info * mode_info)234 static void PCI_doBIOSPOST(struct udevice *pcidev, BE_VGAInfo *vga_info,
235 			   int vesa_mode, struct vbe_mode_info *mode_info)
236 #else
237 static void PCI_doBIOSPOST(pci_dev_t pcidev, BE_VGAInfo *vga_info,
238 			   int vesa_mode, struct vbe_mode_info *mode_info)
239 #endif
240 {
241 	RMREGS regs;
242 	RMSREGS sregs;
243 #ifdef CONFIG_DM_PCI
244 	pci_dev_t bdf;
245 #endif
246 
247 	/* Determine the value to store in AX for BIOS POST. Per the PCI specs,
248 	 AH must contain the bus and AL must contain the devfn, encoded as
249 	 (dev << 3) | fn
250 	 */
251 	memset(&regs, 0, sizeof(regs));
252 	memset(&sregs, 0, sizeof(sregs));
253 #ifdef CONFIG_DM_PCI
254 	bdf = dm_pci_get_bdf(pcidev);
255 	regs.x.ax = (int)PCI_BUS(bdf) << 8 |
256 			(int)PCI_DEV(bdf) << 3 | (int)PCI_FUNC(bdf);
257 #else
258 	regs.x.ax = ((int)PCI_BUS(pcidev) << 8) |
259 	    ((int)PCI_DEV(pcidev) << 3) | (int)PCI_FUNC(pcidev);
260 #endif
261 	/*Setup the X86 emulator for the VGA BIOS*/
262 	BE_setVGA(vga_info);
263 
264 	/*Execute the BIOS POST code*/
265 	BE_callRealMode(0xC000, 0x0003, &regs, &sregs);
266 
267 	/*Cleanup and exit*/
268 	BE_getVGA(vga_info);
269 
270 #ifdef CONFIG_FRAMEBUFFER_SET_VESA_MODE
271 	/* Useful for debugging */
272 	if (0)
273 		atibios_debug_mode(vga_info, &regs, vesa_mode, mode_info);
274 	if (vesa_mode != -1)
275 		atibios_set_vesa_mode(&regs, vesa_mode, mode_info);
276 #endif
277 }
278 
279 /****************************************************************************
280 PARAMETERS:
281 pcidev	- PCI device info for the video card on the bus
282 bar	- Place to return the base address register offset to use
283 
284 RETURNS:
285 The address to use to map the secondary BIOS (AGP devices)
286 
287 REMARKS:
288 Searches all the PCI base address registers for the device looking for a
289 memory mapping that is large enough to hold our ROM BIOS. We usually end up
290 finding the framebuffer mapping (usually BAR 0x10), and we use this mapping
291 to map the BIOS for the device into. We use a mapping that is already
292 assigned to the device to ensure the memory range will be passed through
293 by any PCI->PCI or AGP->PCI bridge that may be present.
294 
295 NOTE: Usually this function is only used for AGP devices, but it may be
296       used for PCI devices that have already been POST'ed and the BIOS
297       ROM base address has been zero'ed out.
298 
299 NOTE: This function leaves the original memory aperture disabled by leaving
300       it programmed to all 1's. It must be restored to the correct value
301       later.
302 ****************************************************************************/
303 #ifdef CONFIG_DM_PCI
PCI_findBIOSAddr(struct udevice * pcidev,int * bar)304 static u32 PCI_findBIOSAddr(struct udevice *pcidev, int *bar)
305 #else
306 static u32 PCI_findBIOSAddr(pci_dev_t pcidev, int *bar)
307 #endif
308 {
309 	u32 base, size;
310 
311 	for (*bar = 0x10; *bar <= 0x14; (*bar) += 4) {
312 #ifdef CONFIG_DM_PCI
313 		dm_pci_read_config32(pcidev, *bar, &base);
314 #else
315 		pci_read_config_dword(pcidev, *bar, &base);
316 #endif
317 		if (!(base & 0x1)) {
318 #ifdef CONFIG_DM_PCI
319 			dm_pci_write_config32(pcidev, *bar, 0xFFFFFFFF);
320 			dm_pci_read_config32(pcidev, *bar, &size);
321 #else
322 			pci_write_config_dword(pcidev, *bar, 0xFFFFFFFF);
323 			pci_read_config_dword(pcidev, *bar, &size);
324 #endif
325 			size = ~(size & ~0xFF) + 1;
326 			if (size >= MAX_BIOSLEN)
327 				return base & ~0xFF;
328 		}
329 	}
330 	return 0;
331 }
332 
333 /****************************************************************************
334 REMARKS:
335 Some non-x86 Linux kernels map PCI relocateable I/O to values that
336 are above 64K, which will not work with the BIOS image that requires
337 the offset for the I/O ports to be a maximum of 16-bits. Ideally
338 someone should fix the kernel to map the I/O ports for VGA compatible
339 devices to a different location (or just all I/O ports since it is
340 unlikely you can have enough devices in the machine to use up all
341 64K of the I/O space - a total of more than 256 cards would be
342 necessary).
343 
344 Anyway to fix this we change all I/O mapped base registers and
345 chop off the top bits.
346 ****************************************************************************/
347 #ifdef CONFIG_DM_PCI
PCI_fixupIObase(struct udevice * pcidev,int reg,u32 * base)348 static void PCI_fixupIObase(struct udevice *pcidev, int reg, u32 *base)
349 #else
350 static void PCI_fixupIObase(pci_dev_t pcidev, int reg, u32 * base)
351 #endif
352 {
353 	if ((*base & 0x1) && (*base > 0xFFFE)) {
354 		*base &= 0xFFFF;
355 #ifdef CONFIG_DM_PCI
356 		dm_pci_write_config32(pcidev, reg, *base);
357 #else
358 		pci_write_config_dword(pcidev, reg, *base);
359 #endif
360 
361 	}
362 }
363 
364 /****************************************************************************
365 PARAMETERS:
366 pcidev	- PCI device info for the video card on the bus
367 
368 RETURNS:
369 Pointers to the mapped BIOS image
370 
371 REMARKS:
372 Maps a pointer to the BIOS image on the graphics card on the PCI bus.
373 ****************************************************************************/
374 #ifdef CONFIG_DM_PCI
PCI_mapBIOSImage(struct udevice * pcidev)375 void *PCI_mapBIOSImage(struct udevice *pcidev)
376 #else
377 void *PCI_mapBIOSImage(pci_dev_t pcidev)
378 #endif
379 {
380 	u32 BIOSImageBus;
381 	int BIOSImageBAR;
382 	u8 *BIOSImage;
383 
384 	/*Save PCI BAR registers that might get changed*/
385 #ifdef CONFIG_DM_PCI
386 	dm_pci_read_config32(pcidev, PCI_ROM_ADDRESS, &saveROMBaseAddress);
387 	dm_pci_read_config32(pcidev, PCI_BASE_ADDRESS_0, &saveBaseAddress10);
388 	dm_pci_read_config32(pcidev, PCI_BASE_ADDRESS_1, &saveBaseAddress14);
389 	dm_pci_read_config32(pcidev, PCI_BASE_ADDRESS_2, &saveBaseAddress18);
390 	dm_pci_read_config32(pcidev, PCI_BASE_ADDRESS_4, &saveBaseAddress20);
391 #else
392 	pci_read_config_dword(pcidev, PCI_ROM_ADDRESS, &saveROMBaseAddress);
393 	pci_read_config_dword(pcidev, PCI_BASE_ADDRESS_0, &saveBaseAddress10);
394 	pci_read_config_dword(pcidev, PCI_BASE_ADDRESS_1, &saveBaseAddress14);
395 	pci_read_config_dword(pcidev, PCI_BASE_ADDRESS_2, &saveBaseAddress18);
396 	pci_read_config_dword(pcidev, PCI_BASE_ADDRESS_4, &saveBaseAddress20);
397 #endif
398 
399 	/*Fix up I/O base registers to less than 64K */
400 	if(saveBaseAddress14 != 0)
401 		PCI_fixupIObase(pcidev, PCI_BASE_ADDRESS_1, &saveBaseAddress14);
402 	else
403 		PCI_fixupIObase(pcidev, PCI_BASE_ADDRESS_4, &saveBaseAddress20);
404 
405 	/* Some cards have problems that stop us from being able to read the
406 	 BIOS image from the ROM BAR. To fix this we have to do some chipset
407 	 specific programming for different cards to solve this problem.
408 	*/
409 
410 	BIOSImageBus = PCI_findBIOSAddr(pcidev, &BIOSImageBAR);
411 	if (BIOSImageBus == 0) {
412 		printf("Find bios addr error\n");
413 		return NULL;
414 	}
415 
416 #ifdef CONFIG_DM_PCI
417 	BIOSImage = dm_pci_bus_to_virt(pcidev, BIOSImageBus,
418 				       PCI_REGION_MEM, 0, MAP_NOCACHE);
419 
420 	/*Change the PCI BAR registers to map it onto the bus.*/
421 	dm_pci_write_config32(pcidev, BIOSImageBAR, 0);
422 	dm_pci_write_config32(pcidev, PCI_ROM_ADDRESS, BIOSImageBus | 0x1);
423 #else
424 	BIOSImage = pci_bus_to_virt(pcidev, BIOSImageBus,
425 				    PCI_REGION_MEM, 0, MAP_NOCACHE);
426 
427 	/*Change the PCI BAR registers to map it onto the bus.*/
428 	pci_write_config_dword(pcidev, BIOSImageBAR, 0);
429 	pci_write_config_dword(pcidev, PCI_ROM_ADDRESS, BIOSImageBus | 0x1);
430 #endif
431 	udelay(1);
432 
433 	/*Check that the BIOS image is valid. If not fail, or return the
434 	 compiled in BIOS image if that option was enabled
435 	 */
436 	if (BIOSImage[0] != 0x55 || BIOSImage[1] != 0xAA || BIOSImage[2] == 0) {
437 		return NULL;
438 	}
439 
440 	return BIOSImage;
441 }
442 
443 /****************************************************************************
444 PARAMETERS:
445 pcidev	- PCI device info for the video card on the bus
446 
447 REMARKS:
448 Unmaps the BIOS image for the device and restores framebuffer mappings
449 ****************************************************************************/
450 #ifdef CONFIG_DM_PCI
PCI_unmapBIOSImage(struct udevice * pcidev,void * BIOSImage)451 void PCI_unmapBIOSImage(struct udevice *pcidev, void *BIOSImage)
452 {
453 	dm_pci_write_config32(pcidev, PCI_ROM_ADDRESS, saveROMBaseAddress);
454 	dm_pci_write_config32(pcidev, PCI_BASE_ADDRESS_0, saveBaseAddress10);
455 	dm_pci_write_config32(pcidev, PCI_BASE_ADDRESS_1, saveBaseAddress14);
456 	dm_pci_write_config32(pcidev, PCI_BASE_ADDRESS_2, saveBaseAddress18);
457 	dm_pci_write_config32(pcidev, PCI_BASE_ADDRESS_4, saveBaseAddress20);
458 }
459 #else
PCI_unmapBIOSImage(pci_dev_t pcidev,void * BIOSImage)460 void PCI_unmapBIOSImage(pci_dev_t pcidev, void *BIOSImage)
461 {
462 	pci_write_config_dword(pcidev, PCI_ROM_ADDRESS, saveROMBaseAddress);
463 	pci_write_config_dword(pcidev, PCI_BASE_ADDRESS_0, saveBaseAddress10);
464 	pci_write_config_dword(pcidev, PCI_BASE_ADDRESS_1, saveBaseAddress14);
465 	pci_write_config_dword(pcidev, PCI_BASE_ADDRESS_2, saveBaseAddress18);
466 	pci_write_config_dword(pcidev, PCI_BASE_ADDRESS_4, saveBaseAddress20);
467 }
468 #endif
469 
470 /****************************************************************************
471 PARAMETERS:
472 pcidev	- PCI device info for the video card on the bus to boot
473 VGAInfo - BIOS emulator VGA info structure
474 
475 RETURNS:
476 true if successfully initialised, false if not.
477 
478 REMARKS:
479 Loads and POST's the display controllers BIOS, directly from the BIOS
480 image we can extract over the PCI bus.
481 ****************************************************************************/
482 #ifdef CONFIG_DM_PCI
PCI_postController(struct udevice * pcidev,uchar * bios_rom,int bios_len,BE_VGAInfo * vga_info,int vesa_mode,struct vbe_mode_info * mode_info)483 static int PCI_postController(struct udevice *pcidev, uchar *bios_rom,
484 			      int bios_len, BE_VGAInfo *vga_info,
485 			      int vesa_mode, struct vbe_mode_info *mode_info)
486 #else
487 static int PCI_postController(pci_dev_t pcidev, uchar *bios_rom, int bios_len,
488 			      BE_VGAInfo *vga_info, int vesa_mode,
489 			      struct vbe_mode_info *mode_info)
490 #endif
491 {
492 	u32 bios_image_len;
493 	uchar *mapped_bios;
494 	uchar *copy_of_bios;
495 #ifdef CONFIG_DM_PCI
496 	pci_dev_t bdf;
497 #endif
498 
499 	if (bios_rom) {
500 		copy_of_bios = bios_rom;
501 		bios_image_len = bios_len;
502 	} else {
503 		/*
504 		 * Allocate memory to store copy of BIOS from display
505 		 * controller
506 		 */
507 		mapped_bios = PCI_mapBIOSImage(pcidev);
508 		if (mapped_bios == NULL) {
509 			printf("videoboot: Video ROM failed to map!\n");
510 			return false;
511 		}
512 
513 		bios_image_len = mapped_bios[2] * 512;
514 
515 		copy_of_bios = malloc(bios_image_len);
516 		if (copy_of_bios == NULL) {
517 			printf("videoboot: Out of memory!\n");
518 			return false;
519 		}
520 		memcpy(copy_of_bios, mapped_bios, bios_image_len);
521 		PCI_unmapBIOSImage(pcidev, mapped_bios);
522 	}
523 
524 	/*Save information in vga_info structure*/
525 #ifdef CONFIG_DM_PCI
526 	bdf = dm_pci_get_bdf(pcidev);
527 	vga_info->function = PCI_FUNC(bdf);
528 	vga_info->device = PCI_DEV(bdf);
529 	vga_info->bus = PCI_BUS(bdf);
530 #else
531 	vga_info->function = PCI_FUNC(pcidev);
532 	vga_info->device = PCI_DEV(pcidev);
533 	vga_info->bus = PCI_BUS(pcidev);
534 #endif
535 	vga_info->pcidev = pcidev;
536 	vga_info->BIOSImage = copy_of_bios;
537 	vga_info->BIOSImageLen = bios_image_len;
538 
539 	/*Now execute the BIOS POST for the device*/
540 	if (copy_of_bios[0] != 0x55 || copy_of_bios[1] != 0xAA) {
541 		printf("videoboot: Video ROM image is invalid!\n");
542 		return false;
543 	}
544 
545 	PCI_doBIOSPOST(pcidev, vga_info, vesa_mode, mode_info);
546 
547 	/*Reset the size of the BIOS image to the final size*/
548 	vga_info->BIOSImageLen = copy_of_bios[2] * 512;
549 	return true;
550 }
551 
552 #ifdef CONFIG_DM_PCI
biosemu_setup(struct udevice * pcidev,BE_VGAInfo ** vga_infop)553 int biosemu_setup(struct udevice *pcidev, BE_VGAInfo **vga_infop)
554 #else
555 int biosemu_setup(pci_dev_t pcidev, BE_VGAInfo **vga_infop)
556 #endif
557 {
558 	BE_VGAInfo *VGAInfo;
559 #ifdef CONFIG_DM_PCI
560 	pci_dev_t bdf = dm_pci_get_bdf(pcidev);
561 
562 	printf("videoboot: Booting PCI video card bus %d, function %d, device %d\n",
563 	       PCI_BUS(bdf), PCI_FUNC(bdf), PCI_DEV(bdf));
564 #else
565 	printf("videoboot: Booting PCI video card bus %d, function %d, device %d\n",
566 	       PCI_BUS(pcidev), PCI_FUNC(pcidev), PCI_DEV(pcidev));
567 #endif
568 	/*Initialise the x86 BIOS emulator*/
569 	if ((VGAInfo = malloc(sizeof(*VGAInfo))) == NULL) {
570 		printf("videoboot: Out of memory!\n");
571 		return -ENOMEM;
572 	}
573 	memset(VGAInfo, 0, sizeof(*VGAInfo));
574 	BE_init(0, 65536, VGAInfo, 0);
575 	*vga_infop = VGAInfo;
576 
577 	return 0;
578 }
579 
biosemu_set_interrupt_handler(int intnum,int (* int_func)(void))580 void biosemu_set_interrupt_handler(int intnum, int (*int_func)(void))
581 {
582 	X86EMU_setupIntrFunc(intnum, (X86EMU_intrFuncs)int_func);
583 }
584 
585 #ifdef CONFIG_DM_PCI
biosemu_run(struct udevice * pcidev,uchar * bios_rom,int bios_len,BE_VGAInfo * vga_info,int clean_up,int vesa_mode,struct vbe_mode_info * mode_info)586 int biosemu_run(struct udevice *pcidev, uchar *bios_rom, int bios_len,
587 		BE_VGAInfo *vga_info, int clean_up, int vesa_mode,
588 		struct vbe_mode_info *mode_info)
589 #else
590 int biosemu_run(pci_dev_t pcidev, uchar *bios_rom, int bios_len,
591 		BE_VGAInfo *vga_info, int clean_up, int vesa_mode,
592 		struct vbe_mode_info *mode_info)
593 #endif
594 {
595 	/*Post all the display controller BIOS'es*/
596 	if (!PCI_postController(pcidev, bios_rom, bios_len, vga_info,
597 				vesa_mode, mode_info))
598 		return -EINVAL;
599 
600 	/*
601 	 * Cleanup and exit the emulator if requested. If the BIOS emulator
602 	 * is needed after booting the card, we will not call BE_exit and
603 	 * leave it enabled for further use (ie: VESA driver etc).
604 	*/
605 	if (clean_up) {
606 		BE_exit();
607 		if (vga_info->BIOSImage &&
608 		    (ulong)(vga_info->BIOSImage) != 0xc0000)
609 			free(vga_info->BIOSImage);
610 		free(vga_info);
611 	}
612 
613 	return 0;
614 }
615 
616 /****************************************************************************
617 PARAMETERS:
618 pcidev	    - PCI device info for the video card on the bus to boot
619 pVGAInfo    - Place to return VGA info structure is requested
620 cleanUp	    - true to clean up on exit, false to leave emulator active
621 
622 REMARKS:
623 Boots the PCI/AGP video card on the bus using the Video ROM BIOS image
624 and the X86 BIOS emulator module.
625 ****************************************************************************/
626 #ifdef CONFIG_DM_PCI
BootVideoCardBIOS(struct udevice * pcidev,BE_VGAInfo ** pVGAInfo,int clean_up)627 int BootVideoCardBIOS(struct udevice *pcidev, BE_VGAInfo **pVGAInfo,
628 		      int clean_up)
629 #else
630 int BootVideoCardBIOS(pci_dev_t pcidev, BE_VGAInfo **pVGAInfo, int clean_up)
631 #endif
632 {
633 	BE_VGAInfo *VGAInfo;
634 	int ret;
635 
636 	ret = biosemu_setup(pcidev, &VGAInfo);
637 	if (ret)
638 		return false;
639 	ret = biosemu_run(pcidev, NULL, 0, VGAInfo, clean_up, -1, NULL);
640 	if (ret)
641 		return false;
642 
643 	/* Return VGA info pointer if the caller requested it*/
644 	if (pVGAInfo)
645 		*pVGAInfo = VGAInfo;
646 
647 	return true;
648 }
649