mvpclient.c

   1 /*
   2     Copyright 2004-2005 Chris Tallon
   3
   4     This file is part of VOMP.
   5
   6     VOMP is free software; you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation; either version 2 of the License, or
   9     (at your option) any later version.
  10
  11     VOMP is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License
  17     along with VOMP; if not, write to the Free Software
  18     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19 */
  20
  21 #include "mvpclient.h"
  22
  23 MVPClient::MVPClient(int tsocket)
  24  : tcp(tsocket)
  25 {
  26   lp = NULL;
  27   rp = NULL;
  28   recordingManager = NULL;
  29   log = Log::getInstance();
  30   loggedIn = false;
  31 }
  32
  33 MVPClient::~MVPClient()
  34 {
  35   log->log("Client", Log::DEBUG, "MVP client destructor");
  36   if (lp)
  37   {
  38     delete lp;
  39     lp = NULL;
  40   }
  41   else if (rp)
  42   {
  43     writeResumeData();
  44
  45     delete rp;
  46     delete recordingManager;
  47     rp = NULL;
  48     recordingManager = NULL;
  49   }
  50
  51   if (loggedIn) cleanConfig();
  52 }
  53
  54 ULLONG MVPClient::ntohll(ULLONG a)
  55 {
  56   return htonll(a);
  57 }
  58
  59 ULLONG MVPClient::htonll(ULLONG a)
  60 {
  61   #if BYTE_ORDER == BIG_ENDIAN
  62     return a;
  63   #else
  64     ULLONG b = 0;
  65
  66     b = ((a << 56) & 0xFF00000000000000ULL)
  67       | ((a << 40) & 0x00FF000000000000ULL)
  68       | ((a << 24) & 0x0000FF0000000000ULL)
  69       | ((a <<  8) & 0x000000FF00000000ULL)
  70       | ((a >>  8) & 0x00000000FF000000ULL)
  71       | ((a >> 24) & 0x0000000000FF0000ULL)
  72       | ((a >> 40) & 0x000000000000FF00ULL)
  73       | ((a >> 56) & 0x00000000000000FFULL) ;
  74
  75     return b;
  76   #endif
  77 }
  78
  79 cChannel* MVPClient::channelFromNumber(ULONG channelNumber)
  80 {
  81   cChannel* channel = NULL;
  82
  83   for (channel = Channels.First(); channel; channel = Channels.Next(channel))
  84   {
  85     if (!channel->GroupSep())
  86     {
  87       log->log("Client", Log::DEBUG, "Looking for channel %lu::: number: %i name: '%s'", channelNumber, channel->Number(), channel->Name());
  88
  89       if (channel->Number() == (int)channelNumber)
  90       {
  91         int vpid = channel->Vpid();
  92 #if VDRVERSNUM < 10300
  93         int apid1 = channel->Apid1();
  94 #else
  95         int apid1 = channel->Apid(0);
  96 #endif
  97         log->log("Client", Log::DEBUG, "Found channel number %lu, vpid = %i, apid1 = %i", channelNumber, vpid, apid1);
  98         return channel;
  99       }
 100     }
 101   }
 102
 103   if (!channel)
 104   {
 105     log->log("Client", Log::DEBUG, "Channel not found");
 106   }
 107
 108   return channel;
 109 }
 110
 111 void MVPClient::writeResumeData()
 112 {
 113   config.setValueLongLong("ResumeData", (char*)rp->getCurrentRecording()->FileName(), rp->getLastPosition());
 114 }
 115
 116 void MVPClient::sendULONG(ULONG ul)
 117 {
 118   UCHAR sendBuffer[8];
 119   *(ULONG*)&sendBuffer[0] = htonl(4);
 120   *(ULONG*)&sendBuffer[4] = htonl(ul);
 121
 122   tcp.sendPacket(sendBuffer, 8);
 123   log->log("Client", Log::DEBUG, "written ULONG %lu", ul);
 124 }
 125
 126 void MVPClientStartThread(void* arg)
 127 {
 128   MVPClient* m = (MVPClient*)arg;
 129   m->run2();
 130   // Nothing external to this class has a reference to it
 131   // This is the end of the thread.. so delete m
 132   delete m;
 133   pthread_exit(NULL);
 134 }
 135
 136 int MVPClient::run()
 137 {
 138   if (pthread_create(&runThread, NULL, (void*(*)(void*))MVPClientStartThread, (void *)this) == -1) return 0;
 139   log->log("Client", Log::DEBUG, "MVPClient run success");
 140   return 1;
 141 }
 142
 143 void MVPClient::run2()
 144 {
 145   // Thread stuff
 146   sigset_t sigset;
 147   sigfillset(&sigset);
 148   pthread_sigmask(SIG_BLOCK, &sigset, NULL);
 149   pthread_detach(runThread);  // Detach
 150
 151   tcp.disableReadTimeout();
 152
 153   tcp.setSoKeepTime(3);
 154   tcp.setNonBlocking();
 155
 156   UCHAR* buffer;
 157   UCHAR* data;
 158   int packetLength;
 159   ULONG opcode;
 160   int result = 0;
 161
 162   while(1)
 163   {
 164     log->log("Client", Log::DEBUG, "Waiting");
 165     buffer = (UCHAR*)tcp.receivePacket();
 166     log->log("Client", Log::DEBUG, "Received packet, length = %u", tcp.getDataLength());
 167     if (buffer == NULL)
 168     {
 169       log->log("Client", Log::DEBUG, "Detected connection closed");
 170       break;
 171     }
 172
 173     packetLength = tcp.getDataLength() - 4;
 174     opcode = ntohl(*(ULONG*)buffer);
 175     data = buffer + 4;
 176
 177     if (!loggedIn && (opcode != 1))
 178     {
 179       free(buffer);
 180       break;
 181     }
 182
 183     switch(opcode)
 184     {
 185       case 1:
 186         result = processLogin(data, packetLength);
 187         break;
 188       case 2:
 189         result = processGetRecordingsList(data, packetLength);
 190         break;
 191       case 3:
 192         result = processDeleteRecording(data, packetLength);
 193         break;
 194       case 4:
 195         result = processGetSummary(data, packetLength);
 196         break;
 197       case 5:
 198         result = processGetChannelsList(data, packetLength);
 199         break;
 200       case 6:
 201         result = processStartStreamingChannel(data, packetLength);
 202         break;
 203       case 7:
 204         result = processGetBlock(data, packetLength);
 205         break;
 206       case 8:
 207         result = processStopStreaming(data, packetLength);
 208         break;
 209       case 9:
 210         result = processStartStreamingRecording(data, packetLength);
 211         break;
 212       case 10:
 213         result = processGetChannelSchedule(data, packetLength);
 214         break;
 215       case 11:
 216         result = processConfigSave(data, packetLength);
 217         break;
 218       case 12:
 219         result = processConfigLoad(data, packetLength);
 220         break;
 221       case 13:
 222         result = processReScanRecording(data, packetLength);
 223         break;
 224       case 14:
 225         result = processGetTimers(data, packetLength);
 226         break;
 227       case 15:
 228         result = processSetTimer(data, packetLength);
 229         break;
 230       case 16:
 231         result = processPositionFromFrameNumber(data, packetLength);
 232         break;
 233     }
 234
 235     free(buffer);
 236     if (!result) break;
 237   }
 238 }
 239
 240 int MVPClient::processLogin(UCHAR* buffer, int length)
 241 {
 242   if (length != 6) return 0;
 243
 244   // Open the config
 245
 246   const char* configDir = cPlugin::ConfigDirectory();
 247   if (!configDir)
 248   {
 249     log->log("Client", Log::DEBUG, "No config dir!");
 250     return 0;
 251   }
 252
 253   char configFileName[PATH_MAX];
 254   snprintf(configFileName, PATH_MAX - strlen(configDir) - 17 - 20, "%s/vomp-%02X-%02X-%02X-%02X-%02X-%02X.conf", configDir, buffer[0], buffer[1], buffer[2], buffer[3], buffer[4], buffer[5]);
 255                                 //( ^^^^^^^^^^^^^eh?^^^^^^^^^^^^^)
 256   config.init(configFileName);
 257
 258   // Send the login reply
 259
 260   time_t timeNow = time(NULL);
 261   struct tm* timeStruct = localtime(&timeNow);
 262   int timeOffset = timeStruct->tm_gmtoff;
 263
 264   UCHAR sendBuffer[12];
 265   *(ULONG*)&sendBuffer[0] = htonl(8);
 266   *(ULONG*)&sendBuffer[4] = htonl(timeNow);
 267   *(signed int*)&sendBuffer[8] = htonl(timeOffset);
 268
 269   tcp.sendPacket(sendBuffer, 12);
 270   log->log("Client", Log::DEBUG, "written login reply");
 271
 272   loggedIn = true;
 273   return 1;
 274 }
 275
 276 int MVPClient::processGetRecordingsList(UCHAR* data, int length)
 277 {
 278   UCHAR* sendBuffer = new UCHAR[50000]; // hope this is enough
 279   int count = 4; // leave space for the packet length
 280   char* point;
 281
 282
 283   int FreeMB;
 284   int Percent = VideoDiskSpace(&FreeMB);
 285   int Total = (FreeMB / (100 - Percent)) * 100;
 286
 287   *(ULONG*)&sendBuffer[count] = htonl(Total);
 288   count += sizeof(ULONG);
 289   *(ULONG*)&sendBuffer[count] = htonl(FreeMB);
 290   count += sizeof(ULONG);
 291   *(ULONG*)&sendBuffer[count] = htonl(Percent);
 292   count += sizeof(ULONG);
 293
 294
 295   cRecordings Recordings;
 296   Recordings.Load();
 297
 298   for (cRecording *recording = Recordings.First(); recording; recording = Recordings.Next(recording))
 299   {
 300     if (count > 49000) break; // just how big is that hard disk?!
 301     *(ULONG*)&sendBuffer[count] = htonl(recording->start);// + timeOffset);
 302     count += 4;
 303
 304     point = (char*)recording->Name();
 305     strcpy((char*)&sendBuffer[count], point);
 306     count += strlen(point) + 1;
 307
 308     point = (char*)recording->FileName();
 309     strcpy((char*)&sendBuffer[count], point);
 310     count += strlen(point) + 1;
 311   }
 312
 313   *(ULONG*)&sendBuffer[0] = htonl(count - 4); // -4 :  take off the size field
 314
 315   log->log("Client", Log::DEBUG, "recorded size as %u", ntohl(*(ULONG*)&sendBuffer[0]));
 316
 317   tcp.sendPacket(sendBuffer, count);
 318   delete[] sendBuffer;
 319   log->log("Client", Log::DEBUG, "Written list");
 320
 321   return 1;
 322 }
 323
 324 int MVPClient::processDeleteRecording(UCHAR* data, int length)
 325 {
 326   // data is a pointer to the fileName string
 327
 328   cRecordings Recordings;
 329   Recordings.Load(); // probably have to do this
 330
 331   cRecording* recording = Recordings.GetByName((char*)data);
 332
 333   log->log("Client", Log::DEBUG, "recording pointer %p", recording);
 334
 335   if (recording)
 336   {
 337     log->log("Client", Log::DEBUG, "deleting recording: %s", recording->Name());
 338     recording->Delete();
 339     sendULONG(1);
 340   }
 341   else
 342   {
 343     sendULONG(0);
 344   }
 345
 346   return 1;
 347 }
 348
 349 int MVPClient::processGetSummary(UCHAR* data, int length)
 350 {
 351   // data is a pointer to the fileName string
 352
 353   cRecordings Recordings;
 354   Recordings.Load(); // probably have to do this
 355
 356   cRecording *recording = Recordings.GetByName((char*)data);
 357
 358   log->log("Client", Log::DEBUG, "recording pointer %p", recording);
 359
 360   if (recording)
 361   {
 362     UCHAR* sendBuffer = new UCHAR[50000]; // hope this is enough
 363     int count = 4; // leave space for the packet length
 364
 365     char* point;
 366 #if VDRVERSNUM < 10300
 367     point = (char*)recording->Summary();
 368 #else
 369     const cRecordingInfo *Info = recording->Info();
 370     point = (char*)Info->ShortText();
 371     log->log("Client", Log::DEBUG, "info pointer %p summary pointer %p", Info, point);
 372     if (isempty(point))
 373     {
 374       point = (char*)Info->Description();
 375       log->log("Client", Log::DEBUG, "description pointer %p", point);
 376     }
 377 #endif
 378     strcpy((char*)&sendBuffer[count], point);
 379     count += strlen(point) + 1;
 380     *(ULONG*)&sendBuffer[0] = htonl(count - 4); // -4 :  take off the size field
 381
 382     log->log("Client", Log::DEBUG, "recorded size as %u", ntohl(*(ULONG*)&sendBuffer[0]));
 383
 384     tcp.sendPacket(sendBuffer, count);
 385     delete[] sendBuffer;
 386     log->log("Client", Log::DEBUG, "Written summary");
 387
 388
 389   }
 390   else
 391   {
 392     sendULONG(0);
 393   }
 394
 395   return 1;
 396 }
 397
 398 int MVPClient::processGetChannelsList(UCHAR* data, int length)
 399 {
 400   UCHAR* sendBuffer = new UCHAR[50000]; // FIXME hope this is enough
 401   int count = 4; // leave space for the packet length
 402   char* point;
 403   ULONG type;
 404
 405   char* chanConfig = config.getValueString("General", "Channels");
 406   int allChans = 1;
 407   if (chanConfig) allChans = strcasecmp(chanConfig, "FTA only");
 408
 409   for (cChannel *channel = Channels.First(); channel; channel = Channels.Next(channel))
 410   {
 411 #if VDRVERSNUM < 10300
 412     if (!channel->GroupSep() && (!channel->Ca() || allChans))
 413 #else
 414     if (!channel->GroupSep() && (!channel->Ca(0) || allChans))
 415 #endif
 416     {
 417       log->log("Client", Log::DEBUG, "name: '%s'", channel->Name());
 418
 419       if (channel->Vpid()) type = 1;
 420 #if VDRVERSNUM < 10300
 421       else type = 2;
 422 #else
 423       else if (channel->Apid(0)) type = 2;
 424       else continue;
 425 #endif
 426
 427       if (count > 49000) break;
 428       *(ULONG*)&sendBuffer[count] = htonl(channel->Number());
 429       count += 4;
 430
 431       *(ULONG*)&sendBuffer[count] = htonl(type);
 432       count += 4;
 433
 434       point = (char*)channel->Name();
 435       strcpy((char*)&sendBuffer[count], point);
 436       count += strlen(point) + 1;
 437     }
 438   }
 439
 440   *(ULONG*)&sendBuffer[0] = htonl(count - 4); // -4 :  take off the size field
 441
 442   log->log("Client", Log::DEBUG, "recorded size as %u", ntohl(*(ULONG*)&sendBuffer[0]));
 443
 444   tcp.sendPacket(sendBuffer, count);
 445   delete[] sendBuffer;
 446   log->log("Client", Log::DEBUG, "Written channels list");
 447
 448   return 1;
 449 }
 450
 451 int MVPClient::processStartStreamingChannel(UCHAR* data, int length)
 452 {
 453   log->log("Client", Log::DEBUG, "length = %i", length);
 454   ULONG channelNumber = ntohl(*(ULONG*)data);
 455
 456   cChannel* channel = channelFromNumber(channelNumber);
 457   if (!channel)
 458   {
 459     sendULONG(0);
 460     return 1;
 461   }
 462
 463   // get the priority we should use
 464   int fail = 1;
 465   int priority = config.getValueLong("General", "Live priority", &fail);
 466   if (!fail)
 467   {
 468     log->log("Client", Log::DEBUG, "Config: Live TV priority: %i", priority);
 469   }
 470   else
 471   {
 472     log->log("Client", Log::DEBUG, "Config: Live TV priority config fail");
 473     priority = 0;
 474   }
 475
 476   // a bit of sanity..
 477   if (priority < 0) priority = 0;
 478   if (priority > 99) priority = 99;
 479
 480   log->log("Client", Log::DEBUG, "Using live TV priority %i", priority);
 481   lp = MVPReceiver::create(channel, priority);
 482
 483   if (!lp)
 484   {
 485     sendULONG(0);
 486     return 1;
 487   }
 488
 489   if (!lp->init())
 490   {
 491     delete lp;
 492     lp = NULL;
 493     sendULONG(0);
 494     return 1;
 495   }
 496
 497   sendULONG(1);
 498   return 1;
 499 }
 500
 501 int MVPClient::processStopStreaming(UCHAR* data, int length)
 502 {
 503   log->log("Client", Log::DEBUG, "STOP STREAMING RECEIVED");
 504   if (lp)
 505   {
 506     delete lp;
 507     lp = NULL;
 508   }
 509   else if (rp)
 510   {
 511     writeResumeData();
 512
 513     delete rp;
 514     delete recordingManager;
 515     rp = NULL;
 516     recordingManager = NULL;
 517   }
 518
 519   sendULONG(1);
 520   return 1;
 521 }
 522
 523 int MVPClient::processGetBlock(UCHAR* data, int length)
 524 {
 525   if (!lp && !rp)
 526   {
 527     log->log("Client", Log::DEBUG, "Get block called when no streaming happening!");
 528     return 0;
 529   }
 530
 531   ULLONG position = ntohll(*(ULLONG*)data);
 532   data += sizeof(ULLONG);
 533   ULONG amount = ntohl(*(ULONG*)data);
 534
 535   log->log("Client", Log::DEBUG, "getblock pos = %llu length = %lu", position, amount);
 536
 537   UCHAR sendBuffer[amount + 4];
 538   ULONG amountReceived = 0; // compiler moan.
 539   if (lp)
 540   {
 541     log->log("Client", Log::DEBUG, "getting from live");
 542     amountReceived = lp->getBlock(&sendBuffer[4], amount);
 543
 544     if (!amountReceived)
 545     {
 546       // vdr has possibly disconnected the receiver
 547       log->log("Client", Log::DEBUG, "VDR has disconnected the live receiver");
 548       delete lp;
 549       lp = NULL;
 550     }
 551   }
 552   else if (rp)
 553   {
 554     log->log("Client", Log::DEBUG, "getting from recording");
 555     amountReceived = rp->getBlock(&sendBuffer[4], position, amount);
 556   }
 557
 558   *(ULONG*)&sendBuffer[0] = htonl(amountReceived);
 559   tcp.sendPacket(sendBuffer, amountReceived + 4);
 560   log->log("Client", Log::DEBUG, "written ok %lu", amountReceived);
 561
 562   return 1;
 563 }
 564
 565 int MVPClient::processStartStreamingRecording(UCHAR* data, int length)
 566 {
 567   // data is a pointer to the fileName string
 568
 569   recordingManager = new cRecordings;
 570   recordingManager->Load();
 571
 572   cRecording* recording = recordingManager->GetByName((char*)data);
 573
 574   log->log("Client", Log::DEBUG, "recording pointer %p", recording);
 575
 576   if (recording)
 577   {
 578     rp = new RecPlayer(recording);
 579
 580     UCHAR sendBuffer[12];
 581     *(ULONG*)&sendBuffer[0] = htonl(8);
 582     *(ULLONG*)&sendBuffer[4] = htonll(rp->getTotalLength());
 583
 584     tcp.sendPacket(sendBuffer, 12);
 585     log->log("Client", Log::DEBUG, "written totalLength");
 586   }
 587   else
 588   {
 589     delete recordingManager;
 590     recordingManager = NULL;
 591   }
 592   return 1;
 593 }
 594
 595 int MVPClient::processReScanRecording(UCHAR* data, int length)
 596 {
 597   ULLONG retval = 0;
 598
 599   if (!rp)
 600   {
 601     log->log("Client", Log::DEBUG, "Rescan recording called when no recording being played!");
 602   }
 603   else
 604   {
 605     rp->scan();
 606     retval = rp->getTotalLength();
 607   }
 608
 609   UCHAR sendBuffer[12];
 610   *(ULONG*)&sendBuffer[0] = htonl(8);
 611   *(ULLONG*)&sendBuffer[4] = htonll(retval);
 612
 613   tcp.sendPacket(sendBuffer, 12);
 614   log->log("Client", Log::DEBUG, "Rescan recording, wrote new length to client");
 615   return 1;
 616 }
 617
 618 int MVPClient::processPositionFromFrameNumber(UCHAR* data, int length)
 619 {
 620   ULLONG retval = 0;
 621
 622   ULONG frameNumber = ntohl(*(ULONG*)data);
 623   data += 4;
 624
 625   if (!rp)
 626   {
 627     log->log("Client", Log::DEBUG, "Rescan recording called when no recording being played!");
 628   }
 629   else
 630   {
 631     retval = rp->positionFromFrameNumber(frameNumber);
 632   }
 633
 634   UCHAR sendBuffer[12];
 635   *(ULONG*)&sendBuffer[0] = htonl(8);
 636   *(ULLONG*)&sendBuffer[4] = htonll(retval);
 637
 638   tcp.sendPacket(sendBuffer, 12);
 639   log->log("Client", Log::DEBUG, "Wrote posFromFrameNum reply to client");
 640   return 1;
 641 }
 642
 643 int MVPClient::processGetChannelSchedule(UCHAR* data, int length)
 644 {
 645   ULONG channelNumber = ntohl(*(ULONG*)data);
 646   data += 4;
 647   ULONG startTime = ntohl(*(ULONG*)data);
 648   data += 4;
 649   ULONG duration = ntohl(*(ULONG*)data);
 650
 651   log->log("Client", Log::DEBUG, "get schedule called for channel %lu", channelNumber);
 652
 653   cChannel* channel = channelFromNumber(channelNumber);
 654   if (!channel)
 655   {
 656     UCHAR sendBuffer[4];
 657     *(ULONG*)&sendBuffer[0] = htonl(4);
 658     *(ULONG*)&sendBuffer[4] = htonl(0);
 659     tcp.sendPacket(sendBuffer, 8);
 660     log->log("Client", Log::DEBUG, "written 0 because channel = NULL");
 661     return 1;
 662   }
 663
 664   log->log("Client", Log::DEBUG, "Got channel");
 665
 666 #if VDRVERSNUM < 10300
 667   cMutexLock MutexLock;
 668   const cSchedules *Schedules = cSIProcessor::Schedules(MutexLock);
 669 #else
 670   cSchedulesLock MutexLock;
 671   const cSchedules *Schedules = cSchedules::Schedules(MutexLock);
 672 #endif
 673   if (!Schedules)
 674   {
 675     UCHAR sendBuffer[8];
 676     *(ULONG*)&sendBuffer[0] = htonl(4);
 677     *(ULONG*)&sendBuffer[4] = htonl(0);
 678     tcp.sendPacket(sendBuffer, 8);
 679     log->log("Client", Log::DEBUG, "written 0 because Schedule!s! = NULL");
 680     return 1;
 681   }
 682
 683   log->log("Client", Log::DEBUG, "Got schedule!s! object");
 684
 685   const cSchedule *Schedule = Schedules->GetSchedule(channel->GetChannelID());
 686   if (!Schedule)
 687   {
 688     UCHAR sendBuffer[8];
 689     *(ULONG*)&sendBuffer[0] = htonl(4);
 690     *(ULONG*)&sendBuffer[4] = htonl(0);
 691     tcp.sendPacket(sendBuffer, 8);
 692     log->log("Client", Log::DEBUG, "written 0 because Schedule = NULL");
 693     return 1;
 694   }
 695
 696   log->log("Client", Log::DEBUG, "Got schedule object");
 697
 698   UCHAR* sendBuffer = (UCHAR*)malloc(100000);
 699   ULONG sendBufferLength = 100000;
 700   ULONG sendBufferUsed = sizeof(ULONG); // leave a hole for the entire packet length
 701
 702   char* empty = "";
 703
 704   // assign all the event info to temp vars then we know exactly what size they are
 705   ULONG thisEventID;
 706   ULONG thisEventTime;
 707   ULONG thisEventDuration;
 708   const char* thisEventTitle;
 709   const char* thisEventSubTitle;
 710   const char* thisEventDescription;
 711
 712   ULONG constEventLength = sizeof(thisEventID) + sizeof(thisEventTime) + sizeof(thisEventDuration);
 713   ULONG thisEventLength;
 714
 715 #if VDRVERSNUM < 10300
 716
 717   const cEventInfo *event;
 718   for (int eventNumber = 0; eventNumber < Schedule->NumEvents(); eventNumber++)
 719   {
 720     event = Schedule->GetEventNumber(eventNumber);
 721
 722     thisEventID = event->GetEventID();
 723     thisEventTime = event->GetTime();
 724     thisEventDuration = event->GetDuration();
 725     thisEventTitle = event->GetTitle();
 726     thisEventSubTitle = event->GetSubtitle();
 727     thisEventDescription = event->GetExtendedDescription();
 728
 729 #else
 730
 731   for (const cEvent* event = Schedule->Events()->First(); event; event = Schedule->Events()->Next(event))
 732   {
 733     thisEventID = event->EventID();
 734     thisEventTime = event->StartTime();
 735     thisEventDuration = event->Duration();
 736     thisEventTitle = event->Title();
 737     thisEventSubTitle = NULL;
 738     thisEventDescription = event->Description();
 739
 740 #endif
 741
 742     log->log("Client", Log::DEBUG, "Got an event object %p", event);
 743
 744     //in the past filter
 745     if ((thisEventTime + thisEventDuration) < (ULONG)time(NULL)) continue;
 746
 747     //start time filter
 748     if ((thisEventTime + thisEventDuration) <= startTime) continue;
 749
 750     //duration filter
 751     if (thisEventTime >= (startTime + duration)) continue;
 752
 753     if (!thisEventTitle) thisEventTitle = empty;
 754     if (!thisEventSubTitle) thisEventSubTitle = empty;
 755     if (!thisEventDescription) thisEventDescription = empty;
 756
 757     thisEventLength = constEventLength + strlen(thisEventTitle) + 1 + strlen(thisEventSubTitle) + 1 + strlen(thisEventDescription) + 1;
 758
 759     log->log("Client", Log::DEBUG, "Done s1");
 760
 761     // now extend the buffer if necessary
 762     if ((sendBufferUsed + thisEventLength) > sendBufferLength)
 763     {
 764       log->log("Client", Log::DEBUG, "Extending buffer");
 765       sendBufferLength += 100000;
 766       UCHAR* temp = (UCHAR*)realloc(sendBuffer, sendBufferLength);
 767       if (temp == NULL)
 768       {
 769         free(sendBuffer);
 770         UCHAR sendBuffer2[8];
 771         *(ULONG*)&sendBuffer2[0] = htonl(4);
 772         *(ULONG*)&sendBuffer2[4] = htonl(0);
 773         tcp.sendPacket(sendBuffer2, 8);
 774         log->log("Client", Log::DEBUG, "written 0 because failed to realloc packet");
 775         return 1;
 776       }
 777       sendBuffer = temp;
 778     }
 779
 780     log->log("Client", Log::DEBUG, "Done s2");
 781
 782     *(ULONG*)&sendBuffer[sendBufferUsed] = htonl(thisEventID);       sendBufferUsed += sizeof(ULONG);
 783     *(ULONG*)&sendBuffer[sendBufferUsed] = htonl(thisEventTime);     sendBufferUsed += sizeof(ULONG);
 784     *(ULONG*)&sendBuffer[sendBufferUsed] = htonl(thisEventDuration); sendBufferUsed += sizeof(ULONG);
 785
 786     strcpy((char*)&sendBuffer[sendBufferUsed], thisEventTitle);       sendBufferUsed += strlen(thisEventTitle) + 1;
 787     strcpy((char*)&sendBuffer[sendBufferUsed], thisEventSubTitle);    sendBufferUsed += strlen(thisEventSubTitle) + 1;
 788     strcpy((char*)&sendBuffer[sendBufferUsed], thisEventDescription); sendBufferUsed += strlen(thisEventDescription) + 1;
 789
 790     log->log("Client", Log::DEBUG, "Done s3 %lu", sendBufferUsed);
 791   }
 792
 793   log->log("Client", Log::DEBUG, "Got all event data");
 794
 795   // Write the length into the first 4 bytes. It's sendBufferUsed - 4 because of the hole!
 796   *(ULONG*)&sendBuffer[0] = htonl(sendBufferUsed - sizeof(ULONG));
 797
 798   tcp.sendPacket(sendBuffer, sendBufferUsed);
 799   log->log("Client", Log::DEBUG, "written %lu schedules packet", sendBufferUsed);
 800
 801   free(sendBuffer);
 802
 803   return 1;
 804 }
 805
 806 int MVPClient::processConfigSave(UCHAR* buffer, int length)
 807 {
 808   char* section = (char*)buffer;
 809   char* key = NULL;
 810   char* value = NULL;
 811
 812   for (int k = 0; k < length; k++)
 813   {
 814     if (buffer[k] == '\0')
 815     {
 816       if (!key)
 817       {
 818         key = (char*)&buffer[k+1];
 819       }
 820       else
 821       {
 822         value = (char*)&buffer[k+1];
 823         break;
 824       }
 825     }
 826   }
 827
 828   // if the last string (value) doesnt have null terminator, give up
 829   if (buffer[length - 1] != '\0') return 0;
 830
 831   log->log("Client", Log::DEBUG, "Config save: %s %s %s", section, key, value);
 832   if (config.setValueString(section, key, value))
 833   {
 834     sendULONG(1);
 835   }
 836   else
 837   {
 838     sendULONG(0);
 839   }
 840
 841   return 1;
 842 }
 843
 844 int MVPClient::processConfigLoad(UCHAR* buffer, int length)
 845 {
 846   char* section = (char*)buffer;
 847   char* key = NULL;
 848
 849   for (int k = 0; k < length; k++)
 850   {
 851     if (buffer[k] == '\0')
 852     {
 853       key = (char*)&buffer[k+1];
 854       break;
 855     }
 856   }
 857
 858   char* value = config.getValueString(section, key);
 859
 860   if (value)
 861   {
 862     UCHAR sendBuffer[4 + strlen(value) + 1];
 863     *(ULONG*)&sendBuffer[0] = htonl(strlen(value) + 1);
 864     strcpy((char*)&sendBuffer[4], value);
 865     tcp.sendPacket(sendBuffer, 4 + strlen(value) + 1);
 866
 867     log->log("Client", Log::DEBUG, "Written config load packet");
 868     delete[] value;
 869   }
 870   else
 871   {
 872     UCHAR sendBuffer[8];
 873     *(ULONG*)&sendBuffer[0] = htonl(4);
 874     *(ULONG*)&sendBuffer[4] = htonl(0);
 875     tcp.sendPacket(sendBuffer, 8);
 876
 877     log->log("Client", Log::DEBUG, "Written config load failed packet");
 878   }
 879
 880   return 1;
 881 }
 882
 883 void MVPClient::cleanConfig()
 884 {
 885   log->log("Client", Log::DEBUG, "Clean config");
 886
 887   cRecordings Recordings;
 888   Recordings.Load();
 889
 890   int numReturns;
 891   int length;
 892   char* resumes = config.getSectionKeyNames("ResumeData", numReturns, length);
 893   char* position = resumes;
 894   for(int k = 0; k < numReturns; k++)
 895   {
 896     log->log("Client", Log::DEBUG, "EXAMINING: %i %i %p %s", k, numReturns, position, position);
 897
 898     cRecording* recording = Recordings.GetByName(position);
 899     if (!recording)
 900     {
 901       // doesn't exist anymore
 902       log->log("Client", Log::DEBUG, "Found a recording that doesn't exist anymore");
 903       config.deleteValue("ResumeData", position);
 904     }
 905     else
 906     {
 907       log->log("Client", Log::DEBUG, "This recording still exists");
 908     }
 909
 910     position += strlen(position) + 1;
 911   }
 912
 913   delete[] resumes;
 914 }
 915
 916
 917
 918
 919
 920
 921 /*
 922     event = Schedule->GetPresentEvent();
 923
 924     fprintf(f, "\n\nCurrent event\n\n");
 925
 926     fprintf(f, "Event %i eventid = %u time = %lu duration = %li\n", 0, event->GetEventID(), event->GetTime(), event->GetDuration());
 927     fprintf(f, "Event %i title = %s subtitle = %s\n", 0, event->GetTitle(), event->GetSubtitle());
 928     fprintf(f, "Event %i extendeddescription = %s\n", 0, event->GetExtendedDescription());
 929     fprintf(f, "Event %i isFollowing = %i, isPresent = %i\n", 0, event->IsFollowing(), event->IsPresent());
 930
 931     event = Schedule->GetFollowingEvent();
 932
 933     fprintf(f, "\n\nFollowing event\n\n");
 934
 935     fprintf(f, "Event %i eventid = %u time = %lu duration = %li\n", 0, event->GetEventID(), event->GetTime(), event->GetDuration());
 936     fprintf(f, "Event %i title = %s subtitle = %s\n", 0, event->GetTitle(), event->GetSubtitle());
 937     fprintf(f, "Event %i extendeddescription = %s\n", 0, event->GetExtendedDescription());
 938     fprintf(f, "Event %i isFollowing = %i, isPresent = %i\n", 0, event->IsFollowing(), event->IsPresent());
 939
 940     fprintf(f, "\n\n");
 941 */
 942
 943 /*
 944     fprintf(f, "Event %i eventid = %u time = %lu duration = %li\n", eventNumber, event->GetEventID(), event->GetTime(), event->GetDuration());
 945     fprintf(f, "Event %i title = %s subtitle = %s\n", eventNumber, event->GetTitle(), event->GetSubtitle());
 946     fprintf(f, "Event %i extendeddescription = %s\n", eventNumber, event->GetExtendedDescription());
 947     fprintf(f, "Event %i isFollowing = %i, isPresent = %i\n", eventNumber, event->IsFollowing(), event->IsPresent());
 948
 949     fprintf(f, "\n\n");
 950 */
 951
 952 /*
 953
 954
 955 void MVPClient::test2()
 956 {
 957   FILE* f = fopen("/tmp/s.txt", "w");
 958
 959 #if VDRVERSNUM < 10300
 960   cMutexLock MutexLock;
 961   const cSchedules *Schedules = cSIProcessor::Schedules(MutexLock);
 962 #else
 963   cSchedulesLock MutexLock;
 964   const cSchedules *Schedules = cSchedules::Schedules(MutexLock);
 965 #endif
 966
 967   if (!Schedules)
 968   {
 969     fprintf(f, "Schedules = NULL\n");
 970     fclose(f);
 971     return;
 972   }
 973
 974   fprintf(f, "Schedules dump:\n");
 975   Schedules->Dump(f);
 976
 977
 978   const cSchedule *Schedule;
 979   int scheduleNumber = 0;
 980
 981   tChannelID tchid;
 982   cChannel *thisChannel;
 983
 984 #if VDRVERSNUM < 10300
 985   const cEventInfo *event;
 986   int eventNumber = 0;
 987 #else
 988   const cEvent *event;
 989 #endif
 990
 991 //    Schedule = Schedules->GetSchedule(channel->GetChannelID());
 992 //    Schedule = Schedules->GetSchedule();
 993   Schedule = Schedules->First();
 994   if (!Schedule)
 995   {
 996     fprintf(f, "First Schedule = NULL\n");
 997     fclose(f);
 998     return;
 999   }
1000
1001   while (Schedule)
1002   {
1003     fprintf(f, "Schedule #%i\n", scheduleNumber);
1004     fprintf(f, "-------------\n\n");
1005
1006 #if VDRVERSNUM < 10300
1007     tchid = Schedule->GetChannelID();
1008 #else
1009     tchid = Schedule->ChannelID();
1010 #endif
1011
1012 #if VDRVERSNUM < 10300
1013     fprintf(f, "ChannelID.ToString() = %s\n", tchid.ToString());
1014     fprintf(f, "NumEvents() = %i\n", Schedule->NumEvents());
1015 #else
1016 //  put the count at the end.
1017 #endif
1018
1019     thisChannel = Channels.GetByChannelID(tchid, true);
1020     if (thisChannel)
1021     {
1022       fprintf(f, "Channel Number: %p %i\n", thisChannel, thisChannel->Number());
1023     }
1024     else
1025     {
1026       fprintf(f, "thisChannel = NULL for tchid\n");
1027     }
1028
1029 #if VDRVERSNUM < 10300
1030     for (eventNumber = 0; eventNumber < Schedule->NumEvents(); eventNumber++)
1031     {
1032       event = Schedule->GetEventNumber(eventNumber);
1033       fprintf(f, "Event %i tableid = %i timestring = %s endtimestring = %s\n", eventNumber, event->GetTableID(), event->GetTimeString(), event->GetEndTimeString());
1034       fprintf(f, "Event %i date = %s isfollowing = %i ispresent = %i\n", eventNumber, event->GetDate(), event->IsFollowing(), event->IsPresent());
1035       fprintf(f, "Event %i extendeddescription = %s\n", eventNumber, event->GetExtendedDescription());
1036       fprintf(f, "Event %i subtitle = %s title = %s\n", eventNumber, event->GetSubtitle(), event->GetTitle());
1037       fprintf(f, "Event %i eventid = %u duration = %li time = %lu channelnumber = %i\n", eventNumber, event->GetEventID(), event->GetDuration(), event->GetTime(), event->GetChannelNumber());
1038       fprintf(f, "Event %u dump:\n", eventNumber);
1039       event->Dump(f);
1040       fprintf(f, "\n\n");
1041     }
1042 #else
1043 //  This whole section needs rewriting to walk the list.
1044     event = Schedule->Events()->First();
1045     while (event) {
1046       event = Schedule->Events()->Next(event);
1047     }
1048 #endif
1049
1050
1051     fprintf(f, "\nDump from object:\n");
1052     Schedule->Dump(f);
1053     fprintf(f, "\nEND\n");
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063     fprintf(f, "End of current Schedule\n\n\n");
1064
1065     Schedule = (const cSchedule *)Schedules->Next(Schedule);
1066     scheduleNumber++;
1067   }
1068
1069   fclose(f);
1070 }
1071
1072
1073
1074 */
1075
1076
1077
1078 /*
1079   const cEventInfo *GetPresentEvent(void) const;
1080   const cEventInfo *GetFollowingEvent(void) const;
1081   const cEventInfo *GetEvent(unsigned short uEventID, time_t tTime = 0) const;
1082   const cEventInfo *GetEventAround(time_t tTime) const;
1083   const cEventInfo *GetEventNumber(int n) const { return Events.Get(n); }
1084
1085
1086   const unsigned char GetTableID(void) const;
1087   const char *GetTimeString(void) const;
1088   const char *GetEndTimeString(void) const;
1089   const char *GetDate(void) const;
1090   bool IsFollowing(void) const;
1091   bool IsPresent(void) const;
1092   const char *GetExtendedDescription(void) const;
1093   const char *GetSubtitle(void) const;
1094   const char *GetTitle(void) const;
1095   unsigned short GetEventID(void) const;
1096   long GetDuration(void) const;
1097   time_t GetTime(void) const;
1098   tChannelID GetChannelID(void) const;
1099   int GetChannelNumber(void) const { return nChannelNumber; }
1100   void SetChannelNumber(int ChannelNumber) const { ((cEventInfo *)this)->nChannelNumber = ChannelNumber; } // doesn't modify the EIT data, so it's ok to make it 'const'
1101   void Dump(FILE *f, const char *Prefix = "") const;
1102
1103 */
1104
1105
1106 /*
1107 void MVPClient::test(int channelNumber)
1108 {
1109   FILE* f = fopen("/tmp/test.txt", "w");
1110
1111   cMutexLock MutexLock;
1112   const cSchedules *Schedules = cSIProcessor::Schedules(MutexLock);
1113
1114   if (!Schedules)
1115   {
1116     fprintf(f, "Schedules = NULL\n");
1117     fclose(f);
1118     return;
1119   }
1120
1121   fprintf(f, "Schedules dump:\n");
1122 //  Schedules->Dump(f);
1123
1124   const cSchedule *Schedule;
1125   cChannel *thisChannel;
1126   const cEventInfo *event;
1127
1128   thisChannel = channelFromNumber(channelNumber);
1129   if (!thisChannel)
1130   {
1131     fprintf(f, "thisChannel = NULL\n");
1132     fclose(f);
1133     return;
1134   }
1135
1136   Schedule = Schedules->GetSchedule(thisChannel->GetChannelID());
1137 //    Schedule = Schedules->GetSchedule();
1138 //  Schedule = Schedules->First();
1139   if (!Schedule)
1140   {
1141     fprintf(f, "First Schedule = NULL\n");
1142     fclose(f);
1143     return;
1144   }
1145
1146   fprintf(f, "NumEvents() = %i\n\n", Schedule->NumEvents());
1147
1148   // For some channels VDR seems to pick a random point in time to
1149   // start dishing out events, but they are in order
1150   // at some point in the list the time snaps to the current event
1151
1152
1153
1154
1155   for (int eventNumber = 0; eventNumber < Schedule->NumEvents(); eventNumber++)
1156   {
1157     event = Schedule->GetEventNumber(eventNumber);
1158     fprintf(f, "Event %i eventid = %u time = %lu duration = %li\n", eventNumber, event->GetEventID(), event->GetTime(), event->GetDuration());
1159     fprintf(f, "Event %i title = %s subtitle = %s\n", eventNumber, event->GetTitle(), event->GetSubtitle());
1160     fprintf(f, "Event %i extendeddescription = %s\n", eventNumber, event->GetExtendedDescription());
1161     fprintf(f, "\n\n");
1162   }
1163
1164   fprintf(f, "\nEND\n");
1165
1166   fclose(f);
1167 }
1168
1169 */
1170
1171
1172
1173 /*
1174
1175
1176 Right, so
1177
1178 Schedules = the collection of all the Schedule objects
1179 Schedule  = One schedule, contants all the events for a channel
1180 Event     = One programme
1181
1182
1183 Want:
1184
1185 Event ID
1186 Time
1187 Duration
1188 Title
1189 Subtitle (used for "Programmes resume at ...")
1190 Description
1191
1192 IsPresent ? easy to work out tho. Oh it doesn't always work
1193
1194 */
1195
1196 /*
1197 void MVPClient::test2()
1198 {
1199   log->log("-", Log::DEBUG, "Timers List");
1200
1201   for (int i = 0; i < Timers.Count(); i++)
1202   {
1203     cTimer *timer = Timers.Get(i);
1204     //Reply(i < Timers.Count() - 1 ? -250 : 250, "%d %s", timer->Index() + 1, timer->ToText());
1205     log->log("-", Log::DEBUG, "i=%i count=%i index=%d", i, Timers.Count(), timer->Index() + 1);
1206 #if VDRVERSNUM < 10300
1207     log->log("-", Log::DEBUG, "active=%i recording=%i pending=%i start=%li stop=%li priority=%i lifetime=%i", timer->Active(), timer->Recording(), timer->Pending(), timer->StartTime(), timer->StopTime(), timer->Priority(), timer->Lifetime());
1208 #else
1209     log->log("-", Log::DEBUG, "active=%i recording=%i pending=%i start=%li stop=%li priority=%i lifetime=%i", timer->HasFlags(tfActive), timer->Recording(), timer->Pending(), timer->StartTime(), timer->StopTime(), timer->Priority(), timer->Lifetime());
1210 #endif
1211     log->log("-", Log::DEBUG, "channel=%i file=%s summary=%s", timer->Channel()->Number(), timer->File(), timer->Summary());
1212     log->log("-", Log::DEBUG, "");
1213   }
1214
1215   // asprintf(&buffer, "%d:%s:%s  :%04d:%04d:%d:%d:%s:%s\n",
1216 //            active, (UseChannelID ? Channel()->GetChannelID().ToString() : itoa(Channel()->Number())),
1217 //            PrintDay(day, firstday), start, stop, priority, lifetime, file, summary ? summary : "");
1218 }
1219 */
1220
1221 /*
1222 Active seems to be a bool - whether the timer should be done or not. If set to inactive it stays around after its time
1223 recording is a bool, 0 for not currently recording, 1 for currently recording
1224 pending is a bool, 0 for would not be trying to record this right now, 1 for would/is trying to record this right now
1225 */
1226
1227
1228 int MVPClient::processGetTimers(UCHAR* buffer, int length)
1229 {
1230   UCHAR* sendBuffer = new UCHAR[50000]; // FIXME hope this is enough
1231   int count = 4; // leave space for the packet length
1232
1233   const char* fileName;
1234   cTimer *timer;
1235   int numTimers = Timers.Count();
1236
1237   *(ULONG*)&sendBuffer[count] = htonl(numTimers);    count += 4;
1238
1239   for (int i = 0; i < numTimers; i++)
1240   {
1241     if (count > 49000) break;
1242
1243     timer = Timers.Get(i);
1244
1245 #if VDRVERSNUM < 10300
1246     *(ULONG*)&sendBuffer[count] = htonl(timer->Active());                 count += 4;
1247 #else
1248     *(ULONG*)&sendBuffer[count] = htonl(timer->HasFlags(tfActive));       count += 4;
1249 #endif
1250     *(ULONG*)&sendBuffer[count] = htonl(timer->Recording());              count += 4;
1251     *(ULONG*)&sendBuffer[count] = htonl(timer->Pending());                count += 4;
1252     *(ULONG*)&sendBuffer[count] = htonl(timer->Priority());               count += 4;
1253     *(ULONG*)&sendBuffer[count] = htonl(timer->Lifetime());               count += 4;
1254     *(ULONG*)&sendBuffer[count] = htonl(timer->Channel()->Number());      count += 4;
1255     *(ULONG*)&sendBuffer[count] = htonl(timer->StartTime());              count += 4;
1256     *(ULONG*)&sendBuffer[count] = htonl(timer->StopTime());               count += 4;
1257
1258     fileName = timer->File();
1259     strcpy((char*)&sendBuffer[count], fileName);
1260     count += strlen(fileName) + 1;
1261   }
1262
1263   *(ULONG*)&sendBuffer[0] = htonl(count - 4); // -4 :  take off the size field
1264
1265   log->log("Client", Log::DEBUG, "recorded size as %u", ntohl(*(ULONG*)&sendBuffer[0]));
1266
1267   tcp.sendPacket(sendBuffer, count);
1268   delete[] sendBuffer;
1269   log->log("Client", Log::DEBUG, "Written timers list");
1270
1271   return 1;
1272 }
1273
1274 int MVPClient::processSetTimer(UCHAR* buffer, int length)
1275 {
1276   char* timerString = new char[strlen((char*)buffer) + 1];
1277   strcpy(timerString, (char*)buffer);
1278
1279 #if VDRVERSNUM < 10300
1280
1281   // If this is VDR 1.2 the date part of the timer string must be reduced
1282   // to just DD rather than YYYY-MM-DD
1283
1284   int s = 0; // source
1285   int d = 0; // destination
1286   int c = 0; // count
1287   while(c != 2) // copy up to date section, including the second ':'
1288   {
1289     timerString[d] = buffer[s];
1290     if (buffer[s] == ':') c++;
1291     ++s;
1292     ++d;
1293   }
1294   // now it has copied up to the date section
1295   c = 0;
1296   while(c != 2) // waste YYYY-MM-
1297   {
1298     if (buffer[s] == '-') c++;
1299     ++s;
1300   }
1301   // now source is at the DD
1302   memcpy(&timerString[d], &buffer[s], length - s);
1303   d += length - s;
1304   timerString[d] = '\0';
1305
1306   log->log("Client", Log::DEBUG, "Timer string after 1.2 conversion:");
1307   log->log("Client", Log::DEBUG, "%s", timerString);
1308
1309 #endif
1310
1311   cTimer *timer = new cTimer;
1312   if (timer->Parse((char*)timerString))
1313   {
1314     cTimer *t = Timers.GetTimer(timer);
1315     if (!t)
1316     {
1317       Timers.Add(timer);
1318 #if VDRVERSNUM < 10300
1319       Timers.Save();
1320 #else
1321       Timers.SetModified();
1322 #endif
1323       sendULONG(0);
1324       return 1;
1325     }
1326     else
1327     {
1328       sendULONG(1);
1329     }
1330   }
1331   else
1332   {
1333      sendULONG(2);
1334   }
1335   delete timer;
1336   return 1;
1337 }