grfabs_cc.c revision 1.3 1 1.1 chopps /*
2 1.1 chopps * Copyright (c) 1994 Christian E. Hopps
3 1.1 chopps * All rights reserved.
4 1.1 chopps *
5 1.1 chopps * Redistribution and use in source and binary forms, with or without
6 1.1 chopps * modification, are permitted provided that the following conditions
7 1.1 chopps * are met:
8 1.1 chopps * 1. Redistributions of source code must retain the above copyright
9 1.1 chopps * notice, this list of conditions and the following disclaimer.
10 1.1 chopps * 2. Redistributions in binary form must reproduce the above copyright
11 1.1 chopps * notice, this list of conditions and the following disclaimer in the
12 1.1 chopps * documentation and/or other materials provided with the distribution.
13 1.1 chopps * 3. All advertising materials mentioning features or use of this software
14 1.1 chopps * must display the following acknowledgement:
15 1.1 chopps * This product includes software developed by Christian E. Hopps.
16 1.1 chopps * 4. The name of the author may not be used to endorse or promote products
17 1.1 chopps * derived from this software without specific prior written permission
18 1.1 chopps *
19 1.1 chopps * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 1.1 chopps * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 1.1 chopps * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 1.1 chopps * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 1.1 chopps * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 1.1 chopps * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 1.1 chopps * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 1.1 chopps * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 1.1 chopps * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 1.1 chopps * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 1.1 chopps *
30 1.3 chopps * $Id: grfabs_cc.c,v 1.3 1994/03/27 06:23:30 chopps Exp $
31 1.1 chopps *
32 1.1 chopps * abstract interface for custom chips to the amiga abstract graphics driver.
33 1.1 chopps *
34 1.1 chopps */
35 1.1 chopps
36 1.1 chopps #include <sys/param.h>
37 1.1 chopps #include <sys/errno.h>
38 1.1 chopps #include <sys/cdefs.h>
39 1.3 chopps #include <sys/queue.h>
40 1.1 chopps
41 1.1 chopps #include <amiga/amiga/custom.h>
42 1.1 chopps #include <amiga/amiga/cc.h>
43 1.1 chopps
44 1.1 chopps #include <amiga/dev/grfabs_reg.h>
45 1.1 chopps #include <amiga/dev/grfabs_ccreg.h>
46 1.1 chopps
47 1.1 chopps monitor_t *m_this;
48 1.1 chopps mdata_t *m_this_data;
49 1.1 chopps char *monitor_name = "CCMONITOR";
50 1.1 chopps monitor_t monitor;
51 1.1 chopps mdata_t monitor_data;
52 1.1 chopps cop_t *null_mode_copper_list;
53 1.1 chopps
54 1.1 chopps #if defined (GRF_PAL)
55 1.1 chopps # if defined (GRF_A2024)
56 1.1 chopps dmode_t pal_a2024_mode;
57 1.1 chopps dmdata_t pal_a2024_mode_data;
58 1.1 chopps cop_t *pal_a2024_frames[F_QD_TOTAL];
59 1.1 chopps u_char *hedley_init; /* init bitplane. */
60 1.1 chopps dmode_t *p24_this;
61 1.1 chopps dmdata_t *p24_this_data;
62 1.1 chopps
63 1.1 chopps dmode_t pal_hires_dlace_mode;
64 1.1 chopps dmdata_t pal_hires_dlace_mode_data;
65 1.1 chopps cop_t *pal_hires_dlace_frames[F_LACE_TOTAL];
66 1.1 chopps dmode_t *phdl_this;
67 1.1 chopps dmdata_t *phdl_this_data;
68 1.1 chopps # endif /* GRF_A2024 */
69 1.1 chopps
70 1.1 chopps dmode_t pal_hires_lace_mode;
71 1.1 chopps dmdata_t pal_hires_lace_mode_data;
72 1.1 chopps cop_t *pal_hires_lace_frames[F_LACE_TOTAL];
73 1.1 chopps dmode_t *phl_this;
74 1.1 chopps dmdata_t *phl_this_data;
75 1.1 chopps
76 1.1 chopps dmode_t pal_hires_mode;
77 1.1 chopps dmdata_t pal_hires_mode_data;
78 1.1 chopps cop_t *pal_hires_frames[F_TOTAL];
79 1.1 chopps dmode_t *ph_this;
80 1.1 chopps dmdata_t *ph_this_data;
81 1.1 chopps #endif /* PAL */
82 1.1 chopps
83 1.1 chopps #if defined (GRF_NTSC)
84 1.1 chopps # if defined (GRF_A2024)
85 1.1 chopps dmode_t a2024_mode;
86 1.1 chopps dmdata_t a2024_mode_data;
87 1.1 chopps cop_t *a2024_frames[F_QD_TOTAL];
88 1.1 chopps u_char *hedley_init; /* init bitplane. */
89 1.1 chopps dmode_t *a24_this;
90 1.1 chopps dmdata_t *a24_this_data;
91 1.1 chopps
92 1.1 chopps dmode_t hires_dlace_mode;
93 1.1 chopps dmdata_t hires_dlace_mode_data;
94 1.1 chopps cop_t *hires_dlace_frames[F_LACE_TOTAL];
95 1.1 chopps dmode_t *hdl_this;
96 1.1 chopps dmdata_t *hdl_this_data;
97 1.1 chopps # endif /* GRF_A2024 */
98 1.1 chopps
99 1.1 chopps dmode_t hires_lace_mode;
100 1.1 chopps dmdata_t hires_lace_mode_data;
101 1.1 chopps cop_t *hires_lace_frames[F_LACE_TOTAL];
102 1.1 chopps dmode_t *hl_this;
103 1.1 chopps dmdata_t *hl_this_data;
104 1.1 chopps
105 1.1 chopps void display_hires_view(view_t * v);
106 1.1 chopps dmode_t hires_mode;
107 1.1 chopps dmdata_t hires_mode_data;
108 1.1 chopps cop_t *hires_frames[F_TOTAL];
109 1.1 chopps dmode_t *h_this;
110 1.1 chopps dmdata_t *h_this_data;
111 1.1 chopps #endif /* GRF_NTSC */
112 1.1 chopps
113 1.1 chopps
114 1.1 chopps /* monitor functions. */
115 1.1 chopps monitor_t *
116 1.1 chopps cc_init_monitor()
117 1.1 chopps {
118 1.3 chopps cop_t *cp;
119 1.3 chopps
120 1.3 chopps if (m_this)
121 1.3 chopps return(m_this);
122 1.3 chopps
123 1.3 chopps cc_monitor = m_this = &monitor;
124 1.3 chopps /* turn sprite DMA off. we don't support them yet. */
125 1.3 chopps custom.dmacon = DMAF_SPRITE;
126 1.3 chopps
127 1.3 chopps m_this->name = monitor_name;
128 1.3 chopps m_this_data = m_this->data = &monitor_data;
129 1.3 chopps
130 1.3 chopps m_this->get_current_mode = get_current_mode;
131 1.3 chopps m_this->vbl_handler = (vbl_handler_func *) monitor_vbl_handler;
132 1.3 chopps m_this->get_next_mode = get_next_mode;
133 1.3 chopps m_this->get_best_mode = get_best_mode;
134 1.1 chopps
135 1.3 chopps m_this->alloc_bitmap = alloc_bitmap;
136 1.3 chopps m_this->free_bitmap = free_bitmap;
137 1.1 chopps
138 1.3 chopps m_this_data->current_mode = NULL;
139 1.3 chopps LIST_INIT(&m_this_data->modes);
140 1.1 chopps
141 1.3 chopps cp = null_mode_copper_list = alloc_chipmem(sizeof(cop_t) * 4);
142 1.3 chopps if (!cp)
143 1.3 chopps panic("no chipmem for grf.");
144 1.3 chopps
145 1.3 chopps CMOVE(cp, R_COLOR00, 0x0000); /* background is black */
146 1.3 chopps CMOVE(cp, R_BPLCON0, 0x0000); /* no planes to fetch from */
147 1.3 chopps CWAIT(cp, 255, 255); /* COPEND */
148 1.3 chopps CWAIT(cp, 255, 255); /* COPEND really */
149 1.1 chopps
150 1.3 chopps /* install m_this list and turn DMA on */
151 1.3 chopps custom.cop1lc = PREP_DMA_MEM(null_mode_copper_list);
152 1.3 chopps custom.copjmp1 = 0;
153 1.3 chopps custom.dmacon = DMAF_SETCLR | DMAF_MASTER | DMAF_RASTER \
154 1.3 chopps |DMAF_COPPER;
155 1.1 chopps
156 1.3 chopps cc_init_modes();
157 1.3 chopps LIST_INSERT_HEAD(monitors, m_this, link);
158 1.1 chopps return (m_this);
159 1.1 chopps }
160 1.1 chopps
161 1.1 chopps void
162 1.1 chopps monitor_vbl_handler(m)
163 1.1 chopps monitor_t *m;
164 1.1 chopps {
165 1.3 chopps dmdata_t *dmd;
166 1.3 chopps
167 1.3 chopps if (m_this_data->current_mode == NULL)
168 1.3 chopps return;
169 1.3 chopps
170 1.3 chopps dmd = DMDATA(m_this_data->current_mode);
171 1.3 chopps if (dmd)
172 1.3 chopps dmd->vbl_handler(m_this_data->current_mode);
173 1.1 chopps }
174 1.1 chopps
175 1.1 chopps dmode_t *
176 1.1 chopps get_current_mode()
177 1.1 chopps {
178 1.3 chopps if (m_this_data->current_mode)
179 1.3 chopps return(m_this_data->current_mode);
180 1.3 chopps else
181 1.3 chopps return(NULL);
182 1.1 chopps }
183 1.1 chopps
184 1.1 chopps dmode_t *
185 1.1 chopps get_next_mode(d)
186 1.1 chopps dmode_t *d;
187 1.1 chopps {
188 1.3 chopps if (d)
189 1.3 chopps return(d->link.le_next);
190 1.3 chopps return(m_this_data->modes.lh_first);
191 1.1 chopps }
192 1.1 chopps
193 1.1 chopps /* XXX needs to have more control attributes */
194 1.1 chopps dmode_t *
195 1.1 chopps get_best_mode(size, depth)
196 1.1 chopps dimen_t *size;
197 1.1 chopps u_char depth;
198 1.1 chopps {
199 1.3 chopps dmode_t *save;
200 1.3 chopps dmode_t *dm;
201 1.3 chopps long dt, dx, dy, ct;
202 1.3 chopps dmdata_t *dmd;
203 1.3 chopps
204 1.3 chopps save = NULL;
205 1.3 chopps dm = m_this_data->modes.lh_first;
206 1.3 chopps while (dm != NULL) {
207 1.3 chopps dmd = dm->data;
208 1.1 chopps if (depth > dmd->max_depth || depth < dmd->min_depth) {
209 1.3 chopps dm = dm->link.le_next;
210 1.1 chopps continue;
211 1.3 chopps } else if (size->width > dmd->max_size.width ||
212 1.1 chopps size->height > dmd->max_size.height) {
213 1.3 chopps dm = dm->link.le_next;
214 1.1 chopps continue;
215 1.3 chopps } else if (size->width < dmd->min_size.width ||
216 1.1 chopps size->height < dmd->min_size.height) {
217 1.3 chopps dm = dm->link.le_next;
218 1.1 chopps continue;
219 1.1 chopps }
220 1.3 chopps dx = abs(dm->nominal_size.width - size->width);
221 1.3 chopps dy = abs(dm->nominal_size.height - size->height);
222 1.1 chopps ct = dx + dy;
223 1.1 chopps
224 1.1 chopps if (ct < dt || save == NULL) {
225 1.3 chopps save = dm;
226 1.1 chopps dt = ct;
227 1.1 chopps }
228 1.3 chopps dm = dm->link.le_next;
229 1.1 chopps }
230 1.1 chopps return (save);
231 1.1 chopps }
232 1.1 chopps /* bitmap functions */
233 1.1 chopps bmap_t *
234 1.1 chopps alloc_bitmap(width, height, depth, flags)
235 1.1 chopps u_short width, height, depth, flags;
236 1.1 chopps {
237 1.1 chopps int i;
238 1.1 chopps u_long total_size;
239 1.1 chopps u_short lwpr = (width + 31) / 32;
240 1.1 chopps u_short wpr = lwpr << 1;
241 1.1 chopps u_short bpr = wpr << 1;
242 1.1 chopps u_short array_size = sizeof(u_char *) * depth;
243 1.1 chopps u_long plane_size = bpr * height;
244 1.1 chopps u_short temp_size = bpr + sizeof(u_long);
245 1.1 chopps bmap_t *bm;
246 1.1 chopps
247 1.1 chopps /* note the next allocation will give everything, also note that all
248 1.1 chopps * the stuff we want (including bitmaps) will be long short aligned.
249 1.1 chopps * M_This is a function of the data being allocated and the fact that
250 1.1 chopps * alloc_chipmem() returns long short aligned data. note also that
251 1.1 chopps * each row of the bitmap is long word aligned and made of exactly n
252 1.1 chopps * longwords. -ch */
253 1.1 chopps
254 1.1 chopps /* Sigh, it seems for mapping to work we need the bitplane data to 1:
255 1.1 chopps * be aligned on a page boundry. 2: be n pages large.
256 1.1 chopps *
257 1.1 chopps * why? becuase the user gets a page aligned address, if m_this is before
258 1.1 chopps * your allocation, too bad. Also it seems that the mapping routines
259 1.1 chopps * do not watch to closely to the allowable length. so if you go over
260 1.1 chopps * n pages by less than another page, the user gets to write all over
261 1.1 chopps * the entire page. Since you did not allocate up to a page boundry
262 1.1 chopps * (or more) the user writes into someone elses memory. -ch */
263 1.1 chopps total_size = amiga_round_page(plane_size * depth) + /* for length */
264 1.1 chopps (temp_size) + (array_size) + sizeof(bmap_t) +
265 1.1 chopps NBPG; /* for alignment */
266 1.1 chopps bm = alloc_chipmem(total_size);
267 1.1 chopps if (bm) {
268 1.1 chopps if (flags & BMF_CLEAR) {
269 1.1 chopps bzero(bm, total_size);
270 1.1 chopps }
271 1.1 chopps bm->bytes_per_row = bpr;
272 1.1 chopps bm->rows = height;
273 1.1 chopps bm->depth = depth;
274 1.1 chopps bm->flags = flags;
275 1.1 chopps bm->plane = (u_char **) & bm[1];
276 1.1 chopps bm->blit_temp = ((u_char *) bm->plane) + array_size;
277 1.1 chopps bm->plane[0] = (u_char *) amiga_round_page((u_long) (bm->blit_temp + temp_size));
278 1.1 chopps if (flags & BMF_INTERLEAVED) {
279 1.1 chopps bm->row_mod = bm->bytes_per_row * (depth - 1);
280 1.1 chopps for (i = 1; i < depth; i++) {
281 1.1 chopps bm->plane[i] = bm->plane[i - 1] + bpr;
282 1.1 chopps }
283 1.1 chopps } else {
284 1.1 chopps bm->row_mod = 0;
285 1.1 chopps for (i = 1; i < depth; i++) {
286 1.1 chopps bm->plane[i] = bm->plane[i - 1] + plane_size;
287 1.1 chopps }
288 1.1 chopps }
289 1.1 chopps bm->hardware_address = PREP_DMA_MEM(bm->plane[0]);
290 1.1 chopps return (bm);
291 1.1 chopps }
292 1.1 chopps return (NULL);
293 1.1 chopps }
294 1.1 chopps
295 1.1 chopps
296 1.1 chopps void
297 1.1 chopps free_bitmap(bm)
298 1.1 chopps bmap_t *bm;
299 1.1 chopps {
300 1.1 chopps if (bm)
301 1.1 chopps free_chipmem(bm);
302 1.1 chopps }
303 1.1 chopps /* load a new mode into the current display, if NULL shut display off. */
304 1.1 chopps void
305 1.1 chopps cc_load_mode(d)
306 1.1 chopps dmode_t *d;
307 1.1 chopps {
308 1.1 chopps if (d) {
309 1.1 chopps m_this_data->current_mode = d;
310 1.1 chopps return;
311 1.1 chopps }
312 1.1 chopps /* turn off display */
313 1.1 chopps m_this_data->current_mode = NULL;
314 1.1 chopps wait_tof();
315 1.1 chopps wait_tof();
316 1.1 chopps custom.cop1lc = PREP_DMA_MEM(null_mode_copper_list);
317 1.1 chopps }
318 1.1 chopps /*
319 1.1 chopps * CC Mode Stuff.
320 1.1 chopps */
321 1.1 chopps
322 1.1 chopps dmode_t *(*mode_init_funcs[]) (void) = {
323 1.1 chopps #if defined (GRF_NTSC)
324 1.1 chopps #if defined (GRF_A2024)
325 1.1 chopps cc_init_ntsc_a2024,
326 1.1 chopps cc_init_ntsc_hires_dlace,
327 1.1 chopps #endif /* GRF_A2024 */
328 1.1 chopps cc_init_ntsc_hires_lace,
329 1.1 chopps cc_init_ntsc_hires,
330 1.1 chopps #endif /* GRF_NTSC */
331 1.1 chopps #if defined (GRF_PAL)
332 1.1 chopps #if defined (GRF_A2024)
333 1.1 chopps cc_init_pal_a2024,
334 1.1 chopps cc_init_pal_hires_dlace,
335 1.1 chopps #endif /* GRF_A2024 */
336 1.1 chopps cc_init_pal_hires_lace,
337 1.1 chopps cc_init_pal_hires,
338 1.1 chopps #endif /* GRF_PAL */
339 1.1 chopps NULL
340 1.1 chopps };
341 1.1 chopps
342 1.1 chopps int
343 1.1 chopps cc_init_modes()
344 1.1 chopps {
345 1.1 chopps int i = 0;
346 1.1 chopps int error = 0;
347 1.1 chopps while (mode_init_funcs[i]) {
348 1.1 chopps mode_init_funcs[i] ();
349 1.1 chopps i++;
350 1.1 chopps }
351 1.1 chopps return (error);
352 1.1 chopps }
353 1.1 chopps
354 1.1 chopps monitor_t *
355 1.1 chopps cc_get_monitor(d)
356 1.1 chopps dmode_t *d;
357 1.1 chopps {
358 1.1 chopps return (DMDATA(d)->monitor);
359 1.1 chopps }
360 1.1 chopps
361 1.1 chopps view_t *
362 1.1 chopps cc_get_current_view(d)
363 1.1 chopps dmode_t *d;
364 1.1 chopps {
365 1.1 chopps return (DMDATA(d)->current_view);
366 1.1 chopps }
367 1.1 chopps
368 1.1 chopps
369 1.1 chopps view_t *
370 1.1 chopps cc_alloc_view(mode, dim, depth)
371 1.1 chopps dmode_t *mode;
372 1.1 chopps dimen_t *dim;
373 1.1 chopps u_char depth;
374 1.1 chopps {
375 1.1 chopps view_t *v = alloc_chipmem(sizeof(*v) + sizeof(vdata_t));
376 1.1 chopps if (v) {
377 1.1 chopps bmap_t *bm = cc_monitor->alloc_bitmap(dim->width, dim->height, depth, BMF_CLEAR);
378 1.1 chopps if (bm) {
379 1.1 chopps int i;
380 1.1 chopps box_t box;
381 1.1 chopps
382 1.1 chopps v->data = &v[1]; /* at the end of view */
383 1.1 chopps VDATA(v)->colormap = DMDATA(mode)->alloc_colormap(depth);
384 1.1 chopps if (VDATA(v)->colormap) {
385 1.1 chopps INIT_BOX(&box, 0, 0, dim->width, dim->height);
386 1.1 chopps cc_init_view(v, bm, mode, &box);
387 1.1 chopps return (v);
388 1.1 chopps }
389 1.1 chopps cc_monitor->free_bitmap(bm);
390 1.1 chopps }
391 1.1 chopps free_chipmem(v);
392 1.1 chopps }
393 1.1 chopps return (NULL);
394 1.1 chopps }
395 1.1 chopps
396 1.1 chopps colormap_t *
397 1.1 chopps cc_alloc_colormap(depth)
398 1.1 chopps int depth;
399 1.1 chopps {
400 1.1 chopps u_long size = 1U << depth, i;
401 1.1 chopps colormap_t *cm = alloc_chipmem(sizeof(u_long) * size + sizeof(*cm));
402 1.1 chopps
403 1.1 chopps if (cm) {
404 1.1 chopps cm->type = CM_COLOR;
405 1.1 chopps cm->red_mask = 0x0F;
406 1.1 chopps cm->green_mask = 0x0F;
407 1.1 chopps cm->blue_mask = 0x0F;
408 1.1 chopps cm->first = 0;
409 1.1 chopps cm->size = size;
410 1.1 chopps cm->entry = (u_long *) & cm[1]; /* table directly after. */
411 1.1 chopps for (i = 0; i < min(size, 32); i++) {
412 1.1 chopps cm->entry[i] = CM_WTOL(cc_default_colors[i]);
413 1.1 chopps }
414 1.1 chopps return (cm);
415 1.1 chopps }
416 1.1 chopps return (NULL);
417 1.1 chopps }
418 1.1 chopps
419 1.1 chopps int
420 1.1 chopps cc_colormap_checkvals(vcm, cm, use)
421 1.1 chopps colormap_t *vcm, *cm;
422 1.1 chopps int use;
423 1.1 chopps {
424 1.1 chopps if (use) {
425 1.1 chopps /* check to see if its the view's colormap, if so just do
426 1.1 chopps * update. */
427 1.1 chopps if (vcm != cm) {
428 1.1 chopps if (cm->first >= vcm->size || (cm->first + cm->size) > (cm->first + vcm->size) ||
429 1.1 chopps cm->type != vcm->type) {
430 1.1 chopps return (0);
431 1.1 chopps }
432 1.1 chopps switch (vcm->type) {
433 1.1 chopps case CM_COLOR:
434 1.1 chopps if (cm->red_mask != vcm->red_mask ||
435 1.1 chopps cm->green_mask != vcm->green_mask ||
436 1.1 chopps cm->blue_mask != vcm->blue_mask) {
437 1.1 chopps return (0);
438 1.1 chopps }
439 1.1 chopps break;
440 1.1 chopps case CM_GREYSCALE:
441 1.1 chopps if (cm->grey_mask != vcm->grey_mask) {
442 1.1 chopps return (0);
443 1.1 chopps }
444 1.1 chopps break;
445 1.1 chopps }
446 1.1 chopps }
447 1.1 chopps } else {
448 1.1 chopps if (cm->first >= vcm->size || (cm->first + cm->size) > (cm->first + vcm->size)) {
449 1.1 chopps return (0);
450 1.1 chopps }
451 1.1 chopps }
452 1.1 chopps return (1);
453 1.1 chopps }
454 1.1 chopps /* does sanity check on values */
455 1.1 chopps int
456 1.1 chopps cc_get_colormap(v, cm)
457 1.1 chopps view_t *v;
458 1.1 chopps colormap_t *cm;
459 1.1 chopps {
460 1.1 chopps colormap_t *vcm = VDATA(v)->colormap;
461 1.1 chopps int i;
462 1.1 chopps
463 1.1 chopps if (!cc_colormap_checkvals(vcm, cm, 0)) {
464 1.1 chopps return (EINVAL);
465 1.1 chopps }
466 1.1 chopps cm->type = vcm->type;
467 1.1 chopps
468 1.1 chopps switch (vcm->type) {
469 1.1 chopps case CM_COLOR:
470 1.1 chopps cm->red_mask = vcm->red_mask;
471 1.1 chopps cm->green_mask = vcm->green_mask;
472 1.1 chopps cm->blue_mask = vcm->blue_mask;
473 1.1 chopps break;
474 1.1 chopps case CM_GREYSCALE:
475 1.1 chopps cm->grey_mask = vcm->grey_mask;
476 1.1 chopps break;
477 1.1 chopps }
478 1.1 chopps
479 1.1 chopps /* copy entries into colormap. */
480 1.1 chopps for (i = cm->first; i < (cm->first + cm->size); i++) {
481 1.1 chopps cm->entry[i] = vcm->entry[i];
482 1.1 chopps }
483 1.1 chopps return (0);
484 1.1 chopps }
485 1.1 chopps
486 1.1 chopps /* does sanity check on values */
487 1.1 chopps int
488 1.1 chopps cc_use_colormap(v, cm)
489 1.1 chopps view_t *v;
490 1.1 chopps colormap_t *cm;
491 1.1 chopps {
492 1.1 chopps colormap_t *vcm = VDATA(v)->colormap;
493 1.1 chopps int s, i;
494 1.1 chopps
495 1.1 chopps if (!cc_colormap_checkvals(vcm, cm, 1)) {
496 1.1 chopps return (EINVAL);
497 1.1 chopps }
498 1.1 chopps /* check to see if its the view's colormap, if so just do update. */
499 1.1 chopps if (vcm != cm) {
500 1.1 chopps /* copy entries into colormap. */
501 1.1 chopps for (i = cm->first; i < (cm->first + cm->size); i++) {
502 1.1 chopps vcm->entry[i] = cm->entry[i];
503 1.1 chopps }
504 1.1 chopps }
505 1.1 chopps s = spltty();
506 1.1 chopps
507 1.1 chopps /* is view currently being displayed? */
508 1.1 chopps if (VDATA(v)->flags & VF_DISPLAY) {
509 1.1 chopps /* yes, update the copper lists */
510 1.1 chopps cop_t *tmp, *cp;
511 1.1 chopps int nframes = 1, j;
512 1.1 chopps
513 1.1 chopps if (DMDATA(VDATA(v)->mode)->flags & DMF_INTERLACE) {
514 1.1 chopps nframes = 2;
515 1.1 chopps }
516 1.1 chopps for (i = 0; i < nframes; i++) {
517 1.1 chopps cp = DMDATA(VDATA(v)->mode)->frames[i];
518 1.1 chopps
519 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COLOR07));
520 1.1 chopps tmp -= 7;
521 1.1 chopps
522 1.1 chopps for (j = 0; j < 16; j++) {
523 1.1 chopps CMOVE(tmp, R_COLOR00 + (j << 1), CM_LTOW(vcm->entry[j]));
524 1.1 chopps }
525 1.1 chopps }
526 1.1 chopps }
527 1.1 chopps splx(s);
528 1.1 chopps return (0);
529 1.1 chopps }
530 1.1 chopps #if defined (GRF_A2024)
531 1.1 chopps colormap_t *
532 1.1 chopps cc_a2024_alloc_colormap(depth)
533 1.1 chopps int depth;
534 1.1 chopps {
535 1.1 chopps u_long size = 1U << depth, i;
536 1.1 chopps colormap_t *cm = alloc_chipmem(sizeof(u_long) * size + sizeof(*cm));
537 1.1 chopps
538 1.1 chopps if (cm) {
539 1.1 chopps cm->type = CM_GREYSCALE;
540 1.1 chopps cm->grey_mask = 0x03;
541 1.1 chopps cm->first = 0;
542 1.1 chopps cm->size = size;
543 1.1 chopps cm->entry = (u_long *) & cm[1]; /* table directly after. */
544 1.1 chopps for (i = 0; i < size; i++) {
545 1.1 chopps cm->entry[i] = CM_WTOL(cc_a2024_default_colors[i]);
546 1.1 chopps }
547 1.1 chopps return (cm);
548 1.1 chopps }
549 1.1 chopps return (NULL);
550 1.1 chopps }
551 1.1 chopps
552 1.1 chopps int
553 1.1 chopps cc_a2024_get_colormap(v, cm)
554 1.1 chopps view_t *v;
555 1.1 chopps colormap_t *cm;
556 1.1 chopps {
557 1.1 chopps /* there are no differences (yet) in the way the cm's are stored */
558 1.1 chopps return (cc_get_colormap(v, cm));
559 1.1 chopps }
560 1.1 chopps
561 1.1 chopps int
562 1.1 chopps cc_a2024_use_colormap(v, cm)
563 1.1 chopps view_t *v;
564 1.1 chopps colormap_t *cm;
565 1.1 chopps {
566 1.1 chopps colormap_t *vcm = VDATA(v)->colormap;
567 1.1 chopps int s, i;
568 1.1 chopps
569 1.1 chopps if (!cc_colormap_checkvals(vcm, cm, 1)) {
570 1.1 chopps return (EINVAL);
571 1.1 chopps }
572 1.1 chopps /* check to see if its the view's colormap, if so just do update. */
573 1.1 chopps if (vcm != cm) {
574 1.1 chopps /* copy entries into colormap. */
575 1.1 chopps for (i = cm->first; i < (cm->first + cm->size); i++) {
576 1.1 chopps vcm->entry[i] = cm->entry[i];
577 1.1 chopps }
578 1.1 chopps }
579 1.1 chopps s = spltty();
580 1.1 chopps
581 1.1 chopps /* is view currently being displayed? */
582 1.1 chopps if (VDATA(v)->flags & VF_DISPLAY) {
583 1.1 chopps /* yes, update the copper lists */
584 1.1 chopps cop_t *tmp, *cp;
585 1.1 chopps int nframes = 2, nregs = cm->size == 4 ? 16 : 8, j;
586 1.1 chopps
587 1.1 chopps if (DMDATA(VDATA(v)->mode)->flags & DMF_HEDLEY_EXP) {
588 1.1 chopps nframes = 4;
589 1.1 chopps }
590 1.1 chopps for (i = 0; i < nframes; i++) {
591 1.1 chopps cp = DMDATA(VDATA(v)->mode)->frames[i];
592 1.1 chopps
593 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COLOR07));
594 1.1 chopps tmp -= 7;
595 1.1 chopps
596 1.1 chopps for (j = 0; j < nregs; j++) {
597 1.1 chopps CMOVE(tmp, R_COLOR00 + (j << 1), A2024_CM_TO_CR(vcm, j));
598 1.1 chopps }
599 1.1 chopps }
600 1.1 chopps }
601 1.1 chopps splx(s);
602 1.1 chopps return (0);
603 1.1 chopps }
604 1.1 chopps #endif /* GRF_A2024 */
605 1.1 chopps
606 1.1 chopps
607 1.1 chopps /*
608 1.1 chopps * CC View stuff.
609 1.1 chopps */
610 1.1 chopps
611 1.1 chopps void
612 1.1 chopps cc_init_view(v, bm, mode, dbox)
613 1.1 chopps view_t *v;
614 1.1 chopps bmap_t *bm;
615 1.1 chopps dmode_t *mode;
616 1.1 chopps box_t *dbox;
617 1.1 chopps {
618 1.1 chopps vdata_t *vd = VDATA(v);
619 1.1 chopps v->bitmap = bm;
620 1.1 chopps vd->mode = mode;
621 1.1 chopps bcopy(dbox, &v->display, sizeof(box_t));
622 1.1 chopps
623 1.1 chopps v->display_view = DMDATA(vd->mode)->display_view;
624 1.1 chopps v->use_colormap = DMDATA(vd->mode)->use_colormap;
625 1.1 chopps v->get_colormap = DMDATA(vd->mode)->get_colormap;
626 1.1 chopps v->free_view = cc_free_view;
627 1.1 chopps v->get_display_mode = cc_get_display_mode;
628 1.1 chopps v->remove_view = cc_remove_view;
629 1.1 chopps }
630 1.1 chopps
631 1.1 chopps void
632 1.1 chopps cc_free_view(v)
633 1.1 chopps view_t *v;
634 1.1 chopps {
635 1.1 chopps if (v) {
636 1.1 chopps vdata_t *vd = VDATA(v);
637 1.1 chopps dmode_t *md = vd->mode;
638 1.1 chopps v->remove_view(v);
639 1.1 chopps cc_monitor->free_bitmap(v->bitmap);
640 1.1 chopps free_chipmem(v);
641 1.1 chopps }
642 1.1 chopps }
643 1.1 chopps
644 1.1 chopps void
645 1.1 chopps cc_remove_view(v)
646 1.1 chopps view_t *v;
647 1.1 chopps {
648 1.1 chopps dmode_t *mode = VDATA(v)->mode;
649 1.1 chopps
650 1.1 chopps if (MDATA(cc_monitor)->current_mode == mode) {
651 1.1 chopps if (DMDATA(mode)->current_view == v) {
652 1.1 chopps cc_load_mode(NULL);
653 1.1 chopps }
654 1.1 chopps }
655 1.1 chopps if (DMDATA(mode)->current_view == v) {
656 1.1 chopps DMDATA(mode)->current_view = NULL;
657 1.1 chopps }
658 1.1 chopps VDATA(v)->flags &= ~VF_DISPLAY;
659 1.1 chopps }
660 1.1 chopps
661 1.1 chopps dmode_t *
662 1.1 chopps cc_get_display_mode(v)
663 1.1 chopps view_t *v;
664 1.1 chopps {
665 1.1 chopps return (VDATA(v)->mode);
666 1.1 chopps }
667 1.1 chopps
668 1.1 chopps void
669 1.1 chopps cc_mode_vbl_handler(d)
670 1.1 chopps dmode_t *d;
671 1.1 chopps {
672 1.1 chopps u_short vp = ((custom.vposr & 0x0007) << 8) | ((custom.vhposr) >> 8);
673 1.1 chopps
674 1.1 chopps if (vp < 12) {
675 1.2 chopps custom.cop1lc = PREP_DMA_MEM(DMDATA(d)->frames[F_LONG]);
676 1.1 chopps custom.copjmp1 = 0;
677 1.1 chopps }
678 1.1 chopps }
679 1.1 chopps
680 1.1 chopps void
681 1.1 chopps cc_lace_mode_vbl_handler(d)
682 1.1 chopps dmode_t *d;
683 1.1 chopps {
684 1.1 chopps u_short vp = ((custom.vposr & 0x0007) << 8) | ((custom.vhposr) >> 8);
685 1.1 chopps
686 1.1 chopps if (vp < 12) {
687 1.1 chopps if (custom.vposr & 0x8000) {
688 1.1 chopps custom.cop1lc = PREP_DMA_MEM(DMDATA(d)->frames[F_LACE_LONG]);
689 1.1 chopps } else {
690 1.1 chopps custom.cop1lc = PREP_DMA_MEM(DMDATA(d)->frames[F_LACE_SHORT]);
691 1.1 chopps }
692 1.1 chopps custom.copjmp1 = 0;
693 1.1 chopps }
694 1.1 chopps }
695 1.1 chopps
696 1.1 chopps /*
697 1.1 chopps * Modes. (ick)
698 1.1 chopps */
699 1.1 chopps
700 1.1 chopps /*
701 1.1 chopps * NTSC Modes
702 1.1 chopps */
703 1.1 chopps
704 1.1 chopps #if defined (GRF_NTSC)
705 1.1 chopps
706 1.1 chopps dmode_t *
707 1.1 chopps cc_init_ntsc_hires()
708 1.1 chopps {
709 1.1 chopps /* h_this function should only be called once. */
710 1.1 chopps if (!h_this) {
711 1.1 chopps u_short len = std_copper_list_len;
712 1.1 chopps cop_t *cp;
713 1.1 chopps
714 1.1 chopps h_this = &hires_mode;
715 1.1 chopps h_this_data = &hires_mode_data;
716 1.1 chopps bzero(h_this, sizeof(dmode_t));
717 1.1 chopps bzero(h_this_data, sizeof(dmdata_t));
718 1.1 chopps
719 1.1 chopps h_this->name = "ntsc: hires interlace";
720 1.1 chopps h_this->nominal_size.width = 640;
721 1.1 chopps h_this->nominal_size.height = 200;
722 1.1 chopps h_this_data->max_size.width = 724;
723 1.1 chopps h_this_data->max_size.height = 242;
724 1.1 chopps h_this_data->min_size.width = 320;
725 1.1 chopps h_this_data->min_size.height = 100;
726 1.1 chopps h_this_data->min_depth = 1;
727 1.1 chopps h_this_data->max_depth = 4;
728 1.1 chopps h_this->data = h_this_data;
729 1.1 chopps
730 1.1 chopps h_this->get_monitor = cc_get_monitor;
731 1.1 chopps h_this->alloc_view = cc_alloc_view;
732 1.1 chopps h_this->get_current_view = cc_get_current_view;
733 1.1 chopps
734 1.1 chopps h_this_data->use_colormap = cc_use_colormap;
735 1.1 chopps h_this_data->get_colormap = cc_get_colormap;
736 1.1 chopps h_this_data->alloc_colormap = cc_alloc_colormap;
737 1.1 chopps h_this_data->display_view = display_hires_view;
738 1.1 chopps h_this_data->monitor = cc_monitor;
739 1.1 chopps
740 1.1 chopps h_this_data->frames = hires_frames;
741 1.1 chopps h_this_data->frames[F_LONG] = alloc_chipmem(std_copper_list_size * F_TOTAL);
742 1.1 chopps if (!h_this_data->frames[F_LONG]) {
743 1.1 chopps panic("couldn't get chipmem for copper list");
744 1.1 chopps }
745 1.1 chopps h_this_data->frames[F_STORE_LONG] = &h_this_data->frames[F_LONG][len];
746 1.1 chopps
747 1.1 chopps bcopy(std_copper_list, h_this_data->frames[F_STORE_LONG], std_copper_list_size);
748 1.1 chopps bcopy(std_copper_list, h_this_data->frames[F_LONG], std_copper_list_size);
749 1.1 chopps
750 1.1 chopps h_this_data->bplcon0 = 0x8200 | USE_CON3; /* hires, color
751 1.1 chopps * composite enable,
752 1.1 chopps * lace. */
753 1.1 chopps h_this_data->std_start_x = STANDARD_VIEW_X;
754 1.1 chopps h_this_data->std_start_y = STANDARD_VIEW_Y;
755 1.1 chopps h_this_data->vbl_handler = (vbl_handler_func *) cc_mode_vbl_handler;
756 1.1 chopps #if defined (GRF_ECS)
757 1.1 chopps h_this_data->beamcon0 = STANDARD_NTSC_BEAMCON;
758 1.1 chopps #endif
759 1.1 chopps
760 1.3 chopps LIST_INSERT_HEAD(&MDATA(cc_monitor)->modes, h_this, link);
761 1.1 chopps }
762 1.1 chopps return (h_this);
763 1.1 chopps }
764 1.1 chopps
765 1.1 chopps void
766 1.1 chopps display_hires_view(v)
767 1.1 chopps view_t *v;
768 1.1 chopps {
769 1.1 chopps if (h_this_data->current_view != v) {
770 1.1 chopps vdata_t *vd = VDATA(v);
771 1.1 chopps monitor_t *monitor = h_this_data->monitor;
772 1.1 chopps cop_t *cp = h_this_data->frames[F_STORE_LONG], *tmp;
773 1.1 chopps int depth = v->bitmap->depth, i;
774 1.1 chopps int hstart, hstop, vstart, vstop, j;
775 1.1 chopps int x, y, w = v->display.width, h = v->display.height;
776 1.1 chopps u_short ddfstart, ddfwidth, con1;
777 1.1 chopps
778 1.1 chopps /* round down to nearest even width */
779 1.1 chopps /* w &= 0xfffe; */
780 1.1 chopps /* calculate datafetch width. */
781 1.1 chopps
782 1.1 chopps ddfwidth = ((v->bitmap->bytes_per_row >> 1) - 2) << 2;
783 1.1 chopps
784 1.1 chopps /* H_This will center the any overscanned display */
785 1.1 chopps /* and allow user to modify. */
786 1.1 chopps x = v->display.x + h_this_data->std_start_x - ((w - 640) >> 2);
787 1.1 chopps y = v->display.y + h_this_data->std_start_y - ((h - 200) >> 1);
788 1.1 chopps
789 1.1 chopps if (y & 1)
790 1.1 chopps y--;
791 1.1 chopps
792 1.1 chopps if (!(x & 1))
793 1.1 chopps x--;
794 1.1 chopps
795 1.1 chopps hstart = x;
796 1.1 chopps hstop = x + (w >> 1);
797 1.1 chopps vstart = y;
798 1.1 chopps vstop = y + h;
799 1.1 chopps ddfstart = (hstart - 9) >> 1;
800 1.1 chopps
801 1.1 chopps /* check for hardware limits, AGA may allow more..? */
802 1.1 chopps /* anyone got a 4000 I can borrow :^) -ch */
803 1.1 chopps if ((ddfstart & 0xfffc) + ddfwidth > 0xd8) {
804 1.1 chopps int d = 0;
805 1.1 chopps
806 1.1 chopps /* XXX anyone know the equality properties of
807 1.1 chopps * intermixed logial AND's */
808 1.1 chopps /* XXX and arithmetic operators? */
809 1.1 chopps while (((ddfstart & 0xfffc) + ddfwidth - d) > 0xd8) {
810 1.1 chopps d++;
811 1.1 chopps }
812 1.1 chopps
813 1.1 chopps ddfstart -= d;
814 1.1 chopps hstart -= d << 1;
815 1.1 chopps hstop -= d << 1;
816 1.1 chopps }
817 1.1 chopps /* correct the datafetch to proper limits. */
818 1.1 chopps /* delay the actual display of the data until we need it. */
819 1.1 chopps ddfstart &= 0xfffc;
820 1.1 chopps con1 = ((hstart - 9) - (ddfstart << 1)) | (((hstart - 9) - (ddfstart << 1)) << 4);
821 1.1 chopps
822 1.1 chopps if (h_this_data->current_view) {
823 1.1 chopps VDATA(h_this_data->current_view)->flags &= ~VF_DISPLAY; /* mark as no longer */
824 1.1 chopps /* displayed. */
825 1.1 chopps }
826 1.1 chopps h_this_data->current_view = v;
827 1.1 chopps
828 1.1 chopps cp = h_this_data->frames[F_STORE_LONG];
829 1.1 chopps #if defined GRF_ECS
830 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BEAMCON0));
831 1.1 chopps tmp->cp.inst.operand = h_this_data->beamcon0;
832 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWHIGH));
833 1.1 chopps tmp->cp.inst.operand = CALC_DIWHIGH(hstart, vstart, hstop, vstop);
834 1.1 chopps #endif /* ECS */
835 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON0));
836 1.1 chopps tmp->cp.inst.operand = h_this_data->bplcon0 | ((depth & 0x7) << 12);
837 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON1));
838 1.1 chopps tmp->cp.inst.operand = con1;
839 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTART));
840 1.1 chopps tmp->cp.inst.operand = ((vstart & 0xff) << 8) | (hstart & 0xff);
841 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTOP));
842 1.1 chopps tmp->cp.inst.operand = ((vstop & 0xff) << 8) | (hstop & 0xff);
843 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTART));
844 1.1 chopps tmp->cp.inst.operand = ddfstart;
845 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTOP));
846 1.1 chopps tmp->cp.inst.operand = ddfstart + ddfwidth;
847 1.1 chopps
848 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL0PTH));
849 1.1 chopps for (i = 0, j = 0; i < depth; j += 2, i++) {
850 1.1 chopps /* update the plane pointers */
851 1.1 chopps tmp[j].cp.inst.operand = HIADDR(PREP_DMA_MEM(v->bitmap->plane[i]));
852 1.1 chopps tmp[j + 1].cp.inst.operand = LOADDR(PREP_DMA_MEM(v->bitmap->plane[i]));
853 1.1 chopps }
854 1.1 chopps
855 1.1 chopps /* set mods correctly. */
856 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL1MOD));
857 1.1 chopps tmp[0].cp.inst.operand = v->bitmap->row_mod;
858 1.1 chopps tmp[1].cp.inst.operand = v->bitmap->row_mod;
859 1.1 chopps
860 1.1 chopps /* set next pointers correctly */
861 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COP1LCH));
862 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(h_this_data->frames[F_STORE_LONG]));
863 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(h_this_data->frames[F_STORE_LONG]));
864 1.1 chopps
865 1.1 chopps cp = h_this_data->frames[F_LONG];
866 1.1 chopps h_this_data->frames[F_LONG] = h_this_data->frames[F_STORE_LONG];
867 1.1 chopps h_this_data->frames[F_STORE_LONG] = cp;
868 1.1 chopps
869 1.1 chopps vd->flags |= VF_DISPLAY;
870 1.1 chopps
871 1.1 chopps cc_use_colormap(v, vd->colormap);
872 1.1 chopps }
873 1.1 chopps cc_load_mode(h_this);
874 1.1 chopps }
875 1.1 chopps
876 1.1 chopps dmode_t *
877 1.1 chopps cc_init_ntsc_hires_lace()
878 1.1 chopps {
879 1.1 chopps /* hl_this function should only be called once. */
880 1.1 chopps if (!hl_this) {
881 1.1 chopps u_short len = std_copper_list_len;
882 1.1 chopps cop_t *cp;
883 1.1 chopps
884 1.1 chopps hl_this = &hires_lace_mode;
885 1.1 chopps hl_this_data = &hires_lace_mode_data;
886 1.1 chopps bzero(hl_this, sizeof(dmode_t));
887 1.1 chopps bzero(hl_this_data, sizeof(dmdata_t));
888 1.1 chopps
889 1.1 chopps hl_this->name = "ntsc: hires interlace";
890 1.1 chopps hl_this->nominal_size.width = 640;
891 1.1 chopps hl_this->nominal_size.height = 400;
892 1.1 chopps hl_this_data->max_size.width = 724;
893 1.1 chopps hl_this_data->max_size.height = 482;
894 1.1 chopps hl_this_data->min_size.width = 320;
895 1.1 chopps hl_this_data->min_size.height = 200;
896 1.1 chopps hl_this_data->min_depth = 1;
897 1.1 chopps hl_this_data->max_depth = 4;
898 1.1 chopps hl_this->data = hl_this_data;
899 1.1 chopps
900 1.1 chopps hl_this->get_monitor = cc_get_monitor;
901 1.1 chopps hl_this->alloc_view = cc_alloc_view;
902 1.1 chopps hl_this->get_current_view = cc_get_current_view;
903 1.1 chopps
904 1.1 chopps hl_this_data->use_colormap = cc_use_colormap;
905 1.1 chopps hl_this_data->get_colormap = cc_get_colormap;
906 1.1 chopps hl_this_data->alloc_colormap = cc_alloc_colormap;
907 1.1 chopps hl_this_data->display_view = display_hires_lace_view;
908 1.1 chopps hl_this_data->monitor = cc_monitor;
909 1.1 chopps
910 1.1 chopps hl_this_data->flags |= DMF_INTERLACE;
911 1.1 chopps
912 1.1 chopps hl_this_data->frames = hires_lace_frames;
913 1.1 chopps hl_this_data->frames[F_LACE_LONG] = alloc_chipmem(std_copper_list_size * F_LACE_TOTAL);
914 1.1 chopps if (!hl_this_data->frames[F_LACE_LONG]) {
915 1.1 chopps panic("couldn't get chipmem for copper list");
916 1.1 chopps }
917 1.1 chopps hl_this_data->frames[F_LACE_SHORT] = &hl_this_data->frames[F_LACE_LONG][len];
918 1.1 chopps hl_this_data->frames[F_LACE_STORE_LONG] = &hl_this_data->frames[F_LACE_SHORT][len];
919 1.1 chopps hl_this_data->frames[F_LACE_STORE_SHORT] = &hl_this_data->frames[F_LACE_STORE_LONG][len];
920 1.1 chopps
921 1.1 chopps bcopy(std_copper_list, hl_this_data->frames[F_LACE_STORE_LONG], std_copper_list_size);
922 1.1 chopps bcopy(std_copper_list, hl_this_data->frames[F_LACE_STORE_SHORT], std_copper_list_size);
923 1.1 chopps bcopy(std_copper_list, hl_this_data->frames[F_LACE_LONG], std_copper_list_size);
924 1.1 chopps bcopy(std_copper_list, hl_this_data->frames[F_LACE_SHORT], std_copper_list_size);
925 1.1 chopps
926 1.1 chopps hl_this_data->bplcon0 = 0x8204 | USE_CON3; /* hires, color
927 1.1 chopps * composite enable,
928 1.1 chopps * lace. */
929 1.1 chopps hl_this_data->std_start_x = STANDARD_VIEW_X;
930 1.1 chopps hl_this_data->std_start_y = STANDARD_VIEW_Y;
931 1.1 chopps hl_this_data->vbl_handler = (vbl_handler_func *) cc_lace_mode_vbl_handler;
932 1.1 chopps #if defined (GRF_ECS)
933 1.1 chopps hl_this_data->beamcon0 = STANDARD_NTSC_BEAMCON;
934 1.1 chopps #endif
935 1.1 chopps
936 1.3 chopps LIST_INSERT_HEAD(&MDATA(cc_monitor)->modes, hl_this, link);
937 1.1 chopps }
938 1.1 chopps return (hl_this);
939 1.1 chopps }
940 1.1 chopps
941 1.1 chopps void
942 1.1 chopps display_hires_lace_view(v)
943 1.1 chopps view_t *v;
944 1.1 chopps {
945 1.1 chopps if (hl_this_data->current_view != v) {
946 1.1 chopps vdata_t *vd = VDATA(v);
947 1.1 chopps monitor_t *monitor = hl_this_data->monitor;
948 1.1 chopps cop_t *cp = hl_this_data->frames[F_LACE_STORE_LONG], *tmp;
949 1.1 chopps int depth = v->bitmap->depth, i;
950 1.1 chopps int hstart, hstop, vstart, vstop, j;
951 1.1 chopps int x, y, w = v->display.width, h = v->display.height;
952 1.1 chopps u_short ddfstart, ddfwidth, con1;
953 1.1 chopps
954 1.1 chopps /* round down to nearest even width */
955 1.1 chopps /* w &= 0xfffe; */
956 1.1 chopps
957 1.1 chopps
958 1.1 chopps /* calculate datafetch width. */
959 1.1 chopps
960 1.1 chopps ddfwidth = ((v->bitmap->bytes_per_row >> 1) - 2) << 2;
961 1.1 chopps
962 1.1 chopps /* Hl_This will center the any overscanned display */
963 1.1 chopps /* and allow user to modify. */
964 1.1 chopps x = v->display.x + hl_this_data->std_start_x - ((w - 640) >> 2);
965 1.1 chopps y = v->display.y + hl_this_data->std_start_y - ((h - 400) >> 2);
966 1.1 chopps
967 1.1 chopps if (y & 1)
968 1.1 chopps y--;
969 1.1 chopps
970 1.1 chopps if (!(x & 1))
971 1.1 chopps x--;
972 1.1 chopps
973 1.1 chopps hstart = x;
974 1.1 chopps hstop = x + (w >> 1);
975 1.1 chopps vstart = y;
976 1.1 chopps vstop = y + (h >> 1);
977 1.1 chopps ddfstart = (hstart - 9) >> 1;
978 1.1 chopps
979 1.1 chopps /* check for hardware limits, AGA may allow more..? */
980 1.1 chopps /* anyone got a 4000 I can borrow :^) -ch */
981 1.1 chopps if ((ddfstart & 0xfffc) + ddfwidth > 0xd8) {
982 1.1 chopps int d = 0;
983 1.1 chopps
984 1.1 chopps /* XXX anyone know the equality properties of
985 1.1 chopps * intermixed logial AND's */
986 1.1 chopps /* XXX and arithmetic operators? */
987 1.1 chopps while (((ddfstart & 0xfffc) + ddfwidth - d) > 0xd8) {
988 1.1 chopps d++;
989 1.1 chopps }
990 1.1 chopps
991 1.1 chopps ddfstart -= d;
992 1.1 chopps hstart -= d << 1;
993 1.1 chopps hstop -= d << 1;
994 1.1 chopps }
995 1.1 chopps /* correct the datafetch to proper limits. */
996 1.1 chopps /* delay the actual display of the data until we need it. */
997 1.1 chopps ddfstart &= 0xfffc;
998 1.1 chopps con1 = ((hstart - 9) - (ddfstart << 1)) | (((hstart - 9) - (ddfstart << 1)) << 4);
999 1.1 chopps
1000 1.1 chopps if (hl_this_data->current_view) {
1001 1.1 chopps VDATA(hl_this_data->current_view)->flags &= ~VF_DISPLAY; /* mark as no longer */
1002 1.1 chopps /* displayed. */
1003 1.1 chopps }
1004 1.1 chopps hl_this_data->current_view = v;
1005 1.1 chopps
1006 1.1 chopps cp = hl_this_data->frames[F_LACE_STORE_LONG];
1007 1.1 chopps #if defined GRF_ECS
1008 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BEAMCON0));
1009 1.1 chopps tmp->cp.inst.operand = hl_this_data->beamcon0;
1010 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWHIGH));
1011 1.1 chopps tmp->cp.inst.operand = CALC_DIWHIGH(hstart, vstart, hstop, vstop);
1012 1.1 chopps #endif /* ECS */
1013 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON0));
1014 1.1 chopps tmp->cp.inst.operand = hl_this_data->bplcon0 | ((depth & 0x7) << 12);
1015 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON1));
1016 1.1 chopps tmp->cp.inst.operand = con1;
1017 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTART));
1018 1.1 chopps tmp->cp.inst.operand = ((vstart & 0xff) << 8) | (hstart & 0xff);
1019 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTOP));
1020 1.1 chopps tmp->cp.inst.operand = ((vstop & 0xff) << 8) | (hstop & 0xff);
1021 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTART));
1022 1.1 chopps tmp->cp.inst.operand = ddfstart;
1023 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTOP));
1024 1.1 chopps tmp->cp.inst.operand = ddfstart + ddfwidth;
1025 1.1 chopps
1026 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL0PTH));
1027 1.1 chopps for (i = 0, j = 0; i < depth; j += 2, i++) {
1028 1.1 chopps /* update the plane pointers */
1029 1.1 chopps tmp[j].cp.inst.operand = HIADDR(PREP_DMA_MEM(v->bitmap->plane[i]));
1030 1.1 chopps tmp[j + 1].cp.inst.operand = LOADDR(PREP_DMA_MEM(v->bitmap->plane[i]));
1031 1.1 chopps }
1032 1.1 chopps
1033 1.1 chopps /* set mods correctly. */
1034 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL1MOD));
1035 1.1 chopps tmp[0].cp.inst.operand = v->bitmap->bytes_per_row + v->bitmap->row_mod;
1036 1.1 chopps tmp[1].cp.inst.operand = v->bitmap->bytes_per_row + v->bitmap->row_mod;
1037 1.1 chopps
1038 1.1 chopps /* set next pointers correctly */
1039 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COP1LCH));
1040 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(hl_this_data->frames[F_LACE_STORE_SHORT]));
1041 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(hl_this_data->frames[F_LACE_STORE_SHORT]));
1042 1.1 chopps
1043 1.1 chopps
1044 1.1 chopps bcopy(hl_this_data->frames[F_LACE_STORE_LONG], hl_this_data->frames[F_LACE_STORE_SHORT], std_copper_list_size);
1045 1.1 chopps
1046 1.1 chopps /* these are the only ones that are different from long frame. */
1047 1.1 chopps cp = hl_this_data->frames[F_LACE_STORE_SHORT];
1048 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL0PTH));
1049 1.1 chopps for (i = 0, j = 0; i < depth; j += 2, i++) {
1050 1.1 chopps u_short mod = v->bitmap->bytes_per_row + v->bitmap->row_mod;
1051 1.1 chopps /* update plane pointers. high and low. */
1052 1.1 chopps tmp[j].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[i][mod]));
1053 1.1 chopps tmp[j + 1].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[i][mod]));
1054 1.1 chopps }
1055 1.1 chopps
1056 1.1 chopps /* set next pointers correctly */
1057 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COP1LCH));
1058 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(hl_this_data->frames[F_LACE_STORE_LONG]));
1059 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(hl_this_data->frames[F_LACE_STORE_LONG]));
1060 1.1 chopps
1061 1.1 chopps
1062 1.1 chopps cp = hl_this_data->frames[F_LACE_LONG];
1063 1.1 chopps hl_this_data->frames[F_LACE_LONG] = hl_this_data->frames[F_LACE_STORE_LONG];
1064 1.1 chopps hl_this_data->frames[F_LACE_STORE_LONG] = cp;
1065 1.1 chopps
1066 1.1 chopps cp = hl_this_data->frames[F_LACE_SHORT];
1067 1.1 chopps hl_this_data->frames[F_LACE_SHORT] = hl_this_data->frames[F_LACE_STORE_SHORT];
1068 1.1 chopps hl_this_data->frames[F_LACE_STORE_SHORT] = cp;
1069 1.1 chopps
1070 1.1 chopps vd->flags |= VF_DISPLAY;
1071 1.1 chopps
1072 1.1 chopps cc_use_colormap(v, vd->colormap);
1073 1.1 chopps }
1074 1.1 chopps cc_load_mode(hl_this);
1075 1.1 chopps }
1076 1.1 chopps #if defined (GRF_A2024)
1077 1.1 chopps
1078 1.1 chopps dmode_t *
1079 1.1 chopps cc_init_ntsc_hires_dlace()
1080 1.1 chopps {
1081 1.1 chopps /* hdl_this function should only be called once. */
1082 1.1 chopps if (!hdl_this) {
1083 1.1 chopps u_short len = std_dlace_copper_list_len;
1084 1.1 chopps cop_t *cp;
1085 1.1 chopps
1086 1.1 chopps hdl_this = &hires_dlace_mode;
1087 1.1 chopps hdl_this_data = &hires_dlace_mode_data;
1088 1.1 chopps bzero(hdl_this, sizeof(dmode_t));
1089 1.1 chopps bzero(hdl_this_data, sizeof(dmdata_t));
1090 1.1 chopps
1091 1.1 chopps hdl_this->name = "ntsc: hires double interlace";
1092 1.1 chopps hdl_this->nominal_size.width = 640;
1093 1.1 chopps hdl_this->nominal_size.height = 800;
1094 1.1 chopps hdl_this_data->max_size.width = 724;
1095 1.1 chopps hdl_this_data->max_size.height = 800;
1096 1.1 chopps hdl_this_data->min_size.width = 320;
1097 1.1 chopps hdl_this_data->min_size.height = 400;
1098 1.1 chopps hdl_this_data->min_depth = 1;
1099 1.1 chopps hdl_this_data->max_depth = 2;
1100 1.1 chopps hdl_this->data = hdl_this_data;
1101 1.1 chopps
1102 1.1 chopps hdl_this->get_monitor = cc_get_monitor;
1103 1.1 chopps hdl_this->alloc_view = cc_alloc_view;
1104 1.1 chopps hdl_this->get_current_view = cc_get_current_view;
1105 1.1 chopps
1106 1.1 chopps hdl_this_data->use_colormap = cc_a2024_use_colormap;
1107 1.1 chopps hdl_this_data->get_colormap = cc_a2024_get_colormap;
1108 1.1 chopps hdl_this_data->alloc_colormap = cc_a2024_alloc_colormap;
1109 1.1 chopps hdl_this_data->display_view = display_hires_dlace_view;
1110 1.1 chopps hdl_this_data->monitor = cc_monitor;
1111 1.1 chopps
1112 1.1 chopps hdl_this_data->flags |= DMF_INTERLACE;
1113 1.1 chopps
1114 1.1 chopps hdl_this_data->frames = hires_dlace_frames;
1115 1.1 chopps hdl_this_data->frames[F_LACE_LONG] = alloc_chipmem(std_dlace_copper_list_size * F_LACE_TOTAL);
1116 1.1 chopps if (!hdl_this_data->frames[F_LACE_LONG]) {
1117 1.1 chopps panic("couldn't get chipmem for copper list");
1118 1.1 chopps }
1119 1.1 chopps hdl_this_data->frames[F_LACE_SHORT] = &hdl_this_data->frames[F_LACE_LONG][len];
1120 1.1 chopps hdl_this_data->frames[F_LACE_STORE_LONG] = &hdl_this_data->frames[F_LACE_SHORT][len];
1121 1.1 chopps hdl_this_data->frames[F_LACE_STORE_SHORT] = &hdl_this_data->frames[F_LACE_STORE_LONG][len];
1122 1.1 chopps
1123 1.1 chopps bcopy(std_dlace_copper_list, hdl_this_data->frames[F_LACE_STORE_LONG], std_dlace_copper_list_size);
1124 1.1 chopps bcopy(std_dlace_copper_list, hdl_this_data->frames[F_LACE_STORE_SHORT], std_dlace_copper_list_size);
1125 1.1 chopps bcopy(std_dlace_copper_list, hdl_this_data->frames[F_LACE_LONG], std_dlace_copper_list_size);
1126 1.1 chopps bcopy(std_dlace_copper_list, hdl_this_data->frames[F_LACE_SHORT], std_dlace_copper_list_size);
1127 1.1 chopps
1128 1.1 chopps hdl_this_data->bplcon0 = 0x8204 | USE_CON3; /* hires, color
1129 1.1 chopps * composite enable,
1130 1.1 chopps * dlace. */
1131 1.1 chopps hdl_this_data->std_start_x = STANDARD_VIEW_X;
1132 1.1 chopps hdl_this_data->std_start_y = STANDARD_VIEW_Y;
1133 1.1 chopps hdl_this_data->vbl_handler = (vbl_handler_func *) cc_lace_mode_vbl_handler;
1134 1.1 chopps #if defined (GRF_ECS)
1135 1.1 chopps hdl_this_data->beamcon0 = STANDARD_NTSC_BEAMCON;
1136 1.1 chopps #endif
1137 1.3 chopps LIST_INSERT_HEAD(&MDATA(cc_monitor)->modes, hdl_this, link);
1138 1.1 chopps }
1139 1.1 chopps return (hdl_this);
1140 1.1 chopps }
1141 1.1 chopps
1142 1.1 chopps void
1143 1.1 chopps display_hires_dlace_view(v)
1144 1.1 chopps view_t *v;
1145 1.1 chopps {
1146 1.1 chopps if (hdl_this_data->current_view != v) {
1147 1.1 chopps vdata_t *vd = VDATA(v);
1148 1.1 chopps monitor_t *monitor = hdl_this_data->monitor;
1149 1.1 chopps cop_t *cp = hdl_this_data->frames[F_LACE_STORE_LONG], *tmp;
1150 1.1 chopps int depth = v->bitmap->depth, i;
1151 1.1 chopps int hstart, hstop, vstart, vstop, j;
1152 1.1 chopps int x, y, w = v->display.width, h = v->display.height;
1153 1.1 chopps u_short ddfstart, ddfwidth, con1;
1154 1.1 chopps u_short mod1l, mod2l;
1155 1.1 chopps
1156 1.1 chopps /* round down to nearest even width */
1157 1.1 chopps /* w &= 0xfffe; */
1158 1.1 chopps
1159 1.1 chopps /* calculate datafetch width. */
1160 1.1 chopps
1161 1.1 chopps ddfwidth = ((v->bitmap->bytes_per_row >> 1) - 2) << 2;
1162 1.1 chopps
1163 1.1 chopps /* Hdl_This will center the any overscanned display */
1164 1.1 chopps /* and allow user to modify. */
1165 1.1 chopps x = v->display.x + hdl_this_data->std_start_x - ((w - 640) >> 2);
1166 1.1 chopps y = v->display.y + hdl_this_data->std_start_y - ((h - 800) >> 3);
1167 1.1 chopps
1168 1.1 chopps if (y & 1)
1169 1.1 chopps y--;
1170 1.1 chopps
1171 1.1 chopps if (!(x & 1))
1172 1.1 chopps x--;
1173 1.1 chopps
1174 1.1 chopps hstart = x;
1175 1.1 chopps hstop = x + (w >> 1);
1176 1.1 chopps vstart = y;
1177 1.1 chopps vstop = y + (h >> 2);
1178 1.1 chopps
1179 1.1 chopps ddfstart = (hstart - 9) >> 1;
1180 1.1 chopps
1181 1.1 chopps /* check for hardware limits, AGA may allow more..? */
1182 1.1 chopps /* anyone got a 4000 I can borrow :^) -ch */
1183 1.1 chopps if ((ddfstart & 0xfffc) + ddfwidth > 0xd8) {
1184 1.1 chopps int d = 0;
1185 1.1 chopps
1186 1.1 chopps /* XXX anyone know the equality properties of
1187 1.1 chopps * intermixed logial AND's */
1188 1.1 chopps /* XXX and arithmetic operators? */
1189 1.1 chopps while (((ddfstart & 0xfffc) + ddfwidth - d) > 0xd8) {
1190 1.1 chopps d++;
1191 1.1 chopps }
1192 1.1 chopps
1193 1.1 chopps ddfstart -= d;
1194 1.1 chopps hstart -= d << 1;
1195 1.1 chopps hstop -= d << 1;
1196 1.1 chopps }
1197 1.1 chopps /* correct the datafetch to proper limits. */
1198 1.1 chopps /* delay the actual display of the data until we need it. */
1199 1.1 chopps ddfstart &= 0xfffc;
1200 1.1 chopps con1 = ((hstart - 9) - (ddfstart << 1)) | (((hstart - 9) - (ddfstart << 1)) << 4);
1201 1.1 chopps
1202 1.1 chopps if (hdl_this_data->current_view) {
1203 1.1 chopps VDATA(hdl_this_data->current_view)->flags &= ~VF_DISPLAY; /* mark as no longer */
1204 1.1 chopps /* displayed. */
1205 1.1 chopps }
1206 1.1 chopps hdl_this_data->current_view = v;
1207 1.1 chopps
1208 1.1 chopps cp = hdl_this_data->frames[F_LACE_STORE_LONG];
1209 1.1 chopps #if defined GRF_ECS
1210 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BEAMCON0));
1211 1.1 chopps tmp->cp.inst.operand = hdl_this_data->beamcon0;
1212 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWHIGH));
1213 1.1 chopps tmp->cp.inst.operand = CALC_DIWHIGH(hstart, vstart, hstop, vstop);
1214 1.1 chopps #endif /* ECS */
1215 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON0));
1216 1.1 chopps tmp->cp.inst.operand = hdl_this_data->bplcon0 | ((depth & 0x7) << 13); /* times two. */
1217 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON1));
1218 1.1 chopps tmp->cp.inst.operand = con1;
1219 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTART));
1220 1.1 chopps tmp->cp.inst.operand = ((vstart & 0xff) << 8) | (hstart & 0xff);
1221 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTOP));
1222 1.1 chopps tmp->cp.inst.operand = ((vstop & 0xff) << 8) | (hstop & 0xff);
1223 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTART));
1224 1.1 chopps tmp->cp.inst.operand = ddfstart;
1225 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTOP));
1226 1.1 chopps tmp->cp.inst.operand = ddfstart + ddfwidth;
1227 1.1 chopps
1228 1.1 chopps mod1l = v->bitmap->bytes_per_row + v->bitmap->row_mod;
1229 1.1 chopps mod2l = mod1l << 1;
1230 1.1 chopps
1231 1.1 chopps /* update plane pointers. */
1232 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL0PTH));
1233 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[0][0]));
1234 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[0][0]));
1235 1.1 chopps tmp[2].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod1l]));
1236 1.1 chopps tmp[3].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod1l]));
1237 1.1 chopps if (depth == 2) {
1238 1.1 chopps tmp[4].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[1][0]));
1239 1.1 chopps tmp[5].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[1][0]));
1240 1.1 chopps tmp[6].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod1l]));
1241 1.1 chopps tmp[7].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod1l]));
1242 1.1 chopps }
1243 1.1 chopps /* set modulos. */
1244 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL1MOD));
1245 1.1 chopps tmp[0].cp.inst.operand = mod2l + mod1l;
1246 1.1 chopps tmp[1].cp.inst.operand = mod2l + mod1l;
1247 1.1 chopps
1248 1.1 chopps
1249 1.1 chopps /* set next coper list pointers */
1250 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COP1LCH));
1251 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(hdl_this_data->frames[F_LACE_STORE_SHORT]));
1252 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(hdl_this_data->frames[F_LACE_STORE_SHORT]));
1253 1.1 chopps
1254 1.1 chopps bcopy(hdl_this_data->frames[F_LACE_STORE_LONG], hdl_this_data->frames[F_LACE_STORE_SHORT],
1255 1.1 chopps std_dlace_copper_list_size);
1256 1.1 chopps
1257 1.1 chopps /* these are the only ones that are different from long frame. */
1258 1.1 chopps cp = hdl_this_data->frames[F_LACE_STORE_SHORT];
1259 1.1 chopps /* update plane pointers. */
1260 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL0PTH));
1261 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod2l]));
1262 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod2l]));
1263 1.1 chopps tmp[2].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod2l + mod1l]));
1264 1.1 chopps tmp[3].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod2l + mod1l]));
1265 1.1 chopps if (depth == 2) {
1266 1.1 chopps tmp[4].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod2l]));
1267 1.1 chopps tmp[5].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod2l]));
1268 1.1 chopps tmp[6].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod2l + mod1l]));
1269 1.1 chopps tmp[7].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod2l + mod1l]));
1270 1.1 chopps }
1271 1.1 chopps /* set next copper list pointers */
1272 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COP1LCH));
1273 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(hdl_this_data->frames[F_LACE_STORE_LONG]));
1274 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(hdl_this_data->frames[F_LACE_STORE_LONG]));
1275 1.1 chopps
1276 1.1 chopps cp = hdl_this_data->frames[F_LACE_LONG];
1277 1.1 chopps hdl_this_data->frames[F_LACE_LONG] = hdl_this_data->frames[F_LACE_STORE_LONG];
1278 1.1 chopps hdl_this_data->frames[F_LACE_STORE_LONG] = cp;
1279 1.1 chopps
1280 1.1 chopps cp = hdl_this_data->frames[F_LACE_SHORT];
1281 1.1 chopps hdl_this_data->frames[F_LACE_SHORT] = hdl_this_data->frames[F_LACE_STORE_SHORT];
1282 1.1 chopps hdl_this_data->frames[F_LACE_STORE_SHORT] = cp;
1283 1.1 chopps
1284 1.1 chopps vd->flags |= VF_DISPLAY;
1285 1.1 chopps cc_a2024_use_colormap(v, vd->colormap);
1286 1.1 chopps }
1287 1.1 chopps cc_load_mode(hdl_this);
1288 1.1 chopps }
1289 1.1 chopps
1290 1.1 chopps
1291 1.1 chopps dmode_t *
1292 1.1 chopps cc_init_ntsc_a2024()
1293 1.1 chopps {
1294 1.1 chopps /* a24_this function should only be called once. */
1295 1.1 chopps if (!a24_this) {
1296 1.1 chopps int i;
1297 1.1 chopps u_short len = std_a2024_copper_list_len;
1298 1.1 chopps cop_t *cp;
1299 1.1 chopps
1300 1.1 chopps a24_this = &a2024_mode;
1301 1.1 chopps a24_this_data = &a2024_mode_data;
1302 1.1 chopps bzero(a24_this, sizeof(dmode_t));
1303 1.1 chopps bzero(a24_this_data, sizeof(dmdata_t));
1304 1.1 chopps
1305 1.1 chopps a24_this->name = "ntsc: A2024 15khz";
1306 1.1 chopps a24_this->nominal_size.width = 1024;
1307 1.1 chopps a24_this->nominal_size.height = 800;
1308 1.1 chopps a24_this_data->max_size.width = 1024;
1309 1.1 chopps a24_this_data->max_size.height = 800;
1310 1.1 chopps a24_this_data->min_size.width = 1024;
1311 1.1 chopps a24_this_data->min_size.height = 800;
1312 1.1 chopps a24_this_data->min_depth = 1;
1313 1.1 chopps a24_this_data->max_depth = 2;
1314 1.1 chopps a24_this->data = a24_this_data;
1315 1.1 chopps
1316 1.1 chopps a24_this->get_monitor = cc_get_monitor;
1317 1.1 chopps a24_this->alloc_view = cc_alloc_view;
1318 1.1 chopps a24_this->get_current_view = cc_get_current_view;
1319 1.1 chopps
1320 1.1 chopps a24_this_data->use_colormap = cc_a2024_use_colormap;
1321 1.1 chopps a24_this_data->get_colormap = cc_a2024_get_colormap;
1322 1.1 chopps a24_this_data->display_view = display_a2024_view;
1323 1.1 chopps a24_this_data->alloc_colormap = cc_a2024_alloc_colormap;
1324 1.1 chopps a24_this_data->monitor = cc_monitor;
1325 1.1 chopps
1326 1.1 chopps a24_this_data->flags |= DMF_HEDLEY_EXP;
1327 1.1 chopps
1328 1.1 chopps a24_this_data->frames = a2024_frames;
1329 1.1 chopps a24_this_data->frames[F_QD_QUAD0] = alloc_chipmem(std_a2024_copper_list_size * F_QD_TOTAL);
1330 1.1 chopps if (!a24_this_data->frames[F_QD_QUAD0]) {
1331 1.1 chopps panic("couldn't get chipmem for copper list");
1332 1.1 chopps }
1333 1.1 chopps /* setup the hedley init bitplane. */
1334 1.1 chopps hedley_init = alloc_chipmem(128);
1335 1.1 chopps if (!hedley_init) {
1336 1.1 chopps panic("couldn't get chipmem for hedley init bitplane");
1337 1.1 chopps }
1338 1.1 chopps for (i = 1; i < 128; i++)
1339 1.1 chopps hedley_init[i] = 0xff;
1340 1.1 chopps hedley_init[0] = 0x03;
1341 1.1 chopps
1342 1.1 chopps /* copy image of standard copper list. */
1343 1.1 chopps bcopy(std_a2024_copper_list, a24_this_data->frames[0], std_a2024_copper_list_size);
1344 1.1 chopps
1345 1.1 chopps /* set the init plane pointer. */
1346 1.1 chopps cp = find_copper_inst(a24_this_data->frames[F_QD_QUAD0], CI_MOVE(R_BPL0PTH));
1347 1.1 chopps cp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(hedley_init));
1348 1.1 chopps cp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(hedley_init));
1349 1.1 chopps
1350 1.1 chopps for (i = 1; i < F_QD_TOTAL; i++) {
1351 1.1 chopps a24_this_data->frames[i] = &a24_this_data->frames[i - 1][len];
1352 1.1 chopps bcopy(a24_this_data->frames[0], a24_this_data->frames[i], std_a2024_copper_list_size);
1353 1.1 chopps }
1354 1.1 chopps
1355 1.1 chopps a24_this_data->bplcon0 = 0x8200; /* hires */
1356 1.1 chopps a24_this_data->vbl_handler = (vbl_handler_func *) a2024_mode_vbl_handler;
1357 1.1 chopps
1358 1.1 chopps
1359 1.3 chopps LIST_INSERT_HEAD(&MDATA(cc_monitor)->modes, a24_this, link);
1360 1.1 chopps }
1361 1.1 chopps return (a24_this);
1362 1.1 chopps }
1363 1.1 chopps
1364 1.1 chopps void
1365 1.1 chopps display_a2024_view(v)
1366 1.1 chopps view_t *v;
1367 1.1 chopps {
1368 1.1 chopps if (a24_this_data->current_view != v) {
1369 1.1 chopps vdata_t *vd = VDATA(v);
1370 1.1 chopps monitor_t *monitor = a24_this_data->monitor;
1371 1.1 chopps cop_t *cp, *tmp;
1372 1.1 chopps u_char *inst_plane[2];
1373 1.1 chopps u_char **plane = inst_plane;
1374 1.1 chopps u_long full_line = v->bitmap->bytes_per_row + v->bitmap->row_mod;
1375 1.1 chopps u_long half_plane = full_line * v->bitmap->rows / 2;
1376 1.1 chopps
1377 1.1 chopps int line_mod = 0xbc; /* standard 2024 15khz mod. */
1378 1.1 chopps int depth = v->bitmap->depth, i, j;
1379 1.1 chopps
1380 1.1 chopps plane[0] = v->bitmap->plane[0];
1381 1.1 chopps if (depth == 2) {
1382 1.1 chopps plane[1] = v->bitmap->plane[1];
1383 1.1 chopps }
1384 1.1 chopps if (a24_this_data->current_view) {
1385 1.1 chopps VDATA(a24_this_data->current_view)->flags &= ~VF_DISPLAY; /* mark as no longer
1386 1.1 chopps * displayed. */
1387 1.1 chopps }
1388 1.1 chopps cp = a24_this_data->frames[F_QD_STORE_QUAD0];
1389 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COLOR1F));
1390 1.1 chopps tmp = find_copper_inst(tmp, CI_MOVE(R_BPLCON0)); /* grab third one. */
1391 1.1 chopps tmp->cp.inst.operand = a24_this_data->bplcon0 | ((depth & 0x7) << 13); /* times 2 */
1392 1.1 chopps
1393 1.1 chopps bcopy(a24_this_data->frames[F_QD_STORE_QUAD0], a24_this_data->frames[F_QD_STORE_QUAD1], std_a2024_copper_list_size);
1394 1.1 chopps bcopy(a24_this_data->frames[F_QD_STORE_QUAD0], a24_this_data->frames[F_QD_STORE_QUAD2], std_a2024_copper_list_size);
1395 1.1 chopps bcopy(a24_this_data->frames[F_QD_STORE_QUAD0], a24_this_data->frames[F_QD_STORE_QUAD3], std_a2024_copper_list_size);
1396 1.1 chopps
1397 1.1 chopps /*
1398 1.1 chopps * Mark Id's
1399 1.1 chopps */
1400 1.1 chopps tmp = find_copper_inst(a24_this_data->frames[F_QD_STORE_QUAD1], CI_WAIT(126, 21));
1401 1.1 chopps CBUMP(tmp);
1402 1.1 chopps CMOVE(tmp, R_COLOR01, QUAD1_ID);
1403 1.1 chopps tmp = find_copper_inst(a24_this_data->frames[F_QD_STORE_QUAD2], CI_WAIT(126, 21));
1404 1.1 chopps CBUMP(tmp);
1405 1.1 chopps CMOVE(tmp, R_COLOR01, QUAD2_ID);
1406 1.1 chopps tmp = find_copper_inst(a24_this_data->frames[F_QD_STORE_QUAD3], CI_WAIT(126, 21));
1407 1.1 chopps CBUMP(tmp);
1408 1.1 chopps CMOVE(tmp, R_COLOR01, QUAD3_ID);
1409 1.1 chopps
1410 1.1 chopps plane[0]--;
1411 1.1 chopps plane[0]--;
1412 1.1 chopps if (depth == 2) {
1413 1.1 chopps plane[1]--;
1414 1.1 chopps plane[1]--;
1415 1.1 chopps }
1416 1.1 chopps /*
1417 1.1 chopps * Set bitplane pointers.
1418 1.1 chopps */
1419 1.1 chopps tmp = find_copper_inst(a24_this_data->frames[F_QD_STORE_QUAD0], CI_MOVE(R_BPLMOD2));
1420 1.1 chopps CBUMP(tmp);
1421 1.1 chopps CMOVE(tmp, R_BPL0PTH, HIADDR(PREP_DMA_MEM(&plane[0][0])));
1422 1.1 chopps CMOVE(tmp, R_BPL0PTL, LOADDR(PREP_DMA_MEM(&plane[0][0])));
1423 1.1 chopps CMOVE(tmp, R_BPL1PTH, HIADDR(PREP_DMA_MEM(&plane[0][full_line])));
1424 1.1 chopps CMOVE(tmp, R_BPL1PTL, LOADDR(PREP_DMA_MEM(&plane[0][full_line])));
1425 1.1 chopps if (depth == 2) {
1426 1.1 chopps CMOVE(tmp, R_BPL2PTH, HIADDR(PREP_DMA_MEM(&plane[1][0])));
1427 1.1 chopps CMOVE(tmp, R_BPL2PTL, LOADDR(PREP_DMA_MEM(&plane[1][0])));
1428 1.1 chopps CMOVE(tmp, R_BPL3PTH, HIADDR(PREP_DMA_MEM(&plane[1][full_line])));
1429 1.1 chopps CMOVE(tmp, R_BPL3PTL, LOADDR(PREP_DMA_MEM(&plane[1][full_line])));
1430 1.1 chopps }
1431 1.1 chopps #if defined (GRF_ECS)
1432 1.1 chopps CMOVE(tmp, R_DIWHIGH, 0x2000);
1433 1.1 chopps #endif
1434 1.1 chopps CMOVE(tmp, R_COP1LCH, HIADDR(PREP_DMA_MEM(a24_this_data->frames[F_QD_STORE_QUAD1])));
1435 1.1 chopps CMOVE(tmp, R_COP1LCL, LOADDR(PREP_DMA_MEM(a24_this_data->frames[F_QD_STORE_QUAD1])));
1436 1.1 chopps CEND(tmp);
1437 1.1 chopps CEND(tmp);
1438 1.1 chopps
1439 1.1 chopps tmp = find_copper_inst(a24_this_data->frames[F_QD_STORE_QUAD1], CI_MOVE(R_BPLMOD2));
1440 1.1 chopps CBUMP(tmp);
1441 1.1 chopps CMOVE(tmp, R_BPL0PTH, HIADDR(PREP_DMA_MEM(&plane[0][HALF_2024_LINE])));
1442 1.1 chopps CMOVE(tmp, R_BPL0PTL, LOADDR(PREP_DMA_MEM(&plane[0][HALF_2024_LINE])));
1443 1.1 chopps CMOVE(tmp, R_BPL1PTH, HIADDR(PREP_DMA_MEM(&plane[0][full_line + HALF_2024_LINE])));
1444 1.1 chopps CMOVE(tmp, R_BPL1PTL, LOADDR(PREP_DMA_MEM(&plane[0][full_line + HALF_2024_LINE])));
1445 1.1 chopps if (depth == 2) {
1446 1.1 chopps CMOVE(tmp, R_BPL2PTH, HIADDR(PREP_DMA_MEM(&plane[1][HALF_2024_LINE])));
1447 1.1 chopps CMOVE(tmp, R_BPL2PTL, LOADDR(PREP_DMA_MEM(&plane[1][HALF_2024_LINE])));
1448 1.1 chopps CMOVE(tmp, R_BPL3PTH, HIADDR(PREP_DMA_MEM(&plane[1][full_line + HALF_2024_LINE])));
1449 1.1 chopps CMOVE(tmp, R_BPL3PTL, LOADDR(PREP_DMA_MEM(&plane[1][full_line + HALF_2024_LINE])));
1450 1.1 chopps }
1451 1.1 chopps #if defined (GRF_ECS)
1452 1.1 chopps CMOVE(tmp, R_DIWHIGH, 0x2000);
1453 1.1 chopps #endif
1454 1.1 chopps CMOVE(tmp, R_COP1LCH, HIADDR(PREP_DMA_MEM(a24_this_data->frames[F_QD_STORE_QUAD2])));
1455 1.1 chopps CMOVE(tmp, R_COP1LCL, LOADDR(PREP_DMA_MEM(a24_this_data->frames[F_QD_STORE_QUAD2])));
1456 1.1 chopps CEND(tmp);
1457 1.1 chopps CEND(tmp);
1458 1.1 chopps
1459 1.1 chopps tmp = find_copper_inst(a24_this_data->frames[F_QD_STORE_QUAD2], CI_MOVE(R_BPLMOD2));
1460 1.1 chopps CBUMP(tmp);
1461 1.1 chopps CMOVE(tmp, R_BPL0PTH, HIADDR(PREP_DMA_MEM(&plane[0][half_plane])));
1462 1.1 chopps CMOVE(tmp, R_BPL0PTL, LOADDR(PREP_DMA_MEM(&plane[0][half_plane])));
1463 1.1 chopps CMOVE(tmp, R_BPL1PTH, HIADDR(PREP_DMA_MEM(&plane[0][half_plane + full_line])));
1464 1.1 chopps CMOVE(tmp, R_BPL1PTL, LOADDR(PREP_DMA_MEM(&plane[0][half_plane + full_line])));
1465 1.1 chopps if (depth == 2) {
1466 1.1 chopps CMOVE(tmp, R_BPL2PTH, HIADDR(PREP_DMA_MEM(&plane[1][half_plane])));
1467 1.1 chopps CMOVE(tmp, R_BPL2PTL, LOADDR(PREP_DMA_MEM(&plane[1][half_plane])));
1468 1.1 chopps CMOVE(tmp, R_BPL3PTH, HIADDR(PREP_DMA_MEM(&plane[1][half_plane + full_line])));
1469 1.1 chopps CMOVE(tmp, R_BPL3PTL, LOADDR(PREP_DMA_MEM(&plane[1][half_plane + full_line])));
1470 1.1 chopps }
1471 1.1 chopps #if defined (GRF_ECS)
1472 1.1 chopps CMOVE(tmp, R_DIWHIGH, 0x2000);
1473 1.1 chopps #endif
1474 1.1 chopps CMOVE(tmp, R_COP1LCH, HIADDR(PREP_DMA_MEM(a24_this_data->frames[F_QD_STORE_QUAD3])));
1475 1.1 chopps CMOVE(tmp, R_COP1LCL, LOADDR(PREP_DMA_MEM(a24_this_data->frames[F_QD_STORE_QUAD3])));
1476 1.1 chopps CEND(tmp);
1477 1.1 chopps CEND(tmp);
1478 1.1 chopps
1479 1.1 chopps tmp = find_copper_inst(a24_this_data->frames[F_QD_STORE_QUAD3], CI_MOVE(R_BPLMOD2));
1480 1.1 chopps CBUMP(tmp);
1481 1.1 chopps CMOVE(tmp, R_BPL0PTH, HIADDR(PREP_DMA_MEM(&plane[0][half_plane + HALF_2024_LINE])));
1482 1.1 chopps CMOVE(tmp, R_BPL0PTL, LOADDR(PREP_DMA_MEM(&plane[0][half_plane + HALF_2024_LINE])));
1483 1.1 chopps CMOVE(tmp, R_BPL1PTH, HIADDR(PREP_DMA_MEM(&plane[0][half_plane + full_line + HALF_2024_LINE])));
1484 1.1 chopps CMOVE(tmp, R_BPL1PTL, LOADDR(PREP_DMA_MEM(&plane[0][half_plane + full_line + HALF_2024_LINE])));
1485 1.1 chopps if (depth == 2) {
1486 1.1 chopps CMOVE(tmp, R_BPL2PTH, HIADDR(PREP_DMA_MEM(&plane[1][half_plane + HALF_2024_LINE])));
1487 1.1 chopps CMOVE(tmp, R_BPL2PTL, LOADDR(PREP_DMA_MEM(&plane[1][half_plane + HALF_2024_LINE])));
1488 1.1 chopps CMOVE(tmp, R_BPL3PTH, HIADDR(PREP_DMA_MEM(&plane[1][half_plane + full_line + HALF_2024_LINE])));
1489 1.1 chopps CMOVE(tmp, R_BPL3PTL, LOADDR(PREP_DMA_MEM(&plane[1][half_plane + full_line + HALF_2024_LINE])));
1490 1.1 chopps }
1491 1.1 chopps #if defined (GRF_ECS)
1492 1.1 chopps CMOVE(tmp, R_DIWHIGH, 0x2000);
1493 1.1 chopps #endif
1494 1.1 chopps CMOVE(tmp, R_COP1LCH, HIADDR(PREP_DMA_MEM(a24_this_data->frames[F_QD_STORE_QUAD0])));
1495 1.1 chopps CMOVE(tmp, R_COP1LCL, LOADDR(PREP_DMA_MEM(a24_this_data->frames[F_QD_STORE_QUAD0])));
1496 1.1 chopps CEND(tmp);
1497 1.1 chopps CEND(tmp);
1498 1.1 chopps
1499 1.1 chopps /* swap new pointers in. */
1500 1.1 chopps for (i = F_QD_STORE_QUAD0, j = F_QD_QUAD0;
1501 1.1 chopps i <= F_QD_STORE_QUAD3; i++, j++) {
1502 1.1 chopps cp = a24_this_data->frames[j];
1503 1.1 chopps a24_this_data->frames[j] = a24_this_data->frames[i];
1504 1.1 chopps a24_this_data->frames[i] = cp;
1505 1.1 chopps }
1506 1.1 chopps
1507 1.1 chopps a24_this_data->current_view = v;
1508 1.1 chopps vd->flags |= VF_DISPLAY;
1509 1.1 chopps
1510 1.1 chopps cc_a2024_use_colormap(v, vd->colormap);
1511 1.1 chopps }
1512 1.1 chopps cc_load_mode(a24_this);
1513 1.1 chopps }
1514 1.1 chopps
1515 1.1 chopps void
1516 1.1 chopps a2024_mode_vbl_handler(d)
1517 1.1 chopps dmode_t *d;
1518 1.1 chopps {
1519 1.1 chopps u_short vp = ((custom.vposr & 0x0007) << 8) | ((custom.vhposr) >> 8);
1520 1.1 chopps
1521 1.1 chopps if (vp < 12) {
1522 1.1 chopps custom.cop1lc = PREP_DMA_MEM(a24_this_data->frames[a24_this_data->hedley_current]);
1523 1.1 chopps custom.copjmp1 = 0;
1524 1.1 chopps }
1525 1.1 chopps a24_this_data->hedley_current++;
1526 1.1 chopps a24_this_data->hedley_current &= 0x3; /* if 4 then 0. */
1527 1.1 chopps }
1528 1.1 chopps #endif /* GRF_A2024 */
1529 1.1 chopps #endif /* GRF_NTSC */
1530 1.1 chopps
1531 1.1 chopps /*
1532 1.1 chopps * PAL modes.
1533 1.1 chopps */
1534 1.1 chopps
1535 1.1 chopps #if defined (GRF_PAL)
1536 1.1 chopps
1537 1.1 chopps dmode_t *
1538 1.1 chopps cc_init_pal_hires()
1539 1.1 chopps {
1540 1.1 chopps /* ph_this function should only be called once. */
1541 1.1 chopps if (!ph_this) {
1542 1.1 chopps u_short len = std_copper_list_len;
1543 1.1 chopps cop_t *cp;
1544 1.1 chopps
1545 1.1 chopps ph_this = &pal_hires_mode;
1546 1.1 chopps ph_this_data = &pal_hires_mode_data;
1547 1.1 chopps bzero(ph_this, sizeof(dmode_t));
1548 1.1 chopps bzero(ph_this_data, sizeof(dmdata_t));
1549 1.1 chopps
1550 1.1 chopps ph_this->name = "pal: pal_hires interlace";
1551 1.1 chopps ph_this->nominal_size.width = 640;
1552 1.1 chopps ph_this->nominal_size.height = 256;
1553 1.1 chopps ph_this_data->max_size.width = 724;
1554 1.1 chopps ph_this_data->max_size.height = 289;
1555 1.1 chopps ph_this_data->min_size.width = 320;
1556 1.1 chopps ph_this_data->min_size.height = 244;
1557 1.1 chopps ph_this_data->min_depth = 1;
1558 1.1 chopps ph_this_data->max_depth = 4;
1559 1.1 chopps ph_this->data = ph_this_data;
1560 1.1 chopps
1561 1.1 chopps ph_this->get_monitor = cc_get_monitor;
1562 1.1 chopps ph_this->alloc_view = cc_alloc_view;
1563 1.1 chopps ph_this->get_current_view = cc_get_current_view;
1564 1.1 chopps
1565 1.1 chopps ph_this_data->use_colormap = cc_use_colormap;
1566 1.1 chopps ph_this_data->get_colormap = cc_get_colormap;
1567 1.1 chopps ph_this_data->alloc_colormap = cc_alloc_colormap;
1568 1.1 chopps ph_this_data->display_view = display_pal_hires_view;
1569 1.1 chopps ph_this_data->monitor = cc_monitor;
1570 1.1 chopps
1571 1.1 chopps ph_this_data->frames = pal_hires_frames;
1572 1.1 chopps ph_this_data->frames[F_LONG] = alloc_chipmem(std_copper_list_size * F_TOTAL);
1573 1.1 chopps if (!ph_this_data->frames[F_LONG]) {
1574 1.1 chopps panic("couldn't get chipmem for copper list");
1575 1.1 chopps }
1576 1.1 chopps ph_this_data->frames[F_STORE_LONG] = &ph_this_data->frames[F_LONG][len];
1577 1.1 chopps
1578 1.1 chopps bcopy(std_copper_list, ph_this_data->frames[F_STORE_LONG], std_copper_list_size);
1579 1.1 chopps bcopy(std_copper_list, ph_this_data->frames[F_LONG], std_copper_list_size);
1580 1.1 chopps
1581 1.1 chopps ph_this_data->bplcon0 = 0x8200 | USE_CON3; /* pal_hires, color
1582 1.1 chopps * composite enable,
1583 1.1 chopps * lace. */
1584 1.1 chopps ph_this_data->std_start_x = STANDARD_VIEW_X;
1585 1.1 chopps ph_this_data->std_start_y = STANDARD_VIEW_Y;
1586 1.1 chopps ph_this_data->vbl_handler = (vbl_handler_func *) cc_mode_vbl_handler;
1587 1.1 chopps #if defined (GRF_ECS)
1588 1.1 chopps ph_this_data->beamcon0 = STANDARD_PAL_BEAMCON;
1589 1.1 chopps #endif
1590 1.1 chopps
1591 1.3 chopps LIST_INSERT_HEAD(&MDATA(cc_monitor)->modes, ph_this, link);
1592 1.1 chopps }
1593 1.1 chopps return (ph_this);
1594 1.1 chopps }
1595 1.1 chopps
1596 1.1 chopps void
1597 1.1 chopps display_pal_hires_view(v)
1598 1.1 chopps view_t *v;
1599 1.1 chopps {
1600 1.1 chopps if (ph_this_data->current_view != v) {
1601 1.1 chopps vdata_t *vd = VDATA(v);
1602 1.1 chopps monitor_t *monitor = ph_this_data->monitor;
1603 1.1 chopps cop_t *cp = ph_this_data->frames[F_STORE_LONG], *tmp;
1604 1.1 chopps int depth = v->bitmap->depth, i;
1605 1.1 chopps int hstart, hstop, vstart, vstop, j;
1606 1.1 chopps int x, y, w = v->display.width, h = v->display.height;
1607 1.1 chopps u_short ddfstart, ddfwidth, con1;
1608 1.1 chopps
1609 1.1 chopps /* round down to nearest even width */
1610 1.1 chopps /* w &= 0xfffe; */
1611 1.1 chopps
1612 1.1 chopps /* calculate datafetch width. */
1613 1.1 chopps ddfwidth = ((v->bitmap->bytes_per_row >> 1) - 2) << 2;
1614 1.1 chopps
1615 1.1 chopps /* Ph_This will center the any overscanned display */
1616 1.1 chopps /* and allow user to modify. */
1617 1.1 chopps x = v->display.x + ph_this_data->std_start_x - ((w - 640) >> 2);
1618 1.1 chopps y = v->display.y + ph_this_data->std_start_y - ((h - 256) >> 1);
1619 1.1 chopps
1620 1.1 chopps if (y & 1)
1621 1.1 chopps y--;
1622 1.1 chopps
1623 1.1 chopps if (!(x & 1))
1624 1.1 chopps x--;
1625 1.1 chopps
1626 1.1 chopps hstart = x;
1627 1.1 chopps hstop = x + (w >> 1);
1628 1.1 chopps vstart = y;
1629 1.1 chopps vstop = y + h;
1630 1.1 chopps ddfstart = (hstart - 9) >> 1;
1631 1.1 chopps /* check for hardware limits, AGA may allow more..? */
1632 1.1 chopps /* anyone got a 4000 I can borrow :^) -ch */
1633 1.1 chopps if ((ddfstart & 0xfffc) + ddfwidth > 0xd8) {
1634 1.1 chopps int d = 0;
1635 1.1 chopps
1636 1.1 chopps /* XXX anyone know the equality properties of
1637 1.1 chopps * intermixed logial AND's */
1638 1.1 chopps /* XXX and arithmetic operators? */
1639 1.1 chopps while (((ddfstart & 0xfffc) + ddfwidth - d) > 0xd8) {
1640 1.1 chopps d++;
1641 1.1 chopps }
1642 1.1 chopps
1643 1.1 chopps ddfstart -= d;
1644 1.1 chopps hstart -= d << 1;
1645 1.1 chopps hstop -= d << 1;
1646 1.1 chopps }
1647 1.1 chopps /* correct the datafetch to proper limits. */
1648 1.1 chopps /* delay the actual display of the data until we need it. */
1649 1.1 chopps ddfstart &= 0xfffc;
1650 1.1 chopps con1 = ((hstart - 9) - (ddfstart << 1)) | (((hstart - 9) - (ddfstart << 1)) << 4);
1651 1.1 chopps
1652 1.1 chopps if (ph_this_data->current_view) {
1653 1.1 chopps VDATA(ph_this_data->current_view)->flags &= ~VF_DISPLAY; /* mark as no longer */
1654 1.1 chopps /* displayed. */
1655 1.1 chopps }
1656 1.1 chopps ph_this_data->current_view = v;
1657 1.1 chopps
1658 1.1 chopps cp = ph_this_data->frames[F_STORE_LONG];
1659 1.1 chopps #if defined GRF_ECS
1660 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BEAMCON0));
1661 1.1 chopps tmp->cp.inst.operand = ph_this_data->beamcon0;
1662 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWHIGH));
1663 1.1 chopps tmp->cp.inst.operand = CALC_DIWHIGH(hstart, vstart, hstop, vstop);
1664 1.1 chopps #endif /* ECS */
1665 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON0));
1666 1.1 chopps tmp->cp.inst.operand = ph_this_data->bplcon0 | ((depth & 0x7) << 12);
1667 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON1));
1668 1.1 chopps tmp->cp.inst.operand = con1;
1669 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTART));
1670 1.1 chopps tmp->cp.inst.operand = ((vstart & 0xff) << 8) | (hstart & 0xff);
1671 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTOP));
1672 1.1 chopps tmp->cp.inst.operand = ((vstop & 0xff) << 8) | (hstop & 0xff);
1673 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTART));
1674 1.1 chopps tmp->cp.inst.operand = ddfstart;
1675 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTOP));
1676 1.1 chopps tmp->cp.inst.operand = ddfstart + ddfwidth;
1677 1.1 chopps
1678 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL0PTH));
1679 1.1 chopps for (i = 0, j = 0; i < depth; j += 2, i++) {
1680 1.1 chopps /* update the plane pointers */
1681 1.1 chopps tmp[j].cp.inst.operand = HIADDR(PREP_DMA_MEM(v->bitmap->plane[i]));
1682 1.1 chopps tmp[j + 1].cp.inst.operand = LOADDR(PREP_DMA_MEM(v->bitmap->plane[i]));
1683 1.1 chopps }
1684 1.1 chopps
1685 1.1 chopps /* set mods correctly. */
1686 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL1MOD));
1687 1.1 chopps tmp[0].cp.inst.operand = v->bitmap->row_mod;
1688 1.1 chopps tmp[1].cp.inst.operand = v->bitmap->row_mod;
1689 1.1 chopps
1690 1.1 chopps /* set next pointers correctly */
1691 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COP1LCH));
1692 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(ph_this_data->frames[F_STORE_LONG]));
1693 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(ph_this_data->frames[F_STORE_LONG]));
1694 1.1 chopps
1695 1.1 chopps cp = ph_this_data->frames[F_LONG];
1696 1.1 chopps ph_this_data->frames[F_LONG] = ph_this_data->frames[F_STORE_LONG];
1697 1.1 chopps ph_this_data->frames[F_STORE_LONG] = cp;
1698 1.1 chopps
1699 1.1 chopps vd->flags |= VF_DISPLAY;
1700 1.1 chopps cc_use_colormap(v, vd->colormap);
1701 1.1 chopps }
1702 1.1 chopps cc_load_mode(ph_this);
1703 1.1 chopps }
1704 1.1 chopps
1705 1.1 chopps dmode_t *
1706 1.1 chopps cc_init_pal_hires_lace()
1707 1.1 chopps {
1708 1.1 chopps /* phl_this function should only be called once. */
1709 1.1 chopps if (!phl_this) {
1710 1.1 chopps u_short len = std_copper_list_len;
1711 1.1 chopps cop_t *cp;
1712 1.1 chopps
1713 1.1 chopps phl_this = &pal_hires_lace_mode;
1714 1.1 chopps phl_this_data = &pal_hires_lace_mode_data;
1715 1.1 chopps bzero(phl_this, sizeof(dmode_t));
1716 1.1 chopps bzero(phl_this_data, sizeof(dmdata_t));
1717 1.1 chopps
1718 1.1 chopps phl_this->name = "pal: hires interlace";
1719 1.1 chopps phl_this->nominal_size.width = 640;
1720 1.1 chopps phl_this->nominal_size.height = 512;
1721 1.1 chopps phl_this_data->max_size.width = 724;
1722 1.1 chopps phl_this_data->max_size.height = 578;
1723 1.1 chopps phl_this_data->min_size.width = 320;
1724 1.1 chopps phl_this_data->min_size.height = 484;
1725 1.1 chopps phl_this_data->min_depth = 1;
1726 1.1 chopps phl_this_data->max_depth = 4;
1727 1.1 chopps phl_this->data = phl_this_data;
1728 1.1 chopps
1729 1.1 chopps phl_this->get_monitor = cc_get_monitor;
1730 1.1 chopps phl_this->alloc_view = cc_alloc_view;
1731 1.1 chopps phl_this->get_current_view = cc_get_current_view;
1732 1.1 chopps
1733 1.1 chopps phl_this_data->use_colormap = cc_use_colormap;
1734 1.1 chopps phl_this_data->get_colormap = cc_get_colormap;
1735 1.1 chopps phl_this_data->alloc_colormap = cc_alloc_colormap;
1736 1.1 chopps phl_this_data->display_view = display_pal_hires_lace_view;
1737 1.1 chopps phl_this_data->monitor = cc_monitor;
1738 1.1 chopps
1739 1.1 chopps phl_this_data->flags |= DMF_INTERLACE;
1740 1.1 chopps
1741 1.1 chopps phl_this_data->frames = pal_hires_lace_frames;
1742 1.1 chopps phl_this_data->frames[F_LACE_LONG] = alloc_chipmem(std_copper_list_size * F_LACE_TOTAL);
1743 1.1 chopps if (!phl_this_data->frames[F_LACE_LONG]) {
1744 1.1 chopps panic("couldn't get chipmem for copper list");
1745 1.1 chopps }
1746 1.1 chopps phl_this_data->frames[F_LACE_SHORT] = &phl_this_data->frames[F_LACE_LONG][len];
1747 1.1 chopps phl_this_data->frames[F_LACE_STORE_LONG] = &phl_this_data->frames[F_LACE_SHORT][len];
1748 1.1 chopps phl_this_data->frames[F_LACE_STORE_SHORT] = &phl_this_data->frames[F_LACE_STORE_LONG][len];
1749 1.1 chopps
1750 1.1 chopps bcopy(std_copper_list, phl_this_data->frames[F_LACE_STORE_LONG], std_copper_list_size);
1751 1.1 chopps bcopy(std_copper_list, phl_this_data->frames[F_LACE_STORE_SHORT], std_copper_list_size);
1752 1.1 chopps bcopy(std_copper_list, phl_this_data->frames[F_LACE_LONG], std_copper_list_size);
1753 1.1 chopps bcopy(std_copper_list, phl_this_data->frames[F_LACE_SHORT], std_copper_list_size);
1754 1.1 chopps
1755 1.1 chopps phl_this_data->bplcon0 = 0x8204 | USE_CON3; /* hires, color
1756 1.1 chopps * composite enable,
1757 1.1 chopps * lace. */
1758 1.1 chopps phl_this_data->std_start_x = STANDARD_VIEW_X;
1759 1.1 chopps phl_this_data->std_start_y = STANDARD_VIEW_Y;
1760 1.1 chopps phl_this_data->vbl_handler = (vbl_handler_func *) cc_lace_mode_vbl_handler;
1761 1.1 chopps #if defined (GRF_ECS)
1762 1.1 chopps phl_this_data->beamcon0 = STANDARD_PAL_BEAMCON;
1763 1.1 chopps #endif
1764 1.1 chopps
1765 1.3 chopps LIST_INSERT_HEAD(&MDATA(cc_monitor)->modes, phl_this, link);
1766 1.1 chopps }
1767 1.1 chopps return (phl_this);
1768 1.1 chopps }
1769 1.1 chopps
1770 1.1 chopps void
1771 1.1 chopps display_pal_hires_lace_view(v)
1772 1.1 chopps view_t *v;
1773 1.1 chopps {
1774 1.1 chopps if (phl_this_data->current_view != v) {
1775 1.1 chopps vdata_t *vd = VDATA(v);
1776 1.1 chopps monitor_t *monitor = phl_this_data->monitor;
1777 1.1 chopps cop_t *cp = phl_this_data->frames[F_LACE_STORE_LONG], *tmp;
1778 1.1 chopps int depth = v->bitmap->depth, i;
1779 1.1 chopps int hstart, hstop, vstart, vstop, j;
1780 1.1 chopps int x, y, w = v->display.width, h = v->display.height;
1781 1.1 chopps u_short ddfstart, ddfwidth, con1;
1782 1.1 chopps
1783 1.1 chopps /* round down to nearest even width */
1784 1.1 chopps /* w &= 0xfffe; */
1785 1.1 chopps
1786 1.1 chopps /* calculate datafetch width. */
1787 1.1 chopps ddfwidth = ((v->bitmap->bytes_per_row >> 1) - 2) << 2;
1788 1.1 chopps
1789 1.1 chopps /* Phl_This will center the any overscanned display */
1790 1.1 chopps /* and allow user to modify. */
1791 1.1 chopps x = v->display.x + phl_this_data->std_start_x - ((w - 640) >> 2);
1792 1.1 chopps y = v->display.y + phl_this_data->std_start_y - ((h - 512) >> 2);
1793 1.1 chopps
1794 1.1 chopps if (y & 1)
1795 1.1 chopps y--;
1796 1.1 chopps
1797 1.1 chopps if (!(x & 1))
1798 1.1 chopps x--;
1799 1.1 chopps
1800 1.1 chopps hstart = x;
1801 1.1 chopps hstop = x + (w >> 1);
1802 1.1 chopps vstart = y;
1803 1.1 chopps vstop = y + (h >> 1);
1804 1.1 chopps ddfstart = (hstart - 9) >> 1;
1805 1.1 chopps
1806 1.1 chopps /* check for hardware limits, AGA may allow more..? */
1807 1.1 chopps /* anyone got a 4000 I can borrow :^) -ch */
1808 1.1 chopps if ((ddfstart & 0xfffc) + ddfwidth > 0xd8) {
1809 1.1 chopps int d = 0;
1810 1.1 chopps
1811 1.1 chopps /* XXX anyone know the equality properties of
1812 1.1 chopps * intermixed logial AND's */
1813 1.1 chopps /* XXX and arithmetic operators? */
1814 1.1 chopps while (((ddfstart & 0xfffc) + ddfwidth - d) > 0xd8) {
1815 1.1 chopps d++;
1816 1.1 chopps }
1817 1.1 chopps
1818 1.1 chopps ddfstart -= d;
1819 1.1 chopps hstart -= d << 1;
1820 1.1 chopps hstop -= d << 1;
1821 1.1 chopps }
1822 1.1 chopps /* correct the datafetch to proper limits. */
1823 1.1 chopps /* delay the actual display of the data until we need it. */
1824 1.1 chopps ddfstart &= 0xfffc;
1825 1.1 chopps con1 = ((hstart - 9) - (ddfstart << 1)) | (((hstart - 9) - (ddfstart << 1)) << 4);
1826 1.1 chopps
1827 1.1 chopps if (phl_this_data->current_view) {
1828 1.1 chopps VDATA(phl_this_data->current_view)->flags &= ~VF_DISPLAY; /* mark as no longer */
1829 1.1 chopps /* displayed. */
1830 1.1 chopps }
1831 1.1 chopps phl_this_data->current_view = v;
1832 1.1 chopps
1833 1.1 chopps cp = phl_this_data->frames[F_LACE_STORE_LONG];
1834 1.1 chopps #if defined GRF_ECS
1835 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BEAMCON0));
1836 1.1 chopps tmp->cp.inst.operand = phl_this_data->beamcon0;
1837 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWHIGH));
1838 1.1 chopps tmp->cp.inst.operand = CALC_DIWHIGH(hstart, vstart, hstop, vstop);
1839 1.1 chopps #endif /* ECS */
1840 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON0));
1841 1.1 chopps tmp->cp.inst.operand = phl_this_data->bplcon0 | ((depth & 0x7) << 12);
1842 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON1));
1843 1.1 chopps tmp->cp.inst.operand = con1;
1844 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTART));
1845 1.1 chopps tmp->cp.inst.operand = ((vstart & 0xff) << 8) | (hstart & 0xff);
1846 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTOP));
1847 1.1 chopps tmp->cp.inst.operand = ((vstop & 0xff) << 8) | (hstop & 0xff);
1848 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTART));
1849 1.1 chopps tmp->cp.inst.operand = ddfstart;
1850 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTOP));
1851 1.1 chopps tmp->cp.inst.operand = ddfstart + ddfwidth;
1852 1.1 chopps
1853 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL0PTH));
1854 1.1 chopps for (i = 0, j = 0; i < depth; j += 2, i++) {
1855 1.1 chopps /* update the plane pointers */
1856 1.1 chopps tmp[j].cp.inst.operand = HIADDR(PREP_DMA_MEM(v->bitmap->plane[i]));
1857 1.1 chopps tmp[j + 1].cp.inst.operand = LOADDR(PREP_DMA_MEM(v->bitmap->plane[i]));
1858 1.1 chopps }
1859 1.1 chopps
1860 1.1 chopps /* set mods correctly. */
1861 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL1MOD));
1862 1.1 chopps tmp[0].cp.inst.operand = v->bitmap->bytes_per_row + v->bitmap->row_mod;
1863 1.1 chopps tmp[1].cp.inst.operand = v->bitmap->bytes_per_row + v->bitmap->row_mod;
1864 1.1 chopps
1865 1.1 chopps /* set next pointers correctly */
1866 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COP1LCH));
1867 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(phl_this_data->frames[F_LACE_STORE_SHORT]));
1868 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(phl_this_data->frames[F_LACE_STORE_SHORT]));
1869 1.1 chopps
1870 1.1 chopps
1871 1.1 chopps bcopy(phl_this_data->frames[F_LACE_STORE_LONG], phl_this_data->frames[F_LACE_STORE_SHORT], std_copper_list_size);
1872 1.1 chopps
1873 1.1 chopps /* these are the only ones that are different from long frame. */
1874 1.1 chopps cp = phl_this_data->frames[F_LACE_STORE_SHORT];
1875 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL0PTH));
1876 1.1 chopps for (i = 0, j = 0; i < depth; j += 2, i++) {
1877 1.1 chopps u_short mod = v->bitmap->bytes_per_row + v->bitmap->row_mod;
1878 1.1 chopps /* update plane pointers. high and low. */
1879 1.1 chopps tmp[j].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[i][mod]));
1880 1.1 chopps tmp[j + 1].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[i][mod]));
1881 1.1 chopps }
1882 1.1 chopps
1883 1.1 chopps /* set next pointers correctly */
1884 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COP1LCH));
1885 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(phl_this_data->frames[F_LACE_STORE_LONG]));
1886 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(phl_this_data->frames[F_LACE_STORE_LONG]));
1887 1.1 chopps
1888 1.1 chopps
1889 1.1 chopps cp = phl_this_data->frames[F_LACE_LONG];
1890 1.1 chopps phl_this_data->frames[F_LACE_LONG] = phl_this_data->frames[F_LACE_STORE_LONG];
1891 1.1 chopps phl_this_data->frames[F_LACE_STORE_LONG] = cp;
1892 1.1 chopps
1893 1.1 chopps cp = phl_this_data->frames[F_LACE_SHORT];
1894 1.1 chopps phl_this_data->frames[F_LACE_SHORT] = phl_this_data->frames[F_LACE_STORE_SHORT];
1895 1.1 chopps phl_this_data->frames[F_LACE_STORE_SHORT] = cp;
1896 1.1 chopps
1897 1.1 chopps vd->flags |= VF_DISPLAY;
1898 1.1 chopps cc_use_colormap(v, vd->colormap);
1899 1.1 chopps }
1900 1.1 chopps cc_load_mode(phl_this);
1901 1.1 chopps }
1902 1.1 chopps #if defined (GRF_A2024)
1903 1.1 chopps
1904 1.1 chopps dmode_t *
1905 1.1 chopps cc_init_pal_hires_dlace()
1906 1.1 chopps {
1907 1.1 chopps /* phdl_this function should only be called once. */
1908 1.1 chopps if (!phdl_this) {
1909 1.1 chopps u_short len = std_dlace_copper_list_len;
1910 1.1 chopps cop_t *cp;
1911 1.1 chopps
1912 1.1 chopps phdl_this = &pal_hires_dlace_mode;
1913 1.1 chopps phdl_this_data = &pal_hires_dlace_mode_data;
1914 1.1 chopps bzero(phdl_this, sizeof(dmode_t));
1915 1.1 chopps bzero(phdl_this_data, sizeof(dmdata_t));
1916 1.1 chopps
1917 1.1 chopps phdl_this->name = "pal: hires double interlace";
1918 1.1 chopps phdl_this->nominal_size.width = 640;
1919 1.1 chopps phdl_this->nominal_size.height = 1024;
1920 1.1 chopps phdl_this_data->max_size.width = 724;
1921 1.1 chopps phdl_this_data->max_size.height = 1024;
1922 1.1 chopps phdl_this_data->min_size.width = 320;
1923 1.1 chopps phdl_this_data->min_size.height = 512;
1924 1.1 chopps phdl_this_data->min_depth = 1;
1925 1.1 chopps phdl_this_data->max_depth = 2;
1926 1.1 chopps phdl_this->data = phdl_this_data;
1927 1.1 chopps
1928 1.1 chopps phdl_this->get_monitor = cc_get_monitor;
1929 1.1 chopps phdl_this->alloc_view = cc_alloc_view;
1930 1.1 chopps phdl_this->get_current_view = cc_get_current_view;
1931 1.1 chopps
1932 1.1 chopps phdl_this_data->use_colormap = cc_a2024_use_colormap;
1933 1.1 chopps phdl_this_data->get_colormap = cc_a2024_get_colormap;
1934 1.1 chopps phdl_this_data->alloc_colormap = cc_a2024_alloc_colormap;
1935 1.1 chopps phdl_this_data->display_view = display_pal_hires_dlace_view;
1936 1.1 chopps phdl_this_data->monitor = cc_monitor;
1937 1.1 chopps
1938 1.1 chopps phdl_this_data->flags |= DMF_INTERLACE;
1939 1.1 chopps
1940 1.1 chopps phdl_this_data->frames = pal_hires_dlace_frames;
1941 1.1 chopps phdl_this_data->frames[F_LACE_LONG] = alloc_chipmem(std_dlace_copper_list_size * F_LACE_TOTAL);
1942 1.1 chopps if (!phdl_this_data->frames[F_LACE_LONG]) {
1943 1.1 chopps panic("couldn't get chipmem for copper list");
1944 1.1 chopps }
1945 1.1 chopps phdl_this_data->frames[F_LACE_SHORT] = &phdl_this_data->frames[F_LACE_LONG][len];
1946 1.1 chopps phdl_this_data->frames[F_LACE_STORE_LONG] = &phdl_this_data->frames[F_LACE_SHORT][len];
1947 1.1 chopps phdl_this_data->frames[F_LACE_STORE_SHORT] = &phdl_this_data->frames[F_LACE_STORE_LONG][len];
1948 1.1 chopps
1949 1.1 chopps bcopy(std_dlace_copper_list, phdl_this_data->frames[F_LACE_STORE_LONG], std_dlace_copper_list_size);
1950 1.1 chopps bcopy(std_dlace_copper_list, phdl_this_data->frames[F_LACE_STORE_SHORT], std_dlace_copper_list_size);
1951 1.1 chopps bcopy(std_dlace_copper_list, phdl_this_data->frames[F_LACE_LONG], std_dlace_copper_list_size);
1952 1.1 chopps bcopy(std_dlace_copper_list, phdl_this_data->frames[F_LACE_SHORT], std_dlace_copper_list_size);
1953 1.1 chopps
1954 1.1 chopps phdl_this_data->bplcon0 = 0x8204 | USE_CON3; /* hires, color
1955 1.1 chopps * composite enable,
1956 1.1 chopps * dlace. */
1957 1.1 chopps phdl_this_data->std_start_x = STANDARD_VIEW_X;
1958 1.1 chopps phdl_this_data->std_start_y = STANDARD_VIEW_Y;
1959 1.1 chopps phdl_this_data->vbl_handler = (vbl_handler_func *) cc_lace_mode_vbl_handler;
1960 1.1 chopps #if defined (GRF_ECS)
1961 1.1 chopps phdl_this_data->beamcon0 = STANDARD_PAL_BEAMCON;
1962 1.1 chopps #endif
1963 1.1 chopps
1964 1.3 chopps LIST_INSERT_HEAD(&MDATA(cc_monitor)->modes, phdl_this, link);
1965 1.1 chopps }
1966 1.1 chopps return (phdl_this);
1967 1.1 chopps }
1968 1.1 chopps
1969 1.1 chopps void
1970 1.1 chopps display_pal_hires_dlace_view(v)
1971 1.1 chopps view_t *v;
1972 1.1 chopps {
1973 1.1 chopps if (phdl_this_data->current_view != v) {
1974 1.1 chopps vdata_t *vd = VDATA(v);
1975 1.1 chopps monitor_t *monitor = phdl_this_data->monitor;
1976 1.1 chopps cop_t *cp = phdl_this_data->frames[F_LACE_STORE_LONG], *tmp;
1977 1.1 chopps int depth = v->bitmap->depth, i;
1978 1.1 chopps int hstart, hstop, vstart, vstop, j;
1979 1.1 chopps int x, y, w = v->display.width, h = v->display.height;
1980 1.1 chopps u_short ddfstart, ddfwidth, con1;
1981 1.1 chopps u_short mod1l, mod2l;
1982 1.1 chopps
1983 1.1 chopps /* round down to nearest even width */
1984 1.1 chopps /* w &= 0xfffe; */
1985 1.1 chopps
1986 1.1 chopps /* calculate datafetch width. */
1987 1.1 chopps ddfwidth = ((v->bitmap->bytes_per_row >> 1) - 2) << 2;
1988 1.1 chopps
1989 1.1 chopps /* Phdl_This will center the any overscanned display */
1990 1.1 chopps /* and allow user to modify. */
1991 1.1 chopps x = v->display.x + phdl_this_data->std_start_x - ((w - 640) >> 2);
1992 1.1 chopps y = v->display.y + phdl_this_data->std_start_y - ((h - 1024) >> 3);
1993 1.1 chopps
1994 1.1 chopps if (y & 1)
1995 1.1 chopps y--;
1996 1.1 chopps
1997 1.1 chopps if (!(x & 1))
1998 1.1 chopps x--;
1999 1.1 chopps
2000 1.1 chopps hstart = x;
2001 1.1 chopps hstop = x + (w >> 1);
2002 1.1 chopps vstart = y;
2003 1.1 chopps vstop = y + (h >> 2);
2004 1.1 chopps ddfstart = (hstart - 9) >> 1;
2005 1.1 chopps
2006 1.1 chopps /* check for hardware limits, AGA may allow more..? */
2007 1.1 chopps /* anyone got a 4000 I can borrow :^) -ch */
2008 1.1 chopps if ((ddfstart & 0xfffc) + ddfwidth > 0xd8) {
2009 1.1 chopps int d = 0;
2010 1.1 chopps
2011 1.1 chopps /* XXX anyone know the equality properties of
2012 1.1 chopps * intermixed logial AND's */
2013 1.1 chopps /* XXX and arithmetic operators? */
2014 1.1 chopps while (((ddfstart & 0xfffc) + ddfwidth - d) > 0xd8) {
2015 1.1 chopps d++;
2016 1.1 chopps }
2017 1.1 chopps
2018 1.1 chopps ddfstart -= d;
2019 1.1 chopps hstart -= d << 1;
2020 1.1 chopps hstop -= d << 1;
2021 1.1 chopps }
2022 1.1 chopps /* correct the datafetch to proper limits. */
2023 1.1 chopps /* delay the actual display of the data until we need it. */
2024 1.1 chopps ddfstart &= 0xfffc;
2025 1.1 chopps con1 = ((hstart - 9) - (ddfstart << 1)) | (((hstart - 9) - (ddfstart << 1)) << 4);
2026 1.1 chopps
2027 1.1 chopps if (phdl_this_data->current_view) {
2028 1.1 chopps VDATA(phdl_this_data->current_view)->flags &= ~VF_DISPLAY; /* mark as no longer */
2029 1.1 chopps /* displayed. */
2030 1.1 chopps }
2031 1.1 chopps phdl_this_data->current_view = v;
2032 1.1 chopps
2033 1.1 chopps cp = phdl_this_data->frames[F_LACE_STORE_LONG];
2034 1.1 chopps #if defined GRF_ECS
2035 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BEAMCON0));
2036 1.1 chopps tmp->cp.inst.operand = phdl_this_data->beamcon0;
2037 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWHIGH));
2038 1.1 chopps tmp->cp.inst.operand = CALC_DIWHIGH(hstart, vstart, hstop, vstop);
2039 1.1 chopps #endif /* ECS */
2040 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON0));
2041 1.1 chopps tmp->cp.inst.operand = phdl_this_data->bplcon0 | ((depth & 0x7) << 13); /* times two. */
2042 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPLCON1));
2043 1.1 chopps tmp->cp.inst.operand = con1;
2044 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTART));
2045 1.1 chopps tmp->cp.inst.operand = ((vstart & 0xff) << 8) | (hstart & 0xff);
2046 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DIWSTOP));
2047 1.1 chopps tmp->cp.inst.operand = ((vstop & 0xff) << 8) | (hstop & 0xff);
2048 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTART));
2049 1.1 chopps tmp->cp.inst.operand = ddfstart;
2050 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_DDFSTOP));
2051 1.1 chopps tmp->cp.inst.operand = ddfstart + ddfwidth;
2052 1.1 chopps
2053 1.1 chopps mod1l = v->bitmap->bytes_per_row + v->bitmap->row_mod;
2054 1.1 chopps mod2l = mod1l << 1;
2055 1.1 chopps
2056 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL0PTH));
2057 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[0][0])); /* update plane
2058 1.1 chopps * pointers. */
2059 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[0][0])); /* high and low. */
2060 1.1 chopps tmp[2].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod1l])); /* update plane
2061 1.1 chopps * pointers. */
2062 1.1 chopps tmp[3].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod1l])); /* high and low. */
2063 1.1 chopps if (depth == 2) {
2064 1.1 chopps tmp[4].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[1][0])); /* update plane
2065 1.1 chopps * pointers. */
2066 1.1 chopps tmp[5].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[1][0])); /* high and low. */
2067 1.1 chopps tmp[6].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod1l])); /* update plane
2068 1.1 chopps * pointers. */
2069 1.1 chopps tmp[7].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod1l])); /* high and low. */
2070 1.1 chopps }
2071 1.1 chopps /* set mods correctly. */
2072 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL1MOD));
2073 1.1 chopps tmp[0].cp.inst.operand = mod2l + mod1l;
2074 1.1 chopps tmp[1].cp.inst.operand = mod2l + mod1l;
2075 1.1 chopps
2076 1.1 chopps /* set next pointers correctly */
2077 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COP1LCH));
2078 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(phdl_this_data->frames[F_LACE_STORE_SHORT]));
2079 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(phdl_this_data->frames[F_LACE_STORE_SHORT]));
2080 1.1 chopps
2081 1.1 chopps bcopy(phdl_this_data->frames[F_LACE_STORE_LONG], phdl_this_data->frames[F_LACE_STORE_SHORT], std_dlace_copper_list_size);
2082 1.1 chopps
2083 1.1 chopps /* these are the only ones that are different from long frame. */
2084 1.1 chopps cp = phdl_this_data->frames[F_LACE_STORE_SHORT];
2085 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_BPL0PTH));
2086 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod2l])); /* update plane
2087 1.1 chopps * pointers. */
2088 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod2l])); /* high and low. */
2089 1.1 chopps tmp[2].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod2l + mod1l])); /* update plane
2090 1.1 chopps * pointers. */
2091 1.1 chopps tmp[3].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[0][mod2l + mod1l])); /* high and low. */
2092 1.1 chopps if (depth == 2) {
2093 1.1 chopps tmp[4].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod2l])); /* update plane
2094 1.1 chopps * pointers. */
2095 1.1 chopps tmp[5].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod2l])); /* high and low. */
2096 1.1 chopps tmp[6].cp.inst.operand = HIADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod2l + mod1l])); /* update plane
2097 1.1 chopps * pointers. */
2098 1.1 chopps tmp[7].cp.inst.operand = LOADDR(PREP_DMA_MEM(&v->bitmap->plane[1][mod2l + mod1l])); /* high and low. */
2099 1.1 chopps }
2100 1.1 chopps /* set next pointers correctly */
2101 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COP1LCH));
2102 1.1 chopps tmp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(phdl_this_data->frames[F_LACE_STORE_LONG]));
2103 1.1 chopps tmp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(phdl_this_data->frames[F_LACE_STORE_LONG]));
2104 1.1 chopps
2105 1.1 chopps cp = phdl_this_data->frames[F_LACE_LONG];
2106 1.1 chopps phdl_this_data->frames[F_LACE_LONG] = phdl_this_data->frames[F_LACE_STORE_LONG];
2107 1.1 chopps phdl_this_data->frames[F_LACE_STORE_LONG] = cp;
2108 1.1 chopps
2109 1.1 chopps cp = phdl_this_data->frames[F_LACE_SHORT];
2110 1.1 chopps phdl_this_data->frames[F_LACE_SHORT] = phdl_this_data->frames[F_LACE_STORE_SHORT];
2111 1.1 chopps phdl_this_data->frames[F_LACE_STORE_SHORT] = cp;
2112 1.1 chopps
2113 1.1 chopps vd->flags |= VF_DISPLAY;
2114 1.1 chopps
2115 1.1 chopps cc_a2024_use_colormap(v, vd->colormap);
2116 1.1 chopps }
2117 1.1 chopps cc_load_mode(phdl_this);
2118 1.1 chopps }
2119 1.1 chopps
2120 1.1 chopps dmode_t *
2121 1.1 chopps cc_init_pal_a2024()
2122 1.1 chopps {
2123 1.1 chopps /* p24_this function should only be called once. */
2124 1.1 chopps if (!p24_this) {
2125 1.1 chopps int i;
2126 1.1 chopps u_short len = std_pal_a2024_copper_list_len;
2127 1.1 chopps cop_t *cp;
2128 1.1 chopps
2129 1.1 chopps p24_this = &pal_a2024_mode;
2130 1.1 chopps p24_this_data = &pal_a2024_mode_data;
2131 1.1 chopps bzero(p24_this, sizeof(dmode_t));
2132 1.1 chopps bzero(p24_this_data, sizeof(dmdata_t));
2133 1.1 chopps
2134 1.1 chopps p24_this->name = "pal: A2024 15khz";
2135 1.1 chopps p24_this->nominal_size.width = 1024;
2136 1.1 chopps p24_this->nominal_size.height = 1024;
2137 1.1 chopps p24_this_data->max_size.width = 1024;
2138 1.1 chopps p24_this_data->max_size.height = 1024;
2139 1.1 chopps p24_this_data->min_size.width = 1024;
2140 1.1 chopps p24_this_data->min_size.height = 1024;
2141 1.1 chopps p24_this_data->min_depth = 1;
2142 1.1 chopps p24_this_data->max_depth = 2;
2143 1.1 chopps p24_this->data = p24_this_data;
2144 1.1 chopps
2145 1.1 chopps p24_this->get_monitor = cc_get_monitor;
2146 1.1 chopps p24_this->alloc_view = cc_alloc_view;
2147 1.1 chopps p24_this->get_current_view = cc_get_current_view;
2148 1.1 chopps
2149 1.1 chopps p24_this_data->use_colormap = cc_a2024_use_colormap;
2150 1.1 chopps p24_this_data->get_colormap = cc_a2024_get_colormap;
2151 1.1 chopps p24_this_data->display_view = display_pal_a2024_view;
2152 1.1 chopps p24_this_data->alloc_colormap = cc_a2024_alloc_colormap;
2153 1.1 chopps p24_this_data->monitor = cc_monitor;
2154 1.1 chopps
2155 1.1 chopps p24_this_data->flags |= DMF_HEDLEY_EXP;
2156 1.1 chopps
2157 1.1 chopps p24_this_data->frames = pal_a2024_frames;
2158 1.1 chopps p24_this_data->frames[F_QD_QUAD0] = alloc_chipmem(std_pal_a2024_copper_list_size * F_QD_TOTAL);
2159 1.1 chopps if (!p24_this_data->frames[F_QD_QUAD0]) {
2160 1.1 chopps panic("couldn't get chipmem for copper list");
2161 1.1 chopps }
2162 1.1 chopps /* setup the hedley init bitplane. */
2163 1.1 chopps hedley_init = alloc_chipmem(128);
2164 1.1 chopps if (!hedley_init) {
2165 1.1 chopps panic("couldn't get chipmem for hedley init bitplane");
2166 1.1 chopps }
2167 1.1 chopps for (i = 1; i < 128; i++)
2168 1.1 chopps hedley_init[i] = 0xff;
2169 1.1 chopps hedley_init[0] = 0x03;
2170 1.1 chopps
2171 1.1 chopps /* copy image of standard copper list. */
2172 1.1 chopps bcopy(std_pal_a2024_copper_list, p24_this_data->frames[0], std_pal_a2024_copper_list_size);
2173 1.1 chopps
2174 1.1 chopps /* set the init plane pointer. */
2175 1.1 chopps cp = find_copper_inst(p24_this_data->frames[F_QD_QUAD0], CI_MOVE(R_BPL0PTH));
2176 1.1 chopps cp[0].cp.inst.operand = HIADDR(PREP_DMA_MEM(hedley_init));
2177 1.1 chopps cp[1].cp.inst.operand = LOADDR(PREP_DMA_MEM(hedley_init));
2178 1.1 chopps
2179 1.1 chopps for (i = 1; i < F_QD_TOTAL; i++) {
2180 1.1 chopps p24_this_data->frames[i] = &p24_this_data->frames[i - 1][len];
2181 1.1 chopps bcopy(p24_this_data->frames[0], p24_this_data->frames[i], std_pal_a2024_copper_list_size);
2182 1.1 chopps }
2183 1.1 chopps
2184 1.1 chopps p24_this_data->bplcon0 = 0x8200; /* hires */
2185 1.1 chopps p24_this_data->vbl_handler = (vbl_handler_func *) pal_a2024_mode_vbl_handler;
2186 1.1 chopps
2187 1.1 chopps
2188 1.3 chopps LIST_INSERT_HEAD(&MDATA(cc_monitor)->modes, p24_this, link);
2189 1.1 chopps }
2190 1.1 chopps return (p24_this);
2191 1.1 chopps }
2192 1.1 chopps
2193 1.1 chopps void
2194 1.1 chopps display_pal_a2024_view(v)
2195 1.1 chopps view_t *v;
2196 1.1 chopps {
2197 1.1 chopps if (p24_this_data->current_view != v) {
2198 1.1 chopps vdata_t *vd = VDATA(v);
2199 1.1 chopps monitor_t *monitor = p24_this_data->monitor;
2200 1.1 chopps cop_t *cp, *tmp;
2201 1.1 chopps u_char *inst_plane[2];
2202 1.1 chopps u_char **plane = inst_plane;
2203 1.1 chopps u_long full_line = v->bitmap->bytes_per_row + v->bitmap->row_mod;
2204 1.1 chopps u_long half_plane = full_line * v->bitmap->rows / 2;
2205 1.1 chopps
2206 1.1 chopps int line_mod = 0xbc; /* standard 2024 15khz mod. */
2207 1.1 chopps int depth = v->bitmap->depth, i, j;
2208 1.1 chopps
2209 1.1 chopps plane[0] = v->bitmap->plane[0];
2210 1.1 chopps if (depth == 2) {
2211 1.1 chopps plane[1] = v->bitmap->plane[1];
2212 1.1 chopps }
2213 1.1 chopps if (p24_this_data->current_view) {
2214 1.1 chopps VDATA(p24_this_data->current_view)->flags &= ~VF_DISPLAY; /* mark as no longer
2215 1.1 chopps * displayed. */
2216 1.1 chopps }
2217 1.1 chopps cp = p24_this_data->frames[F_QD_STORE_QUAD0];
2218 1.1 chopps tmp = find_copper_inst(cp, CI_MOVE(R_COLOR1F));
2219 1.1 chopps tmp = find_copper_inst(tmp, CI_MOVE(R_BPLCON0)); /* grab third one. */
2220 1.1 chopps tmp->cp.inst.operand = p24_this_data->bplcon0 | ((depth & 0x7) << 13); /* times 2 */
2221 1.1 chopps
2222 1.1 chopps bcopy(p24_this_data->frames[F_QD_STORE_QUAD0], p24_this_data->frames[F_QD_STORE_QUAD1], std_pal_a2024_copper_list_size);
2223 1.1 chopps bcopy(p24_this_data->frames[F_QD_STORE_QUAD0], p24_this_data->frames[F_QD_STORE_QUAD2], std_pal_a2024_copper_list_size);
2224 1.1 chopps bcopy(p24_this_data->frames[F_QD_STORE_QUAD0], p24_this_data->frames[F_QD_STORE_QUAD3], std_pal_a2024_copper_list_size);
2225 1.1 chopps
2226 1.1 chopps /*
2227 1.1 chopps * Mark Id's
2228 1.1 chopps */
2229 1.1 chopps tmp = find_copper_inst(p24_this_data->frames[F_QD_STORE_QUAD1], CI_WAIT(126, 29));
2230 1.1 chopps CBUMP(tmp);
2231 1.1 chopps CMOVE(tmp, R_COLOR01, QUAD1_ID);
2232 1.1 chopps tmp = find_copper_inst(p24_this_data->frames[F_QD_STORE_QUAD2], CI_WAIT(126, 29));
2233 1.1 chopps CBUMP(tmp);
2234 1.1 chopps CMOVE(tmp, R_COLOR01, QUAD2_ID);
2235 1.1 chopps tmp = find_copper_inst(p24_this_data->frames[F_QD_STORE_QUAD3], CI_WAIT(126, 29));
2236 1.1 chopps CBUMP(tmp);
2237 1.1 chopps CMOVE(tmp, R_COLOR01, QUAD3_ID);
2238 1.1 chopps
2239 1.1 chopps plane[0]--;
2240 1.1 chopps plane[0]--;
2241 1.1 chopps if (depth == 2) {
2242 1.1 chopps plane[1]--;
2243 1.1 chopps plane[1]--;
2244 1.1 chopps }
2245 1.1 chopps /*
2246 1.1 chopps * Set bitplane pointers.
2247 1.1 chopps */
2248 1.1 chopps tmp = find_copper_inst(p24_this_data->frames[F_QD_STORE_QUAD0], CI_MOVE(R_BPLMOD2));
2249 1.1 chopps CBUMP(tmp);
2250 1.1 chopps CMOVE(tmp, R_BPL0PTH, HIADDR(PREP_DMA_MEM(&plane[0][0])));
2251 1.1 chopps CMOVE(tmp, R_BPL0PTL, LOADDR(PREP_DMA_MEM(&plane[0][0])));
2252 1.1 chopps CMOVE(tmp, R_BPL1PTH, HIADDR(PREP_DMA_MEM(&plane[0][full_line])));
2253 1.1 chopps CMOVE(tmp, R_BPL1PTL, LOADDR(PREP_DMA_MEM(&plane[0][full_line])));
2254 1.1 chopps if (depth == 2) {
2255 1.1 chopps CMOVE(tmp, R_BPL2PTH, HIADDR(PREP_DMA_MEM(&plane[1][0])));
2256 1.1 chopps CMOVE(tmp, R_BPL2PTL, LOADDR(PREP_DMA_MEM(&plane[1][0])));
2257 1.1 chopps CMOVE(tmp, R_BPL3PTH, HIADDR(PREP_DMA_MEM(&plane[1][full_line])));
2258 1.1 chopps CMOVE(tmp, R_BPL3PTL, LOADDR(PREP_DMA_MEM(&plane[1][full_line])));
2259 1.1 chopps }
2260 1.1 chopps #if defined (GRF_ECS)
2261 1.1 chopps CMOVE(tmp, R_DIWHIGH, 0x2100);
2262 1.1 chopps #endif
2263 1.1 chopps CMOVE(tmp, R_COP1LCH, HIADDR(PREP_DMA_MEM(p24_this_data->frames[F_QD_STORE_QUAD1])));
2264 1.1 chopps CMOVE(tmp, R_COP1LCL, LOADDR(PREP_DMA_MEM(p24_this_data->frames[F_QD_STORE_QUAD1])));
2265 1.1 chopps CEND(tmp);
2266 1.1 chopps CEND(tmp);
2267 1.1 chopps
2268 1.1 chopps tmp = find_copper_inst(p24_this_data->frames[F_QD_STORE_QUAD1], CI_MOVE(R_BPLMOD2));
2269 1.1 chopps CBUMP(tmp);
2270 1.1 chopps CMOVE(tmp, R_BPL0PTH, HIADDR(PREP_DMA_MEM(&plane[0][HALF_2024_LINE])));
2271 1.1 chopps CMOVE(tmp, R_BPL0PTL, LOADDR(PREP_DMA_MEM(&plane[0][HALF_2024_LINE])));
2272 1.1 chopps CMOVE(tmp, R_BPL1PTH, HIADDR(PREP_DMA_MEM(&plane[0][full_line + HALF_2024_LINE])));
2273 1.1 chopps CMOVE(tmp, R_BPL1PTL, LOADDR(PREP_DMA_MEM(&plane[0][full_line + HALF_2024_LINE])));
2274 1.1 chopps if (depth == 2) {
2275 1.1 chopps CMOVE(tmp, R_BPL2PTH, HIADDR(PREP_DMA_MEM(&plane[1][HALF_2024_LINE])));
2276 1.1 chopps CMOVE(tmp, R_BPL2PTL, LOADDR(PREP_DMA_MEM(&plane[1][HALF_2024_LINE])));
2277 1.1 chopps CMOVE(tmp, R_BPL3PTH, HIADDR(PREP_DMA_MEM(&plane[1][full_line + HALF_2024_LINE])));
2278 1.1 chopps CMOVE(tmp, R_BPL3PTL, LOADDR(PREP_DMA_MEM(&plane[1][full_line + HALF_2024_LINE])));
2279 1.1 chopps }
2280 1.1 chopps #if defined (GRF_ECS)
2281 1.1 chopps CMOVE(tmp, R_DIWHIGH, 0x2100);
2282 1.1 chopps #endif
2283 1.1 chopps CMOVE(tmp, R_COP1LCH, HIADDR(PREP_DMA_MEM(p24_this_data->frames[F_QD_STORE_QUAD2])));
2284 1.1 chopps CMOVE(tmp, R_COP1LCL, LOADDR(PREP_DMA_MEM(p24_this_data->frames[F_QD_STORE_QUAD2])));
2285 1.1 chopps CEND(tmp);
2286 1.1 chopps CEND(tmp);
2287 1.1 chopps
2288 1.1 chopps tmp = find_copper_inst(p24_this_data->frames[F_QD_STORE_QUAD2], CI_MOVE(R_BPLMOD2));
2289 1.1 chopps CBUMP(tmp);
2290 1.1 chopps CMOVE(tmp, R_BPL0PTH, HIADDR(PREP_DMA_MEM(&plane[0][half_plane])));
2291 1.1 chopps CMOVE(tmp, R_BPL0PTL, LOADDR(PREP_DMA_MEM(&plane[0][half_plane])));
2292 1.1 chopps CMOVE(tmp, R_BPL1PTH, HIADDR(PREP_DMA_MEM(&plane[0][half_plane + full_line])));
2293 1.1 chopps CMOVE(tmp, R_BPL1PTL, LOADDR(PREP_DMA_MEM(&plane[0][half_plane + full_line])));
2294 1.1 chopps if (depth == 2) {
2295 1.1 chopps CMOVE(tmp, R_BPL2PTH, HIADDR(PREP_DMA_MEM(&plane[1][half_plane])));
2296 1.1 chopps CMOVE(tmp, R_BPL2PTL, LOADDR(PREP_DMA_MEM(&plane[1][half_plane])));
2297 1.1 chopps CMOVE(tmp, R_BPL3PTH, HIADDR(PREP_DMA_MEM(&plane[1][half_plane + full_line])));
2298 1.1 chopps CMOVE(tmp, R_BPL3PTL, LOADDR(PREP_DMA_MEM(&plane[1][half_plane + full_line])));
2299 1.1 chopps }
2300 1.1 chopps #if defined (GRF_ECS)
2301 1.1 chopps CMOVE(tmp, R_DIWHIGH, 0x2100);
2302 1.1 chopps #endif
2303 1.1 chopps CMOVE(tmp, R_COP1LCH, HIADDR(PREP_DMA_MEM(p24_this_data->frames[F_QD_STORE_QUAD3])));
2304 1.1 chopps CMOVE(tmp, R_COP1LCL, LOADDR(PREP_DMA_MEM(p24_this_data->frames[F_QD_STORE_QUAD3])));
2305 1.1 chopps CEND(tmp);
2306 1.1 chopps CEND(tmp);
2307 1.1 chopps
2308 1.1 chopps tmp = find_copper_inst(p24_this_data->frames[F_QD_STORE_QUAD3], CI_MOVE(R_BPLMOD2));
2309 1.1 chopps CBUMP(tmp);
2310 1.1 chopps CMOVE(tmp, R_BPL0PTH, HIADDR(PREP_DMA_MEM(&plane[0][half_plane + HALF_2024_LINE])));
2311 1.1 chopps CMOVE(tmp, R_BPL0PTL, LOADDR(PREP_DMA_MEM(&plane[0][half_plane + HALF_2024_LINE])));
2312 1.1 chopps CMOVE(tmp, R_BPL1PTH, HIADDR(PREP_DMA_MEM(&plane[0][half_plane + full_line + HALF_2024_LINE])));
2313 1.1 chopps CMOVE(tmp, R_BPL1PTL, LOADDR(PREP_DMA_MEM(&plane[0][half_plane + full_line + HALF_2024_LINE])));
2314 1.1 chopps if (depth == 2) {
2315 1.1 chopps CMOVE(tmp, R_BPL2PTH, HIADDR(PREP_DMA_MEM(&plane[1][half_plane + HALF_2024_LINE])));
2316 1.1 chopps CMOVE(tmp, R_BPL2PTL, LOADDR(PREP_DMA_MEM(&plane[1][half_plane + HALF_2024_LINE])));
2317 1.1 chopps CMOVE(tmp, R_BPL3PTH, HIADDR(PREP_DMA_MEM(&plane[1][half_plane + full_line + HALF_2024_LINE])));
2318 1.1 chopps CMOVE(tmp, R_BPL3PTL, LOADDR(PREP_DMA_MEM(&plane[1][half_plane + full_line + HALF_2024_LINE])));
2319 1.1 chopps }
2320 1.1 chopps #if defined (GRF_ECS)
2321 1.1 chopps CMOVE(tmp, R_DIWHIGH, 0x2100);
2322 1.1 chopps #endif
2323 1.1 chopps CMOVE(tmp, R_COP1LCH, HIADDR(PREP_DMA_MEM(p24_this_data->frames[F_QD_STORE_QUAD0])));
2324 1.1 chopps CMOVE(tmp, R_COP1LCL, LOADDR(PREP_DMA_MEM(p24_this_data->frames[F_QD_STORE_QUAD0])));
2325 1.1 chopps CEND(tmp);
2326 1.1 chopps CEND(tmp);
2327 1.1 chopps
2328 1.1 chopps /* swap new pointers in. */
2329 1.1 chopps for (i = F_QD_STORE_QUAD0, j = F_QD_QUAD0;
2330 1.1 chopps i <= F_QD_STORE_QUAD3; i++, j++) {
2331 1.1 chopps cp = p24_this_data->frames[j];
2332 1.1 chopps p24_this_data->frames[j] = p24_this_data->frames[i];
2333 1.1 chopps p24_this_data->frames[i] = cp;
2334 1.1 chopps }
2335 1.1 chopps
2336 1.1 chopps p24_this_data->current_view = v;
2337 1.1 chopps vd->flags |= VF_DISPLAY;
2338 1.1 chopps
2339 1.1 chopps cc_a2024_use_colormap(v, vd->colormap);
2340 1.1 chopps }
2341 1.1 chopps cc_load_mode(p24_this);
2342 1.1 chopps }
2343 1.1 chopps
2344 1.1 chopps void
2345 1.1 chopps pal_a2024_mode_vbl_handler(d)
2346 1.1 chopps dmode_t *d;
2347 1.1 chopps {
2348 1.1 chopps u_short vp = ((custom.vposr & 0x0007) << 8) | ((custom.vhposr) >> 8);
2349 1.1 chopps
2350 1.1 chopps if (vp < 20) {
2351 1.1 chopps custom.cop1lc = PREP_DMA_MEM(p24_this_data->frames[p24_this_data->hedley_current]);
2352 1.1 chopps custom.copjmp1 = 0;
2353 1.1 chopps }
2354 1.1 chopps p24_this_data->hedley_current++;
2355 1.1 chopps p24_this_data->hedley_current &= 0x3; /* if 4 then 0. */
2356 1.1 chopps }
2357 1.1 chopps #endif /* GRF_PAL */
2358 1.1 chopps #endif /* GRF_A2024 */
2359