Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* $Id: divert_procfs.c,v 1.11.6.2 2001/09/23 22:24:36 kai Exp $ |
2 | * | |
3 | * Filesystem handling for the diversion supplementary services. | |
4 | * | |
5 | * Copyright 1998 by Werner Cornelius (werner@isdn4linux.de) | |
6 | * | |
7 | * This software may be used and distributed according to the terms | |
8 | * of the GNU General Public License, incorporated herein by reference. | |
9 | * | |
10 | */ | |
11 | ||
1da177e4 | 12 | #include <linux/module.h> |
1da177e4 | 13 | #include <linux/poll.h> |
1da177e4 LT |
14 | #ifdef CONFIG_PROC_FS |
15 | #include <linux/proc_fs.h> | |
16 | #else | |
17 | #include <linux/fs.h> | |
18 | #endif | |
19 | #include <linux/isdnif.h> | |
20 | #include "isdn_divert.h" | |
21 | ||
22 | ||
23 | /*********************************/ | |
24 | /* Variables for interface queue */ | |
25 | /*********************************/ | |
26 | ulong if_used = 0; /* number of interface users */ | |
27 | static struct divert_info *divert_info_head = NULL; /* head of queue */ | |
28 | static struct divert_info *divert_info_tail = NULL; /* pointer to last entry */ | |
29 | static DEFINE_SPINLOCK(divert_info_lock);/* lock for queue */ | |
30 | static wait_queue_head_t rd_queue; | |
31 | ||
32 | /*********************************/ | |
33 | /* put an info buffer into queue */ | |
34 | /*********************************/ | |
35 | void | |
36 | put_info_buffer(char *cp) | |
37 | { | |
38 | struct divert_info *ib; | |
39 | unsigned long flags; | |
40 | ||
41 | if (if_used <= 0) | |
42 | return; | |
43 | if (!cp) | |
44 | return; | |
45 | if (!*cp) | |
46 | return; | |
5cbded58 | 47 | if (!(ib = kmalloc(sizeof(struct divert_info) + strlen(cp), GFP_ATOMIC))) |
1da177e4 LT |
48 | return; /* no memory */ |
49 | strcpy(ib->info_start, cp); /* set output string */ | |
50 | ib->next = NULL; | |
51 | spin_lock_irqsave( &divert_info_lock, flags ); | |
52 | ib->usage_cnt = if_used; | |
53 | if (!divert_info_head) | |
54 | divert_info_head = ib; /* new head */ | |
55 | else | |
56 | divert_info_tail->next = ib; /* follows existing messages */ | |
57 | divert_info_tail = ib; /* new tail */ | |
58 | ||
59 | /* delete old entrys */ | |
60 | while (divert_info_head->next) { | |
61 | if ((divert_info_head->usage_cnt <= 0) && | |
62 | (divert_info_head->next->usage_cnt <= 0)) { | |
63 | ib = divert_info_head; | |
64 | divert_info_head = divert_info_head->next; | |
65 | kfree(ib); | |
66 | } else | |
67 | break; | |
68 | } /* divert_info_head->next */ | |
69 | spin_unlock_irqrestore( &divert_info_lock, flags ); | |
70 | wake_up_interruptible(&(rd_queue)); | |
71 | } /* put_info_buffer */ | |
72 | ||
73 | /**********************************/ | |
74 | /* deflection device read routine */ | |
75 | /**********************************/ | |
76 | static ssize_t | |
77 | isdn_divert_read(struct file *file, char __user *buf, size_t count, loff_t * off) | |
78 | { | |
79 | struct divert_info *inf; | |
80 | int len; | |
81 | ||
82 | if (!*((struct divert_info **) file->private_data)) { | |
83 | if (file->f_flags & O_NONBLOCK) | |
84 | return -EAGAIN; | |
85 | interruptible_sleep_on(&(rd_queue)); | |
86 | } | |
87 | if (!(inf = *((struct divert_info **) file->private_data))) | |
88 | return (0); | |
89 | ||
90 | inf->usage_cnt--; /* new usage count */ | |
91 | file->private_data = &inf->next; /* next structure */ | |
92 | if ((len = strlen(inf->info_start)) <= count) { | |
93 | if (copy_to_user(buf, inf->info_start, len)) | |
94 | return -EFAULT; | |
95 | *off += len; | |
96 | return (len); | |
97 | } | |
98 | return (0); | |
99 | } /* isdn_divert_read */ | |
100 | ||
101 | /**********************************/ | |
102 | /* deflection device write routine */ | |
103 | /**********************************/ | |
104 | static ssize_t | |
105 | isdn_divert_write(struct file *file, const char __user *buf, size_t count, loff_t * off) | |
106 | { | |
107 | return (-ENODEV); | |
108 | } /* isdn_divert_write */ | |
109 | ||
110 | ||
111 | /***************************************/ | |
112 | /* select routines for various kernels */ | |
113 | /***************************************/ | |
114 | static unsigned int | |
115 | isdn_divert_poll(struct file *file, poll_table * wait) | |
116 | { | |
117 | unsigned int mask = 0; | |
118 | ||
119 | poll_wait(file, &(rd_queue), wait); | |
120 | /* mask = POLLOUT | POLLWRNORM; */ | |
121 | if (*((struct divert_info **) file->private_data)) { | |
122 | mask |= POLLIN | POLLRDNORM; | |
123 | } | |
124 | return mask; | |
125 | } /* isdn_divert_poll */ | |
126 | ||
127 | /****************/ | |
128 | /* Open routine */ | |
129 | /****************/ | |
130 | static int | |
131 | isdn_divert_open(struct inode *ino, struct file *filep) | |
132 | { | |
133 | unsigned long flags; | |
134 | ||
135 | spin_lock_irqsave( &divert_info_lock, flags ); | |
136 | if_used++; | |
137 | if (divert_info_head) | |
138 | filep->private_data = &(divert_info_tail->next); | |
139 | else | |
140 | filep->private_data = &divert_info_head; | |
141 | spin_unlock_irqrestore( &divert_info_lock, flags ); | |
142 | /* start_divert(); */ | |
143 | return nonseekable_open(ino, filep); | |
144 | } /* isdn_divert_open */ | |
145 | ||
146 | /*******************/ | |
147 | /* close routine */ | |
148 | /*******************/ | |
149 | static int | |
150 | isdn_divert_close(struct inode *ino, struct file *filep) | |
151 | { | |
152 | struct divert_info *inf; | |
153 | unsigned long flags; | |
154 | ||
155 | spin_lock_irqsave( &divert_info_lock, flags ); | |
156 | if_used--; | |
157 | inf = *((struct divert_info **) filep->private_data); | |
158 | while (inf) { | |
159 | inf->usage_cnt--; | |
160 | inf = inf->next; | |
161 | } | |
162 | if (if_used <= 0) | |
163 | while (divert_info_head) { | |
164 | inf = divert_info_head; | |
165 | divert_info_head = divert_info_head->next; | |
166 | kfree(inf); | |
167 | } | |
168 | spin_unlock_irqrestore( &divert_info_lock, flags ); | |
169 | return (0); | |
170 | } /* isdn_divert_close */ | |
171 | ||
172 | /*********/ | |
173 | /* IOCTL */ | |
174 | /*********/ | |
175 | static int | |
176 | isdn_divert_ioctl(struct inode *inode, struct file *file, | |
177 | uint cmd, ulong arg) | |
178 | { | |
179 | divert_ioctl dioctl; | |
180 | int i; | |
181 | unsigned long flags; | |
182 | divert_rule *rulep; | |
183 | char *cp; | |
184 | ||
185 | if (copy_from_user(&dioctl, (void __user *) arg, sizeof(dioctl))) | |
186 | return -EFAULT; | |
187 | ||
188 | switch (cmd) { | |
189 | case IIOCGETVER: | |
190 | dioctl.drv_version = DIVERT_IIOC_VERSION; /* set version */ | |
191 | break; | |
192 | ||
193 | case IIOCGETDRV: | |
194 | if ((dioctl.getid.drvid = divert_if.name_to_drv(dioctl.getid.drvnam)) < 0) | |
195 | return (-EINVAL); | |
196 | break; | |
197 | ||
198 | case IIOCGETNAM: | |
199 | cp = divert_if.drv_to_name(dioctl.getid.drvid); | |
200 | if (!cp) | |
201 | return (-EINVAL); | |
202 | if (!*cp) | |
203 | return (-EINVAL); | |
204 | strcpy(dioctl.getid.drvnam, cp); | |
205 | break; | |
206 | ||
207 | case IIOCGETRULE: | |
208 | if (!(rulep = getruleptr(dioctl.getsetrule.ruleidx))) | |
209 | return (-EINVAL); | |
210 | dioctl.getsetrule.rule = *rulep; /* copy data */ | |
211 | break; | |
212 | ||
213 | case IIOCMODRULE: | |
214 | if (!(rulep = getruleptr(dioctl.getsetrule.ruleidx))) | |
215 | return (-EINVAL); | |
216 | spin_lock_irqsave(&divert_lock, flags); | |
217 | *rulep = dioctl.getsetrule.rule; /* copy data */ | |
218 | spin_unlock_irqrestore(&divert_lock, flags); | |
219 | return (0); /* no copy required */ | |
220 | break; | |
221 | ||
222 | case IIOCINSRULE: | |
223 | return (insertrule(dioctl.getsetrule.ruleidx, &dioctl.getsetrule.rule)); | |
224 | break; | |
225 | ||
226 | case IIOCDELRULE: | |
227 | return (deleterule(dioctl.getsetrule.ruleidx)); | |
228 | break; | |
229 | ||
230 | case IIOCDODFACT: | |
231 | return (deflect_extern_action(dioctl.fwd_ctrl.subcmd, | |
232 | dioctl.fwd_ctrl.callid, | |
233 | dioctl.fwd_ctrl.to_nr)); | |
234 | ||
235 | case IIOCDOCFACT: | |
236 | case IIOCDOCFDIS: | |
237 | case IIOCDOCFINT: | |
238 | if (!divert_if.drv_to_name(dioctl.cf_ctrl.drvid)) | |
239 | return (-EINVAL); /* invalid driver */ | |
240 | if ((i = cf_command(dioctl.cf_ctrl.drvid, | |
241 | (cmd == IIOCDOCFACT) ? 1 : (cmd == IIOCDOCFDIS) ? 0 : 2, | |
242 | dioctl.cf_ctrl.cfproc, | |
243 | dioctl.cf_ctrl.msn, | |
244 | dioctl.cf_ctrl.service, | |
245 | dioctl.cf_ctrl.fwd_nr, | |
246 | &dioctl.cf_ctrl.procid))) | |
247 | return (i); | |
248 | break; | |
249 | ||
250 | default: | |
251 | return (-EINVAL); | |
252 | } /* switch cmd */ | |
253 | return copy_to_user((void __user *)arg, &dioctl, sizeof(dioctl)) ? -EFAULT : 0; | |
254 | } /* isdn_divert_ioctl */ | |
255 | ||
256 | ||
257 | #ifdef CONFIG_PROC_FS | |
2b8693c0 | 258 | static const struct file_operations isdn_fops = |
1da177e4 LT |
259 | { |
260 | .owner = THIS_MODULE, | |
261 | .llseek = no_llseek, | |
262 | .read = isdn_divert_read, | |
263 | .write = isdn_divert_write, | |
264 | .poll = isdn_divert_poll, | |
265 | .ioctl = isdn_divert_ioctl, | |
266 | .open = isdn_divert_open, | |
267 | .release = isdn_divert_close, | |
268 | }; | |
269 | ||
270 | /****************************/ | |
271 | /* isdn subdir in /proc/net */ | |
272 | /****************************/ | |
273 | static struct proc_dir_entry *isdn_proc_entry = NULL; | |
274 | static struct proc_dir_entry *isdn_divert_entry = NULL; | |
275 | #endif /* CONFIG_PROC_FS */ | |
276 | ||
277 | /***************************************************************************/ | |
278 | /* divert_dev_init must be called before the proc filesystem may be used */ | |
279 | /***************************************************************************/ | |
280 | int | |
281 | divert_dev_init(void) | |
282 | { | |
283 | ||
284 | init_waitqueue_head(&rd_queue); | |
285 | ||
286 | #ifdef CONFIG_PROC_FS | |
66600221 | 287 | isdn_proc_entry = proc_mkdir("net/isdn", NULL); |
1da177e4 LT |
288 | if (!isdn_proc_entry) |
289 | return (-1); | |
290 | isdn_divert_entry = create_proc_entry("divert", S_IFREG | S_IRUGO, isdn_proc_entry); | |
291 | if (!isdn_divert_entry) { | |
66600221 | 292 | remove_proc_entry("net/isdn", NULL); |
1da177e4 LT |
293 | return (-1); |
294 | } | |
295 | isdn_divert_entry->proc_fops = &isdn_fops; | |
296 | isdn_divert_entry->owner = THIS_MODULE; | |
297 | #endif /* CONFIG_PROC_FS */ | |
298 | ||
299 | return (0); | |
300 | } /* divert_dev_init */ | |
301 | ||
302 | /***************************************************************************/ | |
303 | /* divert_dev_deinit must be called before leaving isdn when included as */ | |
304 | /* a module. */ | |
305 | /***************************************************************************/ | |
306 | int | |
307 | divert_dev_deinit(void) | |
308 | { | |
309 | ||
310 | #ifdef CONFIG_PROC_FS | |
311 | remove_proc_entry("divert", isdn_proc_entry); | |
66600221 | 312 | remove_proc_entry("net/isdn", NULL); |
1da177e4 LT |
313 | #endif /* CONFIG_PROC_FS */ |
314 | ||
315 | return (0); | |
316 | } /* divert_dev_deinit */ |