Merge from vendor branch NCURSES:
[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.7 2004/05/19 22:52:39 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 cdevsw smb_cdevsw = {
98         /* name */      "smb",
99         /* maj */       CDEV_MAJOR,
100         /* flags */     0,
101         /* port */      NULL,
102         /* clone */     NULL,
103
104         /* open */      smbopen,
105         /* close */     smbclose,
106         /* read */      smbread,
107         /* write */     smbwrite,
108         /* ioctl */     smbioctl,
109         /* poll */      nopoll,
110         /* mmap */      nommap,
111         /* strategy */  nostrategy,
112         /* dump */      nodump,
113         /* psize */     nopsize
114 };
115
116 /*
117  * smbprobe()
118  */
119 static int
120 smb_probe(device_t dev)
121 {
122         struct smb_softc *sc = (struct smb_softc *)device_get_softc(dev);
123
124         sc->sc_addr = smbus_get_addr(dev);
125
126         /* XXX detect chip with start/stop conditions */
127
128         return (0);
129 }
130         
131 /*
132  * smbattach()
133  */
134 static int
135 smb_attach(device_t dev)
136 {
137         cdevsw_add(&smb_cdevsw, -1, device_get_unit(dev));
138         make_dev(&smb_cdevsw, device_get_unit(dev),     /* XXX cleanup */
139                         UID_ROOT, GID_WHEEL,
140                         0600, "smb%d", device_get_unit(dev));
141         return (0);
142 }
143
144 static int
145 smbopen (dev_t dev, int flags, int fmt, struct thread *td)
146 {
147         struct smb_softc *sc = IIC_SOFTC(minor(dev));
148
149         if (!sc)
150                 return (EINVAL);
151
152         if (sc->sc_count)
153                 return (EBUSY);
154
155         sc->sc_count++;
156
157         return (0);
158 }
159
160 static int
161 smbclose(dev_t dev, int flags, int fmt, struct thread *td)
162 {
163         struct smb_softc *sc = IIC_SOFTC(minor(dev));
164
165         if (!sc)
166                 return (EINVAL);
167
168         if (!sc->sc_count)
169                 return (EINVAL);
170
171         sc->sc_count--;
172
173         return (0);
174 }
175
176 static int
177 smbwrite(dev_t dev, struct uio * uio, int ioflag)
178 {
179         /* not supported */
180
181         return (EINVAL);
182 }
183
184 static int
185 smbread(dev_t dev, struct uio * uio, int ioflag)
186 {
187         /* not supported */
188
189         return (EINVAL);
190 }
191
192 static int
193 smbioctl(dev_t dev, u_long cmd, caddr_t data, int flags, struct thread *td)
194 {
195         device_t smbdev = IIC_DEVICE(minor(dev));
196         struct smb_softc *sc = IIC_SOFTC(minor(dev));
197         device_t parent = device_get_parent(smbdev);
198
199         int error = 0;
200         struct smbcmd *s = (struct smbcmd *)data;
201
202         if (!sc || !s)
203                 return (EINVAL);
204
205         /* allocate the bus */
206         if ((error = smbus_request_bus(parent, smbdev,
207                         (flags & O_NONBLOCK) ? SMB_DONTWAIT : (SMB_WAIT | SMB_INTR))))
208                 return (error);
209
210         switch (cmd) {
211         case SMB_QUICK_WRITE:
212                 error = smbus_error(smbus_quick(parent, s->slave, SMB_QWRITE));
213                 break;
214
215         case SMB_QUICK_READ:
216                 error = smbus_error(smbus_quick(parent, s->slave, SMB_QREAD));
217                 break;
218
219         case SMB_SENDB:
220                 error = smbus_error(smbus_sendb(parent, s->slave, s->cmd));
221                 break;
222
223         case SMB_RECVB:
224                 error = smbus_error(smbus_recvb(parent, s->slave, &s->cmd));
225                 break;
226
227         case SMB_WRITEB:
228                 error = smbus_error(smbus_writeb(parent, s->slave, s->cmd,
229                                                 s->data.byte));
230                 break;
231
232         case SMB_WRITEW:
233                 error = smbus_error(smbus_writew(parent, s->slave,
234                                                 s->cmd, s->data.word));
235                 break;
236
237         case SMB_READB:
238                 if (s->data.byte_ptr)
239                         error = smbus_error(smbus_readb(parent, s->slave,
240                                                 s->cmd, s->data.byte_ptr));
241                 break;
242
243         case SMB_READW:
244                 if (s->data.word_ptr)
245                         error = smbus_error(smbus_readw(parent, s->slave,
246                                                 s->cmd, s->data.word_ptr));
247                 break;
248
249         case SMB_PCALL:
250                 if (s->data.process.rdata)
251                         error = smbus_error(smbus_pcall(parent, s->slave, s->cmd,
252                                 s->data.process.sdata, s->data.process.rdata));
253                 break;
254
255         case SMB_BWRITE:
256                 if (s->count && s->data.byte_ptr)
257                         error = smbus_error(smbus_bwrite(parent, s->slave,
258                                                 s->cmd, s->count, s->data.byte_ptr));
259                 break;
260
261         case SMB_BREAD:
262                 if (s->count && s->data.byte_ptr)
263                         error = smbus_error(smbus_bread(parent, s->slave,
264                                                 s->cmd, s->count, s->data.byte_ptr));
265                 break;
266                 
267         default:
268                 error = ENODEV;
269         }
270
271         /* release the bus */
272         smbus_release_bus(parent, smbdev);
273
274         return (error);
275 }
276
277 DRIVER_MODULE(smb, smbus, smb_driver, smb_devclass, 0, 0);