merge Linus head tree into my drm tree and fix up conflicts
[linux-2.6] / drivers / char / drm / ffb_drv.c
1 /* $Id: ffb_drv.c,v 1.16 2001/10/18 16:00:24 davem Exp $
2  * ffb_drv.c: Creator/Creator3D direct rendering driver.
3  *
4  * Copyright (C) 2000 David S. Miller (davem@redhat.com)
5  */
6
7 #include <linux/config.h>
8 #include "ffb.h"
9 #include "drmP.h"
10
11 #include "ffb_drv.h"
12
13 #include <linux/sched.h>
14 #include <linux/smp_lock.h>
15 #include <asm/shmparam.h>
16 #include <asm/oplib.h>
17 #include <asm/upa.h>
18
19 #define DRIVER_AUTHOR           "David S. Miller"
20
21 #define DRIVER_NAME             "ffb"
22 #define DRIVER_DESC             "Creator/Creator3D"
23 #define DRIVER_DATE             "20000517"
24
25 #define DRIVER_MAJOR            0
26 #define DRIVER_MINOR            0
27 #define DRIVER_PATCHLEVEL       1
28
29 typedef struct _ffb_position_t {
30         int node;
31         int root;
32 } ffb_position_t;
33
34 static ffb_position_t *ffb_position;
35
36 static void get_ffb_type(ffb_dev_priv_t * ffb_priv, int instance)
37 {
38         volatile unsigned char *strap_bits;
39         unsigned char val;
40
41         strap_bits = (volatile unsigned char *)
42             (ffb_priv->card_phys_base + 0x00200000UL);
43
44         /* Don't ask, you have to read the value twice for whatever
45          * reason to get correct contents.
46          */
47         val = upa_readb(strap_bits);
48         val = upa_readb(strap_bits);
49         switch (val & 0x78) {
50         case (0x0 << 5) | (0x0 << 3):
51                 ffb_priv->ffb_type = ffb1_prototype;
52                 printk("ffb%d: Detected FFB1 pre-FCS prototype\n", instance);
53                 break;
54         case (0x0 << 5) | (0x1 << 3):
55                 ffb_priv->ffb_type = ffb1_standard;
56                 printk("ffb%d: Detected FFB1\n", instance);
57                 break;
58         case (0x0 << 5) | (0x3 << 3):
59                 ffb_priv->ffb_type = ffb1_speedsort;
60                 printk("ffb%d: Detected FFB1-SpeedSort\n", instance);
61                 break;
62         case (0x1 << 5) | (0x0 << 3):
63                 ffb_priv->ffb_type = ffb2_prototype;
64                 printk("ffb%d: Detected FFB2/vertical pre-FCS prototype\n",
65                        instance);
66                 break;
67         case (0x1 << 5) | (0x1 << 3):
68                 ffb_priv->ffb_type = ffb2_vertical;
69                 printk("ffb%d: Detected FFB2/vertical\n", instance);
70                 break;
71         case (0x1 << 5) | (0x2 << 3):
72                 ffb_priv->ffb_type = ffb2_vertical_plus;
73                 printk("ffb%d: Detected FFB2+/vertical\n", instance);
74                 break;
75         case (0x2 << 5) | (0x0 << 3):
76                 ffb_priv->ffb_type = ffb2_horizontal;
77                 printk("ffb%d: Detected FFB2/horizontal\n", instance);
78                 break;
79         case (0x2 << 5) | (0x2 << 3):
80                 ffb_priv->ffb_type = ffb2_horizontal;
81                 printk("ffb%d: Detected FFB2+/horizontal\n", instance);
82                 break;
83         default:
84                 ffb_priv->ffb_type = ffb2_vertical;
85                 printk("ffb%d: Unknown boardID[%08x], assuming FFB2\n",
86                        instance, val);
87                 break;
88         };
89 }
90
91 static void ffb_apply_upa_parent_ranges(int parent,
92                                         struct linux_prom64_registers *regs)
93 {
94         struct linux_prom64_ranges ranges[PROMREG_MAX];
95         char name[128];
96         int len, i;
97
98         prom_getproperty(parent, "name", name, sizeof(name));
99         if (strcmp(name, "upa") != 0)
100                 return;
101
102         len =
103             prom_getproperty(parent, "ranges", (void *)ranges, sizeof(ranges));
104         if (len <= 0)
105                 return;
106
107         len /= sizeof(struct linux_prom64_ranges);
108         for (i = 0; i < len; i++) {
109                 struct linux_prom64_ranges *rng = &ranges[i];
110                 u64 phys_addr = regs->phys_addr;
111
112                 if (phys_addr >= rng->ot_child_base &&
113                     phys_addr < (rng->ot_child_base + rng->or_size)) {
114                         regs->phys_addr -= rng->ot_child_base;
115                         regs->phys_addr += rng->ot_parent_base;
116                         return;
117                 }
118         }
119
120         return;
121 }
122
123 static int ffb_init_one(drm_device_t * dev, int prom_node, int parent_node,
124                         int instance)
125 {
126         struct linux_prom64_registers regs[2 * PROMREG_MAX];
127         ffb_dev_priv_t *ffb_priv = (ffb_dev_priv_t *) dev->dev_private;
128         int i;
129
130         ffb_priv->prom_node = prom_node;
131         if (prom_getproperty(ffb_priv->prom_node, "reg",
132                              (void *)regs, sizeof(regs)) <= 0) {
133                 return -EINVAL;
134         }
135         ffb_apply_upa_parent_ranges(parent_node, &regs[0]);
136         ffb_priv->card_phys_base = regs[0].phys_addr;
137         ffb_priv->regs = (ffb_fbcPtr)
138             (regs[0].phys_addr + 0x00600000UL);
139         get_ffb_type(ffb_priv, instance);
140         for (i = 0; i < FFB_MAX_CTXS; i++)
141                 ffb_priv->hw_state[i] = NULL;
142
143         return 0;
144 }
145
146 static drm_map_t *ffb_find_map(struct file *filp, unsigned long off)
147 {
148         drm_file_t *priv = filp->private_data;
149         drm_device_t *dev;
150         drm_map_list_t *r_list;
151         struct list_head *list;
152         drm_map_t *map;
153
154         if (!priv || (dev = priv->dev) == NULL)
155                 return NULL;
156
157         list_for_each(list, &dev->maplist->head) {
158                 r_list = (drm_map_list_t *) list;
159                 map = r_list->map;
160                 if (!map)
161                         continue;
162                 if (r_list->user_token == off)
163                         return map;
164         }
165
166         return NULL;
167 }
168
169 unsigned long ffb_get_unmapped_area(struct file *filp,
170                                     unsigned long hint,
171                                     unsigned long len,
172                                     unsigned long pgoff, unsigned long flags)
173 {
174         drm_map_t *map = ffb_find_map(filp, pgoff << PAGE_SHIFT);
175         unsigned long addr = -ENOMEM;
176
177         if (!map)
178                 return get_unmapped_area(NULL, hint, len, pgoff, flags);
179
180         if (map->type == _DRM_FRAME_BUFFER || map->type == _DRM_REGISTERS) {
181 #ifdef HAVE_ARCH_FB_UNMAPPED_AREA
182                 addr = get_fb_unmapped_area(filp, hint, len, pgoff, flags);
183 #else
184                 addr = get_unmapped_area(NULL, hint, len, pgoff, flags);
185 #endif
186         } else if (map->type == _DRM_SHM && SHMLBA > PAGE_SIZE) {
187                 unsigned long slack = SHMLBA - PAGE_SIZE;
188
189                 addr = get_unmapped_area(NULL, hint, len + slack, pgoff, flags);
190                 if (!(addr & ~PAGE_MASK)) {
191                         unsigned long kvirt = (unsigned long)map->handle;
192
193                         if ((kvirt & (SHMLBA - 1)) != (addr & (SHMLBA - 1))) {
194                                 unsigned long koff, aoff;
195
196                                 koff = kvirt & (SHMLBA - 1);
197                                 aoff = addr & (SHMLBA - 1);
198                                 if (koff < aoff)
199                                         koff += SHMLBA;
200
201                                 addr += (koff - aoff);
202                         }
203                 }
204         } else {
205                 addr = get_unmapped_area(NULL, hint, len, pgoff, flags);
206         }
207
208         return addr;
209 }
210
211 static int ffb_presetup(drm_device_t * dev)
212 {
213         ffb_dev_priv_t *ffb_priv;
214         int ret = 0;
215         int i = 0;
216
217         /* Check for the case where no device was found. */
218         if (ffb_position == NULL)
219                 return -ENODEV;
220
221         /* code used to use numdevs no numdevs anymore */
222         ffb_priv = kmalloc(sizeof(ffb_dev_priv_t), GFP_KERNEL);
223         if (!ffb_priv)
224                 return -ENOMEM;
225         memset(ffb_priv, 0, sizeof(*ffb_priv));
226         dev->dev_private = ffb_priv;
227
228         ret = ffb_init_one(dev, ffb_position[i].node, ffb_position[i].root, i);
229         return ret;
230 }
231
232 static void ffb_driver_release(drm_device_t * dev, struct file *filp)
233 {
234         ffb_dev_priv_t *fpriv = (ffb_dev_priv_t *) dev->dev_private;
235         int context = _DRM_LOCKING_CONTEXT(dev->lock.hw_lock->lock);
236         int idx;
237
238         idx = context - 1;
239         if (fpriv &&
240             context != DRM_KERNEL_CONTEXT && fpriv->hw_state[idx] != NULL) {
241                 kfree(fpriv->hw_state[idx]);
242                 fpriv->hw_state[idx] = NULL;
243         }
244 }
245
246 static void ffb_driver_pretakedown(drm_device_t * dev)
247 {
248         if (dev->dev_private)
249                 kfree(dev->dev_private);
250 }
251
252 static int ffb_driver_postcleanup(drm_device_t * dev)
253 {
254         if (ffb_position != NULL)
255                 kfree(ffb_position);
256         return 0;
257 }
258
259 static void ffb_driver_kernel_context_switch_unlock(struct drm_device *dev,
260                                                     drm_lock_t * lock)
261 {
262         dev->lock.filp = 0;
263         {
264                 __volatile__ unsigned int *plock = &dev->lock.hw_lock->lock;
265                 unsigned int old, new, prev, ctx;
266
267                 ctx = lock->context;
268                 do {
269                         old = *plock;
270                         new = ctx;
271                         prev = cmpxchg(plock, old, new);
272                 } while (prev != old);
273         }
274         wake_up_interruptible(&dev->lock.lock_queue);
275 }
276
277 static unsigned long ffb_driver_get_map_ofs(drm_map_t * map)
278 {
279         return (map->offset & 0xffffffff);
280 }
281
282 static unsigned long ffb_driver_get_reg_ofs(drm_device_t * dev)
283 {
284         ffb_dev_priv_t *ffb_priv = (ffb_dev_priv_t *) dev->dev_private;
285
286         if (ffb_priv)
287                 return ffb_priv->card_phys_base;
288
289         return 0;
290 }
291
292 static int postinit(struct drm_device *dev, unsigned long flags)
293 {
294         DRM_INFO("Initialized %s %d.%d.%d %s on minor %d\n",
295                  DRIVER_NAME,
296                  DRIVER_MAJOR,
297                  DRIVER_MINOR, DRIVER_PATCHLEVEL, DRIVER_DATE, dev->minor);
298         return 0;
299 }
300
301 static int version(drm_version_t * version)
302 {
303         int len;
304
305         version->version_major = DRIVER_MAJOR;
306         version->version_minor = DRIVER_MINOR;
307         version->version_patchlevel = DRIVER_PATCHLEVEL;
308         DRM_COPY(version->name, DRIVER_NAME);
309         DRM_COPY(version->date, DRIVER_DATE);
310         DRM_COPY(version->desc, DRIVER_DESC);
311         return 0;
312 }
313
314 static drm_ioctl_desc_t ioctls[] = {
315
316 };
317
318 static struct drm_driver driver = {
319         .driver_features = 0,
320         .dev_priv_size = sizeof(u32),
321         .release = ffb_driver_release,
322         .presetup = ffb_presetup,
323         .pretakedown = ffb_driver_pretakedown,
324         .postcleanup = ffb_driver_postcleanup,
325         .kernel_context_switch = ffb_driver_context_switch,
326         .kernel_context_switch_unlock = ffb_driver_kernel_context_switch_unlock,
327         .get_map_ofs = ffb_driver_get_map_ofs,
328         .get_reg_ofs = ffb_driver_get_reg_ofs,
329         .postinit = postinit,
330         .version = version,
331         .ioctls = ioctls,
332         .num_ioctls = DRM_ARRAY_SIZE(ioctls),
333         .fops = {
334                  .owner = THIS_MODULE,
335                  .open = drm_open,
336                  .release = drm_release,
337                  .ioctl = drm_ioctl,
338                  .mmap = drm_mmap,
339                  .poll = drm_poll,
340                  .fasync = drm_fasync,
341                  }
342         ,
343 };
344
345 static int __init ffb_init(void)
346 {
347         return -ENODEV;
348 }
349
350 static void __exit ffb_exit(void)
351 {
352 }
353
354 module_init(ffb_init);
355 module_exit(ffb_exit);
356
357 MODULE_AUTHOR(DRIVER_AUTHOR);
358 MODULE_DESCRIPTION(DRIVER_DESC);
359 MODULE_LICENSE("GPL and additional rights");