1 /* $NetBSD: lcd.c,v 1.7 2011/11/12 13:44:26 tsutsui Exp $ */ 2 3 /*- 4 * Copyright (c) 2000 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Tohru Nishimura. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 33 34 __KERNEL_RCSID(0, "$NetBSD: lcd.c,v 1.7 2011/11/12 13:44:26 tsutsui Exp $"); 35 36 /* 37 * XXX 38 * Following code segments are subject to change. 39 * XXX 40 */ 41 42 #include <sys/param.h> 43 #include <sys/systm.h> 44 #include <sys/device.h> 45 46 #include <machine/cpu.h> 47 48 #define PIO1_MODE_OUTPUT 0x84 49 #define PIO1_MODE_INPUT 0x94 50 51 #define POWER 0x10 52 53 #define ENABLE 0x80 54 #define DISABLE 0x00 55 56 #define WRITE_CMD (0x00 | 0x00) 57 #define WRITE_DATA (0x00 | 0x40) 58 #define READ_BUSY (0x20 | 0x00) 59 #define READ_DATA (0x20 | 0x40) 60 61 #define LCD_INIT 0x38 62 #define LCD_ENTRY 0x06 63 #define LCD_ON 0x0c 64 #define LCD_CLS 0x01 65 #define LCD_HOME 0x02 66 #define LCD_LOCATE(X, Y) (((Y) & 1 ? 0xc0 : 0x80) | ((X) & 0x0f)) 67 68 struct pio { 69 volatile u_int8_t portA; 70 volatile u_int8_t portB; 71 volatile u_int8_t portC; 72 volatile u_int8_t cntrl; 73 }; 74 75 void lcdbusywait(void); 76 void lcdput(int); 77 void lcdctrl(int); 78 void lcdshow(char *); 79 void greeting(void); 80 /* "1234567890123456" */ 81 static char lcd_boot_message1[] = " NetBSD/luna68k "; 82 static char lcd_boot_message2[] = " SX-9100/DT "; 83 84 void 85 lcdbusywait(void) 86 { 87 struct pio *p1 = (struct pio *)0x4D000000; 88 int msb, s; 89 90 s = splhigh(); 91 p1->cntrl = PIO1_MODE_INPUT; 92 p1->portC = POWER | READ_BUSY | ENABLE; 93 splx(s); 94 95 do { 96 msb = p1->portA & ENABLE; 97 delay(5); 98 } while (msb != 0); 99 100 s = splhigh(); 101 p1->portC = POWER | READ_BUSY | DISABLE; 102 splx(s); 103 } 104 105 void 106 lcdput(int cc) 107 { 108 struct pio *p1 = (struct pio *)0x4D000000; 109 int s; 110 111 lcdbusywait(); 112 113 s = splhigh(); 114 p1->cntrl = PIO1_MODE_OUTPUT; 115 116 p1->portC = POWER | WRITE_DATA | ENABLE; 117 p1->portA = cc; 118 p1->portC = POWER | WRITE_DATA | DISABLE; 119 splx(s); 120 } 121 122 void 123 lcdctrl(int cc) 124 { 125 struct pio *p1 = (struct pio *)0x4D000000; 126 int s; 127 128 lcdbusywait(); 129 130 s = splhigh(); 131 p1->cntrl = PIO1_MODE_OUTPUT; 132 133 p1->portC = POWER | WRITE_CMD | ENABLE; 134 p1->portA = cc; 135 p1->portC = POWER | WRITE_CMD | DISABLE; 136 splx(s); 137 } 138 139 void 140 lcdshow(char *s) 141 { 142 int cc; 143 144 while ((cc = *s++) != '\0') 145 lcdput(cc); 146 } 147 148 void 149 greeting(void) 150 { 151 lcdctrl(LCD_INIT); 152 lcdctrl(LCD_ENTRY); 153 lcdctrl(LCD_ON); 154 155 lcdctrl(LCD_CLS); 156 lcdctrl(LCD_HOME); 157 158 lcdctrl(LCD_LOCATE(0, 0)); 159 lcdshow(lcd_boot_message1); 160 lcdctrl(LCD_LOCATE(0, 1)); 161 if (machtype == LUNA_II) 162 lcd_boot_message2[13] = '2'; 163 lcdshow(lcd_boot_message2); 164 } 165