1 | /*␊ |
2 | * Copyright (c) 1999-2003 Apple Computer, Inc. All rights reserved.␊ |
3 | *␊ |
4 | * @APPLE_LICENSE_HEADER_START@␊ |
5 | * ␊ |
6 | * Portions Copyright (c) 1999-2003 Apple Computer, Inc. All Rights␊ |
7 | * Reserved. This file contains Original Code and/or Modifications of␊ |
8 | * Original Code as defined in and that are subject to the Apple Public␊ |
9 | * Source License Version 2.0 (the "License"). You may not use this file␊ |
10 | * except in compliance with the License. Please obtain a copy of the␊ |
11 | * License at http://www.apple.com/publicsource and read it before using␊ |
12 | * this file.␊ |
13 | * ␊ |
14 | * The Original Code and all software distributed under the License are␊ |
15 | * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER␊ |
16 | * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,␊ |
17 | * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,␊ |
18 | * FITNESS FOR A PARTICULAR PURPOSE OR NON- INFRINGEMENT. Please see the␊ |
19 | * License for the specific language governing rights and limitations␊ |
20 | * under the License.␊ |
21 | * ␊ |
22 | * @APPLE_LICENSE_HEADER_END@␊ |
23 | */␊ |
24 | /* ␊ |
25 | * Mach Operating System␊ |
26 | * Copyright (c) 1990 Carnegie-Mellon University␊ |
27 | * Copyright (c) 1989 Carnegie-Mellon University␊ |
28 | * All rights reserved. The CMU software License Agreement specifies␊ |
29 | * the terms and conditions for use and redistribution.␊ |
30 | */␊ |
31 | ␊ |
32 | /*␊ |
33 | * ␉␉␉INTEL CORPORATION PROPRIETARY INFORMATION␊ |
34 | *␊ |
35 | *␉This software is supplied under the terms of a license agreement or ␊ |
36 | *␉nondisclosure agreement with Intel Corporation and may not be copied ␊ |
37 | *␉nor disclosed except in accordance with the terms of that agreement.␊ |
38 | *␊ |
39 | *␉Copyright 1988, 1989 Intel Corporation␊ |
40 | */␊ |
41 | ␊ |
42 | /*␊ |
43 | * Copyright 1993 NeXT, Inc.␊ |
44 | * All rights reserved.␊ |
45 | */␊ |
46 | ␊ |
47 | #include "libsaio.h"␊ |
48 | #include "bootstruct.h"␊ |
49 | #include <vers.h>␊ |
50 | ␊ |
51 | extern int␉vprf(const char * fmt, va_list ap);␊ |
52 | ␊ |
53 | bool gVerboseMode = false;␊ |
54 | bool gErrors = false;␊ |
55 | ␊ |
56 | /*␊ |
57 | * Azi: Doubled available log size; this seems to fix some hangs and instant reboots caused by␊ |
58 | * booting with -f (ignore caches). 96kb are enough to hold full log, booting with -f; even so,␊ |
59 | * this depends on how much we "play" at the boot prompt and with what patches we're playing,␊ |
60 | * depending on how much they print to the log.␊ |
61 | *␉␊ |
62 | * Kabyl: BooterLog␊ |
63 | */␊ |
64 | #define BOOTER_LOG_SIZE␉(128 * 1024)␊ |
65 | #define SAFE_LOG_SIZE␉134␊ |
66 | ␊ |
67 | char *msgbuf = 0;␊ |
68 | char *cursor = 0;␊ |
69 | ␊ |
70 | // Bungo:␊ |
71 | typedef struct {␊ |
72 | ␉uint16_t year;␊ |
73 | ␉uint8_t mon;␊ |
74 | ␉uint8_t day;␊ |
75 | ␉uint8_t hour;␊ |
76 | ␉uint8_t mins;␊ |
77 | ␉uint8_t secs;␊ |
78 | ␉uint8_t dlight;␊ |
79 | } datetime_t;␊ |
80 | static datetime_t datetime;␊ |
81 | ␊ |
82 | struct putc_info //Azi: exists on gui.c & printf.c␊ |
83 | {␊ |
84 | ␉char * str;␊ |
85 | ␉char * last_str;␊ |
86 | };␊ |
87 | ␊ |
88 | static int␊ |
89 | sputc(int c, struct putc_info * pi) //Azi: same as above␊ |
90 | {␊ |
91 | ␉if (pi->last_str)␊ |
92 | ␉if (pi->str == pi->last_str)␊ |
93 | ␉{␊ |
94 | ␉␉*(pi->str) = '\0';␊ |
95 | ␉␉return 0;␊ |
96 | ␉}␊ |
97 | ␉*(pi->str)++ = c;␊ |
98 | ␉return c;␊ |
99 | }␊ |
100 | ␊ |
101 | uint64_t getRTCdatetime() // 0xYYYYMMDDHHMMSS0L in decimal␊ |
102 | {␊ |
103 | ␉biosBuf_t bb;␊ |
104 | ␊ |
105 | ␉bb.intno = 0x1a;␊ |
106 | ␉bb.eax.r.h = 0x04; // get RTC date␊ |
107 | ␉//bb.flags.cf = 0;␊ |
108 | ␉bios(&bb);␊ |
109 | ␉if (bb.flags.cf) return 0;␊ |
110 | ␉datetime.year = (bb.ecx.r.h >> 4) * 1000 + (bb.ecx.r.h & 0x0F) * 100 + (bb.ecx.r.l >> 4) * 10 + (bb.ecx.r.l & 0x0F) * 1;␊ |
111 | ␉datetime.mon = (bb.edx.r.h >> 4) * 10 + (bb.edx.r.h & 0x0F) * 1;␊ |
112 | ␉datetime.day = (bb.edx.r.l >> 4) * 10 + (bb.edx.r.l & 0x0F) * 1;␊ |
113 | ␊ |
114 | ␉bb.intno = 0x1a;␊ |
115 | ␉bb.eax.r.h = 0x02; // get RTC time␊ |
116 | ␉//bb.flags.cf = 0;␊ |
117 | ␉bios(&bb);␊ |
118 | ␉if (bb.flags.cf) return 0;␊ |
119 | ␉datetime.dlight = bb.edx.r.l & 0x0F;␊ |
120 | ␉datetime.hour = (bb.ecx.r.h >> 4) * 10 + (bb.ecx.r.h & 0x0F) * 1;␊ |
121 | ␉datetime.mins = (bb.ecx.r.l >> 4) * 10 + (bb.ecx.r.l & 0x0F) * 1;␊ |
122 | ␉datetime.secs = (bb.edx.r.h >> 4) * 10 + (bb.edx.r.h & 0x0F) * 1;␊ |
123 | ␉return *(uint64_t *)&datetime;␊ |
124 | }␊ |
125 | ␊ |
126 | void initBooterLog(void)␊ |
127 | {␊ |
128 | ␉msgbuf = malloc(BOOTER_LOG_SIZE);␊ |
129 | ␉bzero(msgbuf, BOOTER_LOG_SIZE);␊ |
130 | ␉cursor = msgbuf;␊ |
131 | ␉msglog("%s\n", "Enoch (r" I386BOOT_CHAMELEONREVISION ")" " [" I386BOOT_BUILDDATE "]");␊ |
132 | ␉getRTCdatetime();␊ |
133 | ␉verbose("Logging started: %04d/%02d/%02d, %02d:%02d:%02d\n", datetime.year, datetime.mon, datetime.day, datetime.hour, datetime.mins, datetime.secs);␊ |
134 | }␊ |
135 | ␊ |
136 | int msglog(const char * fmt, ...)␊ |
137 | {␊ |
138 | ␉va_list ap;␊ |
139 | ␉struct putc_info pi;␊ |
140 | ␊ |
141 | ␉if (!msgbuf)␊ |
142 | ␉{␊ |
143 | ␉␉return 0;␊ |
144 | ␉}␊ |
145 | ␊ |
146 | ␉if (((cursor - msgbuf) > (BOOTER_LOG_SIZE - SAFE_LOG_SIZE)))␊ |
147 | ␉{␊ |
148 | ␉␉return 0;␊ |
149 | ␉}␊ |
150 | ␊ |
151 | ␉va_start(ap, fmt);␊ |
152 | ␉pi.str = cursor;␊ |
153 | ␉pi.last_str = 0;␊ |
154 | ␉prf(fmt, ap, sputc, &pi);␊ |
155 | ␉va_end(ap);␊ |
156 | ␉cursor += strlen((char *)cursor);␊ |
157 | ␊ |
158 | ␉return 0;␊ |
159 | }␊ |
160 | ␊ |
161 | void setupBooterLog(void)␊ |
162 | {␊ |
163 | ␉if (!msgbuf)␊ |
164 | ␉{␊ |
165 | ␉␉return;␊ |
166 | ␉}␊ |
167 | ␊ |
168 | ␉Node *node = DT__FindNode("/", false);␊ |
169 | ␉if (node)␊ |
170 | ␉␉DT__AddProperty(node, "boot-log", strlen((char *)msgbuf) + 1, msgbuf);␊ |
171 | }␊ |
172 | /* Kabyl: !BooterLog */␊ |
173 | ␊ |
174 | /*␊ |
175 | * write one character to console␊ |
176 | */␊ |
177 | int putchar(int c)␊ |
178 | {␊ |
179 | ␉if ( c == '\t' ) {␊ |
180 | ␉␉for (c = 0; c < 8; c++) bios_putchar(' ');␊ |
181 | ␉␉return c;␊ |
182 | ␉}␊ |
183 | ␊ |
184 | ␉if ( c == '\n' ) {␊ |
185 | ␉␉bios_putchar('\r');␊ |
186 | ␉}␊ |
187 | ␊ |
188 | ␉bios_putchar(c);␊ |
189 | ␊ |
190 | ␉return c;␊ |
191 | }␊ |
192 | ␊ |
193 | int getc()␊ |
194 | {␊ |
195 | ␉int c = bgetc();␊ |
196 | ␊ |
197 | ␉if ((c & 0xff) == 0) {␊ |
198 | ␉␉return c;␊ |
199 | ␉} else {␊ |
200 | ␉␉return (c & 0xff);␊ |
201 | ␉}␊ |
202 | }␊ |
203 | ␊ |
204 | // Read and echo a character from console. This doesn't echo backspace␊ |
205 | // since that screws up higher level handling␊ |
206 | ␊ |
207 | int getchar()␊ |
208 | {␊ |
209 | ␉register int c = getc();␊ |
210 | ␊ |
211 | //␉if ( c == '\r' ) c = '\n';␊ |
212 | ␊ |
213 | //␉if ( c >= ' ' && c < 0x7f) putchar(c);␊ |
214 | ␊ |
215 | ␉return (c);␊ |
216 | }␊ |
217 | ␊ |
218 | int printf(const char * fmt, ...)␊ |
219 | {␊ |
220 | ␉va_list ap;␊ |
221 | ␊ |
222 | ␉va_start(ap, fmt);␊ |
223 | ␉if (bootArgs->Video.v_display == VGA_TEXT_MODE)␊ |
224 | ␉{␊ |
225 | ␉␉prf(fmt, ap, putchar, 0);␊ |
226 | ␉}␊ |
227 | ␉else␊ |
228 | ␉{␊ |
229 | ␉␉vprf(fmt, ap);␊ |
230 | ␉}␊ |
231 | /*␊ |
232 | ␉{␊ |
233 | ␉␉// Kabyl: BooterLog␊ |
234 | ␉␉struct putc_info pi;␊ |
235 | ␊ |
236 | ␉␉if (!msgbuf) {␊ |
237 | ␉␉␉return 0;␊ |
238 | ␉␉}␊ |
239 | ␊ |
240 | ␉␉if (((cursor - msgbuf) > (BOOTER_LOG_SIZE - SAFE_LOG_SIZE))) {␊ |
241 | ␉␉␉return 0;␊ |
242 | ␉␉}␊ |
243 | ␉␉pi.str = cursor;␊ |
244 | ␉␉pi.last_str = 0;␊ |
245 | ␉␉prf(fmt, ap, sputc, &pi);␊ |
246 | ␉␉cursor += strlen((char *)cursor);␊ |
247 | ␉}␊ |
248 | */␊ |
249 | ␉va_end(ap);␊ |
250 | ␉return 0;␊ |
251 | }␊ |
252 | ␊ |
253 | int verbose(const char * fmt, ...)␊ |
254 | {␊ |
255 | ␉va_list ap;␊ |
256 | ␊ |
257 | ␉va_start(ap, fmt);␊ |
258 | ␉if (gVerboseMode)␊ |
259 | ␉{␊ |
260 | ␉␉if (bootArgs->Video.v_display == VGA_TEXT_MODE)␊ |
261 | ␉␉{␊ |
262 | ␉␉␉prf(fmt, ap, putchar, 0);␊ |
263 | ␉␉}␊ |
264 | ␉␉else␊ |
265 | ␉␉{␊ |
266 | ␉␉␉vprf(fmt, ap);␊ |
267 | ␉␉}␊ |
268 | ␉}␊ |
269 | ␊ |
270 | ␉{␊ |
271 | ␉␉// Kabyl: BooterLog␊ |
272 | ␉␉struct putc_info pi;␊ |
273 | ␊ |
274 | ␉␉if (!msgbuf) {␊ |
275 | ␉␉␉return 0;␊ |
276 | ␉␉}␊ |
277 | ␊ |
278 | ␉␉if (((cursor - msgbuf) > (BOOTER_LOG_SIZE - SAFE_LOG_SIZE))) {␊ |
279 | ␉␉␉return 0;␊ |
280 | ␉␉}␊ |
281 | ␉␉pi.str = cursor;␊ |
282 | ␉␉pi.last_str = 0;␊ |
283 | ␉␉prf(fmt, ap, sputc, &pi);␊ |
284 | ␉␉cursor += strlen((char *)cursor);␊ |
285 | ␉}␊ |
286 | ␊ |
287 | ␉va_end(ap);␊ |
288 | ␉return(0);␊ |
289 | }␊ |
290 | ␊ |
291 | int error(const char * fmt, ...)␊ |
292 | {␊ |
293 | ␉va_list ap;␊ |
294 | ␉gErrors = true;␊ |
295 | ␉va_start(ap, fmt);␊ |
296 | ␉if (bootArgs->Video.v_display == VGA_TEXT_MODE)␊ |
297 | ␉{␊ |
298 | ␉␉prf(fmt, ap, putchar, 0);␊ |
299 | ␉}␊ |
300 | ␉else␊ |
301 | ␉{␊ |
302 | ␉␉vprf(fmt, ap);␊ |
303 | ␉}␊ |
304 | ␊ |
305 | ␉// Kabyl: BooterLog␊ |
306 | ␉struct putc_info pi;␊ |
307 | ␊ |
308 | ␉if (!msgbuf)␊ |
309 | ␉{␊ |
310 | ␉␉return 0;␊ |
311 | ␉}␊ |
312 | ␊ |
313 | ␉if (((cursor - msgbuf) > (BOOTER_LOG_SIZE - SAFE_LOG_SIZE)))␊ |
314 | ␉{␊ |
315 | ␉␉return 0;␊ |
316 | ␉}␊ |
317 | ␊ |
318 | ␉pi.str = cursor;␊ |
319 | ␉pi.last_str = 0;␊ |
320 | ␉prf(fmt, ap, sputc, &pi);␊ |
321 | ␉cursor += strlen((char *)cursor);␊ |
322 | ␊ |
323 | ␉va_end(ap);␊ |
324 | ␉return(0);␊ |
325 | }␊ |
326 | ␊ |
327 | void stop(const char * fmt, ...)␊ |
328 | {␊ |
329 | ␉va_list ap;␊ |
330 | ␊ |
331 | ␉printf("\n");␊ |
332 | ␉va_start(ap, fmt);␊ |
333 | ␉if (bootArgs->Video.v_display == VGA_TEXT_MODE)␊ |
334 | ␉{␊ |
335 | ␉␉prf(fmt, ap, putchar, 0);␊ |
336 | ␉}␊ |
337 | ␉else␊ |
338 | ␉{␊ |
339 | ␉␉vprf(fmt, ap);␊ |
340 | ␉}␊ |
341 | ␉va_end(ap);␊ |
342 | ␉printf("\nThis is a non recoverable error! System HALTED!!!");␊ |
343 | ␉halt();␊ |
344 | ␉while (1);␊ |
345 | }␊ |
346 | ␊ |
347 | /** Print a "Press a key to continue..." message and wait for a key press. */␊ |
348 | void pause()␊ |
349 | {␊ |
350 | ␉printf("Press a key to continue...\n");␊ |
351 | ␉getchar(); // replace getchar() by pause() were useful.␊ |
352 | }␊ |
353 | |