1 files changed, 92 insertions, 0 deletions
diff --git a/index.cgi b/index.cgi
new file mode 100755
index 0000000..5cd81ac
--- /dev/null
+++ b/index.cgi
@@ -0,0 +1,92 @@
+#!/usr/bin/ruby
+
+require 'rubygems'
+require 'dbi'
+require 'cgi'
+
+require 'conf'
+db=$db
+
+page="Blagues"
+subpage="Aléatoire"
+
+cgi = CGI.new
+puts cgi.header
+
+puts <<HTML_BDG
+<?xml version="1.0" encoding="utf-8"?>
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
+	"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
+
+<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="fr">
+	<head>
+		<title>BDG — Blagues de Geek</title>
+		<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
+		<meta http-equiv="content-language" content="fr" />
+		<meta http-equiv="Pragma" content="no-cache" />
+		<meta http-equiv="Cache-Control" content="no-cache, must-revalidate" />
+		<meta http-equiv="Expires" content="0" />
+		<link rel="shortcut icon" href="favicon.ico" />
+		<link rel="stylesheet" media="screen" type="text/css" title="Design" href="index.css" />
+	</head>
+	<body>
+HTML_BDG
+
+require 'menu'
+puts menu_bdg(page,subpage)
+
+puts <<HTML_BDG
+		<table id="milieu">
+			<tr>
+				<td id="gauche"><h1><a href="./">Quelques blagues au hasard</a></h1>
+HTML_BDG
+
+total = 0
+db.execute("SELECT COUNT(*) FROM blague").each { |row| total = row[0] }
+
+if total < 5
+	count = total
+else
+	count = 5
+end
+
+displayed = Hash.new()
+
+i = 0
+until i == count
+db.execute("SELECT id,titre,auteur,blague,DATE_FORMAT(date_post, '%e/%c/%Y'),voteplus,votetotal FROM blague WHERE ID=#{rand(total)+1}").each { |row|
+	if displayed["#{row[0]}"] == true
+		next
+	else
+		displayed["#{row[0]}"] = true
+	end
+
+	unless row[1] == ""
+		if i.modulo(2) == 1 
+			parity = " impair"
+		else
+			parity = ""
+		end
+		i += 1
+		puts <<HTML_BDG
+
+					<div class="Blague#{parity}">
+					<div class="titre"><h3>\##{row[0]} - #{CGI::escapeHTML(row[1])} <span class="vote">( #{row[5]} / #{row[6]} )</span></h3></div>
+						<p class="contenu">#{CGI::escapeHTML(row[3]).gsub(/\r\n|\r|\n/,"<br />")}</p><p class="by">post&eacute; par #{CGI::escapeHTML(row[2])} le #{row[4]}</p>
+					</div>
+					
+HTML_BDG
+
+	end
+	}
+end
+
+require 'infos'
+puts infos_bdg()
+
+puts <<HTML_BDG
+			</tr>
+		</table>
+	</body>
+</html>
+HTML_BDG