drivers/block/aoe/aoechr.c

   1 /* Copyright (c) 2007 Coraid, Inc.  See COPYING for GPL terms. */
   2 /*
   3  * aoechr.c
   4  * AoE character device driver
   5  */
   6
   7 #include <linux/hdreg.h>
   8 #include <linux/blkdev.h>
   9 #include <linux/completion.h>
  10 #include <linux/delay.h>
  11 #include <linux/slab.h>
  12 #include <linux/mutex.h>
  13 #include <linux/skbuff.h>
  14 #include "aoe.h"
  15
  16 enum {
  17         //MINOR_STAT = 1, (moved to sysfs)
  18         MINOR_ERR = 2,
  19         MINOR_DISCOVER,
  20         MINOR_INTERFACES,
  21         MINOR_REVALIDATE,
  22         MINOR_FLUSH,
  23         MSGSZ = 2048,
  24         NMSG = 100,             /* message backlog to retain */
  25 };
  26
  27 struct aoe_chardev {
  28         ulong minor;
  29         char name[32];
  30 };
  31
  32 enum { EMFL_VALID = 1 };
  33
  34 struct ErrMsg {
  35         short flags;
  36         short len;
  37         char *msg;
  38 };
  39
  40 static DEFINE_MUTEX(aoechr_mutex);
  41 static struct ErrMsg emsgs[NMSG];
  42 static int emsgs_head_idx, emsgs_tail_idx;
  43 static struct completion emsgs_comp;
  44 static spinlock_t emsgs_lock;
  45 static int nblocked_emsgs_readers;
  46 static struct class *aoe_class;
  47 static struct aoe_chardev chardevs[] = {
  48         { MINOR_ERR, "err" },
  49         { MINOR_DISCOVER, "discover" },
  50         { MINOR_INTERFACES, "interfaces" },
  51         { MINOR_REVALIDATE, "revalidate" },
  52         { MINOR_FLUSH, "flush" },
  53 };
  54
  55 static int
  56 discover(void)
  57 {
  58         aoecmd_cfg(0xffff, 0xff);
  59         return 0;
  60 }
  61
  62 static int
  63 interfaces(const char __user *str, size_t size)
  64 {
  65         if (set_aoe_iflist(str, size)) {
  66                 printk(KERN_ERR
  67                         "aoe: could not set interface list: too many interfaces\n");
  68                 return -EINVAL;
  69         }
  70         return 0;
  71 }
  72
  73 static int
  74 revalidate(const char __user *str, size_t size)
  75 {
  76         int major, minor, n;
  77         ulong flags;
  78         struct aoedev *d;
  79         struct sk_buff *skb;
  80         char buf[16];
  81
  82         if (size >= sizeof buf)
  83                 return -EINVAL;
  84         buf[sizeof buf - 1] = '\0';
  85         if (copy_from_user(buf, str, size))
  86                 return -EFAULT;
  87
  88         /* should be e%d.%d format */
  89         n = sscanf(buf, "e%d.%d", &major, &minor);
  90         if (n != 2) {
  91                 printk(KERN_ERR "aoe: invalid device specification\n");
  92                 return -EINVAL;
  93         }
  94         d = aoedev_by_aoeaddr(major, minor);
  95         if (!d)
  96                 return -EINVAL;
  97         spin_lock_irqsave(&d->lock, flags);
  98         aoecmd_cleanslate(d);
  99 loop:
 100         skb = aoecmd_ata_id(d);
 101         spin_unlock_irqrestore(&d->lock, flags);
 102         /* try again if we are able to sleep a bit,
 103          * otherwise give up this revalidation
 104          */
 105         if (!skb && !msleep_interruptible(200)) {
 106                 spin_lock_irqsave(&d->lock, flags);
 107                 goto loop;
 108         }
 109         if (skb) {
 110                 struct sk_buff_head queue;
 111                 __skb_queue_head_init(&queue);
 112                 __skb_queue_tail(&queue, skb);
 113                 aoenet_xmit(&queue);
 114         }
 115         aoecmd_cfg(major, minor);
 116         return 0;
 117 }
 118
 119 void
 120 aoechr_error(char *msg)
 121 {
 122         struct ErrMsg *em;
 123         char *mp;
 124         ulong flags, n;
 125
 126         n = strlen(msg);
 127
 128         spin_lock_irqsave(&emsgs_lock, flags);
 129
 130         em = emsgs + emsgs_tail_idx;
 131         if ((em->flags & EMFL_VALID)) {
 132 bail:           spin_unlock_irqrestore(&emsgs_lock, flags);
 133                 return;
 134         }
 135
 136         mp = kmalloc(n, GFP_ATOMIC);
 137         if (mp == NULL) {
 138                 printk(KERN_ERR "aoe: allocation failure, len=%ld\n", n);
 139                 goto bail;
 140         }
 141
 142         memcpy(mp, msg, n);
 143         em->msg = mp;
 144         em->flags |= EMFL_VALID;
 145         em->len = n;
 146
 147         emsgs_tail_idx++;
 148         emsgs_tail_idx %= ARRAY_SIZE(emsgs);
 149
 150         spin_unlock_irqrestore(&emsgs_lock, flags);
 151
 152         if (nblocked_emsgs_readers)
 153                 complete(&emsgs_comp);
 154 }
 155
 156 static ssize_t
 157 aoechr_write(struct file *filp, const char __user *buf, size_t cnt, loff_t *offp)
 158 {
 159         int ret = -EINVAL;
 160
 161         switch ((unsigned long) filp->private_data) {
 162         default:
 163                 printk(KERN_INFO "aoe: can't write to that file.\n");
 164                 break;
 165         case MINOR_DISCOVER:
 166                 ret = discover();
 167                 break;
 168         case MINOR_INTERFACES:
 169                 ret = interfaces(buf, cnt);
 170                 break;
 171         case MINOR_REVALIDATE:
 172                 ret = revalidate(buf, cnt);
 173                 break;
 174         case MINOR_FLUSH:
 175                 ret = aoedev_flush(buf, cnt);
 176         }
 177         if (ret == 0)
 178                 ret = cnt;
 179         return ret;
 180 }
 181
 182 static int
 183 aoechr_open(struct inode *inode, struct file *filp)
 184 {
 185         int n, i;
 186
 187         mutex_lock(&aoechr_mutex);
 188         n = iminor(inode);
 189         filp->private_data = (void *) (unsigned long) n;
 190
 191         for (i = 0; i < ARRAY_SIZE(chardevs); ++i)
 192                 if (chardevs[i].minor == n) {
 193                         mutex_unlock(&aoechr_mutex);
 194                         return 0;
 195                 }
 196         mutex_unlock(&aoechr_mutex);
 197         return -EINVAL;
 198 }
 199
 200 static int
 201 aoechr_rel(struct inode *inode, struct file *filp)
 202 {
 203         return 0;
 204 }
 205
 206 static ssize_t
 207 aoechr_read(struct file *filp, char __user *buf, size_t cnt, loff_t *off)
 208 {
 209         unsigned long n;
 210         char *mp;
 211         struct ErrMsg *em;
 212         ssize_t len;
 213         ulong flags;
 214
 215         n = (unsigned long) filp->private_data;
 216         if (n != MINOR_ERR)
 217                 return -EFAULT;
 218
 219         spin_lock_irqsave(&emsgs_lock, flags);
 220
 221         for (;;) {
 222                 em = emsgs + emsgs_head_idx;
 223                 if ((em->flags & EMFL_VALID) != 0)
 224                         break;
 225                 if (filp->f_flags & O_NDELAY) {
 226                         spin_unlock_irqrestore(&emsgs_lock, flags);
 227                         return -EAGAIN;
 228                 }
 229                 nblocked_emsgs_readers++;
 230
 231                 spin_unlock_irqrestore(&emsgs_lock, flags);
 232
 233                 n = wait_for_completion_interruptible(&emsgs_comp);
 234
 235                 spin_lock_irqsave(&emsgs_lock, flags);
 236
 237                 nblocked_emsgs_readers--;
 238
 239                 if (n) {
 240                         spin_unlock_irqrestore(&emsgs_lock, flags);
 241                         return -ERESTARTSYS;
 242                 }
 243         }
 244         if (em->len > cnt) {
 245                 spin_unlock_irqrestore(&emsgs_lock, flags);
 246                 return -EAGAIN;
 247         }
 248         mp = em->msg;
 249         len = em->len;
 250         em->msg = NULL;
 251         em->flags &= ~EMFL_VALID;
 252
 253         emsgs_head_idx++;
 254         emsgs_head_idx %= ARRAY_SIZE(emsgs);
 255
 256         spin_unlock_irqrestore(&emsgs_lock, flags);
 257
 258         n = copy_to_user(buf, mp, len);
 259         kfree(mp);
 260         return n == 0 ? len : -EFAULT;
 261 }
 262
 263 static const struct file_operations aoe_fops = {
 264         .write = aoechr_write,
 265         .read = aoechr_read,
 266         .open = aoechr_open,
 267         .release = aoechr_rel,
 268         .owner = THIS_MODULE,
 269 };
 270
 271 static char *aoe_devnode(struct device *dev, mode_t *mode)
 272 {
 273         return kasprintf(GFP_KERNEL, "etherd/%s", dev_name(dev));
 274 }
 275
 276 int __init
 277 aoechr_init(void)
 278 {
 279         int n, i;
 280
 281         n = register_chrdev(AOE_MAJOR, "aoechr", &aoe_fops);
 282         if (n < 0) {
 283                 printk(KERN_ERR "aoe: can't register char device\n");
 284                 return n;
 285         }
 286         init_completion(&emsgs_comp);
 287         spin_lock_init(&emsgs_lock);
 288         aoe_class = class_create(THIS_MODULE, "aoe");
 289         if (IS_ERR(aoe_class)) {
 290                 unregister_chrdev(AOE_MAJOR, "aoechr");
 291                 return PTR_ERR(aoe_class);
 292         }
 293         aoe_class->devnode = aoe_devnode;
 294
 295         for (i = 0; i < ARRAY_SIZE(chardevs); ++i)
 296                 device_create(aoe_class, NULL,
 297                               MKDEV(AOE_MAJOR, chardevs[i].minor), NULL,
 298                               chardevs[i].name);
 299
 300         return 0;
 301 }
 302
 303 void
 304 aoechr_exit(void)
 305 {
 306         int i;
 307
 308         for (i = 0; i < ARRAY_SIZE(chardevs); ++i)
 309                 device_destroy(aoe_class, MKDEV(AOE_MAJOR, chardevs[i].minor));
 310         class_destroy(aoe_class);
 311         unregister_chrdev(AOE_MAJOR, "aoechr");
 312 }
 313