config.c 18.1 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
/*
 *  linux/arch/m68k/atari/config.c
 *
 *  Copyright (C) 1994 Bjoern Brauel
 *
 *  5/2/94 Roman Hodek:
 *    Added setting of time_adj to get a better clock.
 *
 *  5/14/94 Roman Hodek:
 *    gettod() for TT
 *
 *  5/15/94 Roman Hodek:
 *    hard_reset_now() for Atari (and others?)
 *
 *  94/12/30 Andreas Schwab:
 *    atari_sched_init fixed to get precise clock.
 *
 * This file is subject to the terms and conditions of the GNU General Public
 * License.  See the file COPYING in the main directory of this archive
 * for more details.
 */

/*
 * Miscellaneous atari stuff
 */

#include <linux/types.h>
#include <linux/mm.h>
29
#include <linux/seq_file.h>
L
Linus Torvalds 已提交
30 31 32 33 34
#include <linux/console.h>
#include <linux/init.h>
#include <linux/delay.h>
#include <linux/ioport.h>
#include <linux/vt_kern.h>
35
#include <linux/module.h>
L
Linus Torvalds 已提交
36 37 38 39 40 41 42 43 44 45 46 47

#include <asm/bootinfo.h>
#include <asm/setup.h>
#include <asm/atarihw.h>
#include <asm/atariints.h>
#include <asm/atari_stram.h>
#include <asm/system.h>
#include <asm/machdep.h>
#include <asm/hwtest.h>
#include <asm/io.h>

u_long atari_mch_cookie;
48 49
EXPORT_SYMBOL(atari_mch_cookie);

L
Linus Torvalds 已提交
50
u_long atari_mch_type;
51 52
EXPORT_SYMBOL(atari_mch_type);

L
Linus Torvalds 已提交
53
struct atari_hw_present atari_hw_present;
54 55
EXPORT_SYMBOL(atari_hw_present);

L
Linus Torvalds 已提交
56
u_long atari_switches;
57 58
EXPORT_SYMBOL(atari_switches);

L
Linus Torvalds 已提交
59
int atari_dont_touch_floppy_select;
60 61
EXPORT_SYMBOL(atari_dont_touch_floppy_select);

L
Linus Torvalds 已提交
62 63 64
int atari_rtc_year_offset;

/* local function prototypes */
R
Roman Zippel 已提交
65
static void atari_reset(void);
L
Linus Torvalds 已提交
66
static void atari_get_model(char *model);
67
static void atari_get_hardware_list(struct seq_file *m);
L
Linus Torvalds 已提交
68 69 70

/* atari specific irq functions */
extern void atari_init_IRQ (void);
R
Roman Zippel 已提交
71
extern void atari_mksound(unsigned int count, unsigned int ticks);
L
Linus Torvalds 已提交
72
#ifdef CONFIG_HEARTBEAT
R
Roman Zippel 已提交
73
static void atari_heartbeat(int on);
L
Linus Torvalds 已提交
74 75 76
#endif

/* atari specific timer functions (in time.c) */
R
Roman Zippel 已提交
77
extern void atari_sched_init(irq_handler_t);
L
Linus Torvalds 已提交
78 79 80 81 82 83 84 85 86 87 88 89 90 91 92
extern unsigned long atari_gettimeoffset (void);
extern int atari_mste_hwclk (int, struct rtc_time *);
extern int atari_tt_hwclk (int, struct rtc_time *);
extern int atari_mste_set_clock_mmss (unsigned long);
extern int atari_tt_set_clock_mmss (unsigned long);


/* ++roman: This is a more elaborate test for an SCC chip, since the plain
 * Medusa board generates DTACK at the SCC's standard addresses, but a SCC
 * board in the Medusa is possible. Also, the addresses where the ST_ESCC
 * resides generate DTACK without the chip, too.
 * The method is to write values into the interrupt vector register, that
 * should be readable without trouble (from channel A!).
 */

