splitted files for more overview

1 files changed, 3 insertions, 494 deletions

diff --git a/index.cgi b/index.cgi
index 3744b8f..32fcdab 100755
--- a/index.cgi
+++ b/index.cgi
@@ -1,294 +1,8 @@
 #!/usr/bin/env ruby
 load "/home/ben/src/lib.rb/pphtml.rb"
+require "pp"
 require "yaml"
 require "cgi"
-require "pp"
-require "date"
-
-class Poll
-	attr_reader :head, :name, :hidden
-	def initialize name,hidden
-		@name = name
-		@hidden = hidden
-		@head = {}
-		@data = {}
-		@comment = []
-		store "Poll #{name} created"
-	end
-	def head_to_html
-		ret = "<tr><td></td>\n"
-		@head.sort.each{|columntitle,columndescription|
-			ret += "<th title='#{columndescription}'>#{columntitle}</th>\n"
-		}
-		ret += "<th>Last Edit</th>\n"
-		ret += "</tr>\n"
-		ret
-	end
-	def add_remove_column_htmlform
-		return <<END
-<div id='add_remove_column'>
-<fieldset><legend>add/remove column</legend>
-<form method='post' action='.'>
-<div>
-		<label for='columntitle'>Columntitle: </label>
-		<input id='columntitle' size='16' type='text' value='#{$cgi["add_remove_column"]}' name='add_remove_column' />
-		<label for='columndescription'>Description: </label>
-		<input id='columndescription' size='30' type='text' value='#{$cgi["columndescription"]}' name='columndescription' />
-		<input type='submit' value='add/remove column' />
-</div>
-</form>
-</fieldset>
-</div>
-END
-	end
-	def to_html
-		ret = "<div id='polltable'>\n"
-		ret += "<form method='post' action='.'>\n"
-		ret += "<table border='1'>\n"
-
-		ret += head_to_html
-
-		@data.sort{|x,y| x[1]["timestamp"] <=> y[1]["timestamp"]}.each{|participant,poll|
-			ret += "<tr>\n"
-			ret += "<td class='name'>#{participant}</td>\n"
-			@head.sort.each{|columntitle,columndescription|
-				klasse = poll[columntitle].nil? ? "undecided" : poll[columntitle]
-				case poll[columntitle]
-				when nil
-					value = UNKNOWN
-				when "yes"
-					value = YES
-				when "no"
-					value = NO
-				when "maybe"
-					value = MAYBE
-				end
-				ret += "<td class='#{klasse}' title='#{participant}: #{columntitle}'>#{value}</td>\n"
-			}
-			ret += "<td class='date'>#{poll['timestamp'].strftime('%d.%m, %H:%M')}</td>"
-			ret += "</tr>\n"
-		}
-		
-		ret += "<tr id='add_participant'>\n"
-		ret += "<td class='name'><input size='16' type='text' name='add_participant' /></td>\n"
-		@head.sort.each{|columntitle,columndescription|
-			ret += "<td class='checkboxes'>
-			<table><tr>
-			<td class='input-yes'>#{YES}</td>
-			<td><input type='radio' value='yes' name='add_participant_checked_#{columntitle}' title='#{columntitle}' /></td>
-			</tr><tr>
-			<td class='input-no'>#{NO}</td>
-			<td><input type='radio' value='no' name='add_participant_checked_#{columntitle}' title='#{columntitle}' checked='checked' /></td>
-			</tr><tr>
-			<td class='input-maybe'>#{MAYBE}</td>
-			<td><input type='radio' value='maybe' name='add_participant_checked_#{columntitle}' title='#{columntitle}' /></td>
-			</tr></table>
-			</td>\n"
-		}
-		ret += "<td class='checkboxes'><input type='submit' value='add/edit' /></td>\n"
-
-		ret += "</tr>\n"
-
-		ret += "<tr><td class='name'>total</td>\n"
-		@head.sort.each{|columntitle,columndescription|
-			yes = 0
-			undecided = 0
-			@data.each_value{|participant|
-				if participant[columntitle] == "yes"
-					yes += 1
-				elsif !participant.has_key?(columntitle) or participant[columntitle] == "maybe"
-					undecided += 1
-				end
-			}
-
-			if @data.empty?
-				percent_f = 0
-			else
-				percent_f = 100*yes/@data.size
-			end
-			percent = "#{percent_f}#{CGI.escapeHTML("%")}" unless @data.empty?
-			if undecided > 0
-				percent += "-#{(100.0*(undecided+yes)/@data.size).round}#{CGI.escapeHTML("%")}"
-			end
-
-			ret += "<td class='sum' title='#{percent}' style='"
-			["","background-"].each {|c|
-				ret += "#{c}color: rgb("
-				3.times{ 
-					ret += (c == "" ? "#{155+percent_f}" : "#{100-percent_f}")
-					ret += ","
-				}
-				ret.chop!
-				ret += ");"
-			}
-			ret += "'>#{yes}</td>\n"
-		}
-
-		ret += "</tr>"
-		ret += "</table>\n"
-		ret += "</form>\n"
-		ret += "</div>"
-		
-		ret += "<div id='comments'>"
-		unless @comment.empty?
-			ret	+= "<fieldset><legend>Comments</legend>"
-			@comment.each_with_index{|c,i|
-				time,name,comment = c
-				ret += "<form method='post' action='.'>\n"
-				ret += "<div>"
-				ret	+= "<fieldset><legend>#{name} said on #{time.strftime("%d.%m, %H:%M")} "
-				ret += "<input type='hidden' name='delete_comment' value='#{i}' />"
-				ret += "<input class='delete_comment_button' type='submit' value='delete' style='position: absolute; margin-left: 20px;' />"
-				ret += "</legend>"
-				ret += comment
-				ret += "</fieldset>"
-				ret += "</div>"
-				ret += "</form>"
-			}
-			ret += "</fieldset>"
-		end
-
-		ret += "</div>\n"
-		ret
-	end
-	def add_participant(name, agreed)
-		htmlname = CGI.escapeHTML(name.strip)
-		@data[htmlname] = {"timestamp" => Time.now}
-		@head.each_key{|columntitle|
-			@data[htmlname][columntitle] = agreed[columntitle.to_s]
-		}
-		store "Participant #{name} edited"
-	end
-	def invite_delete(name)
-		if @data.has_key?(name)
-			@data.delete(CGI.escapeHTML(name.strip))
-			store "Participant #{name} deleted"
-		else
-			add_participant(name,{})
-		end
-	end
-	def store comment
-		File.open("data.yaml", 'w') do |out|
-			out << "# This is a dudle poll file\n"
-			out << self.to_yaml
-			out.chmod(0660)
-		end
-		`export LC_ALL=de_DE.UTF-8; bzr commit -m '#{CGI.escapeHTML(comment)}'`
-	end
-	def add_comment name, comment
-		@comment << [Time.now, CGI.escapeHTML(name), CGI.escapeHTML(comment.strip).gsub("\r\n","<br />")]
-		store "Comment added by #{name}"
-	end
-	def delete_comment index
-		store "Comment from #{@comment.delete_at(index)[1]} deleted"
-	end
-	def add_remove_column name, description
-		add_remove_parsed_column CGI.escapeHTML(name.strip), CGI.escapeHTML(description.strip)
-	end
-	def add_remove_parsed_column columntitle, description
-		if @head.include?(columntitle)
-			@head.delete(columntitle)
-			action = "deleted"
-		else
-			@head[columntitle] = description
-			action = "added"
-		end
-		store "Column #{columntitle} #{action}"
-		true
-	end
-end
-class DatePoll < Poll
-	def head_to_html
-		ret = "<tr><td></td>\n"
-		monthhead = Hash.new(0)
-		@head.sort.each{|curdate,curdescription|
-			monthhead["#{curdate.year}-#{curdate.mon.to_s.rjust(2,"0")} "] += 1
-		}
-		monthhead.sort.each{|title,count|
-			year, month = title.split("-").collect{|e| e.to_i}
-			ret += "<th colspan='#{count}'>#{Date::ABBR_MONTHNAMES[month]} #{year}</th>\n"
-		}
-		ret += "</tr><tr><td></td>\n"
-		@head.sort.each{|curdate,curdescription|
-			ret += "<th>#{Date::ABBR_DAYNAMES[curdate.wday]}, #{curdate.day}</th>\n"
-		}
-		ret += "<th>Last Edit</th>\n"
-		ret += "</tr>\n"
-		ret	
-	end
-	def add_remove_column_htmlform
-		if $cgi.include?("add_remove_column_month")
-			begin
-				startdate = Date.parse("#{$cgi["add_remove_column_month"]}-1")
-			rescue ArgumentError
-				olddate =  $cgi.params["add_remove_column_month"][1]
-				case $cgi["add_remove_column_month"]
-				when YEARBACK
-					startdate = Date.parse("#{olddate}-1")-365
-				when MONTHBACK
-					startdate = Date.parse("#{olddate}-1")-1
-				when MONTHFORWARD
-					startdate = Date.parse("#{olddate}-1")+31
-				when YEARFORWARD 
-					startdate = Date.parse("#{olddate}-1")+366
-				end
-				startdate = Date.parse("#{startdate.year}-#{startdate.month}-1")
-			end
-		else
-			startdate = Date.parse("#{Date.today.year}-#{Date.today.month}-1")
-		end
-		ret = <<END
-<div id='add_remove_column'>
-<fieldset><legend>add/remove column</legend>
-<form method='post' action='.'>
-<div>
-<table><tr>
-END
-		def navi val
-			"<th style='padding:0px'>" +
-				"<input class='navigation' type='submit' name='add_remove_column_month' value='#{val}' />" +
-				"</th>"
-		end
-		[YEARBACK,MONTHBACK].each{|val| ret += navi(val)}
-		ret += "<th colspan='3'>#{Date::ABBR_MONTHNAMES[startdate.month]} #{startdate.year}</th>"
-		[MONTHFORWARD, YEARFORWARD].each{|val| ret += navi(val)}
-		 
-		ret += "</tr><tr>\n"
-
-		7.times{|i| ret += "<th>#{Date::ABBR_DAYNAMES[(i+1)%7]}</th>" }
-		ret += "</tr><tr>\n"
-		
-		(startdate.wday-1).times{
-			ret += "<td></td>"
-		}
-		d = startdate
-		while (d.month == startdate.month) do
-			klasse = "notchoosen"
-			klasse = "disabled" if d < Date.today
-			klasse = "choosen" if @head.include?(d)
-			ret += "<td class='calendarday'><input class='#{klasse}' type='submit' name='add_remove_column' value='#{d.day}' /></td>\n"
-			ret += "</tr><tr>\n" if d.wday == 0
-			d = d.next
-		end
-		ret += <<END
-</tr></table>
-<input type='hidden' name='add_remove_column_month' value='#{startdate.strftime("%Y-%m")}' />
-</div>
-</form>
-</fieldset>
-</div>
-END
-		ret
-	end
-	def add_remove_column name,description
-		begin
-			parsed_name = Date.parse("#{$cgi["add_remove_column_month"]}-#{name}")
-		rescue ArgumentError
-			return false
-		end
-		add_remove_parsed_column(parsed_name,CGI.escapeHTML(description))
-	end
-end
 
 if __FILE__ == $0
 
