config.c 20.2 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
/*
 *  linux/arch/m68k/amiga/config.c
 *
 *  Copyright (C) 1993 Hamish Macdonald
 *
 * 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 Amiga stuff
 */

#include <linux/types.h>
#include <linux/kernel.h>
#include <linux/mm.h>
18
#include <linux/seq_file.h>
L
Linus Torvalds 已提交
19 20 21 22 23 24 25 26
#include <linux/tty.h>
#include <linux/console.h>
#include <linux/rtc.h>
#include <linux/init.h>
#include <linux/vt_kern.h>
#include <linux/delay.h>
#include <linux/interrupt.h>
#include <linux/zorro.h>
27
#include <linux/module.h>
28
#include <linux/keyboard.h>
L
Linus Torvalds 已提交
29 30

#include <asm/bootinfo.h>
31
#include <asm/bootinfo-amiga.h>
32
#include <asm/byteorder.h>
L
Linus Torvalds 已提交
33 34 35 36 37 38 39 40 41
#include <asm/setup.h>
#include <asm/pgtable.h>
#include <asm/amigahw.h>
#include <asm/amigaints.h>
#include <asm/irq.h>
#include <asm/rtc.h>
#include <asm/machdep.h>
#include <asm/io.h>

A
Adrian Bunk 已提交
42
static unsigned long amiga_model;
43

L
Linus Torvalds 已提交
44
unsigned long amiga_eclock;
45 46
EXPORT_SYMBOL(amiga_eclock);

L
Linus Torvalds 已提交
47
unsigned long amiga_colorclock;
48 49
EXPORT_SYMBOL(amiga_colorclock);

L
Linus Torvalds 已提交
50
unsigned long amiga_chipset;
51 52
EXPORT_SYMBOL(amiga_chipset);

L
Linus Torvalds 已提交
53
unsigned char amiga_vblank;
A
Adrian Bunk 已提交
54 55
EXPORT_SYMBOL(amiga_vblank);

A
Adrian Bunk 已提交
56
static unsigned char amiga_psfreq;
57

L
Linus Torvalds 已提交
58
struct amiga_hw_present amiga_hw_present;
59
EXPORT_SYMBOL(amiga_hw_present);
L
Linus Torvalds 已提交
60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76

static char s_a500[] __initdata = "A500";
static char s_a500p[] __initdata = "A500+";
static char s_a600[] __initdata = "A600";
static char s_a1000[] __initdata = "A1000";
static char s_a1200[] __initdata = "A1200";
static char s_a2000[] __initdata = "A2000";
static char s_a2500[] __initdata = "A2500";
static char s_a3000[] __initdata = "A3000";
static char s_a3000t[] __initdata = "A3000T";
static char s_a3000p[] __initdata = "A3000+";
static char s_a4000[] __initdata = "A4000";
static char s_a4000t[] __initdata = "A4000T";
static char s_cdtv[] __initdata = "CDTV";
static char s_cd32[] __initdata = "CD32";
static char s_draco[] __initdata = "Draco";
static char *amiga_models[] __initdata = {
R
Roman Zippel 已提交
77 78 79 80 81 82 83 84 85 86 87 88 89 90 91
	[AMI_500-AMI_500]	= s_a500,
	[AMI_500PLUS-AMI_500]	= s_a500p,
	[AMI_600-AMI_500]	= s_a600,
	[AMI_1000-AMI_500]	= s_a1000,
	[AMI_1200-AMI_500]	= s_a1200,
	[AMI_2000-AMI_500]	= s_a2000,
	[AMI_2500-AMI_500]	= s_a2500,
	[AMI_3000-AMI_500]	= s_a3000,
	[AMI_3000T-AMI_500]	= s_a3000t,
	[AMI_3000PLUS-AMI_500]	= s_a3000p,
	[AMI_4000-AMI_500]	= s_a4000,
	[AMI_4000T-AMI_500]	= s_a4000t,
	[AMI_CDTV-AMI_500]	= s_cdtv,
	[AMI_CD32-AMI_500]	= s_cd32,
	[AMI_DRACO-AMI_500]	= s_draco,
L
Linus Torvalds 已提交
92 93 94 95
};

static char amiga_model_name[13] = "Amiga ";

96
static void amiga_sched_init(irq_handler_t handler);
L
Linus Torvalds 已提交
97
static void amiga_get_model(char *model);
98
static void amiga_get_hardware_list(struct seq_file *m);
L
Linus Torvalds 已提交
99
/* amiga specific timer functions */
100
static u32 amiga_gettimeoffset(void);
R
Roman Zippel 已提交
101 102
extern void amiga_mksound(unsigned int count, unsigned int ticks);
static void amiga_reset(void);
L
Linus Torvalds 已提交
103 104 105 106 107 108 109 110
extern void amiga_init_sound(void);
static void amiga_mem_console_write(struct console *co, const char *b,
				    unsigned int count);
