Debug message fixes.
[people/xl0/gpxe.git] / src / drivers / bus / mca.c
1 /*
2  * MCA bus driver code
3  *
4  * Abstracted from 3c509.c.
5  *
6  */
7
8 #include "string.h"
9 #include "io.h"
10 #include "console.h"
11 #include "mca.h"
12
13 /*
14  * Increment a bus_loc structure to the next possible MCA location.
15  * Leave the structure zeroed and return 0 if there are no more valid
16  * locations.
17  *
18  */
19 static int mca_next_location ( struct bus_loc *bus_loc ) {
20         struct mca_loc *mca_loc = ( struct mca_loc * ) bus_loc;
21         
22         /*
23          * Ensure that there is sufficient space in the shared bus
24          * structures for a struct mca_loc and a struct
25          * mca_dev, as mandated by bus.h.
26          *
27          */
28         BUS_LOC_CHECK ( struct mca_loc );
29         BUS_DEV_CHECK ( struct mca_device );
30
31         return ( mca_loc->slot = ( ++mca_loc->slot & MCA_MAX_SLOT_NR ) );
32 }
33
34 /*
35  * Fill in parameters for an MCA device based on slot number
36  *
37  */
38 static int mca_fill_device ( struct bus_dev *bus_dev,
39                              struct bus_loc *bus_loc ) {
40         struct mca_loc *mca_loc = ( struct mca_loc * ) bus_loc;
41         struct mca_device *mca = ( struct mca_device * ) bus_dev;
42         unsigned int i, seen_non_ff;
43
44         /* Store slot in struct mca, set default values */
45         mca->slot = mca_loc->slot;
46         mca->name = "?";
47
48         /* Make sure motherboard setup is off */
49         outb_p ( 0xff, MCA_MOTHERBOARD_SETUP_REG );
50
51         /* Select the slot */
52         outb_p ( 0x8 | ( mca->slot & 0xf ), MCA_ADAPTER_SETUP_REG );
53
54         /* Read the POS registers */
55         seen_non_ff = 0;
56         for ( i = 0 ; i < ( sizeof ( mca->pos ) / sizeof ( mca->pos[0] ) ) ;
57               i++ ) {
58                 mca->pos[i] = inb_p ( MCA_POS_REG ( i ) );
59                 if ( mca->pos[i] != 0xff )
60                         seen_non_ff = 1;
61         }
62         
63         /* If all POS registers are 0xff, this means there's no device
64          * present
65          */
66         if ( ! seen_non_ff )
67                 return 0;
68
69         /* Kill all setup modes */
70         outb_p ( 0, MCA_ADAPTER_SETUP_REG );
71
72         DBG ( "MCA found slot %d id %hx "
73               "(POS %hhx:%hhx:%hhx:%hhx:%hhx:%hhx:%hhx:%hhx)\n",
74               mca->slot, MCA_ID ( mca ),
75               mca->pos[0], mca->pos[1], mca->pos[2], mca->pos[3],
76               mca->pos[4], mca->pos[5], mca->pos[6], mca->pos[7] );
77
78         return 1;
79 }
80
81 /*
82  * Test whether or not a driver is capable of driving the device.
83  *
84  */
85 static int mca_check_driver ( struct bus_dev *bus_dev,
86                               struct device_driver *device_driver ) {
87         struct mca_device *mca = ( struct mca_device * ) bus_dev;
88         struct mca_driver *driver
89                 = ( struct mca_driver * ) device_driver->bus_driver_info;
90         unsigned int i;
91
92         /* Compare against driver's ID list */
93         for ( i = 0 ; i < driver->id_count ; i++ ) {
94                 struct mca_id *id = &driver->ids[i];
95                 
96                 if ( MCA_ID ( mca ) == id->id ) {
97                         DBG ( "MCA found ID %hx (device %s) "
98                               "matching driver %s\n",
99                               id->name, id->id, device_driver->name );
100                         mca->name = id->name;
101                         return 1;
102                 }
103         }
104
105         /* No device found */
106         return 0;
107 }
108
109 /*
110  * Describe an MCA device
111  *
112  */
113 static char * mca_describe ( struct bus_dev *bus_dev ) {
114         struct mca_device *mca = ( struct mca_device * ) bus_dev;
115         static char mca_description[] = "MCA 00";
116
117         sprintf ( mca_description + 4, "%hhx", mca->slot );
118         return mca_description;
119 }
120
121 /*
122  * Name an MCA device
123  *
124  */
125 static const char * mca_name ( struct bus_dev *bus_dev ) {
126         struct mca_device *mca = ( struct mca_device * ) bus_dev;
127         
128         return mca->name;
129 }
130
131 /*
132  * MCA bus operations table
133  *
134  */
135 struct bus_driver mca_driver __bus_driver = {
136         .next_location  = mca_next_location,
137         .fill_device    = mca_fill_device,
138         .check_driver   = mca_check_driver,
139         .describe       = mca_describe,
140         .name           = mca_name,
141 };
142
143 /*
144  * Fill in a nic structure
145  *
146  */
147 void mca_fill_nic ( struct nic *nic, struct mca_device *mca ) {
148
149         /* ioaddr and irqno must be read in a device-dependent way
150          * from the POS registers
151          */
152         nic->ioaddr = 0;
153         nic->irqno = 0;
154
155         /* Fill in DHCP device ID structure */
156         nic->dhcp_dev_id.bus_type = MCA_BUS_TYPE;
157         nic->dhcp_dev_id.vendor_id = htons ( GENERIC_MCA_VENDOR );
158         nic->dhcp_dev_id.device_id = htons ( MCA_ID ( mca ) );
159 }