Merge from vendor branch LIBARCHIVE:
[dragonfly.git] / sys / bus / smbus / smb.c
1 /*-
2  * Copyright (c) 1998 Nicolas Souchu
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD: src/sys/dev/smbus/smb.c,v 1.20 1999/11/18 05:44:56 peter Exp $
27  * $DragonFly: src/sys/bus/smbus/smb.c,v 1.9 2006/09/10 01:26:33 dillon Exp $
28  *
29  */
30 #include <sys/param.h>
31 #include <sys/kernel.h>
32 #include <sys/systm.h>
33 #include <sys/module.h>
34 #include <sys/bus.h>
35 #include <sys/conf.h>
36 #include <sys/buf.h>
37 #include <sys/uio.h>
38 #include <sys/malloc.h>
39 #include <sys/fcntl.h>
40
41 #include <machine/clock.h>
42
43 #include "smbconf.h"
44 #include "smbus.h"
45 #include <machine/smb.h>
46
47 #include "smbus_if.h"
48
49 #define BUFSIZE 1024
50
51 struct smb_softc {
52
53         int sc_addr;                    /* address on smbus */
54         int sc_count;                   /* >0 if device opened */
55
56         char *sc_cp;                    /* output buffer pointer */
57
58         char sc_buffer[BUFSIZE];        /* output buffer */
59         char sc_inbuf[BUFSIZE];         /* input buffer */
60 };
61
62 #define IIC_SOFTC(unit) \
63         ((struct smb_softc *)devclass_get_softc(smb_devclass, (unit)))
64
65 #define IIC_DEVICE(unit) \
66         (devclass_get_device(smb_devclass, (unit)))
67
68 static int smb_probe(device_t);
69 static int smb_attach(device_t);
70
71 static devclass_t smb_devclass;
72
73 static device_method_t smb_methods[] = {
74         /* device interface */
75         DEVMETHOD(device_probe,         smb_probe),
76         DEVMETHOD(device_attach,        smb_attach),
77
78         /* smbus interface */
79         DEVMETHOD(smbus_intr,           smbus_generic_intr),
80
81         { 0, 0 }
82 };
83
84 static driver_t smb_driver = {
85         "smb",
86         smb_methods,
87         sizeof(struct smb_softc),
88 };
89
90 static  d_open_t        smbopen;
91 static  d_close_t       smbclose;
92 static  d_write_t       smbwrite;
93 static  d_read_t        smbread;
94 static  d_ioctl_t       smbioctl;
95
96 #define CDEV_MAJOR 106
97 static struct dev_ops smb_ops = {
98         { "smb", CDEV_MAJOR, 0 },
99         .d_open =       smbopen,
100         .d_close =      smbclose,
101         .d_read =       smbread,
102         .d_write =      smbwrite,
103         .d_ioctl =      smbioctl,
104 };
105
106 /*
107  * smbprobe()
108  */
109 static int
110 smb_probe(device_t dev)
111 {
112         struct smb_softc *sc = (struct smb_softc *)device_get_softc(dev);
113
114         sc->sc_addr = smbus_get_addr(dev);
115
116         /* XXX detect chip with start/stop conditions */
117
118         return (0);
119 }
120         
121 /*
122  * smbattach()
123  */
124 static int
125 smb_attach(device_t dev)
126 {
127         dev_ops_add(&smb_ops, -1, device_get_unit(dev));
128         make_dev(&smb_ops, device_get_unit(dev),        /* XXX cleanup */
129                         UID_ROOT, GID_WHEEL,
130                         0600, "smb%d", device_get_unit(dev));
131         return (0);
132 }
133
134 static int
135 smbopen (struct dev_open_args *ap)
136 {
137         cdev_t dev = ap->a_head.a_dev;
138         struct smb_softc *sc = IIC_SOFTC(minor(dev));
139
140         if (!sc)
141                 return (EINVAL);
142
143         if (sc->sc_count)
144                 return (EBUSY);
145
146         sc->sc_count++;
147
148         return (0);
149 }
150
151 static int
152 smbclose(struct dev_close_args *ap)
153 {
154         cdev_t dev = ap->a_head.a_dev;
155         struct smb_softc *sc = IIC_SOFTC(minor(dev));
156
157         if (!sc)
158                 return (EINVAL);
159
160         if (!sc->sc_count)
161                 return (EINVAL);
162
163         sc->sc_count--;
164
165         return (0);
166 }
167
168 static int
169 smbwrite(struct dev_write_args *ap)
170 {
171         return (EINVAL);
172 }
173
174 static int
175 smbread(struct dev_read_args *ap)
176 {
177         return (EINVAL);
178 }
179
180 static int
181 smbioctl(struct dev_ioctl_args *ap)
182 {
183         cdev_t dev = ap->a_head.a_dev;
184         device_t smbdev = IIC_DEVICE(minor(dev));
185         struct smb_softc *sc = IIC_SOFTC(minor(dev));
186         device_t parent = device_get_parent(smbdev);
187
188         int error = 0;
189         struct smbcmd *s = (struct smbcmd *)ap->a_data;
190
191         if (!sc || !s)
192                 return (EINVAL);
193
194         /* allocate the bus */
195         if ((error = smbus_request_bus(parent, smbdev,
196                         (ap->a_fflag & O_NONBLOCK) ? SMB_DONTWAIT : (SMB_WAIT | SMB_INTR))))
197                 return (error);
198
199         switch (ap->a_cmd) {
200         case SMB_QUICK_WRITE:
201                 error = smbus_error(smbus_quick(parent, s->slave, SMB_QWRITE));
202                 break;
203
204         case SMB_QUICK_READ:
205                 error = smbus_error(smbus_quick(parent, s->slave, SMB_QREAD));
206                 break;
207
208         case SMB_SENDB:
209                 error = smbus_error(smbus_sendb(parent, s->slave, s->cmd));
210                 break;
211
212         case SMB_RECVB:
213                 error = smbus_error(smbus_recvb(parent, s->slave, &s->cmd));
214                 break;
215
216         case SMB_WRITEB:
217                 error = smbus_error(smbus_writeb(parent, s->slave, s->cmd,
218                                                 s->data.byte));
219                 break;
220
221         case SMB_WRITEW:
222                 error = smbus_error(smbus_writew(parent, s->slave,
223                                                 s->cmd, s->data.word));
224                 break;
225
226         case SMB_READB:
227                 if (s->data.byte_ptr)
228                         error = smbus_error(smbus_readb(parent, s->slave,
229                                                 s->cmd, s->data.byte_ptr));
230                 break;
231
232         case SMB_READW:
233                 if (s->data.word_ptr)
234                         error = smbus_error(smbus_readw(parent, s->slave,
235                                                 s->cmd, s->data.word_ptr));
236                 break;
237
238         case SMB_PCALL:
239                 if (s->data.process.rdata)
240                         error = smbus_error(smbus_pcall(parent, s->slave, s->cmd,
241                                 s->data.process.sdata, s->data.process.rdata));
242                 break;
243
244         case SMB_BWRITE:
245                 if (s->count && s->data.byte_ptr)
246                         error = smbus_error(smbus_bwrite(parent, s->slave,
247                                                 s->cmd, s->count, s->data.byte_ptr));
248                 break;
249
250         case SMB_BREAD:
251                 if (s->count && s->data.byte_ptr)
252                         error = smbus_error(smbus_bread(parent, s->slave,
253                                                 s->cmd, s->count, s->data.byte_ptr));
254                 break;
255                 
256         default:
257                 error = ENODEV;
258         }
259
260         /* release the bus */
261         smbus_release_bus(parent, smbdev);
262
263         return (error);
264 }
265
266 DRIVER_MODULE(smb, smbus, smb_driver, smb_devclass, 0, 0);