#ifdef CONFIG_HEARTBEAT
static void amiga_heartbeat(int on);
#endif

static struct console amiga_console_driver = {
R
Roman Zippel 已提交
111 112 113
	.name	= "debug",
	.flags	= CON_PRINTBUFFER,
	.index	= -1,
L
Linus Torvalds 已提交
114 115 116 117 118 119 120 121
};


    /*
     *  Motherboard Resources present in all Amiga models
     */

static struct {
R
Roman Zippel 已提交
122
	struct resource _ciab, _ciaa, _custom, _kickstart;
L
Linus Torvalds 已提交
123
} mb_resources = {
R
Roman Zippel 已提交
124 125 126 127 128 129 130 131 132 133 134 135
	._ciab = {
		.name = "CIA B", .start = 0x00bfd000, .end = 0x00bfdfff
	},
	._ciaa = {
		.name = "CIA A", .start = 0x00bfe000, .end = 0x00bfefff
	},
	._custom = {
		.name = "Custom I/O", .start = 0x00dff000, .end = 0x00dfffff
	},
	._kickstart = {
		.name = "Kickstart ROM", .start = 0x00f80000, .end = 0x00ffffff
	}
L
Linus Torvalds 已提交
136 137 138 139 140 141 142 143 144
};

static struct resource ram_resource[NUM_MEMINFO];


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

145
int __init amiga_parse_bootinfo(const struct bi_record *record)
L
Linus Torvalds 已提交
146
{
R
Roman Zippel 已提交
147
	int unknown = 0;
148
	const void *data = record->data;
L
Linus Torvalds 已提交
149

150
	switch (be16_to_cpu(record->tag)) {
L
Linus Torvalds 已提交
151
	case BI_AMIGA_MODEL:
152
		amiga_model = be32_to_cpup(data);
R
Roman Zippel 已提交
153
		break;
L
Linus Torvalds 已提交
154 155

	case BI_AMIGA_ECLOCK:
156
		amiga_eclock = be32_to_cpup(data);
R
Roman Zippel 已提交
157
		break;
L
Linus Torvalds 已提交
158 159

	case BI_AMIGA_CHIPSET:
160
		amiga_chipset = be32_to_cpup(data);
R
Roman Zippel 已提交
161
		break;
L
Linus Torvalds 已提交
162 163

	case BI_AMIGA_CHIP_SIZE:
164
		amiga_chip_size = be32_to_cpup(data);
R
Roman Zippel 已提交
165
		break;
L
Linus Torvalds 已提交
166 167

	case BI_AMIGA_VBLANK:
168
		amiga_vblank = *(const __u8 *)data;
R
Roman Zippel 已提交
169
		break;
L
Linus Torvalds 已提交
170 171

	case BI_AMIGA_PSFREQ:
172
		amiga_psfreq = *(const __u8 *)data;
R
Roman Zippel 已提交
173
		break;
L
Linus Torvalds 已提交
174 175 176

	case BI_AMIGA_AUTOCON:
#ifdef CONFIG_ZORRO
R
Roman Zippel 已提交
177
		if (zorro_num_autocon < ZORRO_NUM_AUTO) {
178
			const struct ConfigDev *cd = data;
179
			struct zorro_dev_init *dev = &zorro_autocon_init[zorro_num_autocon++];
R
Roman Zippel 已提交
180
			dev->rom = cd->cd_Rom;
181 182 183 184
			dev->slotaddr = be16_to_cpu(cd->cd_SlotAddr);
			dev->slotsize = be16_to_cpu(cd->cd_SlotSize);
			dev->boardaddr = be32_to_cpu(cd->cd_BoardAddr);
			dev->boardsize = be32_to_cpu(cd->cd_BoardSize);
R
Roman Zippel 已提交
185 186
		} else
			printk("amiga_parse_bootinfo: too many AutoConfig devices\n");
L
Linus Torvalds 已提交
187
#endif /* CONFIG_ZORRO */
R
Roman Zippel 已提交
188
		break;
L
Linus Torvalds 已提交
189 190

	case BI_AMIGA_SERPER:
R
Roman Zippel 已提交
191 192
		/* serial port period: ignored here */
		break;
L
Linus Torvalds 已提交
193 194

	default:
R
Roman Zippel 已提交
195 196 197
		unknown = 1;
	}
	return unknown;
L
Linus Torvalds 已提交
198 199 200 201 202 203 204 205
}

    /*
     *  Identify builtin hardware
     */

