source: rtems/c/src/lib/libbsp/i386/pc386/console/inch.c @ dbfa3148

4.104.114.84.95
Last change on this file since dbfa3148 was dbfa3148, checked in by Joel Sherrill <joel.sherrill@…>, on Jul 10, 1998 at 3:43:18 PM

Patch from Quality Quorum <qqi@…>. Comments:

c/src/lib/libbsp/i386/pc386/console/console.c

assert() modified so it prints on selected console instead of
PC console

c/src/lib/libbsp/i386/pc386/console/inch.c

inch_sleep() modified, so it does not depend upon tmacros.h

c/src/lib/libbsp/i386/pc386/pc386dev/GDB.HOWTO

description updated

c/src/lib/libbsp/i386/pc386/startup/exit.c

last output before call to exit() will be printed properly on
serial console

c/src/lib/libbsp/i386/pc386/startup/irq.c

re-submitted bug fix for problem in irqs over 7.

  • Property mode set to 100644
File size: 9.4 KB
Line 
1/*-------------------------------------------------------------------------+
2| inch.c v1.1 - PC386 BSP - 1997/08/07
3+--------------------------------------------------------------------------+
4| (C) Copyright 1997 -
5| - NavIST Group - Real-Time Distributed Systems and Industrial Automation
6|
7| http://pandora.ist.utl.pt
8|
9| Instituto Superior Tecnico * Lisboa * PORTUGAL
10+--------------------------------------------------------------------------+
11| Disclaimer:
12|
13| This file is provided "AS IS" without warranty of any kind, either
14| expressed or implied.
15+--------------------------------------------------------------------------+
16| This code is based on:
17|   inch.c,v 1.3 1995/12/19 20:07:25 joel Exp - go32 BSP
18| With the following copyright notice:
19| With the following copyright notice:
20| **************************************************************************
21| *  COPYRIGHT (c) 1989-1998.
22| *  On-Line Applications Research Corporation (OAR).
23| *  Copyright assigned to U.S. Government, 1994.
24| *
25| *  The license and distribution terms for this file may be
26| *  found in found in the file LICENSE in this distribution or at
27| *  http://www.OARcorp.com/rtems/license.html.
28| **************************************************************************
29|
30|  $Id$
31+--------------------------------------------------------------------------*/
32
33#include <bsp.h>
34#include <irq.h>
35
36/*-------------------------------------------------------------------------+
37| Constants
38+--------------------------------------------------------------------------*/
39#define KBD_CTL      0x61  /* -------------------------------- */
40#define KBD_DATA     0x60  /* Ports for PC keyboard controller */
41#define KBD_STATUS   0x64  /* -------------------------------- */
42
43#define KBD_BUF_SIZE 256
44
45/*-------------------------------------------------------------------------+
46| Global Variables
47+--------------------------------------------------------------------------*/
48static char key_map[] =
49{
50  0,033,'1','2','3','4','5','6','7','8','9','0','-','=','\b','\t',
51  'q','w','e','r','t','y','u','i','o','p','[',']',015,0x80,
52  'a','s','d','f','g','h','j','k','l',';',047,0140,0x80,
53  0134,'z','x','c','v','b','n','m',',','.','/',0x80,
54  '*',0x80,' ',0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x80,
55  0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x80,
56  0x80,0x80,0x80,'0',0177
57}; /* Keyboard scancode -> character map with no modifiers.       */
58
59static char shift_map[] =
60{
61  0,033,'!','@','#','$','%','^','&','*','(',')','_','+','\b','\t',
62  'Q','W','E','R','T','Y','U','I','O','P','{','}',015,0x80,
63  'A','S','D','F','G','H','J','K','L',':',042,'~',0x80,
64  '|','Z','X','C','V','B','N','M','<','>','?',0x80,
65  '*',0x80,' ',0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x80,
66  0x80,0x80,0x80,0x80,'7','8','9',0x80,'4','5','6',0x80,
67  '1','2','3','0',177
68}; /* Keyboard scancode -> character map with SHIFT key modifier. */ 
69
70static char             kbd_buffer[KBD_BUF_SIZE];
71static rtems_unsigned16 kbd_first = 0;
72static rtems_unsigned16 kbd_last  = 0;
73static rtems_unsigned16 kbd_end   = KBD_BUF_SIZE - 1;
74
75/*-------------------------------------------------------------------------+
76|         Function: rtemsReboot
77|      Description: Reboot the PC.
78| Global Variables: None.
79|        Arguments: None.
80|          Returns: Nothing.
81+--------------------------------------------------------------------------*/
82void rtemsReboot(void)
83{
84  /* shutdown and reboot */
85  outport_byte(0x64, 0xFE);      /* use keyboard controler to do the job... */
86} /* rtemsReboot */
87
88/*-------------------------------------------------------------------------+
89|         Function: _IBMPC_scankey
90|      Description: This function can be called during a poll for input, or by
91|                   an ISR. Basically any time you want to process a keypress.
92| Global Variables: key_map, shift_map.
93|        Arguments: outChar - character read in case of a valid reading,
94|                   otherwise unchanged.
95|          Returns: TRUE in case a valid character has been read,
96|                   FALSE otherwise.
97+--------------------------------------------------------------------------*/
98rtems_boolean
99_IBMPC_scankey(char *outChar)
100{
101  unsigned char inChar;
102  static int alt_pressed   = 0;
103  static int ctrl_pressed  = 0;
104  static int shift_pressed = 0;
105  static int caps_pressed  = 0;
106  static int extended      = 0;
107
108  *outChar = NULL; /* default value if we return FALSE */
109
110  /* Read keyboard controller, toggle enable */
111  inport_byte(KBD_CTL, inChar);
112  outport_byte(KBD_CTL, inChar & ~0x80);
113  outport_byte(KBD_CTL, inChar | 0x80);
114  outport_byte(KBD_CTL, inChar & ~0x80);
115
116  /* See if it has data */
117  inport_byte(KBD_STATUS, inChar);
118  if ((inChar & 0x01) == 0)
119    return FALSE;
120
121  /* Read the data.  Handle nonsense with shift, control, etc. */
122  inport_byte(KBD_DATA, inChar);
123
124  if (extended)
125    extended--;
126
127  switch (inChar)
128  {
129    case 0xe0:
130      extended = 2;
131      return FALSE;
132      break;
133
134    case 0x38:
135      alt_pressed = 1;
136      return FALSE;
137      break;
138    case 0xb8:
139      alt_pressed = 0;
140      return FALSE;
141      break;
142
143    case 0x1d:
144      ctrl_pressed = 1;
145      return FALSE;
146      break;
147    case 0x9d:
148      ctrl_pressed = 0;
149      return FALSE;
150      break;
151
152    case 0x2a:
153      if (extended)
154        return FALSE;
155    case 0x36:
156      shift_pressed = 1;
157      return FALSE;
158      break;
159    case 0xaa:
160      if (extended)
161        return FALSE;
162    case 0xb6:
163      shift_pressed = 0;
164      return FALSE;
165      break;
166
167    case 0x3a:
168      caps_pressed = 1;
169      return FALSE;
170      break;
171    case 0xba:
172      caps_pressed = 0;
173      return FALSE;
174      break;
175
176    case 0x53:
177      if (ctrl_pressed && alt_pressed) 
178        rtemsReboot(); /* ctrl+alt+del -> reboot */
179      break;
180
181    /*
182     * Ignore unrecognized keys--usually arrow and such
183     */
184    default:
185      if ((inChar & 0x80) || (inChar > 0x39))
186      /* High-bit on means key is being released, not pressed */
187        return FALSE;
188      break;
189  } /* switch */
190
191  /* Strip high bit, look up in our map */
192  inChar &= 0x7f;
193  if (ctrl_pressed)
194  {
195    *outChar = key_map[inChar];
196    *outChar &= 037;
197  }
198  else
199  {
200    *outChar = shift_pressed ? shift_map[inChar] : key_map[inChar];
201    if (caps_pressed)
202    {
203      if (*outChar >= 'A' && *outChar <= 'Z')
204        *outChar += 'a' - 'A';
205      else if (*outChar >= 'a' && *outChar <= 'z')
206        *outChar -= 'a' - 'A';
207    }
208  }
209
210  return TRUE;
211} /* _IBMPC_scankey */
212
213
214/*-------------------------------------------------------------------------+
215|         Function: _IBMPC_keyboard_isr
216|      Description: Interrupt Service Routine for keyboard (0x01) IRQ.
217| Global Variables: kbd_buffer, kbd_first, kbd_last.
218|        Arguments: vector - standard RTEMS argument - see documentation.
219|          Returns: standard return value - see documentation.
220+--------------------------------------------------------------------------*/
221rtems_isr
222_IBMPC_keyboard_isr(rtems_vector_number vector)
223{
224  if (_IBMPC_scankey(&kbd_buffer[kbd_last]))
225  {
226    /* Got one; save it if there is enough room in buffer. */
227    unsigned int next = (kbd_last == kbd_end) ? 0 : kbd_last + 1;
228
229    if (next != kbd_first)
230      {
231        kbd_last = next;
232      }
233  }
234
235  PC386_ackIrq(vector - PC386_IRQ_VECTOR_BASE); /* Mark interrupt as handled. */
236} /* _IBMPC_keyboard_isr */
237
238
239/*-------------------------------------------------------------------------+
240|         Function: _IBMPC_chrdy
241|      Description: Check keyboard ISR buffer and return character if not empty.
242| Global Variables: kbd_buffer, kbd_first, kbd_last.
243|        Arguments: c - character read if keyboard buffer not empty, otherwise
244|                   unchanged.
245|          Returns: TRUE if keyboard buffer not empty, FALSE otherwise.
246+--------------------------------------------------------------------------*/
247rtems_boolean
248_IBMPC_chrdy(char *c)
249{
250  /* FIX ME!!! It doesn't work without something like the following line.
251     Find out why! */
252  printk("");
253
254  /* Check buffer our ISR builds */
255  if (kbd_first != kbd_last)
256  {
257    *c = kbd_buffer[kbd_first];
258
259    kbd_first = (kbd_first + 1) % KBD_BUF_SIZE;
260    return TRUE;
261  }
262  else
263    return FALSE;
264} /* _IBMPC_chrdy */
265
266
267/*-------------------------------------------------------------------------+
268|         Function: _IBMPC_inch
269|      Description: Poll keyboard until a character is ready and return it.
270| Global Variables: None.
271|        Arguments: None.
272|          Returns: character read from keyboard.
273+--------------------------------------------------------------------------*/
274char
275_IBMPC_inch(void)
276{
277    char c;
278    while (!_IBMPC_chrdy(&c))
279      continue;
280
281    return c;
282} /* _IBMPC_inch */
283
284/*-------------------------------------------------------------------------+
285|         Function: _IBMPC_inch_sleep
286|      Description: If charcter is ready return it, otherwise sleep until
287|                   it is ready
288| Global Variables: None.
289|        Arguments: None.
290|          Returns: character read from keyboard.
291+--------------------------------------------------------------------------*/
292char
293_IBMPC_inch_sleep(void)
294{
295    char           c;
296    rtems_interval ticks_per_second;
297
298    ticks_per_second = 0;
299
300    for(;;)
301      {
302        if(_IBMPC_chrdy(&c))
303          {
304            return c;
305          }
306 
307        if(ticks_per_second == 0)
308          {
309            rtems_clock_get(RTEMS_CLOCK_GET_TICKS_PER_SECOND, 
310                            &ticks_per_second);
311          }
312        rtems_task_wake_after((ticks_per_second+24)/25);
313      }
314       
315    return c;
316} /* _IBMPC_inch */
317
318
319
320
321
322
Note: See TracBrowser for help on using the repository browser.