Merge from vendor branch NTPD:
[dragonfly.git] / sys / bus / iicbus / iic.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/iicbus/iic.c,v 1.18 1999/11/18 05:43:32 peter Exp $
27  * $DragonFly: src/sys/bus/iicbus/iic.c,v 1.7 2004/05/19 22:52:38 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 "iiconf.h"
44 #include "iicbus.h"
45
46 #include <machine/iic.h>
47
48 #include "iicbus_if.h"
49
50 #define BUFSIZE 1024
51
52 struct iic_softc {
53
54         u_char sc_addr;                 /* address on iicbus */
55         int sc_count;                   /* >0 if device opened */
56
57         char sc_buffer[BUFSIZE];        /* output buffer */
58         char sc_inbuf[BUFSIZE];         /* input buffer */
59 };
60
61 #define IIC_SOFTC(unit) \
62         ((struct iic_softc *)devclass_get_softc(iic_devclass, (unit)))
63
64 #define IIC_DEVICE(unit) \
65         (devclass_get_device(iic_devclass, (unit)))
66
67 static int iic_probe(device_t);
68 static int iic_attach(device_t);
69
70 static devclass_t iic_devclass;
71
72 static device_method_t iic_methods[] = {
73         /* device interface */
74         DEVMETHOD(device_probe,         iic_probe),
75         DEVMETHOD(device_attach,        iic_attach),
76
77         /* iicbus interface */
78         DEVMETHOD(iicbus_intr,          iicbus_generic_intr),
79
80         { 0, 0 }
81 };
82
83 static driver_t iic_driver = {
84         "iic",
85         iic_methods,
86         sizeof(struct iic_softc),
87 };
88
89 static  d_open_t        iicopen;
90 static  d_close_t       iicclose;
91 static  d_write_t       iicwrite;
92 static  d_read_t        iicread;
93 static  d_ioctl_t       iicioctl;
94
95 #define CDEV_MAJOR 105
96 static struct cdevsw iic_cdevsw = {
97         /* name */      "iic",
98         /* maj */       CDEV_MAJOR,
99         /* flags */     0,
100         /* port */      NULL,
101         /* clone */     NULL,
102
103         /* open */      iicopen,
104         /* close */     iicclose,
105         /* read */      iicread,
106         /* write */     iicwrite,
107         /* ioctl */     iicioctl,
108         /* poll */      nopoll,
109         /* mmap */      nommap,
110         /* strategy */  nostrategy,
111         /* dump */      nodump,
112         /* psize */     nopsize
113 };
114
115 /*
116  * iicprobe()
117  */
118 static int
119 iic_probe(device_t dev)
120 {
121         struct iic_softc *sc = (struct iic_softc *)device_get_softc(dev);
122
123         sc->sc_addr = iicbus_get_addr(dev);
124
125         /* XXX detect chip with start/stop conditions */
126
127         return (0);
128 }
129         
130 /*
131  * iicattach()
132  */
133 static int
134 iic_attach(device_t dev)
135 {
136         cdevsw_add(&iic_cdevsw, -1, device_get_unit(dev));
137         make_dev(&iic_cdevsw, device_get_unit(dev),     /* XXX cleanup */
138                         UID_ROOT, GID_WHEEL,
139                         0600, "iic%d", device_get_unit(dev));
140         return (0);
141 }
142
143 static int
144 iicopen (dev_t dev, int flags, int fmt, struct thread *td)
145 {
146         struct iic_softc *sc = IIC_SOFTC(minor(dev));
147
148         if (!sc)
149                 return (EINVAL);
150
151         if (sc->sc_count > 0)
152                 return (EBUSY);
153
154         sc->sc_count++;
155
156         return (0);
157 }
158
159 static int
160 iicclose(dev_t dev, int flags, int fmt, struct thread *td)
161 {
162         struct iic_softc *sc = IIC_SOFTC(minor(dev));
163
164         if (!sc)
165                 return (EINVAL);
166
167         if (!sc->sc_count)
168                 return (EINVAL);
169
170         sc->sc_count--;
171
172         if (sc->sc_count < 0)
173                 panic("%s: iic_count < 0!", __FUNCTION__);
174
175         return (0);
176 }
177
178 static int
179 iicwrite(dev_t dev, struct uio * uio, int ioflag)
180 {
181         device_t iicdev = IIC_DEVICE(minor(dev));
182         struct iic_softc *sc = IIC_SOFTC(minor(dev));
183         int sent, error, count;
184
185         if (!sc || !iicdev)
186                 return (EINVAL);
187
188         if (sc->sc_count == 0)
189                 return (EINVAL);
190
191         if ((error = iicbus_request_bus(device_get_parent(iicdev), iicdev, IIC_DONTWAIT)))
192                 return (error);
193
194         count = min(uio->uio_resid, BUFSIZE);
195         uiomove(sc->sc_buffer, count, uio);
196
197         error = iicbus_block_write(device_get_parent(iicdev), sc->sc_addr,
198                                         sc->sc_buffer, count, &sent);
199
200         iicbus_release_bus(device_get_parent(iicdev), iicdev);
201
202         return(error);
203 }
204
205 static int
206 iicread(dev_t dev, struct uio * uio, int ioflag)
207 {
208         device_t iicdev = IIC_DEVICE(minor(dev));
209         struct iic_softc *sc = IIC_SOFTC(minor(dev));
210         int len, error = 0;
211         int bufsize;
212
213         if (!sc || !iicdev)
214                 return (EINVAL);
215
216         if (sc->sc_count == 0)
217                 return (EINVAL);
218
219         if ((error = iicbus_request_bus(device_get_parent(iicdev), iicdev, IIC_DONTWAIT)))
220                 return (error);
221
222         /* max amount of data to read */
223         len = min(uio->uio_resid, BUFSIZE);
224
225         if ((error = iicbus_block_read(device_get_parent(iicdev), sc->sc_addr,
226                                         sc->sc_inbuf, len, &bufsize)))
227                 return (error);
228
229         if (bufsize > uio->uio_resid)
230                 panic("%s: too much data read!", __FUNCTION__);
231
232         iicbus_release_bus(device_get_parent(iicdev), iicdev);
233
234         return (uiomove(sc->sc_inbuf, bufsize, uio));
235 }
236
237 static int
238 iicioctl(dev_t dev, u_long cmd, caddr_t data, int flags, struct thread *td)
239 {
240         device_t iicdev = IIC_DEVICE(minor(dev));
241         struct iic_softc *sc = IIC_SOFTC(minor(dev));
242         device_t parent = device_get_parent(iicdev);
243         struct iiccmd *s = (struct iiccmd *)data;
244         int error, count;
245
246         if (!sc)
247                 return (EINVAL);
248
249         if ((error = iicbus_request_bus(device_get_parent(iicdev), iicdev,
250                         (flags & O_NONBLOCK) ? IIC_DONTWAIT :
251                                                 (IIC_WAIT | IIC_INTR))))
252                 return (error);
253
254         switch (cmd) {
255         case I2CSTART:
256                 error = iicbus_start(parent, s->slave, 0);
257                 break;
258
259         case I2CSTOP:
260                 error = iicbus_stop(parent);
261                 break;
262
263         case I2CRSTCARD:
264                 error = iicbus_reset(parent, 0, 0, NULL);
265                 break;
266
267         case I2CWRITE:
268                 error = iicbus_write(parent, s->buf, s->count, &count, 0);
269                 break;
270
271         case I2CREAD:
272                 error = iicbus_read(parent, s->buf, s->count, &count, s->last, 0);
273                 break;
274
275         default:
276                 error = ENODEV;
277         }
278
279         iicbus_release_bus(device_get_parent(iicdev), iicdev);
280
281         return (error);
282 }
283
284 DRIVER_MODULE(iic, iicbus, iic_driver, iic_devclass, 0, 0);