1 /*********************************************************************
2  *
3  * Filename:      irda_device.c
4  * Version:       0.9
5  * Description:   Utility functions used by the device drivers
6  * Status:        Experimental.
7  * Author:        Dag Brattli <dagb@cs.uit.no>
8  * Created at:    Sat Oct  9 09:22:27 1999
9  * Modified at:   Sun Jan 23 17:41:24 2000
10  * Modified by:   Dag Brattli <dagb@cs.uit.no>
11  *
12  *     Copyright (c) 1999-2000 Dag Brattli, All Rights Reserved.
13  *     Copyright (c) 2000-2001 Jean Tourrilhes <jt@hpl.hp.com>
14  *
15  *     This program is free software; you can redistribute it and/or
16  *     modify it under the terms of the GNU General Public License as
17  *     published by the Free Software Foundation; either version 2 of
18  *     the License, or (at your option) any later version.
19  *
20  *     This program is distributed in the hope that it will be useful,
21  *     but WITHOUT ANY WARRANTY; without even the implied warranty of
22  *     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23  *     GNU General Public License for more details.
24  *
25  *     You should have received a copy of the GNU General Public License
26  *     along with this program; if not, write to the Free Software
27  *     Foundation, Inc., 59 Temple Place, Suite 330, Boston,
28  *     MA 02111-1307 USA
29  *
30  ********************************************************************/
31 
32 #include <linux/string.h>
33 #include <linux/proc_fs.h>
34 #include <linux/skbuff.h>
35 #include <linux/capability.h>
36 #include <linux/if.h>
37 #include <linux/if_ether.h>
38 #include <linux/if_arp.h>
39 #include <linux/netdevice.h>
40 #include <linux/init.h>
41 #include <linux/tty.h>
42 #include <linux/kmod.h>
43 #include <linux/spinlock.h>
44 #include <linux/slab.h>
45 #include <linux/export.h>
46 
47 #include <asm/ioctls.h>
48 #include <asm/uaccess.h>
49 #include <asm/dma.h>
50 #include <asm/io.h>
51 
52 #include <net/irda/irda_device.h>
53 #include <net/irda/irlap.h>
54 #include <net/irda/timer.h>
55 #include <net/irda/wrapper.h>
56 
57 static void __irda_task_delete(struct irda_task *task);
58 
59 static hashbin_t *dongles = NULL;
60 static hashbin_t *tasks = NULL;
61 
62 static void irda_task_timer_expired(void *data);
63 
irda_device_init(void)64 int __init irda_device_init( void)
65 {
66 	dongles = hashbin_new(HB_NOLOCK);
67 	if (dongles == NULL) {
68 		IRDA_WARNING("IrDA: Can't allocate dongles hashbin!\n");
69 		return -ENOMEM;
70 	}
71 	spin_lock_init(&dongles->hb_spinlock);
72 
73 	tasks = hashbin_new(HB_LOCK);
74 	if (tasks == NULL) {
75 		IRDA_WARNING("IrDA: Can't allocate tasks hashbin!\n");
76 		hashbin_delete(dongles, NULL);
77 		return -ENOMEM;
78 	}
79 
80 	/* We no longer initialise the driver ourselves here, we let
81 	 * the system do it for us... - Jean II */
82 
83 	return 0;
84 }
85 
leftover_dongle(void * arg)86 static void leftover_dongle(void *arg)
87 {
88 	struct dongle_reg *reg = arg;
89 	IRDA_WARNING("IrDA: Dongle type %x not unregistered\n",
90 		     reg->type);
91 }
92 
irda_device_cleanup(void)93 void irda_device_cleanup(void)
94 {
95 	IRDA_DEBUG(4, "%s()\n", __func__);
96 
97 	hashbin_delete(tasks, (FREE_FUNC) __irda_task_delete);
98 
99 	hashbin_delete(dongles, leftover_dongle);
100 }
101 
102 /*
103  * Function irda_device_set_media_busy (self, status)
104  *
105  *    Called when we have detected that another station is transmitting
106  *    in contention mode.
107  */
irda_device_set_media_busy(struct net_device * dev,int status)108 void irda_device_set_media_busy(struct net_device *dev, int status)
109 {
110 	struct irlap_cb *self;
111 
112 	IRDA_DEBUG(4, "%s(%s)\n", __func__, status ? "TRUE" : "FALSE");
113 
114 	self = (struct irlap_cb *) dev->atalk_ptr;
115 
116 	/* Some drivers may enable the receive interrupt before calling
117 	 * irlap_open(), or they may disable the receive interrupt
118 	 * after calling irlap_close().
119 	 * The IrDA stack is protected from this in irlap_driver_rcv().
120 	 * However, the driver calls directly the wrapper, that calls
121 	 * us directly. Make sure we protect ourselves.
122 	 * Jean II */
123 	if (!self || self->magic != LAP_MAGIC)
124 		return;
125 
126 	if (status) {
127 		self->media_busy = TRUE;
128 		if (status == SMALL)
129 			irlap_start_mbusy_timer(self, SMALLBUSY_TIMEOUT);
130 		else
131 			irlap_start_mbusy_timer(self, MEDIABUSY_TIMEOUT);
132 		IRDA_DEBUG( 4, "Media busy!\n");
133 	} else {
134 		self->media_busy = FALSE;
135 		irlap_stop_mbusy_timer(self);
136 	}
137 }
138 EXPORT_SYMBOL(irda_device_set_media_busy);
139 
140 
141 /*
142  * Function irda_device_is_receiving (dev)
143  *
144  *    Check if the device driver is currently receiving data
145  *
146  */
irda_device_is_receiving(struct net_device * dev)147 int irda_device_is_receiving(struct net_device *dev)
148 {
149 	struct if_irda_req req;
150 	int ret;
151 
152 	IRDA_DEBUG(2, "%s()\n", __func__);
153 
154 	if (!dev->netdev_ops->ndo_do_ioctl) {
155 		IRDA_ERROR("%s: do_ioctl not impl. by device driver\n",
156 			   __func__);
157 		return -1;
158 	}
159 
160 	ret = (dev->netdev_ops->ndo_do_ioctl)(dev, (struct ifreq *) &req,
161 					      SIOCGRECEIVING);
162 	if (ret < 0)
163 		return ret;
164 
165 	return req.ifr_receiving;
166 }
167 
__irda_task_delete(struct irda_task * task)168 static void __irda_task_delete(struct irda_task *task)
169 {
170 	del_timer(&task->timer);
171 
172 	kfree(task);
173 }
174 
irda_task_delete(struct irda_task * task)175 static void irda_task_delete(struct irda_task *task)
176 {
177 	/* Unregister task */
178 	hashbin_remove(tasks, (long) task, NULL);
179 
180 	__irda_task_delete(task);
181 }
182 
183 /*
184  * Function irda_task_kick (task)
185  *
186  *    Tries to execute a task possible multiple times until the task is either
187  *    finished, or askes for a timeout. When a task is finished, we do post
188  *    processing, and notify the parent task, that is waiting for this task
189  *    to complete.
190  */
irda_task_kick(struct irda_task * task)191 static int irda_task_kick(struct irda_task *task)
192 {
193 	int finished = TRUE;
194 	int count = 0;
195 	int timeout;
196 
197 	IRDA_DEBUG(2, "%s()\n", __func__);
198 
199 	IRDA_ASSERT(task != NULL, return -1;);
200 	IRDA_ASSERT(task->magic == IRDA_TASK_MAGIC, return -1;);
201 
202 	/* Execute task until it's finished, or askes for a timeout */
203 	do {
204 		timeout = task->function(task);
205 		if (count++ > 100) {
206 			IRDA_ERROR("%s: error in task handler!\n",
207 				   __func__);
208 			irda_task_delete(task);
209 			return TRUE;
210 		}
211 	} while ((timeout == 0) && (task->state != IRDA_TASK_DONE));
212 
213 	if (timeout < 0) {
214 		IRDA_ERROR("%s: Error executing task!\n", __func__);
215 		irda_task_delete(task);
216 		return TRUE;
217 	}
218 
219 	/* Check if we are finished */
220 	if (task->state == IRDA_TASK_DONE) {
221 		del_timer(&task->timer);
222 
223 		/* Do post processing */
224 		if (task->finished)
225 			task->finished(task);
226 
227 		/* Notify parent */
228 		if (task->parent) {
229 			/* Check if parent is waiting for us to complete */
230 			if (task->parent->state == IRDA_TASK_CHILD_WAIT) {
231 				task->parent->state = IRDA_TASK_CHILD_DONE;
232 
233 				/* Stop timer now that we are here */
234 				del_timer(&task->parent->timer);
235 
236 				/* Kick parent task */
237 				irda_task_kick(task->parent);
238 			}
239 		}
240 		irda_task_delete(task);
241 	} else if (timeout > 0) {
242 		irda_start_timer(&task->timer, timeout, (void *) task,
243 				 irda_task_timer_expired);
244 		finished = FALSE;
245 	} else {
246 		IRDA_DEBUG(0, "%s(), not finished, and no timeout!\n",
247 			   __func__);
248 		finished = FALSE;
249 	}
250 
251 	return finished;
252 }
253 
254 /*
255  * Function irda_task_timer_expired (data)
256  *
257  *    Task time has expired. We now try to execute task (again), and restart
258  *    the timer if the task has not finished yet
259  */
irda_task_timer_expired(void * data)260 static void irda_task_timer_expired(void *data)
261 {
262 	struct irda_task *task;
263 
264 	IRDA_DEBUG(2, "%s()\n", __func__);
265 
266 	task = data;
267 
268 	irda_task_kick(task);
269 }
270 
271 /*
272  * Function irda_device_setup (dev)
273  *
274  *    This function should be used by low level device drivers in a similar way
275  *    as ether_setup() is used by normal network device drivers
276  */
irda_device_setup(struct net_device * dev)277 static void irda_device_setup(struct net_device *dev)
278 {
279 	dev->hard_header_len = 0;
280 	dev->addr_len        = LAP_ALEN;
281 
282 	dev->type            = ARPHRD_IRDA;
283 	dev->tx_queue_len    = 8; /* Window size + 1 s-frame */
284 
285 	memset(dev->broadcast, 0xff, LAP_ALEN);
286 
287 	dev->mtu = 2048;
288 	dev->flags = IFF_NOARP;
289 }
290 
291 /*
292  * Funciton  alloc_irdadev
293  * 	Allocates and sets up an IRDA device in a manner similar to
294  * 	alloc_etherdev.
295  */
alloc_irdadev(int sizeof_priv)296 struct net_device *alloc_irdadev(int sizeof_priv)
297 {
298 	return alloc_netdev(sizeof_priv, "irda%d", irda_device_setup);
299 }
300 EXPORT_SYMBOL(alloc_irdadev);
301 
302 #ifdef CONFIG_ISA_DMA_API
303 /*
304  * Function setup_dma (idev, buffer, count, mode)
305  *
306  *    Setup the DMA channel. Commonly used by LPC FIR drivers
307  *
308  */
irda_setup_dma(int channel,dma_addr_t buffer,int count,int mode)309 void irda_setup_dma(int channel, dma_addr_t buffer, int count, int mode)
310 {
311 	unsigned long flags;
312 
313 	flags = claim_dma_lock();
314 
315 	disable_dma(channel);
316 	clear_dma_ff(channel);
317 	set_dma_mode(channel, mode);
318 	set_dma_addr(channel, buffer);
319 	set_dma_count(channel, count);
320 	enable_dma(channel);
321 
322 	release_dma_lock(flags);
323 }
324 EXPORT_SYMBOL(irda_setup_dma);
325 #endif
326