config.c
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:28k
源码类别:

嵌入式Linux

开发平台:

Unix_Linux

  1. /*
  2.  *  linux/arch/m68k/amiga/config.c
  3.  *
  4.  *  Copyright (C) 1993 Hamish Macdonald
  5.  *
  6.  * This file is subject to the terms and conditions of the GNU General Public
  7.  * License.  See the file COPYING in the main directory of this archive
  8.  * for more details.
  9.  */
  10. /*
  11.  * Miscellaneous Amiga stuff
  12.  */
  13. #include <linux/config.h>
  14. #include <linux/types.h>
  15. #include <linux/kernel.h>
  16. #include <linux/mm.h>
  17. #include <linux/tty.h>
  18. #include <linux/console.h>
  19. #include <linux/init.h>
  20. #ifdef CONFIG_ZORRO
  21. #include <linux/zorro.h>
  22. #endif
  23. #include <asm/bootinfo.h>
  24. #include <asm/setup.h>
  25. #include <asm/system.h>
  26. #include <asm/pgtable.h>
  27. #include <asm/amigahw.h>
  28. #include <asm/amigaints.h>
  29. #include <asm/irq.h>
  30. #include <asm/rtc.h>
  31. #include <asm/keyboard.h>
  32. #include <asm/machdep.h>
  33. #include <asm/io.h>
  34. unsigned long amiga_model;
  35. unsigned long amiga_eclock;
  36. unsigned long amiga_masterclock;
  37. unsigned long amiga_colorclock;
  38. unsigned long amiga_chipset;
  39. unsigned char amiga_vblank;
  40. unsigned char amiga_psfreq;
  41. struct amiga_hw_present amiga_hw_present;
  42. static char s_a500[] __initdata = "A500";
  43. static char s_a500p[] __initdata = "A500+";
  44. static char s_a600[] __initdata = "A600";
  45. static char s_a1000[] __initdata = "A1000";
  46. static char s_a1200[] __initdata = "A1200";
  47. static char s_a2000[] __initdata = "A2000";
  48. static char s_a2500[] __initdata = "A2500";
  49. static char s_a3000[] __initdata = "A3000";
  50. static char s_a3000t[] __initdata = "A3000T";
  51. static char s_a3000p[] __initdata = "A3000+";
  52. static char s_a4000[] __initdata = "A4000";
  53. static char s_a4000t[] __initdata = "A4000T";
  54. static char s_cdtv[] __initdata = "CDTV";
  55. static char s_cd32[] __initdata = "CD32";
  56. static char s_draco[] __initdata = "Draco";
  57. static char *amiga_models[] __initdata = {
  58.     s_a500, s_a500p, s_a600, s_a1000, s_a1200, s_a2000, s_a2500, s_a3000,
  59.     s_a3000t, s_a3000p, s_a4000, s_a4000t, s_cdtv, s_cd32, s_draco,
  60. };
  61. static char amiga_model_name[13] = "Amiga ";
  62. extern char m68k_debug_device[];
  63. static void amiga_sched_init(void (*handler)(int, void *, struct pt_regs *));
  64. /* amiga specific keyboard functions */
  65. extern int amiga_keyb_init(void);
  66. extern int amiga_kbdrate (struct kbd_repeat *);
  67. extern int amiga_kbd_translate(unsigned char keycode, unsigned char *keycodep,
  68.        char raw_mode);
  69. /* amiga specific irq functions */
  70. extern void amiga_init_IRQ (void);
  71. extern void (*amiga_default_handler[]) (int, void *, struct pt_regs *);
  72. extern int amiga_request_irq (unsigned int irq,
  73.       void (*handler)(int, void *, struct pt_regs *),
  74.                               unsigned long flags, const char *devname,
  75.       void *dev_id);
  76. extern void amiga_free_irq (unsigned int irq, void *dev_id);
  77. extern void amiga_enable_irq (unsigned int);
  78. extern void amiga_disable_irq (unsigned int);
  79. static void amiga_get_model(char *model);
  80. static int amiga_get_hardware_list(char *buffer);
  81. extern int amiga_get_irq_list (char *);
  82. /* amiga specific timer functions */
  83. static unsigned long amiga_gettimeoffset (void);
  84. static void a3000_gettod (int *, int *, int *, int *, int *, int *);
  85. static void a2000_gettod (int *, int *, int *, int *, int *, int *);
  86. static int amiga_hwclk (int, struct hwclk_time *);
  87. static int amiga_set_clock_mmss (unsigned long);
  88. extern void amiga_mksound( unsigned int count, unsigned int ticks );
  89. #ifdef CONFIG_AMIGA_FLOPPY
  90. extern void amiga_floppy_setup(char *, int *);
  91. #endif
  92. static void amiga_reset (void);
  93. static int amiga_wait_key (struct console *co);
  94. extern void amiga_init_sound(void);
  95. static void amiga_savekmsg_init(void);
  96. static void amiga_mem_console_write(struct console *co, const char *b,
  97.     unsigned int count);
  98. void amiga_serial_console_write(struct console *co, const char *s,
  99. unsigned int count);
  100. static void amiga_debug_init(void);
  101. #ifdef CONFIG_HEARTBEAT
  102. static void amiga_heartbeat(int on);
  103. #endif
  104. static struct console amiga_console_driver = {
  105. name: "debug",
  106. wait_key: amiga_wait_key,
  107. flags: CON_PRINTBUFFER,
  108. index: -1,
  109. };
  110. #ifdef CONFIG_MAGIC_SYSRQ
  111. static char amiga_sysrq_xlate[128] =
  112. "001234567890-=\0000" /* 0x00 - 0x0f */
  113. "qwertyuiop[]00123" /* 0x10 - 0x1f */
  114. "asdfghjkl;'0000456" /* 0x20 - 0x2f */
  115. "00zxcvbnm,./00+789" /* 0x30 - 0x3f */
  116. " 177trr00177000000-0000000000" /* 0x40 - 0x4f */
  117. "00201202203204205206207210211()/*+00" /* 0x50 - 0x5f */
  118. "00000000000000000000000000000000" /* 0x60 - 0x6f */
  119. "00000000000000000000000000000000"; /* 0x70 - 0x7f */
  120. #endif
  121. extern void (*kd_mksound)(unsigned int, unsigned int);
  122.     /*
  123.      *  Motherboard Resources present in all Amiga models
  124.      */
  125. static struct {
  126.     struct resource _ciab, _ciaa, _custom, _kickstart;
  127. } mb_resources = {
  128.     _ciab: { "CIA B", 0x00bfd000, 0x00bfdfff },
  129.     _ciaa: { "CIA A", 0x00bfe000, 0x00bfefff },
  130.     _custom: { "Custom I/O", 0x00dff000, 0x00dfffff },
  131.     _kickstart: { "Kickstart ROM", 0x00f80000, 0x00ffffff }
  132. };
  133. static struct resource rtc_resource = {
  134.     NULL, 0x00dc0000, 0x00dcffff
  135. };
  136. static struct resource ram_resource[NUM_MEMINFO];
  137.     /*
  138.      *  Parse an Amiga-specific record in the bootinfo
  139.      */
  140. int amiga_parse_bootinfo(const struct bi_record *record)
  141. {
  142.     int unknown = 0;
  143.     const unsigned long *data = record->data;
  144.     switch (record->tag) {
  145. case BI_AMIGA_MODEL:
  146.     amiga_model = *data;
  147.     break;
  148. case BI_AMIGA_ECLOCK:
  149.     amiga_eclock = *data;
  150.     break;
  151. case BI_AMIGA_CHIPSET:
  152.     amiga_chipset = *data;
  153.     break;
  154. case BI_AMIGA_CHIP_SIZE:
  155.     amiga_chip_size = *(const int *)data;
  156.     break;
  157. case BI_AMIGA_VBLANK:
  158.     amiga_vblank = *(const unsigned char *)data;
  159.     break;
  160. case BI_AMIGA_PSFREQ:
  161.     amiga_psfreq = *(const unsigned char *)data;
  162.     break;
  163. case BI_AMIGA_AUTOCON:
  164. #ifdef CONFIG_ZORRO
  165.     if (zorro_num_autocon < ZORRO_NUM_AUTO) {
  166. const struct ConfigDev *cd = (struct ConfigDev *)data;
  167. struct zorro_dev *dev = &zorro_autocon[zorro_num_autocon++];
  168. dev->rom = cd->cd_Rom;
  169. dev->slotaddr = cd->cd_SlotAddr;
  170. dev->slotsize = cd->cd_SlotSize;
  171. dev->resource.start = (unsigned long)cd->cd_BoardAddr;
  172. dev->resource.end = dev->resource.start+cd->cd_BoardSize-1;
  173.     } else
  174. printk("amiga_parse_bootinfo: too many AutoConfig devicesn");
  175. #endif /* CONFIG_ZORRO */
  176.     break;
  177. case BI_AMIGA_SERPER:
  178.     /* serial port period: ignored here */
  179.     break;
  180. default:
  181.     unknown = 1;
  182.     }
  183.     return(unknown);
  184. }
  185.     /*
  186.      *  Identify builtin hardware
  187.      */
  188. static void __init amiga_identify(void)
  189. {
  190.   /* Fill in some default values, if necessary */
  191.   if (amiga_eclock == 0)
  192.     amiga_eclock = 709379;
  193.   memset(&amiga_hw_present, 0, sizeof(amiga_hw_present));
  194.   printk("Amiga hardware found: ");
  195.   if (amiga_model >= AMI_500 && amiga_model <= AMI_DRACO) {
  196.     printk("[%s] ", amiga_models[amiga_model-AMI_500]);
  197.     strcat(amiga_model_name, amiga_models[amiga_model-AMI_500]);
  198.   }
  199.   switch(amiga_model) {
  200.   case AMI_UNKNOWN:
  201.     goto Generic;
  202.   case AMI_600:
  203.   case AMI_1200:
  204.     AMIGAHW_SET(A1200_IDE);
  205.     AMIGAHW_SET(PCMCIA);
  206.   case AMI_500:
  207.   case AMI_500PLUS:
  208.   case AMI_1000:
  209.   case AMI_2000:
  210.   case AMI_2500:
  211.     AMIGAHW_SET(A2000_CLK); /* Is this correct for all models? */
  212.     goto Generic;
  213.   case AMI_3000:
  214.   case AMI_3000T:
  215.     AMIGAHW_SET(AMBER_FF);
  216.     AMIGAHW_SET(MAGIC_REKICK);
  217.     /* fall through */
  218.   case AMI_3000PLUS:
  219.     AMIGAHW_SET(A3000_SCSI);
  220.     AMIGAHW_SET(A3000_CLK);
  221.     AMIGAHW_SET(ZORRO3);
  222.     goto Generic;
  223.   case AMI_4000T:
  224.     AMIGAHW_SET(A4000_SCSI);
  225.     /* fall through */
  226.   case AMI_4000:
  227.     AMIGAHW_SET(A4000_IDE);
  228.     AMIGAHW_SET(A3000_CLK);
  229.     AMIGAHW_SET(ZORRO3);
  230.     goto Generic;
  231.   case AMI_CDTV:
  232.   case AMI_CD32:
  233.     AMIGAHW_SET(CD_ROM);
  234.     AMIGAHW_SET(A2000_CLK);             /* Is this correct? */
  235.     goto Generic;
  236.   Generic:
  237.     AMIGAHW_SET(AMI_VIDEO);
  238.     AMIGAHW_SET(AMI_BLITTER);
  239.     AMIGAHW_SET(AMI_AUDIO);
  240.     AMIGAHW_SET(AMI_FLOPPY);
  241.     AMIGAHW_SET(AMI_KEYBOARD);
  242.     AMIGAHW_SET(AMI_MOUSE);
  243.     AMIGAHW_SET(AMI_SERIAL);
  244.     AMIGAHW_SET(AMI_PARALLEL);
  245.     AMIGAHW_SET(CHIP_RAM);
  246.     AMIGAHW_SET(PAULA);
  247.     switch(amiga_chipset) {
  248.     case CS_OCS:
  249.     case CS_ECS:
  250.     case CS_AGA:
  251.       switch (custom.deniseid & 0xf) {
  252.       case 0x0c:
  253. AMIGAHW_SET(DENISE_HR);
  254. break;
  255.       case 0x08:
  256. AMIGAHW_SET(LISA);
  257. break;
  258.       }
  259.       break;
  260.     default:
  261.       AMIGAHW_SET(DENISE);
  262.       break;
  263.     }
  264.     switch ((custom.vposr>>8) & 0x7f) {
  265.     case 0x00:
  266.       AMIGAHW_SET(AGNUS_PAL);
  267.       break;
  268.     case 0x10:
  269.       AMIGAHW_SET(AGNUS_NTSC);
  270.       break;
  271.     case 0x20:
  272.     case 0x21:
  273.       AMIGAHW_SET(AGNUS_HR_PAL);
  274.       break;
  275.     case 0x30:
  276.     case 0x31:
  277.       AMIGAHW_SET(AGNUS_HR_NTSC);
  278.       break;
  279.     case 0x22:
  280.     case 0x23:
  281.       AMIGAHW_SET(ALICE_PAL);
  282.       break;
  283.     case 0x32:
  284.     case 0x33:
  285.       AMIGAHW_SET(ALICE_NTSC);
  286.       break;
  287.     }
  288.     AMIGAHW_SET(ZORRO);
  289.     break;
  290.   case AMI_DRACO:
  291.     panic("No support for Draco yet");
  292.  
  293.   default:
  294.     panic("Unknown Amiga Model");
  295.   }
  296. #define AMIGAHW_ANNOUNCE(name, str)
  297.   if (AMIGAHW_PRESENT(name))
  298.     printk(str)
  299.   AMIGAHW_ANNOUNCE(AMI_VIDEO, "VIDEO ");
  300.   AMIGAHW_ANNOUNCE(AMI_BLITTER, "BLITTER ");
  301.   AMIGAHW_ANNOUNCE(AMBER_FF, "AMBER_FF ");
  302.   AMIGAHW_ANNOUNCE(AMI_AUDIO, "AUDIO ");
  303.   AMIGAHW_ANNOUNCE(AMI_FLOPPY, "FLOPPY ");
  304.   AMIGAHW_ANNOUNCE(A3000_SCSI, "A3000_SCSI ");
  305.   AMIGAHW_ANNOUNCE(A4000_SCSI, "A4000_SCSI ");
  306.   AMIGAHW_ANNOUNCE(A1200_IDE, "A1200_IDE ");
  307.   AMIGAHW_ANNOUNCE(A4000_IDE, "A4000_IDE ");
  308.   AMIGAHW_ANNOUNCE(CD_ROM, "CD_ROM ");
  309.   AMIGAHW_ANNOUNCE(AMI_KEYBOARD, "KEYBOARD ");
  310.   AMIGAHW_ANNOUNCE(AMI_MOUSE, "MOUSE ");
  311.   AMIGAHW_ANNOUNCE(AMI_SERIAL, "SERIAL ");
  312.   AMIGAHW_ANNOUNCE(AMI_PARALLEL, "PARALLEL ");
  313.   AMIGAHW_ANNOUNCE(A2000_CLK, "A2000_CLK ");
  314.   AMIGAHW_ANNOUNCE(A3000_CLK, "A3000_CLK ");
  315.   AMIGAHW_ANNOUNCE(CHIP_RAM, "CHIP_RAM ");
  316.   AMIGAHW_ANNOUNCE(PAULA, "PAULA ");
  317.   AMIGAHW_ANNOUNCE(DENISE, "DENISE ");
  318.   AMIGAHW_ANNOUNCE(DENISE_HR, "DENISE_HR ");
  319.   AMIGAHW_ANNOUNCE(LISA, "LISA ");
  320.   AMIGAHW_ANNOUNCE(AGNUS_PAL, "AGNUS_PAL ");
  321.   AMIGAHW_ANNOUNCE(AGNUS_NTSC, "AGNUS_NTSC ");
  322.   AMIGAHW_ANNOUNCE(AGNUS_HR_PAL, "AGNUS_HR_PAL ");
  323.   AMIGAHW_ANNOUNCE(AGNUS_HR_NTSC, "AGNUS_HR_NTSC ");
  324.   AMIGAHW_ANNOUNCE(ALICE_PAL, "ALICE_PAL ");
  325.   AMIGAHW_ANNOUNCE(ALICE_NTSC, "ALICE_NTSC ");
  326.   AMIGAHW_ANNOUNCE(MAGIC_REKICK, "MAGIC_REKICK ");
  327.   AMIGAHW_ANNOUNCE(PCMCIA, "PCMCIA ");
  328.   if (AMIGAHW_PRESENT(ZORRO))
  329.     printk("ZORRO%s ", AMIGAHW_PRESENT(ZORRO3) ? "3" : "");
  330.   printk("n");
  331. #undef AMIGAHW_ANNOUNCE
  332. }
  333.     /*
  334.      *  Setup the Amiga configuration info
  335.      */
  336. void __init config_amiga(void)
  337. {
  338.   int i;
  339.   amiga_debug_init();
  340.   amiga_identify();
  341.   /* Yuk, we don't have PCI memory */
  342.   iomem_resource.name = "Memory";
  343.   for (i = 0; i < 4; i++)
  344.     request_resource(&iomem_resource, &((struct resource *)&mb_resources)[i]);
  345.   mach_sched_init      = amiga_sched_init;
  346.   mach_keyb_init       = amiga_keyb_init;
  347.   mach_kbdrate         = amiga_kbdrate;
  348.   mach_kbd_translate   = amiga_kbd_translate;
  349.   SYSRQ_KEY            = 0xff;
  350.   mach_init_IRQ        = amiga_init_IRQ;
  351.   mach_default_handler = &amiga_default_handler;
  352.   mach_request_irq     = amiga_request_irq;
  353.   mach_free_irq        = amiga_free_irq;
  354.   enable_irq           = amiga_enable_irq;
  355.   disable_irq          = amiga_disable_irq;
  356.   mach_get_model       = amiga_get_model;
  357.   mach_get_hardware_list = amiga_get_hardware_list;
  358.   mach_get_irq_list    = amiga_get_irq_list;
  359.   mach_gettimeoffset   = amiga_gettimeoffset;
  360.   if (AMIGAHW_PRESENT(A3000_CLK)){
  361.     mach_gettod  = a3000_gettod;
  362.     rtc_resource.name = "A3000 RTC";
  363.     request_resource(&iomem_resource, &rtc_resource);
  364.   }
  365.   else{ /* if (AMIGAHW_PRESENT(A2000_CLK)) */
  366.     mach_gettod  = a2000_gettod;
  367.     rtc_resource.name = "A2000 RTC";
  368.     request_resource(&iomem_resource, &rtc_resource);
  369.   }
  370.   mach_max_dma_address = 0xffffffff; /*
  371.       * default MAX_DMA=0xffffffff
  372.       * on all machines. If we don't
  373.       * do so, the SCSI code will not
  374.       * be able to allocate any mem
  375.       * for transfers, unless we are
  376.       * dealing with a Z2 mem only
  377.       * system.                  /Jes
  378.       */
  379.   mach_hwclk           = amiga_hwclk;
  380.   mach_set_clock_mmss  = amiga_set_clock_mmss;
  381. #ifdef CONFIG_AMIGA_FLOPPY
  382.   mach_floppy_setup    = amiga_floppy_setup;
  383. #endif
  384.   mach_reset           = amiga_reset;
  385. #ifdef CONFIG_DUMMY_CONSOLE
  386.   conswitchp           = &dummy_con;
  387. #endif
  388.   kd_mksound           = amiga_mksound;
  389. #ifdef CONFIG_MAGIC_SYSRQ
  390.   mach_sysrq_key = 0x5f;      /* HELP */
  391.   mach_sysrq_shift_state = 0x03; /* SHIFT+ALTGR */
  392.   mach_sysrq_shift_mask = 0xff;  /* all modifiers except CapsLock */
  393.   mach_sysrq_xlate = amiga_sysrq_xlate;
  394. #endif
  395. #ifdef CONFIG_HEARTBEAT
  396.   mach_heartbeat = amiga_heartbeat;
  397. #endif
  398.   /* Fill in the clock values (based on the 700 kHz E-Clock) */
  399.   amiga_masterclock = 40*amiga_eclock; /* 28 MHz */
  400.   amiga_colorclock = 5*amiga_eclock; /* 3.5 MHz */
  401.   /* clear all DMA bits */
  402.   custom.dmacon = DMAF_ALL;
  403.   /* ensure that the DMA master bit is set */
  404.   custom.dmacon = DMAF_SETCLR | DMAF_MASTER;
  405.   /* don't use Z2 RAM as system memory on Z3 capable machines */
  406.   if (AMIGAHW_PRESENT(ZORRO3)) {
  407.     int i, j;
  408.     u32 disabled_z2mem = 0;
  409.     for (i = 0; i < m68k_num_memory; i++)
  410.       if (m68k_memory[i].addr < 16*1024*1024) {
  411. if (i == 0) {
  412.   /* don't cut off the branch we're sitting on */
  413.   printk("Warning: kernel runs in Zorro II memoryn");
  414.   continue;
  415. }
  416. disabled_z2mem += m68k_memory[i].size;
  417. m68k_num_memory--;
  418. for (j = i; j < m68k_num_memory; j++)
  419.   m68k_memory[j] = m68k_memory[j+1];
  420. i--;
  421.       }
  422.     if (disabled_z2mem)
  423.       printk("%dK of Zorro II memory will not be used as system memoryn",
  424.      disabled_z2mem>>10);
  425.   }
  426.   /* request all RAM */
  427.   for (i = 0; i < m68k_num_memory; i++) {
  428.     ram_resource[i].name =
  429.       (m68k_memory[i].addr >= 0x01000000) ? "32-bit Fast RAM" :
  430.       (m68k_memory[i].addr < 0x00c00000) ? "16-bit Fast RAM" :
  431.       "16-bit Slow RAM";
  432.     ram_resource[i].start = m68k_memory[i].addr;
  433.     ram_resource[i].end = m68k_memory[i].addr+m68k_memory[i].size-1;
  434.     request_resource(&iomem_resource, &ram_resource[i]);
  435.   }
  436.   /* initialize chipram allocator */
  437.   amiga_chip_init ();
  438.   /* debugging using chipram */
  439.   if (!strcmp( m68k_debug_device, "mem" )){
  440.   if (!AMIGAHW_PRESENT(CHIP_RAM))
  441.   printk("Warning: no chipram present for debuggingn");
  442.   else {
  443.   amiga_savekmsg_init();
  444.   amiga_console_driver.write = amiga_mem_console_write;
  445.   register_console(&amiga_console_driver);
  446.   }
  447.   }
  448.   /* our beloved beeper */
  449.   if (AMIGAHW_PRESENT(AMI_AUDIO))
  450.   amiga_init_sound();
  451.   /*
  452.    * if it is an A3000, set the magic bit that forces
  453.    * a hard rekick
  454.    */
  455.   if (AMIGAHW_PRESENT(MAGIC_REKICK))
  456.   *(unsigned char *)ZTWO_VADDR(0xde0002) |= 0x80;
  457. }
  458. static unsigned short jiffy_ticks;
  459. static void __init amiga_sched_init(void (*timer_routine)(int, void *,
  460.   struct pt_regs *))
  461. {
  462. static struct resource sched_res = {
  463.     "timer", 0x00bfd400, 0x00bfd5ff,
  464. };
  465. jiffy_ticks = (amiga_eclock+HZ/2)/HZ;
  466. if (request_resource(&mb_resources._ciab, &sched_res))
  467.     printk("Cannot allocate ciab.ta{lo,hi}n");
  468. ciab.cra &= 0xC0;   /* turn off timer A, continuous mode, from Eclk */
  469. ciab.talo = jiffy_ticks % 256;
  470. ciab.tahi = jiffy_ticks / 256;
  471. /* install interrupt service routine for CIAB Timer A
  472.  *
  473.  * Please don't change this to use ciaa, as it interferes with the
  474.  * SCSI code. We'll have to take a look at this later
  475.  */
  476. request_irq(IRQ_AMIGA_CIAB_TA, timer_routine, 0, "timer", NULL);
  477. /* start timer */
  478. ciab.cra |= 0x11;
  479. }
  480. #define TICK_SIZE 10000
  481. /* This is always executed with interrupts disabled.  */
  482. static unsigned long amiga_gettimeoffset (void)
  483. {
  484. unsigned short hi, lo, hi2;
  485. unsigned long ticks, offset = 0;
  486. /* read CIA B timer A current value */
  487. hi  = ciab.tahi;
  488. lo  = ciab.talo;
  489. hi2 = ciab.tahi;
  490. if (hi != hi2) {
  491. lo = ciab.talo;
  492. hi = hi2;
  493. }
  494. ticks = hi << 8 | lo;
  495. if (ticks > jiffy_ticks / 2)
  496. /* check for pending interrupt */
  497. if (cia_set_irq(&ciab_base, 0) & CIA_ICR_TA)
  498. offset = 10000;
  499. ticks = jiffy_ticks - ticks;
  500. ticks = (10000 * ticks) / jiffy_ticks;
  501. return ticks + offset;
  502. }
  503. static void a3000_gettod (int *yearp, int *monp, int *dayp,
  504.   int *hourp, int *minp, int *secp)
  505. {
  506. volatile struct tod3000 *tod = TOD_3000;
  507. tod->cntrl1 = TOD3000_CNTRL1_HOLD;
  508. *secp  = tod->second1 * 10 + tod->second2;
  509. *minp  = tod->minute1 * 10 + tod->minute2;
  510. *hourp = tod->hour1   * 10 + tod->hour2;
  511. *dayp  = tod->day1    * 10 + tod->day2;
  512. *monp  = tod->month1  * 10 + tod->month2;
  513. *yearp = tod->year1   * 10 + tod->year2;
  514. tod->cntrl1 = TOD3000_CNTRL1_FREE;
  515. }
  516. static void a2000_gettod (int *yearp, int *monp, int *dayp,
  517.   int *hourp, int *minp, int *secp)
  518. {
  519. volatile struct tod2000 *tod = TOD_2000;
  520. tod->cntrl1 = TOD2000_CNTRL1_HOLD;
  521. while (tod->cntrl1 & TOD2000_CNTRL1_BUSY)
  522. ;
  523. *secp  = tod->second1     * 10 + tod->second2;
  524. *minp  = tod->minute1     * 10 + tod->minute2;
  525. *hourp = (tod->hour1 & 3) * 10 + tod->hour2;
  526. *dayp  = tod->day1        * 10 + tod->day2;
  527. *monp  = tod->month1      * 10 + tod->month2;
  528. *yearp = tod->year1       * 10 + tod->year2;
  529. if (!(tod->cntrl3 & TOD2000_CNTRL3_24HMODE)){
  530. if (!(tod->hour1 & TOD2000_HOUR1_PM) && *hourp == 12)
  531. *hourp = 0;
  532. else if ((tod->hour1 & TOD2000_HOUR1_PM) && *hourp != 12)
  533. *hourp += 12;
  534. }
  535. tod->cntrl1 &= ~TOD2000_CNTRL1_HOLD;
  536. }
  537. static int amiga_hwclk(int op, struct hwclk_time *t)
  538. {
  539. if (AMIGAHW_PRESENT(A3000_CLK)) {
  540. volatile struct tod3000 *tod = TOD_3000;
  541. tod->cntrl1 = TOD3000_CNTRL1_HOLD;
  542. if (!op) { /* read */
  543. t->sec  = tod->second1 * 10 + tod->second2;
  544. t->min  = tod->minute1 * 10 + tod->minute2;
  545. t->hour = tod->hour1   * 10 + tod->hour2;
  546. t->day  = tod->day1    * 10 + tod->day2;
  547. t->wday = tod->weekday;
  548. t->mon  = tod->month1  * 10 + tod->month2 - 1;
  549. t->year = tod->year1   * 10 + tod->year2;
  550. if (t->year <= 69)
  551. t->year += 100;
  552. } else {
  553. tod->second1 = t->sec / 10;
  554. tod->second2 = t->sec % 10;
  555. tod->minute1 = t->min / 10;
  556. tod->minute2 = t->min % 10;
  557. tod->hour1   = t->hour / 10;
  558. tod->hour2   = t->hour % 10;
  559. tod->day1    = t->day / 10;
  560. tod->day2    = t->day % 10;
  561. if (t->wday != -1)
  562. tod->weekday = t->wday;
  563. tod->month1  = (t->mon + 1) / 10;
  564. tod->month2  = (t->mon + 1) % 10;
  565. if (t->year >= 100)
  566. t->year -= 100;
  567. tod->year1   = t->year / 10;
  568. tod->year2   = t->year % 10;
  569. }
  570. tod->cntrl1 = TOD3000_CNTRL1_FREE;
  571. } else /* if (AMIGAHW_PRESENT(A2000_CLK)) */ {
  572. volatile struct tod2000 *tod = TOD_2000;
  573. tod->cntrl1 = TOD2000_CNTRL1_HOLD;
  574.     
  575. while (tod->cntrl1 & TOD2000_CNTRL1_BUSY)
  576. ;
  577. if (!op) { /* read */
  578. t->sec  = tod->second1     * 10 + tod->second2;
  579. t->min  = tod->minute1     * 10 + tod->minute2;
  580. t->hour = (tod->hour1 & 3) * 10 + tod->hour2;
  581. t->day  = tod->day1        * 10 + tod->day2;
  582. t->wday = tod->weekday;
  583. t->mon  = tod->month1      * 10 + tod->month2 - 1;
  584. t->year = tod->year1       * 10 + tod->year2;
  585. if (t->year <= 69)
  586. t->year += 100;
  587. if (!(tod->cntrl3 & TOD2000_CNTRL3_24HMODE)){
  588. if (!(tod->hour1 & TOD2000_HOUR1_PM) && t->hour == 12)
  589. t->hour = 0;
  590. else if ((tod->hour1 & TOD2000_HOUR1_PM) && t->hour != 12)
  591. t->hour += 12;
  592. }
  593. } else {
  594. tod->second1 = t->sec / 10;
  595. tod->second2 = t->sec % 10;
  596. tod->minute1 = t->min / 10;
  597. tod->minute2 = t->min % 10;
  598. if (tod->cntrl3 & TOD2000_CNTRL3_24HMODE)
  599. tod->hour1 = t->hour / 10;
  600. else if (t->hour >= 12)
  601. tod->hour1 = TOD2000_HOUR1_PM +
  602. (t->hour - 12) / 10;
  603. else
  604. tod->hour1 = t->hour / 10;
  605. tod->hour2   = t->hour % 10;
  606. tod->day1    = t->day / 10;
  607. tod->day2    = t->day % 10;
  608. if (t->wday != -1)
  609. tod->weekday = t->wday;
  610. tod->month1  = (t->mon + 1) / 10;
  611. tod->month2  = (t->mon + 1) % 10;
  612. if (t->year >= 100)
  613. t->year -= 100;
  614. tod->year1   = t->year / 10;
  615. tod->year2   = t->year % 10;
  616. }
  617. tod->cntrl1 &= ~TOD2000_CNTRL1_HOLD;
  618. }
  619. return 0;
  620. }
  621. static int amiga_set_clock_mmss (unsigned long nowtime)
  622. {
  623. short real_seconds = nowtime % 60, real_minutes = (nowtime / 60) % 60;
  624. if (AMIGAHW_PRESENT(A3000_CLK)) {
  625. volatile struct tod3000 *tod = TOD_3000;
  626. tod->cntrl1 = TOD3000_CNTRL1_HOLD;
  627. tod->second1 = real_seconds / 10;
  628. tod->second2 = real_seconds % 10;
  629. tod->minute1 = real_minutes / 10;
  630. tod->minute2 = real_minutes % 10;
  631. tod->cntrl1 = TOD3000_CNTRL1_FREE;
  632. } else /* if (AMIGAHW_PRESENT(A2000_CLK)) */ {
  633. volatile struct tod2000 *tod = TOD_2000;
  634. tod->cntrl1 = TOD2000_CNTRL1_HOLD;
  635.     
  636. while (tod->cntrl1 & TOD2000_CNTRL1_BUSY)
  637. ;
  638. tod->second1 = real_seconds / 10;
  639. tod->second2 = real_seconds % 10;
  640. tod->minute1 = real_minutes / 10;
  641. tod->minute2 = real_minutes % 10;
  642. tod->cntrl1 &= ~TOD2000_CNTRL1_HOLD;
  643. }
  644. return 0;
  645. }
  646. static int amiga_wait_key (struct console *co)
  647. {
  648.     int i;
  649.     while (1) {
  650. while (ciaa.pra & 0x40);
  651. /* debounce */
  652. for (i = 0; i < 1000; i++);
  653. if (!(ciaa.pra & 0x40))
  654.     break;
  655.     }
  656.     /* wait for button up */
  657.     while (1) {
  658. while (!(ciaa.pra & 0x40));
  659. /* debounce */
  660. for (i = 0; i < 1000; i++);
  661. if (ciaa.pra & 0x40)
  662.     break;
  663.     }
  664.     return 0;
  665. }
  666. static NORET_TYPE void amiga_reset( void )
  667.     ATTRIB_NORET;
  668. static void amiga_reset (void)
  669. {
  670.   unsigned long jmp_addr040 = virt_to_phys(&&jmp_addr_label040);
  671.   unsigned long jmp_addr = virt_to_phys(&&jmp_addr_label);
  672.   cli();
  673.   if (CPU_IS_040_OR_060)
  674.     /* Setup transparent translation registers for mapping
  675.      * of 16 MB kernel segment before disabling translation
  676.      */
  677.     __asm__ __volatile__
  678.       ("movel    %0,%/d0nt"
  679.        "andl     #0xff000000,%/d0nt"
  680.        "orw      #0xe020,%/d0nt"   /* map 16 MB, enable, cacheable */
  681.        ".chip    68040nt"
  682.        "movec    %%d0,%%itt0nt"
  683.        "movec    %%d0,%%dtt0nt"
  684.        ".chip    68knt"
  685.        "jmp      %0@nt"
  686.        : /* no outputs */
  687.        : "a" (jmp_addr040));
  688.   else
  689.     /* for 680[23]0, just disable translation and jump to the physical
  690.      * address of the label
  691.      */
  692.     __asm__ __volatile__
  693.       ("pmove  %/tc,%@nt"
  694.        "bclr   #7,%@nt"
  695.        "pmove  %@,%/tcnt"
  696.        "jmp    %0@nt"
  697.        : /* no outputs */
  698.        : "a" (jmp_addr));
  699.  jmp_addr_label040:
  700.   /* disable translation on '040 now */
  701.   __asm__ __volatile__    
  702.     ("moveq #0,%/d0nt"
  703.      ".chip 68040nt"
  704.      "movec %%d0,%%tcnt" /* disable MMU */
  705.      ".chip 68knt"
  706.      : /* no outputs */
  707.      : /* no inputs */
  708.      : "d0");
  709.  jmp_addr_label:
  710.   /* pickup reset address from AmigaOS ROM, reset devices and jump
  711.    * to reset address
  712.    */
  713.   __asm__ __volatile__
  714.     ("movew #0x2700,%/srnt"
  715.      "leal  0x01000000,%/a0nt"
  716.      "subl  %/a0@(-0x14),%/a0nt"
  717.      "movel %/a0@(4),%/a0nt"
  718.      "subql #2,%/a0nt"
  719.      "bra   1fnt"
  720.      /* align on a longword boundary */
  721.      __ALIGN_STR "n"
  722.      "1:nt"
  723.      "resetnt"
  724.      "jmp   %/a0@" : /* Just that gcc scans it for % escapes */ );
  725.   
  726.   for (;;);
  727. }
  728.     /*
  729.      *  Debugging
  730.      */
  731. #define SAVEKMSG_MAXMEM 128*1024
  732. #define SAVEKMSG_MAGIC1 0x53415645 /* 'SAVE' */
  733. #define SAVEKMSG_MAGIC2 0x4B4D5347 /* 'KMSG' */
  734. struct savekmsg {
  735.     unsigned long magic1; /* SAVEKMSG_MAGIC1 */
  736.     unsigned long magic2; /* SAVEKMSG_MAGIC2 */
  737.     unsigned long magicptr; /* address of magic1 */
  738.     unsigned long size;
  739.     char data[0];
  740. };
  741. static struct savekmsg *savekmsg = NULL;
  742. static void amiga_mem_console_write(struct console *co, const char *s,
  743.     unsigned int count)
  744. {
  745.     if (savekmsg->size+count <= SAVEKMSG_MAXMEM-sizeof(struct savekmsg)) {
  746.         memcpy(savekmsg->data+savekmsg->size, s, count);
  747.         savekmsg->size += count;
  748.     }
  749. }
  750. static void amiga_savekmsg_init(void)
  751. {
  752.     static struct resource debug_res = { "Debug" };
  753.     savekmsg = amiga_chip_alloc_res(SAVEKMSG_MAXMEM, &debug_res);
  754.     savekmsg->magic1 = SAVEKMSG_MAGIC1;
  755.     savekmsg->magic2 = SAVEKMSG_MAGIC2;
  756.     savekmsg->magicptr = virt_to_phys(savekmsg);
  757.     savekmsg->size = 0;
  758. }
  759. static void amiga_serial_putc(char c)
  760. {
  761.     custom.serdat = (unsigned char)c | 0x100;
  762.     while (!(custom.serdatr & 0x2000))
  763. ;
  764. }
  765. void amiga_serial_console_write(struct console *co, const char *s,
  766.        unsigned int count)
  767. {
  768.     while (count--) {
  769. if (*s == 'n')
  770.     amiga_serial_putc('r');
  771. amiga_serial_putc(*s++);
  772.     }
  773. }
  774. #ifdef CONFIG_SERIAL_CONSOLE
  775. void amiga_serial_puts(const char *s)
  776. {
  777.     amiga_serial_console_write(NULL, s, strlen(s));
  778. }
  779. int amiga_serial_console_wait_key(struct console *co)
  780. {
  781.     int ch;
  782.     while (!(custom.intreqr & IF_RBF))
  783. barrier();
  784.     ch = custom.serdatr & 0xff;
  785.     /* clear the interrupt, so that another character can be read */
  786.     custom.intreq = IF_RBF;
  787.     return ch;
  788. }
  789. void amiga_serial_gets(struct console *co, char *s, int len)
  790. {
  791.     int ch, cnt = 0;
  792.     while (1) {
  793. ch = amiga_serial_console_wait_key(co);
  794. /* Check for backspace. */
  795. if (ch == 8 || ch == 127) {
  796.     if (cnt == 0) {
  797. amiga_serial_putc('07');
  798. continue;
  799.     }
  800.     cnt--;
  801.     amiga_serial_puts("10 10");
  802.     continue;
  803. }
  804. /* Check for enter. */
  805. if (ch == 10 || ch == 13)
  806.     break;
  807. /* See if line is too long. */
  808. if (cnt >= len + 1) {
  809.     amiga_serial_putc(7);
  810.     cnt--;
  811.     continue;
  812. }
  813. /* Store and echo character. */
  814. s[cnt++] = ch;
  815. amiga_serial_putc(ch);
  816.     }
  817.     /* Print enter. */
  818.     amiga_serial_puts("rn");
  819.     s[cnt] = 0;
  820. }
  821. #endif
  822. static void __init amiga_debug_init(void)
  823. {
  824. if (!strcmp( m68k_debug_device, "ser" )) {
  825. /* no initialization required (?) */
  826. amiga_console_driver.write = amiga_serial_console_write;
  827. register_console(&amiga_console_driver);
  828. }
  829. }
  830. #ifdef CONFIG_HEARTBEAT
  831. static void amiga_heartbeat(int on)
  832. {
  833.     if (on)
  834. ciaa.pra &= ~2;
  835.     else
  836. ciaa.pra |= 2;
  837. }
  838. #endif
  839.     /*
  840.      *  Amiga specific parts of /proc
  841.      */
  842. static void amiga_get_model(char *model)
  843. {
  844.     strcpy(model, amiga_model_name);
  845. }
  846. static int amiga_get_hardware_list(char *buffer)
  847. {
  848.     int len = 0;
  849.     if (AMIGAHW_PRESENT(CHIP_RAM))
  850. len += sprintf(buffer+len, "Chip RAM:t%ldKn", amiga_chip_size>>10);
  851.     len += sprintf(buffer+len, "PS Freq:t%dHznEClock Freq:t%ldHzn",
  852.    amiga_psfreq, amiga_eclock);
  853.     if (AMIGAHW_PRESENT(AMI_VIDEO)) {
  854. char *type;
  855. switch(amiga_chipset) {
  856.     case CS_OCS:
  857. type = "OCS";
  858. break;
  859.     case CS_ECS:
  860. type = "ECS";
  861. break;
  862.     case CS_AGA:
  863. type = "AGA";
  864. break;
  865.     default:
  866. type = "Old or Unknown";
  867. break;
  868. }
  869. len += sprintf(buffer+len, "Graphics:t%sn", type);
  870.     }
  871. #define AMIGAHW_ANNOUNCE(name, str)
  872.     if (AMIGAHW_PRESENT(name))
  873. len += sprintf (buffer+len, "t%sn", str)
  874.     len += sprintf (buffer + len, "Detected hardware:n");
  875.     AMIGAHW_ANNOUNCE(AMI_VIDEO, "Amiga Video");
  876.     AMIGAHW_ANNOUNCE(AMI_BLITTER, "Blitter");
  877.     AMIGAHW_ANNOUNCE(AMBER_FF, "Amber Flicker Fixer");
  878.     AMIGAHW_ANNOUNCE(AMI_AUDIO, "Amiga Audio");
  879.     AMIGAHW_ANNOUNCE(AMI_FLOPPY, "Floppy Controller");
  880.     AMIGAHW_ANNOUNCE(A3000_SCSI, "SCSI Controller WD33C93 (A3000 style)");
  881.     AMIGAHW_ANNOUNCE(A4000_SCSI, "SCSI Controller NCR53C710 (A4000T style)");
  882.     AMIGAHW_ANNOUNCE(A1200_IDE, "IDE Interface (A1200 style)");
  883.     AMIGAHW_ANNOUNCE(A4000_IDE, "IDE Interface (A4000 style)");
  884.     AMIGAHW_ANNOUNCE(CD_ROM, "Internal CD ROM drive");
  885.     AMIGAHW_ANNOUNCE(AMI_KEYBOARD, "Keyboard");
  886.     AMIGAHW_ANNOUNCE(AMI_MOUSE, "Mouse Port");
  887.     AMIGAHW_ANNOUNCE(AMI_SERIAL, "Serial Port");
  888.     AMIGAHW_ANNOUNCE(AMI_PARALLEL, "Parallel Port");
  889.     AMIGAHW_ANNOUNCE(A2000_CLK, "Hardware Clock (A2000 style)");
  890.     AMIGAHW_ANNOUNCE(A3000_CLK, "Hardware Clock (A3000 style)");
  891.     AMIGAHW_ANNOUNCE(CHIP_RAM, "Chip RAM");
  892.     AMIGAHW_ANNOUNCE(PAULA, "Paula 8364");
  893.     AMIGAHW_ANNOUNCE(DENISE, "Denise 8362");
  894.     AMIGAHW_ANNOUNCE(DENISE_HR, "Denise 8373");
  895.     AMIGAHW_ANNOUNCE(LISA, "Lisa 8375");
  896.     AMIGAHW_ANNOUNCE(AGNUS_PAL, "Normal/Fat PAL Agnus 8367/8371");
  897.     AMIGAHW_ANNOUNCE(AGNUS_NTSC, "Normal/Fat NTSC Agnus 8361/8370");
  898.     AMIGAHW_ANNOUNCE(AGNUS_HR_PAL, "Fat Hires PAL Agnus 8372");
  899.     AMIGAHW_ANNOUNCE(AGNUS_HR_NTSC, "Fat Hires NTSC Agnus 8372");
  900.     AMIGAHW_ANNOUNCE(ALICE_PAL, "PAL Alice 8374");
  901.     AMIGAHW_ANNOUNCE(ALICE_NTSC, "NTSC Alice 8374");
  902.     AMIGAHW_ANNOUNCE(MAGIC_REKICK, "Magic Hard Rekick");
  903.     AMIGAHW_ANNOUNCE(PCMCIA, "PCMCIA Slot");
  904. #ifdef CONFIG_ZORRO
  905.     if (AMIGAHW_PRESENT(ZORRO))
  906. len += sprintf(buffer+len, "tZorro II%s AutoConfig: %d Expansion "
  907.    "Device%sn",
  908.        AMIGAHW_PRESENT(ZORRO3) ? "I" : "",
  909.        zorro_num_autocon, zorro_num_autocon == 1 ? "" : "s");
  910. #endif /* CONFIG_ZORRO */
  911. #undef AMIGAHW_ANNOUNCE
  912.     return(len);
  913. }