Subversion Repositories Kolibri OS

#include 

#include 

#include 

#include 

#include 

#define IORESOURCE_PCI_FIXED            (1<<4)  /* Do not move resource */

 * Translate the low bits of the PCI base

 * to the resource type

 */

static inline unsigned int pci_calc_resource_flags(unsigned int flags)

{

    if (flags & PCI_BASE_ADDRESS_SPACE_IO)

        return IORESOURCE_IO;

        return IORESOURCE_MEM | IORESOURCE_PREFETCH;

}

{

    u32_t size = mask & maxbase;      /* Find the significant bits */

        return 0;

       from that the extent.  */

    size = (size & ~(size-1)) - 1;

       already been programmed with all 1s.  */

    if (base == maxbase && ((base | size) & mask) != mask)

        return 0;

}

{

    u64_t size = mask & maxbase;      /* Find the significant bits */

        return 0;

       from that the extent.  */

    size = (size & ~(size-1)) - 1;

       already been programmed with all 1s.  */

    if (base == maxbase && ((base | size) & mask) != mask)

        return 0;

}

{

    if ((mask & (PCI_BASE_ADDRESS_SPACE|PCI_BASE_ADDRESS_MEM_TYPE_MASK)) ==

        (PCI_BASE_ADDRESS_SPACE_MEMORY|PCI_BASE_ADDRESS_MEM_TYPE_64))

        return 1;

    return 0;

}

{

    u32_t  pos, reg, next;

    u32_t  l, sz;

    struct resource *res;

    {

        u64_t  l64;

        u64_t  sz64;

        u32_t  raw_sz;

        l = PciRead32(dev->busnr, dev->devfn, reg);

        PciWrite32(dev->busnr, dev->devfn, reg, ~0);

        sz = PciRead32(dev->busnr, dev->devfn, reg);

        PciWrite32(dev->busnr, dev->devfn, reg, l);

            continue;

            l = 0;

        if ((l & PCI_BASE_ADDRESS_SPACE) ==

                        PCI_BASE_ADDRESS_SPACE_MEMORY)

        {

            sz = pci_size(l, sz, (u32_t)PCI_BASE_ADDRESS_MEM_MASK);

            /*

             * For 64bit prefetchable memory sz could be 0, if the

             * real size is bigger than 4G, so we need to check

             * szhi for that.

             */

            if (!is_64bit_memory(l) && !sz)

                    continue;

            res->start = l & PCI_BASE_ADDRESS_MEM_MASK;

            res->flags |= l & ~PCI_BASE_ADDRESS_MEM_MASK;

        }

        else {

            sz = pci_size(l, sz, PCI_BASE_ADDRESS_IO_MASK & 0xffff);

            if (!sz)

                continue;

            res->start = l & PCI_BASE_ADDRESS_IO_MASK;

            res->flags |= l & ~PCI_BASE_ADDRESS_IO_MASK;

        }

        res->end = res->start + (unsigned long) sz;

        res->flags |= pci_calc_resource_flags(l);

        if (is_64bit_memory(l))

        {

            u32_t szhi, lhi;

            PciWrite32(dev->busnr, dev->devfn, reg+4, ~0);

            szhi = PciRead32(dev->busnr, dev->devfn, reg+4);

            PciWrite32(dev->busnr, dev->devfn, reg+4, lhi);

            sz64 = ((u64_t)szhi << 32) | raw_sz;

            l64 = ((u64_t)lhi << 32) | l;

            sz64 = pci_size64(l64, sz64, PCI_BASE_ADDRESS_MEM_MASK);

            next++;

            if (!sz64) {

                res->start = 0;

                res->end = 0;

                res->flags = 0;

                continue;

            }

            res->start = l64 & PCI_BASE_ADDRESS_MEM_MASK;

            res->end = res->start + sz64;

#else

            if (sz64 > 0x100000000ULL) {

                printk(KERN_ERR "PCI: Unable to handle 64-bit "

                                "BAR for device %s\n", pci_name(dev));

                res->start = 0;

                res->flags = 0;

            }

            else if (lhi)

            {

                /* 64-bit wide address, treat as disabled */

                PciWrite32(dev->busnr, dev->devfn, reg,

                        l & ~(u32_t)PCI_BASE_ADDRESS_MEM_MASK);

                PciWrite32(dev->busnr, dev->devfn, reg+4, 0);

                res->start = 0;

                res->end = sz;

            }

#endif

        }

    }

    {

        dev->rom_base_reg = rom;

        res = &dev->resource[PCI_ROM_RESOURCE];

        PciWrite32(dev->busnr, dev->devfn, rom, ~PCI_ROM_ADDRESS_ENABLE);

        sz = PciRead32(dev->busnr, dev->devfn, rom);

        PciWrite32(dev->busnr, dev->devfn, rom, l);

            l = 0;

        {

            sz = pci_size(l, sz, (u32_t)PCI_ROM_ADDRESS_MASK);

            {

                res->flags = (l & IORESOURCE_ROM_ENABLE) |

                                  IORESOURCE_MEM | IORESOURCE_PREFETCH |

                                  IORESOURCE_READONLY | IORESOURCE_CACHEABLE;

                res->start = l & PCI_ROM_ADDRESS_MASK;

                res->end = res->start + (unsigned long) sz;

            }

        }

    }

}