static void __init amiga_identify(void)
{
R
Roman Zippel 已提交
206 207 208
	/* Fill in some default values, if necessary */
	if (amiga_eclock == 0)
		amiga_eclock = 709379;
L
Linus Torvalds 已提交
209

R
Roman Zippel 已提交
210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 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 261 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 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358
	memset(&amiga_hw_present, 0, sizeof(amiga_hw_present));

	printk("Amiga hardware found: ");
	if (amiga_model >= AMI_500 && amiga_model <= AMI_DRACO) {
		printk("[%s] ", amiga_models[amiga_model-AMI_500]);
		strcat(amiga_model_name, amiga_models[amiga_model-AMI_500]);
	}

	switch (amiga_model) {
	case AMI_UNKNOWN:
		goto Generic;

	case AMI_600:
	case AMI_1200:
		AMIGAHW_SET(A1200_IDE);
		AMIGAHW_SET(PCMCIA);
	case AMI_500:
	case AMI_500PLUS:
	case AMI_1000:
	case AMI_2000:
	case AMI_2500:
		AMIGAHW_SET(A2000_CLK);	/* Is this correct for all models? */
		goto Generic;

	case AMI_3000:
	case AMI_3000T:
		AMIGAHW_SET(AMBER_FF);
		AMIGAHW_SET(MAGIC_REKICK);
		/* fall through */
	case AMI_3000PLUS:
		AMIGAHW_SET(A3000_SCSI);
		AMIGAHW_SET(A3000_CLK);
		AMIGAHW_SET(ZORRO3);
		goto Generic;

	case AMI_4000T:
		AMIGAHW_SET(A4000_SCSI);
		/* fall through */
	case AMI_4000:
		AMIGAHW_SET(A4000_IDE);
		AMIGAHW_SET(A3000_CLK);
		AMIGAHW_SET(ZORRO3);
		goto Generic;

	case AMI_CDTV:
	case AMI_CD32:
		AMIGAHW_SET(CD_ROM);
		AMIGAHW_SET(A2000_CLK);             /* Is this correct? */
		goto Generic;

	Generic:
		AMIGAHW_SET(AMI_VIDEO);
		AMIGAHW_SET(AMI_BLITTER);
		AMIGAHW_SET(AMI_AUDIO);
		AMIGAHW_SET(AMI_FLOPPY);
		AMIGAHW_SET(AMI_KEYBOARD);
		AMIGAHW_SET(AMI_MOUSE);
		AMIGAHW_SET(AMI_SERIAL);
		AMIGAHW_SET(AMI_PARALLEL);
		AMIGAHW_SET(CHIP_RAM);
		AMIGAHW_SET(PAULA);

		switch (amiga_chipset) {
		case CS_OCS:
		case CS_ECS:
		case CS_AGA:
			switch (amiga_custom.deniseid & 0xf) {
			case 0x0c:
				AMIGAHW_SET(DENISE_HR);
				break;
			case 0x08:
				AMIGAHW_SET(LISA);
				break;
			}
			break;
		default:
			AMIGAHW_SET(DENISE);
			break;
		}
		switch ((amiga_custom.vposr>>8) & 0x7f) {
		case 0x00:
			AMIGAHW_SET(AGNUS_PAL);
			break;
		case 0x10:
			AMIGAHW_SET(AGNUS_NTSC);
			break;
		case 0x20:
		case 0x21:
			AMIGAHW_SET(AGNUS_HR_PAL);
			break;
		case 0x30:
		case 0x31:
			AMIGAHW_SET(AGNUS_HR_NTSC);
			break;
		case 0x22:
		case 0x23:
			AMIGAHW_SET(ALICE_PAL);
			break;
		case 0x32:
		case 0x33:
			AMIGAHW_SET(ALICE_NTSC);
			break;
		}
		AMIGAHW_SET(ZORRO);
		break;

	case AMI_DRACO:
		panic("No support for Draco yet");

	default:
		panic("Unknown Amiga Model");
	}

#define AMIGAHW_ANNOUNCE(name, str)		\
	if (AMIGAHW_PRESENT(name))		\
		printk(str)

	AMIGAHW_ANNOUNCE(AMI_VIDEO, "VIDEO ");
	AMIGAHW_ANNOUNCE(AMI_BLITTER, "BLITTER ");
	AMIGAHW_ANNOUNCE(AMBER_FF, "AMBER_FF ");
	AMIGAHW_ANNOUNCE(AMI_AUDIO, "AUDIO ");
	AMIGAHW_ANNOUNCE(AMI_FLOPPY, "FLOPPY ");
	AMIGAHW_ANNOUNCE(A3000_SCSI, "A3000_SCSI ");
	AMIGAHW_ANNOUNCE(A4000_SCSI, "A4000_SCSI ");
	AMIGAHW_ANNOUNCE(A1200_IDE, "A1200_IDE ");
	AMIGAHW_ANNOUNCE(A4000_IDE, "A4000_IDE ");
	AMIGAHW_ANNOUNCE(CD_ROM, "CD_ROM ");
	AMIGAHW_ANNOUNCE(AMI_KEYBOARD, "KEYBOARD ");
	AMIGAHW_ANNOUNCE(AMI_MOUSE, "MOUSE ");
	AMIGAHW_ANNOUNCE(AMI_SERIAL, "SERIAL ");
	AMIGAHW_ANNOUNCE(AMI_PARALLEL, "PARALLEL ");
	AMIGAHW_ANNOUNCE(A2000_CLK, "A2000_CLK ");
	AMIGAHW_ANNOUNCE(A3000_CLK, "A3000_CLK ");
	AMIGAHW_ANNOUNCE(CHIP_RAM, "CHIP_RAM ");
	AMIGAHW_ANNOUNCE(PAULA, "PAULA ");
	AMIGAHW_ANNOUNCE(DENISE, "DENISE ");
	AMIGAHW_ANNOUNCE(DENISE_HR, "DENISE_HR ");
	AMIGAHW_ANNOUNCE(LISA, "LISA ");
	AMIGAHW_ANNOUNCE(AGNUS_PAL, "AGNUS_PAL ");
	AMIGAHW_ANNOUNCE(AGNUS_NTSC, "AGNUS_NTSC ");
	AMIGAHW_ANNOUNCE(AGNUS_HR_PAL, "AGNUS_HR_PAL ");
	AMIGAHW_ANNOUNCE(AGNUS_HR_NTSC, "AGNUS_HR_NTSC ");
	AMIGAHW_ANNOUNCE(ALICE_PAL, "ALICE_PAL ");
	AMIGAHW_ANNOUNCE(ALICE_NTSC, "ALICE_NTSC ");
	AMIGAHW_ANNOUNCE(MAGIC_REKICK, "MAGIC_REKICK ");
	AMIGAHW_ANNOUNCE(PCMCIA, "PCMCIA ");
	if (AMIGAHW_PRESENT(ZORRO))
		printk("ZORRO%s ", AMIGAHW_PRESENT(ZORRO3) ? "3" : "");
	printk("\n");
L
Linus Torvalds 已提交
359 360 361 362

#undef AMIGAHW_ANNOUNCE
}

