xref: /netbsd-src/sys/arch/hp300/stand/common/ite_subr.c (revision b1c86f5f087524e68db12794ee9c3e3da1ab17a0)
1 /*	$NetBSD: ite_subr.c,v 1.5 2005/12/11 12:17:19 christos Exp $	*/
2 
3 /*
4  * Copyright (c) 1990, 1993
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * This code is derived from software contributed to Berkeley by
8  * the Systems Programming Group of the University of Utah Computer
9  * Science Department.
10  *
11  * Redistribution and use in source and binary forms, with or without
12  * modification, are permitted provided that the following conditions
13  * are met:
14  * 1. Redistributions of source code must retain the above copyright
15  *    notice, this list of conditions and the following disclaimer.
16  * 2. Redistributions in binary form must reproduce the above copyright
17  *    notice, this list of conditions and the following disclaimer in the
18  *    documentation and/or other materials provided with the distribution.
19  * 3. Neither the name of the University nor the names of its contributors
20  *    may be used to endorse or promote products derived from this software
21  *    without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  *
35  * from: Utah $Hdr: ite_subr.c 1.2 92/01/20$
36  *
37  *	@(#)ite_subr.c	8.1 (Berkeley) 6/10/93
38  */
39 /*
40  * Copyright (c) 1988 University of Utah.
41  *
42  * This code is derived from software contributed to Berkeley by
43  * the Systems Programming Group of the University of Utah Computer
44  * Science Department.
45  *
46  * Redistribution and use in source and binary forms, with or without
47  * modification, are permitted provided that the following conditions
48  * are met:
49  * 1. Redistributions of source code must retain the above copyright
50  *    notice, this list of conditions and the following disclaimer.
51  * 2. Redistributions in binary form must reproduce the above copyright
52  *    notice, this list of conditions and the following disclaimer in the
53  *    documentation and/or other materials provided with the distribution.
54  * 3. All advertising materials mentioning features or use of this software
55  *    must display the following acknowledgement:
56  *	This product includes software developed by the University of
57  *	California, Berkeley and its contributors.
58  * 4. Neither the name of the University nor the names of its contributors
59  *    may be used to endorse or promote products derived from this software
60  *    without specific prior written permission.
61  *
62  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
63  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
64  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
65  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
66  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
67  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
68  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
69  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
70  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
71  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
72  * SUCH DAMAGE.
73  *
74  * from: Utah $Hdr: ite_subr.c 1.2 92/01/20$
75  *
76  *	@(#)ite_subr.c	8.1 (Berkeley) 6/10/93
77  */
78 
79 #ifdef ITECONSOLE
80 
81 #include <sys/param.h>
82 
83 #include <hp300/dev/itereg.h>
84 
85 #include <hp300/stand/common/samachdep.h>
86 #include <hp300/stand/common/itevar.h>
87 
88 void
89 ite_fontinfo(struct ite_data *ip)
90 {
91 	u_long fontaddr = getword(ip, getword(ip, FONTROM) + FONTADDR);
92 
93 	ip->ftheight = getbyte(ip, fontaddr + FONTHEIGHT);
94 	ip->ftwidth  = getbyte(ip, fontaddr + FONTWIDTH);
95 	ip->rows     = ip->dheight / ip->ftheight;
96 	ip->cols     = ip->dwidth / ip->ftwidth;
97 
98 	if (ip->fbwidth > ip->dwidth) {
99 		/*
100 		 * Stuff goes to right of display.
101 		 */
102 		ip->fontx    = ip->dwidth;
103 		ip->fonty    = 0;
104 		ip->cpl      = (ip->fbwidth - ip->dwidth) / ip->ftwidth;
105 		ip->cblankx  = ip->dwidth;
106 		ip->cblanky  = ip->fonty + ((128 / ip->cpl) +1) * ip->ftheight;
107 	}
108 	else {
109 		/*
110 		 * Stuff goes below the display.
111 		 */
112 		ip->fontx   = 0;
113 		ip->fonty   = ip->dheight;
114 		ip->cpl     = ip->fbwidth / ip->ftwidth;
115 		ip->cblankx = 0;
116 		ip->cblanky = ip->fonty + ((128 / ip->cpl) + 1) * ip->ftheight;
117 	}
118 }
119 
120 void
121 ite_fontinit(struct ite_data *ip)
122 {
123 	int bytewidth = (((ip->ftwidth - 1) / 8) + 1);
124 	int glyphsize = bytewidth * ip->ftheight;
125 	u_char fontbuf[500];
126 	u_char *dp, *fbmem;
127 	int c, i, romp;
128 
129 	romp = getword(ip, getword(ip, FONTROM) + FONTADDR) + FONTDATA;
130 	for (c = 0; c < 128; c++) {
131 		fbmem = (u_char *)
132 		    (FBBASE +
133 		     (ip->fonty + (c / ip->cpl) * ip->ftheight) * ip->fbwidth +
134 		     (ip->fontx + (c % ip->cpl) * ip->ftwidth));
135 		dp = fontbuf;
136 		for (i = 0; i < glyphsize; i++) {
137 			*dp++ = getbyte(ip, romp);
138 			romp += 2;
139 		}
140 		writeglyph(ip, fbmem, fontbuf);
141 	}
142 }
143 
144 /*
145  * Display independent versions of the readbyte and writeglyph routines.
146  */
147 u_char
148 ite_readbyte(struct ite_data *ip, int disp)
149 {
150 
151 	return (u_char)*(((u_char *)ip->regbase) + disp);
152 }
153 
154 void
155 ite_writeglyph(struct ite_data *ip, u_char *fbmem, u_char *glyphp)
156 {
157 	int bn;
158 	int l, b;
159 
160 	for (l = 0; l < ip->ftheight; l++) {
161 		bn = 7;
162 		for (b = 0; b < ip->ftwidth; b++) {
163 			if ((1 << bn) & *glyphp)
164 				*fbmem++ = 1;
165 			else
166 				*fbmem++ = 0;
167 			if (--bn < 0) {
168 				bn = 7;
169 				glyphp++;
170 			}
171 		}
172 		if (bn < 7)
173 			glyphp++;
174 		fbmem -= ip->ftwidth;
175 		fbmem += ip->fbwidth;
176 	}
177 }
178 #endif
179