@@ -337,213 +51,8 @@ puts <<HEAD
 HEAD
 
 if File.exist?("data.yaml") 
-	if $cgi.include?("revision")
-		REVISION=$cgi["revision"].to_i
-		table = YAML::load(`export LC_ALL=de_DE.UTF-8; bzr cat -r #{REVISION} data.yaml`)
-	else
-		table = YAML::load_file("data.yaml")
-	end
-
-	puts <<HEAD
-<head>
-	<meta http-equiv="Content-Type" content="#{CONTENTTYPE}" /> 
-	<meta http-equiv="Content-Style-Type" content="text/css" />
- <title>dudle - #{table.name}</title>
-	<link rel="stylesheet" type="text/css" href="../dudle.css" title="default"/>
-	<link rel="stylesheet" type="text/css" href="../print.css" title="print" media="print" />
-	<link rel="stylesheet" type="text/css" href="../print.css" title="print" />
-	<link rel="alternate"  type="application/atom+xml" href="atom.cgi" />
-</head>
-<body>
-<div id='backlink'>
-	<a href='..' style='text-decoration:none'>#{BACK}</a>
-</div>
-<h1>#{table.name}</h1>
-HEAD
-
-	if $cgi.include?("add_participant")
-		agreed = {}
-		$cgi.params.each{|k,v|
-			if k =~ /^add_participant_checked_/
-				agreed[k.gsub(/^add_participant_checked_/,"")] = v[0]
-			end
-		}
-
-		table.add_participant($cgi["add_participant"],agreed)
-	end
-
-	table.invite_delete($cgi["invite_delete"])	if $cgi.include?("invite_delete")
-	
-	if $cgi.include?("add_remove_column")
-		puts "Could not add/remove column #{$cgi["add_remove_column"]}" unless table.add_remove_column($cgi["add_remove_column"],$cgi["columndescription"])
-	end
-
-	table.add_comment($cgi["commentname"],$cgi["comment"]) if $cgi.include?("comment")
-	table.delete_comment($cgi["delete_comment"].to_i) if $cgi.include?("delete_comment")
-
-	puts table.to_html
-	
-	puts "<div id='hint'>"
-	puts "<fieldset><legend>Hint</legend>"
-	puts "To change a line, add a new person with the same name!"
-	puts "</fieldset>"
-	puts "</div>"
-
-	MAXREV=`bzr revno`.to_i
-	REVISION=MAXREV unless defined?(REVISION)
-	log = `export LC_ALL=de_DE.UTF-8; bzr log --forward`.split("-"*60)
-	log.collect!{|s| s.scan(/\nrevno:.*\ncommitter.*\n.*\ntimestamp: (.*)\nmessage:\n  (.*)/).flatten}
-	log.shift
-	log.collect!{|t,c| [DateTime.parse(t),c]}
-	puts "<div id='history'>"
-	puts "<fieldset><legend>browse history</legend>"
-	puts "<table>"
-	puts "<tr>"
-	puts "<th>rev</th>"
-	puts "<th>time</th>"
-	puts "<th>description of change</th>"
-	puts "</tr>"
-
-	((REVISION-2)..(REVISION+2)).each do |i|
-		if i >0 && i<=MAXREV
-			if REVISION == i
-				puts "<tr id='displayed_revision'><td>#{i}"
-			else
-				puts "<tr><td>"
-				puts "<a href='?revision=#{i}' />#{i}</a>"
-			end
-			puts "</td>"
-			puts "<td>#{log[i-1][0].strftime('%d.%m, %H:%M')}</td>"
-			puts "<td>#{log[i-1][1]}</td>"
-			puts "</tr>"
-		end
-	end
-	puts "</table>"
-	puts "</fieldset>"
-	puts "</div>"
-	
-	puts "<div id='invite_delete'>"
-	puts "<fieldset><legend>invite/delete participant</legend>"
-	puts "<form method='post' action='.'>\n"
-	puts "<div>"
-	puts "<input size='16' value='#{$cgi["invite_delete"]}' type='text' name='invite_delete' />"
-	puts "<input type='submit' value='invite/delete' />"
-	puts "</div>"
-	puts "</form>"
-	puts "</fieldset>"
-	puts "</div>"
-	
-	puts table.add_remove_column_htmlform
-	
-	puts "<div id='add_comment'>"
-	puts "<fieldset><legend>Comment</legend>"
-	puts "<form method='post' action='.'>\n"
-	puts "<div>"
-	puts "<label for='Commentname'>Name: </label><input id='Commentname' value='anonymous' type='text' name='commentname' /><br />"
-	puts "<textarea cols='50' rows='10' name='comment' ></textarea><br />"
-	puts "<input type='submit' value='Submit' />"
-	puts "</div>"
-	puts "</form>"
-	puts "</fieldset>"
-	puts "</div>"
-
+	load "../participate.rb"
 else
