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