363 364 365 366 367 368 369 370

static unsigned long amiga_random_get_entropy(void)
{
	/* VPOSR/VHPOSR provide at least 17 bits of data changing at 1.79 MHz */
	return *(unsigned long *)&amiga_custom.vposr;
}


L
Linus Torvalds 已提交
371 372 373 374 375 376
    /*
     *  Setup the Amiga configuration info
     */

void __init config_amiga(void)
{
R
Roman Zippel 已提交
377 378 379 380 381 382 383 384 385 386 387 388 389
	int i;

	amiga_identify();

	/* Yuk, we don't have PCI memory */
	iomem_resource.name = "Memory";
	for (i = 0; i < 4; i++)
		request_resource(&iomem_resource, &((struct resource *)&mb_resources)[i]);

	mach_sched_init      = amiga_sched_init;
	mach_init_IRQ        = amiga_init_IRQ;
	mach_get_model       = amiga_get_model;
	mach_get_hardware_list = amiga_get_hardware_list;
390
	arch_gettimeoffset   = amiga_gettimeoffset;
R
Roman Zippel 已提交
391 392 393 394 395 396 397 398 399

	/*
	 * default MAX_DMA=0xffffffff on all machines. If we don't do so, the SCSI
	 * code will not be able to allocate any mem for transfers, unless we are
	 * dealing with a Z2 mem only system.                  /Jes
	 */
	mach_max_dma_address = 0xffffffff;

	mach_reset           = amiga_reset;
L
Linus Torvalds 已提交
400
#if defined(CONFIG_INPUT_M68K_BEEP) || defined(CONFIG_INPUT_M68K_BEEP_MODULE)
R
Roman Zippel 已提交
401
	mach_beep            = amiga_mksound;
L
Linus Torvalds 已提交
402 403 404
#endif

#ifdef CONFIG_HEARTBEAT
R
Roman Zippel 已提交
405
	mach_heartbeat = amiga_heartbeat;
L
Linus Torvalds 已提交
406 407
#endif

408 409
	mach_random_get_entropy = amiga_random_get_entropy;

A
Adrian Bunk 已提交
410
	/* Fill in the clock value (based on the 700 kHz E-Clock) */
R
Roman Zippel 已提交
411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465
	amiga_colorclock = 5*amiga_eclock;	/* 3.5 MHz */

	/* clear all DMA bits */
	amiga_custom.dmacon = DMAF_ALL;
	/* ensure that the DMA master bit is set */
	amiga_custom.dmacon = DMAF_SETCLR | DMAF_MASTER;

	/* don't use Z2 RAM as system memory on Z3 capable machines */
	if (AMIGAHW_PRESENT(ZORRO3)) {
		int i, j;
		u32 disabled_z2mem = 0;

		for (i = 0; i < m68k_num_memory; i++) {
			if (m68k_memory[i].addr < 16*1024*1024) {
				if (i == 0) {
					/* don't cut off the branch we're sitting on */
					printk("Warning: kernel runs in Zorro II memory\n");
					continue;
				}
				disabled_z2mem += m68k_memory[i].size;
				m68k_num_memory--;
				for (j = i; j < m68k_num_memory; j++)
					m68k_memory[j] = m68k_memory[j+1];
				i--;
			}
		}
		if (disabled_z2mem)
		printk("%dK of Zorro II memory will not be used as system memory\n",
		disabled_z2mem>>10);
	}

	/* request all RAM */
	for (i = 0; i < m68k_num_memory; i++) {
		ram_resource[i].name =
			(m68k_memory[i].addr >= 0x01000000) ? "32-bit Fast RAM" :
			(m68k_memory[i].addr < 0x00c00000) ? "16-bit Fast RAM" :
			"16-bit Slow RAM";
		ram_resource[i].start = m68k_memory[i].addr;
		ram_resource[i].end = m68k_memory[i].addr+m68k_memory[i].size-1;
		request_resource(&iomem_resource, &ram_resource[i]);
	}

	/* initialize chipram allocator */
	amiga_chip_init();

	/* our beloved beeper */
	if (AMIGAHW_PRESENT(AMI_AUDIO))
		amiga_init_sound();

	/*
	 * if it is an A3000, set the magic bit that forces
	 * a hard rekick
	 */
	if (AMIGAHW_PRESENT(MAGIC_REKICK))
		*(unsigned char *)ZTWO_VADDR(0xde0002) |= 0x80;
L
Linus Torvalds 已提交
466 467 468 469
}

