drivers/pci/proc.c

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