/* *	$Id: proc.c,v 1.2 1999/04/18 19:08:12 mj Exp $ * *	The PCI Library -- Configuration Access via /proc/bus/pci * *	Copyright (c) 1997--1999 Martin Mares <mj@atrey.karlin.mff.cuni.cz> * *	Can be freely distributed and used under the terms of the GNU GPL. */#define _GNU_SOURCE#include <stdio.h>#include <string.h>#include <unistd.h>#include <errno.h>#include <fcntl.h>#include <sys/types.h>#include "internal.h"#include <asm/unistd.h>#if defined(__GLIBC__) && __GLIBC__ == 2 && __GLIBC_MINOR__ < 1#include <syscall-list.h>#endif/* * As libc doesn't support pread/pwrite yet, we have to call them directly * or use lseek/read/write instead. */#if !(defined(__GLIBC__) && __GLIBC__ == 2 && __GLIBC_MINOR__ > 0)#if defined(__GLIBC__) && !(defined(__powerpc__) && __GLIBC__ == 2 && __GLIBC_MINOR__ == 0)#ifndef SYS_pread#define SYS_pread __NR_pread#endifstatic intpread(unsigned int fd, void *buf, size_t size, loff_t where){  return syscall(SYS_pread, fd, buf, size, where);}#ifndef SYS_pwrite#define SYS_pwrite __NR_pwrite#endifstatic intpwrite(unsigned int fd, void *buf, size_t size, loff_t where){  return syscall(SYS_pwrite, fd, buf, size, where);}#elsestatic _syscall4(int, pread, unsigned int, fd, void *, buf, size_t, size, loff_t, where);static _syscall4(int, pwrite, unsigned int, fd, void *, buf, size_t, size, loff_t, where);#endif#endifstatic voidproc_config(struct pci_access *a){  a->method_params[PCI_ACCESS_PROC_BUS_PCI] = PATH_PROC_BUS_PCI;}static intproc_detect(struct pci_access *a){  char *name = a->method_params[PCI_ACCESS_PROC_BUS_PCI];  if (access(name, R_OK))    {      a->warning("Cannot open %s", name);      return 0;    }  a->debug("...using %s", name);  return 1;}static voidproc_init(struct pci_access *a){  a->fd = -1;}static voidproc_cleanup(struct pci_access *a){  if (a->fd >= 0)    {      close(a->fd);      a->fd = -1;    }}static voidproc_scan(struct pci_access *a){  FILE *f;  char buf[256];  if (snprintf(buf, sizeof(buf), "%s/devices", a->method_params[PCI_ACCESS_PROC_BUS_PCI]) == sizeof(buf))    a->error("File name too long");  f = fopen(buf, "r");  if (!f)    a->error("Cannot open %s", buf);  while (fgets(buf, sizeof(buf)-1, f))    {      struct pci_dev *d = pci_alloc_dev(a);      unsigned int dfn, vend;      sscanf(buf,#ifdef HAVE_64BIT_ADDRESS	     "%x %x %x %llx %llx %llx %llx %llx %llx %llx",#else	     "%x %x %x %lx %lx %lx %lx %lx %lx %lx",#endif	     &dfn,	     &vend,	     &d->irq,	     &d->base_addr[0],	     &d->base_addr[1],	     &d->base_addr[2],	     &d->base_addr[3],	     &d->base_addr[4],	     &d->base_addr[5],	     &d->rom_base_addr);      d->bus = dfn >> 8U;      d->dev = PCI_SLOT(dfn & 0xff);      d->func = PCI_FUNC(dfn & 0xff);      d->vendor_id = vend >> 16U;      d->device_id = vend & 0xffff;      d->known_fields = a->buscentric ? PCI_FILL_IDENT				      : (PCI_FILL_IDENT | PCI_FILL_IRQ | PCI_FILL_BASES | PCI_FILL_ROM_BASE);      pci_link_dev(a, d);    }  fclose(f);}static intproc_setup(struct pci_dev *d, int rw){  struct pci_access *a = d->access;  if (a->cached_dev != d || a->fd_rw < rw)    {      char buf[256];      if (a->fd >= 0)	close(a->fd);      if (snprintf(buf, sizeof(buf), "%s/%02x/%02x.%d", a->method_params[PCI_ACCESS_PROC_BUS_PCI],		   d->bus, d->dev, d->func) == sizeof(buf))	a->error("File name too long");      a->fd_rw = a->writeable || rw;      a->fd = open(buf, a->fd_rw ? O_RDWR : O_RDONLY);      if (a->fd < 0)	a->warning("Cannot open %s", buf);      a->cached_dev = d;    }  return a->fd;}static intproc_read(struct pci_dev *d, int pos, byte *buf, int len){  int fd = proc_setup(d, 0);  int res;  if (fd < 0)    return 0;  res = pread(fd, buf, len, pos);  if (res < 0)    {      d->access->warning("proc_read: read failed: %s", strerror(errno));      return 0;    }  else if (res != len)    {      d->access->warning("proc_read: tried to read %d bytes at %d, but got only %d", len, pos, res);      return 0;    }  return 1;}static intproc_write(struct pci_dev *d, int pos, byte *buf, int len){  int fd = proc_setup(d, 1);  int res;  if (fd < 0)    return 0;  res = pwrite(fd, buf, len, pos);  if (res < 0)    {      d->access->warning("proc_write: write failed: %s", strerror(errno));      return 0;    }  else if (res != len)    {      d->access->warning("proc_write: tried to write %d bytes at %d, but got only %d", len, pos, res);      return 0;    }  return 1;}static voidproc_cleanup_dev(struct pci_dev *d){  if (d->access->cached_dev == d)    d->access->cached_dev = NULL;}struct pci_methods pm_linux_proc = {  "/proc/bus/pci",  proc_config,  proc_detect,  proc_init,  proc_cleanup,  proc_scan,  pci_generic_fill_info,  proc_read,  proc_write,  NULL,					/* init_dev */  proc_cleanup_dev};