static unsigned short jiffy_ticks;

470
static void __init amiga_sched_init(irq_handler_t timer_routine)
L
Linus Torvalds 已提交
471 472
{
	static struct resource sched_res = {
R
Roman Zippel 已提交
473
		.name = "timer", .start = 0x00bfd400, .end = 0x00bfd5ff,
L
Linus Torvalds 已提交
474
	};
J
Julia Lawall 已提交
475
	jiffy_ticks = DIV_ROUND_CLOSEST(amiga_eclock, HZ);
L
Linus Torvalds 已提交
476 477

	if (request_resource(&mb_resources._ciab, &sched_res))
R
Roman Zippel 已提交
478
		printk("Cannot allocate ciab.ta{lo,hi}\n");
L
Linus Torvalds 已提交
479 480 481 482 483 484 485 486 487
	ciab.cra &= 0xC0;   /* turn off timer A, continuous mode, from Eclk */
	ciab.talo = jiffy_ticks % 256;
	ciab.tahi = jiffy_ticks / 256;

	/* install interrupt service routine for CIAB Timer A
	 *
	 * Please don't change this to use ciaa, as it interferes with the
	 * SCSI code. We'll have to take a look at this later
	 */
488 489
	if (request_irq(IRQ_AMIGA_CIAB_TA, timer_routine, 0, "timer", NULL))
		pr_err("Couldn't register timer interrupt\n");
L
Linus Torvalds 已提交
490 491 492 493 494 495 496
	/* start timer */
	ciab.cra |= 0x11;
}

#define TICK_SIZE 10000

/* This is always executed with interrupts disabled.  */
497
static u32 amiga_gettimeoffset(void)
L
Linus Torvalds 已提交
498 499
{
	unsigned short hi, lo, hi2;
500
	u32 ticks, offset = 0;
L
Linus Torvalds 已提交
501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521

	/* read CIA B timer A current value */
	hi  = ciab.tahi;
	lo  = ciab.talo;
	hi2 = ciab.tahi;

	if (hi != hi2) {
		lo = ciab.talo;
		hi = hi2;
	}

	ticks = hi << 8 | lo;

	if (ticks > jiffy_ticks / 2)
		/* check for pending interrupt */
		if (cia_set_irq(&ciab_base, 0) & CIA_ICR_TA)
			offset = 10000;

	ticks = jiffy_ticks - ticks;
	ticks = (10000 * ticks) / jiffy_ticks;

522
	return (ticks + offset) * 1000;
L
Linus Torvalds 已提交
523 524
}

525
static void amiga_reset(void)  __noreturn;
L
Linus Torvalds 已提交
526

