drivers/pci/proc.c

   1 /*
   2  *      $Id: proc.c,v 1.13 1998/05/12 07:36:07 mj Exp $
   3  *
   4  *      Procfs interface for the PCI bus.
   5  *
   6  *      Copyright (c) 1997--1999 Martin Mares <mj@ucw.cz>
   7  */
   8
   9 #include <linux/types.h>
  10 #include <linux/kernel.h>
  11 #include <linux/pci.h>
  12 #include <linux/proc_fs.h>
  13 #include <linux/init.h>
  14 #include <linux/seq_file.h>
  15
  16 #include <asm/uaccess.h>
  17 #include <asm/byteorder.h>
  18
  19 #define PCI_CFG_SPACE_SIZE 256
  20
  21 static loff_t
  22 proc_bus_pci_lseek(struct file *file, loff_t off, int whence)
  23 {
  24         loff_t new;
  25
  26         switch (whence) {
  27         case 0:
  28                 new = off;
  29                 break;
  30         case 1:
  31                 new = file->f_pos + off;
  32                 break;
  33         case 2:
  34                 new = PCI_CFG_SPACE_SIZE + off;
  35                 break;
  36         default:
  37                 return -EINVAL;
  38         }
  39         if (new < 0 || new > PCI_CFG_SPACE_SIZE)
  40                 return -EINVAL;
  41         return (file->f_pos = new);
  42 }
  43
  44 static ssize_t
  45 proc_bus_pci_read(struct file *file, char *buf, size_t nbytes, loff_t *ppos)
  46 {
  47         const struct inode *ino = file->f_dentry->d_inode;
  48         const struct proc_dir_entry *dp = ino->u.generic_ip;
  49         struct pci_dev *dev = dp->data;
  50         loff_t n = *ppos;
  51         unsigned pos = n;
  52         unsigned int cnt, size;
  53
  54         /*
  55          * Normal users can read only the standardized portion of the
  56          * configuration space as several chips lock up when trying to read
  57          * undefined locations (think of Intel PIIX4 as a typical example).
  58          */
  59
  60         if (capable(CAP_SYS_ADMIN))
  61                 size = PCI_CFG_SPACE_SIZE;
  62         else if (dev->hdr_type == PCI_HEADER_TYPE_CARDBUS)
  63                 size = 128;
  64         else
  65                 size = 64;
  66
  67         if (pos != n || pos >= size)
  68                 return 0;
  69         if (nbytes >= size)
  70                 nbytes = size;
  71         if (pos + nbytes > size)
  72                 nbytes = size - pos;
  73         cnt = nbytes;
  74
  75         if (!access_ok(VERIFY_WRITE, buf, cnt))
  76                 return -EINVAL;
  77
  78         if ((pos & 1) && cnt) {
  79                 unsigned char val;
  80                 pci_read_config_byte(dev, pos, &val);
  81                 __put_user(val, buf);
  82                 buf++;
  83                 pos++;
  84                 cnt--;
  85         }
  86
  87         if ((pos & 3) && cnt > 2) {
  88                 unsigned short val;
  89                 pci_read_config_word(dev, pos, &val);
  90                 __put_user(cpu_to_le16(val), (unsigned short *) buf);
  91                 buf += 2;
  92                 pos += 2;
  93                 cnt -= 2;
  94         }
  95
  96         while (cnt >= 4) {
  97                 unsigned int val;
  98                 pci_read_config_dword(dev, pos, &val);
  99                 __put_user(cpu_to_le32(val), (unsigned int *) buf);
 100                 buf += 4;
 101                 pos += 4;
 102                 cnt -= 4;
 103         }
 104
 105         if (cnt >= 2) {
 106                 unsigned short val;
 107                 pci_read_config_word(dev, pos, &val);
 108                 __put_user(cpu_to_le16(val), (unsigned short *) buf);
 109                 buf += 2;
 110                 pos += 2;
 111                 cnt -= 2;
 112         }
 113
 114         if (cnt) {
 115                 unsigned char val;
 116                 pci_read_config_byte(dev, pos, &val);
 117                 __put_user(val, buf);
 118                 buf++;
 119                 pos++;
 120                 cnt--;
 121         }
 122
 123         *ppos = pos;
 124         return nbytes;
 125 }
 126
 127 static ssize_t
 128 proc_bus_pci_write(struct file *file, const char *buf, size_t nbytes, loff_t *ppos)
 129 {
 130         const struct inode *ino = file->f_dentry->d_inode;
 131         const struct proc_dir_entry *dp = ino->u.generic_ip;
 132         struct pci_dev *dev = dp->data;
 133         loff_t n = *ppos;
 134         unsigned pos = n;
 135         int cnt;
 136
 137         if (pos != n || pos >= PCI_CFG_SPACE_SIZE)
 138                 return 0;
 139         if (nbytes >= PCI_CFG_SPACE_SIZE)
 140                 nbytes = PCI_CFG_SPACE_SIZE;
 141         if (pos + nbytes > PCI_CFG_SPACE_SIZE)
 142                 nbytes = PCI_CFG_SPACE_SIZE - pos;
 143         cnt = nbytes;
 144
 145         if (!access_ok(VERIFY_READ, buf, cnt))
 146                 return -EINVAL;
 147
 148         if ((pos & 1) && cnt) {
 149                 unsigned char val;
 150                 __get_user(val, buf);
 151                 pci_write_config_byte(dev, pos, val);
 152                 buf++;
 153                 pos++;
 154                 cnt--;
 155         }
 156
 157         if ((pos & 3) && cnt > 2) {
 158                 unsigned short val;
 159                 __get_user(val, (unsigned short *) buf);
 160                 pci_write_config_word(dev, pos, le16_to_cpu(val));
 161                 buf += 2;
 162                 pos += 2;
 163                 cnt -= 2;
 164         }
 165
 166         while (cnt >= 4) {
 167                 unsigned int val;
 168                 __get_user(val, (unsigned int *) buf);
 169                 pci_write_config_dword(dev, pos, le32_to_cpu(val));
 170                 buf += 4;
 171                 pos += 4;
 172                 cnt -= 4;
 173         }
 174
 175         if (cnt >= 2) {
 176                 unsigned short val;
 177                 __get_user(val, (unsigned short *) buf);
 178                 pci_write_config_word(dev, pos, le16_to_cpu(val));
 179                 buf += 2;
 180                 pos += 2;
 181                 cnt -= 2;
 182         }
 183
 184         if (cnt) {
 185                 unsigned char val;
 186                 __get_user(val, buf);
 187                 pci_write_config_byte(dev, pos, val);
 188                 buf++;
 189                 pos++;
 190                 cnt--;
 191         }
 192
 193         *ppos = pos;
 194         return nbytes;
 195 }
 196
 197 struct pci_filp_private {
 198         enum pci_mmap_state mmap_state;
 199         int write_combine;
 200 };
 201
 202 static int proc_bus_pci_ioctl(struct inode *inode, struct file *file, unsigned int cmd, unsigned long arg)
 203 {
 204         const struct proc_dir_entry *dp = inode->u.generic_ip;
 205         struct pci_dev *dev = dp->data;
 206 #ifdef HAVE_PCI_MMAP
 207         struct pci_filp_private *fpriv = file->private_data;
 208 #endif /* HAVE_PCI_MMAP */
 209         int ret = 0;
 210
 211         switch (cmd) {
 212         case PCIIOC_CONTROLLER:
 213                 ret = pci_controller_num(dev);
 214                 break;
 215
 216 #ifdef HAVE_PCI_MMAP
 217         case PCIIOC_MMAP_IS_IO:
 218                 fpriv->mmap_state = pci_mmap_io;
 219                 break;
 220
 221         case PCIIOC_MMAP_IS_MEM:
 222                 fpriv->mmap_state = pci_mmap_mem;
 223                 break;
 224
 225         case PCIIOC_WRITE_COMBINE:
 226                 if (arg)
 227                         fpriv->write_combine = 1;
 228                 else
 229                         fpriv->write_combine = 0;
 230                 break;
 231
 232 #endif /* HAVE_PCI_MMAP */
 233
 234         default:
 235                 ret = -EINVAL;
 236                 break;
 237         };
 238
 239         return ret;
 240 }
 241
 242 #ifdef HAVE_PCI_MMAP
 243 static int proc_bus_pci_mmap(struct file *file, struct vm_area_struct *vma)
 244 {
 245         struct inode *inode = file->f_dentry->d_inode;
 246         const struct proc_dir_entry *dp = inode->u.generic_ip;
 247         struct pci_dev *dev = dp->data;
 248         struct pci_filp_private *fpriv = file->private_data;
 249         int ret;
 250
 251         if (!capable(CAP_SYS_RAWIO))
 252                 return -EPERM;
 253
 254         ret = pci_mmap_page_range(dev, vma,
 255                                   fpriv->mmap_state,
 256                                   fpriv->write_combine);
 257         if (ret < 0)
 258                 return ret;
 259
 260         return 0;
 261 }
 262
 263 static int proc_bus_pci_open(struct inode *inode, struct file *file)
 264 {
 265         struct pci_filp_private *fpriv = kmalloc(sizeof(*fpriv), GFP_KERNEL);
 266
 267         if (!fpriv)
 268                 return -ENOMEM;
 269
 270         fpriv->mmap_state = pci_mmap_io;
 271         fpriv->write_combine = 0;
 272
 273         file->private_data = fpriv;
 274
 275         return 0;
 276 }
 277
 278 static int proc_bus_pci_release(struct inode *inode, struct file *file)
 279 {
 280         kfree(file->private_data);
 281         file->private_data = NULL;
 282
 283         return 0;
 284 }
 285 #endif /* HAVE_PCI_MMAP */
 286
 287 static struct file_operations proc_bus_pci_operations = {
 288         llseek:         proc_bus_pci_lseek,
 289         read:           proc_bus_pci_read,
 290         write:          proc_bus_pci_write,
 291         ioctl:          proc_bus_pci_ioctl,
 292 #ifdef HAVE_PCI_MMAP
 293         open:           proc_bus_pci_open,
 294         release:        proc_bus_pci_release,
 295         mmap:           proc_bus_pci_mmap,
 296 #ifdef HAVE_ARCH_PCI_GET_UNMAPPED_AREA
 297         get_unmapped_area: get_pci_unmapped_area,
 298 #endif /* HAVE_ARCH_PCI_GET_UNMAPPED_AREA */
 299 #endif /* HAVE_PCI_MMAP */
 300 };
 301
 302 #if BITS_PER_LONG == 32
 303 #define LONG_FORMAT "\t%08lx"
 304 #else
 305 #define LONG_FORMAT "\t%16lx"
 306 #endif
 307
 308 /* iterator */
 309 static void *pci_seq_start(struct seq_file *m, loff_t *pos)
 310 {
 311         struct list_head *p = &pci_devices;
 312         loff_t n = *pos;
 313
 314         /* XXX: surely we need some locking for traversing the list? */
 315         while (n--) {
 316                 p = p->next;
 317                 if (p == &pci_devices)
 318                         return NULL;
 319         }
 320         return p;
 321 }
 322 static void *pci_seq_next(struct seq_file *m, void *v, loff_t *pos)
 323 {
 324         struct list_head *p = v;
 325         (*pos)++;
 326         return p->next != &pci_devices ? p->next : NULL;
 327 }
 328 static void pci_seq_stop(struct seq_file *m, void *v)
 329 {
 330         /* release whatever locks we need */
 331 }
 332
 333 static int show_device(struct seq_file *m, void *v)
 334 {
 335         struct list_head *p = v;
 336         const struct pci_dev *dev;
 337         const struct pci_driver *drv;
 338         int i;
 339
 340         if (p == &pci_devices)
 341                 return 0;
 342
 343         dev = pci_dev_g(p);
 344         drv = pci_dev_driver(dev);
 345         seq_printf(m, "%02x%02x\t%04x%04x\t%x",
 346                         dev->bus->number,
 347                         dev->devfn,
 348                         dev->vendor,
 349                         dev->device,
 350                         dev->irq);
 351         /* Here should be 7 and not PCI_NUM_RESOURCES as we need to preserve compatibility */
 352         for(i=0; i<7; i++)
 353                 seq_printf(m, LONG_FORMAT,
 354                         dev->resource[i].start |
 355                         (dev->resource[i].flags & PCI_REGION_FLAG_MASK));
 356         for(i=0; i<7; i++)
 357                 seq_printf(m, LONG_FORMAT,
 358                         dev->resource[i].start < dev->resource[i].end ?
 359                         dev->resource[i].end - dev->resource[i].start + 1 : 0);
 360         seq_putc(m, '\t');
 361         if (drv)
 362                 seq_printf(m, "%s", drv->name);
 363         seq_putc(m, '\n');
 364         return 0;
 365 }
 366
 367 static struct seq_operations proc_bus_pci_devices_op = {
 368         start:  pci_seq_start,
 369         next:   pci_seq_next,
 370         stop:   pci_seq_stop,
 371         show:   show_device
 372 };
 373
 374 struct proc_dir_entry *proc_bus_pci_dir;
 375
 376 int pci_proc_attach_device(struct pci_dev *dev)
 377 {
 378         struct pci_bus *bus = dev->bus;
 379         struct proc_dir_entry *de, *e;
 380         char name[16];
 381
 382         if (!(de = bus->procdir)) {
 383                 sprintf(name, "%02x", bus->number);
 384                 de = bus->procdir = proc_mkdir(name, proc_bus_pci_dir);
 385                 if (!de)
 386                         return -ENOMEM;
 387         }
 388         sprintf(name, "%02x.%x", PCI_SLOT(dev->devfn), PCI_FUNC(dev->devfn));
 389         e = dev->procent = create_proc_entry(name, S_IFREG | S_IRUGO | S_IWUSR, de);
 390         if (!e)
 391                 return -ENOMEM;
 392         e->proc_fops = &proc_bus_pci_operations;
 393         e->data = dev;
 394         e->size = PCI_CFG_SPACE_SIZE;
 395         return 0;
 396 }
 397
 398 int pci_proc_detach_device(struct pci_dev *dev)
 399 {
 400         struct proc_dir_entry *e;
 401
 402         if ((e = dev->procent)) {
 403                 if (atomic_read(&e->count))
 404                         return -EBUSY;
 405                 remove_proc_entry(e->name, dev->bus->procdir);
 406                 dev->procent = NULL;
 407         }
 408         return 0;
 409 }
 410
 411 int pci_proc_attach_bus(struct pci_bus* bus)
 412 {
 413         struct proc_dir_entry *de = bus->procdir;
 414
 415         if (!de) {
 416                 char name[16];
 417                 sprintf(name, "%02x", bus->number);
 418                 de = bus->procdir = proc_mkdir(name, proc_bus_pci_dir);
 419                 if (!de)
 420                         return -ENOMEM;
 421         }
 422         return 0;
 423 }
 424
 425 int pci_proc_detach_bus(struct pci_bus* bus)
 426 {
 427         struct proc_dir_entry *de = bus->procdir;
 428         if (de)
 429                 remove_proc_entry(de->name, proc_bus_pci_dir);
 430         return 0;
 431 }
 432
 433
 434 /*
 435  *  Backward compatible /proc/pci interface.
 436  */
 437
 438 /*
 439  * Convert some of the configuration space registers of the device at
 440  * address (bus,devfn) into a string (possibly several lines each).
 441  * The configuration string is stored starting at buf[len].  If the
 442  * string would exceed the size of the buffer (SIZE), 0 is returned.
 443  */
 444 static int show_dev_config(struct seq_file *m, void *v)
 445 {
 446         struct list_head *p = v;
 447         struct pci_dev *dev;
 448         struct pci_driver *drv;
 449         u32 class_rev;
 450         unsigned char latency, min_gnt, max_lat, *class;
 451         int reg;
 452
 453         if (p == &pci_devices) {
 454                 seq_puts(m, "PCI devices found:\n");
 455                 return 0;
 456         }
 457
 458         dev = pci_dev_g(p);
 459         drv = pci_dev_driver(dev);
 460
 461         pci_read_config_dword(dev, PCI_CLASS_REVISION, &class_rev);
 462         pci_read_config_byte (dev, PCI_LATENCY_TIMER, &latency);
 463         pci_read_config_byte (dev, PCI_MIN_GNT, &min_gnt);
 464         pci_read_config_byte (dev, PCI_MAX_LAT, &max_lat);
 465         seq_printf(m, "  Bus %2d, device %3d, function %2d:\n",
 466                dev->bus->number, PCI_SLOT(dev->devfn), PCI_FUNC(dev->devfn));
 467         class = pci_class_name(class_rev >> 16);
 468         if (class)
 469                 seq_printf(m, "    %s", class);
 470         else
 471                 seq_printf(m, "    Class %04x", class_rev >> 16);
 472         seq_printf(m, ": %s (rev %d).\n", dev->name, class_rev & 0xff);
 473
 474         //if (dev->irq)         //+Bing modified 01122005
 475                 seq_printf(m, "      IRQ %d.\n", dev->irq);
 476
 477         if (latency || min_gnt || max_lat) {
 478                 seq_printf(m, "      Master Capable.  ");
 479                 if (latency)
 480                         seq_printf(m, "Latency=%d.  ", latency);
 481                 else
 482                         seq_puts(m, "No bursts.  ");
 483                 if (min_gnt)
 484                         seq_printf(m, "Min Gnt=%d.", min_gnt);
 485                 if (max_lat)
 486                         seq_printf(m, "Max Lat=%d.", max_lat);
 487                 seq_putc(m, '\n');
 488         }
 489
 490         for (reg = 0; reg < 6; reg++) {
 491                 struct resource *res = dev->resource + reg;
 492                 unsigned long base, end, flags;
 493
 494                 base = res->start;
 495                 end = res->end;
 496                 flags = res->flags;
 497                 if (!end)
 498                         continue;
 499
 500                 if (flags & PCI_BASE_ADDRESS_SPACE_IO) {
 501                         seq_printf(m, "      I/O at 0x%lx [0x%lx].\n",
 502                                 base, end);
 503                 } else {
 504                         const char *pref, *type = "unknown";
 505
 506                         if (flags & PCI_BASE_ADDRESS_MEM_PREFETCH)
 507                                 pref = "P";
 508                         else
 509                                 pref = "Non-p";
 510                         switch (flags & PCI_BASE_ADDRESS_MEM_TYPE_MASK) {
 511                               case PCI_BASE_ADDRESS_MEM_TYPE_32:
 512                                 type = "32 bit"; break;
 513                               case PCI_BASE_ADDRESS_MEM_TYPE_1M:
 514                                 type = "20 bit"; break;
 515                               case PCI_BASE_ADDRESS_MEM_TYPE_64:
 516                                 type = "64 bit"; break;
 517                         }
 518                         seq_printf(m, "      %srefetchable %s memory at "
 519                                        "0x%lx [0x%lx].\n", pref, type,
 520                                        base,
 521                                        end);
 522                 }
 523         }
 524         return 0;
 525 }
 526
 527 static struct seq_operations proc_pci_op = {
 528         start:  pci_seq_start,
 529         next:   pci_seq_next,
 530         stop:   pci_seq_stop,
 531         show:   show_dev_config
 532 };
 533
 534 static int proc_bus_pci_dev_open(struct inode *inode, struct file *file)
 535 {
 536         return seq_open(file, &proc_bus_pci_devices_op);
 537 }
 538 static struct file_operations proc_bus_pci_dev_operations = {
 539         open:           proc_bus_pci_dev_open,
 540         read:           seq_read,
 541         llseek:         seq_lseek,
 542         release:        seq_release,
 543 };
 544 static int proc_pci_open(struct inode *inode, struct file *file)
 545 {
 546         return seq_open(file, &proc_pci_op);
 547 }
 548 static struct file_operations proc_pci_operations = {
 549         open:           proc_pci_open,
 550         read:           seq_read,
 551         llseek:         seq_lseek,
 552         release:        seq_release,
 553 };
 554
 555 static int __init pci_proc_init(void)
 556 {
 557         if (pci_present()) {
 558                 struct proc_dir_entry *entry;
 559                 struct pci_dev *dev;
 560                 proc_bus_pci_dir = proc_mkdir("pci", proc_bus);
 561                 entry = create_proc_entry("devices", 0, proc_bus_pci_dir);
 562                 if (entry)
 563                         entry->proc_fops = &proc_bus_pci_dev_operations;
 564                 pci_for_each_dev(dev) {
 565                         pci_proc_attach_device(dev);
 566                 }
 567                 entry = create_proc_entry("pci", 0, NULL);
 568                 if (entry)
 569                         entry->proc_fops = &proc_pci_operations;
 570         }
 571         return 0;
 572 }
 573
 574 __initcall(pci_proc_init);