R
Roman Zippel 已提交
93
static int __init scc_test(volatile char *ctla)
L
Linus Torvalds 已提交
94
{
R
Roman Zippel 已提交
95 96
	if (!hwreg_present(ctla))
		return 0;
L
Linus Torvalds 已提交
97 98
	MFPDELAY();

R
Roman Zippel 已提交
99 100 101 102
	*ctla = 2;
	MFPDELAY();
	*ctla = 0x40;
	MFPDELAY();
L
Linus Torvalds 已提交
103

R
Roman Zippel 已提交
104 105 106 107
	*ctla = 2;
	MFPDELAY();
	if (*ctla != 0x40)
		return 0;
L
Linus Torvalds 已提交
108 109
	MFPDELAY();

R
Roman Zippel 已提交
110 111 112 113
	*ctla = 2;
	MFPDELAY();
	*ctla = 0x60;
	MFPDELAY();
L
Linus Torvalds 已提交
114

R
Roman Zippel 已提交
115 116 117 118
	*ctla = 2;
	MFPDELAY();
	if (*ctla != 0x60)
		return 0;
L
Linus Torvalds 已提交
119

R
Roman Zippel 已提交
120
	return 1;
L
Linus Torvalds 已提交
121 122 123 124 125 126 127 128 129
}


    /*
     *  Parse an Atari-specific record in the bootinfo
     */

int __init atari_parse_bootinfo(const struct bi_record *record)
{
R
Roman Zippel 已提交
130 131
	int unknown = 0;
	const u_long *data = record->data;
L
Linus Torvalds 已提交
132

R
Roman Zippel 已提交
133
	switch (record->tag) {
L
Linus Torvalds 已提交
134
	case BI_ATARI_MCH_COOKIE:
R
Roman Zippel 已提交
135 136
		atari_mch_cookie = *data;
		break;
L
Linus Torvalds 已提交
137
	case BI_ATARI_MCH_TYPE:
R
Roman Zippel 已提交
138 139
		atari_mch_type = *data;
		break;
L
Linus Torvalds 已提交
140
	default:
R
Roman Zippel 已提交
141 142 143 144
		unknown = 1;
		break;
	}
	return unknown;
L
Linus Torvalds 已提交
145 146 147 148
}


/* Parse the Atari-specific switches= option. */
R
Roman Zippel 已提交
149
static int __init atari_switches_setup(char *str)
L
Linus Torvalds 已提交
150
{
R
Roman Zippel 已提交
151
	char switches[strlen(str) + 1];
R
Roman Zippel 已提交
152 153 154 155
	char *p;
	int ovsc_shift;
	char *args = switches;

R
Roman Zippel 已提交
156 157 158
	if (!MACH_IS_ATARI)
		return 0;

R
Roman Zippel 已提交
159
	/* copy string to local array, strsep works destructively... */
R
Roman Zippel 已提交
160
	strcpy(switches, str);
R
Roman Zippel 已提交
161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183
	atari_switches = 0;

	/* parse the options */
	while ((p = strsep(&args, ",")) != NULL) {
		if (!*p)
			continue;
		ovsc_shift = 0;
		if (strncmp(p, "ov_", 3) == 0) {
			p += 3;
			ovsc_shift = ATARI_SWITCH_OVSC_SHIFT;
		}

		if (strcmp(p, "ikbd") == 0) {
			/* RTS line of IKBD ACIA */
			atari_switches |= ATARI_SWITCH_IKBD << ovsc_shift;
		} else if (strcmp(p, "midi") == 0) {
			/* RTS line of MIDI ACIA */
			atari_switches |= ATARI_SWITCH_MIDI << ovsc_shift;
		} else if (strcmp(p, "snd6") == 0) {
			atari_switches |= ATARI_SWITCH_SND6 << ovsc_shift;
		} else if (strcmp(p, "snd7") == 0) {
			atari_switches |= ATARI_SWITCH_SND7 << ovsc_shift;
		}
L
Linus Torvalds 已提交
184
	}
R
Roman Zippel 已提交
185
	return 0;
L
Linus Torvalds 已提交
186 187
}

