config.c 19.8 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 31 32 33 34 35 36 37 38 39

#include <asm/bootinfo.h>
#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 已提交
40
static unsigned long amiga_model;
41

L
Linus Torvalds 已提交
42
unsigned long amiga_eclock;
43 44
EXPORT_SYMBOL(amiga_eclock);

L
Linus Torvalds 已提交
45
unsigned long amiga_colorclock;
46 47
EXPORT_SYMBOL(amiga_colorclock);

L
Linus Torvalds 已提交
48
unsigned long amiga_chipset;
49 50
EXPORT_SYMBOL(amiga_chipset);

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

A
Adrian Bunk 已提交
54
static unsigned char amiga_psfreq;
55

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

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 已提交
75 76 77 78 79 80 81 82 83 84 85 86 87 88 89
	[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 已提交
90 91 92 93
};

static char amiga_model_name[13] = "Amiga ";

94
static void amiga_sched_init(irq_handler_t handler);
L
Linus Torvalds 已提交
95
static void amiga_get_model(char *model);
96
static void amiga_get_hardware_list(struct seq_file *m);
L
Linus Torvalds 已提交
97
/* amiga specific timer functions */
98
static u32 amiga_gettimeoffset(void);
R
Roman Zippel 已提交
99 100
extern void amiga_mksound(unsigned int count, unsigned int ticks);
static void amiga_reset(void);
L
Linus Torvalds 已提交
101 102 103 104 105 106 107 108
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 已提交
109 110 111
	.name	= "debug",
	.flags	= CON_PRINTBUFFER,
	.index	= -1,
L
Linus Torvalds 已提交
112 113 114 115 116 117 118 119
};


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

static struct {
R
Roman Zippel 已提交
120
	struct resource _ciab, _ciaa, _custom, _kickstart;
L
Linus Torvalds 已提交
121
} mb_resources = {
R
Roman Zippel 已提交
122 123 124 125 126 127 128 129 130 131 132 133
	._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 已提交
134 135 136 137 138 139 140 141 142
};

static struct resource ram_resource[NUM_MEMINFO];


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

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

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

	case BI_AMIGA_ECLOCK:
R
Roman Zippel 已提交
154 155
		amiga_eclock = *data;
		break;
L
Linus Torvalds 已提交
156 157

	case BI_AMIGA_CHIPSET:
R
Roman Zippel 已提交
158 159
		amiga_chipset = *data;
		break;
L
Linus Torvalds 已提交
160 161

	case BI_AMIGA_CHIP_SIZE:
R
Roman Zippel 已提交
162 163
		amiga_chip_size = *(const int *)data;
		break;
L
Linus Torvalds 已提交
164 165

	case BI_AMIGA_VBLANK:
R
Roman Zippel 已提交
166 167
		amiga_vblank = *(const unsigned char *)data;
		break;
L
Linus Torvalds 已提交
168 169

	case BI_AMIGA_PSFREQ:
R
Roman Zippel 已提交
170 171
		amiga_psfreq = *(const unsigned char *)data;
		break;
L
Linus Torvalds 已提交
172 173 174

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

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

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

    /*
     *  Identify builtin hardware
     */

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

R
Roman Zippel 已提交
208 209 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
	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 已提交
357 358 359 360 361 362 363 364 365 366

#undef AMIGAHW_ANNOUNCE
}

    /*
     *  Setup the Amiga configuration info
     */

void __init config_amiga(void)
{
R
Roman Zippel 已提交
367 368 369 370 371 372 373 374 375 376 377 378 379
	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;
380
	arch_gettimeoffset   = amiga_gettimeoffset;
R
Roman Zippel 已提交
381 382 383 384 385 386 387 388 389

	/*
	 * 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 已提交
390
#if defined(CONFIG_INPUT_M68K_BEEP) || defined(CONFIG_INPUT_M68K_BEEP_MODULE)
R
Roman Zippel 已提交
391
	mach_beep            = amiga_mksound;
L
Linus Torvalds 已提交
392 393 394
#endif

#ifdef CONFIG_HEARTBEAT
R
Roman Zippel 已提交
395
	mach_heartbeat = amiga_heartbeat;
L
Linus Torvalds 已提交
396 397
#endif

A
Adrian Bunk 已提交
398
	/* Fill in the clock value (based on the 700 kHz E-Clock) */
R
Roman Zippel 已提交
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 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453
	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 已提交
454 455 456 457
}

