V4L/DVB (9025): S2API: Deactivate the ISDB-T definitions
[safe/jmp/linux-2.6] / 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/list.h>
36 #include <linux/freezer.h>
37 #include <linux/jiffies.h>
38 #include <linux/kthread.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;
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         struct task_struct *thread;
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", __func__);
139
140         if (mutex_lock_interruptible (&events->mtx))
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         mutex_unlock(&events->mtx);
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", __func__);
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 (mutex_lock_interruptible (&events->mtx))
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         mutex_unlock(&events->mtx);
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", __func__);
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                 __func__, 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         fe_status_t s;
512         struct dvb_frontend_parameters *params;
513
514         dprintk("%s\n", __func__);
515
516         fepriv->check_wrapped = 0;
517         fepriv->quality = 0;
518         fepriv->delay = 3*HZ;
519         fepriv->status = 0;
520         fepriv->wakeup = 0;
521         fepriv->reinitialise = 0;
522
523         dvb_frontend_init(fe);
524
525         set_freezable();
526         while (1) {
527                 up(&fepriv->sem);           /* is locked when we enter the thread... */
528 restart:
529                 timeout = wait_event_interruptible_timeout(fepriv->wait_queue,
530                         dvb_frontend_should_wakeup(fe) || kthread_should_stop()
531                                 || freezing(current),
532                         fepriv->delay);
533
534                 if (kthread_should_stop() || dvb_frontend_is_exiting(fe)) {
535                         /* got signal or quitting */
536                         break;
537                 }
538
539                 if (try_to_freeze())
540                         goto restart;
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.get_frontend_algo) {
558                         if (fe->ops.get_frontend_algo(fe) == FE_ALGO_HW) {
559                                 /* have we been asked to retune? */
560                                 params = NULL;
561                                 if (fepriv->state & FESTATE_RETUNE) {
562                                         params = &fepriv->parameters;
563                                         fepriv->state = FESTATE_TUNED;
564                                 }
565
566                                 fe->ops.tune(fe, params, fepriv->tune_mode_flags, &fepriv->delay, &s);
567                                 if (s != fepriv->status) {
568                                         dvb_frontend_add_event(fe, s);
569                                         fepriv->status = s;
570                                 }
571                         } else
572                                 dvb_frontend_swzigzag(fe);
573                 } else
574                         dvb_frontend_swzigzag(fe);
575         }
576
577         if (dvb_powerdown_on_sleep) {
578                 if (fe->ops.set_voltage)
579                         fe->ops.set_voltage(fe, SEC_VOLTAGE_OFF);
580                 if (fe->ops.tuner_ops.sleep) {
581                         fe->ops.tuner_ops.sleep(fe);
582                         if (fe->ops.i2c_gate_ctrl)
583                                 fe->ops.i2c_gate_ctrl(fe, 0);
584                 }
585                 if (fe->ops.sleep)
586                         fe->ops.sleep(fe);
587         }
588
589         fepriv->thread = NULL;
590         mb();
591
592         dvb_frontend_wakeup(fe);
593         return 0;
594 }
595
596 static void dvb_frontend_stop(struct dvb_frontend *fe)
597 {
598         struct dvb_frontend_private *fepriv = fe->frontend_priv;
599
600         dprintk ("%s\n", __func__);
601
602         fepriv->exit = 1;
603         mb();
604
605         if (!fepriv->thread)
606                 return;
607
608         kthread_stop(fepriv->thread);
609
610         init_MUTEX (&fepriv->sem);
611         fepriv->state = FESTATE_IDLE;
612
613         /* paranoia check in case a signal arrived */
614         if (fepriv->thread)
615                 printk("dvb_frontend_stop: warning: thread %p won't exit\n",
616                                 fepriv->thread);
617 }
618
619 s32 timeval_usec_diff(struct timeval lasttime, struct timeval curtime)
620 {
621         return ((curtime.tv_usec < lasttime.tv_usec) ?
622                 1000000 - lasttime.tv_usec + curtime.tv_usec :
623                 curtime.tv_usec - lasttime.tv_usec);
624 }
625 EXPORT_SYMBOL(timeval_usec_diff);
626
627 static inline void timeval_usec_add(struct timeval *curtime, u32 add_usec)
628 {
629         curtime->tv_usec += add_usec;
630         if (curtime->tv_usec >= 1000000) {
631                 curtime->tv_usec -= 1000000;
632                 curtime->tv_sec++;
633         }
634 }
635
636 /*
637  * Sleep until gettimeofday() > waketime + add_usec
638  * This needs to be as precise as possible, but as the delay is
639  * usually between 2ms and 32ms, it is done using a scheduled msleep
640  * followed by usleep (normally a busy-wait loop) for the remainder
641  */
642 void dvb_frontend_sleep_until(struct timeval *waketime, u32 add_usec)
643 {
644         struct timeval lasttime;
645         s32 delta, newdelta;
646
647         timeval_usec_add(waketime, add_usec);
648
649         do_gettimeofday(&lasttime);
650         delta = timeval_usec_diff(lasttime, *waketime);
651         if (delta > 2500) {
652                 msleep((delta - 1500) / 1000);
653                 do_gettimeofday(&lasttime);
654                 newdelta = timeval_usec_diff(lasttime, *waketime);
655                 delta = (newdelta > delta) ? 0 : newdelta;
656         }
657         if (delta > 0)
658                 udelay(delta);
659 }
660 EXPORT_SYMBOL(dvb_frontend_sleep_until);
661
662 static int dvb_frontend_start(struct dvb_frontend *fe)
663 {
664         int ret;
665         struct dvb_frontend_private *fepriv = fe->frontend_priv;
666         struct task_struct *fe_thread;
667
668         dprintk ("%s\n", __func__);
669
670         if (fepriv->thread) {
671                 if (!fepriv->exit)
672                         return 0;
673                 else
674                         dvb_frontend_stop (fe);
675         }
676
677         if (signal_pending(current))
678                 return -EINTR;
679         if (down_interruptible (&fepriv->sem))
680                 return -EINTR;
681
682         fepriv->state = FESTATE_IDLE;
683         fepriv->exit = 0;
684         fepriv->thread = NULL;
685         mb();
686
687         fe_thread = kthread_run(dvb_frontend_thread, fe,
688                 "kdvb-fe-%i", fe->dvb->num);
689         if (IS_ERR(fe_thread)) {
690                 ret = PTR_ERR(fe_thread);
691                 printk("dvb_frontend_start: failed to start kthread (%d)\n", ret);
692                 up(&fepriv->sem);
693                 return ret;
694         }
695         fepriv->thread = fe_thread;
696         return 0;
697 }
698
699 static void dvb_frontend_get_frequeny_limits(struct dvb_frontend *fe,
700                                         u32 *freq_min, u32 *freq_max)
701 {
702         *freq_min = max(fe->ops.info.frequency_min, fe->ops.tuner_ops.info.frequency_min);
703
704         if (fe->ops.info.frequency_max == 0)
705                 *freq_max = fe->ops.tuner_ops.info.frequency_max;
706         else if (fe->ops.tuner_ops.info.frequency_max == 0)
707                 *freq_max = fe->ops.info.frequency_max;
708         else
709                 *freq_max = min(fe->ops.info.frequency_max, fe->ops.tuner_ops.info.frequency_max);
710
711         if (*freq_min == 0 || *freq_max == 0)
712                 printk(KERN_WARNING "DVB: frontend %u frequency limits undefined - fix the driver\n",
713                        fe->dvb->num);
714 }
715
716 static int dvb_frontend_check_parameters(struct dvb_frontend *fe,
717                                 struct dvb_frontend_parameters *parms)
718 {
719         u32 freq_min;
720         u32 freq_max;
721
722         /* range check: frequency */
723         dvb_frontend_get_frequeny_limits(fe, &freq_min, &freq_max);
724         if ((freq_min && parms->frequency < freq_min) ||
725             (freq_max && parms->frequency > freq_max)) {
726                 printk(KERN_WARNING "DVB: frontend %u frequency %u out of range (%u..%u)\n",
727                        fe->dvb->num, parms->frequency, freq_min, freq_max);
728                 return -EINVAL;
729         }
730
731         /* range check: symbol rate */
732         if (fe->ops.info.type == FE_QPSK) {
733                 if ((fe->ops.info.symbol_rate_min &&
734                      parms->u.qpsk.symbol_rate < fe->ops.info.symbol_rate_min) ||
735                     (fe->ops.info.symbol_rate_max &&
736                      parms->u.qpsk.symbol_rate > fe->ops.info.symbol_rate_max)) {
737                         printk(KERN_WARNING "DVB: frontend %u symbol rate %u out of range (%u..%u)\n",
738                                fe->dvb->num, parms->u.qpsk.symbol_rate,
739                                fe->ops.info.symbol_rate_min, fe->ops.info.symbol_rate_max);
740                         return -EINVAL;
741                 }
742
743         } else if (fe->ops.info.type == FE_QAM) {
744                 if ((fe->ops.info.symbol_rate_min &&
745                      parms->u.qam.symbol_rate < fe->ops.info.symbol_rate_min) ||
746                     (fe->ops.info.symbol_rate_max &&
747                      parms->u.qam.symbol_rate > fe->ops.info.symbol_rate_max)) {
748                         printk(KERN_WARNING "DVB: frontend %u symbol rate %u out of range (%u..%u)\n",
749                                fe->dvb->num, parms->u.qam.symbol_rate,
750                                fe->ops.info.symbol_rate_min, fe->ops.info.symbol_rate_max);
751                         return -EINVAL;
752                 }
753         }
754
755         return 0;
756 }
757
758 struct dtv_cmds_h dtv_cmds[] = {
759         [DTV_TUNE] = {
760                 .name   = "DTV_TUNE",
761                 .cmd    = DTV_TUNE,
762                 .set    = 1,
763         },
764         [DTV_CLEAR] = {
765                 .name   = "DTV_CLEAR",
766                 .cmd    = DTV_CLEAR,
767                 .set    = 1,
768         },
769
770         /* Set */
771         [DTV_FREQUENCY] = {
772                 .name   = "DTV_FREQUENCY",
773                 .cmd    = DTV_FREQUENCY,
774                 .set    = 1,
775         },
776         [DTV_BANDWIDTH_HZ] = {
777                 .name   = "DTV_BANDWIDTH_HZ",
778                 .cmd    = DTV_BANDWIDTH_HZ,
779                 .set    = 1,
780         },
781         [DTV_MODULATION] = {
782                 .name   = "DTV_MODULATION",
783                 .cmd    = DTV_MODULATION,
784                 .set    = 1,
785         },
786         [DTV_INVERSION] = {
787                 .name   = "DTV_INVERSION",
788                 .cmd    = DTV_INVERSION,
789                 .set    = 1,
790         },
791         [DTV_DISEQC_MASTER] = {
792                 .name   = "DTV_DISEQC_MASTER",
793                 .cmd    = DTV_DISEQC_MASTER,
794                 .set    = 1,
795                 .buffer = 1,
796         },
797         [DTV_SYMBOL_RATE] = {
798                 .name   = "DTV_SYMBOL_RATE",
799                 .cmd    = DTV_SYMBOL_RATE,
800                 .set    = 1,
801         },
802         [DTV_INNER_FEC] = {
803                 .name   = "DTV_INNER_FEC",
804                 .cmd    = DTV_INNER_FEC,
805                 .set    = 1,
806         },
807         [DTV_VOLTAGE] = {
808                 .name   = "DTV_VOLTAGE",
809                 .cmd    = DTV_VOLTAGE,
810                 .set    = 1,
811         },
812         [DTV_TONE] = {
813                 .name   = "DTV_TONE",
814                 .cmd    = DTV_TONE,
815                 .set    = 1,
816         },
817         [DTV_PILOT] = {
818                 .name   = "DTV_PILOT",
819                 .cmd    = DTV_PILOT,
820                 .set    = 1,
821         },
822         [DTV_ROLLOFF] = {
823                 .name   = "DTV_ROLLOFF",
824                 .cmd    = DTV_ROLLOFF,
825                 .set    = 1,
826         },
827         [DTV_DELIVERY_SYSTEM] = {
828                 .name   = "DTV_DELIVERY_SYSTEM",
829                 .cmd    = DTV_DELIVERY_SYSTEM,
830                 .set    = 1,
831         },
832         /* Get */
833         [DTV_DISEQC_SLAVE_REPLY] = {
834                 .name   = "DTV_DISEQC_SLAVE_REPLY",
835                 .cmd    = DTV_DISEQC_SLAVE_REPLY,
836                 .set    = 0,
837                 .buffer = 1,
838         },
839 };
840
841 void dtv_property_dump(struct dtv_property *tvp)
842 {
843         int i;
844
845         printk("%s() tvp.cmd    = 0x%08x (%s)\n"
846                 ,__FUNCTION__
847                 ,tvp->cmd
848                 ,dtv_cmds[ tvp->cmd ].name);
849
850         if(dtv_cmds[ tvp->cmd ].buffer) {
851
852                 printk("%s() tvp.u.buffer.len = 0x%02x\n"
853                         ,__FUNCTION__
854                         ,tvp->u.buffer.len);
855
856                 for(i = 0; i < tvp->u.buffer.len; i++)
857                         printk("%s() tvp.u.buffer.data[0x%02x] = 0x%02x\n"
858                                 ,__FUNCTION__
859                                 ,i
860                                 ,tvp->u.buffer.data[i]);
861
862         } else
863                 printk("%s() tvp.u.data = 0x%08x\n", __FUNCTION__, tvp->u.data);
864 }
865
866 int is_legacy_delivery_system(fe_delivery_system_t s)
867 {
868         if((s == SYS_UNDEFINED) || (s == SYS_DVBC_ANNEX_AC) ||
869                 (s == SYS_DVBC_ANNEX_B) || (s == SYS_DVBT) || (s == SYS_DVBS))
870                 return 1;
871
872         return 0;
873 }
874
875 /* Synchronise the legacy tuning parameters into the cache, so that demodulator
876  * drivers can use a single set_frontend tuning function, regardless of whether
877  * it's being used for the legacy or new API, reducing code and complexity.
878  */
879 void dtv_property_cache_sync(struct dvb_frontend *fe, struct dvb_frontend_parameters *p)
880 {
881         struct dtv_frontend_properties *c = &fe->dtv_property_cache;
882
883         printk("%s()\n", __FUNCTION__);
884
885         c->frequency = p->frequency;
886         c->inversion = p->inversion;
887
888         switch (fe->ops.info.type) {
889         case FE_QPSK:
890                 c->symbol_rate = p->u.qpsk.symbol_rate;
891                 c->fec_inner = p->u.qpsk.fec_inner;
892                 c->delivery_system = SYS_DVBS;
893                 break;
894         case FE_QAM:
895                 c->symbol_rate = p->u.qam.symbol_rate;
896                 c->fec_inner = p->u.qam.fec_inner;
897                 c->modulation = p->u.qam.modulation;
898                 c->delivery_system = SYS_DVBC_ANNEX_AC;
899                 break;
900         case FE_OFDM:
901                 if (p->u.ofdm.bandwidth == BANDWIDTH_6_MHZ)
902                         c->bandwidth_hz = 6000000;
903                 else if (p->u.ofdm.bandwidth == BANDWIDTH_7_MHZ)
904                         c->bandwidth_hz = 7000000;
905                 else if (p->u.ofdm.bandwidth == BANDWIDTH_8_MHZ)
906                         c->bandwidth_hz = 8000000;
907                 else
908                         /* Including BANDWIDTH_AUTO */
909                         c->bandwidth_hz = 0;
910                 c->code_rate_HP = p->u.ofdm.code_rate_HP;
911                 c->code_rate_LP = p->u.ofdm.code_rate_LP;
912                 c->modulation = p->u.ofdm.constellation;
913                 c->transmission_mode = p->u.ofdm.transmission_mode;
914                 c->guard_interval = p->u.ofdm.guard_interval;
915                 c->hierarchy = p->u.ofdm.hierarchy_information;
916                 c->delivery_system = SYS_DVBT;
917                 break;
918         case FE_ATSC:
919                 c->modulation = p->u.vsb.modulation;
920                 if ((c->modulation == VSB_8) || (c->modulation == VSB_16))
921                         c->delivery_system = SYS_ATSC;
922                 else
923                         c->delivery_system = SYS_DVBC_ANNEX_B;
924                 break;
925         }
926 }
927
928 /* Ensure the cached values are set correctly in the frontend
929  * legacy tuning structures, for the advanced tuning API.
930  */
931 void dtv_property_legacy_params_sync(struct dvb_frontend *fe)
932 {
933         struct dtv_frontend_properties *c = &fe->dtv_property_cache;
934         struct dvb_frontend_private *fepriv = fe->frontend_priv;
935         struct dvb_frontend_parameters *p = &fepriv->parameters;
936
937         printk("%s()\n", __FUNCTION__);
938
939         p->frequency = c->frequency;
940         p->inversion = c->inversion;
941
942         switch (fe->ops.info.type) {
943         case FE_QPSK:
944                 printk("%s() Preparing QPSK req\n", __FUNCTION__);
945                 p->u.qpsk.symbol_rate = c->symbol_rate;
946                 p->u.qpsk.fec_inner = c->fec_inner;
947                 c->delivery_system = SYS_DVBS;
948                 break;
949         case FE_QAM:
950                 printk("%s() Preparing QAM req\n", __FUNCTION__);
951                 p->u.qam.symbol_rate = c->symbol_rate;
952                 p->u.qam.fec_inner = c->fec_inner;
953                 p->u.qam.modulation = c->modulation;
954                 c->delivery_system = SYS_DVBC_ANNEX_AC;
955                 break;
956         case FE_OFDM:
957                 printk("%s() Preparing OFDM req\n", __FUNCTION__);
958                 if (c->bandwidth_hz == 6000000)
959                         p->u.ofdm.bandwidth = BANDWIDTH_6_MHZ;
960                 else if (c->bandwidth_hz == 7000000)
961                         p->u.ofdm.bandwidth = BANDWIDTH_7_MHZ;
962                 else if (c->bandwidth_hz == 8000000)
963                         p->u.ofdm.bandwidth = BANDWIDTH_8_MHZ;
964                 else
965                         p->u.ofdm.bandwidth = BANDWIDTH_AUTO;
966                 p->u.ofdm.code_rate_HP = c->code_rate_HP;
967                 p->u.ofdm.code_rate_LP = c->code_rate_LP;
968                 p->u.ofdm.constellation = c->modulation;
969                 p->u.ofdm.transmission_mode = c->transmission_mode;
970                 p->u.ofdm.guard_interval = c->guard_interval;
971                 p->u.ofdm.hierarchy_information = c->hierarchy;
972                 c->delivery_system = SYS_DVBT;
973                 break;
974         case FE_ATSC:
975                 printk("%s() Preparing VSB req\n", __FUNCTION__);
976                 p->u.vsb.modulation = c->modulation;
977                 if ((c->modulation == VSB_8) || (c->modulation == VSB_16))
978                         c->delivery_system = SYS_ATSC;
979                 else
980                         c->delivery_system = SYS_DVBC_ANNEX_B;
981                 break;
982         }
983 }
984
985 /* Ensure the cached values are set correctly in the frontend
986  * legacy tuning structures, for the legacy tuning API.
987  */
988 void dtv_property_adv_params_sync(struct dvb_frontend *fe)
989 {
990         struct dtv_frontend_properties *c = &fe->dtv_property_cache;
991         struct dvb_frontend_private *fepriv = fe->frontend_priv;
992         struct dvb_frontend_parameters *p = &fepriv->parameters;
993
994         printk("%s()\n", __FUNCTION__);
995
996         p->frequency = c->frequency;
997         p->inversion = c->inversion;
998
999         switch(c->modulation) {
1000         case _8PSK:
1001         case _16APSK:
1002         case NBC_QPSK:
1003                 p->u.qpsk.symbol_rate = c->symbol_rate;
1004                 p->u.qpsk.fec_inner = c->fec_inner;
1005                 break;
1006         default:
1007                 break;
1008         }
1009
1010         if(c->delivery_system == SYS_ISDBT) {
1011                 /* Fake out a generic DVB-T request so we pass validation in the ioctl */
1012                 p->frequency = c->frequency;
1013                 p->inversion = INVERSION_AUTO;
1014                 p->u.ofdm.constellation = QAM_AUTO;
1015                 p->u.ofdm.code_rate_HP = FEC_AUTO;
1016                 p->u.ofdm.code_rate_LP = FEC_AUTO;
1017                 p->u.ofdm.bandwidth = BANDWIDTH_AUTO;
1018                 p->u.ofdm.transmission_mode = TRANSMISSION_MODE_AUTO;
1019                 p->u.ofdm.guard_interval = GUARD_INTERVAL_AUTO;
1020                 p->u.ofdm.hierarchy_information = HIERARCHY_AUTO;
1021         }
1022 }
1023
1024 void dtv_property_cache_submit(struct dvb_frontend *fe)
1025 {
1026         struct dtv_frontend_properties *c = &fe->dtv_property_cache;
1027
1028         printk("%s()\n", __FUNCTION__);
1029
1030         /* For legacy delivery systems we don't need the delivery_system to
1031          * be specified, but we populate the older structures from the cache
1032          * so we can call set_frontend on older drivers.
1033          */
1034         if(is_legacy_delivery_system(c->delivery_system)) {
1035
1036                 printk("%s() legacy, modulation = %d\n", __FUNCTION__, c->modulation);
1037                 dtv_property_legacy_params_sync(fe);
1038
1039         } else {
1040                 printk("%s() adv, modulation = %d\n", __FUNCTION__, c->modulation);
1041
1042                 /* For advanced delivery systems / modulation types ...
1043                  * we seed the lecacy dvb_frontend_parameters structure
1044                  * so that the sanity checking code later in the IOCTL processing
1045                  * can validate our basic frequency ranges, symbolrates, modulation
1046                  * etc.
1047                  */
1048                 dtv_property_adv_params_sync(fe);
1049         }
1050 }
1051
1052 static int dvb_frontend_ioctl_legacy(struct inode *inode, struct file *file,
1053                         unsigned int cmd, void *parg);
1054 static int dvb_frontend_ioctl_properties(struct inode *inode, struct file *file,
1055                         unsigned int cmd, void *parg);
1056
1057 int dtv_property_process_get(struct dvb_frontend *fe, struct dtv_property *tvp,
1058         struct inode *inode, struct file *file)
1059 {
1060         int r = 0;
1061
1062         printk("%s()\n", __FUNCTION__);
1063
1064         dtv_property_dump(tvp);
1065
1066         /* Allow the frontend to validate incoming properties */
1067         if (fe->ops.get_property)
1068                 r = fe->ops.get_property(fe, tvp);
1069
1070         if (r < 0)
1071                 return r;
1072
1073         switch(tvp->cmd) {
1074         case DTV_FREQUENCY:
1075                 tvp->u.data = fe->dtv_property_cache.frequency;
1076                 break;
1077         case DTV_MODULATION:
1078                 tvp->u.data = fe->dtv_property_cache.modulation;
1079                 break;
1080         case DTV_BANDWIDTH_HZ:
1081                 tvp->u.data = fe->dtv_property_cache.bandwidth_hz;
1082                 break;
1083         case DTV_INVERSION:
1084                 tvp->u.data = fe->dtv_property_cache.inversion;
1085                 break;
1086         case DTV_SYMBOL_RATE:
1087                 tvp->u.data = fe->dtv_property_cache.symbol_rate;
1088                 break;
1089         case DTV_INNER_FEC:
1090                 tvp->u.data = fe->dtv_property_cache.fec_inner;
1091                 break;
1092         case DTV_PILOT:
1093                 tvp->u.data = fe->dtv_property_cache.pilot;
1094                 break;
1095         case DTV_ROLLOFF:
1096                 tvp->u.data = fe->dtv_property_cache.rolloff;
1097                 break;
1098         case DTV_DELIVERY_SYSTEM:
1099                 tvp->u.data = fe->dtv_property_cache.delivery_system;
1100                 break;
1101         case DTV_VOLTAGE:
1102                 tvp->u.data = fe->dtv_property_cache.voltage;
1103                 break;
1104         case DTV_TONE:
1105                 tvp->u.data = fe->dtv_property_cache.sectone;
1106                 break;
1107         default:
1108                 r = -1;
1109         }
1110
1111         return r;
1112 }
1113
1114 int dtv_property_process_set(struct dvb_frontend *fe, struct dtv_property *tvp,
1115         struct inode *inode, struct file *file)
1116 {
1117         int r = 0;
1118         struct dvb_frontend_private *fepriv = fe->frontend_priv;
1119         printk("%s()\n", __FUNCTION__);
1120         dtv_property_dump(tvp);
1121
1122         /* Allow the frontend to validate incoming properties */
1123         if (fe->ops.set_property)
1124                 r = fe->ops.set_property(fe, tvp);
1125
1126         if (r < 0)
1127                 return r;
1128
1129         switch(tvp->cmd) {
1130         case DTV_CLEAR:
1131                 /* Reset a cache of data specific to the frontend here. This does
1132                  * not effect hardware.
1133                  */
1134                 printk("%s() Flushing property cache\n", __FUNCTION__);
1135                 memset(&fe->dtv_property_cache, 0, sizeof(struct dtv_frontend_properties));
1136                 fe->dtv_property_cache.state = tvp->cmd;
1137                 fe->dtv_property_cache.delivery_system = SYS_UNDEFINED;
1138                 break;
1139         case DTV_TUNE:
1140                 /* interpret the cache of data, build either a traditional frontend
1141                  * tunerequest so we can pass validation in the FE_SET_FRONTEND
1142                  * ioctl.
1143                  */
1144                 fe->dtv_property_cache.state = tvp->cmd;
1145                 printk("%s() Finalised property cache\n", __FUNCTION__);
1146                 dtv_property_cache_submit(fe);
1147
1148                 r |= dvb_frontend_ioctl_legacy(inode, file, FE_SET_FRONTEND,
1149                         &fepriv->parameters);
1150                 break;
1151         case DTV_FREQUENCY:
1152                 fe->dtv_property_cache.frequency = tvp->u.data;
1153                 break;
1154         case DTV_MODULATION:
1155                 fe->dtv_property_cache.modulation = tvp->u.data;
1156                 break;
1157         case DTV_BANDWIDTH_HZ:
1158                 fe->dtv_property_cache.bandwidth_hz = tvp->u.data;
1159                 break;
1160         case DTV_INVERSION:
1161                 fe->dtv_property_cache.inversion = tvp->u.data;
1162                 break;
1163         case DTV_SYMBOL_RATE:
1164                 fe->dtv_property_cache.symbol_rate = tvp->u.data;
1165                 break;
1166         case DTV_INNER_FEC:
1167                 fe->dtv_property_cache.fec_inner = tvp->u.data;
1168                 break;
1169         case DTV_PILOT:
1170                 fe->dtv_property_cache.pilot = tvp->u.data;
1171                 break;
1172         case DTV_ROLLOFF:
1173                 fe->dtv_property_cache.rolloff = tvp->u.data;
1174                 break;
1175         case DTV_DELIVERY_SYSTEM:
1176                 fe->dtv_property_cache.delivery_system = tvp->u.data;
1177                 break;
1178         case DTV_VOLTAGE:
1179                 fe->dtv_property_cache.voltage = tvp->u.data;
1180                 r = dvb_frontend_ioctl_legacy(inode, file, FE_SET_VOLTAGE,
1181                         (void *)fe->dtv_property_cache.voltage);
1182                 break;
1183         case DTV_TONE:
1184                 fe->dtv_property_cache.sectone = tvp->u.data;
1185                 r = dvb_frontend_ioctl_legacy(inode, file, FE_SET_TONE,
1186                         (void *)fe->dtv_property_cache.sectone);
1187                 break;
1188         default:
1189                 r = -1;
1190         }
1191
1192         return r;
1193 }
1194
1195 static int dvb_frontend_ioctl(struct inode *inode, struct file *file,
1196                         unsigned int cmd, void *parg)
1197 {
1198         struct dvb_device *dvbdev = file->private_data;
1199         struct dvb_frontend *fe = dvbdev->priv;
1200         struct dvb_frontend_private *fepriv = fe->frontend_priv;
1201         int err = -EOPNOTSUPP;
1202
1203         dprintk ("%s\n", __func__);
1204
1205         if (fepriv->exit)
1206                 return -ENODEV;
1207
1208         if ((file->f_flags & O_ACCMODE) == O_RDONLY &&
1209             (_IOC_DIR(cmd) != _IOC_READ || cmd == FE_GET_EVENT ||
1210              cmd == FE_DISEQC_RECV_SLAVE_REPLY))
1211                 return -EPERM;
1212
1213         if (down_interruptible (&fepriv->sem))
1214                 return -ERESTARTSYS;
1215
1216         if ((cmd == FE_SET_PROPERTY) || (cmd == FE_GET_PROPERTY))
1217                 err = dvb_frontend_ioctl_properties(inode, file, cmd, parg);
1218         else {
1219                 fe->dtv_property_cache.state = DTV_UNDEFINED;
1220                 err = dvb_frontend_ioctl_legacy(inode, file, cmd, parg);
1221         }
1222
1223         up(&fepriv->sem);
1224         return err;
1225 }
1226
1227 static int dvb_frontend_ioctl_properties(struct inode *inode, struct file *file,
1228                         unsigned int cmd, void *parg)
1229 {
1230         struct dvb_device *dvbdev = file->private_data;
1231         struct dvb_frontend *fe = dvbdev->priv;
1232         int err = 0;
1233
1234         struct dtv_properties *tvps = NULL;
1235         struct dtv_property *tvp = NULL;
1236         int i;
1237
1238         dprintk("%s\n", __func__);
1239
1240         if(cmd == FE_SET_PROPERTY) {
1241                 printk("%s() FE_SET_PROPERTY\n", __FUNCTION__);
1242
1243                 tvps = (struct dtv_properties __user *)parg;
1244
1245                 printk("%s() properties.num = %d\n", __FUNCTION__, tvps->num);
1246                 printk("%s() properties.props = %p\n", __FUNCTION__, tvps->props);
1247
1248                 /* Put an arbitrary limit on the number of messages that can
1249                  * be sent at once */
1250                 if (tvps->num > DTV_IOCTL_MAX_MSGS)
1251                         return -EINVAL;
1252
1253                 tvp = (struct dtv_property *) kmalloc(tvps->num *
1254                         sizeof(struct dtv_property), GFP_KERNEL);
1255                 if (!tvp) {
1256                         err = -ENOMEM;
1257                         goto out;
1258                 }
1259
1260                 if (copy_from_user(tvp, tvps->props, tvps->num * sizeof(struct dtv_property))) {
1261                         err = -EFAULT;
1262                         goto out;
1263                 }
1264
1265                 for (i = 0; i < tvps->num; i++)
1266                         err |= dtv_property_process_set(fe, tvp + i, inode, file);
1267
1268                 if(fe->dtv_property_cache.state == DTV_TUNE) {
1269                         printk("%s() Property cache is full, tuning\n", __FUNCTION__);
1270                 }
1271
1272         } else
1273         if(cmd == FE_GET_PROPERTY) {
1274                 printk("%s() FE_GET_PROPERTY\n", __FUNCTION__);
1275
1276                 tvps = (struct dtv_properties __user *)parg;
1277
1278                 printk("%s() properties.num = %d\n", __FUNCTION__, tvps->num);
1279                 printk("%s() properties.props = %p\n", __FUNCTION__, tvps->props);
1280
1281                 /* Put an arbitrary limit on the number of messages that can
1282                  * be sent at once */
1283                 if (tvps->num > DTV_IOCTL_MAX_MSGS)
1284                         return -EINVAL;
1285
1286                 tvp = (struct dtv_property *) kmalloc(tvps->num *
1287                         sizeof(struct dtv_property), GFP_KERNEL);
1288                 if (!tvp) {
1289                         err = -ENOMEM;
1290                         goto out;
1291                 }
1292
1293                 if (copy_from_user(tvp, tvps->props, tvps->num * sizeof(struct dtv_property))) {
1294                         err = -EFAULT;
1295                         goto out;
1296                 }
1297
1298                 for (i = 0; i < tvps->num; i++)
1299                         err |= dtv_property_process_get(fe, tvp + i, inode, file);
1300
1301                 if (copy_to_user(tvps->props, tvp, tvps->num * sizeof(struct dtv_property))) {
1302                         err = -EFAULT;
1303                         goto out;
1304                 }
1305
1306         } else
1307                 err = -EOPNOTSUPP;
1308
1309 out:
1310         kfree(tvp);
1311         return err;
1312 }
1313
1314 static int dvb_frontend_ioctl_legacy(struct inode *inode, struct file *file,
1315                         unsigned int cmd, void *parg)
1316 {
1317         struct dvb_device *dvbdev = file->private_data;
1318         struct dvb_frontend *fe = dvbdev->priv;
1319         struct dvb_frontend_private *fepriv = fe->frontend_priv;
1320         int err = -EOPNOTSUPP;
1321
1322         switch (cmd) {
1323         case FE_GET_INFO: {
1324                 struct dvb_frontend_info* info = parg;
1325                 memcpy(info, &fe->ops.info, sizeof(struct dvb_frontend_info));
1326                 dvb_frontend_get_frequeny_limits(fe, &info->frequency_min, &info->frequency_max);
1327
1328                 /* Force the CAN_INVERSION_AUTO bit on. If the frontend doesn't
1329                  * do it, it is done for it. */
1330                 info->caps |= FE_CAN_INVERSION_AUTO;
1331                 err = 0;
1332                 break;
1333         }
1334
1335         case FE_READ_STATUS: {
1336                 fe_status_t* status = parg;
1337
1338                 /* if retune was requested but hasn't occured yet, prevent
1339                  * that user get signal state from previous tuning */
1340                 if(fepriv->state == FESTATE_RETUNE) {
1341                         err=0;
1342                         *status = 0;
1343                         break;
1344                 }
1345
1346                 if (fe->ops.read_status)
1347                         err = fe->ops.read_status(fe, status);
1348                 break;
1349         }
1350         case FE_READ_BER:
1351                 if (fe->ops.read_ber)
1352                         err = fe->ops.read_ber(fe, (__u32*) parg);
1353                 break;
1354
1355         case FE_READ_SIGNAL_STRENGTH:
1356                 if (fe->ops.read_signal_strength)
1357                         err = fe->ops.read_signal_strength(fe, (__u16*) parg);
1358                 break;
1359
1360         case FE_READ_SNR:
1361                 if (fe->ops.read_snr)
1362                         err = fe->ops.read_snr(fe, (__u16*) parg);
1363                 break;
1364
1365         case FE_READ_UNCORRECTED_BLOCKS:
1366                 if (fe->ops.read_ucblocks)
1367                         err = fe->ops.read_ucblocks(fe, (__u32*) parg);
1368                 break;
1369
1370
1371         case FE_DISEQC_RESET_OVERLOAD:
1372                 if (fe->ops.diseqc_reset_overload) {
1373                         err = fe->ops.diseqc_reset_overload(fe);
1374                         fepriv->state = FESTATE_DISEQC;
1375                         fepriv->status = 0;
1376                 }
1377                 break;
1378
1379         case FE_DISEQC_SEND_MASTER_CMD:
1380                 if (fe->ops.diseqc_send_master_cmd) {
1381                         err = fe->ops.diseqc_send_master_cmd(fe, (struct dvb_diseqc_master_cmd*) parg);
1382                         fepriv->state = FESTATE_DISEQC;
1383                         fepriv->status = 0;
1384                 }
1385                 break;
1386
1387         case FE_DISEQC_SEND_BURST:
1388                 if (fe->ops.diseqc_send_burst) {
1389                         err = fe->ops.diseqc_send_burst(fe, (fe_sec_mini_cmd_t) parg);
1390                         fepriv->state = FESTATE_DISEQC;
1391                         fepriv->status = 0;
1392                 }
1393                 break;
1394
1395         case FE_SET_TONE:
1396                 if (fe->ops.set_tone) {
1397                         err = fe->ops.set_tone(fe, (fe_sec_tone_mode_t) parg);
1398                         fepriv->tone = (fe_sec_tone_mode_t) parg;
1399                         fepriv->state = FESTATE_DISEQC;
1400                         fepriv->status = 0;
1401                 }
1402                 break;
1403
1404         case FE_SET_VOLTAGE:
1405                 if (fe->ops.set_voltage) {
1406                         err = fe->ops.set_voltage(fe, (fe_sec_voltage_t) parg);
1407                         fepriv->voltage = (fe_sec_voltage_t) parg;
1408                         fepriv->state = FESTATE_DISEQC;
1409                         fepriv->status = 0;
1410                 }
1411                 break;
1412
1413         case FE_DISHNETWORK_SEND_LEGACY_CMD:
1414                 if (fe->ops.dishnetwork_send_legacy_command) {
1415                         err = fe->ops.dishnetwork_send_legacy_command(fe, (unsigned long) parg);
1416                         fepriv->state = FESTATE_DISEQC;
1417                         fepriv->status = 0;
1418                 } else if (fe->ops.set_voltage) {
1419                         /*
1420                          * NOTE: This is a fallback condition.  Some frontends
1421                          * (stv0299 for instance) take longer than 8msec to
1422                          * respond to a set_voltage command.  Those switches
1423                          * need custom routines to switch properly.  For all
1424                          * other frontends, the following shoule work ok.
1425                          * Dish network legacy switches (as used by Dish500)
1426                          * are controlled by sending 9-bit command words
1427                          * spaced 8msec apart.
1428                          * the actual command word is switch/port dependant
1429                          * so it is up to the userspace application to send
1430                          * the right command.
1431                          * The command must always start with a '0' after
1432                          * initialization, so parg is 8 bits and does not
1433                          * include the initialization or start bit
1434                          */
1435                         unsigned long swcmd = ((unsigned long) parg) << 1;
1436                         struct timeval nexttime;
1437                         struct timeval tv[10];
1438                         int i;
1439                         u8 last = 1;
1440                         if (dvb_frontend_debug)
1441                                 printk("%s switch command: 0x%04lx\n", __func__, swcmd);
1442                         do_gettimeofday(&nexttime);
1443                         if (dvb_frontend_debug)
1444                                 memcpy(&tv[0], &nexttime, sizeof(struct timeval));
1445                         /* before sending a command, initialize by sending
1446                          * a 32ms 18V to the switch
1447                          */
1448                         fe->ops.set_voltage(fe, SEC_VOLTAGE_18);
1449                         dvb_frontend_sleep_until(&nexttime, 32000);
1450
1451                         for (i = 0; i < 9; i++) {
1452                                 if (dvb_frontend_debug)
1453                                         do_gettimeofday(&tv[i + 1]);
1454                                 if ((swcmd & 0x01) != last) {
1455                                         /* set voltage to (last ? 13V : 18V) */
1456                                         fe->ops.set_voltage(fe, (last) ? SEC_VOLTAGE_13 : SEC_VOLTAGE_18);
1457                                         last = (last) ? 0 : 1;
1458                                 }
1459                                 swcmd = swcmd >> 1;
1460                                 if (i != 8)
1461                                         dvb_frontend_sleep_until(&nexttime, 8000);
1462                         }
1463                         if (dvb_frontend_debug) {
1464                                 printk("%s(%d): switch delay (should be 32k followed by all 8k\n",
1465                                         __func__, fe->dvb->num);
1466                                 for (i = 1; i < 10; i++)
1467                                         printk("%d: %d\n", i, timeval_usec_diff(tv[i-1] , tv[i]));
1468                         }
1469                         err = 0;
1470                         fepriv->state = FESTATE_DISEQC;
1471                         fepriv->status = 0;
1472                 }
1473                 break;
1474
1475         case FE_DISEQC_RECV_SLAVE_REPLY:
1476                 if (fe->ops.diseqc_recv_slave_reply)
1477                         err = fe->ops.diseqc_recv_slave_reply(fe, (struct dvb_diseqc_slave_reply*) parg);
1478                 break;
1479
1480         case FE_ENABLE_HIGH_LNB_VOLTAGE:
1481                 if (fe->ops.enable_high_lnb_voltage)
1482                         err = fe->ops.enable_high_lnb_voltage(fe, (long) parg);
1483                 break;
1484
1485         case FE_SET_FRONTEND: {
1486                 struct dvb_frontend_tune_settings fetunesettings;
1487
1488                 if(fe->dtv_property_cache.state == DTV_TUNE) {
1489                         if (dvb_frontend_check_parameters(fe, &fepriv->parameters) < 0) {
1490                                 err = -EINVAL;
1491                                 break;
1492                         }
1493                 } else {
1494                         if (dvb_frontend_check_parameters(fe, parg) < 0) {
1495                                 err = -EINVAL;
1496                                 break;
1497                         }
1498
1499                         memcpy (&fepriv->parameters, parg,
1500                                 sizeof (struct dvb_frontend_parameters));
1501                         dtv_property_cache_sync(fe, &fepriv->parameters);
1502                 }
1503
1504                 memset(&fetunesettings, 0, sizeof(struct dvb_frontend_tune_settings));
1505                 memcpy(&fetunesettings.parameters, parg,
1506                        sizeof (struct dvb_frontend_parameters));
1507
1508                 /* force auto frequency inversion if requested */
1509                 if (dvb_force_auto_inversion) {
1510                         fepriv->parameters.inversion = INVERSION_AUTO;
1511                         fetunesettings.parameters.inversion = INVERSION_AUTO;
1512                 }
1513                 if (fe->ops.info.type == FE_OFDM) {
1514                         /* without hierarchical coding code_rate_LP is irrelevant,
1515                          * so we tolerate the otherwise invalid FEC_NONE setting */
1516                         if (fepriv->parameters.u.ofdm.hierarchy_information == HIERARCHY_NONE &&
1517                             fepriv->parameters.u.ofdm.code_rate_LP == FEC_NONE)
1518                                 fepriv->parameters.u.ofdm.code_rate_LP = FEC_AUTO;
1519                 }
1520
1521                 /* get frontend-specific tuning settings */
1522                 if (fe->ops.get_tune_settings && (fe->ops.get_tune_settings(fe, &fetunesettings) == 0)) {
1523                         fepriv->min_delay = (fetunesettings.min_delay_ms * HZ) / 1000;
1524                         fepriv->max_drift = fetunesettings.max_drift;
1525                         fepriv->step_size = fetunesettings.step_size;
1526                 } else {
1527                         /* default values */
1528                         switch(fe->ops.info.type) {
1529                         case FE_QPSK:
1530                                 fepriv->min_delay = HZ/20;
1531                                 fepriv->step_size = fepriv->parameters.u.qpsk.symbol_rate / 16000;
1532                                 fepriv->max_drift = fepriv->parameters.u.qpsk.symbol_rate / 2000;
1533                                 break;
1534
1535                         case FE_QAM:
1536                                 fepriv->min_delay = HZ/20;
1537                                 fepriv->step_size = 0; /* no zigzag */
1538                                 fepriv->max_drift = 0;
1539                                 break;
1540
1541                         case FE_OFDM:
1542                                 fepriv->min_delay = HZ/20;
1543                                 fepriv->step_size = fe->ops.info.frequency_stepsize * 2;
1544                                 fepriv->max_drift = (fe->ops.info.frequency_stepsize * 2) + 1;
1545                                 break;
1546                         case FE_ATSC:
1547                                 fepriv->min_delay = HZ/20;
1548                                 fepriv->step_size = 0;
1549                                 fepriv->max_drift = 0;
1550                                 break;
1551                         }
1552                 }
1553                 if (dvb_override_tune_delay > 0)
1554                         fepriv->min_delay = (dvb_override_tune_delay * HZ) / 1000;
1555
1556                 fepriv->state = FESTATE_RETUNE;
1557                 dvb_frontend_wakeup(fe);
1558                 dvb_frontend_add_event(fe, 0);
1559                 fepriv->status = 0;
1560                 err = 0;
1561                 break;
1562         }
1563
1564         case FE_GET_EVENT:
1565                 err = dvb_frontend_get_event (fe, parg, file->f_flags);
1566                 break;
1567
1568         case FE_GET_FRONTEND:
1569                 if (fe->ops.get_frontend) {
1570                         memcpy (parg, &fepriv->parameters, sizeof (struct dvb_frontend_parameters));
1571                         err = fe->ops.get_frontend(fe, (struct dvb_frontend_parameters*) parg);
1572                 }
1573                 break;
1574
1575         case FE_SET_FRONTEND_TUNE_MODE:
1576                 fepriv->tune_mode_flags = (unsigned long) parg;
1577                 err = 0;
1578                 break;
1579         };
1580
1581         return err;
1582 }
1583
1584
1585 static unsigned int dvb_frontend_poll(struct file *file, struct poll_table_struct *wait)
1586 {
1587         struct dvb_device *dvbdev = file->private_data;
1588         struct dvb_frontend *fe = dvbdev->priv;
1589         struct dvb_frontend_private *fepriv = fe->frontend_priv;
1590
1591         dprintk ("%s\n", __func__);
1592
1593         poll_wait (file, &fepriv->events.wait_queue, wait);
1594
1595         if (fepriv->events.eventw != fepriv->events.eventr)
1596                 return (POLLIN | POLLRDNORM | POLLPRI);
1597
1598         return 0;
1599 }
1600
1601 static int dvb_frontend_open(struct inode *inode, struct file *file)
1602 {
1603         struct dvb_device *dvbdev = file->private_data;
1604         struct dvb_frontend *fe = dvbdev->priv;
1605         struct dvb_frontend_private *fepriv = fe->frontend_priv;
1606         int ret;
1607
1608         dprintk ("%s\n", __func__);
1609
1610         if (dvbdev->users == -1 && fe->ops.ts_bus_ctrl) {
1611                 if ((ret = fe->ops.ts_bus_ctrl(fe, 1)) < 0)
1612                         return ret;
1613         }
1614
1615         if ((ret = dvb_generic_open (inode, file)) < 0)
1616                 goto err1;
1617
1618         if ((file->f_flags & O_ACCMODE) != O_RDONLY) {
1619                 /* normal tune mode when opened R/W */
1620                 fepriv->tune_mode_flags &= ~FE_TUNE_MODE_ONESHOT;
1621                 fepriv->tone = -1;
1622                 fepriv->voltage = -1;
1623
1624                 ret = dvb_frontend_start (fe);
1625                 if (ret)
1626                         goto err2;
1627
1628                 /*  empty event queue */
1629                 fepriv->events.eventr = fepriv->events.eventw = 0;
1630         }
1631
1632         return ret;
1633
1634 err2:
1635         dvb_generic_release(inode, file);
1636 err1:
1637         if (dvbdev->users == -1 && fe->ops.ts_bus_ctrl)
1638                 fe->ops.ts_bus_ctrl(fe, 0);
1639         return ret;
1640 }
1641
1642 static int dvb_frontend_release(struct inode *inode, struct file *file)
1643 {
1644         struct dvb_device *dvbdev = file->private_data;
1645         struct dvb_frontend *fe = dvbdev->priv;
1646         struct dvb_frontend_private *fepriv = fe->frontend_priv;
1647         int ret;
1648
1649         dprintk ("%s\n", __func__);
1650
1651         if ((file->f_flags & O_ACCMODE) != O_RDONLY)
1652                 fepriv->release_jiffies = jiffies;
1653
1654         ret = dvb_generic_release (inode, file);
1655
1656         if (dvbdev->users == -1) {
1657                 if (fepriv->exit == 1) {
1658                         fops_put(file->f_op);
1659                         file->f_op = NULL;
1660                         wake_up(&dvbdev->wait_queue);
1661                 }
1662                 if (fe->ops.ts_bus_ctrl)
1663                         fe->ops.ts_bus_ctrl(fe, 0);
1664         }
1665
1666         return ret;
1667 }
1668
1669 static struct file_operations dvb_frontend_fops = {
1670         .owner          = THIS_MODULE,
1671         .ioctl          = dvb_generic_ioctl,
1672         .poll           = dvb_frontend_poll,
1673         .open           = dvb_frontend_open,
1674         .release        = dvb_frontend_release
1675 };
1676
1677 int dvb_register_frontend(struct dvb_adapter* dvb,
1678                           struct dvb_frontend* fe)
1679 {
1680         struct dvb_frontend_private *fepriv;
1681         static const struct dvb_device dvbdev_template = {
1682                 .users = ~0,
1683                 .writers = 1,
1684                 .readers = (~0)-1,
1685                 .fops = &dvb_frontend_fops,
1686                 .kernel_ioctl = dvb_frontend_ioctl
1687         };
1688
1689         dprintk ("%s\n", __func__);
1690
1691         if (mutex_lock_interruptible(&frontend_mutex))
1692                 return -ERESTARTSYS;
1693
1694         fe->frontend_priv = kzalloc(sizeof(struct dvb_frontend_private), GFP_KERNEL);
1695         if (fe->frontend_priv == NULL) {
1696                 mutex_unlock(&frontend_mutex);
1697                 return -ENOMEM;
1698         }
1699         fepriv = fe->frontend_priv;
1700
1701         init_MUTEX (&fepriv->sem);
1702         init_waitqueue_head (&fepriv->wait_queue);
1703         init_waitqueue_head (&fepriv->events.wait_queue);
1704         mutex_init(&fepriv->events.mtx);
1705         fe->dvb = dvb;
1706         fepriv->inversion = INVERSION_OFF;
1707
1708         printk ("DVB: registering frontend %i (%s)...\n",
1709                 fe->dvb->num,
1710                 fe->ops.info.name);
1711
1712         dvb_register_device (fe->dvb, &fepriv->dvbdev, &dvbdev_template,
1713                              fe, DVB_DEVICE_FRONTEND);
1714
1715         mutex_unlock(&frontend_mutex);
1716         return 0;
1717 }
1718 EXPORT_SYMBOL(dvb_register_frontend);
1719
1720 int dvb_unregister_frontend(struct dvb_frontend* fe)
1721 {
1722         struct dvb_frontend_private *fepriv = fe->frontend_priv;
1723         dprintk ("%s\n", __func__);
1724
1725         mutex_lock(&frontend_mutex);
1726         dvb_frontend_stop (fe);
1727         mutex_unlock(&frontend_mutex);
1728
1729         if (fepriv->dvbdev->users < -1)
1730                 wait_event(fepriv->dvbdev->wait_queue,
1731                                 fepriv->dvbdev->users==-1);
1732
1733         mutex_lock(&frontend_mutex);
1734         dvb_unregister_device (fepriv->dvbdev);
1735
1736         /* fe is invalid now */
1737         kfree(fepriv);
1738         mutex_unlock(&frontend_mutex);
1739         return 0;
1740 }
1741 EXPORT_SYMBOL(dvb_unregister_frontend);
1742
1743 #ifdef CONFIG_MEDIA_ATTACH
1744 void dvb_frontend_detach(struct dvb_frontend* fe)
1745 {
1746         void *ptr;
1747
1748         if (fe->ops.release_sec) {
1749                 fe->ops.release_sec(fe);
1750                 symbol_put_addr(fe->ops.release_sec);
1751         }
1752         if (fe->ops.tuner_ops.release) {
1753                 fe->ops.tuner_ops.release(fe);
1754                 symbol_put_addr(fe->ops.tuner_ops.release);
1755         }
1756         if (fe->ops.analog_ops.release) {
1757                 fe->ops.analog_ops.release(fe);
1758                 symbol_put_addr(fe->ops.analog_ops.release);
1759         }
1760         ptr = (void*)fe->ops.release;
1761         if (ptr) {
1762                 fe->ops.release(fe);
1763                 symbol_put_addr(ptr);
1764         }
1765 }
1766 #else
1767 void dvb_frontend_detach(struct dvb_frontend* fe)
1768 {
1769         if (fe->ops.release_sec)
1770                 fe->ops.release_sec(fe);
1771         if (fe->ops.tuner_ops.release)
1772                 fe->ops.tuner_ops.release(fe);
1773         if (fe->ops.analog_ops.release)
1774                 fe->ops.analog_ops.release(fe);
1775         if (fe->ops.release)
1776                 fe->ops.release(fe);
1777 }
1778 #endif
1779 EXPORT_SYMBOL(dvb_frontend_detach);