R
Roman Zippel 已提交
527
static void amiga_reset(void)
L
Linus Torvalds 已提交
528
{
R
Roman Zippel 已提交
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 576 577 578 579 580 581 582 583 584 585 586 587 588 589
	unsigned long jmp_addr040 = virt_to_phys(&&jmp_addr_label040);
	unsigned long jmp_addr = virt_to_phys(&&jmp_addr_label);

	local_irq_disable();
	if (CPU_IS_040_OR_060)
		/* Setup transparent translation registers for mapping
		 * of 16 MB kernel segment before disabling translation
		 */
		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@\n"
			: /* no outputs */
			: "a" (jmp_addr040)
			: "d0");
	else
		/* for 680[23]0, just disable translation and jump to the physical
		 * address of the label
		 */
		asm volatile ("\n"
			"	pmove	%%tc,%@\n"
			"	bclr	#7,%@\n"
			"	pmove	%@,%%tc\n"
			"	jmp	%0@\n"
			: /* no outputs */
			: "a" (jmp_addr));
jmp_addr_label040:
	/* disable translation on '040 now */
	asm volatile ("\n"
		"	moveq	#0,%%d0\n"
		"	.chip	68040\n"
		"	movec	%%d0,%%tc\n"	/* disable MMU */
		"	.chip	68k\n"
		: /* no outputs */
		: /* no inputs */
		: "d0");

	jmp_addr_label:
	/* pickup reset address from AmigaOS ROM, reset devices and jump
	 * to reset address
	 */
	asm volatile ("\n"
		"	move.w	#0x2700,%sr\n"
		"	lea	0x01000000,%a0\n"
		"	sub.l	%a0@(-0x14),%a0\n"
		"	move.l	%a0@(4),%a0\n"
		"	subq.l	#2,%a0\n"
		"	jra	1f\n"
		/* align on a longword boundary */
		"	" __ALIGN_STR "\n"
		"1:\n"
		"	reset\n"
		"	jmp   %a0@");

	for (;;)
		;
L
Linus Torvalds 已提交
590 591 592 593 594 595 596 597 598 599 600 601 602
}


    /*
     *  Debugging
     */

#define SAVEKMSG_MAXMEM		128*1024

#define SAVEKMSG_MAGIC1		0x53415645	/* 'SAVE' */
#define SAVEKMSG_MAGIC2		0x4B4D5347	/* 'KMSG' */

struct savekmsg {
R
Roman Zippel 已提交
603 604 605 606 607
	unsigned long magic1;		/* SAVEKMSG_MAGIC1 */
	unsigned long magic2;		/* SAVEKMSG_MAGIC2 */
	unsigned long magicptr;		/* address of magic1 */
	unsigned long size;
	char data[0];
L
Linus Torvalds 已提交
608 609 610 611 612 613 614
};

static struct savekmsg *savekmsg;

static void amiga_mem_console_write(struct console *co, const char *s,
				    unsigned int count)
{
R
Roman Zippel 已提交
615 616 617 618
	if (savekmsg->size + count <= SAVEKMSG_MAXMEM-sizeof(struct savekmsg)) {
		memcpy(savekmsg->data + savekmsg->size, s, count);
		savekmsg->size += count;
	}
L
Linus Torvalds 已提交
619 620
}

R
Roman Zippel 已提交
621
static int __init amiga_savekmsg_setup(char *arg)
L
Linus Torvalds 已提交
622
{
R
Roman Zippel 已提交
623
	if (!MACH_IS_AMIGA || strcmp(arg, "mem"))
G
Geert Uytterhoeven 已提交
624
		return 0;
R
Roman Zippel 已提交
625

G
Geert Uytterhoeven 已提交
626 627 628
	if (amiga_chip_size < SAVEKMSG_MAXMEM) {
		pr_err("Not enough chipram for debugging\n");
		return -ENOMEM;
R
Roman Zippel 已提交
629 630
	}

G
Geert Uytterhoeven 已提交
631 632
	/* Just steal the block, the chipram allocator isn't functional yet */
	amiga_chip_size -= SAVEKMSG_MAXMEM;
633
	savekmsg = ZTWO_VADDR(CHIP_PHYSADDR + amiga_chip_size);
R
Roman Zippel 已提交
634 635 636 637
	savekmsg->magic1 = SAVEKMSG_MAGIC1;
	savekmsg->magic2 = SAVEKMSG_MAGIC2;
	savekmsg->magicptr = ZTWO_PADDR(savekmsg);
	savekmsg->size = 0;
R
Roman Zippel 已提交
638 639 640 641

	amiga_console_driver.write = amiga_mem_console_write;
	register_console(&amiga_console_driver);
	return 0;
L
Linus Torvalds 已提交
642 643
}

R
Roman Zippel 已提交
644 645
early_param("debug", amiga_savekmsg_setup);