-
-
-	puts <<HEAD
-<head>
-	<title>dudle</title>
-	<link rel="alternate"  type="application/atom+xml" href="atom.cgi" />
-</head>
-<body>
-HEAD
-
-	if $cgi.include?("create_poll")
-		SITE=$cgi["create_poll"]
-		unless File.exist?(SITE)
-			Dir.mkdir(SITE)
-			Dir.chdir(SITE)
-			`bzr init`
-			File.symlink("../index.cgi","index.cgi")
-			File.symlink("../atom.cgi","atom.cgi")
-			File.open("data.yaml","w").close
-			`bzr add data.yaml`
-			hidden = ($cgi["hidden"] == "true")
-			case $cgi["poll_type"]
-			when "Poll"
-				Poll.new SITE, hidden
-			when "DatePoll"
-				DatePoll.new SITE, hidden
-			end
-			Dir.chdir("..")
-			if hidden
-				puts <<HIDDENINFO
-<fieldset>
-	<legend>Info</legend>
-	Poll #{SITE} created successfull!
-	<br />
-	Please remember the url (<a href="#{SITE}">#{$cgi.server_name}#{$cgi.script_name.gsub(/index.cgi$/,"")}#{SITE}</a>) while it will not be visible here.
-</fieldset>
-HIDDENINFO
-			end
-		else
-			puts "<fieldset><legend>Error</legend>This poll already exists!</fieldset>"
-		end
-	end
-
-	puts "<fieldset><legend>Available Polls</legend>"
-	puts "<table><tr><th>Poll</th><th>Last change</th></tr>"
-	Dir.glob("*/data.yaml").sort_by{|f|
-		File.new(f).mtime
-	}.reverse.collect{|f| 
-		f.gsub(/\/data\.yaml$/,'')
-	}.each{|site|
-		unless YAML::load_file("#{site}/data.yaml" ).hidden
-			puts "<tr>"
-			puts "<td class='site'><a href='#{site}'>#{site}</a></td>"
-			puts "<td class='mtime'>#{File.new(site + "/data.yaml").mtime.strftime('%d.%m, %H:%M')}</td>"
-			puts "</tr>"
-		end
-	}
-	puts "</table>"
-	puts "</fieldset>"
-
-	puts <<CHARSET
-<fieldset><legend>change charset</legend>
-#{UTFASCII}
-</fieldset>
-CHARSET
-
-	puts <<CREATE
-<fieldset><legend>Create new Poll</legend>
-<form method='post' action='.'>
-<table>
-	<tr>
-		<td><label title="#{poll_name_tip = "the name equals the link under which you receive the poll"}" for="poll_name">Name:</label></td>
-		<td><input title="#{poll_name_tip}" id="poll_name" size='16' type='text' name='create_poll' value='#{$cgi["create_poll"]}' /></td>
-	</tr>
-	<tr>
-		<td><label for="poll_type">Type:</label></td>
-		<td>
-			<select id="poll_type" name="poll_type">
-				<option value="Poll" selected="selected">normal</option>
-				<option value="DatePoll">date</option>
-			</select>
-		</td>
-	</tr>
-	<tr>
-		<td><label title="#{hidden_tip = "do not list the poll here (you have to remember the link)"}" for="hidden">Hidden?:</label></td>
-		<td><input id="hidden" type="checkbox" name="hidden" value="true" title="#{hidden_tip}"></td>
-	</tr>
-	<tr>
-		<td colspan='2'><input type='submit' value='create' /></td>
-	</tr>
-</table>
-</form>
-</fieldset>
-CREATE
+	load "overview.rb"
 end
-
-puts "</body></html>"
-
 end