R
Roman Zippel 已提交
188 189
early_param("switches", atari_switches_setup);

L
Linus Torvalds 已提交
190 191 192 193 194 195 196

    /*
     *  Setup the Atari configuration info
     */

void __init config_atari(void)
{
R
Roman Zippel 已提交
197
	unsigned short tos_version;
L
Linus Torvalds 已提交
198

R
Roman Zippel 已提交
199
	memset(&atari_hw_present, 0, sizeof(atari_hw_present));
L
Linus Torvalds 已提交
200

R
Roman Zippel 已提交
201 202
	/* Change size of I/O space from 64KB to 4GB. */
	ioport_resource.end  = 0xFFFFFFFF;
L
Linus Torvalds 已提交
203

R
Roman Zippel 已提交
204 205 206 207 208 209 210
	mach_sched_init      = atari_sched_init;
	mach_init_IRQ        = atari_init_IRQ;
	mach_get_model	 = atari_get_model;
	mach_get_hardware_list = atari_get_hardware_list;
	mach_gettimeoffset   = atari_gettimeoffset;
	mach_reset           = atari_reset;
	mach_max_dma_address = 0xffffff;
L
Linus Torvalds 已提交
211
#if defined(CONFIG_INPUT_M68K_BEEP) || defined(CONFIG_INPUT_M68K_BEEP_MODULE)
R
Roman Zippel 已提交
212
	mach_beep          = atari_mksound;
L
Linus Torvalds 已提交
213 214
#endif
#ifdef CONFIG_HEARTBEAT
R
Roman Zippel 已提交
215
	mach_heartbeat = atari_heartbeat;
L
Linus Torvalds 已提交
216 217
#endif

R
Roman Zippel 已提交
218 219 220 221 222 223 224 225 226 227 228
	/* Set switches as requested by the user */
	if (atari_switches & ATARI_SWITCH_IKBD)
		acia.key_ctrl = ACIA_DIV64 | ACIA_D8N1S | ACIA_RHTID;
	if (atari_switches & ATARI_SWITCH_MIDI)
		acia.mid_ctrl = ACIA_DIV16 | ACIA_D8N1S | ACIA_RHTID;
	if (atari_switches & (ATARI_SWITCH_SND6|ATARI_SWITCH_SND7)) {
		sound_ym.rd_data_reg_sel = 14;
		sound_ym.wd_data = sound_ym.rd_data_reg_sel |
				   ((atari_switches&ATARI_SWITCH_SND6) ? 0x40 : 0) |
				   ((atari_switches&ATARI_SWITCH_SND7) ? 0x80 : 0);
	}
L
Linus Torvalds 已提交
229

R
Roman Zippel 已提交
230 231 232 233 234
	/* ++bjoern:
	 * Determine hardware present
	 */

	printk("Atari hardware found: ");
235
	if (MACH_IS_MEDUSA) {
R
Roman Zippel 已提交
236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260
		/* There's no Atari video hardware on the Medusa, but all the
		 * addresses below generate a DTACK so no bus error occurs! */
	} else if (hwreg_present(f030_xreg)) {
		ATARIHW_SET(VIDEL_SHIFTER);
		printk("VIDEL ");
		/* This is a temporary hack: If there is Falcon video
		 * hardware, we assume that the ST-DMA serves SCSI instead of
		 * ACSI. In the future, there should be a better method for
		 * this...
		 */
		ATARIHW_SET(ST_SCSI);
		printk("STDMA-SCSI ");
	} else if (hwreg_present(tt_palette)) {
		ATARIHW_SET(TT_SHIFTER);
		printk("TT_SHIFTER ");
	} else if (hwreg_present(&shifter.bas_hi)) {
		if (hwreg_present(&shifter.bas_lo) &&
		    (shifter.bas_lo = 0x0aau, shifter.bas_lo == 0x0aau)) {
			ATARIHW_SET(EXTD_SHIFTER);
			printk("EXTD_SHIFTER ");
		} else {
			ATARIHW_SET(STND_SHIFTER);
			printk("STND_SHIFTER ");
		}
	}
261
	if (hwreg_present(&st_mfp.par_dt_reg)) {
R
Roman Zippel 已提交
262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293
		ATARIHW_SET(ST_MFP);
		printk("ST_MFP ");
	}
	if (hwreg_present(&tt_mfp.par_dt_reg)) {
		ATARIHW_SET(TT_MFP);
		printk("TT_MFP ");
	}
	if (hwreg_present(&tt_scsi_dma.dma_addr_hi)) {
		ATARIHW_SET(SCSI_DMA);
		printk("TT_SCSI_DMA ");
	}
	/*
	 * The ST-DMA address registers aren't readable
	 * on all Medusas, so the test below may fail
	 */
	if (MACH_IS_MEDUSA ||
	    (hwreg_present(&st_dma.dma_vhi) &&
	     (st_dma.dma_vhi = 0x55) && (st_dma.dma_hi = 0xaa) &&
	     st_dma.dma_vhi == 0x55 && st_dma.dma_hi == 0xaa &&
	     (st_dma.dma_vhi = 0xaa) && (st_dma.dma_hi = 0x55) &&
	     st_dma.dma_vhi == 0xaa && st_dma.dma_hi == 0x55)) {
		ATARIHW_SET(EXTD_DMA);
		printk("EXTD_DMA ");
	}
	if (hwreg_present(&tt_scsi.scsi_data)) {
		ATARIHW_SET(TT_SCSI);
		printk("TT_SCSI ");
	}
	if (hwreg_present(&sound_ym.rd_data_reg_sel)) {
		ATARIHW_SET(YM_2149);
		printk("YM2149 ");
	}
294
	if (!MACH_IS_MEDUSA && hwreg_present(&tt_dmasnd.ctrl)) {
R
Roman Zippel 已提交
295 296 297
		ATARIHW_SET(PCM_8BIT);
		printk("PCM ");
	}
298
	if (hwreg_present(&falcon_codec.unused5)) {
R
Roman Zippel 已提交
299 300 301 302 303 304 305 306
		ATARIHW_SET(CODEC);
		printk("CODEC ");
	}
	if (hwreg_present(&dsp56k_host_interface.icr)) {
		ATARIHW_SET(DSP56K);
		printk("DSP56K ");
	}
	if (hwreg_present(&tt_scc_dma.dma_ctrl) &&
L
Linus Torvalds 已提交
307
#if 0
R
Roman Zippel 已提交
308 309 310
	    /* This test sucks! Who knows some better? */
	    (tt_scc_dma.dma_ctrl = 0x01, (tt_scc_dma.dma_ctrl & 1) == 1) &&
	    (tt_scc_dma.dma_ctrl = 0x00, (tt_scc_dma.dma_ctrl & 1) == 0)
L
Linus Torvalds 已提交
311
#else
312
	    !MACH_IS_MEDUSA
L
Linus Torvalds 已提交
313
#endif
R
Roman Zippel 已提交
314 315 316 317
	    ) {
		ATARIHW_SET(SCC_DMA);
		printk("SCC_DMA ");
	}
318
	if (scc_test(&atari_scc.cha_a_ctrl)) {
R
Roman Zippel 已提交
319 320 321 322 323 324 325
		ATARIHW_SET(SCC);
		printk("SCC ");
	}
	if (scc_test(&st_escc.cha_b_ctrl)) {
		ATARIHW_SET(ST_ESCC);
		printk("ST_ESCC ");
	}
326
	if (hwreg_present(&tt_scu.sys_mask)) {
R
Roman Zippel 已提交
327 328 329 330 331 332 333 334 335
		ATARIHW_SET(SCU);
		/* Assume a VME bus if there's a SCU */
		ATARIHW_SET(VME);
		printk("VME SCU ");
	}
	if (hwreg_present((void *)(0xffff9210))) {
		ATARIHW_SET(ANALOG_JOY);
		printk("ANALOG_JOY ");
	}
336
	if (hwreg_present(blitter.halftone)) {
R
Roman Zippel 已提交
337 338 339 340 341 342 343
		ATARIHW_SET(BLITTER);
		printk("BLITTER ");
	}
	if (hwreg_present((void *)0xfff00039)) {
		ATARIHW_SET(IDE);
		printk("IDE ");
	}
L
Linus Torvalds 已提交
344
#if 1 /* This maybe wrong */
345
	if (!MACH_IS_MEDUSA && hwreg_present(&tt_microwire.data) &&
R
Roman Zippel 已提交
346 347 348 349 350 351 352 353 354 355 356
	    hwreg_present(&tt_microwire.mask) &&
	    (tt_microwire.mask = 0x7ff,
	     udelay(1),
	     tt_microwire.data = MW_LM1992_PSG_HIGH | MW_LM1992_ADDR,
	     udelay(1),
	     tt_microwire.data != 0)) {
		ATARIHW_SET(MICROWIRE);
		while (tt_microwire.mask != 0x7ff)
			;
		printk("MICROWIRE ");
	}
L
Linus Torvalds 已提交
357
#endif
R
Roman Zippel 已提交
358 359 360 361 362 363
	if (hwreg_present(&tt_rtc.regsel)) {
		ATARIHW_SET(TT_CLK);
		printk("TT_CLK ");
		mach_hwclk = atari_tt_hwclk;
		mach_set_clock_mmss = atari_tt_set_clock_mmss;
	}
364
	if (hwreg_present(&mste_rtc.sec_ones)) {
R
Roman Zippel 已提交
365 366 367 368 369
		ATARIHW_SET(MSTE_CLK);
		printk("MSTE_CLK ");
		mach_hwclk = atari_mste_hwclk;
		mach_set_clock_mmss = atari_mste_set_clock_mmss;
	}
370
	if (!MACH_IS_MEDUSA && hwreg_present(&dma_wd.fdc_speed) &&
R
Roman Zippel 已提交
371 372 373 374
	    hwreg_write(&dma_wd.fdc_speed, 0)) {
		ATARIHW_SET(FDCSPEED);
		printk("FDC_SPEED ");
	}
375
	if (!ATARIHW_PRESENT(ST_SCSI)) {
R
Roman Zippel 已提交
376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431
		ATARIHW_SET(ACSI);
		printk("ACSI ");
	}
	printk("\n");

	if (CPU_IS_040_OR_060)
		/* Now it seems to be safe to turn of the tt0 transparent
		 * translation (the one that must not be turned off in
		 * head.S...)
		 */
		asm volatile ("\n"
			"	moveq	#0,%%d0\n"
			"	.chip	68040\n"
			"	movec	%%d0,%%itt0\n"
			"	movec	%%d0,%%dtt0\n"
			"	.chip	68k"
			: /* no outputs */
			: /* no inputs */
			: "d0");

	/* allocator for memory that must reside in st-ram */
	atari_stram_init();

	/* Set up a mapping for the VMEbus address region:
	 *
	 * VME is either at phys. 0xfexxxxxx (TT) or 0xa00000..0xdfffff
	 * (MegaSTE) In both cases, the whole 16 MB chunk is mapped at
	 * 0xfe000000 virt., because this can be done with a single
	 * transparent translation. On the 68040, lots of often unused
	 * page tables would be needed otherwise. On a MegaSTE or similar,
	 * the highest byte is stripped off by hardware due to the 24 bit
	 * design of the bus.
	 */

	if (CPU_IS_020_OR_030) {
		unsigned long tt1_val;
		tt1_val = 0xfe008543;	/* Translate 0xfexxxxxx, enable, cache
					 * inhibit, read and write, FDC mask = 3,
					 * FDC val = 4 -> Supervisor only */
		asm volatile ("\n"
			"	.chip	68030\n"
			"	pmove	%0@,%/tt1\n"
			"	.chip	68k"
			: : "a" (&tt1_val));
	} else {
	        asm volatile ("\n"
			"	.chip	68040\n"
			"	movec	%0,%%itt1\n"
			"	movec	%0,%%dtt1\n"
			"	.chip	68k"
			:
			: "d" (0xfe00a040));	/* Translate 0xfexxxxxx, enable,
						 * supervisor only, non-cacheable/
						 * serialized, writable */

	}
L
Linus Torvalds 已提交
432

R
Roman Zippel 已提交
433 434 435 436 437 438 439 440 441 442
	/* Fetch tos version at Physical 2 */
	/*
	 * We my not be able to access this address if the kernel is
	 * loaded to st ram, since the first page is unmapped.  On the
	 * Medusa this is always the case and there is nothing we can do
	 * about this, so we just assume the smaller offset.  For the TT
	 * we use the fact that in head.S we have set up a mapping
	 * 0xFFxxxxxx -> 0x00xxxxxx, so that the first 16MB is accessible
	 * in the last 16MB of the address space.
	 */
443
	tos_version = (MACH_IS_MEDUSA) ?
R
Roman Zippel 已提交
444 445
			0xfff : *(unsigned short *)0xff000002;
	atari_rtc_year_offset = (tos_version < 0x306) ? 70 : 68;
L
Linus Torvalds 已提交
446 447 448
}

