V4L/DVB (3697): More msp3400 and bttv fixes
[linux-2.6] / drivers / media / video / arv.c
1 /*
2  * Colour AR M64278(VGA) driver for Video4Linux
3  *
4  * Copyright (C) 2003   Takeo Takahashi <takahashi.takeo@renesas.com>
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version
9  * 2 of the License, or (at your option) any later version.
10  *
11  * Some code is taken from AR driver sample program for M3T-M32700UT.
12  *
13  * AR driver sample (M32R SDK):
14  *     Copyright (c) 2003 RENESAS TECHNOROGY CORPORATION
15  *     AND RENESAS SOLUTIONS CORPORATION
16  *     All Rights Reserved.
17  *
18  * 2003-09-01:  Support w3cam by Takeo Takahashi
19  */
20
21 #include <linux/config.h>
22 #include <linux/init.h>
23 #include <linux/devfs_fs_kernel.h>
24 #include <linux/module.h>
25 #include <linux/delay.h>
26 #include <linux/errno.h>
27 #include <linux/fs.h>
28 #include <linux/init.h>
29 #include <linux/kernel.h>
30 #include <linux/slab.h>
31 #include <linux/mm.h>
32 #include <linux/sched.h>
33 #include <linux/videodev.h>
34 #include <linux/mutex.h>
35
36 #include <asm/uaccess.h>
37 #include <asm/m32r.h>
38 #include <asm/io.h>
39 #include <asm/dma.h>
40 #include <asm/byteorder.h>
41
42 #if 0
43 #define DEBUG(n, args...) printk(args)
44 #define CHECK_LOST      1
45 #else
46 #define DEBUG(n, args...)
47 #define CHECK_LOST      0
48 #endif
49
50 /*
51  * USE_INT is always 0, interrupt mode is not available
52  * on linux due to lack of speed
53  */
54 #define USE_INT         0       /* Don't modify */
55
56 #define VERSION "0.03"
57
58 #define ar_inl(addr)            inl((unsigned long)(addr))
59 #define ar_outl(val, addr)      outl((unsigned long)(val),(unsigned long)(addr))
60
61 extern struct cpuinfo_m32r      boot_cpu_data;
62
63 /*
64  * CCD pixel size
65  *      Note that M32700UT does not support CIF mode, but QVGA is
66  *      supported by M32700UT hardware using VGA mode of AR LSI.
67  *
68  *      Supported: VGA  (Normal mode, Interlace mode)
69  *                 QVGA (Always Interlace mode of VGA)
70  *
71  */
72 #define AR_WIDTH_VGA            640
73 #define AR_HEIGHT_VGA           480
74 #define AR_WIDTH_QVGA           320
75 #define AR_HEIGHT_QVGA          240
76 #define MIN_AR_WIDTH            AR_WIDTH_QVGA
77 #define MIN_AR_HEIGHT           AR_HEIGHT_QVGA
78 #define MAX_AR_WIDTH            AR_WIDTH_VGA
79 #define MAX_AR_HEIGHT           AR_HEIGHT_VGA
80
81 /* bits & bytes per pixel */
82 #define AR_BITS_PER_PIXEL       16
83 #define AR_BYTES_PER_PIXEL      (AR_BITS_PER_PIXEL/8)
84
85 /* line buffer size */
86 #define AR_LINE_BYTES_VGA       (AR_WIDTH_VGA * AR_BYTES_PER_PIXEL)
87 #define AR_LINE_BYTES_QVGA      (AR_WIDTH_QVGA * AR_BYTES_PER_PIXEL)
88 #define MAX_AR_LINE_BYTES       AR_LINE_BYTES_VGA
89
90 /* frame size & type */
91 #define AR_FRAME_BYTES_VGA \
92         (AR_WIDTH_VGA * AR_HEIGHT_VGA * AR_BYTES_PER_PIXEL)
93 #define AR_FRAME_BYTES_QVGA \
94         (AR_WIDTH_QVGA * AR_HEIGHT_QVGA * AR_BYTES_PER_PIXEL)
95 #define MAX_AR_FRAME_BYTES \
96         (MAX_AR_WIDTH * MAX_AR_HEIGHT * AR_BYTES_PER_PIXEL)
97
98 #define AR_MAX_FRAME            15
99
100 /* capture size */
101 #define AR_SIZE_VGA             0
102 #define AR_SIZE_QVGA            1
103
104 /* capture mode */
105 #define AR_MODE_INTERLACE       0
106 #define AR_MODE_NORMAL          1
107
108 struct ar_device {
109         struct video_device *vdev;
110         unsigned int start_capture;     /* duaring capture in INT. mode. */
111 #if USE_INT
112         unsigned char *line_buff;       /* DMA line buffer */
113 #endif
114         unsigned char *frame[MAX_AR_HEIGHT];    /* frame data */
115         short size;                     /* capture size */
116         short mode;                     /* capture mode */
117         int width, height;
118         int frame_bytes, line_bytes;
119         wait_queue_head_t wait;
120         struct mutex lock;
121 };
122
123 static int video_nr = -1;       /* video device number (first free) */
124 static unsigned char    yuv[MAX_AR_FRAME_BYTES];
125
126 /* module parameters */
127 /* default frequency */
128 #define DEFAULT_FREQ    50      /* 50 or 75 (MHz) is available as BCLK */
129 static int freq = DEFAULT_FREQ; /* BCLK: available 50 or 70 (MHz) */
130 static int vga = 0;             /* default mode(0:QVGA mode, other:VGA mode) */
131 static int vga_interlace = 0;   /* 0 is normal mode for, else interlace mode */
132 module_param(freq, int, 0);
133 module_param(vga, int, 0);
134 module_param(vga_interlace, int, 0);
135
136 static int ar_initialize(struct video_device *dev);
137
138 static inline void wait_for_vsync(void)
139 {
140         while (ar_inl(ARVCR0) & ARVCR0_VDS)     /* wait for VSYNC */
141                 cpu_relax();
142         while (!(ar_inl(ARVCR0) & ARVCR0_VDS))  /* wait for VSYNC */
143                 cpu_relax();
144 }
145
146 static inline void wait_acknowledge(void)
147 {
148         int i;
149
150         for (i = 0; i < 1000; i++)
151                 cpu_relax();
152         while (ar_inl(PLDI2CSTS) & PLDI2CSTS_NOACK)
153                 cpu_relax();
154 }
155
156 /*******************************************************************
157  * I2C functions
158  *******************************************************************/
159 void iic(int n, unsigned long addr, unsigned long data1, unsigned long data2,
160          unsigned long data3)
161 {
162         int i;
163
164         /* Slave Address */
165         ar_outl(addr, PLDI2CDATA);
166         wait_for_vsync();
167
168         /* Start */
169         ar_outl(1, PLDI2CCND);
170         wait_acknowledge();
171
172         /* Transfer data 1 */
173         ar_outl(data1, PLDI2CDATA);
174         wait_for_vsync();
175         ar_outl(PLDI2CSTEN_STEN, PLDI2CSTEN);
176         wait_acknowledge();
177
178         /* Transfer data 2 */
179         ar_outl(data2, PLDI2CDATA);
180         wait_for_vsync();
181         ar_outl(PLDI2CSTEN_STEN, PLDI2CSTEN);
182         wait_acknowledge();
183
184         if (n == 3) {
185                 /* Transfer data 3 */
186                 ar_outl(data3, PLDI2CDATA);
187                 wait_for_vsync();
188                 ar_outl(PLDI2CSTEN_STEN, PLDI2CSTEN);
189                 wait_acknowledge();
190         }
191
192         /* Stop */
193         for (i = 0; i < 100; i++)
194                 cpu_relax();
195         ar_outl(2, PLDI2CCND);
196         ar_outl(2, PLDI2CCND);
197
198         while (ar_inl(PLDI2CSTS) & PLDI2CSTS_BB)
199                 cpu_relax();
200 }
201
202
203 void init_iic(void)
204 {
205         DEBUG(1, "init_iic:\n");
206
207         /*
208          * ICU Setting (iic)
209          */
210         /* I2C Setting */
211         ar_outl(0x0, PLDI2CCR);         /* I2CCR Disable                   */
212         ar_outl(0x0300, PLDI2CMOD);     /* I2CMOD ACK/8b-data/7b-addr/auto */
213         ar_outl(0x1, PLDI2CACK);        /* I2CACK ACK                      */
214
215         /* I2C CLK */
216         /* 50MH-100k */
217         if (freq == 75) {
218                 ar_outl(369, PLDI2CFREQ);       /* BCLK = 75MHz */
219         } else if (freq == 50) {
220                 ar_outl(244, PLDI2CFREQ);       /* BCLK = 50MHz */
221         } else {
222                 ar_outl(244, PLDI2CFREQ);       /* default: BCLK = 50MHz */
223         }
224         ar_outl(0x1, PLDI2CCR);         /* I2CCR Enable */
225 }
226
227 /**************************************************************************
228  *
229  * Video4Linux Interface functions
230  *
231  **************************************************************************/
232
233 static inline void disable_dma(void)
234 {
235         ar_outl(0x8000, M32R_DMAEN_PORTL);      /* disable DMA0 */
236 }
237
238 static inline void enable_dma(void)
239 {
240         ar_outl(0x8080, M32R_DMAEN_PORTL);      /* enable DMA0 */
241 }
242
243 static inline void clear_dma_status(void)
244 {
245         ar_outl(0x8000, M32R_DMAEDET_PORTL);    /* clear status */
246 }
247
248 static inline void wait_for_vertical_sync(int exp_line)
249 {
250 #if CHECK_LOST
251         int tmout = 10000;      /* FIXME */
252         int l;
253
254         /*
255          * check HCOUNT because we cannot check vertical sync.
256          */
257         for (; tmout >= 0; tmout--) {
258                 l = ar_inl(ARVHCOUNT);
259                 if (l == exp_line)
260                         break;
261         }
262         if (tmout < 0)
263                 printk("arv: lost %d -> %d\n", exp_line, l);
264 #else
265         while (ar_inl(ARVHCOUNT) != exp_line)
266                 cpu_relax();
267 #endif
268 }
269
270 static ssize_t ar_read(struct file *file, char *buf, size_t count, loff_t *ppos)
271 {
272         struct video_device *v = video_devdata(file);
273         struct ar_device *ar = v->priv;
274         long ret = ar->frame_bytes;             /* return read bytes */
275         unsigned long arvcr1 = 0;
276         unsigned long flags;
277         unsigned char *p;
278         int h, w;
279         unsigned char *py, *pu, *pv;
280 #if ! USE_INT
281         int l;
282 #endif
283
284         DEBUG(1, "ar_read()\n");
285
286         if (ar->size == AR_SIZE_QVGA)
287                 arvcr1 |= ARVCR1_QVGA;
288         if (ar->mode == AR_MODE_NORMAL)
289                 arvcr1 |= ARVCR1_NORMAL;
290
291         mutex_lock(&ar->lock);
292
293 #if USE_INT
294         local_irq_save(flags);
295         disable_dma();
296         ar_outl(0xa1871300, M32R_DMA0CR0_PORTL);
297         ar_outl(0x01000000, M32R_DMA0CR1_PORTL);
298
299         /* set AR FIFO address as source(BSEL5) */
300         ar_outl(ARDATA32, M32R_DMA0CSA_PORTL);
301         ar_outl(ARDATA32, M32R_DMA0RSA_PORTL);
302         ar_outl(ar->line_buff, M32R_DMA0CDA_PORTL);     /* destination addr. */
303         ar_outl(ar->line_buff, M32R_DMA0RDA_PORTL);     /* reload address */
304         ar_outl(ar->line_bytes, M32R_DMA0CBCUT_PORTL);  /* byte count (bytes) */
305         ar_outl(ar->line_bytes, M32R_DMA0RBCUT_PORTL);  /* reload count (bytes) */
306
307         /*
308          * Okey , kicks AR LSI to invoke an interrupt
309          */
310         ar->start_capture = 0;
311         ar_outl(arvcr1 | ARVCR1_HIEN, ARVCR1);
312         local_irq_restore(flags);
313         /* .... AR interrupts .... */
314         interruptible_sleep_on(&ar->wait);
315         if (signal_pending(current)) {
316                 printk("arv: interrupted while get frame data.\n");
317                 ret = -EINTR;
318                 goto out_up;
319         }
320 #else   /* ! USE_INT */
321         /* polling */
322         ar_outl(arvcr1, ARVCR1);
323         disable_dma();
324         ar_outl(0x8000, M32R_DMAEDET_PORTL);
325         ar_outl(0xa0861300, M32R_DMA0CR0_PORTL);
326         ar_outl(0x01000000, M32R_DMA0CR1_PORTL);
327         ar_outl(ARDATA32, M32R_DMA0CSA_PORTL);
328         ar_outl(ARDATA32, M32R_DMA0RSA_PORTL);
329         ar_outl(ar->line_bytes, M32R_DMA0CBCUT_PORTL);
330         ar_outl(ar->line_bytes, M32R_DMA0RBCUT_PORTL);
331
332         local_irq_save(flags);
333         while (ar_inl(ARVHCOUNT) != 0)          /* wait for 0 */
334                 cpu_relax();
335         if (ar->mode == AR_MODE_INTERLACE && ar->size == AR_SIZE_VGA) {
336                 for (h = 0; h < ar->height; h++) {
337                         wait_for_vertical_sync(h);
338                         if (h < (AR_HEIGHT_VGA/2))
339                                 l = h << 1;
340                         else
341                                 l = (((h - (AR_HEIGHT_VGA/2)) << 1) + 1);
342                         ar_outl(virt_to_phys(ar->frame[l]), M32R_DMA0CDA_PORTL);
343                         enable_dma();
344                         while (!(ar_inl(M32R_DMAEDET_PORTL) & 0x8000))
345                                 cpu_relax();
346                         disable_dma();
347                         clear_dma_status();
348                         ar_outl(0xa0861300, M32R_DMA0CR0_PORTL);
349                 }
350         } else {
351                 for (h = 0; h < ar->height; h++) {
352                         wait_for_vertical_sync(h);
353                         ar_outl(virt_to_phys(ar->frame[h]), M32R_DMA0CDA_PORTL);
354                         enable_dma();
355                         while (!(ar_inl(M32R_DMAEDET_PORTL) & 0x8000))
356                                 cpu_relax();
357                         disable_dma();
358                         clear_dma_status();
359                         ar_outl(0xa0861300, M32R_DMA0CR0_PORTL);
360                 }
361         }
362         local_irq_restore(flags);
363 #endif  /* ! USE_INT */
364
365         /*
366          * convert YUV422 to YUV422P
367          *      +--------------------+
368          *      |  Y0,Y1,...         |
369          *      |  ..............Yn  |
370          *      +--------------------+
371          *      |  U0,U1,........Un  |
372          *      +--------------------+
373          *      |  V0,V1,........Vn  |
374          *      +--------------------+
375          */
376         py = yuv;
377         pu = py + (ar->frame_bytes / 2);
378         pv = pu + (ar->frame_bytes / 4);
379         for (h = 0; h < ar->height; h++) {
380                 p = ar->frame[h];
381                 for (w = 0; w < ar->line_bytes; w += 4) {
382                         *py++ = *p++;
383                         *pu++ = *p++;
384                         *py++ = *p++;
385                         *pv++ = *p++;
386                 }
387         }
388         if (copy_to_user(buf, yuv, ar->frame_bytes)) {
389                 printk("arv: failed while copy_to_user yuv.\n");
390                 ret = -EFAULT;
391                 goto out_up;
392         }
393         DEBUG(1, "ret = %d\n", ret);
394 out_up:
395         mutex_unlock(&ar->lock);
396         return ret;
397 }
398
399 static int ar_do_ioctl(struct inode *inode, struct file *file,
400                        unsigned int cmd, void *arg)
401 {
402         struct video_device *dev = video_devdata(file);
403         struct ar_device *ar = dev->priv;
404
405         DEBUG(1, "ar_ioctl()\n");
406         switch(cmd) {
407         case VIDIOCGCAP:
408         {
409                 struct video_capability *b = arg;
410                 DEBUG(1, "VIDIOCGCAP:\n");
411                 strcpy(b->name, ar->vdev->name);
412                 b->type = VID_TYPE_CAPTURE;
413                 b->channels = 0;
414                 b->audios = 0;
415                 b->maxwidth = MAX_AR_WIDTH;
416                 b->maxheight = MAX_AR_HEIGHT;
417                 b->minwidth = MIN_AR_WIDTH;
418                 b->minheight = MIN_AR_HEIGHT;
419                 return 0;
420         }
421         case VIDIOCGCHAN:
422                 DEBUG(1, "VIDIOCGCHAN:\n");
423                 return 0;
424         case VIDIOCSCHAN:
425                 DEBUG(1, "VIDIOCSCHAN:\n");
426                 return 0;
427         case VIDIOCGTUNER:
428                 DEBUG(1, "VIDIOCGTUNER:\n");
429                 return 0;
430         case VIDIOCSTUNER:
431                 DEBUG(1, "VIDIOCSTUNER:\n");
432                 return 0;
433         case VIDIOCGPICT:
434                 DEBUG(1, "VIDIOCGPICT:\n");
435                 return 0;
436         case VIDIOCSPICT:
437                 DEBUG(1, "VIDIOCSPICT:\n");
438                 return 0;
439         case VIDIOCCAPTURE:
440                 DEBUG(1, "VIDIOCCAPTURE:\n");
441                 return -EINVAL;
442         case VIDIOCGWIN:
443         {
444                 struct video_window *w = arg;
445                 DEBUG(1, "VIDIOCGWIN:\n");
446                 memset(w, 0, sizeof(w));
447                 w->width = ar->width;
448                 w->height = ar->height;
449                 return 0;
450         }
451         case VIDIOCSWIN:
452         {
453                 struct video_window *w = arg;
454                 DEBUG(1, "VIDIOCSWIN:\n");
455                 if ((w->width != AR_WIDTH_VGA || w->height != AR_HEIGHT_VGA) &&
456                     (w->width != AR_WIDTH_QVGA || w->height != AR_HEIGHT_QVGA))
457                                 return -EINVAL;
458
459                 mutex_lock(&ar->lock);
460                 ar->width = w->width;
461                 ar->height = w->height;
462                 if (ar->width == AR_WIDTH_VGA) {
463                         ar->size = AR_SIZE_VGA;
464                         ar->frame_bytes = AR_FRAME_BYTES_VGA;
465                         ar->line_bytes = AR_LINE_BYTES_VGA;
466                         if (vga_interlace)
467                                 ar->mode = AR_MODE_INTERLACE;
468                         else
469                                 ar->mode = AR_MODE_NORMAL;
470                 } else {
471                         ar->size = AR_SIZE_QVGA;
472                         ar->frame_bytes = AR_FRAME_BYTES_QVGA;
473                         ar->line_bytes = AR_LINE_BYTES_QVGA;
474                         ar->mode = AR_MODE_INTERLACE;
475                 }
476                 mutex_unlock(&ar->lock);
477                 return 0;
478         }
479         case VIDIOCGFBUF:
480                 DEBUG(1, "VIDIOCGFBUF:\n");
481                 return -EINVAL;
482         case VIDIOCSFBUF:
483                 DEBUG(1, "VIDIOCSFBUF:\n");
484                 return -EINVAL;
485         case VIDIOCKEY:
486                 DEBUG(1, "VIDIOCKEY:\n");
487                 return 0;
488         case VIDIOCGFREQ:
489                 DEBUG(1, "VIDIOCGFREQ:\n");
490                 return -EINVAL;
491         case VIDIOCSFREQ:
492                 DEBUG(1, "VIDIOCSFREQ:\n");
493                 return -EINVAL;
494         case VIDIOCGAUDIO:
495                 DEBUG(1, "VIDIOCGAUDIO:\n");
496                 return -EINVAL;
497         case VIDIOCSAUDIO:
498                 DEBUG(1, "VIDIOCSAUDIO:\n");
499                 return -EINVAL;
500         case VIDIOCSYNC:
501                 DEBUG(1, "VIDIOCSYNC:\n");
502                 return -EINVAL;
503         case VIDIOCMCAPTURE:
504                 DEBUG(1, "VIDIOCMCAPTURE:\n");
505                 return -EINVAL;
506         case VIDIOCGMBUF:
507                 DEBUG(1, "VIDIOCGMBUF:\n");
508                 return -EINVAL;
509         case VIDIOCGUNIT:
510                 DEBUG(1, "VIDIOCGUNIT:\n");
511                 return -EINVAL;
512         case VIDIOCGCAPTURE:
513                 DEBUG(1, "VIDIOCGCAPTURE:\n");
514                 return -EINVAL;
515         case VIDIOCSCAPTURE:
516                 DEBUG(1, "VIDIOCSCAPTURE:\n");
517                 return -EINVAL;
518         case VIDIOCSPLAYMODE:
519                 DEBUG(1, "VIDIOCSPLAYMODE:\n");
520                 return -EINVAL;
521         case VIDIOCSWRITEMODE:
522                 DEBUG(1, "VIDIOCSWRITEMODE:\n");
523                 return -EINVAL;
524         case VIDIOCGPLAYINFO:
525                 DEBUG(1, "VIDIOCGPLAYINFO:\n");
526                 return -EINVAL;
527         case VIDIOCSMICROCODE:
528                 DEBUG(1, "VIDIOCSMICROCODE:\n");
529                 return -EINVAL;
530         case VIDIOCGVBIFMT:
531                 DEBUG(1, "VIDIOCGVBIFMT:\n");
532                 return -EINVAL;
533         case VIDIOCSVBIFMT:
534                 DEBUG(1, "VIDIOCSVBIFMT:\n");
535                 return -EINVAL;
536         default:
537                 DEBUG(1, "Unknown ioctl(0x%08x)\n", cmd);
538                 return -ENOIOCTLCMD;
539         }
540         return 0;
541 }
542
543 static int ar_ioctl(struct inode *inode, struct file *file, unsigned int cmd,
544                     unsigned long arg)
545 {
546         return video_usercopy(inode, file, cmd, arg, ar_do_ioctl);
547 }
548
549 #if USE_INT
550 /*
551  * Interrupt handler
552  */
553 static void ar_interrupt(int irq, void *dev, struct pt_regs *regs)
554 {
555         struct ar_device *ar = dev;
556         unsigned int line_count;
557         unsigned int line_number;
558         unsigned int arvcr1;
559
560         line_count = ar_inl(ARVHCOUNT);                 /* line number */
561         if (ar->mode == AR_MODE_INTERLACE && ar->size == AR_SIZE_VGA) {
562                 /* operations for interlace mode */
563                 if ( line_count < (AR_HEIGHT_VGA/2) )   /* even line */
564                         line_number = (line_count << 1);
565                 else                                    /* odd line */
566                         line_number =
567                         (((line_count - (AR_HEIGHT_VGA/2)) << 1) + 1);
568         } else {
569                 line_number = line_count;
570         }
571
572         if (line_number == 0) {
573                 /*
574                  * It is an interrupt for line 0.
575                  * we have to start capture.
576                  */
577                 disable_dma();
578 #if 0
579                 ar_outl(ar->line_buff, M32R_DMA0CDA_PORTL);     /* needless? */
580 #endif
581                 memcpy(ar->frame[0], ar->line_buff, ar->line_bytes);
582 #if 0
583                 ar_outl(0xa1861300, M32R_DMA0CR0_PORTL);
584 #endif
585                 enable_dma();
586                 ar->start_capture = 1;                  /* during capture */
587                 return;
588         }
589
590         if (ar->start_capture == 1 && line_number <= (ar->height - 1)) {
591                 disable_dma();
592                 memcpy(ar->frame[line_number], ar->line_buff, ar->line_bytes);
593
594                 /*
595                  * if captured all line of a frame, disable AR interrupt
596                  * and wake a process up.
597                  */
598                 if (line_number == (ar->height - 1)) {  /* end  of line */
599
600                         ar->start_capture = 0;
601
602                         /* disable AR interrupt request */
603                         arvcr1 = ar_inl(ARVCR1);
604                         arvcr1 &= ~ARVCR1_HIEN;         /* clear int. flag */
605                         ar_outl(arvcr1, ARVCR1);        /* disable */
606                         wake_up_interruptible(&ar->wait);
607                 } else {
608 #if 0
609                         ar_outl(ar->line_buff, M32R_DMA0CDA_PORTL);
610                         ar_outl(0xa1861300, M32R_DMA0CR0_PORTL);
611 #endif
612                         enable_dma();
613                 }
614         }
615 }
616 #endif
617
618 /*
619  * ar_initialize()
620  *      ar_initialize() is called by video_register_device() and
621  *      initializes AR LSI and peripherals.
622  *
623  *      -1 is returned in all failures.
624  *      0 is returned in success.
625  *
626  */
627 static int ar_initialize(struct video_device *dev)
628 {
629         struct ar_device *ar = dev->priv;
630         unsigned long cr = 0;
631         int i,found=0;
632
633         DEBUG(1, "ar_initialize:\n");
634
635         /*
636          * initialize AR LSI
637          */
638         ar_outl(0, ARVCR0);             /* assert reset of AR LSI */
639         for (i = 0; i < 0x18; i++)      /* wait for over 10 cycles @ 27MHz */
640                 cpu_relax();
641         ar_outl(ARVCR0_RST, ARVCR0);    /* negate reset of AR LSI (enable) */
642         for (i = 0; i < 0x40d; i++)     /* wait for over 420 cycles @ 27MHz */
643                 cpu_relax();
644
645         /* AR uses INT3 of CPU as interrupt pin. */
646         ar_outl(ARINTSEL_INT3, ARINTSEL);
647
648         if (ar->size == AR_SIZE_QVGA)
649                 cr |= ARVCR1_QVGA;
650         if (ar->mode == AR_MODE_NORMAL)
651                 cr |= ARVCR1_NORMAL;
652         ar_outl(cr, ARVCR1);
653
654         /*
655          * Initialize IIC so that CPU can communicate with AR LSI,
656          * and send boot commands to AR LSI.
657          */
658         init_iic();
659
660         for (i = 0; i < 0x100000; i++) {        /* > 0xa1d10,  56ms */
661                 if ((ar_inl(ARVCR0) & ARVCR0_VDS)) {    /* VSYNC */
662                         found = 1;
663                         break;
664                 }
665         }
666
667         if (found == 0)
668                 return -ENODEV;
669
670         printk("arv: Initializing ");
671
672         iic(2,0x78,0x11,0x01,0x00);     /* start */
673         iic(3,0x78,0x12,0x00,0x06);
674         iic(3,0x78,0x12,0x12,0x30);
675         iic(3,0x78,0x12,0x15,0x58);
676         iic(3,0x78,0x12,0x17,0x30);
677         printk(".");
678         iic(3,0x78,0x12,0x1a,0x97);
679         iic(3,0x78,0x12,0x1b,0xff);
680         iic(3,0x78,0x12,0x1c,0xff);
681         iic(3,0x78,0x12,0x26,0x10);
682         iic(3,0x78,0x12,0x27,0x00);
683         printk(".");
684         iic(2,0x78,0x34,0x02,0x00);
685         iic(2,0x78,0x7a,0x10,0x00);
686         iic(2,0x78,0x80,0x39,0x00);
687         iic(2,0x78,0x81,0xe6,0x00);
688         iic(2,0x78,0x8d,0x00,0x00);
689         printk(".");
690         iic(2,0x78,0x8e,0x0c,0x00);
691         iic(2,0x78,0x8f,0x00,0x00);
692 #if 0
693         iic(2,0x78,0x90,0x00,0x00);     /* AWB on=1 off=0 */
694 #endif
695         iic(2,0x78,0x93,0x01,0x00);
696         iic(2,0x78,0x94,0xcd,0x00);
697         iic(2,0x78,0x95,0x00,0x00);
698         printk(".");
699         iic(2,0x78,0x96,0xa0,0x00);
700         iic(2,0x78,0x97,0x00,0x00);
701         iic(2,0x78,0x98,0x60,0x00);
702         iic(2,0x78,0x99,0x01,0x00);
703         iic(2,0x78,0x9a,0x19,0x00);
704         printk(".");
705         iic(2,0x78,0x9b,0x02,0x00);
706         iic(2,0x78,0x9c,0xe8,0x00);
707         iic(2,0x78,0x9d,0x02,0x00);
708         iic(2,0x78,0x9e,0x2e,0x00);
709         iic(2,0x78,0xb8,0x78,0x00);
710         iic(2,0x78,0xba,0x05,0x00);
711 #if 0
712         iic(2,0x78,0x83,0x8c,0x00);     /* brightness */
713 #endif
714         printk(".");
715
716         /* color correction */
717         iic(3,0x78,0x49,0x00,0x95);     /* a            */
718         iic(3,0x78,0x49,0x01,0x96);     /* b            */
719         iic(3,0x78,0x49,0x03,0x85);     /* c            */
720         iic(3,0x78,0x49,0x04,0x97);     /* d            */
721         iic(3,0x78,0x49,0x02,0x7e);     /* e(Lo)        */
722         iic(3,0x78,0x49,0x05,0xa4);     /* f(Lo)        */
723         iic(3,0x78,0x49,0x06,0x04);     /* e(Hi)        */
724         iic(3,0x78,0x49,0x07,0x04);     /* e(Hi)        */
725         iic(2,0x78,0x48,0x01,0x00);     /* on=1 off=0   */
726
727         printk(".");
728         iic(2,0x78,0x11,0x00,0x00);     /* end */
729         printk(" done\n");
730         return 0;
731 }
732
733
734 void ar_release(struct video_device *vfd)
735 {
736         struct ar_device *ar = vfd->priv;
737         mutex_lock(&ar->lock);
738         video_device_release(vfd);
739 }
740
741 /****************************************************************************
742  *
743  * Video4Linux Module functions
744  *
745  ****************************************************************************/
746 static struct file_operations ar_fops = {
747         .owner          = THIS_MODULE,
748         .open           = video_exclusive_open,
749         .release        = video_exclusive_release,
750         .read           = ar_read,
751         .ioctl          = ar_ioctl,
752         .compat_ioctl   = v4l_compat_ioctl32,
753         .llseek         = no_llseek,
754 };
755
756 static struct video_device ar_template = {
757         .owner          = THIS_MODULE,
758         .name           = "Colour AR VGA",
759         .type           = VID_TYPE_CAPTURE,
760         .hardware       = VID_HARDWARE_ARV,
761         .fops           = &ar_fops,
762         .release        = ar_release,
763         .minor          = -1,
764 };
765
766 #define ALIGN4(x)       ((((int)(x)) & 0x3) == 0)
767 static struct ar_device ardev;
768
769 static int __init ar_init(void)
770 {
771         struct ar_device *ar;
772         int ret;
773         int i;
774
775         DEBUG(1, "ar_init:\n");
776         ret = -EIO;
777         printk(KERN_INFO "arv: Colour AR VGA driver %s\n", VERSION);
778
779         ar = &ardev;
780         memset(ar, 0, sizeof(struct ar_device));
781
782 #if USE_INT
783         /* allocate a DMA buffer for 1 line.  */
784         ar->line_buff = kmalloc(MAX_AR_LINE_BYTES, GFP_KERNEL | GFP_DMA);
785         if (ar->line_buff == NULL || ! ALIGN4(ar->line_buff)) {
786                 printk("arv: buffer allocation failed for DMA.\n");
787                 ret = -ENOMEM;
788                 goto out_end;
789         }
790 #endif
791         /* allocate buffers for a frame */
792         for (i = 0; i < MAX_AR_HEIGHT; i++) {
793                 ar->frame[i] = kmalloc(MAX_AR_LINE_BYTES, GFP_KERNEL);
794                 if (ar->frame[i] == NULL || ! ALIGN4(ar->frame[i])) {
795                         printk("arv: buffer allocation failed for frame.\n");
796                         ret = -ENOMEM;
797                         goto out_line_buff;
798                 }
799         }
800
801         ar->vdev = video_device_alloc();
802         if (!ar->vdev) {
803                 printk(KERN_ERR "arv: video_device_alloc() failed\n");
804                 return -ENOMEM;
805         }
806         memcpy(ar->vdev, &ar_template, sizeof(ar_template));
807         ar->vdev->priv = ar;
808
809         if (vga) {
810                 ar->width       = AR_WIDTH_VGA;
811                 ar->height      = AR_HEIGHT_VGA;
812                 ar->size        = AR_SIZE_VGA;
813                 ar->frame_bytes = AR_FRAME_BYTES_VGA;
814                 ar->line_bytes  = AR_LINE_BYTES_VGA;
815                 if (vga_interlace)
816                         ar->mode = AR_MODE_INTERLACE;
817                 else
818                         ar->mode = AR_MODE_NORMAL;
819         } else {
820                 ar->width       = AR_WIDTH_QVGA;
821                 ar->height      = AR_HEIGHT_QVGA;
822                 ar->size        = AR_SIZE_QVGA;
823                 ar->frame_bytes = AR_FRAME_BYTES_QVGA;
824                 ar->line_bytes  = AR_LINE_BYTES_QVGA;
825                 ar->mode        = AR_MODE_INTERLACE;
826         }
827         mutex_init(&ar->lock);
828         init_waitqueue_head(&ar->wait);
829
830 #if USE_INT
831         if (request_irq(M32R_IRQ_INT3, ar_interrupt, 0, "arv", ar)) {
832                 printk("arv: request_irq(%d) failed.\n", M32R_IRQ_INT3);
833                 ret = -EIO;
834                 goto out_irq;
835         }
836 #endif
837
838         if (ar_initialize(ar->vdev) != 0) {
839                 printk("arv: M64278 not found.\n");
840                 ret = -ENODEV;
841                 goto out_dev;
842         }
843
844         /*
845          * ok, we can initialize h/w according to parameters,
846          * so register video device as a frame grabber type.
847          * device is named "video[0-64]".
848          * video_register_device() initializes h/w using ar_initialize().
849          */
850         if (video_register_device(ar->vdev, VFL_TYPE_GRABBER, video_nr) != 0) {
851                 /* return -1, -ENFILE(full) or others */
852                 printk("arv: register video (Colour AR) failed.\n");
853                 ret = -ENODEV;
854                 goto out_dev;
855         }
856
857         printk("video%d: Found M64278 VGA (IRQ %d, Freq %dMHz).\n",
858                 ar->vdev->minor, M32R_IRQ_INT3, freq);
859
860         return 0;
861
862 out_dev:
863 #if USE_INT
864         free_irq(M32R_IRQ_INT3, ar);
865
866 out_irq:
867 #endif
868         for (i = 0; i < MAX_AR_HEIGHT; i++)
869                 kfree(ar->frame[i]);
870
871 out_line_buff:
872 #if USE_INT
873         kfree(ar->line_buff);
874
875 out_end:
876 #endif
877         return ret;
878 }
879
880
881 static int __init ar_init_module(void)
882 {
883         freq = (boot_cpu_data.bus_clock / 1000000);
884         printk("arv: Bus clock %d\n", freq);
885         if (freq != 50 && freq != 75)
886                 freq = DEFAULT_FREQ;
887         return ar_init();
888 }
889
890 static void __exit ar_cleanup_module(void)
891 {
892         struct ar_device *ar;
893         int i;
894
895         ar = &ardev;
896         video_unregister_device(ar->vdev);
897 #if USE_INT
898         free_irq(M32R_IRQ_INT3, ar);
899 #endif
900         for (i = 0; i < MAX_AR_HEIGHT; i++)
901                 kfree(ar->frame[i]);
902 #if USE_INT
903         kfree(ar->line_buff);
904 #endif
905 }
906
907 module_init(ar_init_module);
908 module_exit(ar_cleanup_module);
909
910 MODULE_AUTHOR("Takeo Takahashi <takahashi.takeo@renesas.com>");
911 MODULE_DESCRIPTION("Colour AR M64278(VGA) for Video4Linux");
912 MODULE_LICENSE("GPL");