5 #include <jsoncpp/json/json.h>
8 #include <vdr/videodir.h>
9 #include <vdr/recording.h>
11 #include <vdr/timers.h>
15 int jsonserver_request_handler(struct mg_connection *conn)
17 Log* log = Log::getInstance();
18 const struct mg_request_info *request_info = mg_get_request_info(conn);
20 if (strcmp(request_info->uri, "/jsonserver")) return 0; // not for us
23 int wvrl = mg_get_var(request_info->query_string, strlen(request_info->query_string), "req", wvrequest, 20);
26 log->log("JSONServer", Log::ERR, "Could not decode req");
31 if (!strcmp(request_info->request_method, "OPTIONS"))
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");
43 if (!strcmp(request_info->request_method, "POST"))
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)
50 log->log("JSONServer", Log::DEBUG, "Length > 10000, rejecting");
54 if (contentLengthI > 0)
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)
60 log->log("JSONServer", Log::DEBUG, "Could not read up to contentLength");
63 postData[contentLengthI] = '\0';
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);
81 if (!success) return 0; // the specific handler failed badly
83 // Now js will be filled
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());
94 else if (event == MG_EVENT_LOG)
96 if (request_info->status_code == 400) // bad request
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++)
106 log->log("Mongoose", Log::DEBUG, "%s: %s", request_info->http_headers[i].name, request_info->http_headers[i].value);
111 log->log("Mongoose", Log::DEBUG, request_info->log_message);
112 log->log("Mongoose", Log::DEBUG, request_info->uri);
117 // other events not handled:
118 // MG_HTTP_ERROR, MG_INIT_SSL
119 // Let mongoose do something with those
127 bool jsonserver_reclist(Json::Value& js)
129 Log* log = Log::getInstance();
130 log->log("JSONServer", Log::DEBUG, "reclist");
133 int Percent = VideoDiskSpace(&FreeMB);
134 int Total = (FreeMB / (100 - Percent)) * 100;
136 js["MBFree"] = FreeMB;
137 js["Percent"] = Percent;
140 Json::Value jsrecordings;
141 cRecordings Recordings;
143 for (cRecording *recording = Recordings.First(); recording; recording = Recordings.Next(recording))
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);
153 js["Recordings"] = jsrecordings;
158 bool jsonserver_recinfo(Json::Value& js, const char* postData)
160 Log* log = Log::getInstance();
161 log->log("JSONServer", Log::DEBUG, "recinfo");
163 char reqfilename[1000];
164 int mgv1 = mg_get_var(postData, strlen(postData), "filename", reqfilename, 1000);
167 log->log("JSONServer", Log::ERR, "Could not decode filename");
168 js["Result"] = false;
169 js["Error"] = "Could not decode filename";
173 log->log("JSONServer", Log::DEBUG, "%s", reqfilename);
175 cRecordings Recordings;
176 Recordings.Load(); // probably have to do this
177 cRecording *recording = Recordings.GetByName(reqfilename);
181 log->log("JSONServer", Log::ERR, "recinfo found no recording");
182 js["Result"] = false;
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();
194 js["ResumePoint"] = 0;
195 cResumeFile ResumeFile(recording->FileName(), recording->IsPesRecording());
196 if (ResumeFile.Read() >= 0) js["ResumePoint"] = ResumeFile.Read();
198 js["CurrentlyRecordingStart"] = 0;
199 js["CurrentlyRecordingStop"] = 0;
200 cRecordControl *rc = cRecordControls::GetRecordControl(recording->FileName());
203 js["CurrentlyRecordingStart"] = (Json::UInt)rc->Timer()->StartTime();
204 js["CurrentlyRecordingStop"] = (Json::UInt)rc->Timer()->StopTime();
207 const cRecordingInfo *info = recording->Info();
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;
215 const cComponents* components = info->Components();
218 js["Components"] = Json::Value::null;
222 Json::Value jscomponents;
224 tComponent* component;
225 for (int i = 0; i < components->NumComponents(); i++)
227 component = components->Component(i);
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);
237 js["Components"] = jscomponents;
245 bool jsonserver_recstop(Json::Value& js, const char* postData)
247 Log* log = Log::getInstance();
248 log->log("JSONServer", Log::DEBUG, "recstop");
250 char reqfilename[1000];
251 int mgv1 = mg_get_var(postData, strlen(postData), "filename", reqfilename, 1000);
254 log->log("JSONServer", Log::ERR, "Could not decode filename");
255 js["Result"] = false;
256 js["Error"] = "Could not decode filename";
260 log->log("JSONServer", Log::DEBUG, "%s", reqfilename);
262 cRecordings Recordings;
263 Recordings.Load(); // probably have to do this
264 cRecording *recording = Recordings.GetByName(reqfilename);
268 log->log("JSONServer", Log::ERR, "recstop found no recording");
269 js["Result"] = false;
273 cRecordControl *rc = cRecordControls::GetRecordControl(recording->FileName());
276 log->log("JSONServer", Log::ERR, "recstop - not currently recording");
277 js["Result"] = false;
281 if (Timers.BeingEdited())
283 log->log("JSONServer", Log::ERR, "recstop - timers being edited elsewhere");
284 js["Result"] = false;
288 cTimer* timer = rc->Timer();
291 log->log("JSONServer", Log::ERR, "recstop - timer not found");
292 js["Result"] = false;
296 timer->ClrFlags(tfActive);
297 Timers.SetModified();
303 bool jsonserver_recdel(Json::Value& js, const char* postData)
305 Log* log = Log::getInstance();
306 log->log("JSONServer", Log::DEBUG, "recdel");
308 char reqfilename[1000];
309 int mgv1 = mg_get_var(postData, strlen(postData), "filename", reqfilename, 1000);
312 log->log("JSONServer", Log::ERR, "Could not decode filename");
313 js["Result"] = false;
314 js["Error"] = "Could not decode filename";
318 log->log("JSONServer", Log::DEBUG, "%s", reqfilename);
320 cRecordings Recordings;
321 Recordings.Load(); // probably have to do this
322 cRecording *recording = Recordings.GetByName(reqfilename);
326 js["Result"] = false;
327 js["Error"] = "Could not find recording to delete";
331 log->log("JSONServer", Log::DEBUG, "Deleting recording: %s", recording->Name());
332 cRecordControl *rc = cRecordControls::GetRecordControl(recording->FileName());
335 js["Result"] = false;
336 js["Error"] = "This recording is still recording.. ho ho";
340 if (recording->Delete())
342 ::Recordings.DelByName(recording->FileName());
347 js["Result"] = false;
348 js["Error"] = "Failed to delete recording";
354 bool jsonserver_recmove(Json::Value& js, const char* postData)
356 Log* log = Log::getInstance();
357 log->log("JSONServer", Log::DEBUG, "recmove");
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);
362 if ( (mgv1 == -1) || (mgv2 == -1) || !strlen(sFileName) || !strlen(sNewPath) )
364 log->log("JSONServer", Log::ERR, "request mgvs: %i %i", mgv1, mgv2);
365 js["Result"] = false;
366 js["Error"] = "Bad request parameters";
370 cRecordings Recordings;
371 Recordings.Load(); // probably have to do this
372 cRecording* recording = Recordings.GetByName(sFileName);
376 log->log("JSONServer", Log::ERR, "Could not find recording to move");
377 js["Result"] = false;
378 js["Error"] = "Bad filename";
382 cRecordControl *rc = cRecordControls::GetRecordControl(recording->FileName());
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";
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);
395 const char* t = recording->FileName();
397 char* dateDirName = NULL; int k;
398 char* titleDirName = NULL; int j;
399 char* newContainer = NULL;
401 // Find the datedirname
402 for(k = strlen(t) - 1; k >= 0; k--)
406 log->log("JSONServer", Log::DEBUG, "l1: %i", strlen(&t[k+1]) + 1);
407 dateDirName = new char[strlen(&t[k+1]) + 1];
408 strcpy(dateDirName, &t[k+1]);
413 // Find the titledirname
415 for(j = k-1; j >= 0; j--)
419 log->log("JSONServer", Log::DEBUG, "l2: %i", (k - j - 1) + 1);
420 titleDirName = new char[(k - j - 1) + 1];
421 memcpy(titleDirName, &t[j+1], k - j - 1);
422 titleDirName[k - j - 1] = '\0';
427 log->log("JSONServer", Log::DEBUG, "datedirname: %s", dateDirName);
428 log->log("JSONServer", Log::DEBUG, "titledirname: %s", titleDirName);
429 log->log("JSONServer", Log::DEBUG, "viddir: %s", VideoDirectory);
431 ExchangeChars(sNewPath, true);
432 log->log("JSONServer", Log::DEBUG, "EC: %s", sNewPath);
434 newContainer = new char[strlen(VideoDirectory) + strlen(sNewPath) + strlen(titleDirName) + 1];
435 log->log("JSONServer", Log::DEBUG, "l10: %i", strlen(VideoDirectory) + strlen(sNewPath) + strlen(titleDirName) + 1);
436 sprintf(newContainer, "%s%s%s", VideoDirectory, sNewPath, titleDirName);
437 log->log("JSONServer", Log::DEBUG, "%s", newContainer);
440 int statret = stat(newContainer, &dstat);
441 if ((statret == -1) && (errno == ENOENT)) // Dir does not exist
443 log->log("JSONServer", Log::DEBUG, "new dir does not exist");
444 int mkdirret = mkdir(newContainer, 0755);
447 delete[] dateDirName;
448 delete[] titleDirName;
449 delete[] newContainer;
451 log->log("JSONServer", Log::ERR, "Failed to make new dir");
452 js["Result"] = false;
453 js["Error"] = "Failed to create new directory";
457 else if ((statret == 0) && (! (dstat.st_mode && S_IFDIR))) // Something exists but it's not a dir
459 delete[] dateDirName;
460 delete[] titleDirName;
461 delete[] newContainer;
463 log->log("JSONServer", Log::ERR, "Something already exists?");
464 js["Result"] = false;
465 js["Error"] = "Something already exists at the new path";
469 // Ok, the directory container has been made, or it pre-existed.
471 char* newDir = new char[strlen(newContainer) + 1 + strlen(dateDirName) + 1];
472 sprintf(newDir, "%s/%s", newContainer, dateDirName);
474 log->log("JSONServer", Log::DEBUG, "doing rename '%s' '%s'", t, newDir);
475 int renameret = rename(t, newDir);
478 // Success. Test for remove old dir containter
479 char* oldTitleDir = new char[k+1];
480 memcpy(oldTitleDir, t, k);
481 oldTitleDir[k] = '\0';
482 log->log("JSONServer", Log::DEBUG, "len: %i, cp: %i, strlen: %i, oldtitledir: %s", k+1, k, strlen(oldTitleDir), oldTitleDir);
483 rmdir(oldTitleDir); // can't do anything about a fail result at this point.
484 delete[] oldTitleDir;
486 ::Recordings.Update();
488 js["NewRecordingFileName"] = newDir;
492 log->log("JSONServer", Log::ERR, "Rename failed");
493 js["Result"] = false;
494 js["Error"] = "Move failed";
497 delete[] dateDirName;
498 delete[] titleDirName;
499 delete[] newContainer;
505 bool jsonserver_channellist(Json::Value& js)
507 Log* log = Log::getInstance();
508 log->log("JSONServer", Log::DEBUG, "channellist");
510 Json::Value jschannels;
513 for (cChannel *channel = Channels.First(); channel; channel = Channels.Next(channel))
515 if (!channel->GroupSep())
517 log->log("JSONServer", Log::DEBUG, "name: '%s'", channel->Name());
519 if (channel->Vpid()) type = 1;
520 else if (channel->Apid(0)) type = 2;
523 Json::Value oneChannel;
524 oneChannel["Number"] = channel->Number();
525 oneChannel["Type"] = type;
526 oneChannel["Name"] = channel->Name();
527 #if VDRVERSNUM < 10703
528 oneChannel["VType"] = 2;
530 oneChannel["VType"] = channel->Vtype();
532 jschannels.append(oneChannel);
535 js["Channels"] = jschannels;
540 bool jsonserver_channelschedule(Json::Value& js, const char* postData)
542 Log* log = Log::getInstance();
543 log->log("JSONServer", Log::DEBUG, "channelschedule '%s'", postData);
545 char sChannelNumber[15]; int mgv1 = mg_get_var(postData, strlen(postData), "channelnumber", sChannelNumber, 15);
546 char sStartTime[15]; int mgv2 = mg_get_var(postData, strlen(postData), "starttime", sStartTime, 15);
547 char sDuration[15]; int mgv3 = mg_get_var(postData, strlen(postData), "duration", sDuration, 15);
549 if ( (mgv1 == -1) || (mgv2 == -1) || (mgv3 == -1) )
551 log->log("JSONServer", Log::ERR, "request mgvs: %i %i %i", mgv1, mgv2, mgv3);
552 js["Result"] = false;
553 js["Error"] = "Bad request parameters";
557 int channelNumber = atoi(sChannelNumber);
558 int startTime = atoi(sStartTime);
559 int duration = atoi(sDuration);
561 cChannel* channel = NULL;
562 for (channel = Channels.First(); channel; channel = Channels.Next(channel))
564 if (channel->GroupSep()) continue;
565 if (channel->Number() == channelNumber) break;
570 log->log("JSONServer", Log::ERR, "Could not find requested channel: %i", channelNumber);
571 js["Result"] = false;
572 js["Error"] = "Could not find channel";
576 cSchedulesLock MutexLock;
577 const cSchedules *Schedules = cSchedules::Schedules(MutexLock);
580 log->log("JSONServer", Log::ERR, "Could not find requested channel: %i", channelNumber);
581 js["Result"] = false;
582 js["Error"] = "Internal schedules error (1)";
585 const cSchedule *Schedule = Schedules->GetSchedule(channel->GetChannelID());
588 log->log("JSONServer", Log::ERR, "Could not find requested channel: %i", channelNumber);
589 js["Result"] = false;
590 js["Error"] = "Internal schedules error (2)";
594 Json::Value jsevents;
596 for (const cEvent* event = Schedule->Events()->First(); event; event = Schedule->Events()->Next(event))
599 if ((event->StartTime() + event->Duration()) < time(NULL)) continue;
601 if ((event->StartTime() + event->Duration()) <= startTime) continue;
603 if (event->StartTime() >= (startTime + duration)) continue;
605 Json::Value oneEvent;
606 oneEvent["ID"] = event->EventID();
607 oneEvent["Time"] = (Json::UInt)event->StartTime();
608 oneEvent["Duration"] = event->Duration();
609 oneEvent["Title"] = event->Title() ? event->Title() : "";
610 oneEvent["Description"] = event->Description() ? event->Description() : "";
611 jsevents.append(oneEvent);
614 js["Events"] = jsevents;
618 bool jsonserver_timerlist(Json::Value& js)
620 Log* log = Log::getInstance();
621 log->log("JSONServer", Log::DEBUG, "timerlist");
623 Json::Value jstimers;
626 int numTimers = Timers.Count();
628 for (int i = 0; i < numTimers; i++)
630 timer = Timers.Get(i);
631 Json::Value oneTimer;
632 oneTimer["Active"] = timer->HasFlags(tfActive);
633 oneTimer["Recording"] = timer->Recording();
634 oneTimer["Pending"] = timer->Pending();
635 oneTimer["Priority"] = timer->Priority();
636 oneTimer["Lifetime"] = timer->Lifetime();
637 oneTimer["ChannelNumber"] = timer->Channel()->Number();
638 oneTimer["StartTime"] = (int)timer->StartTime();
639 oneTimer["StopTime"] = (int)timer->StopTime();
640 oneTimer["Day"] = (int)timer->Day();
641 oneTimer["WeekDays"] = timer->WeekDays();
642 oneTimer["Name"] = timer->File();
643 jstimers.append(oneTimer);
646 js["Timers"] = jstimers;
650 bool jsonserver_timerdel(Json::Value& js, const char* postData)
652 Log* log = Log::getInstance();
653 log->log("JSONServer", Log::DEBUG, "timerdel");
655 char sdelChannel[15]; int mgv1 = mg_get_var(postData, strlen(postData), "delchannel", sdelChannel, 15);
656 char sdelWeekdays[15]; int mgv2 = mg_get_var(postData, strlen(postData), "delweekdays", sdelWeekdays, 15);
657 char sdelDay[15]; int mgv3 = mg_get_var(postData, strlen(postData), "delday", sdelDay, 15);
658 char sdelStart[15]; int mgv4 = mg_get_var(postData, strlen(postData), "delstart", sdelStart, 15);
659 char sdelStop[15]; int mgv5 = mg_get_var(postData, strlen(postData), "delstop", sdelStop, 15);
661 if ( (mgv1 == -1) || (mgv2 == -1) || (mgv3 == -1) || (mgv4 == -1) || (mgv5 == -1) )
663 log->log("JSONServer", Log::ERR, "request mgvs: %i %i %i %i %i", mgv1, mgv2, mgv3, mgv4, mgv5);
664 js["Result"] = false;
665 js["Error"] = "Bad request parameters";
669 int delChannel = atoi(sdelChannel);
670 int delWeekdays = atoi(sdelWeekdays);
671 int delDay = atoi(sdelDay);
672 int delStart = atoi(sdelStart);
673 int delStop = atoi(sdelStop);
676 for (ti = Timers.First(); ti; ti = Timers.Next(ti))
678 if ( (ti->Channel()->Number() == delChannel)
679 && ((ti->WeekDays() && (ti->WeekDays() == delWeekdays)) || (!ti->WeekDays() && (ti->Day() == delDay)))
680 && (ti->StartTime() == delStart)
681 && (ti->StopTime() == delStop) )
687 log->log("JSONServer", Log::ERR, "Could not find timer");
688 js["Result"] = false;
689 js["Error"] = "Could not find timer";
693 if (Timers.BeingEdited())
695 log->log("JSONServer", Log::ERR, "Unable to delete timer - timers being edited at VDR");
696 js["Result"] = false;
697 js["Error"] = "Timers being edited at VDR";
703 log->log("JSONServer", Log::ERR, "Unable to delete timer - timer is running");
704 js["Result"] = false;
705 js["Error"] = "Timer is running";
710 Timers.SetModified();
716 bool jsonserver_timerset(Json::Value& js, const char* postData)
718 Log* log = Log::getInstance();
719 log->log("JSONServer", Log::DEBUG, "timerset");
721 char sTimerString[1024]; int mgv1 = mg_get_var(postData, strlen(postData), "timerstring", sTimerString, 1024);
725 log->log("JSONServer", Log::ERR, "Could not get timerstring");
726 js["Result"] = false;
727 js["Error"] = "Bad request parameters";
731 log->log("JSONServer", Log::DEBUG, "'%s'", sTimerString);
732 cTimer *timer = new cTimer;
733 if (!timer->Parse(sTimerString))
736 js["Result"] = false;
737 js["Error"] = "Failed to parse timer request details";
741 cTimer *t = Timers.GetTimer(timer);
745 js["Result"] = false;
746 js["Error"] = "Timer already exists";
751 Timers.SetModified();