2 * Copyright (c) 2000-2006 Apple Computer, Inc. All rights reserved.
4 * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
6 * This file contains Original Code and/or Modifications of Original Code
7 * as defined in and that are subject to the Apple Public Source License
8 * Version 2.0 (the 'License'). You may not use this file except in
9 * compliance with the License. The rights granted to you under the License
10 * may not be used to create, or enable the creation or redistribution of,
11 * unlawful or unlicensed copies of an Apple operating system, or to
12 * circumvent, violate, or enable the circumvention or violation of, any
13 * terms of an Apple operating system software license agreement.
15 * Please obtain a copy of the License at
16 * http://www.opensource.apple.com/apsl/ and read it before using this file.
18 * The Original Code and all software distributed under the License are
19 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
20 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
21 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
22 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
23 * Please see the License for the specific language governing rights and
24 * limitations under the License.
26 * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
30 * i386 platform expert initialization.
32 #include <sys/types.h>
33 #include <mach/vm_param.h>
34 #include <machine/machine_routines.h>
35 #include <pexpert/protos.h>
36 #include <pexpert/pexpert.h>
37 #include <pexpert/boot.h>
38 #include <pexpert/device_tree.h>
39 #include <pexpert/pe_images.h>
40 #include <kern/sched_prim.h>
41 #include <kern/debug.h>
43 #include "boot_images.h"
45 /* extern references */
46 extern void pe_identify_machine(void * args
);
51 /* Clock Frequency Info */
52 clock_frequency_info_t gPEClockFrequencyInfo
;
54 void *gPEEFISystemTable
;
55 void *gPEEFIRuntimeServices
;
57 static boot_icon_element
* norootIcon_lzss
;
58 static const uint8_t* norootClut_lzss
;
60 int PE_initialize_console( PE_Video
* info
, int op
)
62 static int last_console
= -1;
67 info
->v_display
= GRAPHICS_MODE
;
72 case kPEDisableScreen
:
73 initialize_screen(info
, op
);
74 kprintf("kPEDisableScreen %d\n", last_console
);
75 if (!console_is_serial())
76 last_console
= switch_to_serial_console();
80 initialize_screen(info
, op
);
81 if (info
) PE_state
.video
= *info
;
82 kprintf("kPEEnableScreen %d\n", last_console
);
83 if( last_console
!= -1)
84 switch_to_old_console( last_console
);
87 case kPEBaseAddressChange
:
88 if (info
) PE_state
.video
= *info
;
92 initialize_screen(info
, op
);
99 void PE_init_iokit(void)
101 enum { kMaxBootVar
= 128 };
105 unsigned long length
;
106 unsigned long value
[2];
107 } DriversPackageProp
;
109 boolean_t bootClutInitialized
= FALSE
;
110 boolean_t noroot_rle_Initialized
= FALSE
;
115 boot_progress_element
*bootPict
;
117 norootIcon_lzss
= NULL
;
118 norootClut_lzss
= NULL
;
120 PE_init_kprintf(TRUE
);
121 PE_init_printf(TRUE
);
123 kprintf("Kernel boot args: '%s'\n", PE_boot_args());
126 * Fetch the CLUT and the noroot image.
129 if( kSuccess
== DTLookupEntry(NULL
, "/chosen/memory-map", &entry
)) {
130 if( kSuccess
== DTGetProperty(entry
, "BootCLUT", (void **) &map
, &size
)) {
131 if (sizeof(appleClut8
) <= map
[1]) {
132 bcopy( (void *)ml_static_ptovirt(map
[0]), appleClut8
, sizeof(appleClut8
) );
133 bootClutInitialized
= TRUE
;
137 if( kSuccess
== DTGetProperty(entry
, "Pict-FailedBoot", (void **) &map
, &size
)) {
138 bootPict
= (boot_progress_element
*) ml_static_ptovirt(map
[0]);
139 default_noroot
.width
= bootPict
->width
;
140 default_noroot
.height
= bootPict
->height
;
141 default_noroot
.dx
= 0;
142 default_noroot
.dy
= bootPict
->yOffset
;
143 default_noroot_data
= &bootPict
->data
[0];
144 noroot_rle_Initialized
= TRUE
;
147 if( kSuccess
== DTGetProperty(entry
, "FailedCLUT", (void **) &map
, &size
)) {
148 norootClut_lzss
= (uint8_t*) ml_static_ptovirt(map
[0]);
151 if( kSuccess
== DTGetProperty(entry
, "FailedImage", (void **) &map
, &size
)) {
152 norootIcon_lzss
= (boot_icon_element
*) ml_static_ptovirt(map
[0]);
153 if (norootClut_lzss
== NULL
) {
154 printf("ERROR: No FailedCLUT provided for noroot icon!\n");
159 if (!bootClutInitialized
) {
160 bcopy( (void *) (uintptr_t) bootClut
, (void *) appleClut8
, sizeof(appleClut8
) );
163 if (!noroot_rle_Initialized
) {
164 default_noroot
.width
= kFailedBootWidth
;
165 default_noroot
.height
= kFailedBootHeight
;
166 default_noroot
.dx
= 0;
167 default_noroot
.dy
= kFailedBootOffset
;
168 default_noroot_data
= failedBootPict
;
172 * Initialize the spinning wheel (progress indicator).
174 vc_progress_initialize( &default_progress
, default_progress_data1x
, default_progress_data2x
,
175 (unsigned char *) appleClut8
);
177 (void) StartIOKit( PE_state
.deviceTreeHead
, PE_state
.bootArgs
, gPEEFIRuntimeServices
, NULL
);
180 void PE_init_platform(boolean_t vm_initialized
, void * _args
)
182 boot_args
*args
= (boot_args
*)_args
;
184 if (PE_state
.initialized
== FALSE
) {
185 PE_state
.initialized
= TRUE
;
188 PE_state
.bootArgs
= _args
;
189 PE_state
.deviceTreeHead
= (void *) ml_static_ptovirt(args
->deviceTreeP
);
190 PE_state
.video
.v_baseAddr
= args
->Video
.v_baseAddr
; // remains physical address
191 PE_state
.video
.v_rowBytes
= args
->Video
.v_rowBytes
;
192 PE_state
.video
.v_width
= args
->Video
.v_width
;
193 PE_state
.video
.v_height
= args
->Video
.v_height
;
194 PE_state
.video
.v_depth
= args
->Video
.v_depth
;
195 PE_state
.video
.v_display
= args
->Video
.v_display
;
196 PE_state
.video
.v_scale
= (kBootArgsFlagHiDPI
& args
->flags
) ? 2 : 1;
197 strlcpy(PE_state
.video
.v_pixelFormat
, "PPPPPPPP",
198 sizeof(PE_state
.video
.v_pixelFormat
));
200 #ifdef kBootArgsFlagHiDPI
201 if (args
->flags
& kBootArgsFlagHiDPI
)
202 PE_state
.video
.v_scale
= kPEScaleFactor2x
;
204 PE_state
.video
.v_scale
= kPEScaleFactor1x
;
206 PE_state
.video
.v_scale
= kPEScaleFactor1x
;
210 if (!vm_initialized
) {
212 if (PE_state
.deviceTreeHead
) {
213 DTInit(PE_state
.deviceTreeHead
);
216 pe_identify_machine(args
);
223 void PE_create_console( void )
225 if ( PE_state
.video
.v_display
== GRAPHICS_MODE
)
226 PE_initialize_console( &PE_state
.video
, kPEGraphicsMode
);
228 PE_initialize_console( &PE_state
.video
, kPETextMode
);
231 int PE_current_console( PE_Video
* info
)
233 *info
= PE_state
.video
;
238 void PE_display_icon( __unused
unsigned int flags
, __unused
const char * name
)
240 if ( norootIcon_lzss
&& norootClut_lzss
) {
241 uint32_t width
= norootIcon_lzss
->width
;
242 uint32_t height
= norootIcon_lzss
->height
;
243 uint32_t x
= ((PE_state
.video
.v_width
- width
) / 2);
244 uint32_t y
= ((PE_state
.video
.v_height
- height
) / 2) + norootIcon_lzss
->y_offset_from_center
;
246 vc_display_lzss_icon(x
, y
, width
, height
,
247 &norootIcon_lzss
->data
[0],
248 norootIcon_lzss
->data_size
,
251 else if ( default_noroot_data
) {
252 vc_display_icon( &default_noroot
, default_noroot_data
);
254 printf("ERROR: No data found for noroot icon!\n");
259 PE_get_hotkey(__unused
unsigned char key
)
264 static timebase_callback_func gTimebaseCallback
;
266 void PE_register_timebase_callback(timebase_callback_func callback
)
268 gTimebaseCallback
= callback
;
270 PE_call_timebase_callback();
273 void PE_call_timebase_callback(void)
275 struct timebase_freq_t timebase_freq
;
276 unsigned long num
, den
, cnt
;
278 num
= gPEClockFrequencyInfo
.bus_clock_rate_num
* gPEClockFrequencyInfo
.bus_to_dec_rate_num
;
279 den
= gPEClockFrequencyInfo
.bus_clock_rate_den
* gPEClockFrequencyInfo
.bus_to_dec_rate_den
;
283 if ((num
% cnt
) || (den
% cnt
)) {
292 timebase_freq
.timebase_num
= num
;
293 timebase_freq
.timebase_den
= den
;
295 if (gTimebaseCallback
) gTimebaseCallback(&timebase_freq
);
299 * The default (non-functional) PE_poll_input handler.
302 PE_stub_poll_input(__unused
unsigned int options
, char * c
)
305 return 1; /* 0 for success, 1 for unsupported */
309 * Called by the kernel debugger to poll for keyboard input.
310 * Keyboard drivers may replace the default stub function
311 * with their polled-mode input function.
313 int (*PE_poll_input
)(unsigned int options
, char * c
)
314 = PE_stub_poll_input
;
317 PE_reboot_on_panic(void)
319 boot_args
*args
= (boot_args
*)PE_state
.bootArgs
;
321 if (args
->flags
& kBootArgsFlagRebootOnPanic
)