config.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:28k
源码类别:

Linux/Unix编程

开发平台:

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