Subversion Repositories or1k_old

/*

 *    linux/arch/m68k/amiga/zorro.c

 *

 *    Copyright (C) 1995 Geert Uytterhoeven

 *

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

 */

#include <linux/config.h>

#include <linux/types.h>

#include <linux/kernel.h>

#include <linux/string.h>

#include <asm/bitops.h>

#include <asm/amigahw.h>

#include <asm/bootinfo.h>

#include <asm/zorro.h>

#ifdef CONFIG_ZORRO

   /*

    *    Zorro Expansion Device Manufacturers and Products

    */

struct Manufacturer {

   char *Name;

   u_short ID;

   u_short NumProd;

   struct Product *Products;

};

struct Product {

   char *Name;

   u_char ID;

};

struct GVP_Product {

   char *Name;

   enum GVP_ident ID;

};

   /*

    *    Macro's to make life easier

    */

#define BEGIN_PROD(id) static struct Product Prod_##id[] = {

#define PROD(name, id) \

   { name, PROD_##id },

#define BEGIN_GVP_PROD static struct GVP_Product Ext_Prod_GVP[] = {

#define GVP_PROD(name, id) \

   { name, GVP_##id },

#define BEGIN_MANUF static struct Manufacturer Manufacturers[] = {

#define MANUF(name, id) \

   { name, MANUF_##id, sizeof(Prod_##id)/sizeof(struct Product), Prod_##id },

#define END };

   /*

    *    Known Zorro Expansion Devices

    *

    *    Warning: Make sure the Manufacturer and Product names are not too

    *             long (max. 80 characters per board identification line)

    */

BEGIN_PROD(MEMPHIS)

   PROD("Stormbringer", STORMBRINGER)

END

BEGIN_PROD(COMMODORE2)

   PROD("A2088 Bridgeboard", A2088)

   PROD("A2386-SX Bridgeboard", A2386SX)

END

BEGIN_PROD(COMMODORE)

   PROD("A2090/A2090A HD Controller", A2090A)

   PROD("A590 SCSI Controller", A590)

   PROD("A2091 SCSI Controller", A2091)

   PROD("A2090B 2090 Autoboot Card", A2090B)

   PROD("A2060 Arcnet Card", ARCNET)

   PROD("A2052/58.RAM | 590/2091.RAM", CBMRAM)

   PROD("A560 Memory Module", A560RAM)

   PROD("A2232 Serial Prototype", A2232PROTO)

   PROD("A2232 Serial Production", A2232)

   PROD("A2620 68020/RAM Card", A2620)

   PROD("A2630 68030/RAM Card", A2630)

   PROD("A4091 SCSI Controller", A4091)

   PROD("Romulator Card", ROMULATOR)

   PROD("A3000 Test Fixture", A3000TESTFIX)

   PROD("A2065 Ethernet Card", A2065)

END

BEGIN_PROD(CARDCO)

   PROD("Cardco A2410 Hires Graphics card", CC_A2410)

END

BEGIN_PROD(MICROBOTICS)

   PROD("VXL-30 Turbo Board", VXL_30)

END

BEGIN_PROD(ASDG)

   PROD("Lan Rover Ethernet", LAN_ROVER)

   PROD("Dual Serial Card", ASDG_DUAL_SERIAL)

END

BEGIN_PROD(UNIV_OF_LOWELL)

   PROD("A2410 Hires Graphics Card", A2410)

END

BEGIN_PROD(AMERISTAR)

   PROD("A2065 Ethernet Card", AMERISTAR2065)

   PROD("A560 Arcnet Card", A560)

   PROD("A4066 Ethernet Card", A4066)

END

BEGIN_PROD(SUPRA)

   PROD("Wordsync SCSI Controller", WORDSYNC)

   PROD("Wordsync II SCSI Controller", WORDSYNC_II)

   PROD("2400 Modem", SUPRA_2400MODEM)

END

BEGIN_PROD(CSA)

   PROD("Magnum 40 SCSI Controller", MAGNUM)

   PROD("12 Gauge SCSI Controller", 12GAUGE)

END

BEGIN_PROD(POWER_COMPUTING)

   PROD("Viper II Turbo Board (DKB 1240)", DKB_1240)

END

BEGIN_PROD(GVP)

   PROD("Generic GVP product", GVP)

   PROD("Series II SCSI Controller", GVPIISCSI)

   PROD("Series II SCSI Controller", GVPIISCSI_2)

   PROD("Series II RAM", GVPIIRAM)

   PROD("A2000 68030 Turbo Board", GVP_A2000_030)

   PROD("GFORCE 040 with SCSI Controller", GFORCE_040_SCSI)

   PROD("IV-24 Graphics Board", GVPIV_24)

/*

   PROD("I/O Extender", GVPIO_EXT)

*/

END

BEGIN_GVP_PROD

   GVP_PROD("GFORCE 040", GFORCE_040)

   GVP_PROD("GFORCE 040 with SCSI controller", GFORCE_040_SCSI)

   GVP_PROD("A1291 SCSI controller", A1291_SCSI)

   GVP_PROD("COMBO 030 R4", COMBO_R4)

   GVP_PROD("COMBO 030 R4 with SCSI controller", COMBO_R4_SCSI)

   GVP_PROD("Phone Pak", PHONEPAK)

   GVP_PROD("IO-Extender", IOEXT)

   GVP_PROD("GFORCE 030", GFORCE_030)

   GVP_PROD("GFORCE 030 with SCSI controller", GFORCE_030_SCSI)

   GVP_PROD("A530", A530)

   GVP_PROD("A530 with SCSI", A530_SCSI)

   GVP_PROD("COMBO 030 R3", COMBO_R3)

   GVP_PROD("COMBO 030 R3 with SCSI controller", COMBO_R3_SCSI)

   GVP_PROD("SERIES-II SCSI controller", SERIESII)

END

BEGIN_PROD(PPI)

   PROD("Mercury Turbo Board", MERCURY)

   PROD("PP&S A3000 68040 Turbo Board", PPS_A3000_040)

   PROD("PP&S A2000 68040 Turbo Board", PPS_A2000_040)

   PROD("Zeus SCSI Controller", ZEUS)

   PROD("PP&S A500 68040 Turbo Board", PPS_A500_040)

END

BEGIN_PROD(BSC)

   PROD("ALF 3 SCSI Controller", ALF_3_SCSI)

END

BEGIN_PROD(C_LTD)

   PROD("Kronos SCSI Controller", KRONOS_SCSI)

END

BEGIN_PROD(JOCHHEIM)

   PROD("Jochheim RAM", JOCHHEIM_RAM)

END

BEGIN_PROD(CHECKPOINT)

   PROD("Serial Solution", SERIAL_SOLUTION)

END

BEGIN_PROD(GOLEM)

   PROD("Golem SCSI-II Controller", GOLEM_SCSI_II)

END

BEGIN_PROD(HARDITAL_SYNTHES)

   PROD("SCSI Controller", HARDITAL_SCSI)

END

BEGIN_PROD(HARDITAL2)

   PROD("TQM 68030+68882 Turbo Board", TQM)

END

BEGIN_PROD(BSC2)

   PROD("Oktagon 2008 SCSI Controller", OKTAGON_SCSI)

   PROD("Tandem", TANDEM)

   PROD("Oktagon 2008 RAM", OKTAGON_RAM)

   PROD("Alfa Data MultiFace I", MULTIFACE_I)

   PROD("Alfa Data MultiFace II", MULTIFACE_II)

   PROD("Alfa Data MultiFace III", MULTIFACE_III)

   PROD("ISDN Master", ISDN_MASTER)

END

BEGIN_PROD(ADV_SYS_SOFT)

   PROD("Nexus SCSI Controller", NEXUS_SCSI)

   PROD("Nexus RAM", NEXUS_RAM)

END

BEGIN_PROD(IVS)

   PROD("Trumpcard 500 SCSI Controller", TRUMPCARD_500)

   PROD("Trumpcard SCSI Controller", TRUMPCARD)

   PROD("Vector SCSI Controller", VECTOR)

END

BEGIN_PROD(XPERT_PRODEV)

   PROD("Merlin Graphics Board (RAM)", MERLIN_RAM)

   PROD("Merlin Graphics Board (REG)", MERLIN_REG)

END

BEGIN_PROD(HYDRA_SYSTEMS)

   PROD("Amiganet Board", AMIGANET)

END

BEGIN_PROD(DIG_MICRONICS)

   PROD("DMI Resolver Graphics Board", DMI_RESOLVER)

END

BEGIN_PROD(HELFRICH1)

   PROD("Rainbow3 Graphics Board", RAINBOW3)

END

BEGIN_PROD(SW_RESULT_ENTS)

   PROD("GG2+ Bus Converter", GG2PLUS)

END

BEGIN_PROD(VILLAGE_TRONIC)

   PROD("Ariadne Ethernet Card", ARIADNE)

   PROD("Picasso II Graphics Board (RAM)", PICASSO_II_RAM)

   PROD("Picasso II Graphics Board (REG)", PICASSO_II_REG)

END

BEGIN_PROD(UTILITIES_ULTD)

   PROD("Emplant Deluxe SCSI Controller", EMPLANT_DELUXE)

   PROD("Emplant Deluxe SCSI Controller", EMPLANT_DELUXE2)

END

BEGIN_PROD(MTEC)

   PROD("68030 Turbo Board", MTEC_68030)

   PROD("T1230/28 Turbo Board", MTEC_T1230)

END

BEGIN_PROD(GVP2)

   PROD("Spectrum Graphics Board (RAM)", SPECTRUM_RAM)

   PROD("Spectrum Graphics Board (REG)", SPECTRUM_REG)

END

BEGIN_PROD(HELFRICH2)

   PROD("Piccolo Graphics Board (RAM)", PICCOLO_RAM)

   PROD("Piccolo Graphics Board (REG)", PICCOLO_REG)

   PROD("PeggyPlus MPEG Decoder Board", PEGGY_PLUS)

   PROD("SD64 Graphics Board (RAM)", SD64_RAM)

   PROD("SD64 Graphics Board (REG)", SD64_REG)

END

BEGIN_PROD(MACROSYSTEMS)

   PROD("Warp Engine SCSI Controller", WARP_ENGINE)

END

BEGIN_PROD(HARMS_PROF)

   PROD("3500 Turbo board", 3500_TURBO)

END

BEGIN_PROD(VORTEX)

   PROD("Golden Gate 80386 Board", GOLDEN_GATE_386)

   PROD("Golden Gate RAM", GOLDEN_GATE_RAM)

   PROD("Golden Gate 80486 Board", GOLDEN_GATE_486)

END

BEGIN_PROD(DATAFLYER)

   PROD("4000SX SCSI Controller", DATAFLYER_4000SX)

END

BEGIN_PROD(PHASE5)

   PROD("FastLane RAM", FASTLANE_RAM)

   PROD("FastLane/Blizzard 1230-II SCSI Controller", FASTLANE_SCSI)

   PROD("CyberStorm Fast SCSI-II Controller", CYBERSTORM_SCSI)

   PROD("Blizzard 1230-III Turbo Board", BLIZZARD_1230_III)

   PROD("Blizzard 1230-IV Turbo Board", BLIZZARD_1230_IV)

   PROD("CyberVision64 Graphics Board", CYBERVISION)

END

BEGIN_PROD(APOLLO)

   PROD("AT-Apollo", AT_APOLLO)

   PROD("Turbo Board", APOLLO_TURBO)

END

BEGIN_PROD(UWE_GERLACH)

   PROD("RAM/ROM", UG_RAM_ROM)

END

BEGIN_PROD(MACROSYSTEMS2)

   PROD("Maestro", MAESTRO)

   PROD("VLab", VLAB)

   PROD("Maestro Pro", MAESTRO_PRO)

   PROD("Retina Z2 Graphics Board", RETINA_Z2)

   PROD("MultiEvolution", MULTI_EVOLUTION)

   PROD("Retina Z3 Graphics Board", RETINA_Z3)

   PROD("Falcon '040 Turbo Board", FALCON_040)

END

BEGIN_MANUF

   MANUF("Memphis", MEMPHIS)

   MANUF("Commodore", COMMODORE2)

   MANUF("Commodore", COMMODORE)

   MANUF("Cardco", CARDCO)

   MANUF("MicroBotics", MICROBOTICS)

   MANUF("ASDG", ASDG)

   MANUF("University of Lowell", UNIV_OF_LOWELL)

   MANUF("Ameristar", AMERISTAR)

   MANUF("Supra", SUPRA)

   MANUF("CSA", CSA)

   MANUF("Power Computing", POWER_COMPUTING)

   MANUF("Great Valley Products", GVP)

   MANUF("Progressive Peripherals", PPI)

   MANUF("BSC", BSC)

   MANUF("C Ltd.", C_LTD)

   MANUF("Jochheim", JOCHHEIM)

   MANUF("Checkpoint Technologies", CHECKPOINT)

   MANUF("Golem", GOLEM)

   MANUF("Hardital Synthesis", HARDITAL_SYNTHES)

   MANUF("Hardital Synthesis", HARDITAL2)

   MANUF("BSC", BSC2)

   MANUF("Advanced Systems & Software", ADV_SYS_SOFT)

   MANUF("IVS", IVS)

   MANUF("XPert/ProDev", XPERT_PRODEV)

   MANUF("Hydra Systems", HYDRA_SYSTEMS)

   MANUF("Digital Micronics", DIG_MICRONICS)

   MANUF("Helfrich", HELFRICH1)

   MANUF("Software Result Enterprises", SW_RESULT_ENTS)

   MANUF("Village Tronic", VILLAGE_TRONIC)

   MANUF("Utilities Unlimited", UTILITIES_ULTD)

   MANUF("MTEC", MTEC)

   MANUF("Great Valley Products", GVP2)

   MANUF("Helfrich", HELFRICH2)

   MANUF("MacroSystems", MACROSYSTEMS)

   MANUF("Harms Professional", HARMS_PROF)

   MANUF("Vortex", VORTEX)

   MANUF("DataFlyer", DATAFLYER)

   MANUF("Phase5", PHASE5)

   MANUF("Apollo", APOLLO)

   MANUF("Uwe Gerlach", UWE_GERLACH)

   MANUF("MacroSystems", MACROSYSTEMS2)

END

#define NUM_MANUF (sizeof(Manufacturers)/sizeof(struct Manufacturer))

#define NUM_GVP_PROD (sizeof(Ext_Prod_GVP)/sizeof(struct GVP_Product))

#endif /* CONFIG_ZORRO */

   /*

    *    Configured Expansion Devices

    */

static u_long BoardPartFlags[NUM_AUTO] = { 0, };

   /*

    *    Find the key for the next unconfigured expansion device of a specific

    *    type.

    *

    *    Part is a device specific number (0 <= part <= 31) to allow for the

    *    independent configuration of independent parts of an expansion board.

    *    Thanks to Jes Soerensen for this idea!

    *

    *    Index is used to specify the first board in the autocon list

    *    to be tested. It was inserted in order to solve the problem

    *    with the GVP boards that uses the same product code, but

    *    it should help if there are other companies uses the same

    *    method as GVP. Drivers for boards which are not using this

    *    method does not need to think of this - just set index = 0.

    *

    *    Example:

    *

    *       while ((key = zorro_find(MY_MANUF, MY_PROD, MY_PART, 0))) {

    *          cd = zorro_get_board(key);

    *          initialise_this_board;

    *          zorro_config_board(key, MY_PART);

    *       }

    */

int zorro_find(int manuf, int prod, int part, int index)

{

   int key;

   struct ConfigDev *cd;

   if (!MACH_IS_AMIGA || !AMIGAHW_PRESENT(ZORRO))

      return(0);

   if ((part < 0) || (part > 31)) {

      printk("zorro_find: bad part %d\n", part);

      return(0);

   }

   for (key = index + 1; key <= boot_info.bi_amiga.num_autocon; key++) {

      cd = &boot_info.bi_amiga.autocon[key-1];

      if ((cd->cd_Rom.er_Manufacturer == manuf) &&

          (cd->cd_Rom.er_Product == prod) &&

          !(BoardPartFlags[key-1] & (1<<part)))

         break;

   }

   return(key <= boot_info.bi_amiga.num_autocon ? key : 0);

}

   /*

    *    Get the board for a specified key

    */

struct ConfigDev *zorro_get_board(int key)

{

   struct ConfigDev *cd = NULL;

   if ((key < 1) || (key > boot_info.bi_amiga.num_autocon))

      printk("zorro_get_board: bad key %d\n", key);

   else

      cd = &boot_info.bi_amiga.autocon[key-1];

   return(cd);

}

   /*

    *    Mark a part of a board as configured

    */

void zorro_config_board(int key, int part)

{

   if ((key < 1) || (key > boot_info.bi_amiga.num_autocon))

      printk("zorro_config_board: bad key %d\n", key);

   else if ((part < 0) || (part > 31))

      printk("zorro_config_board: bad part %d\n", part);

   else

      BoardPartFlags[key-1] |= 1<<part;

}

   /*

    *    Mark a part of a board as unconfigured

    *

    *    This function is mainly intended for the unloading of LKMs

    */

void zorro_unconfig_board(int key, int part)

{

   if ((key < 1) || (key > boot_info.bi_amiga.num_autocon))

      printk("zorro_unconfig_board: bad key %d\n", key);

   else if ((part < 0) || (part > 31))

      printk("zorro_unconfig_board: bad part %d\n", part);

   else

      BoardPartFlags[key-1] &= ~(1<<part);

}

#ifdef CONFIG_ZORRO

   /*

    *    Identify an AutoConfig Expansion Device

    *

    *    If the board was configured by a Linux/m68k driver, an asterisk will

    *    be printed before the board address (except for unknown and `Hacker

    *    Test' boards).

    */

static int identify(int devnum, char *buf)

{

   struct ConfigDev *cd;

   int manuf, prod;

   u_long addr, size;

   char *manufname, *prodname, *is_mem;

   char zorro, mag, configured;

   int identified = 0;

   int i, j, k, len = 0;

   enum GVP_ident epc;

   cd = &boot_info.bi_amiga.autocon[devnum];

   manuf = cd->cd_Rom.er_Manufacturer;

   prod = cd->cd_Rom.er_Product;

   addr = (u_long)cd->cd_BoardAddr;

   size = cd->cd_BoardSize;

   configured = BoardPartFlags[devnum] ? '*' : ' ';

   manufname = prodname = "<UNKNOWN>";

   for (i = 0; i < NUM_MANUF; i++)

      if (Manufacturers[i].ID == manuf) {

         manufname = Manufacturers[i].Name;

         for (j = 0; j < Manufacturers[i].NumProd; j++)

            if (Manufacturers[i].Products[j].ID == prod)

               if ((manuf != MANUF_GVP) || (prod != PROD_GVP)) {

                  prodname = Manufacturers[i].Products[j].Name;

                  identified = 1;

                  break;

               } else {

                  epc = *(enum GVP_ident *)ZTWO_VADDR(addr+0x8000) &

                        GVP_EPCMASK;

                  for (k = 0; k < NUM_GVP_PROD; k++)

                     if (Ext_Prod_GVP[k].ID == epc) {

                        prodname = Ext_Prod_GVP[k].Name;

                        identified = 1;

                        break;

                     }

               }

         break;

      }

   switch (cd->cd_Rom.er_Type & ERT_TYPEMASK) {

      case ERT_ZORROII:

         zorro = '2';

         break;

      case ERT_ZORROIII:

         zorro = '3';

         break;

      default:

         zorro = '?';

         break;

   }

   if (size & 0xfffff) {

      size >>= 10;

      mag = 'K';

   } else {

      size >>= 20;

      mag = 'M';

   }

   if (cd->cd_Rom.er_Type & ERTF_MEMLIST)

      is_mem = " MEM";

   else

      is_mem = "";

   if (identified)

      len = sprintf(buf, " %c0x%08lx: %s %s (Z%c, %ld%c%s)\n", configured, addr,

                    manufname, prodname, zorro, size, mag, is_mem);

   else if (manuf == MANUF_HACKER)

      len = sprintf(buf, "  0x%08lx: Hacker Test Board 0x%02x (Z%c, %ld%c%s)\n",

                    addr, prod, zorro, size, mag, is_mem);

   else {

      len = sprintf(buf, "  0x%08lx: [%04x:%02x] made by %s (Z%c, %ld%c%s)\n",

                    addr, manuf, prod, manufname, zorro, size, mag, is_mem);

      len += sprintf(buf+len, "  Please report this unknown device to "

                     "Geert.Uytterhoeven@cs.kuleuven.ac.be\n");

   }

   return(len);

}

   /*

    *    Identify all known AutoConfig Expansion Devices

    */

void zorro_identify(void)

{

   int i;

   char tmp[160];

   if (!AMIGAHW_PRESENT(ZORRO))

      return;

   printk("Probing AutoConfig expansion device(s):\n");

   for (i = 0; i < boot_info.bi_amiga.num_autocon; i++) {

      identify(i, tmp);

      printk(tmp);

   }

   if (!boot_info.bi_amiga.num_autocon)

      printk("No AutoConfig expansion devices present.\n");

}

   /*

    *    Get the list of all AutoConfig Expansion Devices

    */

int zorro_get_list(char *buffer)

{

   int i, j, len = 0;

   char tmp[160];

   if (MACH_IS_AMIGA && AMIGAHW_PRESENT(ZORRO)) {

      len = sprintf(buffer, "AutoConfig expansion devices:\n");

      for (i = 0; i < boot_info.bi_amiga.num_autocon; i++) {

         j = identify(i, tmp);

         if (len+j >= 4075) {

            len += sprintf(buffer+len, "4K limit reached!\n");

            break;

         }

         strcpy(buffer+len, tmp);

         len += j;

      }

   }

   return(len);

}

#endif /* CONFIG_ZORRO */

   /*

    *    Bitmask indicating portions of available Zorro II RAM that are unused

    *    by the system. Every bit represents a 64K chunk, for a maximum of 8MB

    *    (128 chunks, physical 0x00200000-0x009fffff).

    *

    *    If you want to use (= allocate) portions of this RAM, you should clear

    *    the corresponding bits.

    *

    *    Possible uses:

    *       - z2ram device

    *       - SCSI DMA bounce buffers

    */

u_long zorro_unused_z2ram[4] = { 0, 0, 0, 0 };

static void mark_region(u_long addr, u_long size, int flag)

{

   u_long start, end, chunk;

   if (flag) {

      start = (addr+Z2RAM_CHUNKMASK) & ~Z2RAM_CHUNKMASK;

      end = (addr+size) & ~Z2RAM_CHUNKMASK;

   } else {

      start = addr & ~Z2RAM_CHUNKMASK;

      end = (addr+size+Z2RAM_CHUNKMASK) & ~Z2RAM_CHUNKMASK;

   }

   if (end <= Z2RAM_START || start >= Z2RAM_END)

      return;

   start = start < Z2RAM_START ? 0x00000000 : start-Z2RAM_START;

   end = end > Z2RAM_END ? Z2RAM_SIZE : end-Z2RAM_START;

   while (start < end) {

      chunk = start>>Z2RAM_CHUNKSHIFT;

      if (flag)

         set_bit( chunk, zorro_unused_z2ram );

      else

         clear_bit( chunk, zorro_unused_z2ram );

      start += Z2RAM_CHUNKSIZE;

   }

}

   /*

    *    Initialization

    */

void zorro_init(void)

{

   int i;

   struct ConfigDev *cd;

   if (!AMIGAHW_PRESENT(ZORRO))

      return;

   /* Mark all available Zorro II memory */

   for (i = 0; i < boot_info.bi_amiga.num_autocon; i++) {

      cd = &boot_info.bi_amiga.autocon[i];

      if (cd->cd_Rom.er_Type & ERTF_MEMLIST)

         mark_region((u_long)cd->cd_BoardAddr, cd->cd_BoardSize, 1);

   }

   /* Unmark all used Zorro II memory */

   for (i = 0; i < boot_info.num_memory; i++)

      mark_region(boot_info.memory[i].addr, boot_info.memory[i].size, 0);

}