{

    u8_t irq;

    dev->pin = irq;

    if (irq)

        PciRead8(dev->busnr, dev->devfn, PCI_INTERRUPT_LINE);

    dev->irq = irq;

};

{

    u32_t  class;

    dev->revision = class & 0xff;

    class >>= 8;                                /* upper 3 bytes */

    dev->class = class;

//    dev->current_state = PCI_UNKNOWN;

 //   pci_fixup_device(pci_fixup_early, dev);

    class = dev->class >> 8;

    {

        case PCI_HEADER_TYPE_NORMAL:                /* standard header */

            if (class == PCI_CLASS_BRIDGE_PCI)

                goto bad;

            pci_read_irq(dev);

            pci_read_bases(dev, 6, PCI_ROM_ADDRESS);

            dev->subsystem_vendor = PciRead16(dev->busnr, dev->devfn,PCI_SUBSYSTEM_VENDOR_ID);

            dev->subsystem_device = PciRead16(dev->busnr, dev->devfn, PCI_SUBSYSTEM_ID);

             *      Do the ugly legacy mode stuff here rather than broken chip

             *      quirk code. Legacy mode ATA controllers have fixed

             *      addresses. These are not always echoed in BAR0-3, and

             *      BAR0-3 in a few cases contain junk!

             */

            if (class == PCI_CLASS_STORAGE_IDE)

            {

                u8_t progif;

                if ((progif & 1) == 0)

                {

                    dev->resource[0].start = 0x1F0;

                    dev->resource[0].end = 0x1F7;

                    dev->resource[0].flags = LEGACY_IO_RESOURCE;

                    dev->resource[1].start = 0x3F6;

                    dev->resource[1].end = 0x3F6;

                    dev->resource[1].flags = LEGACY_IO_RESOURCE;

                }

                if ((progif & 4) == 0)

                {

                    dev->resource[2].start = 0x170;

                    dev->resource[2].end = 0x177;

                    dev->resource[2].flags = LEGACY_IO_RESOURCE;

                    dev->resource[3].start = 0x376;

                    dev->resource[3].end = 0x376;

                    dev->resource[3].flags = LEGACY_IO_RESOURCE;

                };

            }

            break;

                if (class != PCI_CLASS_BRIDGE_PCI)

                        goto bad;

                /* The PCI-to-PCI bridge spec requires that subtractive

                   decoding (i.e. transparent) bridge must have programming

                   interface code of 0x01. */

                pci_read_irq(dev);

                dev->transparent = ((dev->class & 0xff) == 1);

                pci_read_bases(dev, 2, PCI_ROM_ADDRESS1);

                break;

                if (class != PCI_CLASS_BRIDGE_CARDBUS)

                        goto bad;

                pci_read_irq(dev);

                pci_read_bases(dev, 1, 0);

                dev->subsystem_vendor = PciRead16(dev->busnr,

                                                  dev->devfn,

                                                  PCI_CB_SUBSYSTEM_VENDOR_ID);

                                                  dev->devfn,

                                                  PCI_CB_SUBSYSTEM_ID);

                break;

                printk(KERN_ERR "PCI: device %s has unknown header type %02x, ignoring.\n",

                        pci_name(dev), dev->hdr_type);

                return -1;

                printk(KERN_ERR "PCI: %s: class %x doesn't match header type %02x. Ignoring class.\n",

                       pci_name(dev), class, dev->hdr_type);

                dev->class = PCI_CLASS_NOT_DEFINED;

    }

};

