1 /*
2 * MCA bus driver code
3 *
4 * Abstracted from 3c509.c.
5 *
6 */
7
8 FILE_LICENCE ( BSD2 );
9
10 #include <stdint.h>
11 #include <string.h>
12 #include <stdlib.h>
13 #include <stdio.h>
14 #include <errno.h>
15 #include <gpxe/io.h>
16 #include <gpxe/mca.h>
17
18 static void mcabus_remove ( struct root_device *rootdev );
19
20 /**
21 * Probe an MCA device
22 *
23 * @v mca MCA device
24 * @ret rc Return status code
25 *
26 * Searches for a driver for the MCA device. If a driver is found,
27 * its probe() routine is called.
28 */
mca_probe(struct mca_device * mca)29 static int mca_probe ( struct mca_device *mca ) {
30 struct mca_driver *driver;
31 struct mca_device_id *id;
32 unsigned int i;
33 int rc;
34
35 DBG ( "Adding MCA slot %02x (ID %04x POS "
36 "%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x)\n",
37 mca->slot, MCA_ID ( mca ),
38 mca->pos[0], mca->pos[1], mca->pos[2], mca->pos[3],
39 mca->pos[4], mca->pos[5], mca->pos[6], mca->pos[7] );
40
41 for_each_table_entry ( driver, MCA_DRIVERS ) {
42 for ( i = 0 ; i < driver->id_count ; i++ ) {
43 id = &driver->ids[i];
44 if ( id->id != MCA_ID ( mca ) )
45 continue;
46 mca->driver = driver;
47 mca->driver_name = id->name;
48 DBG ( "...using driver %s\n", mca->driver_name );
49 if ( ( rc = driver->probe ( mca, id ) ) != 0 ) {
50 DBG ( "......probe failed\n" );
51 continue;
52 }
53 return 0;
54 }
55 }
56
57 DBG ( "...no driver found\n" );
58 return -ENOTTY;
59 }
60
61 /**
62 * Remove an MCA device
63 *
64 * @v mca MCA device
65 */
mca_remove(struct mca_device * mca)66 static void mca_remove ( struct mca_device *mca ) {
67 mca->driver->remove ( mca );
68 DBG ( "Removed MCA device %02x\n", mca->slot );
69 }
70
71 /**
72 * Probe MCA root bus
73 *
74 * @v rootdev MCA bus root device
75 *
76 * Scans the MCA bus for devices and registers all devices it can
77 * find.
78 */
mcabus_probe(struct root_device * rootdev)79 static int mcabus_probe ( struct root_device *rootdev ) {
80 struct mca_device *mca = NULL;
81 unsigned int slot;
82 int seen_non_ff;
83 unsigned int i;
84 int rc;
85
86 for ( slot = 0 ; slot <= MCA_MAX_SLOT_NR ; slot++ ) {
87 /* Allocate struct mca_device */
88 if ( ! mca )
89 mca = malloc ( sizeof ( *mca ) );
90 if ( ! mca ) {
91 rc = -ENOMEM;
92 goto err;
93 }
94 memset ( mca, 0, sizeof ( *mca ) );
95 mca->slot = slot;
96
97 /* Make sure motherboard setup is off */
98 outb_p ( 0xff, MCA_MOTHERBOARD_SETUP_REG );
99
100 /* Select the slot */
101 outb_p ( 0x8 | ( mca->slot & 0xf ), MCA_ADAPTER_SETUP_REG );
102
103 /* Read the POS registers */
104 seen_non_ff = 0;
105 for ( i = 0 ; i < ( sizeof ( mca->pos ) /
106 sizeof ( mca->pos[0] ) ) ; i++ ) {
107 mca->pos[i] = inb_p ( MCA_POS_REG ( i ) );
108 if ( mca->pos[i] != 0xff )
109 seen_non_ff = 1;
110 }
111
112 /* Kill all setup modes */
113 outb_p ( 0, MCA_ADAPTER_SETUP_REG );
114
115 /* If all POS registers are 0xff, this means there's no device
116 * present
117 */
118 if ( ! seen_non_ff )
119 continue;
120
121 /* Add to device hierarchy */
122 snprintf ( mca->dev.name, sizeof ( mca->dev.name ),
123 "MCA%02x", slot );
124 mca->dev.desc.bus_type = BUS_TYPE_MCA;
125 mca->dev.desc.vendor = GENERIC_MCA_VENDOR;
126 mca->dev.desc.device = MCA_ID ( mca );
127 mca->dev.parent = &rootdev->dev;
128 list_add ( &mca->dev.siblings, &rootdev->dev.children );
129 INIT_LIST_HEAD ( &mca->dev.children );
130
131 /* Look for a driver */
132 if ( mca_probe ( mca ) == 0 ) {
133 /* mcadev registered, we can drop our ref */
134 mca = NULL;
135 } else {
136 /* Not registered; re-use struct */
137 list_del ( &mca->dev.siblings );
138 }
139 }
140
141 free ( mca );
142 return 0;
143
144 err:
145 free ( mca );
146 mcabus_remove ( rootdev );
147 return rc;
148 }
149
150 /**
151 * Remove MCA root bus
152 *
153 * @v rootdev MCA bus root device
154 */
mcabus_remove(struct root_device * rootdev)155 static void mcabus_remove ( struct root_device *rootdev ) {
156 struct mca_device *mca;
157 struct mca_device *tmp;
158
159 list_for_each_entry_safe ( mca, tmp, &rootdev->dev.children,
160 dev.siblings ) {
161 mca_remove ( mca );
162 list_del ( &mca->dev.siblings );
163 free ( mca );
164 }
165 }
166
167 /** MCA bus root device driver */
168 static struct root_driver mca_root_driver = {
169 .probe = mcabus_probe,
170 .remove = mcabus_remove,
171 };
172
173 /** MCA bus root device */
174 struct root_device mca_root_device __root_device = {
175 .dev = { .name = "MCA" },
176 .driver = &mca_root_driver,
177 };
178