handler.c

   1 #include "handler.h"
   2
   3 #include <string.h>
   4 #include <stdlib.h>
   5 #include <jsoncpp/json/json.h>
   6 #include <string>
   7
   8 #include <vdr/videodir.h>
   9 #include <vdr/recording.h>
  10 #include <vdr/menu.h>
  11 #include <vdr/timers.h>
  12
  13 #include "log.h"
  14
  15 int jsonserver_request_handler(struct mg_connection *conn)
  16 {
  17   Log* log = Log::getInstance();
  18   const struct mg_request_info *request_info = mg_get_request_info(conn);
  19
  20   if (strcmp(request_info->uri, "/jsonserver")) return 0; // not for us
  21
  22   char wvrequest[20];
  23   int wvrl = mg_get_var(request_info->query_string, strlen(request_info->query_string), "req", wvrequest, 20);
  24   if (wvrl == -1)
  25   {
  26     log->log("JSONServer", Log::ERR, "Could not decode req");
  27     return 0;
  28   }
  29
  30 /*
  31   if (!strcmp(request_info->request_method, "OPTIONS"))
  32   {
  33     mg_printf(conn, "%s", "HTTP/1.0 200 OK\r\n");
  34     mg_printf(conn, "%s", "Access-Control-Allow-Origin: *\r\n");
  35     mg_printf(conn, "%s", "Content-Type: text/plain\r\n\r\n");
  36     return (void*)1;
  37   }
  38 */
  39
  40   // Get POST data
  41   char postData[10000];
  42   postData[0] = '\0';
  43   if (!strcmp(request_info->request_method, "POST"))
  44   {
  45     const char* contentLength = mg_get_header(conn, "Content-Length");
  46     int contentLengthI = atoi(contentLength);
  47     log->log("JSONServer", Log::DEBUG, "POST data content length: %i", contentLengthI);
  48     if (contentLengthI > 10000)
  49     {
  50       log->log("JSONServer", Log::DEBUG, "Length > 10000, rejecting");
  51       return 0;
  52     }
  53
  54     if (contentLengthI > 0)
  55     {
  56       // FIXME - assume for now that all post data will be small enough to have arrived immediately
  57       int bytesRead = mg_read(conn, postData, contentLengthI);
  58       if (bytesRead != contentLengthI)
  59       {
  60         log->log("JSONServer", Log::DEBUG, "Could not read up to contentLength");
  61         return 0;
  62       }
  63       postData[contentLengthI] = '\0';
  64     }
  65   }
  66
  67   Json::Value js;
  68   bool success = false;
  69
  70   if      (!strcmp(wvrequest, "reclist")) success = jsonserver_reclist(js);
  71   else if (!strcmp(wvrequest, "recinfo")) success = jsonserver_recinfo(js, postData);
  72   else if (!strcmp(wvrequest, "recdel")) success = jsonserver_recdel(js, postData);
  73   else if (!strcmp(wvrequest, "recmove")) success = jsonserver_recmove(js, postData);
  74   else if (!strcmp(wvrequest, "recstop")) success = jsonserver_recstop(js, postData);
  75   else if (!strcmp(wvrequest, "channellist")) success = jsonserver_channellist(js);
  76   else if (!strcmp(wvrequest, "channelschedule")) success = jsonserver_channelschedule(js, postData);
  77   else if (!strcmp(wvrequest, "timerlist")) success = jsonserver_timerlist(js);
  78   else if (!strcmp(wvrequest, "timerdel")) success = jsonserver_timerdel(js, postData);
  79   else if (!strcmp(wvrequest, "timerset")) success = jsonserver_timerset(js, postData);
  80
  81   if (!success) return 0; // the specific handler failed badly
  82
  83   // Now js will be filled
  84
  85   Json::StyledWriter sw;
  86   std::string jsonout = sw.write(js);
  87   mg_printf(conn, "%s", "HTTP/1.0 200 OK\r\n");
  88   mg_printf(conn, "%s", "Content-Type: text/plain\r\n\r\n");
  89   mg_write(conn, jsonout.c_str(), jsonout.length());
  90   return 1;
  91
  92
  93 /*
  94   else if (event == MG_EVENT_LOG)
  95   {
  96     if (request_info->status_code == 400) // bad request
  97     {
  98       log->log("Mongoose", Log::DEBUG, "400 BAD REQUEST:");
  99       log->log("Mongoose", Log::DEBUG, request_info->request_method);
 100       log->log("Mongoose", Log::DEBUG, request_info->uri);
 101       log->log("Mongoose", Log::DEBUG, request_info->http_version);
 102       log->log("Mongoose", Log::DEBUG, request_info->query_string);
 103       log->log("Mongoose", Log::DEBUG, request_info->log_message);
 104       for (int i = 0; i < request_info->num_headers; i++)
 105       {
 106         log->log("Mongoose", Log::DEBUG, "%s: %s", request_info->http_headers[i].name, request_info->http_headers[i].value);
 107       }
 108     }
 109     else
 110     {
 111       log->log("Mongoose", Log::DEBUG, request_info->log_message);
 112       log->log("Mongoose", Log::DEBUG, request_info->uri);
 113     }
 114     return (void*)1;
 115   }
 116
 117   // other events not handled:
 118   // MG_HTTP_ERROR, MG_INIT_SSL
 119   // Let mongoose do something with those
 120
 121   return NULL;
 122
 123 */
 124
 125 }
 126
 127 bool jsonserver_reclist(Json::Value& js)
 128 {
 129   Log* log = Log::getInstance();
 130   log->log("JSONServer", Log::DEBUG, "reclist");
 131
 132   int FreeMB;
 133   int Percent = VideoDiskSpace(&FreeMB);
 134   int Total = (FreeMB / (100 - Percent)) * 100;
 135
 136   js["MBFree"] = FreeMB;
 137   js["Percent"] = Percent;
 138   js["Total"] = Total;
 139
 140   Json::Value jsrecordings;
 141   cRecordings Recordings;
 142   Recordings.Load();
 143   for (cRecording *recording = Recordings.First(); recording; recording = Recordings.Next(recording))
 144   {
 145     Json::Value oneRec;
 146     oneRec["StartTime"] = (Json::UInt)recording->Start();
 147     oneRec["Length"] = (Json::UInt)recording->LengthInSeconds();
 148     oneRec["IsNew"] = recording->IsNew();
 149     oneRec["Name"] = recording->Name();
 150     oneRec["Filename"] = recording->FileName();
 151     jsrecordings.append(oneRec);
 152   }
 153   js["Recordings"] = jsrecordings;
 154
 155   return true;
 156 }
 157
 158 bool jsonserver_recinfo(Json::Value& js, const char* postData)
 159 {
 160   Log* log = Log::getInstance();
 161   log->log("JSONServer", Log::DEBUG, "recinfo");
 162
 163   char reqfilename[1000];
 164   int mgv1 = mg_get_var(postData, strlen(postData), "filename", reqfilename, 1000);
 165   if (mgv1 == -1)
 166   {
 167     log->log("JSONServer", Log::ERR, "Could not decode filename");
 168     js["Result"] = false;
 169     js["Error"] = "Could not decode filename";
 170     return true;
 171   }
 172
 173   log->log("JSONServer", Log::DEBUG, "%s", reqfilename);
 174
 175   cRecordings Recordings;
 176   Recordings.Load(); // probably have to do this
 177   cRecording *recording = Recordings.GetByName(reqfilename);
 178
 179   if (!recording)
 180   {
 181     log->log("JSONServer", Log::ERR, "recinfo found no recording");
 182     js["Result"] = false;
 183     return true;
 184   }
 185
 186   js["IsNew"] = recording->IsNew();
 187   js["LengthInSeconds"] = recording->LengthInSeconds();
 188   js["FileSizeMB"] = recording->FileSizeMB();
 189   js["Name"] = recording->Name() ? recording->Name() : Json::Value::null;
 190   js["Priority"] = recording->Priority();
 191   js["LifeTime"] = recording->Lifetime();
 192   js["Start"] = (Json::UInt)recording->Start();
 193
 194   js["ResumePoint"] = 0;
 195   cResumeFile ResumeFile(recording->FileName(), recording->IsPesRecording());
 196   if (ResumeFile.Read() >= 0) js["ResumePoint"] = ResumeFile.Read();
 197
 198   js["CurrentlyRecordingStart"] = 0;
 199   js["CurrentlyRecordingStop"] = 0;
 200   cRecordControl *rc = cRecordControls::GetRecordControl(recording->FileName());
 201   if (rc)
 202   {
 203     js["CurrentlyRecordingStart"] = (Json::UInt)rc->Timer()->StartTime();
 204     js["CurrentlyRecordingStop"] = (Json::UInt)rc->Timer()->StopTime();
 205   }
 206
 207   const cRecordingInfo *info = recording->Info();
 208   if (info)
 209   {
 210     js["ChannelName"] = info->ChannelName() ? info->ChannelName() : Json::Value::null;
 211     js["Title"] = info->Title() ? info->Title() : Json::Value::null;
 212     js["ShortText"] = info->ShortText() ? info->ShortText() : Json::Value::null;
 213     js["Description"] = info->Description() ? info->Description() : Json::Value::null;
 214
 215     const cComponents* components = info->Components();
 216     if (!components)
 217     {
 218       js["Components"] = Json::Value::null;
 219     }
 220     else
 221     {
 222       Json::Value jscomponents;
 223
 224       tComponent* component;
 225       for (int i = 0; i < components->NumComponents(); i++)
 226       {
 227         component = components->Component(i);
 228
 229         Json::Value oneComponent;
 230         oneComponent["Stream"] = component->stream;
 231         oneComponent["Type"] = component->type;
 232         oneComponent["Language"] = component->language ? component->language : Json::Value::null;
 233         oneComponent["Description"] = component->description ? component->description : Json::Value::null;
 234         jscomponents.append(oneComponent);
 235       }
 236
 237       js["Components"] = jscomponents;
 238     }
 239   }
 240
 241   js["Result"] = true;
 242   return true;
 243 }
 244
 245 bool jsonserver_recstop(Json::Value& js, const char* postData)
 246 {
 247   Log* log = Log::getInstance();
 248   log->log("JSONServer", Log::DEBUG, "recstop");
 249
 250   char reqfilename[1000];
 251   int mgv1 = mg_get_var(postData, strlen(postData), "filename", reqfilename, 1000);
 252   if (mgv1 == -1)
 253   {
 254     log->log("JSONServer", Log::ERR, "Could not decode filename");
 255     js["Result"] = false;
 256     js["Error"] = "Could not decode filename";
 257     return true;
 258   }
 259
 260   log->log("JSONServer", Log::DEBUG, "%s", reqfilename);
 261
 262   cRecordings Recordings;
 263   Recordings.Load(); // probably have to do this
 264   cRecording *recording = Recordings.GetByName(reqfilename);
 265
 266   if (!recording)
 267   {
 268     log->log("JSONServer", Log::ERR, "recstop found no recording");
 269     js["Result"] = false;
 270     return true;
 271   }
 272
 273   cRecordControl *rc = cRecordControls::GetRecordControl(recording->FileName());
 274   if (!rc)
 275   {
 276     log->log("JSONServer", Log::ERR, "recstop - not currently recording");
 277     js["Result"] = false;
 278     return true;
 279   }
 280
 281   if (Timers.BeingEdited())
 282   {
 283     log->log("JSONServer", Log::ERR, "recstop - timers being edited elsewhere");
 284     js["Result"] = false;
 285     return true;
 286   }
 287
 288   cTimer* timer = rc->Timer();
 289   if (!timer)
 290   {
 291     log->log("JSONServer", Log::ERR, "recstop - timer not found");
 292     js["Result"] = false;
 293     return true;
 294   }
 295
 296   timer->ClrFlags(tfActive);
 297   Timers.SetModified();
 298
 299   js["Result"] = true;
 300   return true;
 301 }
 302
 303 bool jsonserver_recdel(Json::Value& js, const char* postData)
 304 {
 305   Log* log = Log::getInstance();
 306   log->log("JSONServer", Log::DEBUG, "recdel");
 307
 308   char reqfilename[1000];
 309   int mgv1 = mg_get_var(postData, strlen(postData), "filename", reqfilename, 1000);
 310   if (mgv1 == -1)
 311   {
 312     log->log("JSONServer", Log::ERR, "Could not decode filename");
 313     js["Result"] = false;
 314     js["Error"] = "Could not decode filename";
 315     return true;
 316   }
 317
 318   log->log("JSONServer", Log::DEBUG, "%s", reqfilename);
 319
 320   cRecordings Recordings;
 321   Recordings.Load(); // probably have to do this
 322   cRecording *recording = Recordings.GetByName(reqfilename);
 323
 324   if (!recording)
 325   {
 326     js["Result"] = false;
 327     js["Error"] = "Could not find recording to delete";
 328     return true;
 329   }
 330
 331   log->log("JSONServer", Log::DEBUG, "Deleting recording: %s", recording->Name());
 332   cRecordControl *rc = cRecordControls::GetRecordControl(recording->FileName());
 333   if (rc)
 334   {
 335     js["Result"] = false;
 336     js["Error"] = "This recording is still recording.. ho ho";
 337     return true;
 338   }
 339
 340   if (recording->Delete())
 341   {
 342     ::Recordings.DelByName(recording->FileName());
 343     js["Result"] = true;
 344   }
 345   else
 346   {
 347     js["Result"] = false;
 348     js["Error"] = "Failed to delete recording";
 349   }
 350
 351   return true;
 352 }
 353
 354 bool jsonserver_recmove(Json::Value& js, const char* postData)
 355 {
 356   Log* log = Log::getInstance();
 357   log->log("JSONServer", Log::DEBUG, "recmove");
 358
 359   char sFileName[1000]; int mgv1 = mg_get_var(postData, strlen(postData), "filename", sFileName, 1000);
 360   char sNewPath[1000];  int mgv2 = mg_get_var(postData, strlen(postData), "newpath", sNewPath, 1000);
 361
 362   if ( (mgv1 == -1) || (mgv2 == -1) || !strlen(sFileName) || !strlen(sNewPath) )
 363   {
 364     log->log("JSONServer", Log::ERR, "request mgvs: %i %i", mgv1, mgv2);
 365     js["Result"] = false;
 366     js["Error"] = "Bad request parameters";
 367     return true;
 368   }
 369
 370   cRecordings Recordings;
 371   Recordings.Load(); // probably have to do this
 372   cRecording* recording = Recordings.GetByName(sFileName);
 373
 374   if (!recording)
 375   {
 376     log->log("JSONServer", Log::ERR, "Could not find recording to move");
 377     js["Result"] = false;
 378     js["Error"] = "Bad filename";
 379     return true;
 380   }
 381
 382   cRecordControl *rc = cRecordControls::GetRecordControl(recording->FileName());
 383   if (rc)
 384   {
 385     log->log("JSONServer", Log::ERR, "Could not move recording, it is still recording");
 386     js["Result"] = false;
 387     js["Error"] = "Cannot move recording in progress";
 388     return true;
 389   }
 390
 391   log->log("JSONServer", Log::DEBUG, "moving recording: %s", recording->Name());
 392   log->log("JSONServer", Log::DEBUG, "moving recording: %s", recording->FileName());
 393   log->log("JSONServer", Log::DEBUG, "to: %s", sNewPath);
 394
 395   const char* t = recording->FileName();
 396
 397   char* dateDirName = NULL;   int k;
 398   char* titleDirName = NULL;  int j;
 399   char* folderName = NULL;    int m;
 400
 401   char* newContainer = NULL;
 402
 403   // Find the datedirname
 404   for(k = strlen(t) - 1; k >= 0; k--)
 405   {
 406     if (t[k] == '/')
 407     {
 408       log->log("JSONServer", Log::DEBUG, "l1: %i", strlen(&t[k+1]) + 1);
 409       dateDirName = new char[strlen(&t[k+1]) + 1];
 410       strcpy(dateDirName, &t[k+1]);
 411       break;
 412     }
 413   }
 414
 415   // Find the titledirname
 416
 417   for(j = k-1; j >= 0; j--)
 418   {
 419     if (t[j] == '/')
 420     {
 421       log->log("JSONServer", Log::DEBUG, "l2: %i", k - j);
 422       titleDirName = new char[k - j];
 423       memcpy(titleDirName, &t[j+1], k - j - 1);
 424       titleDirName[k - j - 1] = '\0';
 425       break;
 426     }
 427   }
 428
 429   // Find the foldername
 430
 431   log->log("JSONServer", Log::DEBUG, "j = %u, strlenvd = %u", j, strlen(VideoDirectory));
 432   if (j > strlen(VideoDirectory)) // Rec is in a subfolder now
 433   {
 434     for(m = j-1; m >= 0; m--)
 435     {
 436       if (t[m] == '/')
 437       {
 438         log->log("JSONServer", Log::DEBUG, "l3: %i", j - m);
 439         folderName = new char[j - m];
 440         memcpy(folderName, &t[m+1], j - m - 1);
 441         folderName[j - m - 1] = '\0';
 442         break;
 443       }
 444     }
 445   }
 446
 447   ExchangeChars(sNewPath, true);
 448
 449   log->log("JSONServer", Log::DEBUG, "datedirname: %s", dateDirName);
 450   log->log("JSONServer", Log::DEBUG, "titledirname: %s", titleDirName);
 451   log->log("JSONServer", Log::DEBUG, "viddir: %s", VideoDirectory);
 452   if (folderName) log->log("JSONServer", Log::DEBUG, "folderName: %s", folderName);
 453   log->log("JSONServer", Log::DEBUG, "EC: %s", sNewPath);
 454
 455   // Could be a new path - construct that first and test
 456   newContainer = new char[strlen(VideoDirectory) + strlen(sNewPath) + strlen(titleDirName) + 1];
 457   sprintf(newContainer, "%s%s", VideoDirectory, sNewPath);
 458   log->log("JSONServer", Log::DEBUG, "NPT: %s", newContainer);
 459   struct stat dstat;
 460   int statret = stat(newContainer, &dstat);
 461   if ((statret == -1) && (errno == ENOENT)) // Dir does not exist
 462   {
 463     log->log("JSONServer", Log::DEBUG, "new path does not exist (1)");
 464     int mkdirret = mkdir(newContainer, 0755);
 465     if (mkdirret != 0)
 466     {
 467       delete[] dateDirName;
 468       delete[] titleDirName;
 469       if (folderName) delete[] folderName;
 470       delete[] newContainer;
 471
 472       log->log("JSONServer", Log::ERR, "Failed to make new dir (1)");
 473       js["Result"] = false;
 474       js["Error"] = "Failed to create new directory (1)";
 475       return true;
 476     }
 477   }
 478   else if ((statret == 0) && (! (dstat.st_mode && S_IFDIR))) // Something exists but it's not a dir
 479   {
 480     delete[] dateDirName;
 481     delete[] titleDirName;
 482     if (folderName) delete[] folderName;
 483     delete[] newContainer;
 484
 485     log->log("JSONServer", Log::ERR, "Something already exists? (1)");
 486     js["Result"] = false;
 487     js["Error"] = "Something already exists at the new path (1)";
 488     return true;
 489   }
 490
 491   // New path now created or was there already
 492
 493   sprintf(newContainer, "%s%s%s", VideoDirectory, sNewPath, titleDirName);
 494   log->log("JSONServer", Log::DEBUG, "%s", newContainer);
 495
 496   statret = stat(newContainer, &dstat);
 497   if ((statret == -1) && (errno == ENOENT)) // Dir does not exist
 498   {
 499     log->log("JSONServer", Log::DEBUG, "new dir does not exist (2)");
 500     int mkdirret = mkdir(newContainer, 0755);
 501     if (mkdirret != 0)
 502     {
 503       delete[] dateDirName;
 504       delete[] titleDirName;
 505       if (folderName) delete[] folderName;
 506       delete[] newContainer;
 507
 508       log->log("JSONServer", Log::ERR, "Failed to make new dir (2)");
 509       js["Result"] = false;
 510       js["Error"] = "Failed to create new directory (2)";
 511       return true;
 512     }
 513   }
 514   else if ((statret == 0) && (! (dstat.st_mode && S_IFDIR))) // Something exists but it's not a dir
 515   {
 516     delete[] dateDirName;
 517     delete[] titleDirName;
 518     if (folderName) delete[] folderName;
 519     delete[] newContainer;
 520
 521     log->log("JSONServer", Log::ERR, "Something already exists?");
 522     js["Result"] = false;
 523     js["Error"] = "Something already exists at the new path";
 524     return true;
 525   }
 526
 527   // Ok, the directory container has been made, or it pre-existed.
 528
 529   char* newDir = new char[strlen(newContainer) + 1 + strlen(dateDirName) + 1];
 530   sprintf(newDir, "%s/%s", newContainer, dateDirName);
 531
 532   log->log("JSONServer", Log::DEBUG, "doing rename '%s' '%s'", t, newDir);
 533   int renameret = rename(t, newDir);
 534   if (renameret == 0)
 535   {
 536     // Success. Test for remove old dir containter
 537     char* oldTitleDir = new char[k+1];
 538     memcpy(oldTitleDir, t, k);
 539     oldTitleDir[k] = '\0';
 540     log->log("JSONServer", Log::DEBUG, "len: %i, cp: %i, strlen: %i, oldtitledir: %s", k+1, k, strlen(oldTitleDir), oldTitleDir);
 541     rmdir(oldTitleDir); // can't do anything about a fail result at this point.
 542     delete[] oldTitleDir;
 543
 544     // Test for remove old foldername
 545     if (folderName)
 546     {
 547       char* oldFolderName = new char[j+1];
 548       memcpy(oldFolderName, t, j);
 549       oldFolderName[j] = '\0';
 550       log->log("JSONServer", Log::DEBUG, "len: %i, cp: %i, strlen: %i, oldfoldername: %s", j+1, j, strlen(oldFolderName), oldFolderName);
 551       /*
 552       DESCRIPTION
 553       rmdir() deletes a directory, which must be empty.
 554       ENOTEMPTY - pathname  contains  entries  other than . and ..
 555       So, should be safe to call rmdir on non-empty dir
 556       */
 557       rmdir(oldFolderName); // can't do anything about a fail result at this point.
 558       delete[] oldFolderName;
 559     }
 560
 561     ::Recordings.Update();
 562     js["Result"] = true;
 563     js["NewRecordingFileName"] = newDir;
 564   }
 565   else
 566   {
 567     log->log("JSONServer", Log::ERR, "Rename failed");
 568     js["Result"] = false;
 569     js["Error"] = "Move failed";
 570   }
 571
 572   delete[] dateDirName;
 573   delete[] titleDirName;
 574   delete[] newContainer;
 575   if (folderName) delete[] folderName;
 576   delete[] newDir;
 577
 578   return true;
 579 }
 580
 581 bool jsonserver_channellist(Json::Value& js)
 582 {
 583   Log* log = Log::getInstance();
 584   log->log("JSONServer", Log::DEBUG, "channellist");
 585
 586   Json::Value jschannels;
 587
 588   int type;
 589   for (cChannel *channel = Channels.First(); channel; channel = Channels.Next(channel))
 590   {
 591     if (!channel->GroupSep())
 592     {
 593       log->log("JSONServer", Log::DEBUG, "name: '%s'", channel->Name());
 594
 595       if (channel->Vpid()) type = 1;
 596       else if (channel->Apid(0)) type = 2;
 597       else continue;
 598
 599       Json::Value oneChannel;
 600       oneChannel["Number"] = channel->Number();
 601       oneChannel["Type"] = type;
 602       oneChannel["Name"] = channel->Name();
 603 #if VDRVERSNUM < 10703
 604       oneChannel["VType"] = 2;
 605 #else
 606       oneChannel["VType"] = channel->Vtype();
 607 #endif
 608       jschannels.append(oneChannel);
 609     }
 610   }
 611   js["Channels"] = jschannels;
 612
 613   return true;
 614 }
 615
 616 bool jsonserver_channelschedule(Json::Value& js, const char* postData)
 617 {
 618   Log* log = Log::getInstance();
 619   log->log("JSONServer", Log::DEBUG, "channelschedule '%s'", postData);
 620
 621   char sChannelNumber[15];  int mgv1 = mg_get_var(postData, strlen(postData), "channelnumber", sChannelNumber, 15);
 622   char sStartTime[15];      int mgv2 = mg_get_var(postData, strlen(postData), "starttime", sStartTime, 15);
 623   char sDuration[15];       int mgv3 = mg_get_var(postData, strlen(postData), "duration", sDuration, 15);
 624
 625   if ( (mgv1 == -1) || (mgv2 == -1) || (mgv3 == -1) )
 626   {
 627     log->log("JSONServer", Log::ERR, "request mgvs: %i %i %i", mgv1, mgv2, mgv3);
 628     js["Result"] = false;
 629     js["Error"] = "Bad request parameters";
 630     return true;
 631   }
 632
 633   int channelNumber = atoi(sChannelNumber);
 634   int startTime = atoi(sStartTime);
 635   int duration = atoi(sDuration);
 636
 637   cChannel* channel = NULL;
 638   for (channel = Channels.First(); channel; channel = Channels.Next(channel))
 639   {
 640     if (channel->GroupSep()) continue;
 641     if (channel->Number() == channelNumber) break;
 642   }
 643
 644   if (!channel)
 645   {
 646     log->log("JSONServer", Log::ERR, "Could not find requested channel: %i", channelNumber);
 647     js["Result"] = false;
 648     js["Error"] = "Could not find channel";
 649     return true;
 650   }
 651
 652   cSchedulesLock MutexLock;
 653   const cSchedules *Schedules = cSchedules::Schedules(MutexLock);
 654   if (!Schedules)
 655   {
 656     log->log("JSONServer", Log::ERR, "Could not find requested channel: %i", channelNumber);
 657     js["Result"] = false;
 658     js["Error"] = "Internal schedules error (1)";
 659     return true;
 660   }
 661   const cSchedule *Schedule = Schedules->GetSchedule(channel->GetChannelID());
 662   if (!Schedule)
 663   {
 664     log->log("JSONServer", Log::ERR, "Could not find requested channel: %i", channelNumber);
 665     js["Result"] = false;
 666     js["Error"] = "Internal schedules error (2)";
 667     return true;
 668   }
 669
 670   Json::Value jsevents;
 671
 672   for (const cEvent* event = Schedule->Events()->First(); event; event = Schedule->Events()->Next(event))
 673   {
 674     //in the past filter
 675     if ((event->StartTime() + event->Duration()) < time(NULL)) continue;
 676    //start time filter
 677     if ((event->StartTime() + event->Duration()) <= startTime) continue;
 678     //duration filter
 679     if (event->StartTime() >= (startTime + duration)) continue;
 680
 681     Json::Value oneEvent;
 682     oneEvent["ID"] = event->EventID();
 683     oneEvent["Time"] = (Json::UInt)event->StartTime();
 684     oneEvent["Duration"] = event->Duration();
 685     oneEvent["Title"] = event->Title() ? event->Title() : "";
 686     oneEvent["Description"] = event->Description() ? event->Description() : "";
 687     jsevents.append(oneEvent);
 688   }
 689
 690   js["Events"] = jsevents;
 691   return true;
 692 }
 693
 694 bool jsonserver_timerlist(Json::Value& js)
 695 {
 696   Log* log = Log::getInstance();
 697   log->log("JSONServer", Log::DEBUG, "timerlist");
 698
 699   Json::Value jstimers;
 700
 701   cTimer *timer;
 702   int numTimers = Timers.Count();
 703
 704   for (int i = 0; i < numTimers; i++)
 705   {
 706     timer = Timers.Get(i);
 707     Json::Value oneTimer;
 708     oneTimer["Active"] = timer->HasFlags(tfActive);
 709     oneTimer["Recording"] = timer->Recording();
 710     oneTimer["Pending"] = timer->Pending();
 711     oneTimer["Priority"] = timer->Priority();
 712     oneTimer["Lifetime"] = timer->Lifetime();
 713     oneTimer["ChannelNumber"] = timer->Channel()->Number();
 714     oneTimer["StartTime"] = (int)timer->StartTime();
 715     oneTimer["StopTime"] = (int)timer->StopTime();
 716     oneTimer["Day"] = (int)timer->Day();
 717     oneTimer["WeekDays"] = timer->WeekDays();
 718     oneTimer["Name"] = timer->File();
 719     jstimers.append(oneTimer);
 720   }
 721
 722   js["Timers"] = jstimers;
 723   return true;
 724 }
 725
 726 bool jsonserver_timerdel(Json::Value& js, const char* postData)
 727 {
 728   Log* log = Log::getInstance();
 729   log->log("JSONServer", Log::DEBUG, "timerdel");
 730
 731   char sdelChannel[15];   int mgv1 = mg_get_var(postData, strlen(postData), "delchannel", sdelChannel, 15);
 732   char sdelWeekdays[15];  int mgv2 = mg_get_var(postData, strlen(postData), "delweekdays", sdelWeekdays, 15);
 733   char sdelDay[15];       int mgv3 = mg_get_var(postData, strlen(postData), "delday", sdelDay, 15);
 734   char sdelStart[15];     int mgv4 = mg_get_var(postData, strlen(postData), "delstart", sdelStart, 15);
 735   char sdelStop[15];      int mgv5 = mg_get_var(postData, strlen(postData), "delstop", sdelStop, 15);
 736
 737   if ( (mgv1 == -1) || (mgv2 == -1) || (mgv3 == -1) || (mgv4 == -1) || (mgv5 == -1) )
 738   {
 739     log->log("JSONServer", Log::ERR, "request mgvs: %i %i %i %i %i", mgv1, mgv2, mgv3, mgv4, mgv5);
 740     js["Result"] = false;
 741     js["Error"] = "Bad request parameters";
 742     return true;
 743   }
 744
 745   int delChannel = atoi(sdelChannel);
 746   int delWeekdays = atoi(sdelWeekdays);
 747   int delDay = atoi(sdelDay);
 748   int delStart = atoi(sdelStart);
 749   int delStop = atoi(sdelStop);
 750
 751   cTimer* ti = NULL;
 752   for (ti = Timers.First(); ti; ti = Timers.Next(ti))
 753   {
 754     if  ( (ti->Channel()->Number() == delChannel)
 755      &&   ((ti->WeekDays() && (ti->WeekDays() == delWeekdays)) || (!ti->WeekDays() && (ti->Day() == delDay)))
 756      &&   (ti->StartTime() == delStart)
 757      &&   (ti->StopTime() == delStop) )
 758        break;
 759   }
 760
 761   if (!ti)
 762   {
 763     log->log("JSONServer", Log::ERR, "Could not find timer");
 764     js["Result"] = false;
 765     js["Error"] = "Could not find timer";
 766     return true;
 767   }
 768
 769   if (Timers.BeingEdited())
 770   {
 771     log->log("JSONServer", Log::ERR, "Unable to delete timer - timers being edited at VDR");
 772     js["Result"] = false;
 773     js["Error"] = "Timers being edited at VDR";
 774     return true;
 775   }
 776
 777   if (ti->Recording())
 778   {
 779     log->log("JSONServer", Log::ERR, "Unable to delete timer - timer is running");
 780     js["Result"] = false;
 781     js["Error"] = "Timer is running";
 782     return true;
 783   }
 784
 785   Timers.Del(ti);
 786   Timers.SetModified();
 787   js["Result"] = true;
 788
 789   return true;
 790 }
 791
 792 bool jsonserver_timerset(Json::Value& js, const char* postData)
 793 {
 794   Log* log = Log::getInstance();
 795   log->log("JSONServer", Log::DEBUG, "timerset");
 796
 797   char sTimerString[1024];   int mgv1 = mg_get_var(postData, strlen(postData), "timerstring", sTimerString, 1024);
 798
 799   if (mgv1 == -1)
 800   {
 801     log->log("JSONServer", Log::ERR, "Could not get timerstring");
 802     js["Result"] = false;
 803     js["Error"] = "Bad request parameters";
 804     return true;
 805   }
 806
 807   log->log("JSONServer", Log::DEBUG, "'%s'", sTimerString);
 808   cTimer *timer = new cTimer;
 809   if (!timer->Parse(sTimerString))
 810   {
 811     delete timer;
 812     js["Result"] = false;
 813     js["Error"] = "Failed to parse timer request details";
 814     return true;
 815   }
 816
 817   cTimer *t = Timers.GetTimer(timer);
 818   if (t)
 819   {
 820     delete timer;
 821     js["Result"] = false;
 822     js["Error"] = "Timer already exists";
 823     return true;
 824   }
 825
 826   Timers.Add(timer);
 827   Timers.SetModified();
 828   js["Result"] = true;
 829   return true;
 830 }
 831