{

    pci_dev_t  *dev;

    u8_t    hdr;

    if (id == 0xffffffff || id == 0x00000000 ||

        id == 0x0000ffff || id == 0xffff0000)

        return NULL;

    {

        timeout *= 2;

        if (timeout > 60 * 100)

        {

            printk(KERN_WARNING "Device %04x:%02x:%02x.%d not "

                   "responding\n", bus,PCI_SLOT(devfn),PCI_FUNC(devfn));

            return NULL;

        }

    };

        return NULL;

    dev->pci_dev.devfn    = devfn;

    dev->pci_dev.hdr_type = hdr & 0x7f;

    dev->pci_dev.multifunction    = !!(hdr & 0x80);

    dev->pci_dev.vendor   = id & 0xffff;

    dev->pci_dev.device   = (id >> 16) & 0xffff;

{

    int  func, nr = 0;

    {

        pci_dev_t  *dev;

        if( dev )

        {

            list_add(&dev->link, &devices);

             * If this is a single function device,

             * don't scan past the first function.

             */

            if (!dev->pci_dev.multifunction)

            {

                if (func > 0) {

                    dev->pci_dev.multifunction = 1;

                }

                else {

                    break;

                }

             }

        }

        else {

            if (func == 0)

                break;

        }

    };

};

{

    u32_t devfn;

    pci_dev_t *dev;

        pci_scan_slot(bus, devfn);

{

    pci_dev_t  *dev;

    u32_t       last_bus;

    u32_t       bus = 0 , devfn = 0;

        return -1;

        pci_scan_bus(bus);

//        &dev->link != &devices;

//        dev = (dev_t*)dev->link.next)

//    {

//        dbgprintf("PCI device %x:%x bus:%x devfn:%x\n",

//                dev->pci_dev.vendor,

//                dev->pci_dev.device,

//                dev->pci_dev.bus,

//                dev->pci_dev.devfn);

//

//    }

    return 0;

}

                   u8 pos, int cap, int *ttl)

{

    u8 id;

        pos = PciRead8(bus, devfn, pos);

        if (pos < 0x40)

            break;

        pos &= ~3;

        id = PciRead8(bus, devfn, pos + PCI_CAP_LIST_ID);

        if (id == 0xff)

            break;

        if (id == cap)

            return pos;

        pos += PCI_CAP_LIST_NEXT;

    }

    return 0;

}

                   u8 pos, int cap)

{

    int ttl = PCI_FIND_CAP_TTL;

}

                    unsigned int devfn, u8 hdr_type)

{

    u16 status;

    if (!(status & PCI_STATUS_CAP_LIST))

        return 0;

    case PCI_HEADER_TYPE_NORMAL:

    case PCI_HEADER_TYPE_BRIDGE:

        return PCI_CAPABILITY_LIST;

    case PCI_HEADER_TYPE_CARDBUS:

        return PCI_CB_CAPABILITY_LIST;

    default:

        return 0;

    }

}

{

    int pos;

    if (pos)

        pos = __pci_find_next_cap(dev->busnr, dev->devfn, pos, cap);

}

