drivers/pci/proc.c

   1 /*
   2  *      Procfs interface for the PCI bus.
   3  *
   4  *      Copyright (c) 1997--1999 Martin Mares <mj@ucw.cz>
   5  */
   6
   7 #include <linux/init.h>
   8 #include <linux/pci.h>
   9 #include <linux/slab.h>
  10 #include <linux/module.h>
  11 #include <linux/proc_fs.h>
  12 #include <linux/seq_file.h>
  13 #include <linux/capability.h>
  14 #include <asm/uaccess.h>
  15 #include <asm/byteorder.h>
  16 #include "pci.h"
  17
  18 static int proc_initialized;    /* = 0 */
  19
  20 static loff_t
  21 proc_bus_pci_lseek(struct file *file, loff_t off, int whence)
  22 {
  23         loff_t new = -1;
  24         struct inode *inode = file->f_path.dentry->d_inode;
  25
  26         mutex_lock(&inode->i_mutex);
  27         switch (whence) {
  28         case 0:
  29                 new = off;
  30                 break;
  31         case 1:
  32                 new = file->f_pos + off;
  33                 break;
  34         case 2:
  35                 new = inode->i_size + off;
  36                 break;
  37         }
  38         if (new < 0 || new > inode->i_size)
  39                 new = -EINVAL;
  40         else
  41                 file->f_pos = new;
  42         mutex_unlock(&inode->i_mutex);
  43         return new;
  44 }
  45
  46 static ssize_t
  47 proc_bus_pci_read(struct file *file, char __user *buf, size_t nbytes, loff_t *ppos)
  48 {
  49         const struct inode *ino = file->f_path.dentry->d_inode;
  50         const struct proc_dir_entry *dp = PDE(ino);
  51         struct pci_dev *dev = dp->data;
  52         unsigned int pos = *ppos;
  53         unsigned int cnt, size;
  54
  55         /*
  56          * Normal users can read only the standardized portion of the
  57          * configuration space as several chips lock up when trying to read
  58          * undefined locations (think of Intel PIIX4 as a typical example).
  59          */
  60
  61         if (capable(CAP_SYS_ADMIN))
  62                 size = dp->size;
  63         else if (dev->hdr_type == PCI_HEADER_TYPE_CARDBUS)
  64                 size = 128;
  65         else
  66                 size = 64;
  67
  68         if (pos >= size)
  69                 return 0;
  70         if (nbytes >= size)
  71                 nbytes = size;
  72         if (pos + nbytes > size)
  73                 nbytes = size - pos;
  74         cnt = nbytes;
  75
  76         if (!access_ok(VERIFY_WRITE, buf, cnt))
  77                 return -EINVAL;
  78
  79         if ((pos & 1) && cnt) {
  80                 unsigned char val;
  81                 pci_user_read_config_byte(dev, pos, &val);
  82                 __put_user(val, buf);
  83                 buf++;
  84                 pos++;
  85                 cnt--;
  86         }
  87
  88         if ((pos & 3) && cnt > 2) {
  89                 unsigned short val;
  90                 pci_user_read_config_word(dev, pos, &val);
  91                 __put_user(cpu_to_le16(val), (__le16 __user *) buf);
  92                 buf += 2;
  93                 pos += 2;
  94                 cnt -= 2;
  95         }
  96
  97         while (cnt >= 4) {
  98                 unsigned int val;
  99                 pci_user_read_config_dword(dev, pos, &val);
 100                 __put_user(cpu_to_le32(val), (__le32 __user *) buf);
 101                 buf += 4;
 102                 pos += 4;
 103                 cnt -= 4;
 104         }
 105
 106         if (cnt >= 2) {
 107                 unsigned short val;
 108                 pci_user_read_config_word(dev, pos, &val);
 109                 __put_user(cpu_to_le16(val), (__le16 __user *) buf);
 110                 buf += 2;
 111                 pos += 2;
 112                 cnt -= 2;
 113         }
 114
 115         if (cnt) {
 116                 unsigned char val;
 117                 pci_user_read_config_byte(dev, pos, &val);
 118                 __put_user(val, buf);
 119                 buf++;
 120                 pos++;
 121                 cnt--;
 122         }
 123
 124         *ppos = pos;
 125         return nbytes;
 126 }
 127
 128 static ssize_t
 129 proc_bus_pci_write(struct file *file, const char __user *buf, size_t nbytes, loff_t *ppos)
 130 {
 131         struct inode *ino = file->f_path.dentry->d_inode;
 132         const struct proc_dir_entry *dp = PDE(ino);
 133         struct pci_dev *dev = dp->data;
 134         int pos = *ppos;
 135         int size = dp->size;
 136         int cnt;
 137
 138         if (pos >= size)
 139                 return 0;
 140         if (nbytes >= size)
 141                 nbytes = size;
 142         if (pos + nbytes > size)
 143                 nbytes = size - pos;
 144         cnt = nbytes;
 145
 146         if (!access_ok(VERIFY_READ, buf, cnt))
 147                 return -EINVAL;
 148
 149         if ((pos & 1) && cnt) {
 150                 unsigned char val;
 151                 __get_user(val, buf);
 152                 pci_user_write_config_byte(dev, pos, val);
 153                 buf++;
 154                 pos++;
 155                 cnt--;
 156         }
 157
 158         if ((pos & 3) && cnt > 2) {
 159                 __le16 val;
 160                 __get_user(val, (__le16 __user *) buf);
 161                 pci_user_write_config_word(dev, pos, le16_to_cpu(val));
 162                 buf += 2;
 163                 pos += 2;
 164                 cnt -= 2;
 165         }
 166
 167         while (cnt >= 4) {
 168                 __le32 val;
 169                 __get_user(val, (__le32 __user *) buf);
 170                 pci_user_write_config_dword(dev, pos, le32_to_cpu(val));
 171                 buf += 4;
 172                 pos += 4;
 173                 cnt -= 4;
 174         }
 175
 176         if (cnt >= 2) {
 177                 __le16 val;
 178                 __get_user(val, (__le16 __user *) buf);
 179                 pci_user_write_config_word(dev, pos, le16_to_cpu(val));
 180                 buf += 2;
 181                 pos += 2;
 182                 cnt -= 2;
 183         }
 184
 185         if (cnt) {
 186                 unsigned char val;
 187                 __get_user(val, buf);
 188                 pci_user_write_config_byte(dev, pos, val);
 189                 buf++;
 190                 pos++;
 191                 cnt--;
 192         }
 193
 194         *ppos = pos;
 195         i_size_write(ino, dp->size);
 196         return nbytes;
 197 }
 198
 199 struct pci_filp_private {
 200         enum pci_mmap_state mmap_state;
 201         int write_combine;
 202 };
 203
 204 static long proc_bus_pci_ioctl(struct file *file, unsigned int cmd,
 205                                unsigned long arg)
 206 {
 207         const struct proc_dir_entry *dp = PDE(file->f_dentry->d_inode);
 208         struct pci_dev *dev = dp->data;
 209 #ifdef HAVE_PCI_MMAP
 210         struct pci_filp_private *fpriv = file->private_data;
 211 #endif /* HAVE_PCI_MMAP */
 212         int ret = 0;
 213
 214         switch (cmd) {
 215         case PCIIOC_CONTROLLER:
 216                 ret = pci_domain_nr(dev->bus);
 217                 break;
 218
 219 #ifdef HAVE_PCI_MMAP
 220         case PCIIOC_MMAP_IS_IO:
 221                 fpriv->mmap_state = pci_mmap_io;
 222                 break;
 223
 224         case PCIIOC_MMAP_IS_MEM:
 225                 fpriv->mmap_state = pci_mmap_mem;
 226                 break;
 227
 228         case PCIIOC_WRITE_COMBINE:
 229                 if (arg)
 230                         fpriv->write_combine = 1;
 231                 else
 232                         fpriv->write_combine = 0;
 233                 break;
 234
 235 #endif /* HAVE_PCI_MMAP */
 236
 237         default:
 238                 ret = -EINVAL;
 239                 break;
 240         };
 241
 242         return ret;
 243 }
 244
 245 #ifdef HAVE_PCI_MMAP
 246 static int proc_bus_pci_mmap(struct file *file, struct vm_area_struct *vma)
 247 {
 248         struct inode *inode = file->f_path.dentry->d_inode;
 249         const struct proc_dir_entry *dp = PDE(inode);
 250         struct pci_dev *dev = dp->data;
 251         struct pci_filp_private *fpriv = file->private_data;
 252         int i, ret, write_combine = 0, res_bit;
 253
 254         if (!capable(CAP_SYS_RAWIO))
 255                 return -EPERM;
 256
 257         if (fpriv->mmap_state == pci_mmap_io)
 258                 res_bit = IORESOURCE_IO;
 259         else
 260                 res_bit = IORESOURCE_MEM;
 261
 262         /* Make sure the caller is mapping a real resource for this device */
 263         for (i = 0; i < PCI_ROM_RESOURCE; i++) {
 264                 if (dev->resource[i].flags & res_bit &&
 265                     pci_mmap_fits(dev, i, vma,  PCI_MMAP_PROCFS))
 266                         break;
 267         }
 268
 269         if (i >= PCI_ROM_RESOURCE)
 270                 return -ENODEV;
 271
 272         if (fpriv->mmap_state == pci_mmap_mem &&
 273             fpriv->write_combine) {
 274                 if (dev->resource[i].flags & IORESOURCE_PREFETCH)
 275                         write_combine = 1;
 276                 else
 277                         return -EINVAL;
 278         }
 279         ret = pci_mmap_page_range(dev, vma,
 280                                   fpriv->mmap_state, write_combine);
 281         if (ret < 0)
 282                 return ret;
 283
 284         return 0;
 285 }
 286
 287 static int proc_bus_pci_open(struct inode *inode, struct file *file)
 288 {
 289         struct pci_filp_private *fpriv = kmalloc(sizeof(*fpriv), GFP_KERNEL);
 290
 291         if (!fpriv)
 292                 return -ENOMEM;
 293
 294         fpriv->mmap_state = pci_mmap_io;
 295         fpriv->write_combine = 0;
 296
 297         file->private_data = fpriv;
 298
 299         return 0;
 300 }
 301
 302 static int proc_bus_pci_release(struct inode *inode, struct file *file)
 303 {
 304         kfree(file->private_data);
 305         file->private_data = NULL;
 306
 307         return 0;
 308 }
 309 #endif /* HAVE_PCI_MMAP */
 310
 311 static const struct file_operations proc_bus_pci_operations = {
 312         .owner          = THIS_MODULE,
 313         .llseek         = proc_bus_pci_lseek,
 314         .read           = proc_bus_pci_read,
 315         .write          = proc_bus_pci_write,
 316         .unlocked_ioctl = proc_bus_pci_ioctl,
 317         .compat_ioctl   = proc_bus_pci_ioctl,
 318 #ifdef HAVE_PCI_MMAP
 319         .open           = proc_bus_pci_open,
 320         .release        = proc_bus_pci_release,
 321         .mmap           = proc_bus_pci_mmap,
 322 #ifdef HAVE_ARCH_PCI_GET_UNMAPPED_AREA
 323         .get_unmapped_area = get_pci_unmapped_area,
 324 #endif /* HAVE_ARCH_PCI_GET_UNMAPPED_AREA */
 325 #endif /* HAVE_PCI_MMAP */
 326 };
 327
 328 /* iterator */
 329 static void *pci_seq_start(struct seq_file *m, loff_t *pos)
 330 {
 331         struct pci_dev *dev = NULL;
 332         loff_t n = *pos;
 333
 334         for_each_pci_dev(dev) {
 335                 if (!n--)
 336                         break;
 337         }
 338         return dev;
 339 }
 340
 341 static void *pci_seq_next(struct seq_file *m, void *v, loff_t *pos)
 342 {
 343         struct pci_dev *dev = v;
 344
 345         (*pos)++;
 346         dev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, dev);
 347         return dev;
 348 }
 349
 350 static void pci_seq_stop(struct seq_file *m, void *v)
 351 {
 352         if (v) {
 353                 struct pci_dev *dev = v;
 354                 pci_dev_put(dev);
 355         }
 356 }
 357
 358 static int show_device(struct seq_file *m, void *v)
 359 {
 360         const struct pci_dev *dev = v;
 361         const struct pci_driver *drv;
 362         int i;
 363
 364         if (dev == NULL)
 365                 return 0;
 366
 367         drv = pci_dev_driver(dev);
 368         seq_printf(m, "%02x%02x\t%04x%04x\t%x",
 369                         dev->bus->number,
 370                         dev->devfn,
 371                         dev->vendor,
 372                         dev->device,
 373                         dev->irq);
 374
 375         /* only print standard and ROM resources to preserve compatibility */
 376         for (i = 0; i <= PCI_ROM_RESOURCE; i++) {
 377                 resource_size_t start, end;
 378                 pci_resource_to_user(dev, i, &dev->resource[i], &start, &end);
 379                 seq_printf(m, "\t%16llx",
 380                         (unsigned long long)(start |
 381                         (dev->resource[i].flags & PCI_REGION_FLAG_MASK)));
 382         }
 383         for (i = 0; i <= PCI_ROM_RESOURCE; i++) {
 384                 resource_size_t start, end;
 385                 pci_resource_to_user(dev, i, &dev->resource[i], &start, &end);
 386                 seq_printf(m, "\t%16llx",
 387                         dev->resource[i].start < dev->resource[i].end ?
 388                         (unsigned long long)(end - start) + 1 : 0);
 389         }
 390         seq_putc(m, '\t');
 391         if (drv)
 392                 seq_printf(m, "%s", drv->name);
 393         seq_putc(m, '\n');
 394         return 0;
 395 }
 396
 397 static const struct seq_operations proc_bus_pci_devices_op = {
 398         .start  = pci_seq_start,
 399         .next   = pci_seq_next,
 400         .stop   = pci_seq_stop,
 401         .show   = show_device
 402 };
 403
 404 static struct proc_dir_entry *proc_bus_pci_dir;
 405
 406 int pci_proc_attach_device(struct pci_dev *dev)
 407 {
 408         struct pci_bus *bus = dev->bus;
 409         struct proc_dir_entry *e;
 410         char name[16];
 411
 412         if (!proc_initialized)
 413                 return -EACCES;
 414
 415         if (!bus->procdir) {
 416                 if (pci_proc_domain(bus)) {
 417                         sprintf(name, "%04x:%02x", pci_domain_nr(bus),
 418                                         bus->number);
 419                 } else {
 420                         sprintf(name, "%02x", bus->number);
 421                 }
 422                 bus->procdir = proc_mkdir(name, proc_bus_pci_dir);
 423                 if (!bus->procdir)
 424                         return -ENOMEM;
 425         }
 426
 427         sprintf(name, "%02x.%x", PCI_SLOT(dev->devfn), PCI_FUNC(dev->devfn));
 428         e = proc_create_data(name, S_IFREG | S_IRUGO | S_IWUSR, bus->procdir,
 429                              &proc_bus_pci_operations, dev);
 430         if (!e)
 431                 return -ENOMEM;
 432         e->size = dev->cfg_size;
 433         dev->procent = e;
 434
 435         return 0;
 436 }
 437
 438 int pci_proc_detach_device(struct pci_dev *dev)
 439 {
 440         struct proc_dir_entry *e;
 441
 442         if ((e = dev->procent)) {
 443                 remove_proc_entry(e->name, dev->bus->procdir);
 444                 dev->procent = NULL;
 445         }
 446         return 0;
 447 }
 448
 449 #if 0
 450 int pci_proc_attach_bus(struct pci_bus* bus)
 451 {
 452         struct proc_dir_entry *de = bus->procdir;
 453
 454         if (!proc_initialized)
 455                 return -EACCES;
 456
 457         if (!de) {
 458                 char name[16];
 459                 sprintf(name, "%02x", bus->number);
 460                 de = bus->procdir = proc_mkdir(name, proc_bus_pci_dir);
 461                 if (!de)
 462                         return -ENOMEM;
 463         }
 464         return 0;
 465 }
 466 #endif  /*  0  */
 467
 468 int pci_proc_detach_bus(struct pci_bus* bus)
 469 {
 470         struct proc_dir_entry *de = bus->procdir;
 471         if (de)
 472                 remove_proc_entry(de->name, proc_bus_pci_dir);
 473         return 0;
 474 }
 475
 476 static int proc_bus_pci_dev_open(struct inode *inode, struct file *file)
 477 {
 478         return seq_open(file, &proc_bus_pci_devices_op);
 479 }
 480 static const struct file_operations proc_bus_pci_dev_operations = {
 481         .owner          = THIS_MODULE,
 482         .open           = proc_bus_pci_dev_open,
 483         .read           = seq_read,
 484         .llseek         = seq_lseek,
 485         .release        = seq_release,
 486 };
 487
 488 static int __init pci_proc_init(void)
 489 {
 490         struct pci_dev *dev = NULL;
 491         proc_bus_pci_dir = proc_mkdir("bus/pci", NULL);
 492         proc_create("devices", 0, proc_bus_pci_dir,
 493                     &proc_bus_pci_dev_operations);
 494         proc_initialized = 1;
 495         for_each_pci_dev(dev)
 496                 pci_proc_attach_device(dev);
 497
 498         return 0;
 499 }
 500
 501 device_initcall(pci_proc_init);
 502