SwedishTV 0.0.2

data/README

@@ -0,0 +1,12 @@
+= SwedishTV
+
+This gem presents a comprehensive web view of the programs running on the
+Swedish TV channels. Run it as:
+
+	tv [port]
+	
+This starts a web server on the specified port (default is 9901). Connect
+to the web server to see the program tables.
+
+Using the web interface you can select which channels you want to show
+and highlight the programs you are interested in.

data/bin/tv

@@ -0,0 +1,12 @@
+#!/usr/bin/env ruby
+
+argv = ARGV
+
+# Use this to test run program (when not run as gem)
+if argv[0] == '--test'
+	argv[0,1] = []
+	$: << File.expand_path(File.join(__FILE__, "../../lib"))
+end
+
+require 'swe_tv'
+start_tv_server(argv)

data/lib/swe_tv.rb

@@ -0,0 +1,844 @@
+require 'webrick'
+include WEBrick
+
+#puts "Content-type: text/plain"
+#puts
+
+# ----------------------------------------------------------------------
+# SERVER PART
+# ----------------------------------------------------------------------
+
+def start_webrick(config = {})
+	server = HTTPServer.new(config)
+	yield server if block_given?
+	%w(INT TERM).each {|signal| trap(signal) {server.shutdown}}
+	server.start
+end
+
+def start_tv_server(argv)
+		port = (argv[0] or 9901).to_i
+		
+		config = {}
+		config[:Port] = port
+		
+		start_webrick(config) {|server|			
+			server.mount_proc("/tv") {|req, res|
+				res['content-type'] = 'text/html'
+				res['pragma'] = 'no-cache'
+				
+				tv_app(req, res)
+			}
+			
+			server.mount_proc("/") { |req, res|
+				res['content-type'] = 'text/html'
+				res.body = <<INDEX_END
+					<frameset rows=*,20%>
+						<frame src="tv" name=table>
+						<frame src="tv?program=2" name=info>
+					</frameset>
+INDEX_END
+			}
+		}
+end
+
+# ----------------------------------------------------------------------
+# APP PART
+# ----------------------------------------------------------------------
+
+require 'net/http'
+require 'FileUtils'
+require 'tmpdir'
+require 'cgi'
+
+$debug = false
+
+USERFILE = File.expand_path(File.join(ENV['HOME'], "/.swe_tv"))
+
+CACHEDIR = File.join(Dir.tmpdir, "swe_tv_cache")
+FileUtils::mkdir(CACHEDIR) unless File.exist?(CACHEDIR)
+
+CHANNELS = {
+	'SVT1'		=>21, 
+	'SVT2'		=>22,
+	'TV3'		=>26, 
+	'TV4'		=>27,
+	'Kanal 5'	=>10,
+	'ZTV'		=>42,
+	'Via Act'   => 28,
+	'TV8' 		=> 43, 
+	'TV 1000' 	=> 33,
+	'Cinema' 	=> 34,
+	'Canal+'	=> 11,
+	'C+ Gul'	=>12,
+	'C+ Bla'	=>55,
+	'C+ Zap'	=>140,
+	'MTV'		=>14,
+	'MTV2'		=>74,
+	'Eurospo'	=>9,
+	'Via Spo'	=>53,
+	'Extreme'   =>67,
+	'CNN' 		=> 5,
+	'Eursp N'   =>141,
+	'Sky New'	=>18,
+	'CNBC'		=>56,
+	'NBC Eur'	=>93,
+	'24'		=>101,
+	'SVT Eur'	=>100,
+	'TV4 Plu'	=>142,
+	'Barnkan'	=>143,
+	'ORT Int' 	=> 139,
+	'Discove'   => 7,
+	'Dis Civ' 	=> 118,
+	'Dis Sci'	=> 119, 
+	'Dis T&A' 	=> 120,
+	'Dis Mix' 	=> 89,
+	'Anim Pl'	 => 54,
+	'Via Exp'	=>76,
+	'Travel'	=>25,
+	'Avante'	=>68,
+	'Nat Geo'	=>48,
+	'Cart Ne'	=>4,
+	'Fox Kid'	=>60,
+	'Nickelo'	=>45,
+	'Disney'	=>147,
+	'TCM'		=>24,
+	'The Stu'	=>70,
+	'Hallmar'	=>13,
+	'VH-1'		=>47,
+	'E!'		=>114,
+	'Style'		=>49,
+	'Fashion'	=>82,
+	'Club'		=>115,
+	'Reality'	=>117,
+	'God Cha'	=>111,
+	'Pink Pl'	=>109,
+	'Playboy'	=>110,
+	'Euronew'	=>104,
+	'HRT1'		=>50,
+	'TV Fin'	=>29,
+	'YLE TV1'	=>31,
+	'YLE TV2'	=>36,
+	'TV3 Fin'	=>39,
+	'TV Nor'	=>73,
+	'NRK1'		=>72,
+	'NRK2'		=>63,
+	'TV2 Nor'	=>37,
+	'TV3 Nor'	=>62,
+	'ZTV Nor'	=>75,
+	'TV Dan1'	=>103,
+	'TV Dan2'	=>105,
+	'DR1'		=>58,
+	'DR2'		=>59,
+	'TV2 Dan'	=>71,
+	'TV3 Dan'	=>57,
+	'TV2 Zul'	=>126,
+	'3+ Dan'	=>83,
+	'BBC Pri'	=>2,
+	'BBC Wor' 	=> 3,
+	'MBC' 		=> 88,
+	'MDR' 		=> 91,
+	'NDR' 		=> 92,
+	'Viva'		=>106,
+	'Vox'		=>107,
+	'WDR' 		=> 108,
+	'Kabel 1'	=>113,
+	'Arte'		=>84,
+	'ORB' 		=> 94,
+	'PRO 7' 	=> 98,
+	'Sudwest'	=>99,
+	'Bayeris'	=>81,
+	'3SAT'		=>1,
+	'ZDF'		=>51,
+	'ARD'		=>69,
+	'Deut We'	=>6,
+	'SAT1'		=>17,
+	'DSF'		=>8,
+	'RTL 2'		=>15,
+	'RTL'		=>16,
+	'Viva Pl'	=>85,
+	'TV Polo'	=>66,
+	'TV Chil'	=>52,
+	'TV5'		=>40,
+	'Mezzo'		=>46,
+	'Fran 5'	=>86,
+	'Rai Uno'	=>64,
+	'Rai Due'	=>65,
+	'TVE'		=>41,
+	'DTU7'		=>80,
+	'The Adu'	=>87
+}
+
+def try_replace
+	begin
+		yield
+	rescue IndexError
+	end
+end
+
+# Fetch pages
+class Fetch
+	def initialize(proxy = nil, proxyport = nil)
+		@proxy, @proxyport = proxy, proxyport
+	end
+
+	# Parse a network address into (host, port, path)
+	def parse_address(address, default_port = 80, default_path = '/')
+		address[/^http:\/\//] = ''
+		(host, path) = address.split('/', 2)
+		if path then path = '/' + path end
+		(host, port) = host.split(':', 2) 
+		path = path || default_path
+		port = port || default_port
+		return [host, port, path]
+	end
+
+	# Download page at address
+	def get(address)
+		(host, port, path) = parse_address(address)
+		puts "getting #{host} #{port} #{path}" if $debug
+		Net::HTTP.version_1_1
+		begin
+			Net::HTTP.start(host, port.to_i, @proxy, @proxyport.to_i) do |http|
+				resp, body = http.get(path) 
+				return body
+			end
+		rescue Exception
+			raise "Page unavailable:  <a href='http://#{address}'>http://#{address}</a> (#{$!})"
+		end
+	end
+end
+
+# Keep track of time of programs
+class ProgramTime
+    include Comparable
+
+    attr_reader :h, :m, :real
+
+    # 0-5 are considered night 5-0 morning
+    WRAPHOUR = 5
+
+    def ProgramTime.parse(s)
+        return ProgramTime.new(*(s.split(':').collect{|x| x.to_i}))
+    end
+
+    def initialize(h=0,m=0)
+        @h, @m = h, m
+        @real = to_s
+        @m = (@m/10)*10
+        if @h < WRAPHOUR
+            @h += 24
+        end
+    end
+
+    def -(time)
+        (@h - time.h - 1)*60 + (60 + @m - time.m)
+    end
+
+    def +(minutes)
+        h = @h
+        m = @m + minutes
+        h += m/60
+        m = m%60
+        return ProgramTime.new(h,m)
+    end
+
+    def to_s
+        sprintf("%02i:%02i", @h%24, m)
+    end
+
+    def <=>(time)
+        return -1 if @h < time.h
+        return 1 if @h > time.h
+        return -1 if @m < time.m
+        return 1 if @m > time.m
+        0
+    end
+
+	def ProgramTime.now
+		t = Time.now
+		new(t.hour, t.min)
+	end
+end
+
+# Represents user preferences for display
+class Preferences
+	STYLES = %w(regular yellow grey red green blue purple cyan)
+	attr_accessor :channels
+
+	def initialize
+		@style = {}
+		@channels = ['SVT1', 'SVT2', 'TV3', 'TV4', 'Kanal 5', 'ZTV']
+	end
+
+	def style(program)
+		@style[program.bare_name] || "regular"
+	end
+
+	def set_style(program, style)
+		if style == "regular"
+			@style.delete(program.bare_name)
+		else
+			@style[program.bare_name] = style
+		end
+	end
+end
+
+# Represents a program
+class Program
+    attr_reader :start, :name, :desc, :showview, :id, :channel
+    attr_accessor :stop
+
+    FEATURELEN = 90
+    FEATURESTART = ProgramTime.new(20)
+
+	def Program.new_id
+		@id = 0 unless @id
+		@id = @id + 1
+		@id
+	end
+
+    def initialize(channel, start, name, desc, showview, stop=nil)
+		@channel = channel
+        @start = start
+        @name = name; @desc = desc; @showview = showview
+        @stop = stop
+		@id = CHANNELS[channel].to_s + '_' + Program.new_id.to_s
+    end
+
+    def duration; @stop - @start; end
+
+    def feature
+		@desc && @desc[/Regi:/]
+    end
+
+	def bare_name
+		bn = name.dup
+		try_replace {bn[/\(R\)/] = ''}
+		try_replace {bn[/,\s*forts/] = ''}
+		bn = $1 if bn[/(.*:)/] 
+		bn.strip
+	end
+
+	def original_name
+        @desc =~ /.*\((.*)\)/ ? $1 : bare_name
+	end
+
+	# If this is a continuation of a program, returns that programs name
+	# otherwise nil.
+	def cont
+		return nil unless @name[/, forts$/]
+		cn = @name.dup
+		try_replace {cn[/, forts$/] = ''}
+		cn
+	end
+end
+
+# Represents a channel, a number of programs shown on a particular day. Also
+# knows how to download the data for a channel.
+class Channel
+	include Enumerable
+    attr_reader :channel
+
+	def Channel.new(day, channel, starttime, stoptime, flush = nil)
+		cache = "#{CACHEDIR}/#{channel}_" + day.strftime("%y%m%d")
+		if File.exists?(cache)  && !flush
+			File.open(cache) {|f| return Marshal.load(f)}
+		else
+			chan = super(day, channel, starttime, stoptime)
+			File.open(cache, "w") {|f| Marshal.dump(chan, f)}
+			return chan
+		end
+	end
+
+    def initialize(day, channel, starttime, stoptime)
+		@day = day
+        @channel = channel
+        @channum = CHANNELS[@channel]
+        @programs = []
+        @starttime = starttime
+        @stoptime = stoptime
+        parse_table(get_table)
+    end
+
+	def each(*args, &pr)
+		@programs.each(*args, &pr)
+	end
+
+    def get_table
+    	page = "http://www.dagenstv.com/se/chart/?cha=" + \
+			"#{@channum}&dat=" + @day.strftime("%Y-%m-%d")
+		Fetch.new.get(page)
+    end
+
+    def parse_table(tbl)
+        raise "Could not find table" unless tbl
+        last = nil
+
+
+		# Clear comments
+		tbl.gsub!(/<!--.*?-->/m, '')
+
+		# Match table rows
+		tbl.scan(/<tr>.*?(?=<tr>|<\/tr>)/m) do |row|
+			cellno = 0
+			start = name = desc = show = nil
+			row.scan(/<td[^>]*>.*?<\/td>/m) do |cell|
+				case cellno
+				when 0
+					start = cell[/[0-9]+:[0-9]+/]
+				when 2
+					if cell[/<span[^>]*class="stylecharteventname">(.*?)</m]
+						name = $1.strip
+					end
+					if cell[/<span[^>]*class="stylechartdescription">(.*?)<\/span>/m]
+						desc = $1.strip
+					end
+					if cell[/<span[^>]*class="stylechartshowview">(.*?)</m]
+						show = $1.strip
+					end
+				end
+				cellno += 1
+			end
+			if start && name
+				desc = desc || ""
+				start = ProgramTime.parse(start)
+            	if start.between?(@starttime,@stoptime)
+					p = Program.new(channel, start, name, desc, show)
+					if last && last.start == start
+						@programs.pop
+					end
+					@programs << p
+					last.stop = start if last
+					last = p
+				end
+			end
+		end # tbl scan
+
+		if @programs.length > 0
+        	# If first program does not start at starttime insert pseudoprogram
+			if @programs[0].start != @starttime
+				@programs.unshift Program.new(channel, @starttime, nil, nil, nil, 
+					@programs[0].start)
+			end
+			lastend = @programs[-1].start + 60
+			if lastend >= @stoptime
+				@programs[-1].stop = @stoptime
+			else
+				@programs[-1].stop = lastend
+				@programs.push Program.new(channel, lastend, nil, nil, nil, @stoptime)
+			end
+		else
+			@programs << Program.new(channel, @starttime, nil, nil, nil,
+				@stoptime)
+		end
+    end
+
+    def to_s
+        s = @channel + "\n----------------------------------------\n\n" + \
+            @programs.collect! {|p| p.to_s}.join("\n\n")
+    end
+
+	# If this is a cont program returns the original program
+	def cont(program)
+		cn = program.cont
+		return nil unless cn
+		@programs.each {|p| return p if p.name == cn}
+		return nil
+	end
+end
+
+class Table
+	include Enumerable
+
+	attr_reader :day
+
+    START = ProgramTime.new(7)
+    STOP = ProgramTime.new(4)
+
+    def initialize(day, flush = nil, channels = CHANNELS.keys)
+		@day = day
+        @channels = channels.collect {|c| Channel.new(day, c, START, STOP, flush)}
+    end
+
+	def each(*args, &pr)
+		@channels.each(*args, &pr)
+	end
+
+	def start; START; end
+	def stop; STOP; end
+
+	def program_from_id(id)
+		program = nil
+		each {|c| 
+			c.each{|p| 
+				program = p if p.id == id
+			}
+		}
+		return program
+	end
+end
+
+class TableWriter
+	def initialize(table, prefs, id = nil)
+		@table, @prefs = table, prefs
+		@day = @table.day
+		@id = id
+	end
+
+    def write(out)
+		tomorrow = @day + 3600*24
+		yesterday = @day - 3600*24
+		scrollto = '#' + (if @id then @id.to_s else 'now' end)
+        out << <<-STOP
+<html>
+	<head>
+		<title>Dagens TV-program</title>
+		<style>
+		td {font-size: 8pt; font-family: Verdana;}
+		.time {font-size: 7pt;}
+		.timeeven {font-size: 7pt; background: #cfc;}
+		.timenow {font-size: 7pt; background: #060; color: #fff;}
+
+		.regular {background: #fff;}
+		.yellow  {background: #ffc;}
+		.grey    {background: #ccc;}
+		.red     {background: #fcc;}
+		.green   {background: #cfc;}
+		.blue    {background: #ccf;}
+		.purple  {background: #fcf;}
+		.cyan    {background: #cff;}
+		.feature {background: #fcc;}
+
+		.regularnow {background: #ada;}
+		.greynow    {background: #9a9;}
+		.yellownow  {background: #eeb;}
+		.rednow     {background: #ebb;}
+		.greennow   {background: #beb;}
+		.bluenow    {background: #bbe;}
+		.purplenow  {background: #ebe;}
+		.cyannow    {background: #bee;}
+		.featurenow {background: #ebb;}
+
+		.programnow {font-size: 8pt; font-family: Verdana; background: #9c9;}
+
+		.head {font-size: 10pt; font-family: Verdana; font-weight: bold;
+			text-align: center}
+		h1 {text-align: center; color: #666633; font-family: arial}
+		a {color: #000000; text-decoration: none}
+		a.now {}
+		a.imdb {font-size: 7pt}
+		</style>
+		<script>
+			function showMessage(m) {
+			start = "<html> <head> <style> h1 {font-family: arial; font-size: 16; text-align: center} p.showview {color: red} </style> </head> <body bgcolor=white>"
+			stop = "</body></html>"
+
+			alert(start + m + stop)
+		}
+		</script>
+	<head>
+<body bgcolor=white onload='self.location.href="#{scrollto}"'> 
+	<h1>#{@day.strftime("%A %Y-%m-%d")}</h1>
+	<table width=100% align=center>
+	<tr>
+		<td>
+			<p align=left>
+			<a target=table href="tv?day=#{yesterday.strftime("%Y-%m-%d")}">&lt;&lt;
+			#{yesterday.strftime("%A %Y-%m-%d")}</a>
+			</p>
+		</td>
+		<td>
+			<p align=right>
+			<a target=table href="tv?day=#{tomorrow.strftime('%Y-%m-%d')}"
+			>#{tomorrow.strftime("%A %Y-%m-%d")} &gt;&gt;</a>
+			</p>
+		</td>
+	</tr>
+	<table bgcolor=#cccccc align=center>
+		<tr><td><table cellspacing=1 cellpadding=3 align=center>
+        STOP
+
+        out << '<tr>'
+        @table.each_with_index {|c,i| 
+            if i%2==0
+                out << "<td class=head bgcolor=#ffffff>Tid</td>"
+            end
+            out << "<td class=head bgcolor=#ffffff>#{c.channel}</td>"
+        }
+        out << "<td class=head bgcolor=#ffffff>Tid</td>"
+        out << '</tr>'
+
+		now = ProgramTime.now
+        time = @table.start
+        while time < @table.stop
+            out << '<tr>'
+			style = 'time'
+			style = 'timeeven' if time.m == 0
+			isnow = false
+			if (now - time) >= 0 && (now-time) < 10
+				style = 'timenow'
+				isnow = true
+			end
+            @table.each_with_index {|c,i| 
+				if i==0 && isnow
+                    out << "<td class=#{style} bgcolor=#ffffff><a name=now>#{time}</a></td>"
+                elsif i%2==0
+                    out << "<td class=#{style} bgcolor=#ffffff>#{time}</td>"
+                end
+                channel_row(out, c, time)
+            }
+            out << "<td class=#{style} bgcolor=#ffffff>#{time}</td>"
+            out << "</tr>\n"
+            time = time + 10
+        end
+		select_row(out)	
+        out << "</table></td></tr></table>\n"
+        out << "</body>\n</html>\n"
+    end
+
+	def to_s
+		s = ''
+		write(s)
+		return s
+	end
+
+    def channel_row(out, channel, time)
+        match = channel.detect {|p| p.start == time}
+        if match
+            program_row(out, channel, match)
+        end
+    end
+
+	def select_row(out)
+		out << "<tr>"
+		channels = CHANNELS.keys.sort
+		channels << '--'
+		channels << 'Remove'
+		@prefs.channels.each_with_index {|c,i|
+			if i%2 == 0
+				out << <<-ADD
+					<td align=center>
+					</td>
+				ADD
+			end
+			out << <<-OPEN
+			<td align=center>
+				<form method=post>
+					<input type=hidden name=action value="select_channel">
+					<input type=hidden name=column value="#{i}">
+					<select name=channel onChange='submit()'>
+			OPEN
+			channels.each {|c2|
+				sel = c==c2 ? "selected" : ""
+				out << "<option #{sel} value='#{c2}'> #{c2}"
+			}
+			out << <<-CLOSE
+					</select>
+				</form>
+			</td>
+			CLOSE
+		}
+		out << <<-ADD
+			<td align=center>
+				<form method=post>
+					<input type=hidden name=action value="add_channel">
+					<input type=submit value='Add'>
+				</form>
+			</td>
+			</tr>
+		ADD
+	end
+
+    def program_style(channel, program)
+		orig_program = program
+		program = channel.cont(program) || program
+		style = if @prefs.style(program) != "regular"
+			@prefs.style(program)
+		elsif program.feature 
+			"feature"
+		else
+			"regular"
+		end
+		if program_now(orig_program)
+			style + "now"
+		else
+			style
+		end
+    end
+
+	def program_now(program)
+		@now = @now || ProgramTime.now
+		@now >= program.start && @now < program.stop
+	end
+
+	def program_link(channel, program)
+		program = channel.cont(program) || program
+		klass = program_now(program) ? "class=now" : ""
+		daystr = @day.strftime("%Y-%m-%d")
+		%Q{<a name=#{program.id} href="tv?program=#{program.id}&day=#{daystr}" title="#{program.showview}"
+			target=info #{klass}>#{program.name}</a>}
+	end
+
+    def feature_link(channel, program)
+		program = channel.cont(program) || program
+        return "" unless program.feature
+        original_title = program.original_name
+        original_title = CGI.escape(original_title)
+        "<a class=imdb href='http://www.imdb.com/Find?#{original_title}'>(IMDB)</a>"
+    end
+
+    def program_row(out, channel, program)
+        rows = program.duration/10
+        if program.name
+            out << %Q{
+				<td class=#{program_style(channel, program)} valign=top bgcolor=#ffffff
+					rowspan=#{rows}>
+					#{program_link(channel, program)} #{feature_link(channel, program)}
+                </td>
+			}
+        else
+            out << "<td rowspan=#{rows}></td>"
+        end
+    end
+end
+
+class ProgramWriter
+	def initialize(table, prefs, id)
+		@prefs = prefs
+		@program = table.program_from_id(id)
+		@day = table.day
+		@id = id
+	end
+
+    def feature_link(program)
+        original_title = program.original_name
+        original_title_esc = CGI.escape(original_title)
+        "<a class=imdb href='http://www.imdb.com/Find?#{original_title_esc}'>IMDB: #{original_title}</a>"
+    end
+
+	def write(out)
+		unless @program
+			out << "<html></html>"
+			return
+		end
+		daystr = @day.strftime("%Y-%m-%d")
+		out << %Q{
+			<html><head>
+			<style>
+				p {font-size: 8pt; font-family: Verdana; margin: 0.3em}
+				body {font-size: 10}
+				h1 {font-family: arial; font-size: 12}
+				p.showview {color: red}
+			</style>
+			</head>
+			<body bgcolor=white>
+			<form target=table method=post>
+			<table width=100% cellspacing=10><tr>
+				<td valign=top width=50%>
+					<h1>#{@program.channel} #{@program.start.real} #{@program.name}
+						#{@program.showview}</h1>
+					<p>#{@program.desc}</p>
+				</td>
+				<td width=25% valign=top>
+					#{styles}
+				</td>
+
+				<td width=25%>
+					<input type=submit value="Update">
+					<input type=hidden name=action value=prefs>
+					<input type=hidden name=id value="#{@id}">
+					<input type=hidden name=day value="#{daystr}">
+				</td>
+			</form>
+			</body></html>
+		}
+	end
+
+	def styles
+		s = "<table><tr><td valign=top>"
+		Preferences::STYLES.each_with_index {|sty, i|
+			checked = (@prefs.style(@program) == sty) ? 'checked' : ''
+			if i%4 == 0 && i!=0
+				s << "</td><td>&nbsp;</td><td valign=top>"
+			end
+			s << "<p><input type=radio name=style value=#{sty} #{checked} onclick='submit()'> #{sty}</p>"
+		}
+		s << "</td></tr></table>"
+		return s
+	end
+
+	def to_s; s=''; write(s); s; end
+end
+
+def tv_app(req, res)
+	today = Time.now
+	if today.hour <=4
+		today = today - 3600*24
+	end
+	
+	query = req.query
+
+	if query['day']
+		day = query['day']
+		daydata = day.split('-').collect {|s| s.to_i}
+		if daydata.length == 3
+			daydata << 12
+			today = Time.mktime(*daydata)
+		end
+	end
+
+	headers = {}
+
+	prefs = nil
+	if File.exists?(USERFILE)
+		File.open(USERFILE) {|f| prefs = Marshal.load(f)}
+	else
+		prefs = Preferences.new
+	end
+
+	if prefs.channels == nil
+		prefs.channels = ['SVT1', 'SVT2', 'TV3', 'TV4', 'Kanal 5', 'ZTV']
+	end
+
+	if query['program']
+		table = Table.new(today, false, prefs.channels)
+		program = query['program']
+		ProgramWriter.new(table, prefs, program).write(res.body)
+
+	elsif query['action'] == 'prefs'
+		table = Table.new(today, false, prefs.channels)
+		id = query['id'].to_s
+		program = table.program_from_id(id)
+		style = query['style']
+		if program
+			prefs.set_style(program, style)
+			File.open(USERFILE, "w") {|f| Marshal.dump(prefs, f)}
+		end
+		TableWriter.new(table, prefs, id).write(res.body)
+
+	elsif query['action'] == 'select_channel'
+		column = query['column'].to_i
+		program = query['channel']
+		if program == 'Remove'
+			if prefs.channels.length > 1
+				prefs.channels.delete_at(column)
+			end
+		else
+			prefs.channels[column] = program
+		end
+		File.open(USERFILE, "w") {|f| Marshal.dump(prefs, f)}
+		table = Table.new(today, false, prefs.channels)
+		TableWriter.new(table, prefs).write(res.body)
+
+	elsif query['action'] == 'add_channel'
+		prefs.channels << 'SVT1'
+		File.open(USERFILE, "w") {|f| Marshal.dump(prefs, f)}
+		table = Table.new(today, false, prefs.channels)
+		TableWriter.new(table, prefs).write(res.body)
+
+	else
+		table = Table.new(today, false, prefs.channels)
+		TableWriter.new(table, prefs).write(res.body)
+	end
+end
+

metadata

@@ -0,0 +1,45 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.8.11
+specification_version: 1
+name: SwedishTV
+version: !ruby/object:Gem::Version 
+  version: 0.0.2
+date: 2005-08-30 00:00:00 +02:00
+summary: Shows Swedish TV channel schedules in web browser.
+require_paths: 
+  - lib
+email: niklas@frykholm.se
+homepage: http://www.frykholm.se/
+rubyforge_project: 
+description: 
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+    - 
+      - ">"
+      - !ruby/object:Gem::Version 
+        version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+authors: 
+  - Niklas Frykholm
+files: 
+  - bin/CVS
+  - bin/tv
+  - lib/CVS
+  - lib/swe_tv.rb
+  - README
+test_files: []
+rdoc_options: []
+extra_rdoc_files: 
+  - README
+executables: 
+  - tv
+extensions: []
+requirements: []
+dependencies: []