# Another HTML-lint t@C
#   ***t@C htmllint.env ɉĂ***
#   ̃t@C htmllint.cgiAtagslist.cgi ǂݍ݂܂B
#   htmllint.pm Ãt@CΓǂݍ݂܂AȂĂ삵܂B
#   ANZX܂HvāAl猩Ȃ悤ɂĂB

# CGI pfBNg (΃pXCGI΃pXŎwAȂׂ΃pXɂĂ)
$RULEDIR  = './';        # Kt@C̏ꏊ
#$LOGSDIR = './logs/';   # Ot@C̏ꏊ (svȂRgAEg)
$TMPDIR   = '/tmp/';     # e|t@C̏ꏊ
$IMGDIR   = './';        # C[Wt@C̏ꏊ
$TAGSLIST = '';          # ^OꗗLbVp̏ꏊ (ȂLbVȂ)
                         # ݒ肷Ƃ̓ANZXKɗ^Ă

# HTML pfBNg (CGI o͂ HTML Ŏg)
$HTMLDIR    = './';                     # HTMLt@C̏ꏊ
$GATEWAYURL = $HTMLDIR.'htmllint.html'; # QCgEFCT[BX HTML
$EXPLAIN    = $HTMLDIR.'explain.html';  # p HTML (HTMLp)
$CGIROOT    = $HTMLDIR;                 # CGȈꏊ
$IMGROOT    = $HTMLDIR;                 # C[Wt@C̏ꏊ

# CN[hpX̒ǉ
unshift @INC, '.', $RULEDIR;

# ftHgKt@C (Windows/Macł . n܂t@C͖)
$HTMLLINTRC = '.htmllintrc';

# HTMLt@Cgq (K\)
$HTMLEXT = 'html?|[sp]ht(ml?)?';

# index.html (K\)
$INDEXHTML = "index\\.($HTMLEXT)";

# OhC (svȂRgAEg)
# IPŎw肷Ƃ 192.168.1.64/26 ̂悤Ƀ}XNw肪ł܂
# IP 0 ̏ꍇAႦ 192.168.0.0/16 ̂Ƃ /16 ͕svł
# Ow肾̂ƂAΉIPfʂ肵Ă܂ƂɒӂĂ
# IPŎw肷ꍇ́AKpƂł܂
# Ⴆ΁A192.168.1.0/24 ɂy[W 192.168.1.0/24 ȊO
# `FbNȂꍇ́A192.168.1.0/24!192.168.1.0/24 ƏƂł܂
# ܂A192.168.1.0/24 ̃y[W 192.168.1.64/26 猟Ȃꍇ
# 192.168.1.0/24*192.168.1.64/26 ƏƂł܂
# IPw͑̃hCw̔zɂƂł܂
#@EXCEPTDOMAINS = qw(uso800.ac.jp);

# 񏜊OhC (svȂRgAEg)
# @EXCEPTDOMAINSłЂĂAŎw肵ĂhC͔񏜊OƂȂ܂
#@PERMITDOMAINS = qw(fake.uso800.ac.jp www.uso800.ac.jp);

# vCF[gIP (֎~ƂRgAEg)
#$PERMITPRIVATEIP = 1;

# LWP  Jcode.pm ̎gp𐧌 (ƂRgO)
#$NOUSELWP = 1;
#$NOUSEJCODE = 1;

# httpreq.pl/LWP p HTML ̌ETCY (KB) (0 ͖)
$MAXHTMLSIZE = 512;

# httpreq.pl/LWP p^CAEg (b) (l 180b)
#$TIMEOUT = 3*60;

# httpreq.pl/LWP pvLVT[o (svȂRgAEg)
#$HTTP_PROXY = 'firewall:8080';

# httpreq.pl/LWP pm[vLVhCXg (svȂRgAEg)
#@HTTP_NOPROXY = qw(noproxy domain names list);

# htmllint.cgi Ń[Jt@C擾ł悤ɂ (svȂRgAEg)
# 擾łt@ĆANCAg̃t@Cł͂ȂăT[õt@C
# wƂɒӂĂ (܂A[Jt@CƂ͕̂smł)
# āA̎ẃA***[JȃT[oȊOł̓ZLeB댯ł***
# ̎wɂAfile:// Ŏn܂vgR URL Ɏwł悤ɂȂ܂
# uEÚANCAg̃t@CƂĎ擾܂Ał̓T[o
# ̃t@CƂĎ擾̂ŒӂĂ
# Windows̃T[oł́AC: ̂悤ȃhCun܂t@CLqł܂
#$GETLOCALFILE = 1;

# CGI o͂ HTML ̊R[h̊l (RgAEgĂ)
#$KANJICODE = 'JIS';    # JIS/EUC/SJIS/UTF8 ̂ꂩ

# Lynx (sv邢͖ȂRgAEg)
#$LYNX = '/usr/local/bin/lynx -dump -nolist -force_html';

# w3m (sv邢͖ȂRgAEg)
#   J[@\̂Ȃꍇ -M ̎w͕s
#   -e  EUCAShift JIS Ȃ -s
#$W3M = '/usr/local/bin/w3m -dump -T text/html -M -e';

# _L^pOt@C (svȂRgAEg)
#   # ͔̕Nɒu܂
#$SCOREFILE    = "${LOGSDIR}score#.log";
#$SCORECOUNTER = "${LOGSDIR}score.cnt";

# x̓vpOt@C (svȂRgAEg)
#   # ͔̕Nɒu܂
#$STATFILE = "${LOGSDIR}statistics#.log";

# _L^OhC (svȂRgAEg)
#@EXCEPTSCORES = qw(uso800.ac.jp);

# Muquit's Access Counter CGI (sv邢͖ȂRgAEg)
#$COUNTER = '/usr/local/www/cgi-bin/Count.cgi';

# rW[`FbN֐
# sub BusyCheck {
#   ɂ傲ɂsȂāAlint ȂƂłȂ̂悤 ** Ԃ
#     q|ܑύGĂ܂B΂炭Ă`FbNĂB|;
#   󕶎 0 Ԃ lint sȂ
#   R Perl XNvgł邱
#   ႦΎ̂悤Ȃ
#   my $ps = `ps -axw`; ܂ `ps -efA`; Ȃ
#   my $cnt = 0;
#   $cnt++ while $ps =~ m#/htmllint/htmllint.cgi#og;
#   ($cnt >= 100)? 'GĂ܂': '';
# }

# n֐
#sub EndProc {
#    htmllint.cgi  END{} ŌĂ΂
#}

1;