L
Linus Torvalds 已提交
646 647
static void amiga_serial_putc(char c)
{
R
Roman Zippel 已提交
648 649 650
	amiga_custom.serdat = (unsigned char)c | 0x100;
	while (!(amiga_custom.serdatr & 0x2000))
		;
L
Linus Torvalds 已提交
651 652
}

A
Adrian Bunk 已提交
653 654
static void amiga_serial_console_write(struct console *co, const char *s,
				       unsigned int count)
L
Linus Torvalds 已提交
655
{
R
Roman Zippel 已提交
656 657 658 659 660
	while (count--) {
		if (*s == '\n')
			amiga_serial_putc('\r');
		amiga_serial_putc(*s++);
	}
L
Linus Torvalds 已提交
661 662
}

A
Adrian Bunk 已提交
663
#if 0
L
Linus Torvalds 已提交
664 665
void amiga_serial_puts(const char *s)
{
R
Roman Zippel 已提交
666
	amiga_serial_console_write(NULL, s, strlen(s));
L
Linus Torvalds 已提交
667 668 669 670
}

int amiga_serial_console_wait_key(struct console *co)
{
R
Roman Zippel 已提交
671 672 673 674 675 676 677 678
	int ch;

	while (!(amiga_custom.intreqr & IF_RBF))
		barrier();
	ch = amiga_custom.serdatr & 0xff;
	/* clear the interrupt, so that another character can be read */
	amiga_custom.intreq = IF_RBF;
	return ch;
L
Linus Torvalds 已提交
679 680 681 682
}

void amiga_serial_gets(struct console *co, char *s, int len)
{
R
Roman Zippel 已提交
683 684 685 686 687 688 689 690 691 692 693 694 695 696 697
	int ch, cnt = 0;

	while (1) {
		ch = amiga_serial_console_wait_key(co);

		/* Check for backspace. */
		if (ch == 8 || ch == 127) {
			if (cnt == 0) {
				amiga_serial_putc('\007');
				continue;
			}
			cnt--;
			amiga_serial_puts("\010 \010");
			continue;
		}
L
Linus Torvalds 已提交
698

R
Roman Zippel 已提交
699 700 701
		/* Check for enter. */
		if (ch == 10 || ch == 13)
			break;
L
Linus Torvalds 已提交
702

R
Roman Zippel 已提交
703 704 705 706 707 708
		/* See if line is too long. */
		if (cnt >= len + 1) {
			amiga_serial_putc(7);
			cnt--;
			continue;
		}
L
Linus Torvalds 已提交
709

R
Roman Zippel 已提交
710 711 712 713 714 715 716
		/* Store and echo character. */
		s[cnt++] = ch;
		amiga_serial_putc(ch);
	}
	/* Print enter. */
	amiga_serial_puts("\r\n");
	s[cnt] = 0;
L
Linus Torvalds 已提交
717 718 719
}
#endif

R
Roman Zippel 已提交
720
static int __init amiga_debug_setup(char *arg)
L
Linus Torvalds 已提交
721
{
R
Roman Zippel 已提交
722
	if (MACH_IS_AMIGA && !strcmp(arg, "ser")) {
L
Linus Torvalds 已提交
723 724 725 726
		/* no initialization required (?) */
		amiga_console_driver.write = amiga_serial_console_write;
		register_console(&amiga_console_driver);
	}
R
Roman Zippel 已提交
727
	return 0;
L
Linus Torvalds 已提交
728 729
}

R
Roman Zippel 已提交
730 731
early_param("debug", amiga_debug_setup);

L
Linus Torvalds 已提交
732 733 734
#ifdef CONFIG_HEARTBEAT
static void amiga_heartbeat(int on)
{
R
Roman Zippel 已提交
735 736 737 738
	if (on)
		ciaa.pra &= ~2;
	else
		ciaa.pra |= 2;
L
Linus Torvalds 已提交
739 740 741 742 743 744 745 746 747
}
#endif

    /*
     *  Amiga specific parts of /proc
     */

static void amiga_get_model(char *model)
{
R
Roman Zippel 已提交
748
	strcpy(model, amiga_model_name);
L
Linus Torvalds 已提交
749 750 751
}


