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