X-Git-Url: http://rtime.felk.cvut.cz/gitweb/lincan.git/blobdiff_plain/f2fcdbb5f9333a58a08f56daaca8cad7e5a95699..8d0fc60587eda616dc0697ba55a50cfe04edb3a6:/lincan/src/setup.c diff --git a/lincan/src/setup.c b/lincan/src/setup.c index 49b4315..c071b00 100644 --- a/lincan/src/setup.c +++ b/lincan/src/setup.c @@ -7,112 +7,132 @@ * Version lincan-0.2 9 Jul 2003 */ -#define __NO_VERSION__ -#include - -#include - -#include -#if (LINUX_VERSION_CODE < KERNEL_VERSION(2,4,0)) -#include -#else -#include -#endif -#include -#include - +#include "../include/can.h" +#include "../include/can_sysdep.h" #include "../include/main.h" #include "../include/devcommon.h" #include "../include/setup.h" +#include "../include/finish.h" extern int sja1000_register(struct chipspecops_t *chipspecops); extern int sja1000p_register(struct chipspecops_t *chipspecops); extern int i82527_register(struct chipspecops_t *chipspecops); -int init_device_struct(int card); -int init_hwspecops(struct candevice_t *candev); -int init_chip_struct(struct candevice_t *candev); -int init_obj_struct(struct candevice_t *candev, struct chip_t *hostchip, int minorbase); +int init_hwspecops(struct candevice_t *candev, int *irqnum_p); +int init_device_struct(int card, int *chan_param_idx_p, int *irq_param_idx_p); +int init_chip_struct(struct candevice_t *candev, int chipnr, int irq, long baudrate); +int init_obj_struct(struct candevice_t *candev, struct chip_t *hostchip, int objnr); int init_chipspecops(struct candevice_t *candev, int chipnr); -int add_mem_to_list(void *address_p) +/** + * can_checked_malloc - memory allocation with registering of requested blocks + * @size: size of the requested block + * + * The function is used in the driver initialization phase to catch possible memory + * leaks for future driver finalization or case, that driver initialization fail. + * + * Return Value: pointer to the allocated memory or NULL in the case of fail + */ +void *can_checked_malloc(size_t size) { struct mem_addr *mem_new; + void *address_p; + + address_p=kmalloc(size,GFP_KERNEL); + if(address_p == NULL) { + CANMSG("can_checked_malloc: out of the memory\n"); + return NULL; + } #ifdef DEBUG_MEM - DEBUGMSG("add_mem_to_list %p, mem_head=%p\n",address_p, mem_head); - return 0; + DEBUGMSG("can_checked_malloc: allocated %d bytes at %p, mem_head=%p\n", + (int)size, address_p, mem_head); #endif mem_new=(struct mem_addr *)kmalloc(sizeof(struct mem_addr),GFP_KERNEL); if (mem_new == NULL) { - CANMSG("Memory list error.\n"); - return -ENOMEM; + CANMSG("can_checked_malloc: memory list allocation error.\n"); + kfree(address_p); + return NULL; } mem_new->next=mem_head; mem_new->address=address_p; + mem_new->size=size; mem_head=mem_new; - return 0; + return address_p; } -int del_mem_from_list(void *address_p) +/** + * can_checked_free - free memory allocated by can_checked_malloc() + * @address_p: pointer to the memory block + */ +int can_checked_free(void *address_p) { - struct mem_addr *mem_search=NULL; - struct mem_addr *mem_delete=NULL; + struct mem_addr **mem_pptr; + struct mem_addr *mem_del=NULL; #ifdef DEBUG_MEM - DEBUGMSG("del_mem_from_list %p, mem_head=%p\n", address_p, mem_head); - return 0; + DEBUGMSG("can_checked_free %p, mem_head=%p\n", address_p, mem_head); #endif - if(mem_head == NULL) { - CANMSG("del_mem_from_list: mem_head == NULL address_p=%p!\n", - address_p); - return 0; - } - mem_search = mem_head; - - if (mem_head->address == address_p) { - kfree(mem_head->address); - mem_head=mem_head->next; - kfree(mem_search); - } - else { - while (mem_search->next->address != address_p) - mem_search=mem_search->next; - kfree(mem_search->next->address); - mem_delete=mem_search->next; - mem_search->next=mem_search->next->next; - kfree(mem_delete); + for(mem_pptr = &mem_head; (mem_del = *mem_pptr); mem_pptr = &mem_del->next) { + if (mem_del->address != address_p) + continue; + *mem_pptr=mem_del->next; + kfree(mem_del); + kfree(address_p); + return 0; } - return 0; + + CANMSG("can_checked_free: address %p not found on the mem list\n", address_p); + + kfree(address_p); + return -1; } -int del_mem_list(void) +/** + * can_del_mem_list - check for stale memory allocations at driver finalization + * + * Checks, if there are still some memory blocks allocated and releases memory + * occupied by such blocks back to the system + */ +int can_del_mem_list(void) { - struct mem_addr *mem_old; + struct mem_addr *mem; #ifdef DEBUG_MEM - DEBUGMSG("del_mem_list, mem_head=%p\n", mem_head); - return 0; + DEBUGMSG("can_del_mem_list, mem_head=%p\n", mem_head); #endif if(mem_head == NULL) { - CANMSG("del_mem_list: mem_head == NULL!\n"); + CANMSG("can_del_mem_list: no entries on the list - OK\n"); return 0; } - while (mem_head->next != NULL) { - mem_old=mem_head; - kfree(mem_old->address); - mem_head=mem_old->next; - kfree(mem_old); + while((mem=mem_head) != NULL) { + mem_head=mem->next; + CANMSG("can_del_mem_list: deleting %p with size %d\n", + mem->address, (int)mem->size); + kfree(mem->address); + kfree(mem); } return 0; } +/** + * can_request_io_region - request IO space region + * @start: the first IO port address + * @n: number of the consecutive IO port addresses + * @name: name/label for the requested region + * + * The function hides system specific implementation of the feature. + * + * Return Value: returns positive value (1) in the case, that region could + * be reserved for the driver. Returns zero (0) if there is collision with + * other driver or region cannot be taken for some other reason. + */ int can_request_io_region(unsigned long start, unsigned long n, const char *name) { #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,4,0)) @@ -124,11 +144,28 @@ int can_request_io_region(unsigned long start, unsigned long n, const char *name #endif } +/** + * can_release_io_region - release IO space region + * @start: the first IO port address + * @n: number of the consecutive IO port addresses + */ void can_release_io_region(unsigned long start, unsigned long n) { release_region(start,n); } +/** + * can_request_mem_region - request memory space region + * @start: the first memory port physical address + * @n: number of the consecutive memory port addresses + * @name: name/label for the requested region + * + * The function hides system specific implementation of the feature. + * + * Return Value: returns positive value (1) in the case, that region could + * be reserved for the driver. Returns zero (0) if there is collision with + * other driver or region cannot be taken for some other reason. + */ int can_request_mem_region(unsigned long start, unsigned long n, const char *name) { #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,4,0)) @@ -138,6 +175,11 @@ int can_request_mem_region(unsigned long start, unsigned long n, const char *nam #endif } +/** + * can_release_mem_region - release memory space region + * @start: the first memory port physical address + * @n: number of the consecutive memory port addresses + */ void can_release_mem_region(unsigned long start, unsigned long n) { #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,4,0)) @@ -147,8 +189,17 @@ void can_release_mem_region(unsigned long start, unsigned long n) #endif } -/* This function shifts all base address structures acording to address - translation between physical and virtual address mappings */ +/** + * can_base_addr_fixup - relocates board physical memory addresses to the CPU accessible ones + * @candev: pointer to the previously filled device/board, chips and message objects structures + * @new_base: @candev new base address + * + * This function adapts base addresses of all structures of one board + * to the new board base address. + * It is required for translation between physical and virtual address mappings. + * This function is prepared to simplify board specific xxx_request_io() function + * for memory mapped devices. + */ int can_base_addr_fixup(struct candevice_t *candev, unsigned long new_base) { unsigned long offs; @@ -164,16 +215,108 @@ int can_base_addr_fixup(struct candevice_t *candev, unsigned long new_base) return 0; } -/* The function init_hw_struct is used to initialize the hardware structure. */ +/** + * can_check_dev_taken - checks if bus device description is already taken by driver + * @anydev: pointer to bus specific Linux device description + * + * Returns: Returns 1 if device is already used by LinCAN driver, 0 otherwise. + */ +int can_check_dev_taken(void *anydev) +{ + int board_nr; + struct candevice_t *candev; + void *boarddev; + + for (board_nr=hardware_p->nr_boards; board_nr--; ) { + if((candev=hardware_p->candevice[board_nr])==NULL) + continue; + boarddev=candev->sysdevptr.anydev; + if(boarddev == anydev) + return 1; + } + + return 0; +} + + +/** + * register_obj_struct - registers message object into global array + * @obj: the initialized message object being registered + * @minorbase: wanted minor number, if (-1) automatically selected + * + * Return Value: returns negative number in the case of fail + */ +int register_obj_struct(struct msgobj_t *obj, int minorbase) +{ + static int next_minor=0; + int i; + + if(minorbase>=0) + next_minor=minorbase; + if(next_minor>=MAX_TOT_MSGOBJS) + next_minor=0; + i=next_minor; + do{ + if(objects_p[i]==NULL){ + objects_p[i]=obj; + obj->minor=i; + next_minor=i+1; + return 0; + } + if(++i >= MAX_TOT_MSGOBJS) i=0; + }while(i!=next_minor); + obj->minor=-1; + return -1; +} + + +/** + * register_chip_struct - registers chip into global array + * @chip: the initialized chip structure being registered + * @minorbase: wanted minor number base, if (-1) automatically selected + * + * Return Value: returns negative number in the case of fail + */ +int register_chip_struct(struct chip_t *chip, int minorbase) +{ + static int next_chip_slot=0; + int i; + + if(next_chip_slot>=MAX_TOT_CHIPS) + next_chip_slot=0; + i=next_chip_slot; + do{ + if(chips_p[i]==NULL){ + chips_p[i]=chip; + + next_chip_slot=i+1; + return 0; + } + if(++i >= MAX_TOT_CHIPS) i=0; + }while(i!=next_chip_slot); + return -1; +} + + + +/** + * init_hw_struct - initializes driver hardware description structures + * + * The function init_hw_struct() is used to initialize the hardware structure. + * + * Return Value: returns negative number in the case of fail + */ int init_hw_struct(void) { int i=0; + int irq_param_idx=0; + int chan_param_idx=0; hardware_p->nr_boards=0; while ( (hw[i] != NULL) & (i < MAX_HW_CARDS) ) { hardware_p->nr_boards++; - if (init_device_struct(i)) { + if (init_device_struct(i, &chan_param_idx, &irq_param_idx)) { CANMSG("Error initializing candevice_t structures.\n"); return -ENODEV; } @@ -183,19 +326,41 @@ int init_hw_struct(void) return 0; } -/* The function init_device_struct is used to initialize a single device - * structure. +/** + * init_device_struct - initializes single CAN device/board + * @card: index into @hardware_p HW description + * @chan_param_idx_p: pointer to the index into arrays of the CAN channel parameters + * @irq_param_idx_p: pointer to the index into arrays of the per CAN channel IRQ parameters + * + * The function builds representation of the one board from parameters provided + * in the module parameters arrays: + * @hw[card] .. hardware type, + * @io[card] .. base IO address, + * @baudrate[chan_param_idx] .. per channel baudrate, + * @minor[chan_param_idx] .. optional specification of requested channel minor base, + * @irq[irq_param_idx] .. one or more board/chips IRQ parameters. + * The indexes are advanced after consumed parameters if the registration is successful. + * + * The hardware specific operations of the device/board are initialized by call to + * init_hwspecops() function. Then board data are initialized by board specific + * init_hw_data() function. Then chips and objects representation is build by + * init_chip_struct() function. If all above steps are successful, chips and + * message objects are registered into global arrays. + * + * Return Value: returns negative number in the case of fail */ -int init_device_struct(int card) +int init_device_struct(int card, int *chan_param_idx_p, int *irq_param_idx_p) { struct candevice_t *candev; + int ret; + int irqnum; + int chipnr; + long bd; + int irqsig=-1; - candev=(struct candevice_t *)kmalloc(sizeof(struct candevice_t),GFP_KERNEL); + candev=(struct candevice_t *)can_checked_malloc(sizeof(struct candevice_t)); if (candev==NULL) return -ENOMEM; - else - if ( add_mem_to_list(candev) ) - return -ENOMEM; memset(candev, 0, sizeof(struct candevice_t)); @@ -208,123 +373,182 @@ int init_device_struct(int card) candev->io_addr=io[card]; candev->dev_base_addr=io[card]; - candev->hwspecops=(struct hwspecops_t *)kmalloc(sizeof(struct hwspecops_t),GFP_KERNEL); + candev->hwspecops=(struct hwspecops_t *)can_checked_malloc(sizeof(struct hwspecops_t)); if (candev->hwspecops==NULL) - return -ENOMEM; - else - if ( add_mem_to_list(candev->hwspecops) ) - return -ENOMEM; + goto error_nomem; + memset(candev->hwspecops, 0, sizeof(struct hwspecops_t)); - if (init_hwspecops(candev)) - return -ENODEV; + if (init_hwspecops(candev, &irqnum)) + goto error_nodev; if (candev->hwspecops->init_hw_data(candev)) - return -ENODEV; + goto error_nodev; - if (init_chip_struct(candev)) - return -ENODEV; + /* Alocate and initialize the chip structures */ + for (chipnr=0; chipnr < candev->nr_all_chips; chipnr++) { + + if(chipnrnr_all_chips; chipnr++) { + int m=minor[*chan_param_idx_p+chipnr]; + struct chip_t *chip=candev->chip[chipnr]; + int objnr; + + register_chip_struct(chip, m); + + for (objnr=0; objnrmax_objects; objnr++) { + register_obj_struct(chip->msgobj[objnr], m); + if(m>=0) m++; + } + } + + *irq_param_idx_p += irqnum; + *chan_param_idx_p += candev->nr_all_chips; return 0; + + error_nodev: + ret=-ENODEV; + error_chip: + candevice_done(candev); + goto error_both; + + error_nomem: + ret=-ENOMEM; + + error_both: + hardware_p->candevice[card]=NULL; + can_checked_free(candev); + return ret; + } -/* The function init_chip_struct is used to initialize all chip_t structures - * on one hardware board. +/** + * init_chip_struct - initializes one CAN chip structure + * @candev: pointer to the corresponding CAN device/board + * @chipnr: index of the chip in the corresponding device/board structure + * @irq: chip IRQ number or (-1) if not appropriate + * @baudrate: baudrate in the units of 1Bd + * + * Chip structure is allocated and chip specific operations are filled by + * call to board specific init_chip_data() function and generic + * init_chipspecops() function. The message objects are generated by + * calls to init_obj_struct() function. + * + * Return Value: returns negative number in the case of fail */ -int init_chip_struct(struct candevice_t *candev) +int init_chip_struct(struct candevice_t *candev, int chipnr, int irq, long baudrate) { - static int irq_count=0; - int i=0; + struct chip_t *chip; + int objnr; + int ret; - /* Alocate and initialize the chip structures */ - for (i=0; i < candev->nr_all_chips; i++) { - candev->chip[i]=(struct chip_t *)kmalloc(sizeof(struct chip_t),GFP_KERNEL); - if (candev->chip[i]==NULL) - return -ENOMEM; - else - if ( add_mem_to_list(candev->chip[i]) ) - return -ENOMEM; - - memset(candev->chip[i], 0, sizeof(struct chip_t)); - - candev->chip[i]->write_register=candev->hwspecops->write_register; - candev->chip[i]->read_register=candev->hwspecops->read_register; + candev->chip[chipnr]=(struct chip_t *)can_checked_malloc(sizeof(struct chip_t)); + if ((chip=candev->chip[chipnr])==NULL) + return -ENOMEM; - candev->chip[i]->chipspecops=(struct chipspecops_t *)kmalloc(sizeof(struct chipspecops_t),GFP_KERNEL); - if (candev->chip[i]->chipspecops==NULL) - return -ENOMEM; - else - if ( add_mem_to_list(candev->chip[i]->chipspecops) ) - return -ENOMEM; + memset(chip, 0, sizeof(struct chip_t)); - chips_p[irq_count]=candev->chip[i]; - candev->chip[i]->chip_idx=i; - candev->chip[i]->hostdevice=candev; - candev->chip[i]->chip_irq=irq[irq_count]; - candev->chip[i]->flags=0x0; + chip->write_register=candev->hwspecops->write_register; + chip->read_register=candev->hwspecops->read_register; - candev->hwspecops->init_chip_data(candev,i); + chip->chipspecops=can_checked_malloc(sizeof(struct chipspecops_t)); + if (chip->chipspecops==NULL) + return -ENOMEM; + memset(chip->chipspecops,0,sizeof(struct chipspecops_t)); - if (init_chipspecops(candev,i)) - return -ENODEV; + chip->chip_idx=chipnr; + chip->hostdevice=candev; + chip->chip_irq=irq; + chip->baudrate=baudrate; + chip->flags=0x0; - init_obj_struct(candev, candev->chip[i], minor[irq_count]); + candev->hwspecops->init_chip_data(candev,chipnr); - irq_count++; - } + if (init_chipspecops(candev,chipnr)) + return -ENODEV; + + for (objnr=0; objnrmax_objects; objnr++) { + ret=init_obj_struct(candev, chip, objnr); + if(ret<0) return ret; + } return 0; } -int init_obj_struct(struct candevice_t *candev, struct chip_t *hostchip, int minorbase) + +/** + * init_obj_struct - initializes one CAN message object structure + * @candev: pointer to the corresponding CAN device/board + * @hostchip: pointer to the chip containing this object + * @objnr: index of the builded object in the chip structure + * + * The function initializes message object structure and allocates and initializes + * CAN queue chip ends structure. + * + * Return Value: returns negative number in the case of fail + */ +int init_obj_struct(struct candevice_t *candev, struct chip_t *hostchip, int objnr) { struct canque_ends_t *qends; - static int obj_count=0; - int i,max_objects; struct msgobj_t *obj; + int ret; - max_objects=hostchip->max_objects; - for (i=0; imsgobj[i]=obj; - if (obj == NULL) - return -ENOMEM; - else - if ( add_mem_to_list(obj) ) - return -ENOMEM; - - memset(obj, 0, sizeof(struct msgobj_t)); - - atomic_set(&obj->obj_used,0); - INIT_LIST_HEAD(&obj->obj_users); - qends = (struct canque_ends_t *)kmalloc(sizeof(struct canque_ends_t), GFP_KERNEL); - if(qends == NULL) return -ENOMEM; - if(add_mem_to_list(qends)) return -ENOMEM; - memset(qends, 0, sizeof(struct canque_ends_t)); - obj->hostchip=hostchip; - obj->object=i+1; - obj->qends=qends; - obj->tx_qedge=NULL; - obj->tx_slot=NULL; - obj->flags = 0x0; - - canqueue_ends_init_chip(qends, hostchip, obj); - - if (minorbase == -1) minorbase=obj_count; - if ((minorbase >= 0) && (minorbase+iminor=minorbase+i; - } else obj->minor=-1; + obj=(struct msgobj_t *)can_checked_malloc(sizeof(struct msgobj_t)); + hostchip->msgobj[objnr]=obj; + if (obj == NULL) + return -ENOMEM; - candev->hwspecops->init_obj_data(hostchip,i); + memset(obj, 0, sizeof(struct msgobj_t)); + obj->minor=-1; - obj_count++; - } + atomic_set(&obj->obj_used,0); + INIT_LIST_HEAD(&obj->obj_users); + init_timer(&obj->tx_timeout); + + qends = (struct canque_ends_t *)can_checked_malloc(sizeof(struct canque_ends_t)); + if(qends == NULL) return -ENOMEM; + memset(qends, 0, sizeof(struct canque_ends_t)); + obj->hostchip=hostchip; + obj->object=objnr+1; + obj->qends=qends; + obj->tx_qedge=NULL; + obj->tx_slot=NULL; + obj->obj_flags = 0x0; + + ret=canqueue_ends_init_chip(qends, hostchip, obj); + if(ret<0) return ret; + + ret=candev->hwspecops->init_obj_data(hostchip,objnr); + if(ret<0) return ret; + return 0; } -int init_hwspecops(struct candevice_t *candev) +/** + * init_hwspecops - finds and initializes board/device specific operations + * @candev: pointer to the corresponding CAN device/board + * @irqnum_p: optional pointer to the number of interrupts required by board + * + * The function searches board @hwname in the list of supported boards types. + * The board type specific board_register() function is used to initialize + * @hwspecops operations. + * + * Return Value: returns negative number in the case of fail + */ +int init_hwspecops(struct candevice_t *candev, int *irqnum_p) { const struct boardtype_t *brp; @@ -335,11 +559,25 @@ int init_hwspecops(struct candevice_t *candev) return -EINVAL; } + if(irqnum_p) + *irqnum_p=brp->irqnum; brp->board_register(candev->hwspecops); return 0; } + +/** + * init_chipspecops - fills chip specific operations for board for known chip types + * @candev: pointer to the corresponding CAN device/board + * @chipnr: index of the chip in the device/board structure + * + * The function fills chip specific operations for next known generic chip + * types "i82527", "sja1000", "sja1000p" (PeliCAN). Other non generic chip types + * operations has to be initialized in the board specific init_chip_data() function. + * + * Return Value: returns negative number in the case of fail + */ int init_chipspecops(struct candevice_t *candev, int chipnr) { if (!strcmp(candev->chip[chipnr]->chip_type,"i82527")) { @@ -357,3 +595,58 @@ int init_chipspecops(struct candevice_t *candev, int chipnr) return 0; } + +#ifndef CAN_WITH_RTL + +/** + * can_chip_setup_irq - attaches chip to the system interrupt processing + * @chip: pointer to CAN chip structure + * + * Return Value: returns negative number in the case of fail + */ +int can_chip_setup_irq(struct chip_t *chip) +{ + if(chip==NULL) + return -1; + if(!chip->chipspecops->irq_handler) + return 0; + + if ((chip->flags & CHIP_IRQ_VME) == 0) { + if (request_irq(chip->chip_irq,chip->chipspecops->irq_handler,SA_SHIRQ,DEVICE_NAME,chip)) + return -1; + else { + DEBUGMSG("Registered interrupt %d\n",chip->chip_irq); + chip->flags |= CHIP_IRQ_SETUP; + } + } else { +#ifdef CAN_ENABLE_VME_SUPPORT + /* TODO: Move here the irq setup from + * unican_vme_request_io(). To do this, the VME bridge + * driver should be modified. */ +#endif + } + return 1; +} + + +/** + * can_chip_free_irq - unregisters chip interrupt handler from the system + * @chip: pointer to CAN chip structure + */ +void can_chip_free_irq(struct chip_t *chip) +{ + if((chip->flags & CHIP_IRQ_SETUP) && (chip->chip_irq>=0)) { + if ((chip->flags & CHIP_IRQ_VME) == 0) + free_irq(chip->chip_irq, chip); + else { +#ifdef CAN_ENABLE_VME_SUPPORT + /* TODO: Move here the irq cleanup from + * unican_vme_release_io(). To do this, the VME bridge + * driver should be modified. */ +#endif + } + chip->flags &= ~CHIP_IRQ_SETUP; + } +} + +#endif /*CAN_WITH_RTL*/