Chameleon

Chameleon Svn Source Tree

Root/branches/cparm/i386/libsaio/misc.c

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␊
49/*␊
50 * keyboard controller (8042) I/O port addresses␊
51 */␊
52#define PORT_A 0x60 /* port A */␊
53#define PORT_B 0x64 /* port B */␊
54␊
55/*␊
56 * keyboard controller command␊
57 */␊
58#define CMD_WOUT 0xd1 /* write controller's output port */␊
59␊
60/*␊
61 * keyboard controller status flags␊
62 */␊
63#define KB_INFULL 0x2 /* input buffer full */␊
64#define KB_OUTFULL 0x1 /* output buffer full */␊
65␊
66#define KB_A20 0x9f /* enable A20,␊
67 enable output buffer full interrupt␊
68 enable data line␊
69 disable clock line */␊
70␊
71//==========================================================================␊
72// Enable A20 gate to be able to access memory above 1MB␊
73static inline void flushKeyboardInputBuffer();␊
74static inline void flushKeyboardInputBuffer()␊
75{␊
76 unsigned char ret;␊
77 /* Apparently all flags on means that they're invalid and that the code␊
78 should stop trying to check them because they'll never change */␊
79 do␊
80 {␊
81 ret = inb(PORT_B);␊
82 } while( (ret != 0xff) && (ret & KB_INFULL));␊
83}␊
84␊
85void enableA20()␊
86{␊
87 /* make sure that the input buffer is empty */␊
88 flushKeyboardInputBuffer();␊
89␊
90 /* make sure that the output buffer is empty */␊
91 if (inb(PORT_B) & KB_OUTFULL)␊
92 (void)inb(PORT_A);␊
93␊
94 /* make sure that the input buffer is empty */␊
95 flushKeyboardInputBuffer();␊
96␊
97 /* write output port */␊
98 outb(PORT_B, CMD_WOUT);␊
99 delay(100);␊
100␊
101 /* wait until command is accepted */␊
102 flushKeyboardInputBuffer();␊
103␊
104 outb(PORT_A, KB_A20);␊
105 delay(100);␊
106␊
107 /* wait until done */␊
108 flushKeyboardInputBuffer();␊
109}␊
110#if UNUSED␊
111void turnOffFloppy(void)␊
112{␊
113␉/*␊
114␉ * Disable floppy:␊
115␉ * Hold controller in reset,␊
116␉ * disable DMA and IRQ,␊
117␉ * turn off floppy motors.␊
118␉ */␊
119␉outb(0x3F2, 0x00);␊
120}␊
121#endif␊
122␊
123static bool fix_random=true;␊
124␊
125struct ran_obj* random_init (int rmin, int rmax)␊
126{␊
127␉if (rmin > rmax) ␊
128␉␉return false;␊
129␉␊
130 int n = (rmax+1) - rmin;␊
131␉␊
132␉int tab[rand_tab_len];␊
133␉␊
134␉struct ran_obj * self = (struct ran_obj * )malloc(sizeof(struct ran_obj));␉␊
135␉if (!self) {␊
136 return NULL;␊
137 }␊
138 bzero(self,sizeof(struct ran_obj));␊
139 ␊
140␉self->rmin= rmin;␊
141␉␊
142␉self->n= n;␊
143␉␊
144␉int i;␊
145␉srand(time18());␊
146␉int limit1= 0, limit2= 0, gate1 = 0, gate2 = 0;␊
147␉␊
148␉if (fix_random) {␊
149␉␉limit1 = (rand() % 20) ;␉␉␊
150␉␉limit2 = (rand() % 20) ;␊
151␉}␊
152␉␊
153␉for (i = 0; i < rand_tab_len; i++){␊
154␉␉␊
155␉␉tab[i] = (rand() % n) + rmin;␊
156␉␉␊
157␉␉if (fix_random) {␉␉␉␊
158␉␉␉␊
159␉␉␉if (i > 1 && gate1 < limit1 && tab[i]==tab[i-2]) {␊
160␉␉␉␉i--;␊
161␉␉␉␉gate1++;␊
162␉␉␉␉␊
163␉␉␉␉continue;␊
164␉␉␉}␊
165␉␉␉␊
166␉␉␉if (i > 7 && gate2 < limit2 && tab[i]==tab[i-((rand() % 4)+5)]) {␊
167␉␉␉␉i--;␊
168␉␉␉␉gate2++;␊
169␉␉␉␉␊
170␉␉␉␉continue;␊
171␉␉␉}␊
172␉␉␉␊
173␉␉}␊
174␉␉self->tab[i]= tab[i];␉␉␊
175␉}␊
176␉␊
177␉␊
178␉return self;␊
179}␊
180␊
181int random (struct ran_obj* self)␊
182{␊
183␉␉␊
184 struct ran_obj * ret = self ;␊
185 ␊
186␉static int wheel = 0;␊
187␉int gate3 = 0;␊
188␉int limit3 = 0;␉␊
189␉static int retlst[rand_tab_len];␊
190␉␊
191␉␊
192␉int index;␊
193␉int rn;␉␊
194␉␊
195 if (!ret) {␊
196␉␉return -1;␉// TODO: fix this␉␊
197␉}␊
198 ␊
199␉if (fix_random) {␊
200␉␉gate3 = rand() % 2;␉␉␊
201␉}␊
202␉␊
203␉␊
204retry:␉␊
205␉index = rand() % rand_tab_len;␉␊
206␉rn = ret->tab[index];␉␊
207␉ret->tab[index] = (rand() % ret->n) + ret->rmin;␊
208␉␊
209␉␊
210␉if (fix_random) {␉␊
211␉␉if ((gate3 && limit3 < 5) && (ret->tab[index] == rn)) {␊
212␉␉␉limit3++;␊
213␉␉␉goto retry;␊
214␉␉}␉␊
215␉␉retlst[wheel] = rn;␊
216␉␉␊
217␉␉if (wheel > 0 && limit3 < 5) {␉␊
218␉␉␉␊
219␉␉␉if (gate3 && (rn == retlst[wheel-1])) {␉␉␉␊
220␉␉␉␉limit3++;␊
221␉␉␉␉goto retry;␊
222␉␉␉}␊
223␉␉␉␊
224␉␉␉if (gate3 && (wheel > 3 && rn==retlst[wheel-((rand() % 3)+1)]) && (limit3 < 5)) {␉␉␉␊
225␉␉␉␉limit3++;␊
226␉␉␉␉goto retry;␊
227␉␉␉}␊
228␉␉}␊
229␉␉␊
230␉␉wheel++;␊
231␉}␊
232␉␊
233␉self = ret;␉␊
234␉return rn;␉␊
235}␊
236␊
237void random_free (struct ran_obj* self)␊
238{␊
239 if (self /* && self->sgn == random_obj_sgn */) {␊
240 free(self);␊
241 } ␊
242 ␊
243}␊
244␊
245void usefixedrandom (bool opt)␊
246{␊
247␉fix_random = opt;␊
248}␊
249␊
250//==========================================================================␊
251// Return the platform name for this hardware.␊
252//␊
253#ifndef BOOT1␊
254void␊
255getPlatformName(char *nameBuf)␊
256{␊
257 strcpy(nameBuf, "ACPI");␊
258}␊
259#endif

Archive Download this file

Revision: 1919