]> rtime.felk.cvut.cz Git - lincan.git/blobdiff - lincan/src/m437.c
Use mdelay instead of udelay for long times.
[lincan.git] / lincan / src / m437.c
index d90db12e3077c07534b23f4ce71cbf725f2adeee..da772e893d195835b8904992e32a5e43dd841c69 100644 (file)
@@ -1,17 +1,51 @@
-/* m437.c
- * Linux CAN-bus device driver.
- * Written by Arnaud Westenberg email:arnaud@wanadoo.nl
- * Rewritten for new CAN queues by Pavel Pisa - OCERA team member
- * email:pisa@cmp.felk.cvut.cz
+/**************************************************************************/
+/* File: m437.c -  M437 PC/104 card by SECO                               */
+/*                                                                        */
+/* LinCAN - (Not only) Linux CAN bus driver                               */
+/* Copyright (C) 2002-2009 DCE FEE CTU Prague <http://dce.felk.cvut.cz>   */
+/* Copyright (C) 2002-2009 Pavel Pisa <pisa@cmp.felk.cvut.cz>             */
+/* Copyright (C) 2008 Philippe Corbes <philippe.corbes@logibag.com>       */
+/* Copyright (C) 2001 Fabio Parodi  <fabio.parodi@iname.com>              */
+/* Funded by OCERA and FRESCOR IST projects                               */
+/* Based on CAN driver code by Arnaud Westenberg <arnaud@wanadoo.nl>      */
+/*                                                                        */
+/* LinCAN is free software; you can redistribute it and/or modify it      */
+/* under terms of the GNU General Public License as published by the      */
+/* Free Software Foundation; either version 2, or (at your option) any    */
+/* later version.  LinCAN is distributed in the hope that it will be      */
+/* useful, but WITHOUT ANY WARRANTY; without even the implied warranty    */
+/* of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU    */
+/* General Public License for more details. You should have received a    */
+/* copy of the GNU General Public License along with LinCAN; see file     */
+/* COPYING. If not, write to the Free Software Foundation, 675 Mass Ave,  */
+/* Cambridge, MA 02139, USA.                                              */
+/*                                                                        */
+/* To allow use of LinCAN in the compact embedded systems firmware        */
+/* and RT-executives (RTEMS for example), main authors agree with next    */
+/* special exception:                                                     */
+/*                                                                        */
+/* Including LinCAN header files in a file, instantiating LinCAN generics */
+/* or templates, or linking other files with LinCAN objects to produce    */
+/* an application image/executable, does not by itself cause the          */
+/* resulting application image/executable to be covered by                */
+/* the GNU General Public License.                                        */
+/* This exception does not however invalidate any other reasons           */
+/* why the executable file might be covered by the GNU Public License.    */
+/* Publication of enhanced or derived LinCAN files is required although.  */
+/**************************************************************************/
+
+/*
+ * This driver has been designed to support "Memory (MEM)" mode.
+ * For example: Memory, MEM:0xD0000 => io=0xD0000.
+ * Configure the card with m437set.com provided by seco before loading driver.
  * This software is released under the GPL-License.
- * Version lincan-0.3  17 Jun 2004
- */ 
+ */
 
