machfb.c revision 1.97.4.1 1 1.97.4.1 martin /* $NetBSD: machfb.c,v 1.97.4.1 2020/04/16 14:02:36 martin Exp $ */
2 1.1 junyoung
3 1.1 junyoung /*
4 1.1 junyoung * Copyright (c) 2002 Bang Jun-Young
5 1.59 macallan * Copyright (c) 2005, 2006, 2007 Michael Lorenz
6 1.1 junyoung * All rights reserved.
7 1.1 junyoung *
8 1.1 junyoung * Redistribution and use in source and binary forms, with or without
9 1.1 junyoung * modification, are permitted provided that the following conditions
10 1.1 junyoung * are met:
11 1.1 junyoung * 1. Redistributions of source code must retain the above copyright
12 1.1 junyoung * notice, this list of conditions and the following disclaimer.
13 1.1 junyoung * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 junyoung * notice, this list of conditions and the following disclaimer in the
15 1.1 junyoung * documentation and/or other materials provided with the distribution.
16 1.1 junyoung * 3. The name of the author may not be used to endorse or promote products
17 1.10 junyoung * derived from this software without specific prior written permission.
18 1.1 junyoung *
19 1.1 junyoung * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 1.1 junyoung * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 1.1 junyoung * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 1.1 junyoung * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 1.1 junyoung * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 1.1 junyoung * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 1.1 junyoung * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 1.1 junyoung * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 1.1 junyoung * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 1.1 junyoung * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 1.1 junyoung */
30 1.1 junyoung
31 1.1 junyoung /*
32 1.1 junyoung * Some code is derived from ATI Rage Pro and Derivatives Programmer's Guide.
33 1.1 junyoung */
34 1.1 junyoung
35 1.1 junyoung #include <sys/cdefs.h>
36 1.92 msaitoh __KERNEL_RCSID(0,
37 1.97.4.1 martin "$NetBSD: machfb.c,v 1.97.4.1 2020/04/16 14:02:36 martin Exp $");
38 1.1 junyoung
39 1.1 junyoung #include <sys/param.h>
40 1.1 junyoung #include <sys/systm.h>
41 1.1 junyoung #include <sys/kernel.h>
42 1.1 junyoung #include <sys/device.h>
43 1.1 junyoung #include <sys/malloc.h>
44 1.1 junyoung #include <sys/callout.h>
45 1.59 macallan #include <sys/lwp.h>
46 1.51 elad #include <sys/kauth.h>
47 1.1 junyoung
48 1.41 macallan #include <dev/videomode/videomode.h>
49 1.59 macallan #include <dev/videomode/edidvar.h>
50 1.1 junyoung
51 1.1 junyoung #include <dev/pci/pcivar.h>
52 1.1 junyoung #include <dev/pci/pcireg.h>
53 1.1 junyoung #include <dev/pci/pcidevs.h>
54 1.1 junyoung #include <dev/pci/pciio.h>
55 1.1 junyoung #include <dev/pci/machfbreg.h>
56 1.1 junyoung
57 1.1 junyoung #include <dev/wscons/wsdisplayvar.h>
58 1.41 macallan
59 1.1 junyoung #include <dev/wscons/wsconsio.h>
60 1.1 junyoung #include <dev/wsfont/wsfont.h>
61 1.1 junyoung #include <dev/rasops/rasops.h>
62 1.63 cegger #include <dev/pci/wsdisplay_pci.h>
63 1.1 junyoung
64 1.41 macallan #include <dev/wscons/wsdisplay_vconsvar.h>
65 1.79 macallan #include <dev/wscons/wsdisplay_glyphcachevar.h>
66 1.41 macallan
67 1.59 macallan #include "opt_wsemul.h"
68 1.59 macallan #include "opt_machfb.h"
69 1.94 macallan #include "opt_glyphcache.h"
70 1.59 macallan
71 1.97.4.1 martin #ifdef MACHFB_DEBUG
72 1.97.4.1 martin #define DPRINTF printf
73 1.97.4.1 martin #else
74 1.97.4.1 martin #define DPRINTF while (0) printf
75 1.97.4.1 martin #endif
76 1.97.4.1 martin
77 1.83 macallan #define MACH64_REG_SIZE 0x800
78 1.81 macallan #define MACH64_REG_OFF 0x7ff800
79 1.1 junyoung
80 1.1 junyoung #define NBARS 3 /* number of Mach64 PCI BARs */
81 1.1 junyoung
82 1.1 junyoung struct vga_bar {
83 1.1 junyoung bus_addr_t vb_base;
84 1.1 junyoung bus_size_t vb_size;
85 1.1 junyoung pcireg_t vb_type;
86 1.1 junyoung int vb_flags;
87 1.1 junyoung };
88 1.1 junyoung
89 1.1 junyoung struct mach64_softc {
90 1.59 macallan device_t sc_dev;
91 1.1 junyoung pci_chipset_tag_t sc_pc;
92 1.1 junyoung pcitag_t sc_pcitag;
93 1.1 junyoung
94 1.1 junyoung struct vga_bar sc_bars[NBARS];
95 1.1 junyoung struct vga_bar sc_rom;
96 1.1 junyoung
97 1.1 junyoung #define sc_aperbase sc_bars[0].vb_base
98 1.1 junyoung #define sc_apersize sc_bars[0].vb_size
99 1.1 junyoung
100 1.1 junyoung #define sc_iobase sc_bars[1].vb_base
101 1.1 junyoung #define sc_iosize sc_bars[1].vb_size
102 1.1 junyoung
103 1.1 junyoung #define sc_regbase sc_bars[2].vb_base
104 1.1 junyoung #define sc_regsize sc_bars[2].vb_size
105 1.1 junyoung
106 1.4 junyoung bus_space_tag_t sc_regt;
107 1.3 martin bus_space_tag_t sc_memt;
108 1.59 macallan bus_space_tag_t sc_iot;
109 1.4 junyoung bus_space_handle_t sc_regh;
110 1.1 junyoung bus_space_handle_t sc_memh;
111 1.81 macallan #if 0
112 1.49 christos void *sc_aperture; /* mapped aperture vaddr */
113 1.49 christos void *sc_registers; /* mapped registers vaddr */
114 1.81 macallan #endif
115 1.41 macallan uint32_t sc_nbus, sc_ndev, sc_nfunc;
116 1.1 junyoung size_t memsize;
117 1.1 junyoung int memtype;
118 1.24 macallan
119 1.21 martin int sc_mode;
120 1.21 martin int sc_bg;
121 1.41 macallan int sc_locked;
122 1.1 junyoung
123 1.1 junyoung int has_dsp;
124 1.1 junyoung int bits_per_pixel;
125 1.25 macallan int max_x;
126 1.25 macallan int max_y;
127 1.25 macallan int virt_x;
128 1.25 macallan int virt_y;
129 1.1 junyoung int color_depth;
130 1.1 junyoung
131 1.1 junyoung int mem_freq;
132 1.1 junyoung int ramdac_freq;
133 1.1 junyoung int ref_freq;
134 1.93 macallan int vclk_freq;
135 1.1 junyoung
136 1.1 junyoung int ref_div;
137 1.1 junyoung int log2_vclk_post_div;
138 1.1 junyoung int vclk_post_div;
139 1.1 junyoung int vclk_fb_div;
140 1.1 junyoung int mclk_post_div;
141 1.1 junyoung int mclk_fb_div;
142 1.59 macallan int sc_clock; /* which clock to use */
143 1.93 macallan int minref, m;
144 1.1 junyoung
145 1.33 macallan struct videomode *sc_my_mode;
146 1.59 macallan int sc_edid_size;
147 1.59 macallan uint8_t sc_edid_data[1024];
148 1.93 macallan struct edid_info sc_ei;
149 1.97.4.1 martin int sc_setmode;
150 1.59 macallan
151 1.19 martin u_char sc_cmap_red[256];
152 1.19 martin u_char sc_cmap_green[256];
153 1.22 perry u_char sc_cmap_blue[256];
154 1.41 macallan int sc_dacw, sc_blanked, sc_console;
155 1.41 macallan struct vcons_data vd;
156 1.67 macallan struct wsdisplay_accessops sc_accessops;
157 1.79 macallan glyphcache sc_gc;
158 1.1 junyoung };
159 1.1 junyoung
160 1.1 junyoung struct mach64_crtcregs {
161 1.41 macallan uint32_t h_total_disp;
162 1.41 macallan uint32_t h_sync_strt_wid;
163 1.41 macallan uint32_t v_total_disp;
164 1.41 macallan uint32_t v_sync_strt_wid;
165 1.41 macallan uint32_t gen_cntl;
166 1.41 macallan uint32_t clock_cntl;
167 1.41 macallan uint32_t color_depth;
168 1.41 macallan uint32_t dot_clock;
169 1.1 junyoung };
170 1.1 junyoung
171 1.46 christos static struct {
172 1.41 macallan uint16_t chip_id;
173 1.41 macallan uint32_t ramdac_freq;
174 1.46 christos } const mach64_info[] = {
175 1.64 macallan { PCI_PRODUCT_ATI_MACH64_GX, 135000 },
176 1.64 macallan { PCI_PRODUCT_ATI_MACH64_CX, 135000 },
177 1.1 junyoung { PCI_PRODUCT_ATI_MACH64_CT, 135000 },
178 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_PRO_AGP, 230000 },
179 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_PRO_AGP1X, 230000 },
180 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_PRO_PCI_B, 230000 },
181 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_XL_AGP, 230000 },
182 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_PRO_PCI_P, 230000 },
183 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_PRO_PCI_L, 230000 },
184 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_XL_PCI, 230000 },
185 1.59 macallan { PCI_PRODUCT_ATI_RAGE_XL_PCI66, 230000 },
186 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_II, 135000 },
187 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_IIP, 200000 },
188 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_IIC_PCI, 230000 },
189 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_IIC_AGP_B, 230000 },
190 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_IIC_AGP_P, 230000 },
191 1.55 dyoung #if 0
192 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_MOB_M3_PCI, 230000 },
193 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_MOB_M3_AGP, 230000 },
194 1.1 junyoung { PCI_PRODUCT_ATI_RAGE_MOBILITY, 230000 },
195 1.55 dyoung #endif
196 1.84 jdc { PCI_PRODUCT_ATI_RAGE_L_MOB_M1_PCI, 230000 },
197 1.64 macallan { PCI_PRODUCT_ATI_RAGE_LT_PRO_AGP, 230000 },
198 1.59 macallan { PCI_PRODUCT_ATI_RAGE_LT_PRO, 230000 },
199 1.59 macallan { PCI_PRODUCT_ATI_RAGE_LT, 230000 },
200 1.59 macallan { PCI_PRODUCT_ATI_RAGE_LT_PRO_PCI, 230000 },
201 1.1 junyoung { PCI_PRODUCT_ATI_MACH64_VT, 170000 },
202 1.1 junyoung { PCI_PRODUCT_ATI_MACH64_VTB, 200000 },
203 1.1 junyoung { PCI_PRODUCT_ATI_MACH64_VT4, 230000 }
204 1.1 junyoung };
205 1.1 junyoung
206 1.1 junyoung static int mach64_chip_id, mach64_chip_rev;
207 1.46 christos static struct videomode default_mode = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, };
208 1.1 junyoung
209 1.64 macallan static const char *mach64_gx_memtype_names[] = {
210 1.64 macallan "DRAM", "VRAM", "VRAM", "DRAM",
211 1.64 macallan "DRAM", "VRAM", "VRAM", "(unknown type)"
212 1.64 macallan };
213 1.64 macallan
214 1.27 christos static const char *mach64_memtype_names[] = {
215 1.1 junyoung "(N/A)", "DRAM", "EDO DRAM", "EDO DRAM", "SDRAM", "SGRAM", "WRAM",
216 1.1 junyoung "(unknown type)"
217 1.1 junyoung };
218 1.1 junyoung
219 1.19 martin extern const u_char rasops_cmap[768];
220 1.1 junyoung
221 1.54 dyoung static int mach64_match(device_t, cfdata_t, void *);
222 1.54 dyoung static void mach64_attach(device_t, device_t, void *);
223 1.1 junyoung
224 1.92 msaitoh CFATTACH_DECL_NEW(machfb, sizeof(struct mach64_softc), mach64_match,
225 1.92 msaitoh mach64_attach, NULL, NULL);
226 1.1 junyoung
227 1.30 thorpej static void mach64_init(struct mach64_softc *);
228 1.30 thorpej static int mach64_get_memsize(struct mach64_softc *);
229 1.30 thorpej static int mach64_get_max_ramdac(struct mach64_softc *);
230 1.35 macallan
231 1.97.4.1 martin #if 0
232 1.30 thorpej static void mach64_get_mode(struct mach64_softc *, struct videomode *);
233 1.97.4.1 martin #endif
234 1.35 macallan
235 1.30 thorpej static int mach64_calc_crtcregs(struct mach64_softc *,
236 1.30 thorpej struct mach64_crtcregs *,
237 1.30 thorpej struct videomode *);
238 1.30 thorpej static void mach64_set_crtcregs(struct mach64_softc *,
239 1.30 thorpej struct mach64_crtcregs *);
240 1.33 macallan
241 1.30 thorpej static int mach64_modeswitch(struct mach64_softc *, struct videomode *);
242 1.30 thorpej static void mach64_set_dsp(struct mach64_softc *);
243 1.30 thorpej static void mach64_set_pll(struct mach64_softc *, int);
244 1.30 thorpej static void mach64_reset_engine(struct mach64_softc *);
245 1.30 thorpej static void mach64_init_engine(struct mach64_softc *);
246 1.30 thorpej #if 0
247 1.30 thorpej static void mach64_adjust_frame(struct mach64_softc *, int, int);
248 1.30 thorpej #endif
249 1.30 thorpej static void mach64_init_lut(struct mach64_softc *);
250 1.41 macallan
251 1.41 macallan static void mach64_init_screen(void *, struct vcons_screen *, int, long *);
252 1.59 macallan static int mach64_is_console(struct mach64_softc *);
253 1.30 thorpej
254 1.30 thorpej static void mach64_cursor(void *, int, int, int);
255 1.30 thorpej #if 0
256 1.30 thorpej static int mach64_mapchar(void *, int, u_int *);
257 1.30 thorpej #endif
258 1.79 macallan static void mach64_putchar_mono(void *, int, int, u_int, long);
259 1.79 macallan static void mach64_putchar_aa8(void *, int, int, u_int, long);
260 1.30 thorpej static void mach64_copycols(void *, int, int, int, int);
261 1.30 thorpej static void mach64_erasecols(void *, int, int, int, long);
262 1.30 thorpej static void mach64_copyrows(void *, int, int, int);
263 1.30 thorpej static void mach64_eraserows(void *, int, int, long);
264 1.30 thorpej static void mach64_clearscreen(struct mach64_softc *);
265 1.30 thorpej
266 1.30 thorpej static int mach64_putcmap(struct mach64_softc *, struct wsdisplay_cmap *);
267 1.30 thorpej static int mach64_getcmap(struct mach64_softc *, struct wsdisplay_cmap *);
268 1.30 thorpej static int mach64_putpalreg(struct mach64_softc *, uint8_t, uint8_t,
269 1.30 thorpej uint8_t, uint8_t);
270 1.79 macallan static void mach64_bitblt(void *, int, int, int, int, int, int, int);
271 1.30 thorpej static void mach64_rectfill(struct mach64_softc *, int, int, int, int, int);
272 1.30 thorpej static void mach64_setup_mono(struct mach64_softc *, int, int, int, int,
273 1.30 thorpej uint32_t, uint32_t);
274 1.30 thorpej static void mach64_feed_bytes(struct mach64_softc *, int, uint8_t *);
275 1.30 thorpej #if 0
276 1.30 thorpej static void mach64_showpal(struct mach64_softc *);
277 1.30 thorpej #endif
278 1.21 martin
279 1.34 macallan static void machfb_blank(struct mach64_softc *, int);
280 1.59 macallan static int machfb_drm_print(void *, const char *);
281 1.1 junyoung
282 1.30 thorpej static struct wsscreen_descr mach64_defaultscreen = {
283 1.1 junyoung "default",
284 1.33 macallan 80, 30,
285 1.33 macallan NULL,
286 1.1 junyoung 8, 16,
287 1.93 macallan WSSCREEN_WSCOLORS | WSSCREEN_HILIT | WSSCREEN_UNDERLINE
288 1.94 macallan | WSSCREEN_RESIZE ,
289 1.93 macallan NULL
290 1.1 junyoung };
291 1.1 junyoung
292 1.30 thorpej static const struct wsscreen_descr *_mach64_scrlist[] = {
293 1.1 junyoung &mach64_defaultscreen,
294 1.1 junyoung };
295 1.1 junyoung
296 1.30 thorpej static struct wsscreen_list mach64_screenlist = {
297 1.54 dyoung __arraycount(_mach64_scrlist),
298 1.1 junyoung _mach64_scrlist
299 1.1 junyoung };
300 1.1 junyoung
301 1.49 christos static int mach64_ioctl(void *, void *, u_long, void *, int,
302 1.40 jmmv struct lwp *);
303 1.40 jmmv static paddr_t mach64_mmap(void *, void *, off_t, int);
304 1.41 macallan
305 1.41 macallan static struct vcons_screen mach64_console_screen;
306 1.41 macallan
307 1.1 junyoung /*
308 1.1 junyoung * Inline functions for getting access to register aperture.
309 1.1 junyoung */
310 1.1 junyoung
311 1.41 macallan static inline uint32_t
312 1.41 macallan regr(struct mach64_softc *sc, uint32_t index)
313 1.1 junyoung {
314 1.81 macallan return bus_space_read_4(sc->sc_regt, sc->sc_regh, index + 0x400);
315 1.1 junyoung }
316 1.1 junyoung
317 1.41 macallan static inline uint8_t
318 1.41 macallan regrb(struct mach64_softc *sc, uint32_t index)
319 1.1 junyoung {
320 1.81 macallan return bus_space_read_1(sc->sc_regt, sc->sc_regh, index + 0x400);
321 1.1 junyoung }
322 1.1 junyoung
323 1.1 junyoung static inline void
324 1.41 macallan regw(struct mach64_softc *sc, uint32_t index, uint32_t data)
325 1.1 junyoung {
326 1.81 macallan bus_space_write_4(sc->sc_regt, sc->sc_regh, index + 0x400, data);
327 1.92 msaitoh bus_space_barrier(sc->sc_regt, sc->sc_regh, index, 4,
328 1.25 macallan BUS_SPACE_BARRIER_WRITE);
329 1.1 junyoung }
330 1.1 junyoung
331 1.1 junyoung static inline void
332 1.79 macallan regws(struct mach64_softc *sc, uint32_t index, uint32_t data)
333 1.79 macallan {
334 1.81 macallan bus_space_write_stream_4(sc->sc_regt, sc->sc_regh, index + 0x400, data);
335 1.92 msaitoh bus_space_barrier(sc->sc_regt, sc->sc_regh, index + 0x400, 4,
336 1.79 macallan BUS_SPACE_BARRIER_WRITE);
337 1.79 macallan }
338 1.79 macallan
339 1.79 macallan static inline void
340 1.41 macallan regwb(struct mach64_softc *sc, uint32_t index, uint8_t data)
341 1.1 junyoung {
342 1.81 macallan bus_space_write_1(sc->sc_regt, sc->sc_regh, index + 0x400, data);
343 1.92 msaitoh bus_space_barrier(sc->sc_regt, sc->sc_regh, index + 0x400, 1,
344 1.25 macallan BUS_SPACE_BARRIER_WRITE);
345 1.1 junyoung }
346 1.1 junyoung
347 1.1 junyoung static inline void
348 1.41 macallan regwb_pll(struct mach64_softc *sc, uint32_t index, uint8_t data)
349 1.1 junyoung {
350 1.59 macallan uint32_t reg;
351 1.59 macallan
352 1.59 macallan reg = regr(sc, CLOCK_CNTL);
353 1.59 macallan reg |= PLL_WR_EN;
354 1.59 macallan regw(sc, CLOCK_CNTL, reg);
355 1.59 macallan reg &= ~(PLL_ADDR | PLL_DATA);
356 1.59 macallan reg |= (index & 0x3f) << PLL_ADDR_SHIFT;
357 1.59 macallan reg |= data << PLL_DATA_SHIFT;
358 1.59 macallan reg |= CLOCK_STROBE;
359 1.59 macallan regw(sc, CLOCK_CNTL, reg);
360 1.59 macallan reg &= ~PLL_WR_EN;
361 1.59 macallan regw(sc, CLOCK_CNTL, reg);
362 1.59 macallan }
363 1.59 macallan
364 1.59 macallan static inline uint8_t
365 1.59 macallan regrb_pll(struct mach64_softc *sc, uint32_t index)
366 1.59 macallan {
367 1.59 macallan
368 1.59 macallan regwb(sc, CLOCK_CNTL + 1, index << 2);
369 1.59 macallan return regrb(sc, CLOCK_CNTL + 2);
370 1.1 junyoung }
371 1.1 junyoung
372 1.1 junyoung static inline void
373 1.41 macallan wait_for_fifo(struct mach64_softc *sc, uint8_t v)
374 1.1 junyoung {
375 1.1 junyoung while ((regr(sc, FIFO_STAT) & 0xffff) > (0x8000 >> v))
376 1.28 christos continue;
377 1.1 junyoung }
378 1.1 junyoung
379 1.1 junyoung static inline void
380 1.1 junyoung wait_for_idle(struct mach64_softc *sc)
381 1.1 junyoung {
382 1.1 junyoung wait_for_fifo(sc, 16);
383 1.1 junyoung while ((regr(sc, GUI_STAT) & 1) != 0)
384 1.28 christos continue;
385 1.1 junyoung }
386 1.1 junyoung
387 1.30 thorpej static int
388 1.54 dyoung mach64_match(device_t parent, cfdata_t match, void *aux)
389 1.1 junyoung {
390 1.1 junyoung struct pci_attach_args *pa = (struct pci_attach_args *)aux;
391 1.1 junyoung int i;
392 1.1 junyoung
393 1.1 junyoung if (PCI_CLASS(pa->pa_class) != PCI_CLASS_DISPLAY ||
394 1.1 junyoung PCI_SUBCLASS(pa->pa_class) != PCI_SUBCLASS_DISPLAY_VGA)
395 1.1 junyoung return 0;
396 1.1 junyoung
397 1.54 dyoung for (i = 0; i < __arraycount(mach64_info); i++)
398 1.1 junyoung if (PCI_PRODUCT(pa->pa_id) == mach64_info[i].chip_id) {
399 1.1 junyoung mach64_chip_id = PCI_PRODUCT(pa->pa_id);
400 1.1 junyoung mach64_chip_rev = PCI_REVISION(pa->pa_class);
401 1.24 macallan return 100;
402 1.1 junyoung }
403 1.22 perry
404 1.1 junyoung return 0;
405 1.1 junyoung }
406 1.1 junyoung
407 1.30 thorpej static void
408 1.54 dyoung mach64_attach(device_t parent, device_t self, void *aux)
409 1.1 junyoung {
410 1.54 dyoung struct mach64_softc *sc = device_private(self);
411 1.1 junyoung struct pci_attach_args *pa = aux;
412 1.41 macallan struct rasops_info *ri;
413 1.59 macallan prop_data_t edid_data;
414 1.59 macallan const struct videomode *mode = NULL;
415 1.64 macallan int bar, id, expected_id;
416 1.64 macallan int is_gx;
417 1.64 macallan const char **memtype_names;
418 1.1 junyoung struct wsemuldisplaydev_attach_args aa;
419 1.1 junyoung long defattr;
420 1.97.4.1 martin int width = 1024, height = 768;
421 1.21 martin pcireg_t screg;
422 1.59 macallan uint32_t reg;
423 1.75 macallan const pcireg_t enables = PCI_COMMAND_MEM_ENABLE;
424 1.81 macallan int use_mmio = FALSE;
425 1.1 junyoung
426 1.59 macallan sc->sc_dev = self;
427 1.1 junyoung sc->sc_pc = pa->pa_pc;
428 1.1 junyoung sc->sc_pcitag = pa->pa_tag;
429 1.26 macallan sc->sc_dacw = -1;
430 1.26 macallan sc->sc_mode = WSDISPLAYIO_MODE_EMUL;
431 1.41 macallan sc->sc_nbus = pa->pa_bus;
432 1.41 macallan sc->sc_ndev = pa->pa_device;
433 1.41 macallan sc->sc_nfunc = pa->pa_function;
434 1.41 macallan sc->sc_locked = 0;
435 1.59 macallan sc->sc_iot = pa->pa_iot;
436 1.67 macallan sc->sc_accessops.ioctl = mach64_ioctl;
437 1.67 macallan sc->sc_accessops.mmap = mach64_mmap;
438 1.97.4.1 martin sc->sc_setmode = 0;
439 1.24 macallan
440 1.73 drochner pci_aprint_devinfo(pa, "Graphics processor");
441 1.61 macallan #ifdef MACHFB_DEBUG
442 1.59 macallan printf(prop_dictionary_externalize(device_properties(self)));
443 1.59 macallan #endif
444 1.92 msaitoh
445 1.76 macallan /* enable memory access */
446 1.26 macallan screg = pci_conf_read(sc->sc_pc, sc->sc_pcitag, PCI_COMMAND_STATUS_REG);
447 1.65 dyoung if ((screg & enables) != enables) {
448 1.65 dyoung screg |= enables;
449 1.59 macallan pci_conf_write(sc->sc_pc, sc->sc_pcitag,
450 1.59 macallan PCI_COMMAND_STATUS_REG, screg);
451 1.59 macallan }
452 1.1 junyoung for (bar = 0; bar < NBARS; bar++) {
453 1.1 junyoung reg = PCI_MAPREG_START + (bar * 4);
454 1.1 junyoung sc->sc_bars[bar].vb_type = pci_mapreg_type(sc->sc_pc,
455 1.1 junyoung sc->sc_pcitag, reg);
456 1.1 junyoung (void)pci_mapreg_info(sc->sc_pc, sc->sc_pcitag, reg,
457 1.1 junyoung sc->sc_bars[bar].vb_type, &sc->sc_bars[bar].vb_base,
458 1.1 junyoung &sc->sc_bars[bar].vb_size, &sc->sc_bars[bar].vb_flags);
459 1.1 junyoung }
460 1.76 macallan aprint_debug_dev(sc->sc_dev, "aperture size %08x\n",
461 1.59 macallan (uint32_t)sc->sc_apersize);
462 1.59 macallan
463 1.92 msaitoh sc->sc_rom.vb_type = PCI_MAPREG_TYPE_ROM;
464 1.59 macallan pci_mapreg_info(sc->sc_pc, sc->sc_pcitag, PCI_MAPREG_ROM,
465 1.59 macallan sc->sc_rom.vb_type, &sc->sc_rom.vb_base,
466 1.59 macallan &sc->sc_rom.vb_size, &sc->sc_rom.vb_flags);
467 1.3 martin sc->sc_memt = pa->pa_memt;
468 1.1 junyoung
469 1.81 macallan /* use MMIO register aperture if available */
470 1.81 macallan if ((sc->sc_regbase != 0) && (sc->sc_regbase != 0xffffffff)) {
471 1.92 msaitoh if (pci_mapreg_map(pa, MACH64_BAR_MMIO, PCI_MAPREG_TYPE_MEM,
472 1.92 msaitoh 0, &sc->sc_regt, &sc->sc_regh, &sc->sc_regbase,
473 1.81 macallan &sc->sc_regsize) == 0) {
474 1.81 macallan
475 1.81 macallan /*
476 1.81 macallan * the MMIO aperture maps both 1KB register blocks, but
477 1.81 macallan * all register offsets are relative to the 2nd one so
478 1.81 macallan * for now fix this up in MACH64_REG_OFF and the access
479 1.81 macallan * functions
480 1.81 macallan */
481 1.81 macallan aprint_normal_dev(sc->sc_dev, "using MMIO aperture\n");
482 1.81 macallan use_mmio = TRUE;
483 1.81 macallan }
484 1.92 msaitoh }
485 1.81 macallan if (!use_mmio) {
486 1.92 msaitoh if (bus_space_map(sc->sc_memt, sc->sc_aperbase,
487 1.92 msaitoh sc->sc_apersize, BUS_SPACE_MAP_LINEAR, &sc->sc_memh)) {
488 1.81 macallan panic("%s: failed to map aperture",
489 1.81 macallan device_xname(sc->sc_dev));
490 1.81 macallan }
491 1.59 macallan
492 1.81 macallan sc->sc_regt = sc->sc_memt;
493 1.81 macallan bus_space_subregion(sc->sc_regt, sc->sc_memh, MACH64_REG_OFF,
494 1.83 macallan MACH64_REG_SIZE, &sc->sc_regh);
495 1.64 macallan }
496 1.64 macallan
497 1.3 martin mach64_init(sc);
498 1.1 junyoung
499 1.59 macallan aprint_normal_dev(sc->sc_dev,
500 1.58 mrg "%d MB aperture at 0x%08x, %d KB registers at 0x%08x\n",
501 1.58 mrg (u_int)(sc->sc_apersize / (1024 * 1024)),
502 1.81 macallan (u_int)sc->sc_aperbase, (u_int)(sc->sc_regsize / 1024),
503 1.81 macallan (u_int)sc->sc_regbase);
504 1.1 junyoung
505 1.59 macallan printf("%s: %d KB ROM at 0x%08x\n", device_xname(sc->sc_dev),
506 1.59 macallan (int)sc->sc_rom.vb_size >> 10, (uint32_t)sc->sc_rom.vb_base);
507 1.59 macallan
508 1.59 macallan prop_dictionary_get_uint32(device_properties(self), "width", &width);
509 1.59 macallan prop_dictionary_get_uint32(device_properties(self), "height", &height);
510 1.59 macallan
511 1.97.4.1 martin default_mode.hdisplay = width;
512 1.97.4.1 martin default_mode.vdisplay = height;
513 1.97.4.1 martin
514 1.93 macallan memset(&sc->sc_ei, 0, sizeof(sc->sc_ei));
515 1.60 macallan if ((edid_data = prop_dictionary_get(device_properties(self), "EDID"))
516 1.59 macallan != NULL) {
517 1.59 macallan
518 1.95 riastrad sc->sc_edid_size = uimin(1024, prop_data_size(edid_data));
519 1.59 macallan memset(sc->sc_edid_data, 0, sizeof(sc->sc_edid_data));
520 1.59 macallan memcpy(sc->sc_edid_data, prop_data_data_nocopy(edid_data),
521 1.59 macallan sc->sc_edid_size);
522 1.59 macallan
523 1.93 macallan edid_parse(sc->sc_edid_data, &sc->sc_ei);
524 1.59 macallan
525 1.61 macallan #ifdef MACHFB_DEBUG
526 1.93 macallan edid_print(&sc->sc_ei);
527 1.59 macallan #endif
528 1.59 macallan }
529 1.64 macallan is_gx = 0;
530 1.64 macallan switch(mach64_chip_id) {
531 1.64 macallan case PCI_PRODUCT_ATI_MACH64_GX:
532 1.64 macallan case PCI_PRODUCT_ATI_MACH64_CX:
533 1.64 macallan is_gx = 1;
534 1.97 mrg /* FALLTHROUGH */
535 1.64 macallan case PCI_PRODUCT_ATI_MACH64_CT:
536 1.64 macallan sc->has_dsp = 0;
537 1.64 macallan break;
538 1.64 macallan case PCI_PRODUCT_ATI_MACH64_VT:
539 1.64 macallan case PCI_PRODUCT_ATI_RAGE_II:
540 1.64 macallan if((mach64_chip_rev & 0x07) == 0) {
541 1.64 macallan sc->has_dsp = 0;
542 1.64 macallan break;
543 1.64 macallan }
544 1.97 mrg /* FALLTHROUGH */
545 1.64 macallan default:
546 1.64 macallan sc->has_dsp = 1;
547 1.64 macallan }
548 1.64 macallan
549 1.64 macallan memtype_names = is_gx ? mach64_gx_memtype_names : mach64_memtype_names;
550 1.1 junyoung
551 1.1 junyoung sc->memsize = mach64_get_memsize(sc);
552 1.81 macallan
553 1.64 macallan if(is_gx)
554 1.64 macallan sc->memtype = (regr(sc, CONFIG_STAT0) >> 3) & 0x07;
555 1.64 macallan else
556 1.64 macallan sc->memtype = regr(sc, CONFIG_STAT0) & 0x07;
557 1.1 junyoung
558 1.76 macallan /*
559 1.76 macallan * XXX is there any way to calculate reference frequency from
560 1.76 macallan * known values?
561 1.76 macallan */
562 1.22 perry if ((mach64_chip_id == PCI_PRODUCT_ATI_RAGE_XL_PCI) ||
563 1.26 macallan ((mach64_chip_id >= PCI_PRODUCT_ATI_RAGE_LT_PRO_PCI) &&
564 1.26 macallan (mach64_chip_id <= PCI_PRODUCT_ATI_RAGE_LT_PRO))) {
565 1.59 macallan aprint_normal_dev(sc->sc_dev, "ref_freq=29.498MHz\n");
566 1.1 junyoung sc->ref_freq = 29498;
567 1.21 martin } else
568 1.1 junyoung sc->ref_freq = 14318;
569 1.1 junyoung
570 1.59 macallan reg = regr(sc, CLOCK_CNTL);
571 1.76 macallan aprint_debug("CLOCK_CNTL: %08x\n", reg);
572 1.59 macallan sc->sc_clock = reg & 3;
573 1.76 macallan aprint_debug("using clock %d\n", sc->sc_clock);
574 1.59 macallan
575 1.59 macallan sc->ref_div = regrb_pll(sc, PLL_REF_DIV);
576 1.97.4.1 martin DPRINTF("ref_div: %d\n", sc->ref_div);
577 1.59 macallan sc->mclk_fb_div = regrb_pll(sc, MCLK_FB_DIV);
578 1.97.4.1 martin DPRINTF("mclk_fb_div: %d\n", sc->mclk_fb_div);
579 1.22 perry sc->mem_freq = (2 * sc->ref_freq * sc->mclk_fb_div) /
580 1.1 junyoung (sc->ref_div * 2);
581 1.1 junyoung sc->mclk_post_div = (sc->mclk_fb_div * 2 * sc->ref_freq) /
582 1.1 junyoung (sc->mem_freq * sc->ref_div);
583 1.1 junyoung sc->ramdac_freq = mach64_get_max_ramdac(sc);
584 1.93 macallan {
585 1.93 macallan sc->minref = sc->ramdac_freq / 510;
586 1.93 macallan sc->m = sc->ref_freq / sc->minref;
587 1.97.4.1 martin DPRINTF("minref: %d m: %d\n", sc->minref, sc->m);
588 1.93 macallan }
589 1.59 macallan aprint_normal_dev(sc->sc_dev,
590 1.58 mrg "%ld KB %s %d.%d MHz, maximum RAMDAC clock %d MHz\n",
591 1.58 mrg (u_long)sc->memsize,
592 1.64 macallan memtype_names[sc->memtype],
593 1.1 junyoung sc->mem_freq / 1000, sc->mem_freq % 1000,
594 1.1 junyoung sc->ramdac_freq / 1000);
595 1.22 perry
596 1.1 junyoung id = regr(sc, CONFIG_CHIP_ID) & 0xffff;
597 1.64 macallan switch(mach64_chip_id) {
598 1.64 macallan case PCI_PRODUCT_ATI_MACH64_GX:
599 1.64 macallan expected_id = 0x00d7;
600 1.64 macallan break;
601 1.64 macallan case PCI_PRODUCT_ATI_MACH64_CX:
602 1.64 macallan expected_id = 0x0057;
603 1.64 macallan break;
604 1.64 macallan default:
605 1.64 macallan /* Most chip IDs match their PCI product ID. */
606 1.64 macallan expected_id = mach64_chip_id;
607 1.64 macallan }
608 1.64 macallan
609 1.64 macallan if (id != expected_id) {
610 1.59 macallan aprint_error_dev(sc->sc_dev,
611 1.64 macallan "chip ID mismatch, 0x%x != 0x%x\n", id, expected_id);
612 1.1 junyoung return;
613 1.1 junyoung }
614 1.1 junyoung
615 1.59 macallan sc->sc_console = mach64_is_console(sc);
616 1.76 macallan aprint_debug("gen_cntl: %08x\n", regr(sc, CRTC_GEN_CNTL));
617 1.93 macallan
618 1.93 macallan #define MODE_IS_VALID(m) ((sc->ramdac_freq >= (m)->dot_clock) && \
619 1.97.4.1 martin ((m)->hdisplay <= 1280))
620 1.93 macallan
621 1.93 macallan /* no mode setting support on ancient chips with external clocks */
622 1.97.4.1 martin sc->sc_setmode = 0;
623 1.93 macallan if (!is_gx) {
624 1.93 macallan /*
625 1.93 macallan * Now pick a mode.
626 1.93 macallan */
627 1.93 macallan if ((sc->sc_ei.edid_preferred_mode != NULL)) {
628 1.93 macallan struct videomode *m = sc->sc_ei.edid_preferred_mode;
629 1.93 macallan if (MODE_IS_VALID(m)) {
630 1.93 macallan memcpy(&default_mode, m,
631 1.93 macallan sizeof(struct videomode));
632 1.97.4.1 martin sc->sc_setmode = 1;
633 1.93 macallan } else {
634 1.93 macallan aprint_error_dev(sc->sc_dev,
635 1.93 macallan "unable to use preferred mode\n");
636 1.93 macallan }
637 1.93 macallan }
638 1.93 macallan /*
639 1.93 macallan * if we can't use the preferred mode go look for the
640 1.93 macallan * best one we can support
641 1.93 macallan */
642 1.97.4.1 martin if (sc->sc_setmode == 0) {
643 1.93 macallan struct videomode *m = sc->sc_ei.edid_modes;
644 1.93 macallan
645 1.93 macallan mode = NULL;
646 1.93 macallan sort_modes(sc->sc_ei.edid_modes,
647 1.93 macallan &sc->sc_ei.edid_preferred_mode,
648 1.93 macallan sc->sc_ei.edid_nmodes);
649 1.93 macallan for (int n = 0; n < sc->sc_ei.edid_nmodes; n++)
650 1.93 macallan if (MODE_IS_VALID(&m[n])) {
651 1.93 macallan mode = &m[n];
652 1.93 macallan break;
653 1.93 macallan }
654 1.93 macallan if (mode != NULL) {
655 1.93 macallan memcpy(&default_mode, mode,
656 1.93 macallan sizeof(struct videomode));
657 1.97.4.1 martin sc->sc_setmode = 1;
658 1.93 macallan }
659 1.93 macallan }
660 1.97.4.1 martin }
661 1.97.4.1 martin
662 1.97.4.1 martin /* make sure my_mode points at something sensible if the above fails */
663 1.97.4.1 martin if (default_mode.dot_clock == 0) {
664 1.97.4.1 martin sc->sc_setmode = 0;
665 1.97.4.1 martin mode = pick_mode_by_ref(width, height, 60);
666 1.97.4.1 martin if (mode != NULL) {
667 1.97.4.1 martin memcpy(&default_mode, mode, sizeof(default_mode));
668 1.97.4.1 martin } else if ((width > 0) && (height > 0)) {
669 1.97.4.1 martin default_mode.hdisplay = width;
670 1.97.4.1 martin default_mode.vdisplay = height;
671 1.97.4.1 martin } else {
672 1.97.4.1 martin /*
673 1.97.4.1 martin * if we end up here we're probably dealing with
674 1.97.4.1 martin * uninitialized hardware - try to set 1024x768@60 and
675 1.97.4.1 martin * hope for the best...
676 1.97.4.1 martin */
677 1.93 macallan mode = pick_mode_by_ref(1024, 768, 60);
678 1.97.4.1 martin if (mode == NULL) return;
679 1.97.4.1 martin memcpy(&default_mode, mode, sizeof(default_mode));
680 1.97.4.1 martin if (!is_gx) sc->sc_setmode = 1;
681 1.97.4.1 martin }
682 1.7 martin }
683 1.97.4.1 martin
684 1.93 macallan sc->sc_my_mode = &default_mode;
685 1.1 junyoung
686 1.97.4.1 martin if ((width == sc->sc_my_mode->hdisplay) &&
687 1.97.4.1 martin (height == sc->sc_my_mode->vdisplay))
688 1.97.4.1 martin sc->sc_setmode = 0;
689 1.97.4.1 martin
690 1.1 junyoung sc->bits_per_pixel = 8;
691 1.33 macallan sc->virt_x = sc->sc_my_mode->hdisplay;
692 1.33 macallan sc->virt_y = sc->sc_my_mode->vdisplay;
693 1.1 junyoung sc->max_x = sc->virt_x - 1;
694 1.1 junyoung sc->max_y = (sc->memsize * 1024) /
695 1.1 junyoung (sc->virt_x * (sc->bits_per_pixel / 8)) - 1;
696 1.22 perry
697 1.1 junyoung sc->color_depth = CRTC_PIX_WIDTH_8BPP;
698 1.1 junyoung
699 1.1 junyoung mach64_init_engine(sc);
700 1.59 macallan
701 1.97.4.1 martin if (sc->sc_setmode)
702 1.59 macallan mach64_modeswitch(sc, sc->sc_my_mode);
703 1.1 junyoung
704 1.59 macallan aprint_normal_dev(sc->sc_dev,
705 1.58 mrg "initial resolution %dx%d at %d bpp\n",
706 1.33 macallan sc->sc_my_mode->hdisplay, sc->sc_my_mode->vdisplay,
707 1.1 junyoung sc->bits_per_pixel);
708 1.1 junyoung
709 1.34 macallan wsfont_init();
710 1.92 msaitoh
711 1.94 macallan #ifdef GLYPHCACHE_DEBUG
712 1.94 macallan /* shrink the screen so we can see part of the glyph cache */
713 1.94 macallan sc->sc_my_mode->vdisplay -= 200;
714 1.94 macallan #endif
715 1.94 macallan
716 1.67 macallan vcons_init(&sc->vd, sc, &mach64_defaultscreen, &sc->sc_accessops);
717 1.41 macallan sc->vd.init_screen = mach64_init_screen;
718 1.94 macallan sc->vd.show_screen_cookie = &sc->sc_gc;
719 1.94 macallan sc->vd.show_screen_cb = glyphcache_adapt;
720 1.41 macallan
721 1.79 macallan sc->sc_gc.gc_bitblt = mach64_bitblt;
722 1.79 macallan sc->sc_gc.gc_blitcookie = sc;
723 1.79 macallan sc->sc_gc.gc_rop = MIX_SRC;
724 1.79 macallan
725 1.79 macallan ri = &mach64_console_screen.scr_ri;
726 1.41 macallan if (sc->sc_console) {
727 1.64 macallan
728 1.41 macallan vcons_init_screen(&sc->vd, &mach64_console_screen, 1,
729 1.41 macallan &defattr);
730 1.41 macallan mach64_console_screen.scr_flags |= VCONS_SCREEN_IS_STATIC;
731 1.41 macallan
732 1.41 macallan mach64_defaultscreen.textops = &ri->ri_ops;
733 1.41 macallan mach64_defaultscreen.capabilities = ri->ri_caps;
734 1.41 macallan mach64_defaultscreen.nrows = ri->ri_rows;
735 1.41 macallan mach64_defaultscreen.ncols = ri->ri_cols;
736 1.79 macallan glyphcache_init(&sc->sc_gc, sc->sc_my_mode->vdisplay + 5,
737 1.83 macallan ((sc->memsize * 1024) / sc->sc_my_mode->hdisplay) -
738 1.80 macallan sc->sc_my_mode->vdisplay - 5,
739 1.80 macallan sc->sc_my_mode->hdisplay,
740 1.80 macallan ri->ri_font->fontwidth,
741 1.80 macallan ri->ri_font->fontheight,
742 1.80 macallan defattr);
743 1.92 msaitoh wsdisplay_cnattach(&mach64_defaultscreen, ri, 0, 0, defattr);
744 1.33 macallan } else {
745 1.33 macallan /*
746 1.33 macallan * since we're not the console we can postpone the rest
747 1.33 macallan * until someone actually allocates a screen for us
748 1.33 macallan */
749 1.77 macallan if (mach64_console_screen.scr_ri.ri_rows == 0) {
750 1.77 macallan /* do some minimal setup to avoid weirdnesses later */
751 1.77 macallan vcons_init_screen(&sc->vd, &mach64_console_screen, 1,
752 1.77 macallan &defattr);
753 1.88 macallan } else
754 1.88 macallan (*ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr);
755 1.79 macallan
756 1.79 macallan glyphcache_init(&sc->sc_gc, sc->sc_my_mode->vdisplay + 5,
757 1.83 macallan ((sc->memsize * 1024) / sc->sc_my_mode->hdisplay) -
758 1.80 macallan sc->sc_my_mode->vdisplay - 5,
759 1.80 macallan sc->sc_my_mode->hdisplay,
760 1.80 macallan ri->ri_font->fontwidth,
761 1.80 macallan ri->ri_font->fontheight,
762 1.80 macallan defattr);
763 1.7 martin }
764 1.79 macallan
765 1.78 macallan sc->sc_bg = mach64_console_screen.scr_ri.ri_devcmap[WS_DEFAULT_BG];
766 1.78 macallan mach64_clearscreen(sc);
767 1.78 macallan mach64_init_lut(sc);
768 1.78 macallan
769 1.78 macallan if (sc->sc_console)
770 1.78 macallan vcons_replay_msgbuf(&mach64_console_screen);
771 1.78 macallan
772 1.78 macallan machfb_blank(sc, 0); /* unblank the screen */
773 1.92 msaitoh
774 1.41 macallan aa.console = sc->sc_console;
775 1.1 junyoung aa.scrdata = &mach64_screenlist;
776 1.67 macallan aa.accessops = &sc->sc_accessops;
777 1.41 macallan aa.accesscookie = &sc->vd;
778 1.1 junyoung
779 1.1 junyoung config_found(self, &aa, wsemuldisplaydevprint);
780 1.90 macallan #if 0
781 1.90 macallan /* XXX
782 1.90 macallan * turns out some firmware doesn't turn these back on when needed
783 1.90 macallan * so we need to turn them off only when mapping vram in
784 1.90 macallan * WSDISPLAYIO_MODE_DUMB would overlap ( unlikely but far from
785 1.90 macallan * impossible )
786 1.92 msaitoh */
787 1.81 macallan if (use_mmio) {
788 1.81 macallan /*
789 1.92 msaitoh * Now that we took over, turn off the aperture registers if we
790 1.81 macallan * don't use them. Can't do this earlier since on some hardware
791 1.81 macallan * we use firmware calls as early console output which may in
792 1.81 macallan * turn try to access these registers.
793 1.81 macallan */
794 1.81 macallan reg = regr(sc, BUS_CNTL);
795 1.81 macallan aprint_debug_dev(sc->sc_dev, "BUS_CNTL: %08x\n", reg);
796 1.81 macallan reg |= BUS_APER_REG_DIS;
797 1.81 macallan regw(sc, BUS_CNTL, reg);
798 1.81 macallan }
799 1.90 macallan #endif
800 1.59 macallan config_found_ia(self, "drm", aux, machfb_drm_print);
801 1.59 macallan }
802 1.59 macallan
803 1.59 macallan static int
804 1.59 macallan machfb_drm_print(void *aux, const char *pnp)
805 1.59 macallan {
806 1.59 macallan if (pnp)
807 1.59 macallan aprint_normal("direct rendering for %s", pnp);
808 1.59 macallan return (UNSUPP);
809 1.1 junyoung }
810 1.1 junyoung
811 1.30 thorpej static void
812 1.41 macallan mach64_init_screen(void *cookie, struct vcons_screen *scr, int existing,
813 1.48 christos long *defattr)
814 1.1 junyoung {
815 1.41 macallan struct mach64_softc *sc = cookie;
816 1.41 macallan struct rasops_info *ri = &scr->scr_ri;
817 1.41 macallan
818 1.21 martin ri->ri_depth = sc->bits_per_pixel;
819 1.33 macallan ri->ri_width = sc->sc_my_mode->hdisplay;
820 1.33 macallan ri->ri_height = sc->sc_my_mode->vdisplay;
821 1.21 martin ri->ri_stride = ri->ri_width;
822 1.87 macallan ri->ri_flg = RI_CENTER | RI_FULLCLEAR;
823 1.78 macallan if (ri->ri_depth == 8)
824 1.93 macallan ri->ri_flg |= RI_8BIT_IS_RGB | RI_ENABLE_ALPHA |
825 1.93 macallan RI_PREFER_ALPHA;
826 1.21 martin
827 1.66 macallan #ifdef VCONS_DRAW_INTR
828 1.66 macallan scr->scr_flags |= VCONS_DONT_READ;
829 1.66 macallan #endif
830 1.94 macallan scr->scr_flags |= VCONS_LOADFONT;
831 1.66 macallan
832 1.72 macallan rasops_init(ri, 0, 0);
833 1.94 macallan ri->ri_caps = WSSCREEN_WSCOLORS | WSSCREEN_HILIT | WSSCREEN_UNDERLINE |
834 1.94 macallan WSSCREEN_RESIZE;
835 1.41 macallan rasops_reconfig(ri, sc->sc_my_mode->vdisplay / ri->ri_font->fontheight,
836 1.41 macallan sc->sc_my_mode->hdisplay / ri->ri_font->fontwidth);
837 1.92 msaitoh
838 1.41 macallan /* enable acceleration */
839 1.41 macallan ri->ri_hw = scr;
840 1.41 macallan ri->ri_ops.copyrows = mach64_copyrows;
841 1.41 macallan ri->ri_ops.copycols = mach64_copycols;
842 1.41 macallan ri->ri_ops.eraserows = mach64_eraserows;
843 1.41 macallan ri->ri_ops.erasecols = mach64_erasecols;
844 1.41 macallan ri->ri_ops.cursor = mach64_cursor;
845 1.79 macallan if (FONT_IS_ALPHA(ri->ri_font)) {
846 1.79 macallan ri->ri_ops.putchar = mach64_putchar_aa8;
847 1.79 macallan } else
848 1.79 macallan ri->ri_ops.putchar = mach64_putchar_mono;
849 1.1 junyoung }
850 1.1 junyoung
851 1.30 thorpej static void
852 1.3 martin mach64_init(struct mach64_softc *sc)
853 1.1 junyoung {
854 1.41 macallan sc->sc_blanked = 0;
855 1.1 junyoung }
856 1.1 junyoung
857 1.30 thorpej static int
858 1.1 junyoung mach64_get_memsize(struct mach64_softc *sc)
859 1.1 junyoung {
860 1.1 junyoung int tmp, memsize;
861 1.1 junyoung int mem_tab[] = {
862 1.1 junyoung 512, 1024, 2048, 4096, 6144, 8192, 12288, 16384
863 1.1 junyoung };
864 1.1 junyoung tmp = regr(sc, MEM_CNTL);
865 1.41 macallan #ifdef DIAGNOSTIC
866 1.59 macallan aprint_debug_dev(sc->sc_dev, "memctl %08x\n", tmp);
867 1.41 macallan #endif
868 1.1 junyoung if (sc->has_dsp) {
869 1.1 junyoung tmp &= 0x0000000f;
870 1.1 junyoung if (tmp < 8)
871 1.1 junyoung memsize = (tmp + 1) * 512;
872 1.1 junyoung else if (tmp < 12)
873 1.1 junyoung memsize = (tmp - 3) * 1024;
874 1.1 junyoung else
875 1.1 junyoung memsize = (tmp - 7) * 2048;
876 1.1 junyoung } else {
877 1.1 junyoung memsize = mem_tab[tmp & 0x07];
878 1.1 junyoung }
879 1.1 junyoung
880 1.1 junyoung return memsize;
881 1.1 junyoung }
882 1.1 junyoung
883 1.30 thorpej static int
884 1.1 junyoung mach64_get_max_ramdac(struct mach64_softc *sc)
885 1.1 junyoung {
886 1.1 junyoung int i;
887 1.1 junyoung
888 1.22 perry if ((mach64_chip_id == PCI_PRODUCT_ATI_MACH64_VT ||
889 1.1 junyoung mach64_chip_id == PCI_PRODUCT_ATI_RAGE_II) &&
890 1.1 junyoung (mach64_chip_rev & 0x07))
891 1.1 junyoung return 170000;
892 1.1 junyoung
893 1.54 dyoung for (i = 0; i < __arraycount(mach64_info); i++)
894 1.1 junyoung if (mach64_chip_id == mach64_info[i].chip_id)
895 1.1 junyoung return mach64_info[i].ramdac_freq;
896 1.1 junyoung
897 1.1 junyoung if (sc->bits_per_pixel == 8)
898 1.1 junyoung return 135000;
899 1.1 junyoung else
900 1.1 junyoung return 80000;
901 1.1 junyoung }
902 1.1 junyoung
903 1.97.4.1 martin #if 0
904 1.30 thorpej static void
905 1.1 junyoung mach64_get_mode(struct mach64_softc *sc, struct videomode *mode)
906 1.1 junyoung {
907 1.1 junyoung struct mach64_crtcregs crtc;
908 1.22 perry
909 1.1 junyoung crtc.h_total_disp = regr(sc, CRTC_H_TOTAL_DISP);
910 1.1 junyoung crtc.h_sync_strt_wid = regr(sc, CRTC_H_SYNC_STRT_WID);
911 1.1 junyoung crtc.v_total_disp = regr(sc, CRTC_V_TOTAL_DISP);
912 1.1 junyoung crtc.v_sync_strt_wid = regr(sc, CRTC_V_SYNC_STRT_WID);
913 1.1 junyoung
914 1.1 junyoung mode->htotal = ((crtc.h_total_disp & 0xffff) + 1) << 3;
915 1.1 junyoung mode->hdisplay = ((crtc.h_total_disp >> 16) + 1) << 3;
916 1.1 junyoung mode->hsync_start = ((crtc.h_sync_strt_wid & 0xffff) + 1) << 3;
917 1.1 junyoung mode->hsync_end = ((crtc.h_sync_strt_wid >> 16) << 3) +
918 1.1 junyoung mode->hsync_start;
919 1.1 junyoung mode->vtotal = (crtc.v_total_disp & 0xffff) + 1;
920 1.1 junyoung mode->vdisplay = (crtc.v_total_disp >> 16) + 1;
921 1.1 junyoung mode->vsync_start = (crtc.v_sync_strt_wid & 0xffff) + 1;
922 1.1 junyoung mode->vsync_end = (crtc.v_sync_strt_wid >> 16) + mode->vsync_start;
923 1.1 junyoung
924 1.61 macallan #ifdef MACHFB_DEBUG
925 1.1 junyoung printf("mach64_get_mode: %d %d %d %d %d %d %d %d\n",
926 1.1 junyoung mode->hdisplay, mode->hsync_start, mode->hsync_end, mode->htotal,
927 1.1 junyoung mode->vdisplay, mode->vsync_start, mode->vsync_end, mode->vtotal);
928 1.1 junyoung #endif
929 1.1 junyoung }
930 1.97.4.1 martin #endif
931 1.1 junyoung
932 1.30 thorpej static int
933 1.1 junyoung mach64_calc_crtcregs(struct mach64_softc *sc, struct mach64_crtcregs *crtc,
934 1.1 junyoung struct videomode *mode)
935 1.1 junyoung {
936 1.1 junyoung
937 1.1 junyoung if (mode->dot_clock > sc->ramdac_freq)
938 1.1 junyoung /* Clock too high. */
939 1.1 junyoung return 1;
940 1.1 junyoung
941 1.1 junyoung crtc->h_total_disp = (((mode->hdisplay >> 3) - 1) << 16) |
942 1.1 junyoung ((mode->htotal >> 3) - 1);
943 1.22 perry crtc->h_sync_strt_wid =
944 1.1 junyoung (((mode->hsync_end - mode->hsync_start) >> 3) << 16) |
945 1.1 junyoung ((mode->hsync_start >> 3) - 1);
946 1.1 junyoung
947 1.1 junyoung crtc->v_total_disp = ((mode->vdisplay - 1) << 16) |
948 1.1 junyoung (mode->vtotal - 1);
949 1.1 junyoung crtc->v_sync_strt_wid =
950 1.1 junyoung ((mode->vsync_end - mode->vsync_start) << 16) |
951 1.1 junyoung (mode->vsync_start - 1);
952 1.1 junyoung
953 1.1 junyoung if (mode->flags & VID_NVSYNC)
954 1.1 junyoung crtc->v_sync_strt_wid |= CRTC_VSYNC_NEG;
955 1.1 junyoung
956 1.1 junyoung switch (sc->bits_per_pixel) {
957 1.1 junyoung case 8:
958 1.1 junyoung crtc->color_depth = CRTC_PIX_WIDTH_8BPP;
959 1.1 junyoung break;
960 1.1 junyoung case 16:
961 1.1 junyoung crtc->color_depth = CRTC_PIX_WIDTH_16BPP;
962 1.22 perry break;
963 1.1 junyoung case 32:
964 1.1 junyoung crtc->color_depth = CRTC_PIX_WIDTH_32BPP;
965 1.22 perry break;
966 1.1 junyoung }
967 1.22 perry
968 1.1 junyoung crtc->gen_cntl = 0;
969 1.1 junyoung if (mode->flags & VID_INTERLACE)
970 1.1 junyoung crtc->gen_cntl |= CRTC_INTERLACE_EN;
971 1.41 macallan
972 1.1 junyoung if (mode->flags & VID_CSYNC)
973 1.1 junyoung crtc->gen_cntl |= CRTC_CSYNC_EN;
974 1.22 perry
975 1.1 junyoung crtc->dot_clock = mode->dot_clock;
976 1.1 junyoung
977 1.1 junyoung return 0;
978 1.1 junyoung }
979 1.1 junyoung
980 1.30 thorpej static void
981 1.1 junyoung mach64_set_crtcregs(struct mach64_softc *sc, struct mach64_crtcregs *crtc)
982 1.1 junyoung {
983 1.1 junyoung
984 1.1 junyoung mach64_set_pll(sc, crtc->dot_clock);
985 1.1 junyoung
986 1.1 junyoung if (sc->has_dsp)
987 1.1 junyoung mach64_set_dsp(sc);
988 1.76 macallan
989 1.1 junyoung regw(sc, CRTC_H_TOTAL_DISP, crtc->h_total_disp);
990 1.1 junyoung regw(sc, CRTC_H_SYNC_STRT_WID, crtc->h_sync_strt_wid);
991 1.1 junyoung regw(sc, CRTC_V_TOTAL_DISP, crtc->v_total_disp);
992 1.1 junyoung regw(sc, CRTC_V_SYNC_STRT_WID, crtc->v_sync_strt_wid);
993 1.22 perry
994 1.1 junyoung regw(sc, CRTC_VLINE_CRNT_VLINE, 0);
995 1.1 junyoung
996 1.1 junyoung regw(sc, CRTC_OFF_PITCH, (sc->virt_x >> 3) << 22);
997 1.22 perry
998 1.1 junyoung regw(sc, CRTC_GEN_CNTL, crtc->gen_cntl | crtc->color_depth |
999 1.41 macallan /* XXX this unconditionally enables composite sync on SPARC */
1000 1.41 macallan #ifdef __sparc__
1001 1.41 macallan CRTC_CSYNC_EN |
1002 1.41 macallan #endif
1003 1.1 junyoung CRTC_EXT_DISP_EN | CRTC_EXT_EN);
1004 1.1 junyoung }
1005 1.1 junyoung
1006 1.30 thorpej static int
1007 1.1 junyoung mach64_modeswitch(struct mach64_softc *sc, struct videomode *mode)
1008 1.1 junyoung {
1009 1.1 junyoung struct mach64_crtcregs crtc;
1010 1.1 junyoung
1011 1.45 mrg memset(&crtc, 0, sizeof crtc); /* XXX gcc */
1012 1.45 mrg
1013 1.1 junyoung if (mach64_calc_crtcregs(sc, &crtc, mode))
1014 1.1 junyoung return 1;
1015 1.59 macallan aprint_debug("crtc dot clock: %d\n", crtc.dot_clock);
1016 1.59 macallan if (crtc.dot_clock == 0) {
1017 1.92 msaitoh aprint_error("%s: preposterous dot clock (%d)\n",
1018 1.59 macallan device_xname(sc->sc_dev), crtc.dot_clock);
1019 1.59 macallan return 1;
1020 1.59 macallan }
1021 1.1 junyoung mach64_set_crtcregs(sc, &crtc);
1022 1.1 junyoung return 0;
1023 1.1 junyoung }
1024 1.1 junyoung
1025 1.30 thorpej static void
1026 1.1 junyoung mach64_reset_engine(struct mach64_softc *sc)
1027 1.1 junyoung {
1028 1.1 junyoung
1029 1.1 junyoung /* Reset engine.*/
1030 1.1 junyoung regw(sc, GEN_TEST_CNTL, regr(sc, GEN_TEST_CNTL) & ~GUI_ENGINE_ENABLE);
1031 1.1 junyoung
1032 1.1 junyoung /* Enable engine. */
1033 1.1 junyoung regw(sc, GEN_TEST_CNTL, regr(sc, GEN_TEST_CNTL) | GUI_ENGINE_ENABLE);
1034 1.1 junyoung
1035 1.1 junyoung /* Ensure engine is not locked up by clearing any FIFO or
1036 1.1 junyoung host errors. */
1037 1.1 junyoung regw(sc, BUS_CNTL, regr(sc, BUS_CNTL) | BUS_HOST_ERR_ACK |
1038 1.1 junyoung BUS_FIFO_ERR_ACK);
1039 1.1 junyoung }
1040 1.1 junyoung
1041 1.30 thorpej static void
1042 1.1 junyoung mach64_init_engine(struct mach64_softc *sc)
1043 1.1 junyoung {
1044 1.41 macallan uint32_t pitch_value;
1045 1.22 perry
1046 1.1 junyoung pitch_value = sc->virt_x;
1047 1.1 junyoung
1048 1.1 junyoung if (sc->bits_per_pixel == 24)
1049 1.1 junyoung pitch_value *= 3;
1050 1.1 junyoung
1051 1.1 junyoung mach64_reset_engine(sc);
1052 1.22 perry
1053 1.1 junyoung wait_for_fifo(sc, 14);
1054 1.22 perry
1055 1.1 junyoung regw(sc, CONTEXT_MASK, 0xffffffff);
1056 1.1 junyoung
1057 1.93 macallan regw(sc, DST_OFF_PITCH, (pitch_value >> 3) << 22);
1058 1.1 junyoung
1059 1.64 macallan /* make sure the visible area starts where we're going to draw */
1060 1.64 macallan regw(sc, CRTC_OFF_PITCH, (sc->virt_x >> 3) << 22);
1061 1.64 macallan
1062 1.1 junyoung regw(sc, DST_Y_X, 0);
1063 1.1 junyoung regw(sc, DST_HEIGHT, 0);
1064 1.1 junyoung regw(sc, DST_BRES_ERR, 0);
1065 1.1 junyoung regw(sc, DST_BRES_INC, 0);
1066 1.1 junyoung regw(sc, DST_BRES_DEC, 0);
1067 1.1 junyoung
1068 1.1 junyoung regw(sc, DST_CNTL, DST_LAST_PEL | DST_X_LEFT_TO_RIGHT |
1069 1.1 junyoung DST_Y_TOP_TO_BOTTOM);
1070 1.1 junyoung
1071 1.93 macallan regw(sc, SRC_OFF_PITCH, (pitch_value >> 3) << 22);
1072 1.1 junyoung
1073 1.1 junyoung regw(sc, SRC_Y_X, 0);
1074 1.1 junyoung regw(sc, SRC_HEIGHT1_WIDTH1, 1);
1075 1.1 junyoung regw(sc, SRC_Y_X_START, 0);
1076 1.1 junyoung regw(sc, SRC_HEIGHT2_WIDTH2, 1);
1077 1.1 junyoung
1078 1.1 junyoung regw(sc, SRC_CNTL, SRC_LINE_X_LEFT_TO_RIGHT);
1079 1.1 junyoung
1080 1.1 junyoung wait_for_fifo(sc, 13);
1081 1.1 junyoung regw(sc, HOST_CNTL, 0);
1082 1.22 perry
1083 1.1 junyoung regw(sc, PAT_REG0, 0);
1084 1.1 junyoung regw(sc, PAT_REG1, 0);
1085 1.1 junyoung regw(sc, PAT_CNTL, 0);
1086 1.1 junyoung
1087 1.1 junyoung regw(sc, SC_LEFT, 0);
1088 1.1 junyoung regw(sc, SC_TOP, 0);
1089 1.81 macallan regw(sc, SC_BOTTOM, 0x3fff);
1090 1.1 junyoung regw(sc, SC_RIGHT, pitch_value - 1);
1091 1.1 junyoung
1092 1.66 macallan regw(sc, DP_BKGD_CLR, WS_DEFAULT_BG);
1093 1.66 macallan regw(sc, DP_FRGD_CLR, WS_DEFAULT_FG);
1094 1.1 junyoung regw(sc, DP_WRITE_MASK, 0xffffffff);
1095 1.1 junyoung regw(sc, DP_MIX, (MIX_SRC << 16) | MIX_DST);
1096 1.1 junyoung
1097 1.1 junyoung regw(sc, DP_SRC, FRGD_SRC_FRGD_CLR);
1098 1.1 junyoung
1099 1.1 junyoung wait_for_fifo(sc, 3);
1100 1.1 junyoung regw(sc, CLR_CMP_CLR, 0);
1101 1.1 junyoung regw(sc, CLR_CMP_MASK, 0xffffffff);
1102 1.1 junyoung regw(sc, CLR_CMP_CNTL, 0);
1103 1.1 junyoung
1104 1.79 macallan wait_for_fifo(sc, 3);
1105 1.1 junyoung switch (sc->bits_per_pixel) {
1106 1.1 junyoung case 8:
1107 1.64 macallan regw(sc, DP_PIX_WIDTH, HOST_1BPP | SRC_8BPP | DST_8BPP);
1108 1.1 junyoung regw(sc, DP_CHAIN_MASK, DP_CHAIN_8BPP);
1109 1.25 macallan /* We want 8 bit per channel */
1110 1.19 martin regw(sc, DAC_CNTL, regr(sc, DAC_CNTL) | DAC_8BIT_EN);
1111 1.1 junyoung break;
1112 1.1 junyoung case 32:
1113 1.64 macallan regw(sc, DP_PIX_WIDTH, HOST_1BPP | SRC_32BPP | DST_32BPP);
1114 1.1 junyoung regw(sc, DP_CHAIN_MASK, DP_CHAIN_32BPP);
1115 1.1 junyoung regw(sc, DAC_CNTL, regr(sc, DAC_CNTL) | DAC_8BIT_EN);
1116 1.1 junyoung break;
1117 1.1 junyoung }
1118 1.79 macallan regw(sc, DP_WRITE_MASK, 0xff);
1119 1.1 junyoung
1120 1.1 junyoung wait_for_fifo(sc, 5);
1121 1.1 junyoung regw(sc, CRTC_INT_CNTL, regr(sc, CRTC_INT_CNTL) & ~0x20);
1122 1.1 junyoung regw(sc, GUI_TRAJ_CNTL, DST_X_LEFT_TO_RIGHT | DST_Y_TOP_TO_BOTTOM);
1123 1.1 junyoung
1124 1.1 junyoung wait_for_idle(sc);
1125 1.1 junyoung }
1126 1.1 junyoung
1127 1.30 thorpej #if 0
1128 1.30 thorpej static void
1129 1.1 junyoung mach64_adjust_frame(struct mach64_softc *sc, int x, int y)
1130 1.1 junyoung {
1131 1.1 junyoung int offset;
1132 1.1 junyoung
1133 1.1 junyoung offset = ((x + y * sc->virt_x) * (sc->bits_per_pixel >> 3)) >> 3;
1134 1.22 perry
1135 1.1 junyoung regw(sc, CRTC_OFF_PITCH, (regr(sc, CRTC_OFF_PITCH) & 0xfff00000) |
1136 1.1 junyoung offset);
1137 1.1 junyoung }
1138 1.30 thorpej #endif
1139 1.1 junyoung
1140 1.30 thorpej static void
1141 1.1 junyoung mach64_set_dsp(struct mach64_softc *sc)
1142 1.1 junyoung {
1143 1.41 macallan uint32_t fifo_depth, page_size, dsp_precision, dsp_loop_latency;
1144 1.41 macallan uint32_t dsp_off, dsp_on, dsp_xclks_per_qw;
1145 1.93 macallan uint32_t xclks_per_qw, xclks_per_qw_m, y;
1146 1.41 macallan uint32_t fifo_off, fifo_on;
1147 1.22 perry
1148 1.59 macallan aprint_normal_dev(sc->sc_dev, "initializing the DSP\n");
1149 1.59 macallan
1150 1.1 junyoung if (mach64_chip_id == PCI_PRODUCT_ATI_MACH64_VT ||
1151 1.1 junyoung mach64_chip_id == PCI_PRODUCT_ATI_RAGE_II ||
1152 1.1 junyoung mach64_chip_id == PCI_PRODUCT_ATI_RAGE_IIP ||
1153 1.1 junyoung mach64_chip_id == PCI_PRODUCT_ATI_RAGE_IIC_PCI ||
1154 1.1 junyoung mach64_chip_id == PCI_PRODUCT_ATI_RAGE_IIC_AGP_B ||
1155 1.1 junyoung mach64_chip_id == PCI_PRODUCT_ATI_RAGE_IIC_AGP_P) {
1156 1.1 junyoung dsp_loop_latency = 0;
1157 1.1 junyoung fifo_depth = 24;
1158 1.1 junyoung } else {
1159 1.1 junyoung dsp_loop_latency = 2;
1160 1.1 junyoung fifo_depth = 32;
1161 1.1 junyoung }
1162 1.1 junyoung
1163 1.1 junyoung dsp_precision = 0;
1164 1.93 macallan
1165 1.1 junyoung xclks_per_qw = (sc->mclk_fb_div * sc->vclk_post_div * 64 << 11) /
1166 1.1 junyoung (sc->vclk_fb_div * sc->mclk_post_div * sc->bits_per_pixel);
1167 1.93 macallan
1168 1.93 macallan xclks_per_qw_m = (sc->mem_freq * 64 << 4) /
1169 1.93 macallan (sc->vclk_freq * sc->bits_per_pixel);
1170 1.97.4.1 martin
1171 1.97.4.1 martin DPRINTF("xclks_per_qw %d %d\n", xclks_per_qw >> 7, xclks_per_qw_m);
1172 1.97.4.1 martin DPRINTF("mem %dkHz v %dkHz\n", sc->mem_freq, sc->vclk_freq);
1173 1.97.4.1 martin
1174 1.1 junyoung y = (xclks_per_qw * fifo_depth) >> 11;
1175 1.93 macallan
1176 1.1 junyoung while (y) {
1177 1.1 junyoung y >>= 1;
1178 1.1 junyoung dsp_precision++;
1179 1.1 junyoung }
1180 1.1 junyoung dsp_precision -= 5;
1181 1.1 junyoung fifo_off = ((xclks_per_qw * (fifo_depth - 1)) >> 5) + (3 << 6);
1182 1.22 perry
1183 1.1 junyoung switch (sc->memtype) {
1184 1.1 junyoung case DRAM:
1185 1.1 junyoung case EDO_DRAM:
1186 1.1 junyoung case PSEUDO_EDO:
1187 1.1 junyoung if (sc->memsize > 1024) {
1188 1.1 junyoung page_size = 9;
1189 1.1 junyoung dsp_loop_latency += 6;
1190 1.1 junyoung } else {
1191 1.1 junyoung page_size = 10;
1192 1.1 junyoung if (sc->memtype == DRAM)
1193 1.1 junyoung dsp_loop_latency += 8;
1194 1.1 junyoung else
1195 1.1 junyoung dsp_loop_latency += 7;
1196 1.1 junyoung }
1197 1.1 junyoung break;
1198 1.1 junyoung case SDRAM:
1199 1.1 junyoung if (sc->memsize > 1024) {
1200 1.1 junyoung page_size = 8;
1201 1.1 junyoung dsp_loop_latency += 8;
1202 1.1 junyoung } else {
1203 1.22 perry page_size = 10;
1204 1.1 junyoung dsp_loop_latency += 9;
1205 1.1 junyoung }
1206 1.1 junyoung break;
1207 1.93 macallan case SGRAM:
1208 1.93 macallan page_size = 8;
1209 1.93 macallan dsp_loop_latency = 8;
1210 1.93 macallan break;
1211 1.1 junyoung default:
1212 1.1 junyoung page_size = 10;
1213 1.1 junyoung dsp_loop_latency += 9;
1214 1.1 junyoung break;
1215 1.1 junyoung }
1216 1.1 junyoung
1217 1.1 junyoung if (xclks_per_qw >= (page_size << 11))
1218 1.1 junyoung fifo_on = ((2 * page_size + 1) << 6) + (xclks_per_qw >> 5);
1219 1.1 junyoung else
1220 1.1 junyoung fifo_on = (3 * page_size + 2) << 6;
1221 1.1 junyoung
1222 1.1 junyoung dsp_xclks_per_qw = xclks_per_qw >> dsp_precision;
1223 1.1 junyoung dsp_on = fifo_on >> dsp_precision;
1224 1.1 junyoung dsp_off = fifo_off >> dsp_precision;
1225 1.1 junyoung
1226 1.59 macallan #ifdef MACHFB_DEBUG
1227 1.1 junyoung printf("dsp_xclks_per_qw = %d, dsp_on = %d, dsp_off = %d,\n"
1228 1.1 junyoung "dsp_precision = %d, dsp_loop_latency = %d,\n"
1229 1.1 junyoung "mclk_fb_div = %d, vclk_fb_div = %d,\n"
1230 1.1 junyoung "mclk_post_div = %d, vclk_post_div = %d\n",
1231 1.1 junyoung dsp_xclks_per_qw, dsp_on, dsp_off, dsp_precision, dsp_loop_latency,
1232 1.1 junyoung sc->mclk_fb_div, sc->vclk_fb_div,
1233 1.1 junyoung sc->mclk_post_div, sc->vclk_post_div);
1234 1.22 perry #endif
1235 1.97.4.1 martin DPRINTF("DSP_ON_OFF %08x\n", regr(sc, DSP_ON_OFF));
1236 1.97.4.1 martin DPRINTF("DSP_CONFIG %08x\n", regr(sc, DSP_CONFIG));
1237 1.1 junyoung regw(sc, DSP_ON_OFF, ((dsp_on << 16) & DSP_ON) | (dsp_off & DSP_OFF));
1238 1.1 junyoung regw(sc, DSP_CONFIG, ((dsp_precision << 20) & DSP_PRECISION) |
1239 1.22 perry ((dsp_loop_latency << 16) & DSP_LOOP_LATENCY) |
1240 1.1 junyoung (dsp_xclks_per_qw & DSP_XCLKS_PER_QW));
1241 1.97.4.1 martin DPRINTF("DSP_ON_OFF %08x\n", regr(sc, DSP_ON_OFF));
1242 1.97.4.1 martin DPRINTF("DSP_CONFIG %08x\n", regr(sc, DSP_CONFIG));
1243 1.1 junyoung }
1244 1.1 junyoung
1245 1.30 thorpej static void
1246 1.1 junyoung mach64_set_pll(struct mach64_softc *sc, int clock)
1247 1.1 junyoung {
1248 1.59 macallan uint32_t q, clockreg;
1249 1.59 macallan int clockshift = sc->sc_clock << 1;
1250 1.59 macallan uint8_t reg, vclk_ctl;
1251 1.1 junyoung
1252 1.1 junyoung q = (clock * sc->ref_div * 100) / (2 * sc->ref_freq);
1253 1.59 macallan #ifdef MACHFB_DEBUG
1254 1.1 junyoung printf("q = %d\n", q);
1255 1.1 junyoung #endif
1256 1.1 junyoung if (q > 25500) {
1257 1.76 macallan aprint_error_dev(sc->sc_dev, "Warning: q > 25500\n");
1258 1.1 junyoung q = 25500;
1259 1.1 junyoung sc->vclk_post_div = 1;
1260 1.1 junyoung sc->log2_vclk_post_div = 0;
1261 1.1 junyoung } else if (q > 12750) {
1262 1.1 junyoung sc->vclk_post_div = 1;
1263 1.1 junyoung sc->log2_vclk_post_div = 0;
1264 1.1 junyoung } else if (q > 6350) {
1265 1.1 junyoung sc->vclk_post_div = 2;
1266 1.1 junyoung sc->log2_vclk_post_div = 1;
1267 1.1 junyoung } else if (q > 3150) {
1268 1.1 junyoung sc->vclk_post_div = 4;
1269 1.1 junyoung sc->log2_vclk_post_div = 2;
1270 1.1 junyoung } else if (q >= 1600) {
1271 1.1 junyoung sc->vclk_post_div = 8;
1272 1.1 junyoung sc->log2_vclk_post_div = 3;
1273 1.1 junyoung } else {
1274 1.76 macallan aprint_error_dev(sc->sc_dev, "Warning: q < 1600\n");
1275 1.1 junyoung sc->vclk_post_div = 8;
1276 1.1 junyoung sc->log2_vclk_post_div = 3;
1277 1.1 junyoung }
1278 1.1 junyoung sc->vclk_fb_div = q * sc->vclk_post_div / 100;
1279 1.97.4.1 martin DPRINTF("post_div: %d log2_post_div: %d mclk_div: %d\n",
1280 1.76 macallan sc->vclk_post_div, sc->log2_vclk_post_div, sc->mclk_fb_div);
1281 1.1 junyoung
1282 1.59 macallan vclk_ctl = regrb_pll(sc, PLL_VCLK_CNTL);
1283 1.76 macallan aprint_debug("vclk_ctl: %02x\n", vclk_ctl);
1284 1.59 macallan vclk_ctl |= PLL_VCLK_RESET;
1285 1.59 macallan regwb_pll(sc, PLL_VCLK_CNTL, vclk_ctl);
1286 1.92 msaitoh
1287 1.97.4.1 martin DPRINTF("target: %d output: %d\n", clock,
1288 1.93 macallan (2 * sc->ref_freq * sc->vclk_fb_div) /
1289 1.93 macallan (sc->ref_div * sc->vclk_post_div));
1290 1.93 macallan
1291 1.1 junyoung regwb_pll(sc, MCLK_FB_DIV, sc->mclk_fb_div);
1292 1.59 macallan reg = regrb_pll(sc, VCLK_POST_DIV);
1293 1.59 macallan reg &= ~(3 << clockshift);
1294 1.59 macallan reg |= (sc->log2_vclk_post_div << clockshift);
1295 1.59 macallan regwb_pll(sc, VCLK_POST_DIV, reg);
1296 1.59 macallan regwb_pll(sc, VCLK0_FB_DIV + sc->sc_clock, sc->vclk_fb_div);
1297 1.59 macallan
1298 1.59 macallan vclk_ctl &= ~PLL_VCLK_RESET;
1299 1.59 macallan regwb_pll(sc, PLL_VCLK_CNTL, vclk_ctl);
1300 1.59 macallan
1301 1.59 macallan clockreg = regr(sc, CLOCK_CNTL);
1302 1.59 macallan clockreg &= ~CLOCK_SEL;
1303 1.59 macallan clockreg |= sc->sc_clock | CLOCK_STROBE;
1304 1.59 macallan regw(sc, CLOCK_CNTL, clockreg);
1305 1.93 macallan sc->vclk_freq = clock;
1306 1.22 perry }
1307 1.1 junyoung
1308 1.30 thorpej static void
1309 1.1 junyoung mach64_init_lut(struct mach64_softc *sc)
1310 1.1 junyoung {
1311 1.78 macallan uint8_t cmap[768];
1312 1.28 christos int i, idx;
1313 1.26 macallan
1314 1.78 macallan rasops_get_cmap(&mach64_console_screen.scr_ri, cmap, sizeof(cmap));
1315 1.26 macallan idx = 0;
1316 1.26 macallan for (i = 0; i < 256; i++) {
1317 1.78 macallan mach64_putpalreg(sc, i, cmap[idx], cmap[idx + 1],
1318 1.78 macallan cmap[idx + 2]);
1319 1.26 macallan idx += 3;
1320 1.19 martin }
1321 1.24 macallan }
1322 1.1 junyoung
1323 1.30 thorpej static int
1324 1.92 msaitoh mach64_putpalreg(struct mach64_softc *sc, uint8_t index, uint8_t r, uint8_t g,
1325 1.26 macallan uint8_t b)
1326 1.19 martin {
1327 1.26 macallan sc->sc_cmap_red[index] = r;
1328 1.26 macallan sc->sc_cmap_green[index] = g;
1329 1.26 macallan sc->sc_cmap_blue[index] = b;
1330 1.92 msaitoh /*
1331 1.25 macallan * writing the dac index takes a while, in theory we can poll some
1332 1.25 macallan * register to see when it's ready - but we better avoid writing it
1333 1.92 msaitoh * unnecessarily
1334 1.25 macallan */
1335 1.28 christos if (index != sc->sc_dacw) {
1336 1.19 martin regwb(sc, DAC_MASK, 0xff);
1337 1.19 martin regwb(sc, DAC_WINDEX, index);
1338 1.19 martin }
1339 1.26 macallan sc->sc_dacw = index + 1;
1340 1.19 martin regwb(sc, DAC_DATA, r);
1341 1.19 martin regwb(sc, DAC_DATA, g);
1342 1.19 martin regwb(sc, DAC_DATA, b);
1343 1.19 martin return 0;
1344 1.19 martin }
1345 1.1 junyoung
1346 1.30 thorpej static int
1347 1.21 martin mach64_putcmap(struct mach64_softc *sc, struct wsdisplay_cmap *cm)
1348 1.19 martin {
1349 1.41 macallan uint index = cm->index;
1350 1.41 macallan uint count = cm->count;
1351 1.19 martin int i, error;
1352 1.41 macallan uint8_t rbuf[256], gbuf[256], bbuf[256];
1353 1.41 macallan uint8_t *r, *g, *b;
1354 1.19 martin
1355 1.19 martin if (cm->index >= 256 || cm->count > 256 ||
1356 1.19 martin (cm->index + cm->count) > 256)
1357 1.19 martin return EINVAL;
1358 1.19 martin error = copyin(cm->red, &rbuf[index], count);
1359 1.19 martin if (error)
1360 1.19 martin return error;
1361 1.19 martin error = copyin(cm->green, &gbuf[index], count);
1362 1.19 martin if (error)
1363 1.19 martin return error;
1364 1.19 martin error = copyin(cm->blue, &bbuf[index], count);
1365 1.19 martin if (error)
1366 1.19 martin return error;
1367 1.19 martin
1368 1.19 martin memcpy(&sc->sc_cmap_red[index], &rbuf[index], count);
1369 1.19 martin memcpy(&sc->sc_cmap_green[index], &gbuf[index], count);
1370 1.19 martin memcpy(&sc->sc_cmap_blue[index], &bbuf[index], count);
1371 1.19 martin
1372 1.19 martin r = &sc->sc_cmap_red[index];
1373 1.19 martin g = &sc->sc_cmap_green[index];
1374 1.19 martin b = &sc->sc_cmap_blue[index];
1375 1.22 perry
1376 1.19 martin for (i = 0; i < count; i++) {
1377 1.26 macallan mach64_putpalreg(sc, index, *r, *g, *b);
1378 1.19 martin index++;
1379 1.19 martin r++, g++, b++;
1380 1.1 junyoung }
1381 1.19 martin return 0;
1382 1.19 martin }
1383 1.19 martin
1384 1.30 thorpej static int
1385 1.21 martin mach64_getcmap(struct mach64_softc *sc, struct wsdisplay_cmap *cm)
1386 1.19 martin {
1387 1.19 martin u_int index = cm->index;
1388 1.19 martin u_int count = cm->count;
1389 1.19 martin int error;
1390 1.19 martin
1391 1.19 martin if (index >= 255 || count > 256 || index + count > 256)
1392 1.19 martin return EINVAL;
1393 1.22 perry
1394 1.19 martin error = copyout(&sc->sc_cmap_red[index], cm->red, count);
1395 1.19 martin if (error)
1396 1.19 martin return error;
1397 1.19 martin error = copyout(&sc->sc_cmap_green[index], cm->green, count);
1398 1.19 martin if (error)
1399 1.19 martin return error;
1400 1.19 martin error = copyout(&sc->sc_cmap_blue[index], cm->blue, count);
1401 1.19 martin if (error)
1402 1.19 martin return error;
1403 1.19 martin
1404 1.19 martin return 0;
1405 1.1 junyoung }
1406 1.1 junyoung
1407 1.30 thorpej static int
1408 1.59 macallan mach64_is_console(struct mach64_softc *sc)
1409 1.5 junyoung {
1410 1.59 macallan bool console = 0;
1411 1.5 junyoung
1412 1.59 macallan prop_dictionary_get_bool(device_properties(sc->sc_dev),
1413 1.59 macallan "is_console", &console);
1414 1.59 macallan return console;
1415 1.5 junyoung }
1416 1.5 junyoung
1417 1.1 junyoung /*
1418 1.1 junyoung * wsdisplay_emulops
1419 1.1 junyoung */
1420 1.1 junyoung
1421 1.30 thorpej static void
1422 1.1 junyoung mach64_cursor(void *cookie, int on, int row, int col)
1423 1.1 junyoung {
1424 1.28 christos struct rasops_info *ri = cookie;
1425 1.41 macallan struct vcons_screen *scr = ri->ri_hw;
1426 1.41 macallan struct mach64_softc *sc = scr->scr_cookie;
1427 1.41 macallan int x, y, wi, he;
1428 1.92 msaitoh
1429 1.26 macallan wi = ri->ri_font->fontwidth;
1430 1.26 macallan he = ri->ri_font->fontheight;
1431 1.92 msaitoh
1432 1.41 macallan if ((!sc->sc_locked) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) {
1433 1.41 macallan x = ri->ri_ccol * wi + ri->ri_xorigin;
1434 1.41 macallan y = ri->ri_crow * he + ri->ri_yorigin;
1435 1.41 macallan if (ri->ri_flg & RI_CURSOR) {
1436 1.79 macallan mach64_bitblt(sc, x, y, x, y, wi, he, MIX_NOT_SRC);
1437 1.41 macallan ri->ri_flg &= ~RI_CURSOR;
1438 1.21 martin }
1439 1.41 macallan ri->ri_crow = row;
1440 1.41 macallan ri->ri_ccol = col;
1441 1.41 macallan if (on) {
1442 1.41 macallan x = ri->ri_ccol * wi + ri->ri_xorigin;
1443 1.41 macallan y = ri->ri_crow * he + ri->ri_yorigin;
1444 1.79 macallan mach64_bitblt(sc, x, y, x, y, wi, he, MIX_NOT_SRC);
1445 1.56 yamt ri->ri_flg |= RI_CURSOR;
1446 1.21 martin }
1447 1.21 martin } else {
1448 1.41 macallan scr->scr_ri.ri_crow = row;
1449 1.41 macallan scr->scr_ri.ri_ccol = col;
1450 1.41 macallan scr->scr_ri.ri_flg &= ~RI_CURSOR;
1451 1.21 martin }
1452 1.1 junyoung }
1453 1.1 junyoung
1454 1.7 martin #if 0
1455 1.30 thorpej static int
1456 1.1 junyoung mach64_mapchar(void *cookie, int uni, u_int *index)
1457 1.1 junyoung {
1458 1.1 junyoung return 0;
1459 1.1 junyoung }
1460 1.21 martin #endif
1461 1.1 junyoung
1462 1.30 thorpej static void
1463 1.79 macallan mach64_putchar_mono(void *cookie, int row, int col, u_int c, long attr)
1464 1.1 junyoung {
1465 1.28 christos struct rasops_info *ri = cookie;
1466 1.59 macallan struct wsdisplay_font *font = PICK_FONT(ri, c);
1467 1.41 macallan struct vcons_screen *scr = ri->ri_hw;
1468 1.41 macallan struct mach64_softc *sc = scr->scr_cookie;
1469 1.92 msaitoh
1470 1.41 macallan if (sc->sc_mode == WSDISPLAYIO_MODE_EMUL) {
1471 1.26 macallan int fg, bg, uc;
1472 1.21 martin uint8_t *data;
1473 1.26 macallan int x, y, wi, he;
1474 1.59 macallan wi = font->fontwidth;
1475 1.59 macallan he = font->fontheight;
1476 1.22 perry
1477 1.59 macallan if (!CHAR_IN_FONT(c, font))
1478 1.21 martin return;
1479 1.85 macallan bg = ri->ri_devcmap[(attr >> 16) & 0x0f];
1480 1.85 macallan fg = ri->ri_devcmap[(attr >> 24) & 0x0f];
1481 1.26 macallan x = ri->ri_xorigin + col * wi;
1482 1.26 macallan y = ri->ri_yorigin + row * he;
1483 1.26 macallan if (c == 0x20) {
1484 1.26 macallan mach64_rectfill(sc, x, y, wi, he, bg);
1485 1.21 martin } else {
1486 1.59 macallan uc = c - font->firstchar;
1487 1.92 msaitoh data = (uint8_t *)font->data + uc *
1488 1.25 macallan ri->ri_fontscale;
1489 1.1 junyoung
1490 1.26 macallan mach64_setup_mono(sc, x, y, wi, he, fg, bg);
1491 1.26 macallan mach64_feed_bytes(sc, ri->ri_fontscale, data);
1492 1.21 martin }
1493 1.93 macallan if (attr & 1)
1494 1.93 macallan mach64_rectfill(sc, x, y + he - 2, wi, 1, fg);
1495 1.21 martin }
1496 1.1 junyoung }
1497 1.21 martin
1498 1.79 macallan static void
1499 1.79 macallan mach64_putchar_aa8(void *cookie, int row, int col, u_int c, long attr)
1500 1.79 macallan {
1501 1.79 macallan struct rasops_info *ri = cookie;
1502 1.79 macallan struct wsdisplay_font *font = PICK_FONT(ri, c);
1503 1.79 macallan struct vcons_screen *scr = ri->ri_hw;
1504 1.79 macallan struct mach64_softc *sc = scr->scr_cookie;
1505 1.93 macallan uint32_t bg, fg, latch = 0, bg8, fg8, pixel;
1506 1.79 macallan int i, x, y, wi, he, r, g, b, aval;
1507 1.79 macallan int r1, g1, b1, r0, g0, b0, fgo, bgo;
1508 1.79 macallan uint8_t *data8;
1509 1.79 macallan int rv = 0, cnt = 0;
1510 1.79 macallan
1511 1.92 msaitoh if (sc->sc_mode != WSDISPLAYIO_MODE_EMUL)
1512 1.79 macallan return;
1513 1.79 macallan
1514 1.79 macallan if (!CHAR_IN_FONT(c, font))
1515 1.79 macallan return;
1516 1.79 macallan
1517 1.79 macallan wi = font->fontwidth;
1518 1.79 macallan he = font->fontheight;
1519 1.79 macallan bg = (u_char)ri->ri_devcmap[(attr >> 16) & 0x0f];
1520 1.93 macallan fg = (u_char)ri->ri_devcmap[(attr >> 24) & 0x0f];
1521 1.79 macallan x = ri->ri_xorigin + col * wi;
1522 1.79 macallan y = ri->ri_yorigin + row * he;
1523 1.79 macallan
1524 1.79 macallan if (c == 0x20) {
1525 1.79 macallan mach64_rectfill(sc, x, y, wi, he, bg);
1526 1.93 macallan if (attr & 1)
1527 1.93 macallan mach64_rectfill(sc, x, y + he - 2, wi, 1, fg);
1528 1.79 macallan return;
1529 1.79 macallan }
1530 1.79 macallan
1531 1.79 macallan rv = glyphcache_try(&sc->sc_gc, c, x, y, attr);
1532 1.79 macallan if (rv == GC_OK)
1533 1.79 macallan return;
1534 1.79 macallan
1535 1.79 macallan data8 = WSFONT_GLYPH(c, font);
1536 1.79 macallan
1537 1.79 macallan wait_for_fifo(sc, 11);
1538 1.79 macallan regw(sc, DP_PIX_WIDTH, DST_8BPP | SRC_8BPP | HOST_8BPP);
1539 1.79 macallan regw(sc, DP_SRC, MONO_SRC_ONE | BKGD_SRC_HOST | FRGD_SRC_HOST);
1540 1.79 macallan regw(sc, DP_MIX, ((MIX_SRC & 0xffff) << 16) | MIX_SRC);
1541 1.79 macallan regw(sc, CLR_CMP_CNTL ,0); /* no transparency */
1542 1.79 macallan regw(sc, SRC_CNTL, SRC_LINE_X_LEFT_TO_RIGHT);
1543 1.79 macallan regw(sc, DST_CNTL, DST_Y_TOP_TO_BOTTOM | DST_X_LEFT_TO_RIGHT);
1544 1.79 macallan regw(sc, HOST_CNTL, HOST_BYTE_ALIGN);
1545 1.79 macallan regw(sc, SRC_Y_X, 0);
1546 1.79 macallan regw(sc, SRC_WIDTH1, wi);
1547 1.79 macallan regw(sc, DST_Y_X, (x << 16) | y);
1548 1.79 macallan regw(sc, DST_HEIGHT_WIDTH, (wi << 16) | he);
1549 1.79 macallan
1550 1.79 macallan /*
1551 1.79 macallan * we need the RGB colours here, so get offsets into rasops_cmap
1552 1.79 macallan */
1553 1.79 macallan fgo = ((attr >> 24) & 0xf) * 3;
1554 1.79 macallan bgo = ((attr >> 16) & 0xf) * 3;
1555 1.79 macallan
1556 1.79 macallan r0 = rasops_cmap[bgo];
1557 1.79 macallan r1 = rasops_cmap[fgo];
1558 1.79 macallan g0 = rasops_cmap[bgo + 1];
1559 1.79 macallan g1 = rasops_cmap[fgo + 1];
1560 1.79 macallan b0 = rasops_cmap[bgo + 2];
1561 1.79 macallan b1 = rasops_cmap[fgo + 2];
1562 1.79 macallan #define R3G3B2(r, g, b) ((r & 0xe0) | ((g >> 3) & 0x1c) | (b >> 6))
1563 1.79 macallan bg8 = R3G3B2(r0, g0, b0);
1564 1.79 macallan fg8 = R3G3B2(r1, g1, b1);
1565 1.79 macallan
1566 1.79 macallan wait_for_fifo(sc, 10);
1567 1.79 macallan
1568 1.79 macallan for (i = 0; i < ri->ri_fontscale; i++) {
1569 1.79 macallan aval = *data8;
1570 1.79 macallan if (aval == 0) {
1571 1.79 macallan pixel = bg8;
1572 1.79 macallan } else if (aval == 255) {
1573 1.79 macallan pixel = fg8;
1574 1.79 macallan } else {
1575 1.79 macallan r = aval * r1 + (255 - aval) * r0;
1576 1.79 macallan g = aval * g1 + (255 - aval) * g0;
1577 1.79 macallan b = aval * b1 + (255 - aval) * b0;
1578 1.79 macallan pixel = ((r & 0xe000) >> 8) |
1579 1.79 macallan ((g & 0xe000) >> 11) |
1580 1.79 macallan ((b & 0xc000) >> 14);
1581 1.79 macallan }
1582 1.79 macallan latch = (latch << 8) | pixel;
1583 1.79 macallan /* write in 32bit chunks */
1584 1.79 macallan if ((i & 3) == 3) {
1585 1.79 macallan regws(sc, HOST_DATA0, latch);
1586 1.79 macallan /*
1587 1.92 msaitoh * not strictly necessary, old data should be shifted
1588 1.92 msaitoh * out
1589 1.79 macallan */
1590 1.79 macallan latch = 0;
1591 1.79 macallan cnt++;
1592 1.79 macallan if (cnt > 8) {
1593 1.79 macallan wait_for_fifo(sc, 10);
1594 1.79 macallan cnt = 0;
1595 1.79 macallan }
1596 1.79 macallan }
1597 1.79 macallan data8++;
1598 1.79 macallan }
1599 1.79 macallan /* if we have pixels left in latch write them out */
1600 1.79 macallan if ((i & 3) != 0) {
1601 1.92 msaitoh latch = latch << ((4 - (i & 3)) << 3);
1602 1.79 macallan regws(sc, HOST_DATA0, latch);
1603 1.79 macallan }
1604 1.79 macallan
1605 1.79 macallan if (rv == GC_ADD) {
1606 1.79 macallan glyphcache_add(&sc->sc_gc, c, x, y);
1607 1.93 macallan } else if (attr & 1) {
1608 1.93 macallan mach64_rectfill(sc, x, y + he - 2, wi, 1, fg);
1609 1.79 macallan }
1610 1.93 macallan
1611 1.79 macallan }
1612 1.1 junyoung
1613 1.30 thorpej static void
1614 1.1 junyoung mach64_copycols(void *cookie, int row, int srccol, int dstcol, int ncols)
1615 1.1 junyoung {
1616 1.41 macallan struct rasops_info *ri = cookie;
1617 1.41 macallan struct vcons_screen *scr = ri->ri_hw;
1618 1.41 macallan struct mach64_softc *sc = scr->scr_cookie;
1619 1.41 macallan int32_t xs, xd, y, width, height;
1620 1.92 msaitoh
1621 1.41 macallan if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) {
1622 1.26 macallan xs = ri->ri_xorigin + ri->ri_font->fontwidth * srccol;
1623 1.26 macallan xd = ri->ri_xorigin + ri->ri_font->fontwidth * dstcol;
1624 1.26 macallan y = ri->ri_yorigin + ri->ri_font->fontheight * row;
1625 1.26 macallan width = ri->ri_font->fontwidth * ncols;
1626 1.26 macallan height = ri->ri_font->fontheight;
1627 1.79 macallan mach64_bitblt(sc, xs, y, xd, y, width, height, MIX_SRC);
1628 1.24 macallan }
1629 1.21 martin }
1630 1.1 junyoung
1631 1.30 thorpej static void
1632 1.1 junyoung mach64_erasecols(void *cookie, int row, int startcol, int ncols, long fillattr)
1633 1.1 junyoung {
1634 1.41 macallan struct rasops_info *ri = cookie;
1635 1.41 macallan struct vcons_screen *scr = ri->ri_hw;
1636 1.41 macallan struct mach64_softc *sc = scr->scr_cookie;
1637 1.26 macallan int32_t x, y, width, height, fg, bg, ul;
1638 1.92 msaitoh
1639 1.41 macallan if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) {
1640 1.26 macallan x = ri->ri_xorigin + ri->ri_font->fontwidth * startcol;
1641 1.26 macallan y = ri->ri_yorigin + ri->ri_font->fontheight * row;
1642 1.26 macallan width = ri->ri_font->fontwidth * ncols;
1643 1.26 macallan height = ri->ri_font->fontheight;
1644 1.26 macallan rasops_unpack_attr(fillattr, &fg, &bg, &ul);
1645 1.22 perry
1646 1.78 macallan mach64_rectfill(sc, x, y, width, height, ri->ri_devcmap[bg]);
1647 1.21 martin }
1648 1.1 junyoung }
1649 1.1 junyoung
1650 1.30 thorpej static void
1651 1.1 junyoung mach64_copyrows(void *cookie, int srcrow, int dstrow, int nrows)
1652 1.1 junyoung {
1653 1.41 macallan struct rasops_info *ri = cookie;
1654 1.41 macallan struct vcons_screen *scr = ri->ri_hw;
1655 1.41 macallan struct mach64_softc *sc = scr->scr_cookie;
1656 1.25 macallan int32_t x, ys, yd, width, height;
1657 1.22 perry
1658 1.41 macallan if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) {
1659 1.26 macallan x = ri->ri_xorigin;
1660 1.26 macallan ys = ri->ri_yorigin + ri->ri_font->fontheight * srcrow;
1661 1.26 macallan yd = ri->ri_yorigin + ri->ri_font->fontheight * dstrow;
1662 1.26 macallan width = ri->ri_emuwidth;
1663 1.26 macallan height = ri->ri_font->fontheight*nrows;
1664 1.79 macallan mach64_bitblt(sc, x, ys, x, yd, width, height, MIX_SRC);
1665 1.24 macallan }
1666 1.21 martin }
1667 1.19 martin
1668 1.30 thorpej static void
1669 1.21 martin mach64_eraserows(void *cookie, int row, int nrows, long fillattr)
1670 1.21 martin {
1671 1.41 macallan struct rasops_info *ri = cookie;
1672 1.41 macallan struct vcons_screen *scr = ri->ri_hw;
1673 1.41 macallan struct mach64_softc *sc = scr->scr_cookie;
1674 1.34 macallan int32_t x, y, width, height, fg, bg, ul;
1675 1.92 msaitoh
1676 1.41 macallan if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) {
1677 1.87 macallan if ((row == 0) && (nrows == ri->ri_rows)) {
1678 1.92 msaitoh /* clear full screen */
1679 1.87 macallan x = 0;
1680 1.87 macallan y = 0;
1681 1.87 macallan width = sc->virt_x;
1682 1.87 macallan height = sc->virt_y;
1683 1.87 macallan } else {
1684 1.87 macallan x = ri->ri_xorigin;
1685 1.87 macallan y = ri->ri_yorigin + ri->ri_font->fontheight * row;
1686 1.87 macallan width = ri->ri_emuwidth;
1687 1.87 macallan height = ri->ri_font->fontheight * nrows;
1688 1.87 macallan }
1689 1.26 macallan rasops_unpack_attr(fillattr, &fg, &bg, &ul);
1690 1.22 perry
1691 1.78 macallan mach64_rectfill(sc, x, y, width, height, ri->ri_devcmap[bg]);
1692 1.21 martin }
1693 1.21 martin }
1694 1.21 martin
1695 1.30 thorpej static void
1696 1.92 msaitoh mach64_bitblt(void *cookie, int xs, int ys, int xd, int yd, int width,
1697 1.92 msaitoh int height, int rop)
1698 1.19 martin {
1699 1.79 macallan struct mach64_softc *sc = cookie;
1700 1.26 macallan uint32_t dest_ctl = 0;
1701 1.93 macallan
1702 1.93 macallan #if 0
1703 1.93 macallan wait_for_idle(sc);
1704 1.93 macallan #else
1705 1.93 macallan wait_for_fifo(sc, 10);
1706 1.93 macallan #endif
1707 1.92 msaitoh
1708 1.26 macallan regw(sc, DP_PIX_WIDTH, DST_8BPP | SRC_8BPP | HOST_8BPP);
1709 1.26 macallan regw(sc, DP_SRC, FRGD_SRC_BLIT);
1710 1.26 macallan regw(sc, DP_MIX, (rop & 0xffff) << 16);
1711 1.26 macallan regw(sc, CLR_CMP_CNTL, 0); /* no transparency */
1712 1.26 macallan if (yd < ys) {
1713 1.26 macallan dest_ctl = DST_Y_TOP_TO_BOTTOM;
1714 1.19 martin } else {
1715 1.26 macallan ys += height - 1;
1716 1.26 macallan yd += height - 1;
1717 1.26 macallan dest_ctl = DST_Y_BOTTOM_TO_TOP;
1718 1.26 macallan }
1719 1.26 macallan if (xd < xs) {
1720 1.26 macallan dest_ctl |= DST_X_LEFT_TO_RIGHT;
1721 1.26 macallan regw(sc, SRC_CNTL, SRC_LINE_X_LEFT_TO_RIGHT);
1722 1.19 martin } else {
1723 1.26 macallan dest_ctl |= DST_X_RIGHT_TO_LEFT;
1724 1.26 macallan xs += width - 1;
1725 1.26 macallan xd += width - 1;
1726 1.26 macallan regw(sc, SRC_CNTL, SRC_LINE_X_RIGHT_TO_LEFT);
1727 1.26 macallan }
1728 1.26 macallan regw(sc, DST_CNTL, dest_ctl);
1729 1.26 macallan
1730 1.26 macallan regw(sc, SRC_Y_X, (xs << 16) | ys);
1731 1.26 macallan regw(sc, SRC_WIDTH1, width);
1732 1.26 macallan regw(sc, DST_Y_X, (xd << 16) | yd);
1733 1.26 macallan regw(sc, DST_HEIGHT_WIDTH, (width << 16) | height);
1734 1.19 martin }
1735 1.22 perry
1736 1.30 thorpej static void
1737 1.92 msaitoh mach64_setup_mono(struct mach64_softc *sc, int xd, int yd, int width,
1738 1.25 macallan int height, uint32_t fg, uint32_t bg)
1739 1.21 martin {
1740 1.22 perry wait_for_idle(sc);
1741 1.26 macallan regw(sc, DP_WRITE_MASK, 0xff); /* XXX only good for 8 bit */
1742 1.26 macallan regw(sc, DP_PIX_WIDTH, DST_8BPP | SRC_1BPP | HOST_1BPP);
1743 1.26 macallan regw(sc, DP_SRC, MONO_SRC_HOST | BKGD_SRC_BKGD_CLR | FRGD_SRC_FRGD_CLR);
1744 1.26 macallan regw(sc, DP_MIX, ((MIX_SRC & 0xffff) << 16) | MIX_SRC);
1745 1.26 macallan regw(sc, CLR_CMP_CNTL ,0); /* no transparency */
1746 1.26 macallan regw(sc, SRC_CNTL, SRC_LINE_X_LEFT_TO_RIGHT);
1747 1.26 macallan regw(sc, DST_CNTL, DST_Y_TOP_TO_BOTTOM | DST_X_LEFT_TO_RIGHT);
1748 1.26 macallan regw(sc, HOST_CNTL, HOST_BYTE_ALIGN);
1749 1.26 macallan regw(sc, DP_BKGD_CLR, bg);
1750 1.26 macallan regw(sc, DP_FRGD_CLR, fg);
1751 1.26 macallan regw(sc, SRC_Y_X, 0);
1752 1.26 macallan regw(sc, SRC_WIDTH1, width);
1753 1.26 macallan regw(sc, DST_Y_X, (xd << 16) | yd);
1754 1.26 macallan regw(sc, DST_HEIGHT_WIDTH, (width << 16) | height);
1755 1.21 martin /* now feed the data into the chip */
1756 1.21 martin }
1757 1.21 martin
1758 1.30 thorpej static void
1759 1.21 martin mach64_feed_bytes(struct mach64_softc *sc, int count, uint8_t *data)
1760 1.21 martin {
1761 1.21 martin int i;
1762 1.26 macallan uint32_t latch = 0, bork;
1763 1.26 macallan int shift = 0;
1764 1.26 macallan int reg = 0;
1765 1.92 msaitoh
1766 1.64 macallan for (i = 0; i < count; i++) {
1767 1.26 macallan bork = data[i];
1768 1.26 macallan latch |= (bork << shift);
1769 1.26 macallan if (shift == 24) {
1770 1.26 macallan regw(sc, HOST_DATA0 + reg, latch);
1771 1.26 macallan latch = 0;
1772 1.26 macallan shift = 0;
1773 1.26 macallan reg = (reg + 4) & 0x3c;
1774 1.21 martin } else
1775 1.26 macallan shift += 8;
1776 1.21 martin }
1777 1.26 macallan if (shift != 0) /* 24 */
1778 1.26 macallan regw(sc, HOST_DATA0 + reg, latch);
1779 1.22 perry }
1780 1.21 martin
1781 1.22 perry
1782 1.30 thorpej static void
1783 1.92 msaitoh mach64_rectfill(struct mach64_softc *sc, int x, int y, int width, int height,
1784 1.25 macallan int colour)
1785 1.19 martin {
1786 1.79 macallan wait_for_fifo(sc, 11);
1787 1.26 macallan regw(sc, DP_FRGD_CLR, colour);
1788 1.26 macallan regw(sc, DP_PIX_WIDTH, DST_8BPP | SRC_8BPP | HOST_8BPP);
1789 1.26 macallan regw(sc, DP_SRC, FRGD_SRC_FRGD_CLR);
1790 1.26 macallan regw(sc, DP_MIX, MIX_SRC << 16);
1791 1.26 macallan regw(sc, CLR_CMP_CNTL, 0); /* no transparency */
1792 1.26 macallan regw(sc, SRC_CNTL, SRC_LINE_X_LEFT_TO_RIGHT);
1793 1.26 macallan regw(sc, DST_CNTL, DST_X_LEFT_TO_RIGHT | DST_Y_TOP_TO_BOTTOM);
1794 1.26 macallan
1795 1.26 macallan regw(sc, SRC_Y_X, (x << 16) | y);
1796 1.26 macallan regw(sc, SRC_WIDTH1, width);
1797 1.26 macallan regw(sc, DST_Y_X, (x << 16) | y);
1798 1.26 macallan regw(sc, DST_HEIGHT_WIDTH, (width << 16) | height);
1799 1.19 martin }
1800 1.1 junyoung
1801 1.30 thorpej static void
1802 1.21 martin mach64_clearscreen(struct mach64_softc *sc)
1803 1.21 martin {
1804 1.26 macallan mach64_rectfill(sc, 0, 0, sc->virt_x, sc->virt_y, sc->sc_bg);
1805 1.21 martin }
1806 1.21 martin
1807 1.21 martin
1808 1.30 thorpej #if 0
1809 1.30 thorpej static void
1810 1.22 perry mach64_showpal(struct mach64_softc *sc)
1811 1.19 martin {
1812 1.26 macallan int i, x = 0;
1813 1.26 macallan
1814 1.26 macallan for (i = 0; i < 16; i++) {
1815 1.26 macallan mach64_rectfill(sc, x, 0, 64, 64, i);
1816 1.26 macallan x += 64;
1817 1.19 martin }
1818 1.1 junyoung }
1819 1.30 thorpej #endif
1820 1.22 perry
1821 1.1 junyoung /*
1822 1.1 junyoung * wsdisplay_accessops
1823 1.1 junyoung */
1824 1.1 junyoung
1825 1.30 thorpej static int
1826 1.49 christos mach64_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
1827 1.40 jmmv struct lwp *l)
1828 1.1 junyoung {
1829 1.41 macallan struct vcons_data *vd = v;
1830 1.41 macallan struct mach64_softc *sc = vd->cookie;
1831 1.19 martin struct wsdisplay_fbinfo *wdf;
1832 1.41 macallan struct vcons_screen *ms = vd->active;
1833 1.92 msaitoh
1834 1.19 martin switch (cmd) {
1835 1.62 cegger case WSDISPLAYIO_GTYPE:
1836 1.92 msaitoh *(u_int *)data = WSDISPLAY_TYPE_PCIMISC;
1837 1.62 cegger return 0;
1838 1.62 cegger
1839 1.62 cegger case WSDISPLAYIO_LINEBYTES:
1840 1.62 cegger *(u_int *)data = sc->virt_x * sc->bits_per_pixel / 8;
1841 1.62 cegger return 0;
1842 1.62 cegger
1843 1.62 cegger case WSDISPLAYIO_GINFO:
1844 1.62 cegger wdf = (void *)data;
1845 1.62 cegger wdf->height = sc->virt_y;
1846 1.62 cegger wdf->width = sc->virt_x;
1847 1.62 cegger wdf->depth = sc->bits_per_pixel;
1848 1.62 cegger wdf->cmsize = 256;
1849 1.62 cegger return 0;
1850 1.92 msaitoh
1851 1.62 cegger case WSDISPLAYIO_GETCMAP:
1852 1.92 msaitoh return mach64_getcmap(sc,
1853 1.62 cegger (struct wsdisplay_cmap *)data);
1854 1.62 cegger
1855 1.62 cegger case WSDISPLAYIO_PUTCMAP:
1856 1.92 msaitoh return mach64_putcmap(sc,
1857 1.62 cegger (struct wsdisplay_cmap *)data);
1858 1.92 msaitoh
1859 1.62 cegger /* PCI config read/write passthrough. */
1860 1.62 cegger case PCI_IOC_CFGREAD:
1861 1.62 cegger case PCI_IOC_CFGWRITE:
1862 1.62 cegger return pci_devioctl(sc->sc_pc, sc->sc_pcitag,
1863 1.62 cegger cmd, data, flag, l);
1864 1.63 cegger
1865 1.63 cegger case WSDISPLAYIO_GET_BUSID:
1866 1.63 cegger return wsdisplayio_busid_pci(sc->sc_dev, sc->sc_pc,
1867 1.63 cegger sc->sc_pcitag, data);
1868 1.63 cegger
1869 1.62 cegger case WSDISPLAYIO_SMODE: {
1870 1.62 cegger int new_mode = *(int*)data;
1871 1.62 cegger if (new_mode != sc->sc_mode) {
1872 1.62 cegger sc->sc_mode = new_mode;
1873 1.62 cegger if ((new_mode == WSDISPLAYIO_MODE_EMUL)
1874 1.62 cegger && (ms != NULL))
1875 1.19 martin {
1876 1.62 cegger /* restore initial video mode */
1877 1.62 cegger mach64_init(sc);
1878 1.62 cegger mach64_init_engine(sc);
1879 1.62 cegger mach64_init_lut(sc);
1880 1.97.4.1 martin if (sc->sc_setmode)
1881 1.97.4.1 martin mach64_modeswitch(sc, sc->sc_my_mode);
1882 1.82 macallan mach64_clearscreen(sc);
1883 1.82 macallan glyphcache_wipe(&sc->sc_gc);
1884 1.62 cegger vcons_redraw_screen(ms);
1885 1.19 martin }
1886 1.62 cegger }
1887 1.62 cegger }
1888 1.62 cegger return 0;
1889 1.68 macallan case WSDISPLAYIO_GET_EDID: {
1890 1.68 macallan struct wsdisplayio_edid_info *d = data;
1891 1.68 macallan return wsdisplayio_get_edid(sc->sc_dev, d);
1892 1.68 macallan }
1893 1.89 macallan
1894 1.89 macallan case WSDISPLAYIO_GET_FBINFO: {
1895 1.89 macallan struct wsdisplayio_fbinfo *fbi = data;
1896 1.89 macallan return wsdisplayio_get_fbinfo(&ms->scr_ri, fbi);
1897 1.89 macallan }
1898 1.19 martin }
1899 1.19 martin return EPASSTHROUGH;
1900 1.1 junyoung }
1901 1.1 junyoung
1902 1.30 thorpej static paddr_t
1903 1.48 christos mach64_mmap(void *v, void *vs, off_t offset, int prot)
1904 1.1 junyoung {
1905 1.41 macallan struct vcons_data *vd = v;
1906 1.41 macallan struct mach64_softc *sc = vd->cookie;
1907 1.19 martin paddr_t pa;
1908 1.33 macallan
1909 1.90 macallan if (sc->sc_mode == WSDISPLAYIO_MODE_DUMBFB) {
1910 1.92 msaitoh /*
1911 1.92 msaitoh *'regular' framebuffer mmap()ing
1912 1.90 macallan */
1913 1.90 macallan if (offset < (sc->memsize * 1024)) {
1914 1.90 macallan pa = bus_space_mmap(sc->sc_memt, sc->sc_aperbase,
1915 1.90 macallan offset, prot, BUS_SPACE_MAP_LINEAR);
1916 1.90 macallan return pa;
1917 1.90 macallan }
1918 1.90 macallan } else if (sc->sc_mode == WSDISPLAYIO_MODE_MAPPED) {
1919 1.90 macallan /*
1920 1.90 macallan * restrict all other mappings to processes with superuser
1921 1.90 macallan * privileges
1922 1.90 macallan */
1923 1.90 macallan if (kauth_authorize_machdep(kauth_cred_get(),
1924 1.90 macallan KAUTH_MACHDEP_UNMANAGEDMEM,
1925 1.90 macallan NULL, NULL, NULL, NULL) != 0) {
1926 1.90 macallan return -1;
1927 1.90 macallan }
1928 1.92 msaitoh if ((offset >= sc->sc_aperbase) &&
1929 1.90 macallan (offset < (sc->sc_aperbase + sc->sc_apersize))) {
1930 1.92 msaitoh pa = bus_space_mmap(sc->sc_memt, offset, 0, prot,
1931 1.90 macallan BUS_SPACE_MAP_LINEAR);
1932 1.90 macallan return pa;
1933 1.90 macallan }
1934 1.20 martin
1935 1.92 msaitoh if ((offset >= sc->sc_regbase) &&
1936 1.90 macallan (offset < (sc->sc_regbase + sc->sc_regsize))) {
1937 1.92 msaitoh pa = bus_space_mmap(sc->sc_regt, offset, 0, prot,
1938 1.90 macallan BUS_SPACE_MAP_LINEAR);
1939 1.90 macallan return pa;
1940 1.90 macallan }
1941 1.20 martin
1942 1.92 msaitoh if ((offset >= sc->sc_rom.vb_base) &&
1943 1.90 macallan (offset < (sc->sc_rom.vb_base + sc->sc_rom.vb_size))) {
1944 1.92 msaitoh pa = bus_space_mmap(sc->sc_memt, offset, 0, prot,
1945 1.90 macallan BUS_SPACE_MAP_LINEAR);
1946 1.90 macallan return pa;
1947 1.90 macallan }
1948 1.20 martin
1949 1.59 macallan #ifdef PCI_MAGIC_IO_RANGE
1950 1.90 macallan if ((offset >= PCI_MAGIC_IO_RANGE) &&
1951 1.90 macallan (offset <= PCI_MAGIC_IO_RANGE + 0x10000)) {
1952 1.90 macallan return bus_space_mmap(sc->sc_iot,
1953 1.90 macallan offset - PCI_MAGIC_IO_RANGE, 0, prot, 0);
1954 1.90 macallan }
1955 1.90 macallan #endif
1956 1.59 macallan }
1957 1.1 junyoung return -1;
1958 1.1 junyoung }
1959 1.1 junyoung
1960 1.34 macallan #if 0
1961 1.30 thorpej static int
1962 1.41 macallan mach64_load_font(void *v, void *cookie, struct wsdisplay_font *data)
1963 1.1 junyoung {
1964 1.1 junyoung
1965 1.1 junyoung return 0;
1966 1.1 junyoung }
1967 1.41 macallan #endif
1968 1.1 junyoung
1969 1.41 macallan void
1970 1.41 macallan machfb_blank(struct mach64_softc *sc, int blank)
1971 1.21 martin {
1972 1.41 macallan uint32_t reg;
1973 1.21 martin
1974 1.41 macallan #define MACH64_BLANK (CRTC_DISPLAY_DIS | CRTC_HSYNC_DIS | CRTC_VSYNC_DIS)
1975 1.21 martin
1976 1.41 macallan switch (blank)
1977 1.41 macallan {
1978 1.41 macallan case 0:
1979 1.41 macallan reg = regr(sc, CRTC_GEN_CNTL);
1980 1.41 macallan regw(sc, CRTC_GEN_CNTL, reg & ~(MACH64_BLANK));
1981 1.41 macallan sc->sc_blanked = 0;
1982 1.41 macallan break;
1983 1.41 macallan case 1:
1984 1.41 macallan reg = regr(sc, CRTC_GEN_CNTL);
1985 1.41 macallan regw(sc, CRTC_GEN_CNTL, reg | (MACH64_BLANK));
1986 1.41 macallan sc->sc_blanked = 1;
1987 1.41 macallan break;
1988 1.41 macallan default:
1989 1.41 macallan break;
1990 1.21 martin }
1991 1.41 macallan }
1992