X-Git-Url: http://rtime.felk.cvut.cz/gitweb/lincan.git/blobdiff_plain/b34a548a5dfd2f0b068fd835a4cd51680d851068..a682f9de48bcce43fba6141fbdb4d451914e0bb4:/lincan/src/close.c

diff --git a/lincan/src/close.c b/lincan/src/close.c
index 73d4764..d07d52a 100644
--- a/lincan/src/close.c
+++ b/lincan/src/close.c
@@ -4,7 +4,7 @@
  * Rewritten for new CAN queues by Pavel Pisa - OCERA team member
  * email:pisa@cmp.felk.cvut.cz
  * This software is released under the GPL-License.
- * Version lincan-0.2  9 Jul 2003
+ * Version lincan-0.3  17 Jun 2004
  */
 
 #include "../include/can.h"
@@ -23,6 +23,7 @@ int can_close(struct inode *inode, struct file *file)
 	struct canuser_t *canuser = (struct canuser_t*)(file->private_data);
 	struct canque_ends_t *qends;
 	struct msgobj_t *obj;
+	can_spin_irqflags_t iflags;
 	
 	if(!canuser || (canuser->magic != CAN_USER_MAGIC)){
 		CANMSG("can_close: bad canuser magic\n");
@@ -31,23 +32,26 @@ int can_close(struct inode *inode, struct file *file)
 	
 	obj = canuser->msgobj;
 	qends = canuser->qends;
-
+	
     #ifdef CAN_ENABLE_KERN_FASYNC
 
 	can_fasync(-1, file, 0);
 
     #endif /*CAN_ENABLE_KERN_FASYNC*/
 
+	can_spin_lock_irqsave(&canuser_manipulation_lock, iflags);
 	list_del(&canuser->peers);
+	can_spin_unlock_irqrestore(&canuser_manipulation_lock, iflags);
 	canuser->qends = NULL;
 	canqueue_ends_dispose_kern(qends, file->f_flags & O_SYNC);
 
 	kfree(canuser);
 
+	can_spin_lock_irqsave(&canuser_manipulation_lock, iflags);
 	if(atomic_dec_and_test(&obj->obj_used)){
 		can_msgobj_clear_fl(obj,OPENED);
-		/* FIXME: what about clearing chip HW status, stopping sending messages etc? */
 	};
+	can_spin_unlock_irqrestore(&canuser_manipulation_lock, iflags);
 	
     #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,5,50))
 	MOD_DEC_USE_COUNT;