-/* 
- * Support for the SECO M437 
- * 
+/*
+ * Support for the SECO M437
+ *
  * SECO M437 is a pc104 format, i82527 controller based card
- * produced by SECO http://www.seco.it 
+ * produced by SECO http://www.seco.it
  * This driver uses the Memory Mapped I/O mode, and should be
  * working with all cards supporting this mode.
  *
@@ -43,7 +77,7 @@
  *
  * The function m437_request_io() is used to reserve the io-memory. If your
  * hardware uses a dedicated memory range as hardware control registers you
- * will have to add the code to reserve this memory as well. 
+ * will have to add the code to reserve this memory as well.
  * %IO_RANGE is the io-memory range that gets reserved, please adjust according
  * your hardware. Example: #define IO_RANGE 0x100 for i82527 chips or
  * #define IO_RANGE 0x20 for sja1000 chips in basic CAN mode.
  */
 int m437_request_io(struct candevice_t *candev)
 {
+       can_ioptr_t remap_addr;
 
        if (!can_request_mem_region(candev->io_addr,IO_RANGE,DEVICE_NAME)) {
-               CANMSG("Unable to request IO-memory: 0x%lx\n",candev->io_addr);
+               CANMSG("M437 Unable to request IO-memory: 0x%lx\n",candev->io_addr);
                return -ENODEV;
        }
 
-       if ( !( candev->dev_base_addr = ioremap( candev->io_addr, IO_RANGE ) ) ) {
-               CANMSG("Unable to access I/O memory at: 0x%lx\n", candev->io_addr);
+       if ( !( remap_addr = ioremap( candev->io_addr, IO_RANGE ) ) ) {
+               CANMSG("M437 Unable to access I/O memory at: 0x%lx\n", candev->io_addr);
                can_release_mem_region(candev->io_addr,IO_RANGE);
                return -ENODEV;
-       
+
        }
-       DEBUGMSG("Registered IO-memory: 0x%lx - 0x%lx\n", candev->io_addr, candev->io_addr + IO_RANGE - 1);
+       CANMSG("M437 Registered IO-memory: 0x%lx - 0x%lx\n",
+               candev->io_addr, candev->io_addr + IO_RANGE - 1);
+       CANMSG("M437 IO-memory: 0x%lx  Remapped to: 0x%lx\n",
+               (unsigned long)candev->io_addr, (unsigned long)remap_addr);
+
+       /* remap the chip and pointers on objects */
+       can_base_addr_fixup(candev, remap_addr);
+
+#ifdef CAN_DEBUG
+       {
+               int objnr;
+               for (objnr=0; objnr<15 ; objnr++) {
+                       DEBUGMSG("M437 Message%d remapped to: 0x%lx\n", objnr+1, candev->chip[0]->msgobj[objnr]->obj_base_addr);
+               }
+       }
+#endif /*CAN_DEBUG*/
+
        return 0;
 }
 
@@ -82,36 +133,48 @@ int m437_request_io(struct candevice_t *candev)
  */
 int m437_release_io(struct candevice_t *candev)
 {
+       /*
+        * The full board reset is more robust solution
+        * than reset of communication objects
+        * Philippe Corbes, 06 jun 2008
+        */
+#if 0 /* Object reset method */
        unsigned i;
-       
+
         /* disable IRQ generation */
         m437_write_register(iCTL_CCE, candev->dev_base_addr+iCTL);
 
        /* clear all message objects */
        for (i=1; i<=15; i++) {
                m437_write_register(
-                               INTPD_RES | 
-                               RXIE_RES | 
-                               TXIE_RES | 
-                               MVAL_RES, 
+                               INTPD_RES |
+                               RXIE_RES |
+                               TXIE_RES |
+                               MVAL_RES,
                                candev->dev_base_addr+i*0x10+iMSGCTL0);
                m437_write_register(
-                               NEWD_RES | 
-                               MLST_RES | 
-                               CPUU_RES | 
-                               TXRQ_RES | 
-                               RMPD_RES, 
+                               NEWD_RES |
+                               MLST_RES |
+                               CPUU_RES |
+                               TXRQ_RES |
+                               RMPD_RES,
                                candev->dev_base_addr+i*0x10+iMSGCTL1);
        }
-       
+
        /* power down i82527 */
        m437_write_register(iCPU_PWD, candev->dev_base_addr+iCPU);
-       
+
+#else /* Full board reset */
+       m437_reset(candev);
+#endif /* Full board reset */
+
        /* release I/O memory mapping */
        iounmap(candev->dev_base_addr);
 
        can_release_mem_region(candev->io_addr,IO_RANGE);
 
+       CANMSG("M437 release - OK\n");
+
        return 0;
 }
 
@@ -119,14 +182,36 @@ int m437_release_io(struct candevice_t *candev)
  * m437_reset - hardware reset routine
  * @candev: Pointer to candevice/board structure
  *
- * The function m437_reset() is used to give a hardware reset. This is 
- * rather hardware specific so I haven't included example code. Don't forget to 
+ * The function m437_reset() is used to give a hardware reset. This is
+ * rather hardware specific so I haven't included example code. Don't forget to
  * check the reset status of the chip before returning.
  * Return Value: The function returns zero on success or %-ENODEV on failure
  * File: src/m437.c
+ * from Philippe Corbes, 08 July 2008
  */
 int m437_reset(struct candevice_t *candev)
 {
+       int i=0;
+
+       DEBUGMSG("Resetting %s hardware ...\n", candev->hwname);
+       for (i = 0 ; i < 10 ; i++) {
+               m437_write_register(0x01,candev->dev_base_addr+candev->res_addr);
+       }
+       m437_write_register(0x0,candev->dev_base_addr+candev->res_addr);
+
+       /* Check hardware reset status */
+       i=0;
+       while ( (m437_read_register(candev->dev_base_addr+iCPU) & iCPU_RST) && (i<=15)) {
+               mdelay(20);
+               i++;
+       }
+       if (i>=15) {
+               CANMSG("M437 Reset status timeout! Please check your hardware.\n");
+               return -ENODEV;
+       }
+       else
+               DEBUGMSG("Chip0 reset status ok.\n");
+
        return 0;
 }
 
@@ -148,13 +233,13 @@ int m437_reset(struct candevice_t *candev)
  * Return Value: The function always returns zero
  * File: src/m437.c
  */
-int m437_init_hw_data(struct candevice_t *candev) 
+int m437_init_hw_data(struct candevice_t *candev)
 {
        DEBUGMSG("m437_init_hw_data()\n");
        candev->res_addr=RESET_ADDR;
        candev->nr_82527_chips=1;
        candev->nr_sja1000_chips=0;
-        candev->nr_all_chips=1;
+       candev->nr_all_chips=1;
        candev->flags &= ~CANDEV_PROGRAMMABLE_IRQ;
        /* The M437 has no programmable IRQ */
 
@@ -184,7 +269,7 @@ int m437_init_hw_data(struct candevice_t *candev)
  * The entry @int_clk_reg holds hardware specific options for the Clock Out
  * register. Options defined in the %i82527.h file:
  * %iCLK_CD0, %iCLK_CD1, %iCLK_CD2, %iCLK_CD3, %iCLK_SL0, %iCLK_SL1.
- * The entry @int_bus_reg holds hardware specific options for the Bus 
+ * The entry @int_bus_reg holds hardware specific options for the Bus
  * Configuration register. Options defined in the %i82527.h file:
  * %iBUS_DR0, %iBUS_DR1, %iBUS_DT1, %iBUS_POL, %iBUS_CBY.
  * The entry @int_cpu_reg holds hardware specific options for the cpu interface
@@ -199,7 +284,7 @@ int m437_init_chip_data(struct candevice_t *candev, int chipnr)
        candev->chip[chipnr]->chip_base_addr=candev->dev_base_addr;
        candev->chip[chipnr]->clock = 16000000;
        candev->chip[chipnr]->int_cpu_reg = iCPU_DSC | iCPU_CEN;
-       candev->chip[chipnr]->int_clk_reg = 
+       candev->chip[chipnr]->int_clk_reg =
                iCLK_CD0 | iCLK_CD1 | iCLK_CD2 | iCLK_SL0 | iCLK_SL1;
        candev->chip[chipnr]->int_bus_reg = iBUS_CBY;
 
@@ -216,7 +301,7 @@ int m437_init_chip_data(struct candevice_t *candev, int chipnr)
  * CAN chip. In case of the sja1000 there's only one message object but on the
  * i82527 chip there are 15.
  * The code below is for a i82527 chip and initializes the object base addresses
- * The entry @obj_base_addr represents the first memory address of the message 
+ * The entry @obj_base_addr represents the first memory address of the message
  * object. In case of the sja1000 @obj_base_addr is taken the same as the chips
  * base address.
  * Unless the hardware uses a segmented memory map, flags can be set zero.
@@ -226,7 +311,7 @@ int m437_init_chip_data(struct candevice_t *candev, int chipnr)
 int m437_init_obj_data(struct canchip_t *chip, int objnr)
 {
        chip->msgobj[objnr]->obj_base_addr=chip->chip_base_addr+(objnr+1)*0x10;
-       
+
        return 0;
 }
 
@@ -234,16 +319,17 @@ int m437_init_obj_data(struct canchip_t *chip, int objnr)
  * m437_program_irq - program interrupts
  * @candev: Pointer to candevice/board structure
  *
- * The function m437_program_irq() is used for hardware that uses 
+ * The function m437_program_irq() is used for hardware that uses
  * programmable interrupts. If your hardware doesn't use programmable interrupts
- * you should not set the @candevices_t->flags entry to %CANDEV_PROGRAMMABLE_IRQ and 
- * leave this function unedited. Again this function is hardware specific so 
+ * you should not set the @candevices_t->flags entry to %CANDEV_PROGRAMMABLE_IRQ and
+ * leave this function unedited. Again this function is hardware specific so
  * there's no example code.
  * Return value: The function returns zero on success or %-ENODEV on failure
  * File: src/m437.c
  */
 int m437_program_irq(struct candevice_t *candev)
 {
+       DEBUGMSG("M437 Programmable interrupt is not supported by the hardware!\n");
        return 0;
 }
 
@@ -260,6 +346,7 @@ int m437_program_irq(struct candevice_t *candev)
  */
 void m437_write_register(unsigned data, can_ioptr_t address)
 {
+       DEBUGMSG("m437_write_register(@0x%lx=0x%x)\n", address, data);
        can_writeb(data,address);
 }
 
@@ -275,7 +362,10 @@ void m437_write_register(unsigned data, can_ioptr_t address)
  */
 unsigned m437_read_register(can_ioptr_t address)
 {
-       return can_readb(address);
+       unsigned data;
+       data = can_readb(address);
+       DEBUGMSG("m437_read_register(@0x%lx=0x%x)\n", address, data);
+       return data;
 }
 
 /* !!! Don't change this function !!! */