err.no Git - linux-2.6/blob - drivers/media/dvb/dvb-core/dvb_frontend.c

   1 /*
   2  * dvb_frontend.c: DVB frontend tuning interface/thread
   3  *
   4  *
   5  * Copyright (C) 1999-2001 Ralph  Metzler
   6  *                         Marcus Metzler
   7  *                         Holger Waechtler
   8  *                                    for convergence integrated media GmbH
   9  *
  10  * Copyright (C) 2004 Andrew de Quincey (tuning thread cleanup)
  11  *
  12  * This program is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU General Public License
  14  * as published by the Free Software Foundation; either version 2
  15  * of the License, or (at your option) any later version.
  16  *
  17  * This program is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20  * GNU General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU General Public License
  23  * along with this program; if not, write to the Free Software
  24  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  25  * Or, point your browser to http://www.gnu.org/copyleft/gpl.html
  26  */
  27
  28 #include <linux/string.h>
  29 #include <linux/kernel.h>
  30 #include <linux/sched.h>
  31 #include <linux/wait.h>
  32 #include <linux/slab.h>
  33 #include <linux/poll.h>
  34 #include <linux/module.h>
  35 #include <linux/moduleparam.h>
  36 #include <linux/list.h>
  37 #include <linux/suspend.h>
  38 #include <linux/jiffies.h>
  39 #include <asm/processor.h>
  40
  41 #include "dvb_frontend.h"
  42 #include "dvbdev.h"
  43
  44 static int dvb_frontend_debug;
  45 static int dvb_shutdown_timeout = 5;
  46 static int dvb_force_auto_inversion;
  47 static int dvb_override_tune_delay;
  48 static int dvb_powerdown_on_sleep = 1;
  49
  50 module_param_named(frontend_debug, dvb_frontend_debug, int, 0644);
  51 MODULE_PARM_DESC(frontend_debug, "Turn on/off frontend core debugging (default:off).");
  52 module_param(dvb_shutdown_timeout, int, 0644);
  53 MODULE_PARM_DESC(dvb_shutdown_timeout, "wait <shutdown_timeout> seconds after close() before suspending hardware");
  54 module_param(dvb_force_auto_inversion, int, 0644);
  55 MODULE_PARM_DESC(dvb_force_auto_inversion, "0: normal (default), 1: INVERSION_AUTO forced always");
  56 module_param(dvb_override_tune_delay, int, 0644);
  57 MODULE_PARM_DESC(dvb_override_tune_delay, "0: normal (default), >0 => delay in milliseconds to wait for lock after a tune attempt");
  58 module_param(dvb_powerdown_on_sleep, int, 0644);
  59 MODULE_PARM_DESC(dvb_powerdown_on_sleep, "0: do not power down, 1: turn LNB voltage off on sleep (default)");
  60
  61 #define dprintk if (dvb_frontend_debug) printk
  62
  63 #define FESTATE_IDLE 1
  64 #define FESTATE_RETUNE 2
  65 #define FESTATE_TUNING_FAST 4
  66 #define FESTATE_TUNING_SLOW 8
  67 #define FESTATE_TUNED 16
  68 #define FESTATE_ZIGZAG_FAST 32
  69 #define FESTATE_ZIGZAG_SLOW 64
  70 #define FESTATE_DISEQC 128
  71 #define FESTATE_WAITFORLOCK (FESTATE_TUNING_FAST | FESTATE_TUNING_SLOW | FESTATE_ZIGZAG_FAST | FESTATE_ZIGZAG_SLOW | FESTATE_DISEQC)
  72 #define FESTATE_SEARCHING_FAST (FESTATE_TUNING_FAST | FESTATE_ZIGZAG_FAST)
  73 #define FESTATE_SEARCHING_SLOW (FESTATE_TUNING_SLOW | FESTATE_ZIGZAG_SLOW)
  74 #define FESTATE_LOSTLOCK (FESTATE_ZIGZAG_FAST | FESTATE_ZIGZAG_SLOW)
  75 /*
  76  * FESTATE_IDLE. No tuning parameters have been supplied and the loop is idling.
  77  * FESTATE_RETUNE. Parameters have been supplied, but we have not yet performed the first tune.
  78  * FESTATE_TUNING_FAST. Tuning parameters have been supplied and fast zigzag scan is in progress.
  79  * FESTATE_TUNING_SLOW. Tuning parameters have been supplied. Fast zigzag failed, so we're trying again, but slower.
  80  * FESTATE_TUNED. The frontend has successfully locked on.
  81  * FESTATE_ZIGZAG_FAST. The lock has been lost, and a fast zigzag has been initiated to try and regain it.
  82  * FESTATE_ZIGZAG_SLOW. The lock has been lost. Fast zigzag has been failed, so we're trying again, but slower.
  83  * FESTATE_DISEQC. A DISEQC command has just been issued.
  84  * FESTATE_WAITFORLOCK. When we're waiting for a lock.
  85  * FESTATE_SEARCHING_FAST. When we're searching for a signal using a fast zigzag scan.
  86  * FESTATE_SEARCHING_SLOW. When we're searching for a signal using a slow zigzag scan.
  87  * FESTATE_LOSTLOCK. When the lock has been lost, and we're searching it again.
  88  */
  89
  90 static DEFINE_MUTEX(frontend_mutex);
  91
  92 struct dvb_frontend_private {
  93
  94         /* thread/frontend values */
  95         struct dvb_device *dvbdev;
  96         struct dvb_frontend_parameters parameters;
  97         struct dvb_fe_events events;
  98         struct semaphore sem;
  99         struct list_head list_head;
 100         wait_queue_head_t wait_queue;
 101         pid_t thread_pid;
 102         unsigned long release_jiffies;
 103         unsigned int exit;
 104         unsigned int wakeup;
 105         fe_status_t status;
 106         unsigned long tune_mode_flags;
 107         unsigned int delay;
 108         unsigned int reinitialise;
 109         int tone;
 110         int voltage;
 111
 112         /* swzigzag values */
 113         unsigned int state;
 114         unsigned int bending;
 115         int lnb_drift;
 116         unsigned int inversion;
 117         unsigned int auto_step;
 118         unsigned int auto_sub_step;
 119         unsigned int started_auto_step;
 120         unsigned int min_delay;
 121         unsigned int max_drift;
 122         unsigned int step_size;
 123         int quality;
 124         unsigned int check_wrapped;
 125 };
 126
 127 static void dvb_frontend_wakeup(struct dvb_frontend *fe);
 128
 129 static void dvb_frontend_add_event(struct dvb_frontend *fe, fe_status_t status)
 130 {
 131         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 132         struct dvb_fe_events *events = &fepriv->events;
 133         struct dvb_frontend_event *e;
 134         int wp;
 135
 136         dprintk ("%s\n", __FUNCTION__);
 137
 138         if (down_interruptible (&events->sem))
 139                 return;
 140
 141         wp = (events->eventw + 1) % MAX_EVENT;
 142
 143         if (wp == events->eventr) {
 144                 events->overflow = 1;
 145                 events->eventr = (events->eventr + 1) % MAX_EVENT;
 146         }
 147
 148         e = &events->events[events->eventw];
 149
 150         memcpy (&e->parameters, &fepriv->parameters,
 151                 sizeof (struct dvb_frontend_parameters));
 152
 153         if (status & FE_HAS_LOCK)
 154                 if (fe->ops.get_frontend)
 155                         fe->ops.get_frontend(fe, &e->parameters);
 156
 157         events->eventw = wp;
 158
 159         up (&events->sem);
 160
 161         e->status = status;
 162
 163         wake_up_interruptible (&events->wait_queue);
 164 }
 165
 166 static int dvb_frontend_get_event(struct dvb_frontend *fe,
 167                             struct dvb_frontend_event *event, int flags)
 168 {
 169         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 170         struct dvb_fe_events *events = &fepriv->events;
 171
 172         dprintk ("%s\n", __FUNCTION__);
 173
 174         if (events->overflow) {
 175                 events->overflow = 0;
 176                 return -EOVERFLOW;
 177         }
 178
 179         if (events->eventw == events->eventr) {
 180                 int ret;
 181
 182                 if (flags & O_NONBLOCK)
 183                         return -EWOULDBLOCK;
 184
 185                 up(&fepriv->sem);
 186
 187                 ret = wait_event_interruptible (events->wait_queue,
 188                                                 events->eventw != events->eventr);
 189
 190                 if (down_interruptible (&fepriv->sem))
 191                         return -ERESTARTSYS;
 192
 193                 if (ret < 0)
 194                         return ret;
 195         }
 196
 197         if (down_interruptible (&events->sem))
 198                 return -ERESTARTSYS;
 199
 200         memcpy (event, &events->events[events->eventr],
 201                 sizeof(struct dvb_frontend_event));
 202
 203         events->eventr = (events->eventr + 1) % MAX_EVENT;
 204
 205         up (&events->sem);
 206
 207         return 0;
 208 }
 209
 210 static void dvb_frontend_init(struct dvb_frontend *fe)
 211 {
 212         dprintk ("DVB: initialising frontend %i (%s)...\n",
 213                  fe->dvb->num,
 214                  fe->ops.info.name);
 215
 216         if (fe->ops.init)
 217                 fe->ops.init(fe);
 218         if (fe->ops.tuner_ops.init) {
 219                 fe->ops.tuner_ops.init(fe);
 220                 if (fe->ops.i2c_gate_ctrl)
 221                         fe->ops.i2c_gate_ctrl(fe, 0);
 222         }
 223 }
 224
 225 void dvb_frontend_reinitialise(struct dvb_frontend *fe)
 226 {
 227         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 228
 229         fepriv->reinitialise = 1;
 230         dvb_frontend_wakeup(fe);
 231 }
 232 EXPORT_SYMBOL(dvb_frontend_reinitialise);
 233
 234 static void dvb_frontend_swzigzag_update_delay(struct dvb_frontend_private *fepriv, int locked)
 235 {
 236         int q2;
 237
 238         dprintk ("%s\n", __FUNCTION__);
 239
 240         if (locked)
 241                 (fepriv->quality) = (fepriv->quality * 220 + 36*256) / 256;
 242         else
 243                 (fepriv->quality) = (fepriv->quality * 220 + 0) / 256;
 244
 245         q2 = fepriv->quality - 128;
 246         q2 *= q2;
 247
 248         fepriv->delay = fepriv->min_delay + q2 * HZ / (128*128);
 249 }
 250
 251 /**
 252  * Performs automatic twiddling of frontend parameters.
 253  *
 254  * @param fe The frontend concerned.
 255  * @param check_wrapped Checks if an iteration has completed. DO NOT SET ON THE FIRST ATTEMPT
 256  * @returns Number of complete iterations that have been performed.
 257  */
 258 static int dvb_frontend_swzigzag_autotune(struct dvb_frontend *fe, int check_wrapped)
 259 {
 260         int autoinversion;
 261         int ready = 0;
 262         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 263         int original_inversion = fepriv->parameters.inversion;
 264         u32 original_frequency = fepriv->parameters.frequency;
 265
 266         /* are we using autoinversion? */
 267         autoinversion = ((!(fe->ops.info.caps & FE_CAN_INVERSION_AUTO)) &&
 268                          (fepriv->parameters.inversion == INVERSION_AUTO));
 269
 270         /* setup parameters correctly */
 271         while(!ready) {
 272                 /* calculate the lnb_drift */
 273                 fepriv->lnb_drift = fepriv->auto_step * fepriv->step_size;
 274
 275                 /* wrap the auto_step if we've exceeded the maximum drift */
 276                 if (fepriv->lnb_drift > fepriv->max_drift) {
 277                         fepriv->auto_step = 0;
 278                         fepriv->auto_sub_step = 0;
 279                         fepriv->lnb_drift = 0;
 280                 }
 281
 282                 /* perform inversion and +/- zigzag */
 283                 switch(fepriv->auto_sub_step) {
 284                 case 0:
 285                         /* try with the current inversion and current drift setting */
 286                         ready = 1;
 287                         break;
 288
 289                 case 1:
 290                         if (!autoinversion) break;
 291
 292                         fepriv->inversion = (fepriv->inversion == INVERSION_OFF) ? INVERSION_ON : INVERSION_OFF;
 293                         ready = 1;
 294                         break;
 295
 296                 case 2:
 297                         if (fepriv->lnb_drift == 0) break;
 298
 299                         fepriv->lnb_drift = -fepriv->lnb_drift;
 300                         ready = 1;
 301                         break;
 302
 303                 case 3:
 304                         if (fepriv->lnb_drift == 0) break;
 305                         if (!autoinversion) break;
 306
 307                         fepriv->inversion = (fepriv->inversion == INVERSION_OFF) ? INVERSION_ON : INVERSION_OFF;
 308                         fepriv->lnb_drift = -fepriv->lnb_drift;
 309                         ready = 1;
 310                         break;
 311
 312                 default:
 313                         fepriv->auto_step++;
 314                         fepriv->auto_sub_step = -1; /* it'll be incremented to 0 in a moment */
 315                         break;
 316                 }
 317
 318                 if (!ready) fepriv->auto_sub_step++;
 319         }
 320
 321         /* if this attempt would hit where we started, indicate a complete
 322          * iteration has occurred */
 323         if ((fepriv->auto_step == fepriv->started_auto_step) &&
 324             (fepriv->auto_sub_step == 0) && check_wrapped) {
 325                 return 1;
 326         }
 327
 328         dprintk("%s: drift:%i inversion:%i auto_step:%i "
 329                 "auto_sub_step:%i started_auto_step:%i\n",
 330                 __FUNCTION__, fepriv->lnb_drift, fepriv->inversion,
 331                 fepriv->auto_step, fepriv->auto_sub_step, fepriv->started_auto_step);
 332
 333         /* set the frontend itself */
 334         fepriv->parameters.frequency += fepriv->lnb_drift;
 335         if (autoinversion)
 336                 fepriv->parameters.inversion = fepriv->inversion;
 337         if (fe->ops.set_frontend)
 338                 fe->ops.set_frontend(fe, &fepriv->parameters);
 339
 340         fepriv->parameters.frequency = original_frequency;
 341         fepriv->parameters.inversion = original_inversion;
 342
 343         fepriv->auto_sub_step++;
 344         return 0;
 345 }
 346
 347 static void dvb_frontend_swzigzag(struct dvb_frontend *fe)
 348 {
 349         fe_status_t s;
 350         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 351
 352         /* if we've got no parameters, just keep idling */
 353         if (fepriv->state & FESTATE_IDLE) {
 354                 fepriv->delay = 3*HZ;
 355                 fepriv->quality = 0;
 356                 return;
 357         }
 358
 359         /* in SCAN mode, we just set the frontend when asked and leave it alone */
 360         if (fepriv->tune_mode_flags & FE_TUNE_MODE_ONESHOT) {
 361                 if (fepriv->state & FESTATE_RETUNE) {
 362                         if (fe->ops.set_frontend)
 363                                 fe->ops.set_frontend(fe, &fepriv->parameters);
 364                         fepriv->state = FESTATE_TUNED;
 365                 }
 366                 fepriv->delay = 3*HZ;
 367                 fepriv->quality = 0;
 368                 return;
 369         }
 370
 371         /* get the frontend status */
 372         if (fepriv->state & FESTATE_RETUNE) {
 373                 s = 0;
 374         } else {
 375                 if (fe->ops.read_status)
 376                         fe->ops.read_status(fe, &s);
 377                 if (s != fepriv->status) {
 378                         dvb_frontend_add_event(fe, s);
 379                         fepriv->status = s;
 380                 }
 381         }
 382
 383         /* if we're not tuned, and we have a lock, move to the TUNED state */
 384         if ((fepriv->state & FESTATE_WAITFORLOCK) && (s & FE_HAS_LOCK)) {
 385                 dvb_frontend_swzigzag_update_delay(fepriv, s & FE_HAS_LOCK);
 386                 fepriv->state = FESTATE_TUNED;
 387
 388                 /* if we're tuned, then we have determined the correct inversion */
 389                 if ((!(fe->ops.info.caps & FE_CAN_INVERSION_AUTO)) &&
 390                     (fepriv->parameters.inversion == INVERSION_AUTO)) {
 391                         fepriv->parameters.inversion = fepriv->inversion;
 392                 }
 393                 return;
 394         }
 395
 396         /* if we are tuned already, check we're still locked */
 397         if (fepriv->state & FESTATE_TUNED) {
 398                 dvb_frontend_swzigzag_update_delay(fepriv, s & FE_HAS_LOCK);
 399
 400                 /* we're tuned, and the lock is still good... */
 401                 if (s & FE_HAS_LOCK) {
 402                         return;
 403                 } else { /* if we _WERE_ tuned, but now don't have a lock */
 404                         fepriv->state = FESTATE_ZIGZAG_FAST;
 405                         fepriv->started_auto_step = fepriv->auto_step;
 406                         fepriv->check_wrapped = 0;
 407                 }
 408         }
 409
 410         /* don't actually do anything if we're in the LOSTLOCK state,
 411          * the frontend is set to FE_CAN_RECOVER, and the max_drift is 0 */
 412         if ((fepriv->state & FESTATE_LOSTLOCK) &&
 413             (fe->ops.info.caps & FE_CAN_RECOVER) && (fepriv->max_drift == 0)) {
 414                 dvb_frontend_swzigzag_update_delay(fepriv, s & FE_HAS_LOCK);
 415                 return;
 416         }
 417
 418         /* don't do anything if we're in the DISEQC state, since this
 419          * might be someone with a motorized dish controlled by DISEQC.
 420          * If its actually a re-tune, there will be a SET_FRONTEND soon enough. */
 421         if (fepriv->state & FESTATE_DISEQC) {
 422                 dvb_frontend_swzigzag_update_delay(fepriv, s & FE_HAS_LOCK);
 423                 return;
 424         }
 425
 426         /* if we're in the RETUNE state, set everything up for a brand
 427          * new scan, keeping the current inversion setting, as the next
 428          * tune is _very_ likely to require the same */
 429         if (fepriv->state & FESTATE_RETUNE) {
 430                 fepriv->lnb_drift = 0;
 431                 fepriv->auto_step = 0;
 432                 fepriv->auto_sub_step = 0;
 433                 fepriv->started_auto_step = 0;
 434                 fepriv->check_wrapped = 0;
 435         }
 436
 437         /* fast zigzag. */
 438         if ((fepriv->state & FESTATE_SEARCHING_FAST) || (fepriv->state & FESTATE_RETUNE)) {
 439                 fepriv->delay = fepriv->min_delay;
 440
 441                 /* peform a tune */
 442                 if (dvb_frontend_swzigzag_autotune(fe, fepriv->check_wrapped)) {
 443                         /* OK, if we've run out of trials at the fast speed.
 444                          * Drop back to slow for the _next_ attempt */
 445                         fepriv->state = FESTATE_SEARCHING_SLOW;
 446                         fepriv->started_auto_step = fepriv->auto_step;
 447                         return;
 448                 }
 449                 fepriv->check_wrapped = 1;
 450
 451                 /* if we've just retuned, enter the ZIGZAG_FAST state.
 452                  * This ensures we cannot return from an
 453                  * FE_SET_FRONTEND ioctl before the first frontend tune
 454                  * occurs */
 455                 if (fepriv->state & FESTATE_RETUNE) {
 456                         fepriv->state = FESTATE_TUNING_FAST;
 457                 }
 458         }
 459
 460         /* slow zigzag */
 461         if (fepriv->state & FESTATE_SEARCHING_SLOW) {
 462                 dvb_frontend_swzigzag_update_delay(fepriv, s & FE_HAS_LOCK);
 463
 464                 /* Note: don't bother checking for wrapping; we stay in this
 465                  * state until we get a lock */
 466                 dvb_frontend_swzigzag_autotune(fe, 0);
 467         }
 468 }
 469
 470 static int dvb_frontend_is_exiting(struct dvb_frontend *fe)
 471 {
 472         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 473
 474         if (fepriv->exit)
 475                 return 1;
 476
 477         if (fepriv->dvbdev->writers == 1)
 478                 if (time_after(jiffies, fepriv->release_jiffies +
 479                                   dvb_shutdown_timeout * HZ))
 480                         return 1;
 481
 482         return 0;
 483 }
 484
 485 static int dvb_frontend_should_wakeup(struct dvb_frontend *fe)
 486 {
 487         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 488
 489         if (fepriv->wakeup) {
 490                 fepriv->wakeup = 0;
 491                 return 1;
 492         }
 493         return dvb_frontend_is_exiting(fe);
 494 }
 495
 496 static void dvb_frontend_wakeup(struct dvb_frontend *fe)
 497 {
 498         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 499
 500         fepriv->wakeup = 1;
 501         wake_up_interruptible(&fepriv->wait_queue);
 502 }
 503
 504 static int dvb_frontend_thread(void *data)
 505 {
 506         struct dvb_frontend *fe = data;
 507         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 508         unsigned long timeout;
 509         char name [15];
 510         fe_status_t s;
 511         struct dvb_frontend_parameters *params;
 512
 513         dprintk("%s\n", __FUNCTION__);
 514
 515         snprintf (name, sizeof(name), "kdvb-fe-%i", fe->dvb->num);
 516
 517         lock_kernel();
 518         daemonize(name);
 519         sigfillset(&current->blocked);
 520         unlock_kernel();
 521
 522         fepriv->check_wrapped = 0;
 523         fepriv->quality = 0;
 524         fepriv->delay = 3*HZ;
 525         fepriv->status = 0;
 526         fepriv->wakeup = 0;
 527         fepriv->reinitialise = 1;
 528
 529         while (1) {
 530                 up(&fepriv->sem);           /* is locked when we enter the thread... */
 531
 532                 timeout = wait_event_interruptible_timeout(fepriv->wait_queue,
 533                                                            dvb_frontend_should_wakeup(fe),
 534                                                            fepriv->delay);
 535                 if (0 != dvb_frontend_is_exiting(fe)) {
 536                         /* got signal or quitting */
 537                         break;
 538                 }
 539
 540                 try_to_freeze();
 541
 542                 if (down_interruptible(&fepriv->sem))
 543                         break;
 544
 545                 if (fepriv->reinitialise) {
 546                         dvb_frontend_init(fe);
 547                         if (fepriv->tone != -1) {
 548                                 fe->ops.set_tone(fe, fepriv->tone);
 549                         }
 550                         if (fepriv->voltage != -1) {
 551                                 fe->ops.set_voltage(fe, fepriv->voltage);
 552                         }
 553                         fepriv->reinitialise = 0;
 554                 }
 555
 556                 /* do an iteration of the tuning loop */
 557                 if (fe->ops.tune) {
 558                         /* have we been asked to retune? */
 559                         params = NULL;
 560                         if (fepriv->state & FESTATE_RETUNE) {
 561                                 params = &fepriv->parameters;
 562                                 fepriv->state = FESTATE_TUNED;
 563                         }
 564
 565                         fe->ops.tune(fe, params, fepriv->tune_mode_flags, &fepriv->delay, &s);
 566                         if (s != fepriv->status) {
 567                                 dvb_frontend_add_event(fe, s);
 568                                 fepriv->status = s;
 569                         }
 570                 } else {
 571                         dvb_frontend_swzigzag(fe);
 572                 }
 573         }
 574
 575         if (dvb_shutdown_timeout) {
 576                 if (dvb_powerdown_on_sleep)
 577                         if (fe->ops.set_voltage)
 578                                 fe->ops.set_voltage(fe, SEC_VOLTAGE_OFF);
 579                 if (fe->ops.tuner_ops.sleep) {
 580                         fe->ops.tuner_ops.sleep(fe);
 581                         if (fe->ops.i2c_gate_ctrl)
 582                                 fe->ops.i2c_gate_ctrl(fe, 0);
 583                 }
 584                 if (fe->ops.sleep)
 585                         fe->ops.sleep(fe);
 586         }
 587
 588         fepriv->thread_pid = 0;
 589         mb();
 590
 591         dvb_frontend_wakeup(fe);
 592         return 0;
 593 }
 594
 595 static void dvb_frontend_stop(struct dvb_frontend *fe)
 596 {
 597         unsigned long ret;
 598         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 599
 600         dprintk ("%s\n", __FUNCTION__);
 601
 602         fepriv->exit = 1;
 603         mb();
 604
 605         if (!fepriv->thread_pid)
 606                 return;
 607
 608         /* check if the thread is really alive */
 609         if (kill_proc(fepriv->thread_pid, 0, 1) == -ESRCH) {
 610                 printk("dvb_frontend_stop: thread PID %d already died\n",
 611                                 fepriv->thread_pid);
 612                 /* make sure the mutex was not held by the thread */
 613                 init_MUTEX (&fepriv->sem);
 614                 return;
 615         }
 616
 617         /* wake up the frontend thread, so it notices that fe->exit == 1 */
 618         dvb_frontend_wakeup(fe);
 619
 620         /* wait until the frontend thread has exited */
 621         ret = wait_event_interruptible(fepriv->wait_queue,0 == fepriv->thread_pid);
 622         if (-ERESTARTSYS != ret) {
 623                 fepriv->state = FESTATE_IDLE;
 624                 return;
 625         }
 626         fepriv->state = FESTATE_IDLE;
 627
 628         /* paranoia check in case a signal arrived */
 629         if (fepriv->thread_pid)
 630                 printk("dvb_frontend_stop: warning: thread PID %d won't exit\n",
 631                                 fepriv->thread_pid);
 632 }
 633
 634 s32 timeval_usec_diff(struct timeval lasttime, struct timeval curtime)
 635 {
 636         return ((curtime.tv_usec < lasttime.tv_usec) ?
 637                 1000000 - lasttime.tv_usec + curtime.tv_usec :
 638                 curtime.tv_usec - lasttime.tv_usec);
 639 }
 640 EXPORT_SYMBOL(timeval_usec_diff);
 641
 642 static inline void timeval_usec_add(struct timeval *curtime, u32 add_usec)
 643 {
 644         curtime->tv_usec += add_usec;
 645         if (curtime->tv_usec >= 1000000) {
 646                 curtime->tv_usec -= 1000000;
 647                 curtime->tv_sec++;
 648         }
 649 }
 650
 651 /*
 652  * Sleep until gettimeofday() > waketime + add_usec
 653  * This needs to be as precise as possible, but as the delay is
 654  * usually between 2ms and 32ms, it is done using a scheduled msleep
 655  * followed by usleep (normally a busy-wait loop) for the remainder
 656  */
 657 void dvb_frontend_sleep_until(struct timeval *waketime, u32 add_usec)
 658 {
 659         struct timeval lasttime;
 660         s32 delta, newdelta;
 661
 662         timeval_usec_add(waketime, add_usec);
 663
 664         do_gettimeofday(&lasttime);
 665         delta = timeval_usec_diff(lasttime, *waketime);
 666         if (delta > 2500) {
 667                 msleep((delta - 1500) / 1000);
 668                 do_gettimeofday(&lasttime);
 669                 newdelta = timeval_usec_diff(lasttime, *waketime);
 670                 delta = (newdelta > delta) ? 0 : newdelta;
 671         }
 672         if (delta > 0)
 673                 udelay(delta);
 674 }
 675 EXPORT_SYMBOL(dvb_frontend_sleep_until);
 676
 677 static int dvb_frontend_start(struct dvb_frontend *fe)
 678 {
 679         int ret;
 680         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 681
 682         dprintk ("%s\n", __FUNCTION__);
 683
 684         if (fepriv->thread_pid) {
 685                 if (!fepriv->exit)
 686                         return 0;
 687                 else
 688                         dvb_frontend_stop (fe);
 689         }
 690
 691         if (signal_pending(current))
 692                 return -EINTR;
 693         if (down_interruptible (&fepriv->sem))
 694                 return -EINTR;
 695
 696         fepriv->state = FESTATE_IDLE;
 697         fepriv->exit = 0;
 698         fepriv->thread_pid = 0;
 699         mb();
 700
 701         ret = kernel_thread (dvb_frontend_thread, fe, 0);
 702
 703         if (ret < 0) {
 704                 printk("dvb_frontend_start: failed to start kernel_thread (%d)\n", ret);
 705                 up(&fepriv->sem);
 706                 return ret;
 707         }
 708         fepriv->thread_pid = ret;
 709
 710         return 0;
 711 }
 712
 713 static int dvb_frontend_ioctl(struct inode *inode, struct file *file,
 714                         unsigned int cmd, void *parg)
 715 {
 716         struct dvb_device *dvbdev = file->private_data;
 717         struct dvb_frontend *fe = dvbdev->priv;
 718         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 719         int err = -EOPNOTSUPP;
 720
 721         dprintk ("%s\n", __FUNCTION__);
 722
 723         if (!fe || fepriv->exit)
 724                 return -ENODEV;
 725
 726         if ((file->f_flags & O_ACCMODE) == O_RDONLY &&
 727             (_IOC_DIR(cmd) != _IOC_READ || cmd == FE_GET_EVENT ||
 728              cmd == FE_DISEQC_RECV_SLAVE_REPLY))
 729                 return -EPERM;
 730
 731         if (down_interruptible (&fepriv->sem))
 732                 return -ERESTARTSYS;
 733
 734         switch (cmd) {
 735         case FE_GET_INFO: {
 736                 struct dvb_frontend_info* info = parg;
 737                 memcpy(info, &fe->ops.info, sizeof(struct dvb_frontend_info));
 738
 739                 /* Force the CAN_INVERSION_AUTO bit on. If the frontend doesn't
 740                  * do it, it is done for it. */
 741                 info->caps |= FE_CAN_INVERSION_AUTO;
 742                 err = 0;
 743                 break;
 744         }
 745
 746         case FE_READ_STATUS: {
 747                 fe_status_t* status = parg;
 748
 749                 /* if retune was requested but hasn't occured yet, prevent
 750                  * that user get signal state from previous tuning */
 751                 if(fepriv->state == FESTATE_RETUNE) {
 752                         err=0;
 753                         *status = 0;
 754                         break;
 755                 }
 756
 757                 if (fe->ops.read_status)
 758                         err = fe->ops.read_status(fe, status);
 759                 break;
 760         }
 761         case FE_READ_BER:
 762                 if (fe->ops.read_ber)
 763                         err = fe->ops.read_ber(fe, (__u32*) parg);
 764                 break;
 765
 766         case FE_READ_SIGNAL_STRENGTH:
 767                 if (fe->ops.read_signal_strength)
 768                         err = fe->ops.read_signal_strength(fe, (__u16*) parg);
 769                 break;
 770
 771         case FE_READ_SNR:
 772                 if (fe->ops.read_snr)
 773                         err = fe->ops.read_snr(fe, (__u16*) parg);
 774                 break;
 775
 776         case FE_READ_UNCORRECTED_BLOCKS:
 777                 if (fe->ops.read_ucblocks)
 778                         err = fe->ops.read_ucblocks(fe, (__u32*) parg);
 779                 break;
 780
 781
 782         case FE_DISEQC_RESET_OVERLOAD:
 783                 if (fe->ops.diseqc_reset_overload) {
 784                         err = fe->ops.diseqc_reset_overload(fe);
 785                         fepriv->state = FESTATE_DISEQC;
 786                         fepriv->status = 0;
 787                 }
 788                 break;
 789
 790         case FE_DISEQC_SEND_MASTER_CMD:
 791                 if (fe->ops.diseqc_send_master_cmd) {
 792                         err = fe->ops.diseqc_send_master_cmd(fe, (struct dvb_diseqc_master_cmd*) parg);
 793                         fepriv->state = FESTATE_DISEQC;
 794                         fepriv->status = 0;
 795                 }
 796                 break;
 797
 798         case FE_DISEQC_SEND_BURST:
 799                 if (fe->ops.diseqc_send_burst) {
 800                         err = fe->ops.diseqc_send_burst(fe, (fe_sec_mini_cmd_t) parg);
 801                         fepriv->state = FESTATE_DISEQC;
 802                         fepriv->status = 0;
 803                 }
 804                 break;
 805
 806         case FE_SET_TONE:
 807                 if (fe->ops.set_tone) {
 808                         err = fe->ops.set_tone(fe, (fe_sec_tone_mode_t) parg);
 809                         fepriv->tone = (fe_sec_tone_mode_t) parg;
 810                         fepriv->state = FESTATE_DISEQC;
 811                         fepriv->status = 0;
 812                 }
 813                 break;
 814
 815         case FE_SET_VOLTAGE:
 816                 if (fe->ops.set_voltage) {
 817                         err = fe->ops.set_voltage(fe, (fe_sec_voltage_t) parg);
 818                         fepriv->voltage = (fe_sec_voltage_t) parg;
 819                         fepriv->state = FESTATE_DISEQC;
 820                         fepriv->status = 0;
 821                 }
 822                 break;
 823
 824         case FE_DISHNETWORK_SEND_LEGACY_CMD:
 825                 if (fe->ops.dishnetwork_send_legacy_command) {
 826                         err = fe->ops.dishnetwork_send_legacy_command(fe, (unsigned long) parg);
 827                         fepriv->state = FESTATE_DISEQC;
 828                         fepriv->status = 0;
 829                 } else if (fe->ops.set_voltage) {
 830                         /*
 831                          * NOTE: This is a fallback condition.  Some frontends
 832                          * (stv0299 for instance) take longer than 8msec to
 833                          * respond to a set_voltage command.  Those switches
 834                          * need custom routines to switch properly.  For all
 835                          * other frontends, the following shoule work ok.
 836                          * Dish network legacy switches (as used by Dish500)
 837                          * are controlled by sending 9-bit command words
 838                          * spaced 8msec apart.
 839                          * the actual command word is switch/port dependant
 840                          * so it is up to the userspace application to send
 841                          * the right command.
 842                          * The command must always start with a '0' after
 843                          * initialization, so parg is 8 bits and does not
 844                          * include the initialization or start bit
 845                          */
 846                         unsigned long cmd = ((unsigned long) parg) << 1;
 847                         struct timeval nexttime;
 848                         struct timeval tv[10];
 849                         int i;
 850                         u8 last = 1;
 851                         if (dvb_frontend_debug)
 852                                 printk("%s switch command: 0x%04lx\n", __FUNCTION__, cmd);
 853                         do_gettimeofday(&nexttime);
 854                         if (dvb_frontend_debug)
 855                                 memcpy(&tv[0], &nexttime, sizeof(struct timeval));
 856                         /* before sending a command, initialize by sending
 857                          * a 32ms 18V to the switch
 858                          */
 859                         fe->ops.set_voltage(fe, SEC_VOLTAGE_18);
 860                         dvb_frontend_sleep_until(&nexttime, 32000);
 861
 862                         for (i = 0; i < 9; i++) {
 863                                 if (dvb_frontend_debug)
 864                                         do_gettimeofday(&tv[i + 1]);
 865                                 if ((cmd & 0x01) != last) {
 866                                         /* set voltage to (last ? 13V : 18V) */
 867                                         fe->ops.set_voltage(fe, (last) ? SEC_VOLTAGE_13 : SEC_VOLTAGE_18);
 868                                         last = (last) ? 0 : 1;
 869                                 }
 870                                 cmd = cmd >> 1;
 871                                 if (i != 8)
 872                                         dvb_frontend_sleep_until(&nexttime, 8000);
 873                         }
 874                         if (dvb_frontend_debug) {
 875                                 printk("%s(%d): switch delay (should be 32k followed by all 8k\n",
 876                                         __FUNCTION__, fe->dvb->num);
 877                                 for (i = 1; i < 10; i++)
 878                                         printk("%d: %d\n", i, timeval_usec_diff(tv[i-1] , tv[i]));
 879                         }
 880                         err = 0;
 881                         fepriv->state = FESTATE_DISEQC;
 882                         fepriv->status = 0;
 883                 }
 884                 break;
 885
 886         case FE_DISEQC_RECV_SLAVE_REPLY:
 887                 if (fe->ops.diseqc_recv_slave_reply)
 888                         err = fe->ops.diseqc_recv_slave_reply(fe, (struct dvb_diseqc_slave_reply*) parg);
 889                 break;
 890
 891         case FE_ENABLE_HIGH_LNB_VOLTAGE:
 892                 if (fe->ops.enable_high_lnb_voltage)
 893                         err = fe->ops.enable_high_lnb_voltage(fe, (long) parg);
 894                 break;
 895
 896         case FE_SET_FRONTEND: {
 897                 struct dvb_frontend_tune_settings fetunesettings;
 898
 899                 memcpy (&fepriv->parameters, parg,
 900                         sizeof (struct dvb_frontend_parameters));
 901
 902                 memset(&fetunesettings, 0, sizeof(struct dvb_frontend_tune_settings));
 903                 memcpy(&fetunesettings.parameters, parg,
 904                        sizeof (struct dvb_frontend_parameters));
 905
 906                 /* force auto frequency inversion if requested */
 907                 if (dvb_force_auto_inversion) {
 908                         fepriv->parameters.inversion = INVERSION_AUTO;
 909                         fetunesettings.parameters.inversion = INVERSION_AUTO;
 910                 }
 911                 if (fe->ops.info.type == FE_OFDM) {
 912                         /* without hierachical coding code_rate_LP is irrelevant,
 913                          * so we tolerate the otherwise invalid FEC_NONE setting */
 914                         if (fepriv->parameters.u.ofdm.hierarchy_information == HIERARCHY_NONE &&
 915                             fepriv->parameters.u.ofdm.code_rate_LP == FEC_NONE)
 916                                 fepriv->parameters.u.ofdm.code_rate_LP = FEC_AUTO;
 917                 }
 918
 919                 /* get frontend-specific tuning settings */
 920                 if (fe->ops.get_tune_settings && (fe->ops.get_tune_settings(fe, &fetunesettings) == 0)) {
 921                         fepriv->min_delay = (fetunesettings.min_delay_ms * HZ) / 1000;
 922                         fepriv->max_drift = fetunesettings.max_drift;
 923                         fepriv->step_size = fetunesettings.step_size;
 924                 } else {
 925                         /* default values */
 926                         switch(fe->ops.info.type) {
 927                         case FE_QPSK:
 928                                 fepriv->min_delay = HZ/20;
 929                                 fepriv->step_size = fepriv->parameters.u.qpsk.symbol_rate / 16000;
 930                                 fepriv->max_drift = fepriv->parameters.u.qpsk.symbol_rate / 2000;
 931                                 break;
 932
 933                         case FE_QAM:
 934                                 fepriv->min_delay = HZ/20;
 935                                 fepriv->step_size = 0; /* no zigzag */
 936                                 fepriv->max_drift = 0;
 937                                 break;
 938
 939                         case FE_OFDM:
 940                                 fepriv->min_delay = HZ/20;
 941                                 fepriv->step_size = fe->ops.info.frequency_stepsize * 2;
 942                                 fepriv->max_drift = (fe->ops.info.frequency_stepsize * 2) + 1;
 943                                 break;
 944                         case FE_ATSC:
 945                                 printk("dvb-core: FE_ATSC not handled yet.\n");
 946                                 break;
 947                         }
 948                 }
 949                 if (dvb_override_tune_delay > 0)
 950                         fepriv->min_delay = (dvb_override_tune_delay * HZ) / 1000;
 951
 952                 fepriv->state = FESTATE_RETUNE;
 953                 dvb_frontend_wakeup(fe);
 954                 dvb_frontend_add_event(fe, 0);
 955                 fepriv->status = 0;
 956                 err = 0;
 957                 break;
 958         }
 959
 960         case FE_GET_EVENT:
 961                 err = dvb_frontend_get_event (fe, parg, file->f_flags);
 962                 break;
 963
 964         case FE_GET_FRONTEND:
 965                 if (fe->ops.get_frontend) {
 966                         memcpy (parg, &fepriv->parameters, sizeof (struct dvb_frontend_parameters));
 967                         err = fe->ops.get_frontend(fe, (struct dvb_frontend_parameters*) parg);
 968                 }
 969                 break;
 970
 971         case FE_SET_FRONTEND_TUNE_MODE:
 972                 fepriv->tune_mode_flags = (unsigned long) parg;
 973                 break;
 974         };
 975
 976         up (&fepriv->sem);
 977         return err;
 978 }
 979
 980 static unsigned int dvb_frontend_poll(struct file *file, struct poll_table_struct *wait)
 981 {
 982         struct dvb_device *dvbdev = file->private_data;
 983         struct dvb_frontend *fe = dvbdev->priv;
 984         struct dvb_frontend_private *fepriv = fe->frontend_priv;
 985
 986         dprintk ("%s\n", __FUNCTION__);
 987
 988         poll_wait (file, &fepriv->events.wait_queue, wait);
 989
 990         if (fepriv->events.eventw != fepriv->events.eventr)
 991                 return (POLLIN | POLLRDNORM | POLLPRI);
 992
 993         return 0;
 994 }
 995
 996 static int dvb_frontend_open(struct inode *inode, struct file *file)
 997 {
 998         struct dvb_device *dvbdev = file->private_data;
 999         struct dvb_frontend *fe = dvbdev->priv;
1000         struct dvb_frontend_private *fepriv = fe->frontend_priv;
1001         int ret;
1002
1003         dprintk ("%s\n", __FUNCTION__);
1004
1005         if ((ret = dvb_generic_open (inode, file)) < 0)
1006                 return ret;
1007
1008         if ((file->f_flags & O_ACCMODE) != O_RDONLY) {
1009                 ret = dvb_frontend_start (fe);
1010                 if (ret)
1011                         dvb_generic_release (inode, file);
1012
1013                 /*  empty event queue */
1014                 fepriv->events.eventr = fepriv->events.eventw = 0;
1015
1016                 /* normal tune mode when opened R/W */
1017                 fepriv->tune_mode_flags &= ~FE_TUNE_MODE_ONESHOT;
1018                 fepriv->tone = -1;
1019                 fepriv->voltage = -1;
1020         }
1021
1022         return ret;
1023 }
1024
1025 static int dvb_frontend_release(struct inode *inode, struct file *file)
1026 {
1027         struct dvb_device *dvbdev = file->private_data;
1028         struct dvb_frontend *fe = dvbdev->priv;
1029         struct dvb_frontend_private *fepriv = fe->frontend_priv;
1030
1031         dprintk ("%s\n", __FUNCTION__);
1032
1033         if ((file->f_flags & O_ACCMODE) != O_RDONLY)
1034                 fepriv->release_jiffies = jiffies;
1035
1036         return dvb_generic_release (inode, file);
1037 }
1038
1039 static struct file_operations dvb_frontend_fops = {
1040         .owner          = THIS_MODULE,
1041         .ioctl          = dvb_generic_ioctl,
1042         .poll           = dvb_frontend_poll,
1043         .open           = dvb_frontend_open,
1044         .release        = dvb_frontend_release
1045 };
1046
1047 int dvb_register_frontend(struct dvb_adapter* dvb,
1048                           struct dvb_frontend* fe)
1049 {
1050         struct dvb_frontend_private *fepriv;
1051         static const struct dvb_device dvbdev_template = {
1052                 .users = ~0,
1053                 .writers = 1,
1054                 .readers = (~0)-1,
1055                 .fops = &dvb_frontend_fops,
1056                 .kernel_ioctl = dvb_frontend_ioctl
1057         };
1058
1059         dprintk ("%s\n", __FUNCTION__);
1060
1061         if (mutex_lock_interruptible(&frontend_mutex))
1062                 return -ERESTARTSYS;
1063
1064         fe->frontend_priv = kzalloc(sizeof(struct dvb_frontend_private), GFP_KERNEL);
1065         if (fe->frontend_priv == NULL) {
1066                 mutex_unlock(&frontend_mutex);
1067                 return -ENOMEM;
1068         }
1069         fepriv = fe->frontend_priv;
1070
1071         init_MUTEX (&fepriv->sem);
1072         init_waitqueue_head (&fepriv->wait_queue);
1073         init_waitqueue_head (&fepriv->events.wait_queue);
1074         init_MUTEX (&fepriv->events.sem);
1075         fe->dvb = dvb;
1076         fepriv->inversion = INVERSION_OFF;
1077
1078         printk ("DVB: registering frontend %i (%s)...\n",
1079                 fe->dvb->num,
1080                 fe->ops.info.name);
1081
1082         dvb_register_device (fe->dvb, &fepriv->dvbdev, &dvbdev_template,
1083                              fe, DVB_DEVICE_FRONTEND);
1084
1085         mutex_unlock(&frontend_mutex);
1086         return 0;
1087 }
1088 EXPORT_SYMBOL(dvb_register_frontend);
1089
1090 int dvb_unregister_frontend(struct dvb_frontend* fe)
1091 {
1092         struct dvb_frontend_private *fepriv = fe->frontend_priv;
1093         dprintk ("%s\n", __FUNCTION__);
1094
1095         mutex_lock(&frontend_mutex);
1096         dvb_unregister_device (fepriv->dvbdev);
1097         dvb_frontend_stop (fe);
1098         if (fe->ops.tuner_ops.release) {
1099                 fe->ops.tuner_ops.release(fe);
1100                 if (fe->ops.i2c_gate_ctrl)
1101                         fe->ops.i2c_gate_ctrl(fe, 0);
1102         }
1103         if (fe->ops.release)
1104                 fe->ops.release(fe);
1105         else
1106                 printk("dvb_frontend: Demodulator (%s) does not have a release callback!\n", fe->ops.info.name);
1107         /* fe is invalid now */
1108         kfree(fepriv);
1109         mutex_unlock(&frontend_mutex);
1110         return 0;
1111 }
1112 EXPORT_SYMBOL(dvb_unregister_frontend);