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