-/* open.c
- * Linux CAN-bus device driver.
- * Written by Arnaud Westenberg email:arnaud@wanadoo.nl
- * This software is released under the GPL-License.
- * Version 0.7 6 Aug 2001
- */
-
-#define __NO_VERSION__
-#include <linux/module.h>
-
-#include <linux/autoconf.h>
-#if defined (CONFIG_MODVERSIONS) && !defined (MODVERSIONS)
-#define MODVERSIONS
-#endif
-
-#if defined (MODVERSIONS)
-#include <linux/modversions.h>
-#endif
-
-#include <linux/fs.h>
-#include <linux/malloc.h>
-#include <linux/version.h>
+/**************************************************************************/
+/* File: open.c - systemcall to open new user connection/handle */
+/* */
+/* 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> */
+/* 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. */
+/**************************************************************************/
+#include "../include/can.h"
+#include "../include/can_sysdep.h"
#include "../include/main.h"
#include "../include/open.h"
-#include "../include/i82527.h"
#include "../include/setup.h"
+#define __NO_VERSION__
+#include <linux/module.h>
+
int can_open(struct inode *inode, struct file *file)
{
struct msgobj_t *obj;
- struct chip_t *chip;
- struct canfifo_t *fifo;
+ struct canchip_t *chip;
+ struct canuser_t *canuser;
+ struct canque_ends_t *qends;
+ struct canque_edge_t *edge;
+ can_spin_irqflags_t iflags;
+ char openflag; // Martin Petera: Object already opened
+ int minor_nr = INODE2MINOR_NR(inode);
- if ( ((obj=objects_p[MINOR_NR]) == NULL) ||
- ((chip=objects_p[MINOR_NR]->hostchip) == NULL) ) {
- CANMSG("There is no hardware support for the device file with minor nr.: %d\n",MINOR_NR);
+ if ((minor_nr < 0) || (minor_nr >= MAX_TOT_MSGOBJS)) {
+ CANMSG("can_open: bad minor %d\n", minor_nr);
return -ENODEV;
}
- if (objects_p[MINOR_NR]->flags & OPENED) {
- CANMSG("Sorry, only single open per device file.\n");
- return -EBUSY;
+ if ( ((obj=objects_p[minor_nr]) == NULL) ||
+ ((chip=objects_p[minor_nr]->hostchip) == NULL) ) {
+ CANMSG("There is no hardware support for the device file with minor nr.: %d\n", minor_nr);
+ return -ENODEV;
}
- else
- objects_p[MINOR_NR]->flags |= OPENED;
- if (chip->flags & CONFIGURED)
+ atomic_inc(&obj->obj_used);
+ DEBUGMSG("Device %d opened %d times.\n", minor_nr, atomic_read(&obj->obj_used));
+ openflag = can_msgobj_test_fl(obj,OPENED); // Martin Petera: store previous status
+ can_msgobj_set_fl(obj,OPENED);
+
+ if (chip->flags & CHIP_CONFIGURED)
DEBUGMSG("Device is already configured.\n");
else {
if (chip->chipspecops->chip_config(chip))
CANMSG("Error configuring chip.\n");
else
- chip->flags |= CONFIGURED;
+ chip->flags |= CHIP_CONFIGURED;
} /* End of chip configuration */
- /* Allocate output buffer memory for the opened device */
- fifo = objects_p[MINOR_NR]->fifo;
- fifo->buf_tx_entry=(struct canmsg_t *)kmalloc(MAX_BUF_LENGTH * sizeof(struct canmsg_t), GFP_KERNEL);
- if (fifo->buf_tx_entry == NULL)
- return -ENOMEM;
- else
- if ( add_mem_to_list(fifo->buf_tx_entry) )
- return -ENOMEM;
- /* Allocate input buffer memory for the opened device */
- fifo->buf_rx_entry=(struct canmsg_t *)kmalloc(MAX_BUF_LENGTH * sizeof(struct canmsg_t), GFP_KERNEL);
- if (fifo->buf_rx_entry == NULL)
- return -ENOMEM;
- else
- if ( add_mem_to_list(fifo->buf_rx_entry) )
- return -ENOMEM;
-
- /* In- and output buffer initialization */
- fifo->tx_readp = fifo->buf_tx_entry;
- fifo->tx_writep = fifo->buf_tx_entry;
- fifo->rx_readp = fifo->buf_rx_entry;
- fifo->rx_writep = fifo->buf_rx_entry;
- fifo->rx_size = MAX_BUF_LENGTH * sizeof(struct canmsg_t);
- fifo->tx_size = fifo->rx_size;
-
-#if (LINUX_VERSION_CODE <= KERNEL_VERSION(2,2,19))
- init_waitqueue(&fifo->readq);
- init_waitqueue(&fifo->writeq);
-#else
- init_waitqueue_head(&fifo->readq);
- init_waitqueue_head(&fifo->writeq);
-#endif
- fifo->rx_in_progress = 0;
- fifo->tx_in_progress = 0;
+ /* Martin Petera: Fix for HCAN2
+ * pre_read was called only once -> Opening second MSG object from userspace
+ * didn't call function to configure MSG object for receive.
+ * FIX: Call pre_read once for each MSG object
+ **/
+ if (!openflag) {
+ if (chip->chipspecops->pre_read_config(chip,obj)<0)
+ CANMSG("Error initializing chip for receiving\n");
+ }
+
+
+ canuser = (struct canuser_t *)kmalloc(sizeof(struct canuser_t), GFP_KERNEL);
+ if(canuser == NULL) goto no_canuser;
+ canuser->flags=0;
+ canuser->userinfo.fileinfo.file = file;
+ canuser->msgobj = obj;
+ canuser->magic = CAN_USER_MAGIC;
+ file->private_data = canuser;
+
+ qends = (struct canque_ends_t *)kmalloc(sizeof(struct canque_ends_t), GFP_KERNEL);
+ if(qends == NULL) goto no_qends;
+ canqueue_ends_init_kern(qends);
+ canuser->qends = qends;
+
+ /*required to synchronize with RT-Linux context*/
+ can_spin_lock_irqsave(&canuser_manipulation_lock, iflags);
+ list_add(&canuser->peers, &obj->obj_users);
+ can_spin_unlock_irqrestore(&canuser_manipulation_lock, iflags);
+
+ if(canqueue_connect_edge(edge=canque_new_edge_kern(MAX_BUF_LENGTH),
+ canuser->qends, obj->qends)<0) goto no_tx_qedge;
- fifo->head = fifo->tail = 0; //TEMP!!
+ if(canqueue_connect_edge(canuser->rx_edge0=canque_new_edge_kern(MAX_BUF_LENGTH),
+ obj->qends, canuser->qends)<0) goto no_rx_qedge;
+ /*FIXME: more generic model should be used there*/
+ canque_edge_decref(canuser->rx_edge0);
+ canque_edge_decref(edge);
- if (chip->chipspecops->pre_read_config(chip,obj)<0)
- CANMSG("Error initializing chip for receiving\n");
-
+#if (LINUX_VERSION_CODE < KERNEL_VERSION(2,5,50))
MOD_INC_USE_COUNT;
-
+#endif
+
return 0;
+
+ no_rx_qedge:
+ canque_notify_bothends(edge, CANQUEUE_NOTIFY_DEAD_WANTED);
+ canque_edge_decref(edge);
+ no_tx_qedge:
+ list_del(&canuser->peers);
+ canuser->qends = NULL;
+ canqueue_ends_dispose_kern(qends, 1);
+
+ no_qends:
+ kfree(canuser);
+
+ no_canuser:
+ atomic_dec(&obj->obj_used);
+ return -ENOMEM;
}