#!/bin/sh

URL=http://www.wlug.org.nz/~perry/pci/pcilist.php
CHR=?

for i in /sys/bus/pci/devices/*; do
	CLASS=$(cat $i/class)
	CLASS=${CLASS%%??}
	CLASS=${CLASS##0x}

	VENDOR=$(cat $i/vendor)
	VENDOR=${VENDOR##0x}
	DEVICE=$(cat $i/device)
	DEVICE=${DEVICE##0x}

	SUBSYSTEM_VENDOR=$(cat $i/subsystem_vendor)
	SUBSYSTEM_VENDOR=${SUBSYSTEM_VENDOR##0x}
	SUBSYSTEM_DEVICE=$(cat $i/subsystem_device)
	SUBSYSTEM_DEVICE=${SUBSYSTEM_DEVICE##0x}
	URL="${URL}${CHR}id[]=$CLASS:${VENDOR}:${DEVICE}:${SUBSYSTEM_VENDOR}:${SUBSYSTEM_DEVICE}"
	CHR='&'
done
echo $URL