#ifdef CONFIG_HEARTBEAT
R
Roman Zippel 已提交
449
static void atari_heartbeat(int on)
L
Linus Torvalds 已提交
450
{
R
Roman Zippel 已提交
451 452
	unsigned char tmp;
	unsigned long flags;
L
Linus Torvalds 已提交
453

R
Roman Zippel 已提交
454 455
	if (atari_dont_touch_floppy_select)
		return;
L
Linus Torvalds 已提交
456

R
Roman Zippel 已提交
457 458 459 460 461
	local_irq_save(flags);
	sound_ym.rd_data_reg_sel = 14;	/* Select PSG Port A */
	tmp = sound_ym.rd_data_reg_sel;
	sound_ym.wd_data = on ? (tmp & ~0x02) : (tmp | 0x02);
	local_irq_restore(flags);
L
Linus Torvalds 已提交
462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495
}
#endif

/* ++roman:
 *
 * This function does a reset on machines that lack the ability to
 * assert the processor's _RESET signal somehow via hardware. It is
 * based on the fact that you can find the initial SP and PC values
 * after a reset at physical addresses 0 and 4. This works pretty well
 * for Atari machines, since the lowest 8 bytes of physical memory are
 * really ROM (mapped by hardware). For other 680x0 machines: don't
 * know if it works...
 *
 * To get the values at addresses 0 and 4, the MMU better is turned
 * off first. After that, we have to jump into physical address space
 * (the PC before the pmove statement points to the virtual address of
 * the code). Getting that physical address is not hard, but the code
 * becomes a bit complex since I've tried to ensure that the jump
 * statement after the pmove is in the cache already (otherwise the
 * processor can't fetch it!). For that, the code first jumps to the
 * jump statement with the (virtual) address of the pmove section in
 * an address register . The jump statement is surely in the cache
 * now. After that, that physical address of the reset code is loaded
 * into the same address register, pmove is done and the same jump
 * statements goes to the reset code. Since there are not many
 * statements between the two jumps, I hope it stays in the cache.
 *
 * The C code makes heavy use of the GCC features that you can get the
 * address of a C label. No hope to compile this with another compiler
 * than GCC!
 */

