Codice

«
«
«
«
250 volume VI os16
104.5.18 kernel/ibm_i86/con_char_read.c
Si veda la sezione 103.4.
1180001 |#include
1180002 |#include
1180003 |#include
1180004 |#include
1180005 |#include
1180006 |//----------------------------------------------------------------------
1180007 |int
1180008 |con_char_read (void)
1180009 |{
1180010 | int c;
1180011 | c = int16_01 ();
1180012 | //
1180013 | // Remove special keys that are not used: they have zero in the low
1180014 | // 8 bits, and something in the upper 8 bits.
1180015 | //
1180016 | if ((c & 0xFF00) && !(c & 0x00FF))
1180017 | {
1180018 | int16_00 (); // Remove from buffer and return zero:
1180019 | return (0); // no key.
1180020 | }
1180021 | //
1180022 | // A common key was pressed: filter only che low 8 bits.
1180023 | //
1180024 | c = c & 0x00FF;
1180025 | if (c == 0)
1180026 | {
1180027 | return (c); // There is no key.
1180028 | }
1180029 | if (c == ’\r’) // Convert ‘CR’ to ‘LF’.
1180030 | {
1180031 | c = ’\n’;
1180032 | }
1180033 | int16_00 (); // Remove the key from buffer and return.
1180034 | return (c);
1180035 |}
104.5.19 kernel/ibm_i86/con_char_ready.c
Si veda la sezione 103.4.
1190001 |#include
1190002 |#include
1190003 |#include
1190004 |#include
1190005 |#include
1190006 |//----------------------------------------------------------------------
1190007 |int
1190008 |con_char_ready (void)
1190009 |{
1190010 | int c;
1190011 | c = int16_01 ();
1190012 | //
1190013 | // Remove special keys that are not used: they have zero in the low
1190014 | // 8 bits, and something in the upper 8 bits.
1190015 | //
1190016 | if ((c & 0xFF00) && !(c & 0x00FF))
1190017 | {
1190018 | int16_00 (); // Remove from buffer and return zero:
1190019 | return (0); // no key.
1190020 | }
1190021 | //
1190022 | // A common key was pressed: filter only che low 8 bits.
1190023 | //
1190024 | c = c & 0x00FF;
1190025 | return (c);
1190026 |}
104.5.20 kernel/ibm_i86/con_char_wait.c
Si veda la sezione 103.4.
1200001 |#include
1200002 |#include
1200003 |#include
1200004 |#include
1200005 |#include
1200006 |//----------------------------------------------------------------------
1200007 |int
1200008 |con_char_wait (void)
1200009 |{
1200010 | int c;
1200011 | c = int16_00 ();
1200012 | c = c & 0x00FF;
1200013 | if (c == ’\r’)
1200014 | {
1200015 | c = ’\n’;
1200016 | }
1200017 | return (c);
1200018 |}
104.5.21 kernel/ibm_i86/con_init.c
Si veda la sezione 103.4.
1210001 |#include
1210002 |#include
1210003 |#include
1210004 |#include
1210005 |#include
1210006 |//----------------------------------------------------------------------
1210007 |void
1210008 |con_init (void)
1210009 |{
1210010 | int page;
1210011 | //
1210012 | int10_00 (IBM_I86_VIDEO_MODE);
1210013 | int10_05 (0);
1210014 | //
1210015 | for (page = 0; page < IBM_I86_VIDEO_PAGES; page++)
1210016 | {
Script e sorgenti del kernel 251
1210017 | con_putc (page, ’\n’);
1210018 | }
1210019 |}
104.5.22 kernel/ibm_i86/con_putc.c
Si veda la sezione 103.4.
1220001 |#include
1220002 |#include
1220003 |#include
1220004 |#include
1220005 |#include
1220006 |//----------------------------------------------------------------------
1220007 |void
1220008 |con_putc (int console, int c)
1220009 |{
1220010 | static int cursor[IBM_I86_VIDEO_PAGES];
1220011 | static addr_t address[] = {IBM_I86_VIDEO_ADDRESS};
1220012 | addr_t address_destination;
1220013 | size_t size_screen;
1220014 | size_t size_row;
1220015 | uint16_t cell;
1220016 | uint16_t attribute = 0x0700;
1220017 | int cursor_row;
1220018 | int cursor_column;
1220019 | int cursor_combined;
1220020 |
1220021 | if (console < 0 || console >= IBM_I86_VIDEO_PAGES)
1220022 | {
1220023 | //
1220024 | // No such console.
1220025 | //
1220026 | return;
1220027 | }
1220028 | //
1220029 | // Calculate sizes.
1220030 | //
1220031 | size_row = IBM_I86_VIDEO_COLUMNS;
1220032 | size_screen = size_row * IBM_I86_VIDEO_ROWS;
1220033 | //
1220034 | // See if it is a special character, or if the cursor position
1220035 | // requires a scroll up.
1220036 | //
1220037 | if (c == ’\n’)
1220038 | {
1220039 | con_scroll (console);
1220040 | cursor[console] = (size_screen - size_row);
1220041 | }
1220042 | else if (c == ’\b’)
1220043 | {
1220044 | cursor[console]--;
1220045 | if (cursor[console] < 0)
1220046 | {
1220047 | cursor[console] = 0;
1220048 | }
1220049 | }
1220050 | else if (cursor[console] == (size_screen -1))
1220051 | {
1220052 | //
1220053 | // Scroll up.
1220054 | //
1220055 | con_scroll (console);
1220056 | //
1220057 | cursor[console] -= size_row;
1220058 | }
1220059 | //
1220060 | // If it is not a control character, print it.
1220061 | //
1220062 | if (c != ’\n’ && c != ’\b’)
1220063 | {
1220064 | //
1220065 | // Write the character.
1220066 | //
1220067 | address_destination = address[console];
1220068 | address_destination += (cursor[console] * 2);
1220069 | cell = (attribute | (c & 0x00FF));
1220070 | //
1220071 | mem_write (address_destination, &cell, sizeof (uint16_t));
1220072 | //
1220073 | // and an extra space after it (to be able to show the cursor).
1220074 | //
1220075 | cell = (attribute | ’ ’);
1220076 | address_destination += 2;
1220077 | mem_write (address_destination, &cell, sizeof (uint16_t));
1220078 | //
1220079 | //
1220080 | //
1220081 | cursor[console]++;
1220082 | }
1220083 | //
1220084 | // Update the cursor position on screen.
1220085 | //
1220086 | cursor_row = cursor[console] / size_row;
1220087 | cursor_column = cursor[console] % size_row;
1220088 | cursor_combined = (cursor_row