53 lines
1.0 KiB
Perl
Executable File
53 lines
1.0 KiB
Perl
Executable File
#!/usr/bin/perl
|
|
|
|
$DB_TYPE = "mysql";
|
|
# dbi database type (only MySQL is
|
|
# supported currently, due to the
|
|
# fact that "LIMIT X,X" is used
|
|
|
|
$DB_NAME = "kwotes";
|
|
# database name
|
|
|
|
$DB_HOST = "mysql";
|
|
# database host
|
|
|
|
$DB_USER = "kwotes";
|
|
# database user
|
|
|
|
$DB_PASS = "kw0t3s";
|
|
# database password
|
|
|
|
$SECS_BETWEEN_KWOTES = 60*60;
|
|
# seconds a user must wait after
|
|
# submitting MAX_KWOTES_PER_IP
|
|
# kwotes to the system before they
|
|
# are allowed to submit another
|
|
# kwote
|
|
|
|
$KWOTE_DEATH_RATING = -1;
|
|
# lowest rating a quote can be
|
|
# before it's deleted. A kwote is
|
|
# only deleted if it's been this
|
|
# number (or lower) for longer than
|
|
# the KWOTE_TTL
|
|
|
|
$KWOTE_TTL = (60*60)*24;
|
|
# seconds before a "dead"
|
|
# quote is moved to the kwote
|
|
# backup table and deleted
|
|
|
|
$VOTE_TTL = (60*60)*24;
|
|
# seconds a vote log lasts, the vote
|
|
# log is the mechanism that keeps
|
|
# people from voting over and over
|
|
|
|
$MAX_VOTES_PER_IP = 4;
|
|
# maximum votes per ip address per
|
|
# VOTE_TTL seconds.
|
|
|
|
$MAX_KWOTES_PER_IP = 5;
|
|
# maximum kwotes allowed per ip
|
|
# in SECS_BETWEEN_KWOTES
|
|
|
|
1;
|