#!/mod/bin/jimsh

package require cgi
source /mod/webif/lib/ts.class

puts "Content-Type: application/json"
puts ""

cgi_input
#cgi_dump
#set _cgi(file) "/media/My Video/Doctor Who/6.13._The_Almost_People.ts"

if {![dict exists $_cgi file]} { exit }

set file [dict get $_cgi file]
set ts [ts fetch $file]

puts "{"
puts "\"title\" : \"[$ts get title]\","
puts "\"synopsis\" : \"[$ts get synopsis]\","
puts "\"guidance\" : \"[$ts get guidance]\","
puts "\"genre\" : [$ts get genre]"
puts "}"