752
static void amiga_get_hardware_list(struct seq_file *m)
L
Linus Torvalds 已提交
753
{
R
Roman Zippel 已提交
754
	if (AMIGAHW_PRESENT(CHIP_RAM))
755 756
		seq_printf(m, "Chip RAM:\t%ldK\n", amiga_chip_size>>10);
	seq_printf(m, "PS Freq:\t%dHz\nEClock Freq:\t%ldHz\n",
R
Roman Zippel 已提交
757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773
			amiga_psfreq, amiga_eclock);
	if (AMIGAHW_PRESENT(AMI_VIDEO)) {
		char *type;
		switch (amiga_chipset) {
		case CS_OCS:
			type = "OCS";
			break;
		case CS_ECS:
			type = "ECS";
			break;
		case CS_AGA:
			type = "AGA";
			break;
		default:
			type = "Old or Unknown";
			break;
		}
774
		seq_printf(m, "Graphics:\t%s\n", type);
L
Linus Torvalds 已提交
775 776 777
	}

#define AMIGAHW_ANNOUNCE(name, str)			\
R
Roman Zippel 已提交
778
	if (AMIGAHW_PRESENT(name))			\
779
		seq_printf (m, "\t%s\n", str)
R
Roman Zippel 已提交
780

781
	seq_printf (m, "Detected hardware:\n");
R
Roman Zippel 已提交
782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811

	AMIGAHW_ANNOUNCE(AMI_VIDEO, "Amiga Video");
	AMIGAHW_ANNOUNCE(AMI_BLITTER, "Blitter");
	AMIGAHW_ANNOUNCE(AMBER_FF, "Amber Flicker Fixer");
	AMIGAHW_ANNOUNCE(AMI_AUDIO, "Amiga Audio");
	AMIGAHW_ANNOUNCE(AMI_FLOPPY, "Floppy Controller");
	AMIGAHW_ANNOUNCE(A3000_SCSI, "SCSI Controller WD33C93 (A3000 style)");
	AMIGAHW_ANNOUNCE(A4000_SCSI, "SCSI Controller NCR53C710 (A4000T style)");
	AMIGAHW_ANNOUNCE(A1200_IDE, "IDE Interface (A1200 style)");
	AMIGAHW_ANNOUNCE(A4000_IDE, "IDE Interface (A4000 style)");
	AMIGAHW_ANNOUNCE(CD_ROM, "Internal CD ROM drive");
	AMIGAHW_ANNOUNCE(AMI_KEYBOARD, "Keyboard");
	AMIGAHW_ANNOUNCE(AMI_MOUSE, "Mouse Port");
	AMIGAHW_ANNOUNCE(AMI_SERIAL, "Serial Port");
	AMIGAHW_ANNOUNCE(AMI_PARALLEL, "Parallel Port");
	AMIGAHW_ANNOUNCE(A2000_CLK, "Hardware Clock (A2000 style)");
	AMIGAHW_ANNOUNCE(A3000_CLK, "Hardware Clock (A3000 style)");
	AMIGAHW_ANNOUNCE(CHIP_RAM, "Chip RAM");
	AMIGAHW_ANNOUNCE(PAULA, "Paula 8364");
	AMIGAHW_ANNOUNCE(DENISE, "Denise 8362");
	AMIGAHW_ANNOUNCE(DENISE_HR, "Denise 8373");
	AMIGAHW_ANNOUNCE(LISA, "Lisa 8375");
	AMIGAHW_ANNOUNCE(AGNUS_PAL, "Normal/Fat PAL Agnus 8367/8371");
	AMIGAHW_ANNOUNCE(AGNUS_NTSC, "Normal/Fat NTSC Agnus 8361/8370");
	AMIGAHW_ANNOUNCE(AGNUS_HR_PAL, "Fat Hires PAL Agnus 8372");
	AMIGAHW_ANNOUNCE(AGNUS_HR_NTSC, "Fat Hires NTSC Agnus 8372");
	AMIGAHW_ANNOUNCE(ALICE_PAL, "PAL Alice 8374");
	AMIGAHW_ANNOUNCE(ALICE_NTSC, "NTSC Alice 8374");
	AMIGAHW_ANNOUNCE(MAGIC_REKICK, "Magic Hard Rekick");
	AMIGAHW_ANNOUNCE(PCMCIA, "PCMCIA Slot");
L
Linus Torvalds 已提交
812
#ifdef CONFIG_ZORRO
R
Roman Zippel 已提交
813
	if (AMIGAHW_PRESENT(ZORRO))
814
		seq_printf(m, "\tZorro II%s AutoConfig: %d Expansion "
R
Roman Zippel 已提交
815 816 817
				"Device%s\n",
				AMIGAHW_PRESENT(ZORRO3) ? "I" : "",
				zorro_num_autocon, zorro_num_autocon == 1 ? "" : "s");
L
Linus Torvalds 已提交
818 819 820 821
#endif /* CONFIG_ZORRO */

#undef AMIGAHW_ANNOUNCE
}
822 823 824 825 826 827 828 829

/*
 * The Amiga keyboard driver needs key_maps, but we cannot export it in
 * drivers/char/defkeymap.c, as it is autogenerated
 */
#ifdef CONFIG_HW_CONSOLE
EXPORT_SYMBOL_GPL(key_maps);
#endif