Home | History | Annotate | Line # | Download | only in libsa
consio.c revision 1.3 
      1 /*	$NetBSD: consio.c,v 1.3 2001/09/30 15:54:38 minoura Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2001 MINOURA Makoto.
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  *
     16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     25  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     26  */
     27 
     28 #include <machine/stdarg.h>
     29 #include <lib/libkern/libkern.h>
     30 #include <lib/libsa/stand.h>
     31 
     32 #include "libx68k.h"
     33 
     34 #include "iocs.h"
     35 #include "consio.h"
     36 
     37 enum {
     38 	ITE = 0,
     39 	SERIAL = 1,
     40 } x68k_console_device;
     41 
     42 int
     43 consio_init(int device)
     44 {
     45 	if (device < 0) {	/* undetemined yet */
     46 		if (KEYCTRL & 8)
     47 			device = ITE;
     48 		else {
     49 			IOCS_B_PRINT ("No keyboard; "
     50 				      "switching to serial console...");
     51 			device = SERIAL;
     52 		}
     53 	}
     54 
     55 	switch (device) {
     56 	case ITE:
     57 		x68k_console_device = ITE;
     58 		/* set palette here */
     59 		IOCS_OS_CURON ();
     60 		break;
     61 	case SERIAL:
     62 		x68k_console_device = SERIAL;
     63 		IOCS_OS_CUROF ();
     64 		IOCS_SET232C (SERPARAM);
     65 	}
     66 
     67 	return x68k_console_device;
     68 }
     69 
     70 int
     71 getchar (void)
     72 {
     73 	int r;
     74 
     75 	switch (x68k_console_device) {
     76 	case ITE:
     77 		while ((r = IOCS_B_KEYINP () & 0xff) == 0);
     78 		return r;
     79 	case SERIAL:
     80 		while ((r = IOCS_INP232C () & 0xff) == 0);
     81 		return r;
     82 	}
     83 
     84 	return -1;
     85 }
     86 
     87 void
     88 putchar (int c)
     89 {
     90 	if (c == '\n')
     91 		putchar('\r');
     92 	switch (x68k_console_device) {
     93 	case ITE:
     94 		IOCS_B_PUTC (c);
     95 	case SERIAL:
     96 		IOCS_OUT232C (c);
     97 	}
     98 }
     99 
    100 int
    101 check_getchar (void)
    102 {
    103 	switch (x68k_console_device) {
    104 	case ITE:
    105 		return IOCS_B_KEYSNS () & 0xff;
    106 	case SERIAL:
    107 		return IOCS_ISNS232C () & 0xff;
    108 	}
    109 
    110 	return -1;
    111 }
    112 
    113 int
    114 awaitkey_1sec (void)
    115 {
    116 	int i, c;
    117 
    118 	while (check_getchar())
    119 		getchar();
    120 
    121 	for (i = 0; i < 100 && (c = check_getchar()) == 0; i++) {
    122 		while (MFP_TIMERC > 100)
    123 			(void) JOYA;
    124 		while (MFP_TIMERC <= 100)
    125 			(void) JOYA;
    126 	}
    127 
    128 	while (check_getchar())
    129 		getchar();
    130 
    131 	return c;
    132 }
    133 
    134 __dead void
    135 panic(const char *fmt,...)
    136 {
    137 	va_list ap;
    138 
    139 	va_start(ap, fmt);
    140 
    141 	printf(fmt, ap);
    142 	printf("\n");
    143 	va_end(ap);
    144 
    145 	exit(1);
    146 }
    147 
    148 extern void put_image(int, int);
    149 
    150 void
    151 print_title(const char *fmt, ...)
    152 {
    153 	va_list ap;
    154 
    155 	if (x68k_console_device == ITE) {
    156 		int y, y1;
    157 		char *buf = alloca(240); /* about 3 lines */
    158 		char *p;
    159 
    160 		y = y1 = (IOCS_B_LOCATE(-1, -1) & 0xffff) + 1;
    161 		put_image (8, y*16-8);
    162 		IOCS_B_LOCATE(0, y+3);
    163 		IOCS_B_PRINT("\360(\360C\360)\3601\3609\3609\3608\360 "
    164 			     "\360b\360y\360 "
    165 			     "\360M\360a\360r\360s\360h\360a\360l\360l\360 "
    166 			     "\360K\360i\360r\360k\360 "
    167 			     "\360M\360c\360K\360u\360s\360i\360c\360k\360.");
    168 		va_start(ap, fmt);
    169 		vsnprintf(buf, 240, fmt, ap);
    170 		va_end(ap);
    171 		while ((p = strchr(buf, '\n')) != 0) {
    172 			*p = 0;
    173 			IOCS_B_LOCATE(9, y++);
    174 			IOCS_B_PRINT(p);
    175 			buf = p+1;
    176 		}
    177 		IOCS_B_LOCATE(9, y++);
    178 		IOCS_B_PRINT(buf);
    179 		IOCS_B_LOCATE(0, y1+4);
    180 	} else {
    181 		va_start(ap, fmt);
    182 		vprintf(fmt, ap);
    183 		va_end(ap);
    184 		printf("\n");
    185 	}
    186 }
    187