nfsmb.c revision 1.5 1 /* $NetBSD: nfsmb.c,v 1.5 2007/08/27 15:57:13 xtraeme Exp $ */
2 /*
3 * Copyright (c) 2007 KIYOHARA Takashi
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
17 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
18 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
19 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
20 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
21 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
23 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
24 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
25 * POSSIBILITY OF SUCH DAMAGE.
26 *
27 */
28 #include <sys/cdefs.h>
29 __KERNEL_RCSID(0, "$NetBSD: nfsmb.c,v 1.5 2007/08/27 15:57:13 xtraeme Exp $");
30
31 #include <sys/param.h>
32 #include <sys/device.h>
33 #include <sys/errno.h>
34 #include <sys/kernel.h>
35 #include <sys/rwlock.h>
36 #include <sys/proc.h>
37
38 #include <machine/bus.h>
39
40 #include <dev/i2c/i2cvar.h>
41
42 #include <dev/pci/pcivar.h>
43 #include <dev/pci/pcireg.h>
44 #include <dev/pci/pcidevs.h>
45
46 #include <dev/pci/nfsmbreg.h>
47
48
49 struct nfsmbc_attach_args {
50 int nfsmb_num;
51 bus_space_tag_t nfsmb_iot;
52 int nfsmb_addr;
53 };
54
55 struct nfsmb_softc;
56 struct nfsmbc_softc {
57 struct device sc_dev;
58
59 pci_chipset_tag_t sc_pc;
60 pcitag_t sc_tag;
61 struct pci_attach_args *sc_pa;
62
63 bus_space_tag_t sc_iot;
64 struct device *sc_nfsmb[2];
65 };
66
67 struct nfsmb_softc {
68 struct device sc_dev;
69 int sc_num;
70 struct device *sc_nfsmbc;
71
72 bus_space_tag_t sc_iot;
73 bus_space_handle_t sc_ioh;
74
75 struct i2c_controller sc_i2c; /* i2c controller info */
76 krwlock_t sc_rwlock;
77 };
78
79
80 static int nfsmbc_match(struct device *, struct cfdata *, void *);
81 static void nfsmbc_attach(struct device *, struct device *, void *);
82 static int nfsmbc_print(void *, const char *);
83
84 static int nfsmb_match(struct device *, struct cfdata *, void *);
85 static void nfsmb_attach(struct device *, struct device *, void *);
86 static int nfsmb_acquire_bus(void *, int);
87 static void nfsmb_release_bus(void *, int);
88 static int nfsmb_exec(
89 void *, i2c_op_t, i2c_addr_t, const void *, size_t, void *, size_t, int);
90 static int nfsmb_check_done(struct nfsmb_softc *);
91 static int
92 nfsmb_send_1(struct nfsmb_softc *, uint8_t, i2c_addr_t, i2c_op_t, int);
93 static int nfsmb_write_1(
94 struct nfsmb_softc *, uint8_t, uint8_t, i2c_addr_t, i2c_op_t, int);
95 static int nfsmb_write_2(
96 struct nfsmb_softc *, uint8_t, uint16_t, i2c_addr_t, i2c_op_t, int);
97 static int nfsmb_receive_1(struct nfsmb_softc *, i2c_addr_t, i2c_op_t, int);
98 static int
99 nfsmb_read_1(struct nfsmb_softc *, uint8_t, i2c_addr_t, i2c_op_t, int);
100 static int
101 nfsmb_read_2(struct nfsmb_softc *, uint8_t, i2c_addr_t, i2c_op_t, int);
102
103
104 CFATTACH_DECL(nfsmbc, sizeof(struct nfsmbc_softc),
105 nfsmbc_match, nfsmbc_attach, NULL, NULL);
106
107 static int
108 nfsmbc_match(struct device *parent, struct cfdata *match, void *aux)
109 {
110 struct pci_attach_args *pa = aux;
111
112 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_NVIDIA) {
113 switch (PCI_PRODUCT(pa->pa_id)) {
114 case PCI_PRODUCT_NVIDIA_NFORCE2_SMBUS:
115 case PCI_PRODUCT_NVIDIA_NFORCE2_400_SMBUS:
116 case PCI_PRODUCT_NVIDIA_NFORCE3_SMBUS:
117 case PCI_PRODUCT_NVIDIA_NFORCE3_250_SMBUS:
118 case PCI_PRODUCT_NVIDIA_NFORCE4_SMBUS:
119 case PCI_PRODUCT_NVIDIA_MCP04_SMBUS:
120 return 1;
121 }
122 }
123
124 return 0;
125 }
126
127 static void
128 nfsmbc_attach(struct device *parent, struct device *self, void *aux)
129 {
130 struct nfsmbc_softc *sc = (struct nfsmbc_softc *) self;
131 struct pci_attach_args *pa = aux;
132 struct nfsmbc_attach_args nfsmbca;
133 pcireg_t reg;
134 char devinfo[256];
135
136 aprint_naive("\n");
137 pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo, sizeof(devinfo));
138 aprint_normal(": %s (rev. 0x%02x)\n", devinfo,
139 PCI_REVISION(pa->pa_class));
140
141 sc->sc_pc = pa->pa_pc;
142 sc->sc_tag = pa->pa_tag;
143 sc->sc_pa = pa;
144 sc->sc_iot = pa->pa_iot;
145
146 nfsmbca.nfsmb_iot = sc->sc_iot;
147
148 reg = pci_conf_read(pa->pa_pc, pa->pa_tag, NFORCE_SMB1);
149 nfsmbca.nfsmb_num = 1;
150 nfsmbca.nfsmb_addr = NFORCE_SMBBASE(reg);
151 sc->sc_nfsmb[0] = config_found(&sc->sc_dev, &nfsmbca, nfsmbc_print);
152
153 reg = pci_conf_read(pa->pa_pc, pa->pa_tag, NFORCE_SMB2);
154 nfsmbca.nfsmb_num = 2;
155 nfsmbca.nfsmb_addr = NFORCE_SMBBASE(reg);
156 sc->sc_nfsmb[1] = config_found(&sc->sc_dev, &nfsmbca, nfsmbc_print);
157 }
158
159 static int
160 nfsmbc_print(void *aux, const char *pnp)
161 {
162 struct nfsmbc_attach_args *nfsmbcap = aux;
163
164 if (pnp)
165 aprint_normal("nfsmb SMBus %d at %s",
166 nfsmbcap->nfsmb_num, pnp);
167 else
168 aprint_normal(" SMBus %d", nfsmbcap->nfsmb_num);
169 return UNCONF;
170 }
171
172
173 CFATTACH_DECL(nfsmb, sizeof(struct nfsmb_softc),
174 nfsmb_match, nfsmb_attach, NULL, NULL);
175
176 static int
177 nfsmb_match(struct device *parent, struct cfdata *match, void *aux)
178 {
179 struct nfsmbc_attach_args *nfsmbcap = aux;
180
181 if (nfsmbcap->nfsmb_num == 1 || nfsmbcap->nfsmb_num == 2)
182 return 1;
183 return 0;
184 }
185
186 static void
187 nfsmb_attach(struct device *parent, struct device *self, void *aux)
188 {
189 struct nfsmb_softc *sc = (struct nfsmb_softc *) self;
190 struct nfsmbc_attach_args *nfsmbcap = aux;
191 struct i2cbus_attach_args iba;
192
193 aprint_naive("\n");
194 aprint_normal("\n");
195
196 sc->sc_nfsmbc = parent;
197 sc->sc_num = nfsmbcap->nfsmb_num;
198 sc->sc_iot = nfsmbcap->nfsmb_iot;
199
200 /* register with iic */
201 sc->sc_i2c.ic_cookie = sc;
202 sc->sc_i2c.ic_acquire_bus = nfsmb_acquire_bus;
203 sc->sc_i2c.ic_release_bus = nfsmb_release_bus;
204 sc->sc_i2c.ic_send_start = NULL;
205 sc->sc_i2c.ic_send_stop = NULL;
206 sc->sc_i2c.ic_initiate_xfer = NULL;
207 sc->sc_i2c.ic_read_byte = NULL;
208 sc->sc_i2c.ic_write_byte = NULL;
209 sc->sc_i2c.ic_exec = nfsmb_exec;
210
211 rw_init(&sc->sc_rwlock);
212
213 if (bus_space_map(sc->sc_iot, nfsmbcap->nfsmb_addr, NFORCE_SMBSIZE, 0,
214 &sc->sc_ioh) != 0) {
215 aprint_error("%s: failed to map SMBus space\n",
216 sc->sc_dev.dv_xname);
217 return;
218 }
219
220 iba.iba_tag = &sc->sc_i2c;
221 (void) config_found_ia(&sc->sc_dev, "i2cbus", &iba, iicbus_print);
222 }
223
224 static int
225 nfsmb_acquire_bus(void *cookie, int flags)
226 {
227 struct nfsmb_softc *sc = cookie;
228
229 rw_enter(&sc->sc_rwlock, RW_WRITER);
230 return 0;
231 }
232
233 static void
234 nfsmb_release_bus(void *cookie, int flags)
235 {
236 struct nfsmb_softc *sc = cookie;
237
238 rw_exit(&sc->sc_rwlock);
239 }
240
241 static int
242 nfsmb_exec(void *cookie, i2c_op_t op, i2c_addr_t addr, const void *cmd,
243 size_t cmdlen, void *vbuf, size_t buflen, int flags)
244 {
245 struct nfsmb_softc *sc = (struct nfsmb_softc *)cookie;
246 uint8_t *p = vbuf;
247 int rv;
248
249 if (I2C_OP_READ_P(op) && (cmdlen == 0) && (buflen == 1)) {
250 rv = nfsmb_receive_1(sc, addr, op, flags);
251 if (rv == -1)
252 return -1;
253 *p = (uint8_t)rv;
254 return 0;
255 }
256
257 if ((I2C_OP_READ_P(op)) && (cmdlen == 1) && (buflen == 1)) {
258 rv = nfsmb_read_1(sc, *(const uint8_t*)cmd, addr, op, flags);
259 if (rv == -1)
260 return -1;
261 *p = (uint8_t)rv;
262 return 0;
263 }
264
265 if ((I2C_OP_READ_P(op)) && (cmdlen == 1) && (buflen == 2)) {
266 rv = nfsmb_read_2(sc, *(const uint8_t*)cmd, addr, op, flags);
267 if (rv == -1)
268 return -1;
269 *p = (uint8_t)rv;
270 return 0;
271 }
272
273 if ((I2C_OP_WRITE_P(op)) && (cmdlen == 0) && (buflen == 1))
274 return nfsmb_send_1(sc, *(uint8_t*)vbuf, addr, op, flags);
275
276 if ((I2C_OP_WRITE_P(op)) && (cmdlen == 1) && (buflen == 1))
277 return nfsmb_write_1(sc, *(const uint8_t*)cmd, *(uint8_t*)vbuf,
278 addr, op, flags);
279
280 if ((I2C_OP_WRITE_P(op)) && (cmdlen == 1) && (buflen == 2))
281 return nfsmb_write_2(sc,
282 *(const uint8_t*)cmd, *((uint16_t *)vbuf), addr, op, flags);
283
284 return -1;
285 }
286
287 static int
288 nfsmb_check_done(struct nfsmb_softc *sc)
289 {
290 int us;
291 uint8_t stat;
292
293 us = 10 * 1000; /* XXXX: wait maximum 10 msec */
294 do {
295 delay(10);
296 us -= 10;
297 if (us <= 0)
298 return -1;
299 } while (bus_space_read_1(sc->sc_iot, sc->sc_ioh,
300 NFORCE_SMB_PROTOCOL) != 0);
301
302 stat = bus_space_read_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_STATUS);
303 if ((stat & NFORCE_SMB_STATUS_DONE) &&
304 !(stat & NFORCE_SMB_STATUS_STATUS))
305 return 0;
306 return -1;
307 }
308
309 /* ARGSUSED */
310 static int
311 nfsmb_send_1(struct nfsmb_softc *sc, uint8_t val, i2c_addr_t addr, i2c_op_t op,
312 int flags)
313 {
314 uint8_t data;
315
316 /* store cmd */
317 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_COMMAND, val);
318
319 /* write smbus slave address to register */
320 data = addr << 1;
321 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_ADDRESS, data);
322
323 /* write smbus protocol to register */
324 data = I2C_OP_READ_P(op) | NFORCE_SMB_PROTOCOL_BYTE;
325 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_PROTOCOL, data);
326
327 return nfsmb_check_done(sc);
328 }
329
330 /* ARGSUSED */
331 static int
332 nfsmb_write_1(struct nfsmb_softc *sc, uint8_t cmd, uint8_t val, i2c_addr_t addr,
333 i2c_op_t op, int flags)
334 {
335 uint8_t data;
336
337 /* store cmd */
338 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_COMMAND, cmd);
339
340 /* store data */
341 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_DATA, val);
342
343 /* write smbus slave address to register */
344 data = addr << 1;
345 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_ADDRESS, data);
346
347 /* write smbus protocol to register */
348 data = I2C_OP_READ_P(op) | NFORCE_SMB_PROTOCOL_BYTE_DATA;
349 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_PROTOCOL, data);
350
351 return nfsmb_check_done(sc);
352 }
353
354 static int
355 nfsmb_write_2(struct nfsmb_softc *sc, uint8_t cmd, uint16_t val,
356 i2c_addr_t addr, i2c_op_t op, int flags)
357 {
358 uint8_t data, low, high;
359
360 /* store cmd */
361 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_COMMAND, cmd);
362
363 /* store data */
364 low = val;
365 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_DATA, low);
366 high = val >> 8;
367 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_DATA, high);
368
369 /* write smbus slave address to register */
370 data = addr << 1;
371 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_ADDRESS, data);
372
373 /* write smbus protocol to register */
374 data = I2C_OP_READ_P(op) | NFORCE_SMB_PROTOCOL_WORD_DATA;
375 if (flags & I2C_F_PEC)
376 data |= NFORCE_SMB_PROTOCOL_PEC;
377 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_PROTOCOL, data);
378
379 return nfsmb_check_done(sc);
380 }
381
382 /* ARGSUSED */
383 static int
384 nfsmb_receive_1(struct nfsmb_softc *sc, i2c_addr_t addr, i2c_op_t op, int flags)
385 {
386 uint8_t data;
387
388 /* write smbus slave address to register */
389 data = addr << 1;
390 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_ADDRESS, data);
391
392 /* write smbus protocol to register */
393 data = I2C_OP_READ_P(op) | NFORCE_SMB_PROTOCOL_BYTE;
394 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_PROTOCOL, data);
395
396 /* check for errors */
397 if (nfsmb_check_done(sc) < 0)
398 return -1;
399
400 /* read data */
401 return bus_space_read_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_DATA);
402 }
403
404 /* ARGSUSED */
405 static int
406 nfsmb_read_1(struct nfsmb_softc *sc, uint8_t cmd, i2c_addr_t addr, i2c_op_t op,
407 int flags)
408 {
409 uint8_t data;
410
411 /* store cmd */
412 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_COMMAND, cmd);
413
414 /* write smbus slave address to register */
415 data = addr << 1;
416 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_ADDRESS, data);
417
418 /* write smbus protocol to register */
419 data = I2C_OP_READ_P(op) | NFORCE_SMB_PROTOCOL_BYTE_DATA;
420 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_PROTOCOL, data);
421
422 /* check for errors */
423 if (nfsmb_check_done(sc) < 0)
424 return -1;
425
426 /* read data */
427 return bus_space_read_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_DATA);
428 }
429
430 static int
431 nfsmb_read_2(struct nfsmb_softc *sc, uint8_t cmd, i2c_addr_t addr, i2c_op_t op,
432 int flags)
433 {
434 uint8_t data, low, high;
435
436 /* store cmd */
437 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_COMMAND, cmd);
438
439 /* write smbus slave address to register */
440 data = addr << 1;
441 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_ADDRESS, data);
442
443 /* write smbus protocol to register */
444 data = I2C_OP_READ_P(op) | NFORCE_SMB_PROTOCOL_BYTE_DATA;
445 if (flags & I2C_F_PEC)
446 data |= NFORCE_SMB_PROTOCOL_PEC;
447 bus_space_write_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_PROTOCOL, data);
448
449 /* check for errors */
450 if (nfsmb_check_done(sc) < 0)
451 return -1;
452
453 /* read data */
454 low = bus_space_read_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_DATA);
455 high = bus_space_read_1(sc->sc_iot, sc->sc_ioh, NFORCE_SMB_DATA);
456 return low | high << 8;
457 }
458