static unsigned short jiffy_ticks;

458
static void __init amiga_sched_init(irq_handler_t timer_routine)
L
Linus Torvalds 已提交
459 460
{
	static struct resource sched_res = {
R
Roman Zippel 已提交
461
		.name = "timer", .start = 0x00bfd400, .end = 0x00bfd5ff,
L
Linus Torvalds 已提交
462
	};
J
Julia Lawall 已提交
463
	jiffy_ticks = DIV_ROUND_CLOSEST(amiga_eclock, HZ);
L
Linus Torvalds 已提交
464 465

	if (request_resource(&mb_resources._ciab, &sched_res))
R
Roman Zippel 已提交
466
		printk("Cannot allocate ciab.ta{lo,hi}\n");
L
Linus Torvalds 已提交
467 468 469 470 471 472 473 474 475
	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
	 */
476 477
	if (request_irq(IRQ_AMIGA_CIAB_TA, timer_routine, 0, "timer", NULL))
		pr_err("Couldn't register timer interrupt\n");
L
Linus Torvalds 已提交
478 479 480 481 482 483 484
	/* start timer */
	ciab.cra |= 0x11;
}

#define TICK_SIZE 10000

/* This is always executed with interrupts disabled.  */
485
static u32 amiga_gettimeoffset(void)
L
Linus Torvalds 已提交
486 487
{
	unsigned short hi, lo, hi2;
488
	u32 ticks, offset = 0;
L
Linus Torvalds 已提交
489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509

	/* 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;

510
	return (ticks + offset) * 1000;
L
Linus Torvalds 已提交
511 512
}

513
static void amiga_reset(void)  __noreturn;
L
Linus Torvalds 已提交
514

R
Roman Zippel 已提交
515
static void amiga_reset(void)
L
Linus Torvalds 已提交
516
{
R
Roman Zippel 已提交
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 576 577
	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 已提交
578 579 580 581 582 583 584 585 586 587 588 589 590
}


    /*
     *  Debugging
     */

#define SAVEKMSG_MAXMEM		128*1024

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

struct savekmsg {
R
Roman Zippel 已提交
591 592 593 594 595
	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 已提交
596 597 598 599 600 601 602
};

static struct savekmsg *savekmsg;

static void amiga_mem_console_write(struct console *co, const char *s,
				    unsigned int count)
{
R
Roman Zippel 已提交
603 604 605 606
	if (savekmsg->size + count <= SAVEKMSG_MAXMEM-sizeof(struct savekmsg)) {
		memcpy(savekmsg->data + savekmsg->size, s, count);
		savekmsg->size += count;
	}
L
Linus Torvalds 已提交
607 608
}

R
Roman Zippel 已提交
609
static int __init amiga_savekmsg_setup(char *arg)
L
Linus Torvalds 已提交
610
{
R
Roman Zippel 已提交
611
	if (!MACH_IS_AMIGA || strcmp(arg, "mem"))
G
Geert Uytterhoeven 已提交
612
		return 0;
R
Roman Zippel 已提交
613

G
Geert Uytterhoeven 已提交
614 615 616
	if (amiga_chip_size < SAVEKMSG_MAXMEM) {
		pr_err("Not enough chipram for debugging\n");
		return -ENOMEM;
R
Roman Zippel 已提交
617 618
	}

G
Geert Uytterhoeven 已提交
619 620
	/* Just steal the block, the chipram allocator isn't functional yet */
	amiga_chip_size -= SAVEKMSG_MAXMEM;
621
	savekmsg = ZTWO_VADDR(CHIP_PHYSADDR + amiga_chip_size);
R
Roman Zippel 已提交
622 623 624 625
	savekmsg->magic1 = SAVEKMSG_MAGIC1;
	savekmsg->magic2 = SAVEKMSG_MAGIC2;
	savekmsg->magicptr = ZTWO_PADDR(savekmsg);
	savekmsg->size = 0;
R
Roman Zippel 已提交
626 627 628 629

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

R
Roman Zippel 已提交
632 633
early_param("debug", amiga_savekmsg_setup);

L
Linus Torvalds 已提交
634 635
static void amiga_serial_putc(char c)
{
R
Roman Zippel 已提交
636 637 638
	amiga_custom.serdat = (unsigned char)c | 0x100;
	while (!(amiga_custom.serdatr & 0x2000))
		;
L
Linus Torvalds 已提交
639 640
}

A
Adrian Bunk 已提交
641 642
static void amiga_serial_console_write(struct console *co, const char *s,
				       unsigned int count)
L
Linus Torvalds 已提交
643
{
R
Roman Zippel 已提交
644 645 646 647 648
	while (count--) {
		if (*s == '\n')
			amiga_serial_putc('\r');
		amiga_serial_putc(*s++);
	}
L
Linus Torvalds 已提交
649 650
}

A
Adrian Bunk 已提交
651
#if 0
L
Linus Torvalds 已提交
652 653
void amiga_serial_puts(const char *s)
{
R
Roman Zippel 已提交
654
	amiga_serial_console_write(NULL, s, strlen(s));
L
Linus Torvalds 已提交
655 656 657 658
}

int amiga_serial_console_wait_key(struct console *co)
{
R
Roman Zippel 已提交
659 660 661 662 663 664 665 666
	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 已提交
667 668 669 670
}

void amiga_serial_gets(struct console *co, char *s, int len)
{
R
Roman Zippel 已提交
671 672 673 674 675 676 677 678 679 680 681 682 683 684 685
	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 已提交
686

R
Roman Zippel 已提交
687 688 689
		/* Check for enter. */
		if (ch == 10 || ch == 13)
			break;
L
Linus Torvalds 已提交
690

R
Roman Zippel 已提交
691 692 693 694 695 696
		/* See if line is too long. */
		if (cnt >= len + 1) {
			amiga_serial_putc(7);
			cnt--;
			continue;
		}
L
Linus Torvalds 已提交
697

R
Roman Zippel 已提交
698 699 700 701 702 703 704
		/* Store and echo character. */
		s[cnt++] = ch;
		amiga_serial_putc(ch);
	}
	/* Print enter. */
	amiga_serial_puts("\r\n");
	s[cnt] = 0;
L
Linus Torvalds 已提交
705 706 707
}
#endif

R
Roman Zippel 已提交
708
static int __init amiga_debug_setup(char *arg)
L
Linus Torvalds 已提交
709
{
R
Roman Zippel 已提交
710
	if (MACH_IS_AMIGA && !strcmp(arg, "ser")) {
L
Linus Torvalds 已提交
711 712 713 714
		/* no initialization required (?) */
		amiga_console_driver.write = amiga_serial_console_write;
		register_console(&amiga_console_driver);
	}
R
Roman Zippel 已提交
715
	return 0;
L
Linus Torvalds 已提交
716 717
}

R
Roman Zippel 已提交
718 719
early_param("debug", amiga_debug_setup);

L
Linus Torvalds 已提交
720 721 722
#ifdef CONFIG_HEARTBEAT
static void amiga_heartbeat(int on)
{
R
Roman Zippel 已提交
723 724 725 726
	if (on)
		ciaa.pra &= ~2;
	else
		ciaa.pra |= 2;
L
Linus Torvalds 已提交
727 728 729 730 731 732 733 734 735
}
#endif

    /*
     *  Amiga specific parts of /proc
     */

static void amiga_get_model(char *model)
{
R
Roman Zippel 已提交
736
	strcpy(model, amiga_model_name);
L
Linus Torvalds 已提交
737 738 739
}


740
static void amiga_get_hardware_list(struct seq_file *m)
L
Linus Torvalds 已提交
741
{
R
Roman Zippel 已提交
742
	if (AMIGAHW_PRESENT(CHIP_RAM))
743 744
		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 已提交
745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761
			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;
		}
762
		seq_printf(m, "Graphics:\t%s\n", type);
L
Linus Torvalds 已提交
763 764 765
	}

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

769
	seq_printf (m, "Detected hardware:\n");
R
Roman Zippel 已提交
770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799

	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 已提交
800
#ifdef CONFIG_ZORRO
R
Roman Zippel 已提交
801
	if (AMIGAHW_PRESENT(ZORRO))
802
		seq_printf(m, "\tZorro II%s AutoConfig: %d Expansion "
R
Roman Zippel 已提交
803 804 805
				"Device%s\n",
				AMIGAHW_PRESENT(ZORRO3) ? "I" : "",
				zorro_num_autocon, zorro_num_autocon == 1 ? "" : "s");
L
Linus Torvalds 已提交
806 807 808 809
#endif /* CONFIG_ZORRO */

#undef AMIGAHW_ANNOUNCE
}
810 811 812 813 814 815 816 817

/*
 * 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