/* ++andreas: no need for complicated code, just depend on prefetch */

R
Roman Zippel 已提交
496
static void atari_reset(void)
L
Linus Torvalds 已提交
497
{
R
Roman Zippel 已提交
498 499 500 501 502 503 504
	long tc_val = 0;
	long reset_addr;

	/*
	 * On the Medusa, phys. 0x4 may contain garbage because it's no
	 * ROM.  See above for explanation why we cannot use PTOV(4).
	 */
505
	reset_addr = MACH_IS_MEDUSA || MACH_IS_AB40 ? 0xe00030 :
R
Roman Zippel 已提交
506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575
		     *(unsigned long *) 0xff000004;

	/* reset ACIA for switch off OverScan, if it's active */
	if (atari_switches & ATARI_SWITCH_OVSC_IKBD)
		acia.key_ctrl = ACIA_RESET;
	if (atari_switches & ATARI_SWITCH_OVSC_MIDI)
		acia.mid_ctrl = ACIA_RESET;

	/* processor independent: turn off interrupts and reset the VBR;
	 * the caches must be left enabled, else prefetching the final jump
	 * instruction doesn't work.
	 */
	local_irq_disable();
	asm volatile ("movec	%0,%%vbr"
			: : "d" (0));

	if (CPU_IS_040_OR_060) {
		unsigned long jmp_addr040 = virt_to_phys(&&jmp_addr_label040);
		if (CPU_IS_060) {
			/* 68060: clear PCR to turn off superscalar operation */
			asm volatile ("\n"
				"	.chip 68060\n"
				"	movec %0,%%pcr\n"
				"	.chip 68k"
				: : "d" (0));
		}

		asm volatile ("\n"
			"	move.l	%0,%%d0\n"
			"	and.l	#0xff000000,%%d0\n"
			"	or.w	#0xe020,%%d0\n"   /* map 16 MB, enable, cacheable */
			"	.chip	68040\n"
			"	movec	%%d0,%%itt0\n"
			"	movec	%%d0,%%dtt0\n"
			"	.chip	68k\n"
			"	jmp	%0@"
			: : "a" (jmp_addr040)
			: "d0");
	jmp_addr_label040:
		asm volatile ("\n"
			"	moveq	#0,%%d0\n"
			"	nop\n"
			"	.chip	68040\n"
			"	cinva	%%bc\n"
			"	nop\n"
			"	pflusha\n"
			"	nop\n"
			"	movec	%%d0,%%tc\n"
			"	nop\n"
			/* the following setup of transparent translations is needed on the
			 * Afterburner040 to successfully reboot. Other machines shouldn't
			 * care about a different tt regs setup, they also didn't care in
			 * the past that the regs weren't turned off. */
			"	move.l	#0xffc000,%%d0\n" /* whole insn space cacheable */
			"	movec	%%d0,%%itt0\n"
			"	movec	%%d0,%%itt1\n"
			"	or.w	#0x40,%/d0\n" /* whole data space non-cacheable/ser. */
			"	movec	%%d0,%%dtt0\n"
			"	movec	%%d0,%%dtt1\n"
			"	.chip	68k\n"
			"	jmp	%0@"
			: /* no outputs */
			: "a" (reset_addr)
			: "d0");
	} else
		asm volatile ("\n"
			"	pmove	%0@,%%tc\n"
			"	jmp	%1@"
			: /* no outputs */
			: "a" (&tc_val), "a" (reset_addr));
L
Linus Torvalds 已提交
576 577 578 579 580
}


