+++ /dev/null
-
-/*
- * CINELERRA
- * Copyright (C) 2008 Adam Williams <broadcast at earthling dot net>
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
- *
- */
-
-#include "../../guicast/bcwindowbase.inc"
-#include "../../guicast/clip.h"
-#include "condition.h"
-#include "devicedvbinput.inc"
-#include "dvbtune.h"
-#include "mutex.h"
-
-#include <errno.h>
-#include <fcntl.h>
-#ifdef HAVE_DVB
-#include <linux/dvb/dmx.h>
-#include <linux/dvb/frontend.h>
-#endif
-#include <stdio.h>
-#include <string.h>
-#include <sys/ioctl.h>
-#include <unistd.h>
-
-
-
-
-#ifdef HAVE_DVB
-/* Frequency tables ripped straight off of pchdtv source code. */
-/* DVB frequencies for US broadcast */
-/* First two entries are to make the entries
- line up with the channel number as index */
-static unsigned long ntsc_dvb[ ] = {
- 0, 0, 57, 63, 69, 79, 85, 177, 183, 189 ,
- 195, 201, 207, 213, 473, 479, 485, 491, 497, 503 ,
- 509, 515, 521, 527, 533, 539, 545, 551, 557, 563 ,
- 569, 575, 581, 587, 593, 599, 605, 611, 617, 623 ,
- 629, 635, 641, 647, 653, 659, 665, 671, 677, 683 ,
- 689, 695, 701, 707, 713, 719, 725, 731, 737, 743 ,
- 749, 755, 761, 767, 773, 779, 785, 791, 797, 803 ,
- 809, 815, 821, 827, 833, 839, 845, 851, 857, 863 ,
- 869, 875, 881, 887, 893, 899, 905, 911, 917, 923 ,
- 929, 935, 941, 947, 953, 959, 965, 971, 977, 983 ,
- 989, 995, 1001, 1007, 1013, 1019, 1025, 1031, 1037, 1043
-};
-
-static unsigned long catv_dvb[] = {
- 0, 0, 57, 63, 69, 79, 85, 177, 183, 189,
- 195, 201, 207, 213, 123, 129, 135, 141, 147, 153,
- 159, 165, 171, 219, 225, 231, 237, 243, 249, 255,
- 261, 267, 273, 279, 285, 291, 297, 303, 309, 315,
- 321, 327, 333, 339, 345, 351, 357, 363, 369, 375,
- 381, 387, 393, 399, 405, 411, 417, 423, 429, 435,
- 441, 447, 453, 459, 465, 471, 477, 483, 489, 495,
- 501, 507, 513, 519, 525, 531, 537, 543, 549, 555,
- 561, 567, 573, 579, 585, 591, 597, 603, 609, 615,
- 621, 627, 633, 639, 645, 93, 99, 105, 111, 117,
- 651, 657, 663, 669, 675, 681, 687, 693, 699, 705,
- 711, 717, 723, 729, 735, 741, 747, 753, 759, 765,
- 771, 777, 783, 789, 795, 781, 807, 813, 819, 825,
- 831, 837, 843, 849, 855, 861, 867, 873, 879, 885,
- 891, 897, 903, 909, 915, 921, 927, 933, 939, 945,
- 951, 957, 963, 969, 975, 981, 987, 993, 999
-};
-#endif
-
-
-
-DVBTune::DVBTune(RenderFarmClientThread *client)
- : TunerServer(client)
-{
- reset();
- buffer_lock = new Mutex("DVBTune::buffer_lock");
-}
-
-DVBTune::~DVBTune()
-{
- delete [] buffer;
- delete buffer_lock;
- delete thread;
- delete status;
-}
-
-void DVBTune::reset()
-{
- frontend_fd = -1;
- audio_fd = -1;
- video_fd = -1;
- dvr_fd = -1;
- buffer = 0;
- buffer_size = 0;
- buffer_allocated = 0;
- thread = 0;
- status = 0;
- has_lock = 0;
-}
-
-int DVBTune::open_tuner()
-{
-#ifdef HAVE_DVB
- char frontend_path[BCTEXTLEN];
- char demux_path[BCTEXTLEN];
- char dvr_path[BCTEXTLEN];
-
- sprintf(frontend_path, "/dev/dvb/adapter%d/frontend%d",
- get_device_number(),
- 0);
- sprintf(demux_path, "/dev/dvb/adapter%d/demux%d",
- get_device_number(),
- 0);
- sprintf(dvr_path, "/dev/dvb/adapter%d/dvr%d",
- get_device_number(),
- 0);
-
-
-
-
-
-
-
-
- if((frontend_fd = ::open(frontend_path, O_RDWR)) < 0)
- {
- fprintf(stderr,
- "DVBTune::open_tuner %s: %s\n",
- frontend_path,
- strerror(errno));
- return 1;
- }
-
-
-// Open transport stream for reading
- if((dvr_fd = ::open(dvr_path, O_RDONLY)) < 0)
- {
- fprintf(stderr,
- "DVBTune::open_tuner %s: %s\n",
- dvr_path,
- strerror(errno));
- return 1;
- }
-
- struct dvb_frontend_parameters frontend_param;
- bzero(&frontend_param, sizeof(frontend_param));
-
-// Set frequency
- int index = CLIP(TunerServer::get_channel(), 2, 69);
- int table = TunerServer::get_table();
- switch(table)
- {
- case NETTUNE_AIR:
- frontend_param.frequency = ntsc_dvb[index] * 1000000;
- frontend_param.u.vsb.modulation = VSB_8;
- break;
- case NETTUNE_CABLE:
- frontend_param.frequency = catv_dvb[index] * 1000000;
- frontend_param.u.vsb.modulation = QAM_AUTO;
- break;
- }
-
-
- if(ioctl(frontend_fd, FE_SET_FRONTEND, &frontend_param) < 0)
- {
- fprintf(stderr,
- "DVBTune::open_tuner FE_SET_FRONTEND frequency=%d: %s",
- frontend_param.frequency,
- strerror(errno));
- return 1;
- }
-
- if((video_fd = ::open(demux_path, O_RDWR)) < 0)
- {
- fprintf(stderr,
- "DVBTune::open_tuner %s for video: %s\n",
- demux_path,
- strerror(errno));
- return 1;
- }
-
-//printf("DVBTune::open_tuner 0x%x 0x%x\n", get_audio_pid(), get_video_pid());
-// Setting exactly one PES filter to 0x2000 dumps the entire
-// transport stream.
- struct dmx_pes_filter_params pesfilter;
- if(!get_video_pid() && !get_audio_pid())
- {
- pesfilter.pid = 0x2000;
- pesfilter.input = DMX_IN_FRONTEND;
- pesfilter.output = DMX_OUT_TS_TAP;
- pesfilter.pes_type = DMX_PES_OTHER;
- pesfilter.flags = DMX_IMMEDIATE_START;
- if(ioctl(video_fd, DMX_SET_PES_FILTER, &pesfilter) < 0)
- {
- fprintf(stderr,
- "DVBTune::open_tuner DMX_SET_PES_FILTER for raw: %s\n",
- strerror(errno));
- return 1;
- }
- }
-
-
- if(get_video_pid())
- {
-
-
- pesfilter.pid = get_video_pid();
- pesfilter.input = DMX_IN_FRONTEND;
- pesfilter.output = DMX_OUT_TS_TAP;
- pesfilter.pes_type = DMX_PES_VIDEO;
- pesfilter.flags = DMX_IMMEDIATE_START;
- if(ioctl(video_fd, DMX_SET_PES_FILTER, &pesfilter) < 0)
- {
- fprintf(stderr,
- "DVBTune::open_tuner DMX_SET_PES_FILTER for video: %s\n",
- strerror(errno));
- return 1;
- }
- }
-
- if(get_audio_pid())
- {
- if((audio_fd = ::open(demux_path, O_RDWR)) < 0)
- {
- fprintf(stderr,
- "DVBTune::open_tuner %s for audio: %s\n",
- demux_path,
- strerror(errno));
- return 1;
- }
-
- pesfilter.pid = get_audio_pid();
- pesfilter.input = DMX_IN_FRONTEND;
- pesfilter.output = DMX_OUT_TS_TAP;
- pesfilter.pes_type = DMX_PES_AUDIO;
- pesfilter.flags = DMX_IMMEDIATE_START;
- if(ioctl(audio_fd, DMX_SET_PES_FILTER, &pesfilter) < 0)
- {
- fprintf(stderr,
- "DVBTune::open_tuner DMX_SET_PES_FILTER for audio: %s\n",
- strerror(errno));
- return 1;
- }
- }
-
-
-
-
-
-
- if(!thread)
- {
- thread = new DVBTuneThread(this);
- thread->start();
- }
-
- if(!status)
- {
- status = new DVBTuneStatus(this);
- status->start();
- }
- return 0;
-#endif
- return 1;
-}
-
-int DVBTune::close_tuner()
-{
- delete thread;
- delete status;
- delete [] buffer;
-
- if(frontend_fd >= 0) close(frontend_fd);
- if(audio_fd >= 0) close(audio_fd);
- if(video_fd >= 0) close(video_fd);
- if(dvr_fd >= 0) close(dvr_fd);
- reset();
-
- return 0;
-}
-
-
-
-int DVBTune::get_signal_strength(int *current_power, int *current_lock)
-{
- if(has_lock)
- {
- *current_power = 10;
- *current_lock = 1;
- }
- else
- {
- *current_power = 0;
- *current_lock = 0;
- }
-
-
- return 0;
-}
-
-int DVBTune::read_data(unsigned char *data, int size)
-{
- int buffer_size = 0;
-
-// Poll if not enough data
- buffer_lock->lock("DVBTune::read_data 2");
- buffer_size = this->buffer_size;
- buffer_lock->unlock();
-
- if(buffer_size < size)
- {
- usleep(100000);
- return 0;
- }
-
-
-// Copy data over
- memcpy(data, buffer, size);
-// Shift buffer over
- buffer_lock->lock("DVBTune::read_data 2");
- int new_size = buffer_size - size;
- for(int i = 0, j = size; i < new_size; i++, j++)
- {
- buffer[i] = buffer[j];
- }
- this->buffer_size -= size;
- buffer_lock->unlock();
-
- return size;
-}
-
-
-
-
-
-
-
-#define BUFFER_SIZE 0x100000
-#define MAX_BUFFER_SIZE 0x10000000
-DVBTuneThread::DVBTuneThread(DVBTune *server)
- : Thread(1, 0, 0)
-{
- this->server = server;
- temp = new unsigned char[BUFFER_SIZE];
-}
-
-DVBTuneThread::~DVBTuneThread()
-{
- Thread::cancel();
- Thread::join();
- delete [] temp;
-}
-
-void DVBTuneThread::run()
-{
- while(1)
- {
- Thread::enable_cancel();
-
-// Pretend to be blocking if no signal
- while(!server->has_lock)
- {
- usleep(1000000);
- }
-
-
- int result = ::read(server->dvr_fd, temp, BUFFER_SIZE);
- Thread::disable_cancel();
-// This happens if buffer overrun.
- if(result < 0)
- {
- printf("DVBTuneThread::run: %s\n", strerror(errno));
- result = 0;
- }
- else
-// Discard if server full.
- if(server->buffer_size > MAX_BUFFER_SIZE)
- {
- ;
- }
- else
-// Store in server buffer.
- {
- server->buffer_lock->lock("DVBTuneThread::run");
- if(!server->buffer ||
- server->buffer_allocated < server->buffer_size + result)
- {
- int new_allocation = server->buffer_size + result;
- unsigned char *new_buffer = new unsigned char[new_allocation];
- memcpy(new_buffer, server->buffer, server->buffer_size);
- delete [] server->buffer;
-
- server->buffer = new_buffer;
- server->buffer_allocated = new_allocation;
- }
-
- memcpy(server->buffer + server->buffer_size, temp, result);
- server->buffer_size += result;
- server->buffer_lock->unlock();
- }
- }
-}
-
-
-
-
-
-
-
-
-
-
-
-DVBTuneStatus::DVBTuneStatus(DVBTune *server)
- : Thread(1, 0, 0)
-{
- this->server = server;
-}
-
-DVBTuneStatus::~DVBTuneStatus()
-{
- Thread::cancel();
- Thread::join();
-}
-
-void DVBTuneStatus::run()
-{
-#ifdef HAVE_DVB
- while(1)
- {
- fe_status_t status;
- uint16_t snr, signal;
- uint32_t ber, uncorrected_blocks;
-
-
- bzero(&status, sizeof(status));
- Thread::enable_cancel();
- ioctl(server->frontend_fd, FE_READ_STATUS, &status);
- ioctl(server->frontend_fd, FE_READ_SIGNAL_STRENGTH, &signal);
- ioctl(server->frontend_fd, FE_READ_SNR, &snr);
- ioctl(server->frontend_fd, FE_READ_BER, &ber);
- ioctl(server->frontend_fd, FE_READ_UNCORRECTED_BLOCKS, &uncorrected_blocks);
- Thread::disable_cancel();
-
-// printf ("DVBTuneStatus::run %02x | signal %04x | snr %04x | "
-// "ber %08x | unc %08x | ",
-// status, signal, snr, ber, uncorrected_blocks);
- if (status & FE_HAS_LOCK)
- {
- printf("DVBTuneStatus::run FE_HAS_LOCK\n");
- }
-
- if(status & FE_HAS_LOCK) server->has_lock = 1;
- sleep(1);
- }
-#endif
-}
-
-
-
-
-
-
-
-
-
-
-
-
-