3171a83027
- on board 2nd CCU - Midori Elec. MDC-926Rs - Midori-Hayes ESP98 - NEC PC-9861K, PC-9801-101 PC-9801-120 - Melco IND-SP and IND-SS - PIO-9032A/B/C - B98-01 and B98-02 - IO-data device RSA-98II and RSA-98III - MC-16550 - MC-RS98 - Media Inteligent RSB-2000/3000 and RSB-384 - PCMCIA modem card Submitted by: Takahashi Yoshihiro <nyan@wyvern.cc.kogakuin.ac.jp>
202 lines
5.2 KiB
ArmAsm
202 lines
5.2 KiB
ArmAsm
/*
|
|
* Mach Operating System
|
|
* Copyright (c) 1992, 1991 Carnegie Mellon University
|
|
* All Rights Reserved.
|
|
*
|
|
* Permission to use, copy, modify and distribute this software and its
|
|
* documentation is hereby granted, provided that both the copyright
|
|
* notice and this permission notice appear in all copies of the
|
|
* software, derivative works or modified versions, and any portions
|
|
* thereof, and that both notices appear in supporting documentation.
|
|
*
|
|
* CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
|
|
* CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
|
|
* ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
|
|
*
|
|
* Carnegie Mellon requests users of this software to return to
|
|
*
|
|
* Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU
|
|
* School of Computer Science
|
|
* Carnegie Mellon University
|
|
* Pittsburgh PA 15213-3890
|
|
*
|
|
* any improvements or extensions that they make and grant Carnegie Mellon
|
|
* the rights to redistribute these changes.
|
|
*
|
|
* from: Mach, Revision 2.2 92/04/04 11:34:26 rpd
|
|
* $Id: serial.S,v 1.7 1998/01/02 09:29:15 kato Exp $
|
|
*/
|
|
|
|
/*
|
|
Copyright 1988, 1989, 1990, 1991, 1992
|
|
by Intel Corporation, Santa Clara, California.
|
|
|
|
All Rights Reserved
|
|
|
|
Permission to use, copy, modify, and distribute this software and
|
|
its documentation for any purpose and without fee is hereby
|
|
granted, provided that the above copyright notice appears in all
|
|
copies and that both the copyright notice and this permission notice
|
|
appear in supporting documentation, and that the name of Intel
|
|
not be used in advertising or publicity pertaining to distribution
|
|
of the software without specific, written prior permission.
|
|
|
|
INTEL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE
|
|
INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS,
|
|
IN NO EVENT SHALL INTEL BE LIABLE FOR ANY SPECIAL, INDIRECT, OR
|
|
CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
|
|
LOSS OF USE, DATA OR PROFITS, WHETHER IN ACTION OF CONTRACT,
|
|
NEGLIGENCE, OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
|
|
WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
*/
|
|
|
|
/*
|
|
* Serial bootblock interface routines
|
|
* Copyright (c) 1994, J"org Wunsch
|
|
*
|
|
* Permission to use, copy, modify and distribute this software and its
|
|
* documentation is hereby granted, provided that both the copyright
|
|
* notice and this permission notice appear in all copies of the
|
|
* software, derivative works or modified versions, and any portions
|
|
* thereof, and that both notices appear in supporting documentation.
|
|
*
|
|
* THE AUTHOR ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
|
|
* CONDITION. THE AUTHOR DISCLAIMS ANY LIABILITY OF ANY KIND FOR
|
|
* ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
|
|
*/
|
|
|
|
#if COMCONSOLE == 0x238
|
|
#include "../../../i386/boot/biosboot/serial.S"
|
|
#else
|
|
/*
|
|
* modified for PC-98 by KATO T. of Nagoya University
|
|
*/
|
|
|
|
.file "serial.S"
|
|
|
|
#include <i386/isa/sioreg.h>
|
|
#include "asm.h"
|
|
|
|
.text
|
|
|
|
/*
|
|
* The serial port interface routines implement a simple polled i/o
|
|
* interface to a standard serial port. Due to the space restrictions
|
|
* for the boot blocks, no BIOS support is used (since BIOS requires
|
|
* expensive real/protected mode switches), instead the rudimentary
|
|
* BIOS support is duplicated here.
|
|
*
|
|
* The base address for the i/o port is passed from the Makefile in
|
|
* the COMCONSOLE preprocessor macro. Console parameters are currently
|
|
* hard-coded to 9600 Bd, 8 bit. This can be changed in the
|
|
* init_serial() function.
|
|
*/
|
|
|
|
/*
|
|
* void serial_putc(char ch)
|
|
* send ch to serial port
|
|
*
|
|
*/
|
|
|
|
ENTRY(serial_putc)
|
|
mov $COMCONSOLE + 2, %edx # line status reg
|
|
1: inb %dx, %al
|
|
testb $0x01, %al
|
|
jz 1b # TX buffer not empty
|
|
|
|
movb 0x4(%esp), %al
|
|
|
|
sub $2, %edx # TX output reg
|
|
outb %al, %dx # send this one
|
|
|
|
ret
|
|
|
|
/*
|
|
* int serial_getc(void)
|
|
* read a character from serial port
|
|
*/
|
|
|
|
ENTRY(serial_getc)
|
|
mov $COMCONSOLE + 2, %edx # line status reg
|
|
1:
|
|
inb %dx, %al
|
|
testb $0x02, %al
|
|
jz 1b # no RX char available
|
|
|
|
xorb %eax, %eax
|
|
subb $2, %edx # RX buffer reg
|
|
inb %dx, %al # fetch (first) character
|
|
|
|
cmp $0x7F, %eax # make DEL...
|
|
jne 2f
|
|
movb $0x08, %eax # look like BS
|
|
2:
|
|
ret
|
|
|
|
/*
|
|
* int serial_ischar(void)
|
|
* if there is a character pending, return true; otherwise return 0
|
|
*/
|
|
ENTRY(serial_ischar)
|
|
xorl %eax, %eax
|
|
movl $COMCONSOLE + 2, %edx # line status reg
|
|
inb %dx, %al
|
|
andb $0x02, %al # RX char available?
|
|
|
|
ret
|
|
|
|
/*
|
|
* void init_serial(void)
|
|
* initialize the serial console port to 9600 Bd, 8 bpc
|
|
*/
|
|
ENTRY(init_serial)
|
|
/* set 8253 */
|
|
movb 0xb6, %al
|
|
outb %al, $0x77
|
|
movl $COMCONSOLE_CLK, %eax
|
|
outb %al, $0x75
|
|
inb $0x5f, %al
|
|
movb %ah, %al
|
|
outb %al, $0x75
|
|
|
|
/* inhibit com int */
|
|
inb $0x35, %al
|
|
andb $0xf8, %al
|
|
movb %al, %ah
|
|
inb $0x5f, %al
|
|
movb %ah, %al
|
|
outb %al, $0x35
|
|
|
|
inb $0x02, %al
|
|
orb $0x10, %al
|
|
outb %al, $0x02
|
|
|
|
/* dummy command */
|
|
xorb %al,%al
|
|
movl $COMCONSOLE + 2, %edx
|
|
outb %al, %dx
|
|
inb $0x5f, %al
|
|
xorb %al,%al
|
|
outb %al, %dx
|
|
inb $0x5f, %al
|
|
xorb %al,%al
|
|
outb %al, %dx
|
|
inb $0x5f, %al
|
|
|
|
/* RESET 8251 */
|
|
movb $0x40, %al
|
|
outb %al, %dx
|
|
|
|
movb $COMCONSOLE_MODE , %al
|
|
andb $0xfc, %al
|
|
orb $0x02, %al /* factor = 1/16 */
|
|
outb %al, %dx
|
|
inb $0x5f, %al
|
|
|
|
/* start RS-232C */
|
|
movb $0x37, %al
|
|
outb %al, %dx
|
|
|
|
ret
|
|
#endif
|