static void atari_get_model(char *model)
{
R
Roman Zippel 已提交
581 582
	strcpy(model, "Atari ");
	switch (atari_mch_cookie >> 16) {
L
Linus Torvalds 已提交
583
	case ATARI_MCH_ST:
R
Roman Zippel 已提交
584 585 586 587 588
		if (ATARIHW_PRESENT(MSTE_CLK))
			strcat(model, "Mega ST");
		else
			strcat(model, "ST");
		break;
L
Linus Torvalds 已提交
589
	case ATARI_MCH_STE:
R
Roman Zippel 已提交
590 591 592 593 594
		if (MACH_IS_MSTE)
			strcat(model, "Mega STE");
		else
			strcat(model, "STE");
		break;
L
Linus Torvalds 已提交
595
	case ATARI_MCH_TT:
R
Roman Zippel 已提交
596 597 598 599 600 601
		if (MACH_IS_MEDUSA)
			/* Medusa has TT _MCH cookie */
			strcat(model, "Medusa");
		else
			strcat(model, "TT");
		break;
L
Linus Torvalds 已提交
602
	case ATARI_MCH_FALCON:
R
Roman Zippel 已提交
603 604 605 606
		strcat(model, "Falcon");
		if (MACH_IS_AB40)
			strcat(model, " (with Afterburner040)");
		break;
L
Linus Torvalds 已提交
607
	default:
R
Roman Zippel 已提交
608 609 610 611
		sprintf(model + strlen(model), "(unknown mach cookie 0x%lx)",
			atari_mch_cookie);
		break;
	}
L
Linus Torvalds 已提交
612 613 614
}


