w00t
This commit is contained in:
40
kwotes.pl
40
kwotes.pl
@ -30,6 +30,7 @@ my %FORM = parse_form();
|
||||
my $action = $FORM{"action"};
|
||||
my $main_content;
|
||||
my %vars;
|
||||
my $template = ($FORM{"template"}) ? $FORM{"template"} : $DEFAULT_TEMPLATE;
|
||||
|
||||
# populate %vars with ENV
|
||||
foreach my $key (keys %ENV) {
|
||||
@ -41,6 +42,7 @@ $vars{KWOTE_COUNT} = get_kwote_count();
|
||||
$vars{KWOTE_BACKUP_COUNT} = get_kwote_backup_count();
|
||||
$vars{SITE_NAME} = $SITE_NAME;
|
||||
$vars{TAG_LINE} = get_tagline();
|
||||
$vars{TEMPLATE_DIR} = "templates/$template";
|
||||
|
||||
# send header
|
||||
send_html_header();
|
||||
@ -49,7 +51,7 @@ send_html_header();
|
||||
# action: add (show add form)
|
||||
if ($action eq "add") {
|
||||
$vars{TITLE} = "Add Kwote";
|
||||
$main_content = wrap_template("html/content-addform.html", %vars);
|
||||
$main_content = wrap_template($template, "content-addform.html", %vars);
|
||||
|
||||
############
|
||||
# action: doadd (add the kwote to the db)
|
||||
@ -58,7 +60,7 @@ if ($action eq "add") {
|
||||
if ($FORM{"content"} eq "") {
|
||||
$vars{TITLE} = "An Error Occured";
|
||||
$vars{ERROR_MESSAGE} = "No text entered";
|
||||
$main_content = wrap_template("html/content-error.html",%vars);
|
||||
$main_content = wrap_template($template, "content-error.html",%vars);
|
||||
|
||||
} else {
|
||||
|
||||
@ -70,13 +72,13 @@ if ($action eq "add") {
|
||||
if (!defined($kid)) {
|
||||
$vars{TITLE} = "An Error Occured";
|
||||
$vars{ERROR_MESSAGE} = "Couldn't add kwote";
|
||||
$main_content = wrap_template("html/content-error.html",%vars);
|
||||
$main_content = wrap_template($template, "content-error.html",%vars);
|
||||
|
||||
# all was good
|
||||
} else {
|
||||
$vars{TITLE} = "Kwote Added";
|
||||
$vars{KWOTE_ID} = $kid;
|
||||
$main_content = wrap_template("html/content-addform-thanks.html", %vars);
|
||||
$main_content = wrap_template($template, "content-addform-thanks.html", %vars);
|
||||
|
||||
}
|
||||
}
|
||||
@ -93,7 +95,7 @@ if ($action eq "add") {
|
||||
if (!defined($kwote)) {
|
||||
$vars{TITLE} = "Kwote Does Not Exist";
|
||||
$vars{ERROR_MESSAGE} = "That kwote does not exist";
|
||||
$main_content = wrap_template("html/content-error.html",%vars);
|
||||
$main_content = wrap_template($template, "content-error.html",%vars);
|
||||
|
||||
# all was good
|
||||
} else {
|
||||
@ -101,7 +103,7 @@ if ($action eq "add") {
|
||||
$vars{KWOTE_ID} = $kwote->{'id'};
|
||||
$vars{KWOTE_TEXT} = html_escape($kwote->{'content'});
|
||||
$vars{KWOTE_RATING} = $kwote->{'rating'};
|
||||
$main_content = wrap_template("html/content-show-kwote.html", %vars);
|
||||
$main_content = wrap_template($template, "content-show-kwote.html", %vars);
|
||||
|
||||
}
|
||||
|
||||
@ -159,6 +161,8 @@ if ($action eq "add") {
|
||||
$vars{LAST_INDEX} = $start_index-$max_returned;
|
||||
$vars{MAX_RECORDS} = $max_records;
|
||||
$vars{SEARCH_STRING} = $search_string;
|
||||
$vars{MAX_RATING} = $max_rating;
|
||||
$vars{MIN_RATING} = $min_rating;
|
||||
|
||||
# get the navigation template
|
||||
my $navigation_template = undef;
|
||||
@ -166,41 +170,43 @@ if ($action eq "add") {
|
||||
# forward, no back
|
||||
if ($FORM{"o"} ne "random" && $start_index<=0 && @rows>=$max_returned
|
||||
&& ($start_index+$max_returned)<$max_records) {
|
||||
$navigation_template = "html/content-list-navigate-no-back.html";
|
||||
$navigation_template = "content-list-navigate-no-back.html";
|
||||
|
||||
# forward and back
|
||||
} elsif ($FORM{"o"} ne "random" && $start_index>0 && @rows>=$max_returned
|
||||
&& ($start_index+$max_returned)<$max_records ) {
|
||||
$navigation_template = "html/content-list-navigate.html";
|
||||
$navigation_template = "content-list-navigate.html";
|
||||
|
||||
# back only
|
||||
} elsif ($FORM{"o"} ne "random" && $start_index>0 && @rows<$max_returned) {
|
||||
$navigation_template = "html/content-list-navigate-no-forward.html";
|
||||
$navigation_template = "content-list-navigate-no-forward.html";
|
||||
}
|
||||
|
||||
# wrap the navigation template
|
||||
$main_content .= wrap_template($navigation_template, %vars);
|
||||
$main_content .= wrap_template($template, $navigation_template, %vars);
|
||||
|
||||
# loop through the results
|
||||
if (defined(@rows)) {
|
||||
for (my $i=0; $i<@rows && ($i+$start_index)<$max_records; $i++) {
|
||||
my $row = $rows[$i];
|
||||
$vars{KWOTE_ID} = $row->{'id'};
|
||||
$vars{KWOTE_TEXT} = html_escape($row->{'content'});
|
||||
$vars{KWOTE_TEXT_HTML} = html_escape($row->{'content'});
|
||||
$vars{KWOTE_TEXT_XML} = xml_escape($row->{'content'});
|
||||
$vars{KWOTE_TEXT_PLAIN} = $row->{'content'};
|
||||
$vars{KWOTE_RATING} = $row->{'rating'};
|
||||
$main_content .= wrap_template("html/content-show-kwote.html", %vars);
|
||||
$main_content .= wrap_template($template, "content-show-kwote.html", %vars);
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
# wrap the navigation template
|
||||
$main_content .= wrap_template($navigation_template, %vars);
|
||||
$main_content .= wrap_template($template, $navigation_template, %vars);
|
||||
|
||||
##########
|
||||
# action: search (show the search page)
|
||||
} elsif ($action eq "search") {
|
||||
$vars{TITLE} = "Search";
|
||||
$main_content = wrap_template("html/content-search.html", %vars);
|
||||
$main_content = wrap_template($template, "content-search.html", %vars);
|
||||
|
||||
##########
|
||||
# action: love
|
||||
@ -220,11 +226,11 @@ if ($action eq "add") {
|
||||
# show the homepage
|
||||
} else {
|
||||
$vars{TITLE} = "The Better kwote Database";
|
||||
$main_content = wrap_template("html/content-default.html", %vars);
|
||||
$main_content = wrap_template($template, "content-default.html", %vars);
|
||||
|
||||
}
|
||||
|
||||
# finish the HTML
|
||||
render_template("html/header.html", %vars);
|
||||
render_template($template, "header.html", %vars);
|
||||
print STDOUT $main_content;
|
||||
render_template("html/footer.html", %vars);
|
||||
render_template($template, "footer.html", %vars);
|
||||
|
Reference in New Issue
Block a user