diff options
Diffstat (limited to 'top.cgi')
-rwxr-xr-x | top.cgi | 82 |
1 files changed, 82 insertions, 0 deletions
@@ -0,0 +1,82 @@ +#!/usr/bin/ruby + +require 'rubygems' +require 'dbi' +require 'cgi' + +require 'conf' +db=$db + +order = "-" +page="Blagues" +subpage="Top 10" + +cgi = CGI.new + +if cgi['order'] == "worst" + order = "+" + subpage="Worst" +end + +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="top.cgi?order=#{cgi['order']}">#{subpage}</a></h1> +HTML_BDG + +i = 0 +db.execute("SELECT * FROM blague").sort_by { |row| eval "#{order + "row" + '[5]'}" }.each { |row| + unless i == 10 + 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é 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 |