615
static void atari_get_hardware_list(struct seq_file *m)
L
Linus Torvalds 已提交
616
{
617
	int i;
R
Roman Zippel 已提交
618 619

	for (i = 0; i < m68k_num_memory; i++)
620
		seq_printf(m, "\t%3ld MB at 0x%08lx (%s)\n",
R
Roman Zippel 已提交
621 622 623 624 625 626
				m68k_memory[i].size >> 20, m68k_memory[i].addr,
				(m68k_memory[i].addr & 0xff000000 ?
				 "alternate RAM" : "ST-RAM"));

#define ATARIHW_ANNOUNCE(name, str)			\
	if (ATARIHW_PRESENT(name))			\
627
		seq_printf(m, "\t%s\n", str)
R
Roman Zippel 已提交
628

629
	seq_printf(m, "Detected hardware:\n");
R
Roman Zippel 已提交
630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657
	ATARIHW_ANNOUNCE(STND_SHIFTER, "ST Shifter");
	ATARIHW_ANNOUNCE(EXTD_SHIFTER, "STe Shifter");
	ATARIHW_ANNOUNCE(TT_SHIFTER, "TT Shifter");
	ATARIHW_ANNOUNCE(VIDEL_SHIFTER, "Falcon Shifter");
	ATARIHW_ANNOUNCE(YM_2149, "Programmable Sound Generator");
	ATARIHW_ANNOUNCE(PCM_8BIT, "PCM 8 Bit Sound");
	ATARIHW_ANNOUNCE(CODEC, "CODEC Sound");
	ATARIHW_ANNOUNCE(TT_SCSI, "SCSI Controller NCR5380 (TT style)");
	ATARIHW_ANNOUNCE(ST_SCSI, "SCSI Controller NCR5380 (Falcon style)");
	ATARIHW_ANNOUNCE(ACSI, "ACSI Interface");
	ATARIHW_ANNOUNCE(IDE, "IDE Interface");
	ATARIHW_ANNOUNCE(FDCSPEED, "8/16 Mhz Switch for FDC");
	ATARIHW_ANNOUNCE(ST_MFP, "Multi Function Peripheral MFP 68901");
	ATARIHW_ANNOUNCE(TT_MFP, "Second Multi Function Peripheral MFP 68901");
	ATARIHW_ANNOUNCE(SCC, "Serial Communications Controller SCC 8530");
	ATARIHW_ANNOUNCE(ST_ESCC, "Extended Serial Communications Controller SCC 85230");
	ATARIHW_ANNOUNCE(ANALOG_JOY, "Paddle Interface");
	ATARIHW_ANNOUNCE(MICROWIRE, "MICROWIRE(tm) Interface");
	ATARIHW_ANNOUNCE(STND_DMA, "DMA Controller (24 bit)");
	ATARIHW_ANNOUNCE(EXTD_DMA, "DMA Controller (32 bit)");
	ATARIHW_ANNOUNCE(SCSI_DMA, "DMA Controller for NCR5380");
	ATARIHW_ANNOUNCE(SCC_DMA, "DMA Controller for SCC");
	ATARIHW_ANNOUNCE(TT_CLK, "Clock Chip MC146818A");
	ATARIHW_ANNOUNCE(MSTE_CLK, "Clock Chip RP5C15");
	ATARIHW_ANNOUNCE(SCU, "System Control Unit");
	ATARIHW_ANNOUNCE(BLITTER, "Blitter");
	ATARIHW_ANNOUNCE(VME, "VME Bus");
	ATARIHW_ANNOUNCE(DSP56K, "DSP56001 processor");
L
Linus Torvalds 已提交
658
}