{

    u16_t cmd, old_cmd;

    int  idx;

    struct resource *r;

    old_cmd = cmd;

    for (idx = 0; idx < PCI_NUM_RESOURCES; idx++)

    {

        /* Only set up the requested stuff */

        if (!(mask & (1 << idx)))

                continue;

        if (!(r->flags & (IORESOURCE_IO | IORESOURCE_MEM)))

                continue;

        if ((idx == PCI_ROM_RESOURCE) &&

                        (!(r->flags & IORESOURCE_ROM_ENABLE)))

                continue;

        if (!r->start && r->end) {

                printk(KERN_ERR "PCI: Device %s not available "

                        "because of resource %d collisions\n",

                        pci_name(dev), idx);

                return -EINVAL;

        }

        if (r->flags & IORESOURCE_IO)

                cmd |= PCI_COMMAND_IO;

        if (r->flags & IORESOURCE_MEM)

                cmd |= PCI_COMMAND_MEMORY;

    }

    if (cmd != old_cmd) {

        printk("PCI: Enabling device %s (%04x -> %04x)\n",

                pci_name(dev), old_cmd, cmd);

        PciWrite16(dev->busnr, dev->devfn, PCI_COMMAND, cmd);

    }

    return 0;

}

{

        int err;

                return err;

//                return pcibios_enable_irq(dev);

        return 0;

}

{

        int err;

//        if (err < 0 && err != -EIO)

//                return err;

        err = pcibios_enable_device(dev, bars);

//        if (err < 0)

//                return err;

//        pci_fixup_device(pci_fixup_enable, dev);

}

                                     resource_size_t flags)

{

        int err;

        int i, bars = 0;

//                return 0;               /* already enabled */

                if (dev->resource[i].flags & flags)

                        bars |= (1 << i);

//        if (err < 0)

//                atomic_dec(&dev->enable_cnt);

        return err;

}

 * pci_enable_device - Initialize device before it's used by a driver.

 * @dev: PCI device to be initialized

 *

 *  Initialize device before it's used by a driver. Ask low-level code

 *  to enable I/O and memory. Wake up the device if it was suspended.

 *  Beware, this function can fail.

 *

 *  Note we don't actually enable the device many times if we call

 *  this function repeatedly (we just increment the count).

 */

int pci_enable_device(struct pci_dev *dev)

{

        return __pci_enable_device_flags(dev, IORESOURCE_MEM | IORESOURCE_IO);

}

{

    pci_dev_t *dev;

    struct pci_device_id *ent;

        &dev->link != &devices;

        dev = (pci_dev_t*)dev->link.next)

    {

        if( dev->pci_dev.vendor != idlist->vendor )

            continue;

        {

            if(unlikely(ent->device == dev->pci_dev.device))

            {

                pdev->pci_dev = dev->pci_dev;

                return  ent;

            }

        };

    }

    return NULL;

};

 * pci_map_rom - map a PCI ROM to kernel space

 * @pdev: pointer to pci device struct

 * @size: pointer to receive size of pci window over ROM

 * @return: kernel virtual pointer to image of ROM

 *

 * Map a PCI ROM into kernel space. If ROM is boot video ROM,

 * the shadow BIOS copy will be returned instead of the

 * actual ROM.

 */

#define OS_BASE   0x80000000

{

    struct resource *res = &pdev->resource[PCI_ROM_RESOURCE];

    u32_t start;

    void  *rom;

#endif

    rom = NULL;

    memcpy(tmp,(char*)(OS_BASE+legacyBIOSLocation), 32);

    *size = tmp[2] * 512;

    if (*size > 0x10000 )

    {

        *size = 0;

        dbgprintf("Invalid BIOS length field\n");

    }

    else

        rom = (void*)( OS_BASE+legacyBIOSLocation);

}

pci_set_dma_mask(struct pci_dev *dev, u64 mask)

{

//        if (!pci_dma_supported(dev, mask))

//                return -EIO;

}