drivers/media/video/pms.c

   1 /*
   2  *      Media Vision Pro Movie Studio
   3  *                      or
   4  *      "all you need is an I2C bus some RAM and a prayer"
   5  *
   6  *      This draws heavily on code
   7  *
   8  *      (c) Wolfgang Koehler,  wolf@first.gmd.de, Dec. 1994
   9  *      Kiefernring 15
  10  *      14478 Potsdam, Germany
  11  *
  12  *      Most of this code is directly derived from his userspace driver.
  13  *      His driver works so send any reports to alan@redhat.com unless the
  14  *      userspace driver also doesn't work for you...
  15  *
  16  *      Changes:
  17  *      08/07/2003        Daniele Bellucci <bellucda@tiscali.it>
  18  *                        - pms_capture: report back -EFAULT
  19  */
  20
  21 #include <linux/module.h>
  22 #include <linux/delay.h>
  23 #include <linux/errno.h>
  24 #include <linux/fs.h>
  25 #include <linux/kernel.h>
  26 #include <linux/slab.h>
  27 #include <linux/mm.h>
  28 #include <linux/ioport.h>
  29 #include <linux/init.h>
  30 #include <asm/io.h>
  31 #include <linux/sched.h>
  32 #include <linux/videodev.h>
  33 #include <asm/uaccess.h>
  34
  35
  36 #define MOTOROLA        1
  37 #define PHILIPS2        2
  38 #define PHILIPS1        3
  39 #define MVVMEMORYWIDTH  0x40            /* 512 bytes */
  40
  41 struct pms_device
  42 {
  43         struct video_device v;
  44         struct video_picture picture;
  45         int height;
  46         int width;
  47         struct semaphore lock;
  48 };
  49
  50 struct i2c_info
  51 {
  52         u8 slave;
  53         u8 sub;
  54         u8 data;
  55         u8 hits;
  56 };
  57
  58 static int i2c_count            = 0;
  59 static struct i2c_info i2cinfo[64];
  60
  61 static int decoder              = PHILIPS2;
  62 static int standard             = 0;    /* 0 - auto 1 - ntsc 2 - pal 3 - secam */
  63
  64 /*
  65  *      I/O ports and Shared Memory
  66  */
  67
  68 static int io_port              =       0x250;
  69 static int data_port            =       0x251;
  70 static int mem_base             =       0xC8000;
  71 static int video_nr             =       -1;
  72
  73
  74
  75 static inline void mvv_write(u8 index, u8 value)
  76 {
  77         outw(index|(value<<8), io_port);
  78 }
  79
  80 static inline u8 mvv_read(u8 index)
  81 {
  82         outb(index, io_port);
  83         return inb(data_port);
  84 }
  85
  86 static int pms_i2c_stat(u8 slave)
  87 {
  88         int counter;
  89         int i;
  90
  91         outb(0x28, io_port);
  92
  93         counter=0;
  94         while((inb(data_port)&0x01)==0)
  95                 if(counter++==256)
  96                         break;
  97
  98         while((inb(data_port)&0x01)!=0)
  99                 if(counter++==256)
 100                         break;
 101
 102         outb(slave, io_port);
 103
 104         counter=0;
 105         while((inb(data_port)&0x01)==0)
 106                 if(counter++==256)
 107                         break;
 108
 109         while((inb(data_port)&0x01)!=0)
 110                 if(counter++==256)
 111                         break;
 112
 113         for(i=0;i<12;i++)
 114         {
 115                 char st=inb(data_port);
 116                 if((st&2)!=0)
 117                         return -1;
 118                 if((st&1)==0)
 119                         break;
 120         }
 121         outb(0x29, io_port);
 122         return inb(data_port);
 123 }
 124
 125 static int pms_i2c_write(u16 slave, u16 sub, u16 data)
 126 {
 127         int skip=0;
 128         int count;
 129         int i;
 130
 131         for(i=0;i<i2c_count;i++)
 132         {
 133                 if((i2cinfo[i].slave==slave) &&
 134                    (i2cinfo[i].sub == sub))
 135                 {
 136                         if(i2cinfo[i].data==data)
 137                                 skip=1;
 138                         i2cinfo[i].data=data;
 139                         i=i2c_count+1;
 140                 }
 141         }
 142
 143         if(i==i2c_count && i2c_count<64)
 144         {
 145                 i2cinfo[i2c_count].slave=slave;
 146                 i2cinfo[i2c_count].sub=sub;
 147                 i2cinfo[i2c_count].data=data;
 148                 i2c_count++;
 149         }
 150
 151         if(skip)
 152                 return 0;
 153
 154         mvv_write(0x29, sub);
 155         mvv_write(0x2A, data);
 156         mvv_write(0x28, slave);
 157
 158         outb(0x28, io_port);
 159
 160         count=0;
 161         while((inb(data_port)&1)==0)
 162                 if(count>255)
 163                         break;
 164         while((inb(data_port)&1)!=0)
 165                 if(count>255)
 166                         break;
 167
 168         count=inb(data_port);
 169
 170         if(count&2)
 171                 return -1;
 172         return count;
 173 }
 174
 175 static int pms_i2c_read(int slave, int sub)
 176 {
 177         int i=0;
 178         for(i=0;i<i2c_count;i++)
 179         {
 180                 if(i2cinfo[i].slave==slave && i2cinfo[i].sub==sub)
 181                         return i2cinfo[i].data;
 182         }
 183         return 0;
 184 }
 185
 186
 187 static void pms_i2c_andor(int slave, int sub, int and, int or)
 188 {
 189         u8 tmp;
 190
 191         tmp=pms_i2c_read(slave, sub);
 192         tmp = (tmp&and)|or;
 193         pms_i2c_write(slave, sub, tmp);
 194 }
 195
 196 /*
 197  *      Control functions
 198  */
 199
 200
 201 static void pms_videosource(short source)
 202 {
 203         mvv_write(0x2E, source?0x31:0x30);
 204 }
 205
 206 static void pms_hue(short hue)
 207 {
 208         switch(decoder)
 209         {
 210                 case MOTOROLA:
 211                         pms_i2c_write(0x8A, 0x00, hue);
 212                         break;
 213                 case PHILIPS2:
 214                         pms_i2c_write(0x8A, 0x07, hue);
 215                         break;
 216                 case PHILIPS1:
 217                         pms_i2c_write(0x42, 0x07, hue);
 218                         break;
 219         }
 220 }
 221
 222 static void pms_colour(short colour)
 223 {
 224         switch(decoder)
 225         {
 226                 case MOTOROLA:
 227                         pms_i2c_write(0x8A, 0x00, colour);
 228                         break;
 229                 case PHILIPS1:
 230                         pms_i2c_write(0x42, 0x12, colour);
 231                         break;
 232         }
 233 }
 234
 235
 236 static void pms_contrast(short contrast)
 237 {
 238         switch(decoder)
 239         {
 240                 case MOTOROLA:
 241                         pms_i2c_write(0x8A, 0x00, contrast);
 242                         break;
 243                 case PHILIPS1:
 244                         pms_i2c_write(0x42, 0x13, contrast);
 245                         break;
 246         }
 247 }
 248
 249 static void pms_brightness(short brightness)
 250 {
 251         switch(decoder)
 252         {
 253                 case MOTOROLA:
 254                         pms_i2c_write(0x8A, 0x00, brightness);
 255                         pms_i2c_write(0x8A, 0x00, brightness);
 256                         pms_i2c_write(0x8A, 0x00, brightness);
 257                         break;
 258                 case PHILIPS1:
 259                         pms_i2c_write(0x42, 0x19, brightness);
 260                         break;
 261         }
 262 }
 263
 264
 265 static void pms_format(short format)
 266 {
 267         int target;
 268         standard = format;
 269
 270         if(decoder==PHILIPS1)
 271                 target=0x42;
 272         else if(decoder==PHILIPS2)
 273                 target=0x8A;
 274         else
 275                 return;
 276
 277         switch(format)
 278         {
 279                 case 0: /* Auto */
 280                         pms_i2c_andor(target, 0x0D, 0xFE,0x00);
 281                         pms_i2c_andor(target, 0x0F, 0x3F,0x80);
 282                         break;
 283                 case 1: /* NTSC */
 284                         pms_i2c_andor(target, 0x0D, 0xFE, 0x00);
 285                         pms_i2c_andor(target, 0x0F, 0x3F, 0x40);
 286                         break;
 287                 case 2: /* PAL */
 288                         pms_i2c_andor(target, 0x0D, 0xFE, 0x00);
 289                         pms_i2c_andor(target, 0x0F, 0x3F, 0x00);
 290                         break;
 291                 case 3: /* SECAM */
 292                         pms_i2c_andor(target, 0x0D, 0xFE, 0x01);
 293                         pms_i2c_andor(target, 0x0F, 0x3F, 0x00);
 294                         break;
 295         }
 296 }
 297
 298 #ifdef FOR_FUTURE_EXPANSION
 299
 300 /*
 301  *      These features of the PMS card are not currently exposes. They
 302  *      could become a private v4l ioctl for PMSCONFIG or somesuch if
 303  *      people need it. We also don't yet use the PMS interrupt.
 304  */
 305
 306 static void pms_hstart(short start)
 307 {
 308         switch(decoder)
 309         {
 310                 case PHILIPS1:
 311                         pms_i2c_write(0x8A, 0x05, start);
 312                         pms_i2c_write(0x8A, 0x18, start);
 313                         break;
 314                 case PHILIPS2:
 315                         pms_i2c_write(0x42, 0x05, start);
 316                         pms_i2c_write(0x42, 0x18, start);
 317                         break;
 318         }
 319 }
 320
 321 /*
 322  *      Bandpass filters
 323  */
 324
 325 static void pms_bandpass(short pass)
 326 {
 327         if(decoder==PHILIPS2)
 328                 pms_i2c_andor(0x8A, 0x06, 0xCF, (pass&0x03)<<4);
 329         else if(decoder==PHILIPS1)
 330                 pms_i2c_andor(0x42, 0x06, 0xCF, (pass&0x03)<<4);
 331 }
 332
 333 static void pms_antisnow(short snow)
 334 {
 335         if(decoder==PHILIPS2)
 336                 pms_i2c_andor(0x8A, 0x06, 0xF3, (snow&0x03)<<2);
 337         else if(decoder==PHILIPS1)
 338                 pms_i2c_andor(0x42, 0x06, 0xF3, (snow&0x03)<<2);
 339 }
 340
 341 static void pms_sharpness(short sharp)
 342 {
 343         if(decoder==PHILIPS2)
 344                 pms_i2c_andor(0x8A, 0x06, 0xFC, sharp&0x03);
 345         else if(decoder==PHILIPS1)
 346                 pms_i2c_andor(0x42, 0x06, 0xFC, sharp&0x03);
 347 }
 348
 349 static void pms_chromaagc(short agc)
 350 {
 351         if(decoder==PHILIPS2)
 352                 pms_i2c_andor(0x8A, 0x0C, 0x9F, (agc&0x03)<<5);
 353         else if(decoder==PHILIPS1)
 354                 pms_i2c_andor(0x42, 0x0C, 0x9F, (agc&0x03)<<5);
 355 }
 356
 357 static void pms_vertnoise(short noise)
 358 {
 359         if(decoder==PHILIPS2)
 360                 pms_i2c_andor(0x8A, 0x10, 0xFC, noise&3);
 361         else if(decoder==PHILIPS1)
 362                 pms_i2c_andor(0x42, 0x10, 0xFC, noise&3);
 363 }
 364
 365 static void pms_forcecolour(short colour)
 366 {
 367         if(decoder==PHILIPS2)
 368                 pms_i2c_andor(0x8A, 0x0C, 0x7F, (colour&1)<<7);
 369         else if(decoder==PHILIPS1)
 370                 pms_i2c_andor(0x42, 0x0C, 0x7, (colour&1)<<7);
 371 }
 372
 373 static void pms_antigamma(short gamma)
 374 {
 375         if(decoder==PHILIPS2)
 376                 pms_i2c_andor(0xB8, 0x00, 0x7F, (gamma&1)<<7);
 377         else if(decoder==PHILIPS1)
 378                 pms_i2c_andor(0x42, 0x20, 0x7, (gamma&1)<<7);
 379 }
 380
 381 static void pms_prefilter(short filter)
 382 {
 383         if(decoder==PHILIPS2)
 384                 pms_i2c_andor(0x8A, 0x06, 0xBF, (filter&1)<<6);
 385         else if(decoder==PHILIPS1)
 386                 pms_i2c_andor(0x42, 0x06, 0xBF, (filter&1)<<6);
 387 }
 388
 389 static void pms_hfilter(short filter)
 390 {
 391         if(decoder==PHILIPS2)
 392                 pms_i2c_andor(0xB8, 0x04, 0x1F, (filter&7)<<5);
 393         else if(decoder==PHILIPS1)
 394                 pms_i2c_andor(0x42, 0x24, 0x1F, (filter&7)<<5);
 395 }
 396
 397 static void pms_vfilter(short filter)
 398 {
 399         if(decoder==PHILIPS2)
 400                 pms_i2c_andor(0xB8, 0x08, 0x9F, (filter&3)<<5);
 401         else if(decoder==PHILIPS1)
 402                 pms_i2c_andor(0x42, 0x28, 0x9F, (filter&3)<<5);
 403 }
 404
 405 static void pms_killcolour(short colour)
 406 {
 407         if(decoder==PHILIPS2)
 408         {
 409                 pms_i2c_andor(0x8A, 0x08, 0x07, (colour&0x1F)<<3);
 410                 pms_i2c_andor(0x8A, 0x09, 0x07, (colour&0x1F)<<3);
 411         }
 412         else if(decoder==PHILIPS1)
 413         {
 414                 pms_i2c_andor(0x42, 0x08, 0x07, (colour&0x1F)<<3);
 415                 pms_i2c_andor(0x42, 0x09, 0x07, (colour&0x1F)<<3);
 416         }
 417 }
 418
 419 static void pms_chromagain(short chroma)
 420 {
 421         if(decoder==PHILIPS2)
 422         {
 423                 pms_i2c_write(0x8A, 0x11, chroma);
 424         }
 425         else if(decoder==PHILIPS1)
 426         {
 427                 pms_i2c_write(0x42, 0x11, chroma);
 428         }
 429 }
 430
 431
 432 static void pms_spacialcompl(short data)
 433 {
 434         mvv_write(0x3B, data);
 435 }
 436
 437 static void pms_spacialcomph(short data)
 438 {
 439         mvv_write(0x3A, data);
 440 }
 441
 442 static void pms_vstart(short start)
 443 {
 444         mvv_write(0x16, start);
 445         mvv_write(0x17, (start>>8)&0x01);
 446 }
 447
 448 #endif
 449
 450 static void pms_secamcross(short cross)
 451 {
 452         if(decoder==PHILIPS2)
 453                 pms_i2c_andor(0x8A, 0x0F, 0xDF, (cross&1)<<5);
 454         else if(decoder==PHILIPS1)
 455                 pms_i2c_andor(0x42, 0x0F, 0xDF, (cross&1)<<5);
 456 }
 457
 458
 459 static void pms_swsense(short sense)
 460 {
 461         if(decoder==PHILIPS2)
 462         {
 463                 pms_i2c_write(0x8A, 0x0A, sense);
 464                 pms_i2c_write(0x8A, 0x0B, sense);
 465         }
 466         else if(decoder==PHILIPS1)
 467         {
 468                 pms_i2c_write(0x42, 0x0A, sense);
 469                 pms_i2c_write(0x42, 0x0B, sense);
 470         }
 471 }
 472
 473
 474 static void pms_framerate(short frr)
 475 {
 476         int fps=(standard==1)?30:25;
 477         if(frr==0)
 478                 return;
 479         fps=fps/frr;
 480         mvv_write(0x14,0x80|fps);
 481         mvv_write(0x15,1);
 482 }
 483
 484 static void pms_vert(u8 deciden, u8 decinum)
 485 {
 486         mvv_write(0x1C, deciden);       /* Denominator */
 487         mvv_write(0x1D, decinum);       /* Numerator */
 488 }
 489
 490 /*
 491  *      Turn 16bit ratios into best small ratio the chipset can grok
 492  */
 493
 494 static void pms_vertdeci(unsigned short decinum, unsigned short deciden)
 495 {
 496         /* Knock it down by /5 once */
 497         if(decinum%5==0)
 498         {
 499                 deciden/=5;
 500                 decinum/=5;
 501         }
 502         /*
 503          *      3's
 504          */
 505         while(decinum%3==0 && deciden%3==0)
 506         {
 507                 deciden/=3;
 508                 decinum/=3;
 509         }
 510         /*
 511          *      2's
 512          */
 513         while(decinum%2==0 && deciden%2==0)
 514         {
 515                 decinum/=2;
 516                 deciden/=2;
 517         }
 518         /*
 519          *      Fudgyify
 520          */
 521         while(deciden>32)
 522         {
 523                 deciden/=2;
 524                 decinum=(decinum+1)/2;
 525         }
 526         if(deciden==32)
 527                 deciden--;
 528         pms_vert(deciden,decinum);
 529 }
 530
 531 static void pms_horzdeci(short decinum, short deciden)
 532 {
 533         if(decinum<=512)
 534         {
 535                 if(decinum%5==0)
 536                 {
 537                         decinum/=5;
 538                         deciden/=5;
 539                 }
 540         }
 541         else
 542         {
 543                 decinum=512;
 544                 deciden=640;    /* 768 would be ideal */
 545         }
 546
 547         while(((decinum|deciden)&1)==0)
 548         {
 549                 decinum>>=1;
 550                 deciden>>=1;
 551         }
 552         while(deciden>32)
 553         {
 554                 deciden>>=1;
 555                 decinum=(decinum+1)>>1;
 556         }
 557         if(deciden==32)
 558                 deciden--;
 559
 560         mvv_write(0x24, 0x80|deciden);
 561         mvv_write(0x25, decinum);
 562 }
 563
 564 static void pms_resolution(short width, short height)
 565 {
 566         int fg_height;
 567
 568         fg_height=height;
 569         if(fg_height>280)
 570                 fg_height=280;
 571
 572         mvv_write(0x18, fg_height);
 573         mvv_write(0x19, fg_height>>8);
 574
 575         if(standard==1)
 576         {
 577                 mvv_write(0x1A, 0xFC);
 578                 mvv_write(0x1B, 0x00);
 579                 if(height>fg_height)
 580                         pms_vertdeci(240,240);
 581                 else
 582                         pms_vertdeci(fg_height,240);
 583         }
 584         else
 585         {
 586                 mvv_write(0x1A, 0x1A);
 587                 mvv_write(0x1B, 0x01);
 588                 if(fg_height>256)
 589                         pms_vertdeci(270,270);
 590                 else
 591                         pms_vertdeci(fg_height, 270);
 592         }
 593         mvv_write(0x12,0);
 594         mvv_write(0x13, MVVMEMORYWIDTH);
 595         mvv_write(0x42, 0x00);
 596         mvv_write(0x43, 0x00);
 597         mvv_write(0x44, MVVMEMORYWIDTH);
 598
 599         mvv_write(0x22, width+8);
 600         mvv_write(0x23, (width+8)>> 8);
 601
 602         if(standard==1)
 603                 pms_horzdeci(width,640);
 604         else
 605                 pms_horzdeci(width+8, 768);
 606
 607         mvv_write(0x30, mvv_read(0x30)&0xFE);
 608         mvv_write(0x08, mvv_read(0x08)|0x01);
 609         mvv_write(0x01, mvv_read(0x01)&0xFD);
 610         mvv_write(0x32, 0x00);
 611         mvv_write(0x33, MVVMEMORYWIDTH);
 612 }
 613
 614
 615 /*
 616  *      Set Input
 617  */
 618
 619 static void pms_vcrinput(short input)
 620 {
 621         if(decoder==PHILIPS2)
 622                 pms_i2c_andor(0x8A,0x0D,0x7F,(input&1)<<7);
 623         else if(decoder==PHILIPS1)
 624                 pms_i2c_andor(0x42,0x0D,0x7F,(input&1)<<7);
 625 }
 626
 627
 628 static int pms_capture(struct pms_device *dev, char *buf, int rgb555, int count)
 629 {
 630         int y;
 631         int dw = 2*dev->width;
 632         u32 src = mem_base;
 633
 634         char tmp[dw+32]; /* using a temp buffer is faster than direct  */
 635         int cnt = 0;
 636         int len=0;
 637         unsigned char r8 = 0x5;  /* value for reg8  */
 638
 639         if (rgb555)
 640                 r8 |= 0x20; /* else use untranslated rgb = 565 */
 641         mvv_write(0x08,r8); /* capture rgb555/565, init DRAM, PC enable */
 642
 643 /*      printf("%d %d %d %d %d %x %x\n",width,height,voff,nom,den,mvv_buf); */
 644
 645         for (y = 0; y < dev->height; y++ )
 646         {
 647                 isa_writeb(0, src);  /* synchronisiert neue Zeile */
 648
 649                 /*
 650                  *      This is in truth a fifo, be very careful as if you
 651                  *      forgot this odd things will occur 8)
 652                  */
 653
 654                 isa_memcpy_fromio(tmp, src, dw+32); /* discard 16 word   */
 655                 cnt -= dev->height;
 656                 while (cnt <= 0)
 657                 {
 658                         /*
 659                          *      Don't copy too far
 660                          */
 661                         int dt=dw;
 662                         if(dt+len>count)
 663                                 dt=count-len;
 664                         cnt += dev->height;
 665                         if (copy_to_user(buf, tmp+32, dt))
 666                                 return len ? len : -EFAULT;
 667                         buf += dt;
 668                         len += dt;
 669                 }
 670         }
 671         return len;
 672 }
 673
 674
 675 /*
 676  *      Video4linux interfacing
 677  */
 678
 679 static int pms_do_ioctl(struct inode *inode, struct file *file,
 680                         unsigned int cmd, void *arg)
 681 {
 682         struct video_device *dev = video_devdata(file);
 683         struct pms_device *pd=(struct pms_device *)dev;
 684
 685         switch(cmd)
 686         {
 687                 case VIDIOCGCAP:
 688                 {
 689                         struct video_capability *b = arg;
 690                         strcpy(b->name, "Mediavision PMS");
 691                         b->type = VID_TYPE_CAPTURE|VID_TYPE_SCALES;
 692                         b->channels = 4;
 693                         b->audios = 0;
 694                         b->maxwidth = 640;
 695                         b->maxheight = 480;
 696                         b->minwidth = 16;
 697                         b->minheight = 16;
 698                         return 0;
 699                 }
 700                 case VIDIOCGCHAN:
 701                 {
 702                         struct video_channel *v = arg;
 703                         if(v->channel<0 || v->channel>3)
 704                                 return -EINVAL;
 705                         v->flags=0;
 706                         v->tuners=1;
 707                         /* Good question.. its composite or SVHS so.. */
 708                         v->type = VIDEO_TYPE_CAMERA;
 709                         switch(v->channel)
 710                         {
 711                                 case 0:
 712                                         strcpy(v->name, "Composite");break;
 713                                 case 1:
 714                                         strcpy(v->name, "SVideo");break;
 715                                 case 2:
 716                                         strcpy(v->name, "Composite(VCR)");break;
 717                                 case 3:
 718                                         strcpy(v->name, "SVideo(VCR)");break;
 719                         }
 720                         return 0;
 721                 }
 722                 case VIDIOCSCHAN:
 723                 {
 724                         struct video_channel *v = arg;
 725                         if(v->channel<0 || v->channel>3)
 726                                 return -EINVAL;
 727                         down(&pd->lock);
 728                         pms_videosource(v->channel&1);
 729                         pms_vcrinput(v->channel>>1);
 730                         up(&pd->lock);
 731                         return 0;
 732                 }
 733                 case VIDIOCGTUNER:
 734                 {
 735                         struct video_tuner *v = arg;
 736                         if(v->tuner)
 737                                 return -EINVAL;
 738                         strcpy(v->name, "Format");
 739                         v->rangelow=0;
 740                         v->rangehigh=0;
 741                         v->flags= VIDEO_TUNER_PAL|VIDEO_TUNER_NTSC|VIDEO_TUNER_SECAM;
 742                         switch(standard)
 743                         {
 744                                 case 0:
 745                                         v->mode = VIDEO_MODE_AUTO;
 746                                         break;
 747                                 case 1:
 748                                         v->mode = VIDEO_MODE_NTSC;
 749                                         break;
 750                                 case 2:
 751                                         v->mode = VIDEO_MODE_PAL;
 752                                         break;
 753                                 case 3:
 754                                         v->mode = VIDEO_MODE_SECAM;
 755                                         break;
 756                         }
 757                         return 0;
 758                 }
 759                 case VIDIOCSTUNER:
 760                 {
 761                         struct video_tuner *v = arg;
 762                         if(v->tuner)
 763                                 return -EINVAL;
 764                         down(&pd->lock);
 765                         switch(v->mode)
 766                         {
 767                                 case VIDEO_MODE_AUTO:
 768                                         pms_framerate(25);
 769                                         pms_secamcross(0);
 770                                         pms_format(0);
 771                                         break;
 772                                 case VIDEO_MODE_NTSC:
 773                                         pms_framerate(30);
 774                                         pms_secamcross(0);
 775                                         pms_format(1);
 776                                         break;
 777                                 case VIDEO_MODE_PAL:
 778                                         pms_framerate(25);
 779                                         pms_secamcross(0);
 780                                         pms_format(2);
 781                                         break;
 782                                 case VIDEO_MODE_SECAM:
 783                                         pms_framerate(25);
 784                                         pms_secamcross(1);
 785                                         pms_format(2);
 786                                         break;
 787                                 default:
 788                                         up(&pd->lock);
 789                                         return -EINVAL;
 790                         }
 791                         up(&pd->lock);
 792                         return 0;
 793                 }
 794                 case VIDIOCGPICT:
 795                 {
 796                         struct video_picture *p = arg;
 797                         *p = pd->picture;
 798                         return 0;
 799                 }
 800                 case VIDIOCSPICT:
 801                 {
 802                         struct video_picture *p = arg;
 803                         if(!((p->palette==VIDEO_PALETTE_RGB565 && p->depth==16)
 804                             ||(p->palette==VIDEO_PALETTE_RGB555 && p->depth==15)))
 805                                 return -EINVAL;
 806                         pd->picture= *p;
 807
 808                         /*
 809                          *      Now load the card.
 810                          */
 811
 812                         down(&pd->lock);
 813                         pms_brightness(p->brightness>>8);
 814                         pms_hue(p->hue>>8);
 815                         pms_colour(p->colour>>8);
 816                         pms_contrast(p->contrast>>8);
 817                         up(&pd->lock);
 818                         return 0;
 819                 }
 820                 case VIDIOCSWIN:
 821                 {
 822                         struct video_window *vw = arg;
 823                         if(vw->flags)
 824                                 return -EINVAL;
 825                         if(vw->clipcount)
 826                                 return -EINVAL;
 827                         if(vw->height<16||vw->height>480)
 828                                 return -EINVAL;
 829                         if(vw->width<16||vw->width>640)
 830                                 return -EINVAL;
 831                         pd->width=vw->width;
 832                         pd->height=vw->height;
 833                         down(&pd->lock);
 834                         pms_resolution(pd->width, pd->height);
 835                         up(&pd->lock);                  /* Ok we figured out what to use from our wide choice */
 836                         return 0;
 837                 }
 838                 case VIDIOCGWIN:
 839                 {
 840                         struct video_window *vw = arg;
 841                         memset(vw,0,sizeof(*vw));
 842                         vw->width=pd->width;
 843                         vw->height=pd->height;
 844                         return 0;
 845                 }
 846                 case VIDIOCKEY:
 847                         return 0;
 848                 case VIDIOCCAPTURE:
 849                 case VIDIOCGFBUF:
 850                 case VIDIOCSFBUF:
 851                 case VIDIOCGFREQ:
 852                 case VIDIOCSFREQ:
 853                 case VIDIOCGAUDIO:
 854                 case VIDIOCSAUDIO:
 855                         return -EINVAL;
 856                 default:
 857                         return -ENOIOCTLCMD;
 858         }
 859         return 0;
 860 }
 861
 862 static int pms_ioctl(struct inode *inode, struct file *file,
 863                      unsigned int cmd, unsigned long arg)
 864 {
 865         return video_usercopy(inode, file, cmd, arg, pms_do_ioctl);
 866 }
 867
 868 static int pms_read(struct file *file, char *buf,
 869                     size_t count, loff_t *ppos)
 870 {
 871         struct video_device *v = video_devdata(file);
 872         struct pms_device *pd=(struct pms_device *)v;
 873         int len;
 874
 875         down(&pd->lock);
 876         len=pms_capture(pd, buf, (pd->picture.depth==16)?0:1,count);
 877         up(&pd->lock);
 878         return len;
 879 }
 880
 881 static struct file_operations pms_fops = {
 882         .owner          = THIS_MODULE,
 883         .open           = video_exclusive_open,
 884         .release        = video_exclusive_release,
 885         .ioctl          = pms_ioctl,
 886         .read           = pms_read,
 887         .llseek         = no_llseek,
 888 };
 889
 890 static struct video_device pms_template=
 891 {
 892         .owner          = THIS_MODULE,
 893         .name           = "Mediavision PMS",
 894         .type           = VID_TYPE_CAPTURE,
 895         .hardware       = VID_HARDWARE_PMS,
 896         .fops           = &pms_fops,
 897 };
 898
 899 struct pms_device pms_device;
 900
 901
 902 /*
 903  *      Probe for and initialise the Mediavision PMS
 904  */
 905
 906 static int init_mediavision(void)
 907 {
 908         int id;
 909         int idec, decst;
 910         int i;
 911
 912         unsigned char i2c_defs[]={
 913                 0x4C,0x30,0x00,0xE8,
 914                 0xB6,0xE2,0x00,0x00,
 915                 0xFF,0xFF,0x00,0x00,
 916                 0x00,0x00,0x78,0x98,
 917                 0x00,0x00,0x00,0x00,
 918                 0x34,0x0A,0xF4,0xCE,
 919                 0xE4
 920         };
 921
 922         if (!request_region(0x9A01, 1, "Mediavision PMS config"))
 923         {
 924                 printk(KERN_WARNING "mediavision: unable to detect: 0x9A01 in use.\n");
 925                 return -EBUSY;
 926         }
 927         if (!request_region(io_port, 3, "Mediavision PMS"))
 928         {
 929                 printk(KERN_WARNING "mediavision: I/O port %d in use.\n", io_port);
 930                 release_region(0x9A01, 1);
 931                 return -EBUSY;
 932         }
 933         outb(0xB8, 0x9A01);             /* Unlock */
 934         outb(io_port>>4, 0x9A01);       /* Set IO port */
 935
 936
 937         id=mvv_read(3);
 938         decst=pms_i2c_stat(0x43);
 939
 940         if(decst!=-1)
 941                 idec=2;
 942         else if(pms_i2c_stat(0xb9)!=-1)
 943                 idec=3;
 944         else if(pms_i2c_stat(0x8b)!=-1)
 945                 idec=1;
 946         else
 947                 idec=0;
 948
 949         printk(KERN_INFO "PMS type is %d\n", idec);
 950         if(idec == 0) {
 951                 release_region(io_port, 3);
 952                 release_region(0x9A01, 1);
 953                 return -ENODEV;
 954         }
 955
 956         /*
 957          *      Ok we have a PMS of some sort
 958          */
 959
 960         mvv_write(0x04, mem_base>>12);  /* Set the memory area */
 961
 962         /* Ok now load the defaults */
 963
 964         for(i=0;i<0x19;i++)
 965         {
 966                 if(i2c_defs[i]==0xFF)
 967                         pms_i2c_andor(0x8A, i, 0x07,0x00);
 968                 else
 969                         pms_i2c_write(0x8A, i, i2c_defs[i]);
 970         }
 971
 972         pms_i2c_write(0xB8,0x00,0x12);
 973         pms_i2c_write(0xB8,0x04,0x00);
 974         pms_i2c_write(0xB8,0x07,0x00);
 975         pms_i2c_write(0xB8,0x08,0x00);
 976         pms_i2c_write(0xB8,0x09,0xFF);
 977         pms_i2c_write(0xB8,0x0A,0x00);
 978         pms_i2c_write(0xB8,0x0B,0x10);
 979         pms_i2c_write(0xB8,0x10,0x03);
 980
 981         mvv_write(0x01, 0x00);
 982         mvv_write(0x05, 0xA0);
 983         mvv_write(0x08, 0x25);
 984         mvv_write(0x09, 0x00);
 985         mvv_write(0x0A, 0x20|MVVMEMORYWIDTH);
 986
 987         mvv_write(0x10, 0x02);
 988         mvv_write(0x1E, 0x0C);
 989         mvv_write(0x1F, 0x03);
 990         mvv_write(0x26, 0x06);
 991
 992         mvv_write(0x2B, 0x00);
 993         mvv_write(0x2C, 0x20);
 994         mvv_write(0x2D, 0x00);
 995         mvv_write(0x2F, 0x70);
 996         mvv_write(0x32, 0x00);
 997         mvv_write(0x33, MVVMEMORYWIDTH);
 998         mvv_write(0x34, 0x00);
 999         mvv_write(0x35, 0x00);
1000         mvv_write(0x3A, 0x80);
1001         mvv_write(0x3B, 0x10);
1002         mvv_write(0x20, 0x00);
1003         mvv_write(0x21, 0x00);
1004         mvv_write(0x30, 0x22);
1005         return 0;
1006 }
1007
1008 /*
1009  *      Initialization and module stuff
1010  */
1011
1012 static int __init init_pms_cards(void)
1013 {
1014         printk(KERN_INFO "Mediavision Pro Movie Studio driver 0.02\n");
1015
1016         data_port = io_port +1;
1017
1018         if(init_mediavision())
1019         {
1020                 printk(KERN_INFO "Board not found.\n");
1021                 return -ENODEV;
1022         }
1023         memcpy(&pms_device, &pms_template, sizeof(pms_template));
1024         init_MUTEX(&pms_device.lock);
1025         pms_device.height=240;
1026         pms_device.width=320;
1027         pms_swsense(75);
1028         pms_resolution(320,240);
1029         return video_register_device((struct video_device *)&pms_device, VFL_TYPE_GRABBER, video_nr);
1030 }
1031
1032 MODULE_PARM(io_port,"i");
1033 MODULE_PARM(mem_base,"i");
1034 MODULE_PARM(video_nr,"i");
1035 MODULE_LICENSE("GPL");
1036
1037
1038 static void __exit shutdown_mediavision(void)
1039 {
1040         release_region(io_port,3);
1041         release_region(0x9A01, 1);
1042 }
1043
1044 static void __exit cleanup_pms_module(void)
1045 {
1046         shutdown_mediavision();
1047         video_unregister_device((struct video_device *)&pms_device);
1048 }
1049
1050 module_init(init_pms_cards);
1051 module_exit(cleanup_pms_module);
1052