diff --git a/dev/cvslargo/listes-rules/alliance/archive.txt b/dev/cvslargo/listes-rules/alliance/archive.txt deleted file mode 100644 index 31d3bded..00000000 --- a/dev/cvslargo/listes-rules/alliance/archive.txt +++ /dev/null @@ -1,26 +0,0 @@ -This archive server knows the following commands: - -get filename ... -ls directory ... -egrep case_insensitive_regular_expression filename ... -maxfiles nnn -version -quit - -Aliases for 'get': send, sendme, getme, gimme, retrieve, mail -Aliases for 'ls': dir, directory, list, show -Aliases for 'egrep': search, grep, fgrep, find -Aliases for 'quit': exit - -Lines starting with a '#' are ignored. -Multiple commands per mail are allowed. -Setting maxfiles to zero will remove the limit (to protect you against -yourself no more than maxfiles files will be returned per request). -Egrep supports most common flags. -If you append a non-standard signature, you should use the quit command -to prevent the archive server from interpreting the signature. - -Examples: -ls latest -get latest/12 -egrep some.word latest/* diff --git a/dev/cvslargo/listes-rules/alliance/help.txt b/dev/cvslargo/listes-rules/alliance/help.txt deleted file mode 100644 index 87110374..00000000 --- a/dev/cvslargo/listes-rules/alliance/help.txt +++ /dev/null @@ -1,57 +0,0 @@ - General info - ------------ -Subcription/unsubscription/info requests should always be sent to the -request -address of a mailinglist. -If a mailinglist for example is called "thelist@some.domain", then the -request -address can be inferred from this to be: "thelist-request@some.domain". - -To subscribe to a mailinglist, simply send a message with the word "subscribe" -in the Subject: field to the -request address of that list. - -As in: To: thelist-request@some.domain - Subject: subscribe - -To unsubscribe from a mailinglist, simply send a message with the word (you -guessed it :-) "unsubscribe" in the Subject: field to the -request address of -that list. - -As in: To: thelist-request@some.domain - Subject: unsubscribe - -In the event of an address change, it would probably be the wisest to first -send an unsubscribe for the old address (this can be done from the new -address), and then a new subscribe for the new address (the order is -important). - -Most (un)subscription requests are processed automatically without human -intervention. - -Do not send multiple (un)subscription or info requests in one mail. Only one -will be processed per mail. - -NOTE: The -request server usually does quite a good job in discriminating - between (un)subscribe requests and messages intended for the maintainer. - If you'd like to make sure a human reads your message, make it look - like a reply (i.e. the first word in the Subject: field should be "Re:", - without the quotes of course); the -request server does not react to - replies. - - - The archive server - ------------------ -Every submission sent to this list is archived. The size of the archive -depends on the limits set by the list maintainer (it is very well possible -that only, say, the last two mails sent to the list are still archived, the -rest might have expired). - -You can look at the header of every mail coming from this list to see -under what name it has been archived. The X-Mailing-List: field contains -the mailaddress of the list and the file in which this submission was -archived. - -If you want to access this archive, you have to send mails to the -request -address with the word "archive" as the first word of your Subject:. -To get you started try sending a mail to the -request address with -the following: - Subject: archive help --- diff --git a/dev/cvslargo/listes-rules/alliance/rc.custom b/dev/cvslargo/listes-rules/alliance/rc.custom deleted file mode 100644 index c7aa4c47..00000000 --- a/dev/cvslargo/listes-rules/alliance/rc.custom +++ /dev/null @@ -1,119 +0,0 @@ -# -# Assign the fully qualified mail address of the maintainer of this list -# to "maintainer". If empty, request-mail will not be mailed to any -# maintainer and will be stored in the "request" file for this list. -# - -maintainer = Olivier.Sirol@lip6.fr - -#LOGABSTRACT=yes # uncomment in case of emergency -#VERBOSE=yes # uncomment in case of real emergency - -size_limit = 1524288 # sanity cutoff value for submissions - -idcache_size = 8192 # duplicate-msgid cache size in bytes - -archive_hist = 20 # number of messages left archived -#archive_log = $LOGFILE # log file for archive retrievals -#subscribe_log = $LOGFILE # log file for administrivia - -maxhist = 32 # bounce history limit -minbounce = 4 # no. of bounces before removal -cutoff_bounce = 256 # lines to keep in bounce processing - -#match_threshold= 30730 # for close matches to the list -#medium_threshold= 28672 # for not so close matches to the list -#loose_threshold= 24476 # for loosely finding your name - -#auto_off_threshold= $medium_threshold # for auto-unsubscribing bouncers -#off_threshold = $loose_threshold # for unsubscribing -#reject_threshold= $match_threshold # for rejecting subscriptions -#submit_threshold= $medium_threshold # for permitting submissions - -#unsub_assist -##unsub_assist = 8 # uncomment (and change perhaps) this - # line to enable unsubscription - # assistance; it specifies the no. of - # multigram matches an unsuccessful - # unsubscriber will receive back -#foreign_submit = yes -##foreign_submit # uncomment this line if you - # want to restrict submitting to - # people on the accept list -#restrict_archive -##restrict_archive= yes # uncomment this line if you - # want to restrict archive retrievals - # to people on the accept list -#force_subscribe -##force_subscribe= yes # uncomment to cause people to - # be autosubscribed upon first - # submission to the list -#auto_unsubscribe= yes -##auto_unsubscribe # uncomment to disable unattended - # unsubscription handling -#auto_subscribe = yes -##auto_subscribe # uncomment to disable unattended - # subscription handling -#auto_help -##auto_help = yes # uncomment to enable default help - # responses to all undecipherable - # requests -#moderated_flag -##moderated_flag= yes # uncomment this to make the list - # moderated (you must create a - # `moderators' file for this to work) - # set moderator_PASSWORD to get - # stricter checking -#cc_requests -##cc_requests = yes # uncomment if you want subscribe - # and help requests to be Cc'd to - # the maintainer -#cc_unsubrequests -##cc_unsubrequests= yes # uncomment if you want unsubscribe - # requests to be Cc'd to the maintainer -#divertcheck = yes -##divertcheck # uncomment to disable the check for - # misfiled administrative requests -#pass_diverts -##pass_diverts = yes # uncomment to pass on administrative - # requests diverted from the normal - # list to the maintainer unprocessed - # (instead of trying to handle them) -#reply_to -##reply_to = "Resent-Reply-To: $listaddr" # uncomment (and perhaps change - # it to "Reply-To") to force replies - # to go to the list (discouraged) - # why discouraged? see: - # http://garcon.unicom.com/FAQ/reply-to-harmful.html -#digest_flag -##digest_flag = yes # uncomment this if you want digests -#digest_age = 262144 # maximum age of a digest in seconds -#digest_size = 32768 # maximum size of a digest in bytes -#undigested_list = $list@$domain # Reply-To: address for digests - -#moderator_PASSWORD = # put the optional password for - # moderators here, this definition - # can contain regular expression magic - # characters (to support multiple - # passwords) - -#X_COMMAND = X-Command -#X_COMMAND_PASSWORD = alcpass # put the literal password for - # X-Command mails here - -#daemon_bias='100^0 ^From:.*daemon@ok' # You could set "daemon_bias" to - # positively discriminate some - # mail address not to be from a daemon. Either with a regexp as demonstrated - # or with more complicated recipes that simply set it to '100^0' or nothing. - -#RC_LOCAL_SUBMIT_00 = rc.local.s00 # Uncomment (and change) these to -#RC_LOCAL_SUBMIT_10 = rc.local.s10 # call up customised local scripts -#RC_LOCAL_SUBMIT_20 = rc.local.s20 # at predefined points. -#RC_LOCAL_REQUEST_00 = rc.local.r00 -#RC_LOCAL_REQUEST_10 = rc.local.r10 -#RC_LOCAL_REQUEST_20 = rc.local.r20 -#RC_LOCAL_REQUEST_30 = rc.local.r30 - -RC_CUSTOM # clear this one from the environment - # so that we include this file only - # once diff --git a/dev/cvslargo/listes-rules/alliance/rc.init b/dev/cvslargo/listes-rules/alliance/rc.init deleted file mode 100644 index 478f2979..00000000 --- a/dev/cvslargo/listes-rules/alliance/rc.init +++ /dev/null @@ -1,255 +0,0 @@ -# -# IMPORTANT variables to check/change: PATH domain listmaster -# - -# BEFORE editing this file or any rc.* file in the .etc directory -# you should create the .etc/rc.lock file. As long as this file -# exists, mail delivery to any list will stall (flist checks this file). -# -# Delivery can be temporarily stalled on a per list basis by creating -# the file rc.lock in the respective list's subdirectory. - -# ENVIRONMENT: -# list contains the submitting address of the list (sans domain) -# domain should contain the domain for the list, so that $list@$domain -# can be used to submit to the list -# maintainer should contain the fully qualified address of the maintainer -# of $list; maintainter can be left empty -# listmaster should contain the fully qualified address of the supervising -# list maintainer; listmaster can be left empty -# X_ENVELOPE_TO contains the address that the incoming mail was addressed to - -# FILES: -# log optional logfile (uncomment the LOGFILE assignment to enable -# it) -# dist the subscriber list, one address per line -# accept the list of people allowed to submit messages (usually a -# link to dist, only checked if $foreign_submit != yes) -# accept2 an optional second accept file -# reject list of people you definitely do not want to subscribe -# subscreen program (e.g. shell script) to screen prospective subscribers -# (see in the examples directory for a sample script) -# request all the messages to request that could not be handled -# automatically (only if maintainer is empty) -# help.txt file sent to help & info requests -# info.txt optional file sent to help & info requests as well, -# it should contain a concise description of what the -# list is all about -# the various info.txt files are optionally gathered in -# order to advertise the availability of the mailinglists -# subscribe.txt file sent to new subscribers -# subscribe.files file containing an arbitrary number of archive server -# commands to be executed on behalf of new subscribers -# unsubscribe.txt file sent to unsubscribers -# accept.txt file sent to people not on the accept list -# archive.txt file sent to people requesting help from the archive server -# archive (link to a) directory below which files can be accessed through -# the archive server -# bounces directory containing the bounce history files -# rc.submit rcfile used when distributing submissions -# rc.request rcfile used when processing requests -# rc.custom rcfile that contains all the customisations per list -# rc.local.* optional rcfiles for any local extensions (to be used in -# conjunction with the RC_LOCAL_* variables which can be set -# in rc.init or rc.custom files) - -#$Id: rc.init,v 1.1 2000/04/05 15:09:45 czo Exp $ - -DELIVERED=yes # we're in control of the mail now, tell sendmail to go away - -PATH=.:$PATH:../.bin:/bin:/usr/bin:/usr/local/bin # setup a decent path -SHELL=/bin/sh # to prevent surprises - -defaults=.etc - -LOCKTIMEOUT=3660 # set these values this high (1 hour) -TIMEOUT=3600 # to give sendmail the time to - # resolve big aliases - -############################################################################### -# You have to setup the following two assignments, make sure that the address -# mentioned in listmaster is *not* the address this script runs under; if -# you would end up doing that, then assign listmaster to "" -# The same applies to the maintainer addresses used for every list, if you -# would like to alias them back to this script or to the respective -request -# addresses, then assign maintainer to "" instead. -# -# The mail-domain you have to insert below, must be the fully qualified -# mail-domain for this list; e.g. if the preferred mail address for this -# account would be: list@somemachine.somewhere.universe -# Then you should assign the following: -# domain=somemachine.somewhere.universe -############################################################################### - -domain=asim.lip6.fr # the common domain for all the lists -listmaster=Olivier.Sirol@lip6.fr - -#UMASK=077 # group can not touch the files -#UMASK=027 # group can read - UMASK=007 # group can write as well - -defaults=.etc # the name of the defaults directory -LOGFILE=log -LOGABSTRACT=no - -#LOGABSTRACT=yes # uncomment in case of emergency -#VERBOSE=yes # uncomment in case of real emergency -#LOGFILE=../$defaults/log # uncomment if you want centralised - # logging - -RC_INIT # clear this one from the environment - # so that we include this file only - # once - -listaddr=$list@$domain -listreq=$list-request@$domain -listdist=$list-dist@$domain - - # the following constants determine the - # behaviour of choplist, the dist-file - # expander (zero means: no limit) which - # calls sendmail -minnames = 32 # minimum number of names per call -mindiffnames = 8 # minimum for maxnames-minnames -maxnames = 64 # maximum number of names per call -maxsplits = 0 # maximum number of parts to split dist in -maxsize = 200000 # maximal disk space to be taken up per mail -maxconcur = 4 # maximum number of concurrent sendmail calls - -alt_sendmail="\ -choplist $minnames $mindiffnames $maxnames $maxsplits $maxsize $maxconcur dist" -minnames mindiffnames maxnames maxsplits maxsize maxconcur -#alt_sendmail # uncomment if you'd prefer sendmail - # to handle the $listdist expansion - -sendmailOPT="-oem -odb -oi -om -f$listreq" -sendmailOPTp=-oep -sendmailOPTq=-odq -sendmailOPTi=-odi -sendmailQflush="$SENDMAIL -q" -#sendmailQflush # uncomment if you don't want the - # queue to be flushed after all archive - # retrieval files have been queued -######################## -# sendmail options used: -# -# -t scan the header of the mail for recipients -# -f specify the sender envelope address (requires T entry in sendmail.cf) -# -oi do not regard a single dot on an otherwise empty line as EOF -# -om include myself in any alias expansions -# -odb background deliverymode command returns immediately -# -odq queued deliverymode (put messages in the queue only) -# -odi interactive deliverymode command, wait until most delivered -# -q flush the queue -# -oem mail back error messages -# -oep print error messages -# -onF do not check aliases while expanding them (use it, if available) -######################## -# -# If you only have /bin/mail and not some sendmail compatible mailer that -# understands the -t option of sendmail, then you have to uncomment the -# following two lines: -# -#sendmailOPT sendmailOPTp sendmailOPTq sendmailOPTi sendmailQflush -#SENDMAIL=../.bin/sendmails -# -######################## - -size_limit = 524288 # sanity cutoff value for submissions - -idcache_size = 8192 # duplicate-msgid cache size in bytes - -archive_hist = 2 # number of messages left archived -archive_log = $LOGFILE # log file for archive retrievals -subscribe_log = $LOGFILE # log file for administrivia - -maxhist = 32 # bounce history limit -minbounce = 4 # no. of bounces before removal -cutoff_bounce = 256 # lines to keep in bounce processing - -match_threshold = 30730 # for close matches to the list -medium_threshold= 28672 # for not so close matches to the list -loose_threshold = 24476 # for loosely finding your name - -auto_off_threshold= $medium_threshold # for auto-unsubscribing bouncers -off_threshold = $loose_threshold # for unsubscribing -reject_threshold= $match_threshold # for rejecting subscriptions -submit_threshold= $medium_threshold # for permitting submissions - -unsub_assist -#unsub_assist = 8 # uncomment (and change perhaps) this - # line to enable unsubscription - # assistance; it specifies the no. of - # multigram matches an unsuccessful - # unsubscriber will receive back -foreign_submit = yes -#foreign_submit # uncomment this line if you - # want to restrict submitting to - # people on the accept list -restrict_archive -#restrict_archive= yes # uncomment this line if you - # want to restrict archive retrievals - # to people on the accept list -force_subscribe -#force_subscribe= yes # uncomment to cause people to - # be autosubscribed upon first - # submission to the list -auto_unsubscribe= yes -#auto_unsubscribe # uncomment to disable unattended - # unsubscription handling -auto_subscribe = yes -#auto_subscribe # uncomment to disable unattended - # subscription handling -auto_help -#auto_help = yes # uncomment to enable default help - # responses to all undecipherable - # requests -moderated_flag -#moderated_flag = yes # uncomment this to make the list - # moderated (you must create a - # `moderators' file for this to work) -cc_requests -#cc_requests = yes # uncomment if you want subscribe - # and help requests to be Cc'd to - # the maintainer -cc_unsubrequests -#cc_unsubrequests= yes # uncomment if you want unsubscribe - # requests to be Cc'd to the maintainer -divertcheck = yes -#divertcheck # uncomment to disable the check for - # misfiled administrative requests -pass_diverts -#pass_diverts = yes # uncomment to pass on administrative - # requests diverted from the normal - # list to the maintainer unprocessed - # (instead of trying to handle them) -reply_to -#reply_to = "Resent-Reply-To: $listaddr" # uncomment (and perhaps change - # it to "Reply-To") to force replies - # to go to the list (discouraged) -digest_flag -#digest_flag = yes # uncomment this if you want digests -digest_age = 262144 # maximum age of a digest in seconds -digest_size = 32768 # maximum size of a digest in bytes - - -X_COMMAND = X-Command -X_COMMAND_PASSWORD = password # put the global password for - # X-Command mails here - # this password can of course be changed/ - # customised in the per list rc.custom file - -#daemon_bias='100^0 ^From:.*daemon@ok' # You could set "daemon_bias" to - # positively discriminate some - # mail address not to be from a daemon. Either with a regexp as demonstrated - # or with more complicated recipes that simply set it to '100^0' or nothing. - -#RC_LOCAL_SUBMIT_00 = rc.local.s00 # Uncomment (and change) these to -#RC_LOCAL_SUBMIT_10 = rc.local.s10 # call up customised local scripts -#RC_LOCAL_SUBMIT_20 = rc.local.s20 # at predefined points. -#RC_LOCAL_REQUEST_00 = rc.local.r00 -#RC_LOCAL_REQUEST_10 = rc.local.r10 -#RC_LOCAL_REQUEST_20 = rc.local.r20 -#RC_LOCAL_REQUEST_30 = rc.local.r30 - -RC_CUSTOM=rc.custom diff --git a/dev/cvslargo/listes-rules/alliance/rc.request b/dev/cvslargo/listes-rules/alliance/rc.request deleted file mode 100644 index b8957dc4..00000000 --- a/dev/cvslargo/listes-rules/alliance/rc.request +++ /dev/null @@ -1,348 +0,0 @@ -# BEFORE editing this file, you should make sure that it is not linked to -# the master version (../.etc/rc.request) anymore (i.e. "delink rc.request" -# if you do not want your changes to affect all lists). -# -# New mails can be temporarily stalled by creating the file rc.lock (either in -# ../.etc for all lists or in the current directory for this list only). - -#$Id: rc.request,v 1.1 2000/04/05 15:09:45 czo Exp $ - -INCLUDERC=$RC_INIT -INCLUDERC=$RC_CUSTOM - -INCLUDERC=$RC_LOCAL_REQUEST_00 - -LOCKFILE=tmp.lock # for reusing tmp.(request|from) - # also makes sure that the load doesn't go sky-high - # when a lot of mail arrives concurrently - -:0 Bfw # concatenate header and body -* $^^$X_COMMAND: -| sed -e '1,/^$/{' -e '/^$/d' -e '}' - -# -# We now check: -# If the length is roughly within bounds. -# That it is not a reply or something. -# That we didn't send it ourselves. -# That it wasn't sent by a daemon of some kind. -# -# If everything matches, we extract the sender address into tmp.from -# - -:0 -* B ?? < 4096 -* $$daemon_bias -* $!^(X-(Loop: $\listaddr|Diagnostic:)|$X_COMMAND:) -* -100^0 ^FROM_DAEMON -* 1^0 -{ - -:0 -* -100^0 ^Subject:(.*[^a-z])?(Re:|erro|change|problem|((can)?not|.*n't)\>) -* 100^0 B ?? ^^([ ]|$)*\ - ((archives?:?($|[ ]+)|\ - ((un)subscribe|(send|get)(me)?|gimme|retrieve|mail|ls|dir(ectory)?|\ - list|show|search|[fe]?grep|find|maxfiles|version|help|info)\ - ([ ].*)?$)([ ]|$)*)+\ - ([^ a-z].*$(.*$(.*$(.*$(.*$)?)?)?)?)?^^ -* 100^0 ^Subject:[ ]*archive -* 1^0 -{ - :0 whc - | formail -rtzc -xTo: >tmp.from - -# -# Store the whole mail in tmp.request, for later reference. -# - - :0 wc - | formail -IIn-Reply-To: -ICc: >tmp.request - -# -# Check for a missing Subject: line. -# - - :0 wfh - * !^Subject: - | formail -a "Subject: " - - INCLUDERC=$RC_LOCAL_REQUEST_10 - -############################################################################### -# Reader beware, the following four regular expressions are not for the faint # -# of heart. It'll suffice to say that they accomplish their intended job 98% # -# of the time. # -############################################################################### - -# -# Is it an archive retrieval command? -# - - :0 HB w - * 9876543210^0 ^^(.+$)*Subject:[ ]*(([(<]no(ne| subject\ - ( (\(file transmission|given))?)[>)])?\ - $(.+$)*(^[ ]*)+)?(archives?:?([ ]|$)|\ - ((send|get)(me)?|gimme|retrieve|mail|ls|dir(ectory)?|list|show|\ - search|[fe]?grep|find|maxfiles|version)([ ]+[^ ]*)?$) - * 1^0 B ?? ^^([ ]|$)*\ - ((archives?:?($|[ ]+)|\ - ((send|get)(me)?|gimme|retrieve|mail|ls|dir(ectory)?|\ - list|show|search|[fe]?grep|find|maxfiles|version|help|info)\ - ([ ].*)?$)([ ]|$)*)+\ - ([^ a-z].*$(.*$(.*$(.*$(.*$)?)?)?)?)?^^ - { - :0 W - * 9876543210^0 !restrict_archive ?? y - * 2^0 ? formail -rt -R To: "From " -X "From " | \ - multigram -b1 -m -l$submit_threshold -L$domain \ - -x$listaddr -x$listreq accept accept2 - | arch_retrieve - - :0 E fhw - | formail -A "X-Diagnostic: Not on the accept list" - } - -# -# Is it an unsubscription request? -# - - :0 EHB - * 9876543210^0 ^^(.+$)*Subject:[ ]*([(<]no(ne| subject\ - ( (\(file transmission|given))?)[>)])?(\ - ($(.+$)*(^[ ]*)+((.+|$)+[,.:;]([ ]+|$)+)?)?\ - (Could you )?(please )?\ - (sign( [^ ]+ |-)?off|cancel|leave|delete|remove|(un|de)-?sub)\>|\ - ($(.+$)*$(.*$)*)?(.*[^a-z])?\ - ((un-?|(un|de)-?sub?)s(cr|c|r)i|\ - (leave|(delete|remove) .* from|(sign|take|get) .* off) .* [a-z-]*list\>)) - * 1^0 B ?? ^^([ ]|$)*unsub(scribe)?([ ].*)?([ ]|$)*\ - [^ a-z]?^^ - { - :0 fw:dist.lock - * auto_unsubscribe ?? y - | unsubscribe - - :0 Aw ${cc_unsubrequests:+c} - | $SENDMAIL $sendmailOPT `cat tmp.from` ; - - :0 Afhw - | formail -A "X-Diagnostic: Processed" - } - - -# -# Is it a subscription request? -# - - :0 EHB - * 9876543210^0 ^^(.+$)*Subject:[ ]*([(<]no(ne| subject\ - ( (\(file transmission|given))?)[>)])?(\ - ($(.+$)*(^[ ]*)+((.+|$)+[,.:;]([ ]+|$)+)?)?\ - (Could you )?(please )?\ - (sign( [^ ]+ |-)?on|add|join|sub)\>|\ - ($(.+$)*$(.*$)*)?(.*[^a-z])?\ - (sub?s(cr|c|r)i.*|(join|add .* to|(sign|put) .* on) .* [a-z-]*list\>)) - * 1^0 B ?? ^^([ ]|$)*sub(scribe)?([ ].*)?([ ]|$)*\ - [^ a-z]?^^ - { - # - # Yes, well, then check if the person subscribing isn't on the reject - # list. - # - - :0 HB wfh - * ? multigram -b1 -l$reject_threshold reject - | formail -A "X-Diagnostic: Found on the reject list" \ - -A "X-Diagnostic: `multigram -b1 -l$reject_threshold reject`" - - # - # If not, then let's see if he might already be on the - # mailinglist. - # - - :0 E HB wfh - * ? formail -IReceived: -IX-Envelope-To: -IIn-Reply-To: -ICc: | \ - multigram -b1 -x$listreq -x$listaddr -l$reject_threshold dist - | formail -A "X-Diagnostic: Already on the subscriber list" \ - -A "X-Diagnostic: `multigram -b1 -x$listreq -x$listaddr \ - -l$reject_threshold dist`" - - # - # If not, add him(/her/it?). - # - - :0 E - * auto_subscribe ?? y - { - :0 W ${cc_requests:+c}:dist.lock - | subscribe - - :0 awfh - | formail -A "X-Diagnostic: Added to the subscriber list" - - :0 Ewfh - | formail -A "X-Diagnostic: Tried to subscribe" - } - } - -# -# Is it an info or help request? Send back the help.txt and the -# optional info.txt file. -# We do the same on a complete empty mail (except for perhaps a signature). -# - - :0 EHB - * 3^0 ^^(.+$)*Subject:[ ]*\ - (([(<]no(ne| subject( (\(file transmission|given))?)[>)])?$\ - (.+$)*(^[ ]*)+)?[a-z,. ]*(help|info(rmation)?)\> - * 1^0 ^^(.+$)*Subject:[ ]*\ - ([(<]no(ne| subject( (\(file transmission|given))?)[>)])?$ - * -2^0 ^^(.+$)*(^[ ]*)+[a-z] - * 3^0 ^^(.+$)*^([ ]*$)*-- - { - :0 hw ${cc_requests:+c} - | (formail -i"From: $listreq" -rtA"X-Loop: $listaddr"; \ - cat help.txt info.txt 2>/dev/null ) | $SENDMAIL $sendmailOPT -t - - :0 wfh - | formail -A "X-Diagnostic: help sent" - } - - INCLUDERC=$RC_LOCAL_REQUEST_20 - - LOGABSTRACT=yes - -# -# If auto_help is set, anything undecipherable gets back the help.txt and the -# optional info.txt file. -# - - :0 EB - * auto_help ?? y - * $!X-Loop: $\listaddr - { - :0 hw ${cc_requests:+c} - | (formail -i"From: $listreq" -rtA"X-Loop: $listaddr"; \ - cat help.txt info.txt 2>/dev/null ) | $SENDMAIL $sendmailOPT -t - - :0 wfh - | formail -A "X-Diagnostic: undecipherable, help sent" - } - -} -} - -LOGABSTRACT=yes - -# -# Could it be a bounce message from a daemon? Hand it down to procbounce -# which will evaluate it. -# - -:0 wic -* $!^(Subject:(.*[^a-z])?Re:|\ - X-(Loop: $\listaddr|Diagnostic:)|$X_COMMAND:) -* ^FROM_DAEMON -| sed -e $cutoff_bounce' q' >tmp.request - - # - # Sink all messages we can recognise to be queue warnings - # - - :0 Ah - * ^Subject: \ - (WARNING: message delayed|\ - (Returned mail: )?warning: c(an|ould )not send m(essage fo|ail afte)r|\ - Undeliverable (RFC822 )?mail: temporarily unable to deliver|\ - \*\*\* WARNING - Undelivered mail in mailqueue) - /dev/null - - :0 Ah - * ^Subject: (Warning from|mail warning| ?Waiting mail) - * ^(From|Sender):.*(uucp|mmdf) - /dev/null - - :0 AhBD - * $^(..?)?X-Loop: $\listaddr \(bounce\) - * ^(..?)?Subject: You have been removed from - /dev/null - - # - # Anything that still survived is most likely to be a bounce message. - # - - :0 Ahfw - | procbounce - -# -# Or is it a remote X-Command from our maintainer? -# - -:0 wf:dist.lock -* $^$X_COMMAND:.*$\maintainer[ ]*$\X_COMMAND_PASSWORD -* $!^X-Loop: $\listaddr -| x_command - -LOCKFILE # we don't need the lockfile anymore - -# -# Anything not taken care of yet will be served to the maintainer of the list. -# -# To make it easier on him, we include a small hint about what might be the -# problem (by adding X-Diagnostic: fields to the header). -# - -:0 wfh -* !< $size_limit -| formail -A "X-Diagnostic: Submission size exceeds $size_limit bytes" - -:0 wfh -* ^FROM_DAEMON -| formail -A "X-Diagnostic: Mail coming from a daemon, ignored" - -:0 HB wfh -* $^X-Loop: $\listaddr -| formail -A "X-Diagnostic: Possible loopback problem" - -:0 -* !^X-(Diagnostic|Processed): -{ - :0 wfh - * $^$X_COMMAND: - | formail -A "X-Diagnostic: Suspicious $X_COMMAND format" - - :0 HB wfh - * ? formail -IReceived: -IX-Envelope-To: -IIn-Reply-To: -ICc: | \ - multigram -b1 -x$listreq -x$listaddr -l$reject_threshold dist - | formail -A "X-Diagnostic: Already on the subscriber list" \ - -A "X-Diagnostic: `multigram -b1 -x$listreq -x$listaddr \ - -l$reject_threshold dist`" -} - -INCLUDERC=$RC_LOCAL_REQUEST_30 - -:0 wfh -* !^X-(Diagnostic|Processed): -| formail -A"X-Diagnostic: Unprocessed" - -:0 wfh -| formail -A"X-Envelope-To: $X_ENVELOPE_TO" - -# -# If this list does not have a maintainer e-mail address, drop things in -# the file request. -# - -:0: -* !maintainer ?? . -request - -:0 w -| formail -R"From X-From_:" -iDate: -iReturn-Receipt-To: -iRead-Receipt-To: \ - -iAcknowledge-To: | $SENDMAIL $sendmailOPT $sendmailOPTp $maintainer - -:0 wfh -| formail -A"X-Diagnostic: Maintainer $maintainer could not be reached" - -HOST=continue_with_../.etc/rc.post diff --git a/dev/cvslargo/listes-rules/alliance/rc.submit b/dev/cvslargo/listes-rules/alliance/rc.submit deleted file mode 100644 index 77602545..00000000 --- a/dev/cvslargo/listes-rules/alliance/rc.submit +++ /dev/null @@ -1,303 +0,0 @@ -# BEFORE editing this file, you should make sure that it is not linked to -# the master version (../.etc/rc.submit) anymore (i.e. "delink rc.submit" -# if you do not want your changes to affect all archive servers). -# -# New mails can be temporarily stalled by creating the file rc.lock (either in -# ../.etc for all lists or in the current directory for this list only). - -#$Id: rc.submit,v 1.1 2000/04/05 15:09:45 czo Exp $ - -INCLUDERC=$RC_INIT -INCLUDERC=$RC_CUSTOM - -INCLUDERC=$RC_LOCAL_SUBMIT_00 - -# -# The following recipe makes sure that: -# The mail has a sane size (i.e. it is not inordinately big) -# It does not look like an administrative request. -# It wasn't sent by this list itself. -# It wasn't sent by a daemon (misdirected bounce message perhaps). -# - -:0 -* < $size_limit -* !$^($X_COMMAND:|X-Loop: $\listaddr) -* ! B ?? $^^$X_COMMAND: -* $$daemon_bias -* -100^0 ^FROM_MAILER|\ - ^(((Resent-)?(From|Sender)|X-Envelope-From):|>?From )\ - ([^>]*[^(.%@a-z0-9])?(\ - LIST(SERV|proc)|NETSERV|bounce|autoanswer|echo|mirror\ - )(([^).!:a-z0-9][-_a-z0-9]*)?[%@> ][^<)]*(\(.*\).*)?)?$([^>]|$) -* 1^0 -{ - -:0 -* B ?? >640 -* 9876543210^0 -{ } - -# -# Does it look like a regular submission? -# Or perhaps more like an administrative request? -# Look at the start of the body, and see if this could be an administrative -# request, pass it on to rc.request in that case. -# - -:0 -* $$=^0 -* 9876543210^0 !divertcheck ?? y -{ } - -:0 -* $$=^0 -* !B ?? ^^(.*$(.*$(.*$(.*$(.*$(.*$(.*$(.*$)?)?)?)?)?)?)?)?[^]>} a-z0-9] -* 9876543210^0 B ?? ^^.*$.*$.*$.*$.*$.*$.*$.*$.*$ -{ } - -:0 -* $$=^0 -* $${maintainer:+9876543210^0 ^From[: ](.*\<)?$\maintainer\>} -* 9876543210^0 ^(Subject:(.*\<)?(Re:|magazine)\>)|X-(Diagnostic|Mailing-List): -* -25^0 ^\ - Subject:([ ]*(archives?:?([ ]+(\ - (send|get)(me)?|gimme|retrieve|mail|ls|dir(ectory)?|\ - list|show|search|[fe]?grep|find|maxfiles|version|help|info)\ - ([ ]|$)|[ ]*$)|\ - help|info|join|leave|\ - (Could you )?(please )?\ - (cancel(( my)? subscription)?|add|\ - sign( [^ ]+ |-)?o(n|ff)|(un|de)?-?sub)[ ]*$)|\ - .*( (join|leave|add .* to|(delete|remove) .* from|\ - (take|sign|get) .* off|(put|sign) .* on) .* [a-z-]*list|\ - (un-?|sub?)s(cr|c|r)i(be|ption))\>) -* -50^0 ^Subject:[ ]*[(<]no(ne| subject\ - ( (\(file transmission|given))?)[>)]$ -* 50^0 ^Subject:.*[a-z] -* -100^0 B ?? ^^([ ]|$)*\ - ((((archives?:?($|[ ]+)|\ - ((send|get)(me)?|gimme|retrieve|mail|ls|dir(ectory)?|\ - list|show|search|[fe]?grep|find|maxfiles|version|help|info)\ - ([ ].*)?$)([ ]|$)*)+\ - ([^ a-z].*$(.*$(.*$(.*$(.*$)?)?)?)?)?^^|\ - (help|info)[ ]*$|\ - (add|join|leave|sign( [^ ]+ |-)?o(n|ff)|(un|de)?-?sub)\>)|\ - ([^ a-z].*$(.*$(.*$(.*$(.*$)?)?)?)?)?^^|\ - .*( (join|leave|add .* to|(delete|remove) .* from|\ - (take|sign|get) .* off|(put|sign) .* on) .* [a-z-]*list|\ - (un-?|sub?)scri(be|ption))\>|\ - ^^) -{ - # - # Then check to see if the sender is on the accept list (if foreign_submit - # is not set). - # - - :0 - * 9876543210^0 foreign_submit ?? y - * 2^0 ? formail -X"From " -xFrom: -xReply-To: -xSender: -xResent-From: \ - -xResent-Reply-To: -xResent-Sender: -xReturn-Path: | \ - multigram -b1 -m -l$submit_threshold -L$domain \ - -x$listaddr -x$listreq accept accept2 - { - - INCLUDERC=$RC_LOCAL_SUBMIT_10 - - :0 - * moderated_flag ?? y - { - :0 Bfw # contract header and body - * ^^Approved:.*$^ - | sed -e '1,/^$/{' -e '/^$/d' -e '}' - - :0 - * !$^Approved:.*$moderator_PASSWORD - | formail -R"From X-Envelope-From:" -uDate: -iReturn-Receipt-To: \ - -iRead-Receipt-To: -iAcknowledge-To: | \ - $SENDMAIL $sendmailOPT `cat moderators` - - :0 fhw - | formail -IApproved: - } - - # - # Eliminate duplicate submissions by checking the Message-ID: field. - # - - :0 Wh :msgid.lock - | formail -q- -D $idcache_size msgid.cache - - # - # Check if we need to autosubscribe anyone not on the dist list. - # - - :0 - * force_subscribe ?? y - * !? if test y = "$moderated_flag" ;\ - then formail -xFrom: -xSender: -xReply-To: ;\ - else formail -X"From " -xFrom: -xReply-To: -xSender: -xResent-From: \ - -xResent-Reply-To: -xResent-Sender: -xReturn-Path: ;\ - fi | multigram -b1 -m -l$submit_threshold -L$domain \ - -x$listaddr -x$listreq dist - { - - # - # Yes, well, then check if the person isn't on the reject list. - # - - :0 - * ? multigram -b1 -l$reject_threshold reject - { - :0 wfh - | formail -A "X-Diagnostic: Found on the reject list" \ - -A "X-Diagnostic: `multigram -b1 -l$reject_threshold reject`" - - HOST=continue_with_rc.request - } - - LOCKFILE=tmp.lock - - :0 whc - | formail -rtzc -xTo: >tmp.from - - :0 Wc :dist.lock - | sed -e '/^$/,/^-- $/ d' | formail -I "Subject: auto subscribe" \ - >tmp.request; subscribe >$subscribe_log - - LOCKFILE - } - - # - # Check if this is a digested mailinglist. If yes, processing stops - # here and the mail will be added to the digest. - # - - :0 - * digest_flag ?? y - { - # - # Forward the article back to the undigested list, if it hasn't - # come from there. - # - - :0 c - * undigested_list ?? y - * $!^X-Loop: $\undigested_list - ! $sendmailOPT $undigested_list - - # - # Finally digest the mail. - # - - :0 w :tmp.lock - | digest - } - - ARCHIVE # Wipe ARCHIVE from the environment - - # - # Check if we are the first mailinglist to distribute this message, if so - # archive the message. - # - - :0 - * archive_hist ?? [1-9] - * !^X-Mailing-List: - { - - -# Czo 98/11/25 -# archive dans mbox - CZOBOX=`echo $listaddr | sed "s/@asim.lip6.fr//"` - - :0 c - archive/$CZOBOX.mbox - - :0 c : $CZOBOX.mbox.hyp-lock - | /users/largo1/czo/cvslargo/listes-rules/hyp $CZOBOX - -# End Czo - - :0 c - archive/latest/. - - ARCHIVE=$LASTFOLDER # Remember where it was archived - - # - # Truncate the archive to the correct number of files (and - # possibly other housekeeping chores to keep the archive - # current). - # - - :0 c hi - | arch_trunc - } - - # - # Main header munger for submissions passing through this list. - # - - oldshellmetas="$SHELLMETAS" SHELLMETAS # Save a shell, procmail can - # do this one by itself. - :0 wfh - | formail -b -IFrom\ -IReceived: -IReturn-Receipt-To: -IErrors-To: \ - -IX-Pmrqc: -IX-Confirm-Reading-To: -IX-Ack: -IAcknowledge-To: \ - -IRead-Receipt-To: -IReturn-Receipt-Requested: -IX-Diagnostic: \ - -iStatus: -iReturn-Path: -iX-Envelope-To: -iX-Envelope-From: \ - -I"Precedence: list" -I"Resent-Sender: $listreq" \ - -uDate: -aMessage-ID: -aResent-Message-ID: \ - -a"To: $listaddr" -a"Resent-From: $listaddr" -A"X-Loop: $listaddr" \ - -a"Subject: Unidentified subject!" ${reply_to:+"-a$reply_to"} \ - -a"X-Mailing-List: <$listaddr> $ARCHIVE" - - SHELLMETAS="$oldshellmetas" oldshellmetas - - INCLUDERC=$RC_LOCAL_SUBMIT_20 - - # - # The following recipe will distribute the message to the subscribers - # using the native $SENDMAIL, but only if you disabled the alternative - # sendmail (choplist). - # - - :0 w: dist.lock - * !alt_sendmail ?? . - ! $sendmailOPT $listdist - - # - # Alternate sendmail call (used by default), does not use the file- - # including -dist alias. - # - - :0 Ew: dist.lock - | $alt_sendmail $SENDMAIL $sendmailOPT $sendmailOPTi - - :0 wfh - | formail -A "X-Diagnostic: $SENDMAIL $listdist failed" - - HOST=continue_with_rc.request - } - - :0 E wfh - | formail -A "X-Diagnostic: Not on the accept list" - - :0 A c - * ? test -f accept.txt - { - :0 fh - | formail -i"From: $listreq" -kbrtA"X-Loop: $listaddr" ; cat accept.txt - - :0 - ! $sendmailOPT -t - } - -} } - -:0 fhw -* pass_diverts ?? y -* !^X-Diagnostic: -| formail -A "X-Diagnostic: Diverted & unprocessed" - -HOST=continue_with_rc.request diff --git a/dev/cvslargo/listes-rules/alliance/subscribe.txt b/dev/cvslargo/listes-rules/alliance/subscribe.txt deleted file mode 100644 index 3f99bc63..00000000 --- a/dev/cvslargo/listes-rules/alliance/subscribe.txt +++ /dev/null @@ -1,7 +0,0 @@ -This is an automated subscription mechanism. For your verification, a -transcript of the original subscription request is included below. - -If the wrong address has been subscribed and you seem to be unable to fix it -yourself, reply to this message now (quoting it entirely (for diagnostic -purposes), and of course adding any comments you see fit). --- diff --git a/dev/cvslargo/listes-rules/alliance/unsubscribe.txt b/dev/cvslargo/listes-rules/alliance/unsubscribe.txt deleted file mode 100644 index 3875ed29..00000000 --- a/dev/cvslargo/listes-rules/alliance/unsubscribe.txt +++ /dev/null @@ -1,6 +0,0 @@ -If this wasn't your intention or you are having problems getting yourself -unsubscribed, reply to this mail now (quoting it entirely (for diagnostic -purposes), and of course adding any comments you see fit). - -Transcript of unsubscription request follows: --- diff --git a/dev/cvslargo/listes-rules/archi/rc.custom b/dev/cvslargo/listes-rules/archi/rc.custom deleted file mode 100644 index b75a6119..00000000 --- a/dev/cvslargo/listes-rules/archi/rc.custom +++ /dev/null @@ -1,119 +0,0 @@ -# -# Assign the fully qualified mail address of the maintainer of this list -# to "maintainer". If empty, request-mail will not be mailed to any -# maintainer and will be stored in the "request" file for this list. -# - -maintainer = Olivier.Sirol@lip6.fr - -#LOGABSTRACT=yes # uncomment in case of emergency -#VERBOSE=yes # uncomment in case of real emergency - -size_limit = 1524288 # sanity cutoff value for submissions - -idcache_size = 8192 # duplicate-msgid cache size in bytes - -archive_hist = 20 # number of messages left archived -#archive_log = $LOGFILE # log file for archive retrievals -#subscribe_log = $LOGFILE # log file for administrivia - -#maxhist = 32 # bounce history limit -#minbounce = 4 # no. of bounces before removal -#cutoff_bounce = 256 # lines to keep in bounce processing - -#match_threshold= 30730 # for close matches to the list -#medium_threshold= 28672 # for not so close matches to the list -#loose_threshold= 24476 # for loosely finding your name - -#auto_off_threshold= $medium_threshold # for auto-unsubscribing bouncers -#off_threshold = $loose_threshold # for unsubscribing -#reject_threshold= $match_threshold # for rejecting subscriptions -#submit_threshold= $medium_threshold # for permitting submissions - -#unsub_assist -unsub_assist = 8 # uncomment (and change perhaps) this - # line to enable unsubscription - # assistance; it specifies the no. of - # multigram matches an unsuccessful - # unsubscriber will receive back -#foreign_submit = yes -##foreign_submit # uncomment this line if you - # want to restrict submitting to - # people on the accept list -#restrict_archive -restrict_archive= yes # uncomment this line if you - # want to restrict archive retrievals - # to people on the accept list -#force_subscribe -force_subscribe= no # uncomment to cause people to - # be autosubscribed upon first - # submission to the list -auto_unsubscribe= no -##auto_unsubscribe # uncomment to disable unattended - # unsubscription handling -auto_subscribe = no -##auto_subscribe # uncomment to disable unattended - # subscription handling -#auto_help -auto_help = no # uncomment to enable default help - # responses to all undecipherable - # requests -#moderated_flag -##moderated_flag= yes # uncomment this to make the list - # moderated (you must create a - # `moderators' file for this to work) - # set moderator_PASSWORD to get - # stricter checking -#cc_requests -##cc_requests = yes # uncomment if you want subscribe - # and help requests to be Cc'd to - # the maintainer -#cc_unsubrequests -##cc_unsubrequests= yes # uncomment if you want unsubscribe - # requests to be Cc'd to the maintainer -#divertcheck = yes -##divertcheck # uncomment to disable the check for - # misfiled administrative requests -#pass_diverts -##pass_diverts = yes # uncomment to pass on administrative - # requests diverted from the normal - # list to the maintainer unprocessed - # (instead of trying to handle them) -#reply_to -##reply_to = "Resent-Reply-To: $listaddr" # uncomment (and perhaps change - # it to "Reply-To") to force replies - # to go to the list (discouraged) - # why discouraged? see: - # http://garcon.unicom.com/FAQ/reply-to-harmful.html -#digest_flag -##digest_flag = yes # uncomment this if you want digests -#digest_age = 262144 # maximum age of a digest in seconds -#digest_size = 32768 # maximum size of a digest in bytes -#undigested_list = $list@$domain # Reply-To: address for digests - -#moderator_PASSWORD = # put the optional password for - # moderators here, this definition - # can contain regular expression magic - # characters (to support multiple - # passwords) - -X_COMMAND = X-Command -X_COMMAND_PASSWORD = alcpass # put the literal password for - # X-Command mails here - -#daemon_bias='100^0 ^From:.*daemon@ok' # You could set "daemon_bias" to - # positively discriminate some - # mail address not to be from a daemon. Either with a regexp as demonstrated - # or with more complicated recipes that simply set it to '100^0' or nothing. - -#RC_LOCAL_SUBMIT_00 = rc.local.s00 # Uncomment (and change) these to -#RC_LOCAL_SUBMIT_10 = rc.local.s10 # call up customised local scripts -#RC_LOCAL_SUBMIT_20 = rc.local.s20 # at predefined points. -#RC_LOCAL_REQUEST_00 = rc.local.r00 -#RC_LOCAL_REQUEST_10 = rc.local.r10 -#RC_LOCAL_REQUEST_20 = rc.local.r20 -#RC_LOCAL_REQUEST_30 = rc.local.r30 - -RC_CUSTOM # clear this one from the environment - # so that we include this file only - # once diff --git a/dev/cvslargo/listes-rules/defaults/.procmailrc b/dev/cvslargo/listes-rules/defaults/.procmailrc deleted file mode 100644 index 1324b5d0..00000000 --- a/dev/cvslargo/listes-rules/defaults/.procmailrc +++ /dev/null @@ -1,11 +0,0 @@ -#$Id: .procmailrc,v 1.1 2000/04/05 15:09:45 czo Exp $ - -LOGFILE=/dev/null -MAILDIR=.etc # chdir to the defaults directory - -INCLUDERC=rc.init - -:0 wfh -| formail -A"X-Diagnostic: Non-existent mailinglist $X_ENVELOPE_TO" - -INCLUDERC=rc.post diff --git a/dev/cvslargo/listes-rules/defaults/rc.archive b/dev/cvslargo/listes-rules/defaults/rc.archive deleted file mode 100644 index b898a3e9..00000000 --- a/dev/cvslargo/listes-rules/defaults/rc.archive +++ /dev/null @@ -1,90 +0,0 @@ -# BEFORE editing this file, you should make sure that it is not linked to -# the master version (../.etc/rc.archive) anymore (i.e. "delink rc.request" -# if you do not want your changes to affect all archive servers). -# -# New mails can be temporarily stalled by creating the file rc.lock (either in -# ../.etc for all lists or in the current directory for this list only). - -#$Id: rc.archive,v 1.1 2000/04/05 15:09:45 czo Exp $ - -INCLUDERC=$RC_INIT -INCLUDERC=$RC_CUSTOM - -INCLUDERC=$RC_LOCAL_REQUEST_00 - -LOCKFILE=tmp.lock # for reusing tmp.(request|from) - # also makes sure that the load doesn't go sky-high - # when a lot of mail arrives concurrently - -# -# We drop the message in the bitbucket if: -# It's too big. -# We sent it ourselves. -# It was sent by a daemon of some kind. -# - -:0 h -* > 32768 -/dev/null - -:0 h -* !^X-Loop: $listaddr -* $$daemon_bias -* -100^0 ^FROM_DAEMON -* 1^0 -{ } - -:0 Eh -/dev/null - -# -# We now check that it is not a reply or something. -# If it isn't, we extract the sender address into tmp.from -# - -:0 whc -* !^Subject:(.*[^a-z])?(Re:|erro|problem|((can)?not|.*n't)\>) -| formail -rtzc -xTo: >tmp.from - -# -# Store the whole mail in tmp.request, for later reference. -# - - :0 Ac - | cat >tmp.request - -# -# Feed it to the archive server. -# - - :0 Aw - | arch_retrieve standalone - -LOCKFILE # we don't need the lockfile anymore - -INCLUDERC=$RC_LOCAL_REQUEST_30 - -# -# Anything not taken care of yet will be served to the maintainer of the list. -# - -:0 fh -| formail -A"X-Envelope-To: $X_ENVELOPE_TO" - -# -# If this list does not have a maintainer e-mail address, drop things in -# the file request. -# - -:0: -* !maintainer ?? . -request - -:0 w -| formail -R"From X-From_:" -iDate: -iReturn-Receipt-To: -iRead-Receipt-To: \ - -iAcknowledge-To: | $SENDMAIL $sendmailOPT $sendmailOPTp $maintainer - -:0 wfh -| formail -A"X-Diagnostic: Maintainer $maintainer could not be reached" - -HOST=continue_with_../.etc/rc.post diff --git a/dev/cvslargo/listes-rules/defaults/rc.custom b/dev/cvslargo/listes-rules/defaults/rc.custom deleted file mode 100644 index 5534c27f..00000000 --- a/dev/cvslargo/listes-rules/defaults/rc.custom +++ /dev/null @@ -1,119 +0,0 @@ -# -# Assign the fully qualified mail address of the maintainer of this list -# to "maintainer". If empty, request-mail will not be mailed to any -# maintainer and will be stored in the "request" file for this list. -# - -maintainer = - -#LOGABSTRACT=yes # uncomment in case of emergency -#VERBOSE=yes # uncomment in case of real emergency - -#size_limit = 524288 # sanity cutoff value for submissions - -#idcache_size = 8192 # duplicate-msgid cache size in bytes - -#archive_hist = 2 # number of messages left archived -#archive_log = $LOGFILE # log file for archive retrievals -#subscribe_log = $LOGFILE # log file for administrivia - -#maxhist = 32 # bounce history limit -#minbounce = 4 # no. of bounces before removal -#cutoff_bounce = 256 # lines to keep in bounce processing - -#match_threshold= 30730 # for close matches to the list -#medium_threshold= 28672 # for not so close matches to the list -#loose_threshold= 24476 # for loosely finding your name - -#auto_off_threshold= $medium_threshold # for auto-unsubscribing bouncers -#off_threshold = $loose_threshold # for unsubscribing -#reject_threshold= $match_threshold # for rejecting subscriptions -#submit_threshold= $medium_threshold # for permitting submissions - -#unsub_assist -##unsub_assist = 8 # uncomment (and change perhaps) this - # line to enable unsubscription - # assistance; it specifies the no. of - # multigram matches an unsuccessful - # unsubscriber will receive back -#foreign_submit = yes -##foreign_submit # uncomment this line if you - # want to restrict submitting to - # people on the accept list -#restrict_archive -##restrict_archive= yes # uncomment this line if you - # want to restrict archive retrievals - # to people on the accept list -#force_subscribe -##force_subscribe= yes # uncomment to cause people to - # be autosubscribed upon first - # submission to the list -#auto_unsubscribe= yes -##auto_unsubscribe # uncomment to disable unattended - # unsubscription handling -#auto_subscribe = yes -##auto_subscribe # uncomment to disable unattended - # subscription handling -#auto_help -##auto_help = yes # uncomment to enable default help - # responses to all undecipherable - # requests -#moderated_flag -##moderated_flag= yes # uncomment this to make the list - # moderated (you must create a - # `moderators' file for this to work) - # set moderator_PASSWORD to get - # stricter checking -#cc_requests -##cc_requests = yes # uncomment if you want subscribe - # and help requests to be Cc'd to - # the maintainer -#cc_unsubrequests -##cc_unsubrequests= yes # uncomment if you want unsubscribe - # requests to be Cc'd to the maintainer -#divertcheck = yes -##divertcheck # uncomment to disable the check for - # misfiled administrative requests -#pass_diverts -##pass_diverts = yes # uncomment to pass on administrative - # requests diverted from the normal - # list to the maintainer unprocessed - # (instead of trying to handle them) -#reply_to -##reply_to = "Resent-Reply-To: $listaddr" # uncomment (and perhaps change - # it to "Reply-To") to force replies - # to go to the list (discouraged) - # why discouraged? see: - # http://garcon.unicom.com/FAQ/reply-to-harmful.html -#digest_flag -##digest_flag = yes # uncomment this if you want digests -#digest_age = 262144 # maximum age of a digest in seconds -#digest_size = 32768 # maximum size of a digest in bytes -#undigested_list = $list@$domain # Reply-To: address for digests - -#moderator_PASSWORD = # put the optional password for - # moderators here, this definition - # can contain regular expression magic - # characters (to support multiple - # passwords) - -#X_COMMAND = X-Command -#X_COMMAND_PASSWORD = # put the literal password for - # X-Command mails here - -#daemon_bias='100^0 ^From:.*daemon@ok' # You could set "daemon_bias" to - # positively discriminate some - # mail address not to be from a daemon. Either with a regexp as demonstrated - # or with more complicated recipes that simply set it to '100^0' or nothing. - -#RC_LOCAL_SUBMIT_00 = rc.local.s00 # Uncomment (and change) these to -#RC_LOCAL_SUBMIT_10 = rc.local.s10 # call up customised local scripts -#RC_LOCAL_SUBMIT_20 = rc.local.s20 # at predefined points. -#RC_LOCAL_REQUEST_00 = rc.local.r00 -#RC_LOCAL_REQUEST_10 = rc.local.r10 -#RC_LOCAL_REQUEST_20 = rc.local.r20 -#RC_LOCAL_REQUEST_30 = rc.local.r30 - -RC_CUSTOM # clear this one from the environment - # so that we include this file only - # once diff --git a/dev/cvslargo/listes-rules/defaults/rc.init b/dev/cvslargo/listes-rules/defaults/rc.init deleted file mode 100644 index 541471cc..00000000 --- a/dev/cvslargo/listes-rules/defaults/rc.init +++ /dev/null @@ -1,255 +0,0 @@ -# -# IMPORTANT variables to check/change: PATH domain listmaster -# - -# BEFORE editing this file or any rc.* file in the .etc directory -# you should create the .etc/rc.lock file. As long as this file -# exists, mail delivery to any list will stall (flist checks this file). -# -# Delivery can be temporarily stalled on a per list basis by creating -# the file rc.lock in the respective list's subdirectory. - -# ENVIRONMENT: -# list contains the submitting address of the list (sans domain) -# domain should contain the domain for the list, so that $list@$domain -# can be used to submit to the list -# maintainer should contain the fully qualified address of the maintainer -# of $list; maintainter can be left empty -# listmaster should contain the fully qualified address of the supervising -# list maintainer; listmaster can be left empty -# X_ENVELOPE_TO contains the address that the incoming mail was addressed to - -# FILES: -# log optional logfile (uncomment the LOGFILE assignment to enable -# it) -# dist the subscriber list, one address per line -# accept the list of people allowed to submit messages (usually a -# link to dist, only checked if $foreign_submit != yes) -# accept2 an optional second accept file -# reject list of people you definitely do not want to subscribe -# subscreen program (e.g. shell script) to screen prospective subscribers -# (see in the examples directory for a sample script) -# request all the messages to request that could not be handled -# automatically (only if maintainer is empty) -# help.txt file sent to help & info requests -# info.txt optional file sent to help & info requests as well, -# it should contain a concise description of what the -# list is all about -# the various info.txt files are optionally gathered in -# order to advertise the availability of the mailinglists -# subscribe.txt file sent to new subscribers -# subscribe.files file containing an arbitrary number of archive server -# commands to be executed on behalf of new subscribers -# unsubscribe.txt file sent to unsubscribers -# accept.txt file sent to people not on the accept list -# archive.txt file sent to people requesting help from the archive server -# archive (link to a) directory below which files can be accessed through -# the archive server -# bounces directory containing the bounce history files -# rc.submit rcfile used when distributing submissions -# rc.request rcfile used when processing requests -# rc.custom rcfile that contains all the customisations per list -# rc.local.* optional rcfiles for any local extensions (to be used in -# conjunction with the RC_LOCAL_* variables which can be set -# in rc.init or rc.custom files) - -#$Id: rc.init,v 1.1 2000/04/05 15:09:45 czo Exp $ - -DELIVERED=yes # we're in control of the mail now, tell sendmail to go away - -PATH=.:$PATH:../.bin:/bin:/usr/bin:/usr/local/bin # setup a decent path -SHELL=/bin/sh # to prevent surprises - -defaults=.etc - -LOCKTIMEOUT=3660 # set these values this high (1 hour) -TIMEOUT=3600 # to give sendmail the time to - # resolve big aliases - -############################################################################### -# You have to setup the following two assignments, make sure that the address -# mentioned in listmaster is *not* the address this script runs under; if -# you would end up doing that, then assign listmaster to "" -# The same applies to the maintainer addresses used for every list, if you -# would like to alias them back to this script or to the respective -request -# addresses, then assign maintainer to "" instead. -# -# The mail-domain you have to insert below, must be the fully qualified -# mail-domain for this list; e.g. if the preferred mail address for this -# account would be: list@somemachine.somewhere.universe -# Then you should assign the following: -# domain=somemachine.somewhere.universe -############################################################################### - -domain=INSERT.YOUR.MAIL.DOMAIN.HERE # the common domain for all the lists -listmaster= - -#UMASK=077 # group can not touch the files -#UMASK=027 # group can read - UMASK=007 # group can write as well - -defaults=.etc # the name of the defaults directory -LOGFILE=log -LOGABSTRACT=no - -#LOGABSTRACT=yes # uncomment in case of emergency -#VERBOSE=yes # uncomment in case of real emergency -#LOGFILE=../$defaults/log # uncomment if you want centralised - # logging - -RC_INIT # clear this one from the environment - # so that we include this file only - # once - -listaddr=$list@$domain -listreq=$list-request@$domain -listdist=$list-dist@$domain - - # the following constants determine the - # behaviour of choplist, the dist-file - # expander (zero means: no limit) which - # calls sendmail -minnames = 32 # minimum number of names per call -mindiffnames = 8 # minimum for maxnames-minnames -maxnames = 64 # maximum number of names per call -maxsplits = 0 # maximum number of parts to split dist in -maxsize = 200000 # maximal disk space to be taken up per mail -maxconcur = 4 # maximum number of concurrent sendmail calls - -alt_sendmail="\ -choplist $minnames $mindiffnames $maxnames $maxsplits $maxsize $maxconcur dist" -minnames mindiffnames maxnames maxsplits maxsize maxconcur -#alt_sendmail # uncomment if you'd prefer sendmail - # to handle the $listdist expansion - -sendmailOPT="-oem -odb -oi -om -f$listreq" -sendmailOPTp=-oep -sendmailOPTq=-odq -sendmailOPTi=-odi -sendmailQflush="$SENDMAIL -q" -#sendmailQflush # uncomment if you don't want the - # queue to be flushed after all archive - # retrieval files have been queued -######################## -# sendmail options used: -# -# -t scan the header of the mail for recipients -# -f specify the sender envelope address (requires T entry in sendmail.cf) -# -oi do not regard a single dot on an otherwise empty line as EOF -# -om include myself in any alias expansions -# -odb background deliverymode command returns immediately -# -odq queued deliverymode (put messages in the queue only) -# -odi interactive deliverymode command, wait until most delivered -# -q flush the queue -# -oem mail back error messages -# -oep print error messages -# -onF do not check aliases while expanding them (use it, if available) -######################## -# -# If you only have /bin/mail and not some sendmail compatible mailer that -# understands the -t option of sendmail, then you have to uncomment the -# following two lines: -# -#sendmailOPT sendmailOPTp sendmailOPTq sendmailOPTi sendmailQflush -#SENDMAIL=../SedBinDir/sendmails -# -######################## - -size_limit = 524288 # sanity cutoff value for submissions - -idcache_size = 8192 # duplicate-msgid cache size in bytes - -archive_hist = 2 # number of messages left archived -archive_log = $LOGFILE # log file for archive retrievals -subscribe_log = $LOGFILE # log file for administrivia - -maxhist = 32 # bounce history limit -minbounce = 4 # no. of bounces before removal -cutoff_bounce = 256 # lines to keep in bounce processing - -match_threshold = 30730 # for close matches to the list -medium_threshold= 28672 # for not so close matches to the list -loose_threshold = 24476 # for loosely finding your name - -auto_off_threshold= $medium_threshold # for auto-unsubscribing bouncers -off_threshold = $loose_threshold # for unsubscribing -reject_threshold= $match_threshold # for rejecting subscriptions -submit_threshold= $medium_threshold # for permitting submissions - -unsub_assist -#unsub_assist = 8 # uncomment (and change perhaps) this - # line to enable unsubscription - # assistance; it specifies the no. of - # multigram matches an unsuccessful - # unsubscriber will receive back -foreign_submit = yes -#foreign_submit # uncomment this line if you - # want to restrict submitting to - # people on the accept list -restrict_archive -#restrict_archive= yes # uncomment this line if you - # want to restrict archive retrievals - # to people on the accept list -force_subscribe -#force_subscribe= yes # uncomment to cause people to - # be autosubscribed upon first - # submission to the list -auto_unsubscribe= yes -#auto_unsubscribe # uncomment to disable unattended - # unsubscription handling -auto_subscribe = yes -#auto_subscribe # uncomment to disable unattended - # subscription handling -auto_help -#auto_help = yes # uncomment to enable default help - # responses to all undecipherable - # requests -moderated_flag -#moderated_flag = yes # uncomment this to make the list - # moderated (you must create a - # `moderators' file for this to work) -cc_requests -#cc_requests = yes # uncomment if you want subscribe - # and help requests to be Cc'd to - # the maintainer -cc_unsubrequests -#cc_unsubrequests= yes # uncomment if you want unsubscribe - # requests to be Cc'd to the maintainer -divertcheck = yes -#divertcheck # uncomment to disable the check for - # misfiled administrative requests -pass_diverts -#pass_diverts = yes # uncomment to pass on administrative - # requests diverted from the normal - # list to the maintainer unprocessed - # (instead of trying to handle them) -reply_to -#reply_to = "Resent-Reply-To: $listaddr" # uncomment (and perhaps change - # it to "Reply-To") to force replies - # to go to the list (discouraged) -digest_flag -#digest_flag = yes # uncomment this if you want digests -digest_age = 262144 # maximum age of a digest in seconds -digest_size = 32768 # maximum size of a digest in bytes - - -X_COMMAND = X-Command -X_COMMAND_PASSWORD = password # put the global password for - # X-Command mails here - # this password can of course be changed/ - # customised in the per list rc.custom file - -#daemon_bias='100^0 ^From:.*daemon@ok' # You could set "daemon_bias" to - # positively discriminate some - # mail address not to be from a daemon. Either with a regexp as demonstrated - # or with more complicated recipes that simply set it to '100^0' or nothing. - -#RC_LOCAL_SUBMIT_00 = rc.local.s00 # Uncomment (and change) these to -#RC_LOCAL_SUBMIT_10 = rc.local.s10 # call up customised local scripts -#RC_LOCAL_SUBMIT_20 = rc.local.s20 # at predefined points. -#RC_LOCAL_REQUEST_00 = rc.local.r00 -#RC_LOCAL_REQUEST_10 = rc.local.r10 -#RC_LOCAL_REQUEST_20 = rc.local.r20 -#RC_LOCAL_REQUEST_30 = rc.local.r30 - -RC_CUSTOM=rc.custom diff --git a/dev/cvslargo/listes-rules/defaults/rc.main b/dev/cvslargo/listes-rules/defaults/rc.main deleted file mode 100644 index af8a7adb..00000000 --- a/dev/cvslargo/listes-rules/defaults/rc.main +++ /dev/null @@ -1,11 +0,0 @@ -#$Id: rc.main,v 1.1 2000/04/05 15:09:45 czo Exp $ - -LOGFILE=/dev/null -MAILDIR=.etc # chdir to the defaults directory - -INCLUDERC=rc.init - -:0 wfh -| formail -A"X-Diagnostic: Non-existent mailinglist $X_ENVELOPE_TO" - -INCLUDERC=rc.post diff --git a/dev/cvslargo/listes-rules/defaults/rc.post b/dev/cvslargo/listes-rules/defaults/rc.post deleted file mode 100644 index e84a2b2b..00000000 --- a/dev/cvslargo/listes-rules/defaults/rc.post +++ /dev/null @@ -1,17 +0,0 @@ -#$Id: rc.post,v 1.1 2000/04/05 15:09:45 czo Exp $ -MAILDIR=../$defaults # back to the defaults directory -LOGFILE=log # enabled by default, because when processing - # reaches this point, some unusual circumstance - # has occurred. -LOGABSTRACT=yes - -:0 : -* !listmaster ?? . -request - -:0 w -| formail -R"From X-From_:" -iDate: -iReturn-Receipt-To: -iRead-Receipt-To: \ - -iAcknowledge-To: | $SENDMAIL $sendmailOPT $sendmailOPTp $listmaster - -:0: -request diff --git a/dev/cvslargo/listes-rules/defaults/rc.request b/dev/cvslargo/listes-rules/defaults/rc.request deleted file mode 100644 index b8957dc4..00000000 --- a/dev/cvslargo/listes-rules/defaults/rc.request +++ /dev/null @@ -1,348 +0,0 @@ -# BEFORE editing this file, you should make sure that it is not linked to -# the master version (../.etc/rc.request) anymore (i.e. "delink rc.request" -# if you do not want your changes to affect all lists). -# -# New mails can be temporarily stalled by creating the file rc.lock (either in -# ../.etc for all lists or in the current directory for this list only). - -#$Id: rc.request,v 1.1 2000/04/05 15:09:45 czo Exp $ - -INCLUDERC=$RC_INIT -INCLUDERC=$RC_CUSTOM - -INCLUDERC=$RC_LOCAL_REQUEST_00 - -LOCKFILE=tmp.lock # for reusing tmp.(request|from) - # also makes sure that the load doesn't go sky-high - # when a lot of mail arrives concurrently - -:0 Bfw # concatenate header and body -* $^^$X_COMMAND: -| sed -e '1,/^$/{' -e '/^$/d' -e '}' - -# -# We now check: -# If the length is roughly within bounds. -# That it is not a reply or something. -# That we didn't send it ourselves. -# That it wasn't sent by a daemon of some kind. -# -# If everything matches, we extract the sender address into tmp.from -# - -:0 -* B ?? < 4096 -* $$daemon_bias -* $!^(X-(Loop: $\listaddr|Diagnostic:)|$X_COMMAND:) -* -100^0 ^FROM_DAEMON -* 1^0 -{ - -:0 -* -100^0 ^Subject:(.*[^a-z])?(Re:|erro|change|problem|((can)?not|.*n't)\>) -* 100^0 B ?? ^^([ ]|$)*\ - ((archives?:?($|[ ]+)|\ - ((un)subscribe|(send|get)(me)?|gimme|retrieve|mail|ls|dir(ectory)?|\ - list|show|search|[fe]?grep|find|maxfiles|version|help|info)\ - ([ ].*)?$)([ ]|$)*)+\ - ([^ a-z].*$(.*$(.*$(.*$(.*$)?)?)?)?)?^^ -* 100^0 ^Subject:[ ]*archive -* 1^0 -{ - :0 whc - | formail -rtzc -xTo: >tmp.from - -# -# Store the whole mail in tmp.request, for later reference. -# - - :0 wc - | formail -IIn-Reply-To: -ICc: >tmp.request - -# -# Check for a missing Subject: line. -# - - :0 wfh - * !^Subject: - | formail -a "Subject: " - - INCLUDERC=$RC_LOCAL_REQUEST_10 - -############################################################################### -# Reader beware, the following four regular expressions are not for the faint # -# of heart. It'll suffice to say that they accomplish their intended job 98% # -# of the time. # -############################################################################### - -# -# Is it an archive retrieval command? -# - - :0 HB w - * 9876543210^0 ^^(.+$)*Subject:[ ]*(([(<]no(ne| subject\ - ( (\(file transmission|given))?)[>)])?\ - $(.+$)*(^[ ]*)+)?(archives?:?([ ]|$)|\ - ((send|get)(me)?|gimme|retrieve|mail|ls|dir(ectory)?|list|show|\ - search|[fe]?grep|find|maxfiles|version)([ ]+[^ ]*)?$) - * 1^0 B ?? ^^([ ]|$)*\ - ((archives?:?($|[ ]+)|\ - ((send|get)(me)?|gimme|retrieve|mail|ls|dir(ectory)?|\ - list|show|search|[fe]?grep|find|maxfiles|version|help|info)\ - ([ ].*)?$)([ ]|$)*)+\ - ([^ a-z].*$(.*$(.*$(.*$(.*$)?)?)?)?)?^^ - { - :0 W - * 9876543210^0 !restrict_archive ?? y - * 2^0 ? formail -rt -R To: "From " -X "From " | \ - multigram -b1 -m -l$submit_threshold -L$domain \ - -x$listaddr -x$listreq accept accept2 - | arch_retrieve - - :0 E fhw - | formail -A "X-Diagnostic: Not on the accept list" - } - -# -# Is it an unsubscription request? -# - - :0 EHB - * 9876543210^0 ^^(.+$)*Subject:[ ]*([(<]no(ne| subject\ - ( (\(file transmission|given))?)[>)])?(\ - ($(.+$)*(^[ ]*)+((.+|$)+[,.:;]([ ]+|$)+)?)?\ - (Could you )?(please )?\ - (sign( [^ ]+ |-)?off|cancel|leave|delete|remove|(un|de)-?sub)\>|\ - ($(.+$)*$(.*$)*)?(.*[^a-z])?\ - ((un-?|(un|de)-?sub?)s(cr|c|r)i|\ - (leave|(delete|remove) .* from|(sign|take|get) .* off) .* [a-z-]*list\>)) - * 1^0 B ?? ^^([ ]|$)*unsub(scribe)?([ ].*)?([ ]|$)*\ - [^ a-z]?^^ - { - :0 fw:dist.lock - * auto_unsubscribe ?? y - | unsubscribe - - :0 Aw ${cc_unsubrequests:+c} - | $SENDMAIL $sendmailOPT `cat tmp.from` ; - - :0 Afhw - | formail -A "X-Diagnostic: Processed" - } - - -# -# Is it a subscription request? -# - - :0 EHB - * 9876543210^0 ^^(.+$)*Subject:[ ]*([(<]no(ne| subject\ - ( (\(file transmission|given))?)[>)])?(\ - ($(.+$)*(^[ ]*)+((.+|$)+[,.:;]([ ]+|$)+)?)?\ - (Could you )?(please )?\ - (sign( [^ ]+ |-)?on|add|join|sub)\>|\ - ($(.+$)*$(.*$)*)?(.*[^a-z])?\ - (sub?s(cr|c|r)i.*|(join|add .* to|(sign|put) .* on) .* [a-z-]*list\>)) - * 1^0 B ?? ^^([ ]|$)*sub(scribe)?([ ].*)?([ ]|$)*\ - [^ a-z]?^^ - { - # - # Yes, well, then check if the person subscribing isn't on the reject - # list. - # - - :0 HB wfh - * ? multigram -b1 -l$reject_threshold reject - | formail -A "X-Diagnostic: Found on the reject list" \ - -A "X-Diagnostic: `multigram -b1 -l$reject_threshold reject`" - - # - # If not, then let's see if he might already be on the - # mailinglist. - # - - :0 E HB wfh - * ? formail -IReceived: -IX-Envelope-To: -IIn-Reply-To: -ICc: | \ - multigram -b1 -x$listreq -x$listaddr -l$reject_threshold dist - | formail -A "X-Diagnostic: Already on the subscriber list" \ - -A "X-Diagnostic: `multigram -b1 -x$listreq -x$listaddr \ - -l$reject_threshold dist`" - - # - # If not, add him(/her/it?). - # - - :0 E - * auto_subscribe ?? y - { - :0 W ${cc_requests:+c}:dist.lock - | subscribe - - :0 awfh - | formail -A "X-Diagnostic: Added to the subscriber list" - - :0 Ewfh - | formail -A "X-Diagnostic: Tried to subscribe" - } - } - -# -# Is it an info or help request? Send back the help.txt and the -# optional info.txt file. -# We do the same on a complete empty mail (except for perhaps a signature). -# - - :0 EHB - * 3^0 ^^(.+$)*Subject:[ ]*\ - (([(<]no(ne| subject( (\(file transmission|given))?)[>)])?$\ - (.+$)*(^[ ]*)+)?[a-z,. ]*(help|info(rmation)?)\> - * 1^0 ^^(.+$)*Subject:[ ]*\ - ([(<]no(ne| subject( (\(file transmission|given))?)[>)])?$ - * -2^0 ^^(.+$)*(^[ ]*)+[a-z] - * 3^0 ^^(.+$)*^([ ]*$)*-- - { - :0 hw ${cc_requests:+c} - | (formail -i"From: $listreq" -rtA"X-Loop: $listaddr"; \ - cat help.txt info.txt 2>/dev/null ) | $SENDMAIL $sendmailOPT -t - - :0 wfh - | formail -A "X-Diagnostic: help sent" - } - - INCLUDERC=$RC_LOCAL_REQUEST_20 - - LOGABSTRACT=yes - -# -# If auto_help is set, anything undecipherable gets back the help.txt and the -# optional info.txt file. -# - - :0 EB - * auto_help ?? y - * $!X-Loop: $\listaddr - { - :0 hw ${cc_requests:+c} - | (formail -i"From: $listreq" -rtA"X-Loop: $listaddr"; \ - cat help.txt info.txt 2>/dev/null ) | $SENDMAIL $sendmailOPT -t - - :0 wfh - | formail -A "X-Diagnostic: undecipherable, help sent" - } - -} -} - -LOGABSTRACT=yes - -# -# Could it be a bounce message from a daemon? Hand it down to procbounce -# which will evaluate it. -# - -:0 wic -* $!^(Subject:(.*[^a-z])?Re:|\ - X-(Loop: $\listaddr|Diagnostic:)|$X_COMMAND:) -* ^FROM_DAEMON -| sed -e $cutoff_bounce' q' >tmp.request - - # - # Sink all messages we can recognise to be queue warnings - # - - :0 Ah - * ^Subject: \ - (WARNING: message delayed|\ - (Returned mail: )?warning: c(an|ould )not send m(essage fo|ail afte)r|\ - Undeliverable (RFC822 )?mail: temporarily unable to deliver|\ - \*\*\* WARNING - Undelivered mail in mailqueue) - /dev/null - - :0 Ah - * ^Subject: (Warning from|mail warning| ?Waiting mail) - * ^(From|Sender):.*(uucp|mmdf) - /dev/null - - :0 AhBD - * $^(..?)?X-Loop: $\listaddr \(bounce\) - * ^(..?)?Subject: You have been removed from - /dev/null - - # - # Anything that still survived is most likely to be a bounce message. - # - - :0 Ahfw - | procbounce - -# -# Or is it a remote X-Command from our maintainer? -# - -:0 wf:dist.lock -* $^$X_COMMAND:.*$\maintainer[ ]*$\X_COMMAND_PASSWORD -* $!^X-Loop: $\listaddr -| x_command - -LOCKFILE # we don't need the lockfile anymore - -# -# Anything not taken care of yet will be served to the maintainer of the list. -# -# To make it easier on him, we include a small hint about what might be the -# problem (by adding X-Diagnostic: fields to the header). -# - -:0 wfh -* !< $size_limit -| formail -A "X-Diagnostic: Submission size exceeds $size_limit bytes" - -:0 wfh -* ^FROM_DAEMON -| formail -A "X-Diagnostic: Mail coming from a daemon, ignored" - -:0 HB wfh -* $^X-Loop: $\listaddr -| formail -A "X-Diagnostic: Possible loopback problem" - -:0 -* !^X-(Diagnostic|Processed): -{ - :0 wfh - * $^$X_COMMAND: - | formail -A "X-Diagnostic: Suspicious $X_COMMAND format" - - :0 HB wfh - * ? formail -IReceived: -IX-Envelope-To: -IIn-Reply-To: -ICc: | \ - multigram -b1 -x$listreq -x$listaddr -l$reject_threshold dist - | formail -A "X-Diagnostic: Already on the subscriber list" \ - -A "X-Diagnostic: `multigram -b1 -x$listreq -x$listaddr \ - -l$reject_threshold dist`" -} - -INCLUDERC=$RC_LOCAL_REQUEST_30 - -:0 wfh -* !^X-(Diagnostic|Processed): -| formail -A"X-Diagnostic: Unprocessed" - -:0 wfh -| formail -A"X-Envelope-To: $X_ENVELOPE_TO" - -# -# If this list does not have a maintainer e-mail address, drop things in -# the file request. -# - -:0: -* !maintainer ?? . -request - -:0 w -| formail -R"From X-From_:" -iDate: -iReturn-Receipt-To: -iRead-Receipt-To: \ - -iAcknowledge-To: | $SENDMAIL $sendmailOPT $sendmailOPTp $maintainer - -:0 wfh -| formail -A"X-Diagnostic: Maintainer $maintainer could not be reached" - -HOST=continue_with_../.etc/rc.post diff --git a/dev/cvslargo/listes-rules/defaults/rc.submit b/dev/cvslargo/listes-rules/defaults/rc.submit deleted file mode 100644 index 0022bc8b..00000000 --- a/dev/cvslargo/listes-rules/defaults/rc.submit +++ /dev/null @@ -1,289 +0,0 @@ -# BEFORE editing this file, you should make sure that it is not linked to -# the master version (../.etc/rc.submit) anymore (i.e. "delink rc.submit" -# if you do not want your changes to affect all archive servers). -# -# New mails can be temporarily stalled by creating the file rc.lock (either in -# ../.etc for all lists or in the current directory for this list only). - -#$Id: rc.submit,v 1.1 2000/04/05 15:09:45 czo Exp $ - -INCLUDERC=$RC_INIT -INCLUDERC=$RC_CUSTOM - -INCLUDERC=$RC_LOCAL_SUBMIT_00 - -# -# The following recipe makes sure that: -# The mail has a sane size (i.e. it is not inordinately big) -# It does not look like an administrative request. -# It wasn't sent by this list itself. -# It wasn't sent by a daemon (misdirected bounce message perhaps). -# - -:0 -* < $size_limit -* !$^($X_COMMAND:|X-Loop: $\listaddr) -* ! B ?? $^^$X_COMMAND: -* $$daemon_bias -* -100^0 ^FROM_MAILER|\ - ^(((Resent-)?(From|Sender)|X-Envelope-From):|>?From )\ - ([^>]*[^(.%@a-z0-9])?(\ - LIST(SERV|proc)|NETSERV|bounce|autoanswer|echo|mirror\ - )(([^).!:a-z0-9][-_a-z0-9]*)?[%@> ][^<)]*(\(.*\).*)?)?$([^>]|$) -* 1^0 -{ - -:0 -* B ?? >640 -* 9876543210^0 -{ } - -# -# Does it look like a regular submission? -# Or perhaps more like an administrative request? -# Look at the start of the body, and see if this could be an administrative -# request, pass it on to rc.request in that case. -# - -:0 -* $$=^0 -* 9876543210^0 !divertcheck ?? y -{ } - -:0 -* $$=^0 -* !B ?? ^^(.*$(.*$(.*$(.*$(.*$(.*$(.*$(.*$)?)?)?)?)?)?)?)?[^]>} a-z0-9] -* 9876543210^0 B ?? ^^.*$.*$.*$.*$.*$.*$.*$.*$.*$ -{ } - -:0 -* $$=^0 -* $${maintainer:+9876543210^0 ^From[: ](.*\<)?$\maintainer\>} -* 9876543210^0 ^(Subject:(.*\<)?(Re:|magazine)\>)|X-(Diagnostic|Mailing-List): -* -25^0 ^\ - Subject:([ ]*(archives?:?([ ]+(\ - (send|get)(me)?|gimme|retrieve|mail|ls|dir(ectory)?|\ - list|show|search|[fe]?grep|find|maxfiles|version|help|info)\ - ([ ]|$)|[ ]*$)|\ - help|info|join|leave|\ - (Could you )?(please )?\ - (cancel(( my)? subscription)?|add|\ - sign( [^ ]+ |-)?o(n|ff)|(un|de)?-?sub)[ ]*$)|\ - .*( (join|leave|add .* to|(delete|remove) .* from|\ - (take|sign|get) .* off|(put|sign) .* on) .* [a-z-]*list|\ - (un-?|sub?)s(cr|c|r)i(be|ption))\>) -* -50^0 ^Subject:[ ]*[(<]no(ne| subject\ - ( (\(file transmission|given))?)[>)]$ -* 50^0 ^Subject:.*[a-z] -* -100^0 B ?? ^^([ ]|$)*\ - ((((archives?:?($|[ ]+)|\ - ((send|get)(me)?|gimme|retrieve|mail|ls|dir(ectory)?|\ - list|show|search|[fe]?grep|find|maxfiles|version|help|info)\ - ([ ].*)?$)([ ]|$)*)+\ - ([^ a-z].*$(.*$(.*$(.*$(.*$)?)?)?)?)?^^|\ - (help|info)[ ]*$|\ - (add|join|leave|sign( [^ ]+ |-)?o(n|ff)|(un|de)?-?sub)\>)|\ - ([^ a-z].*$(.*$(.*$(.*$(.*$)?)?)?)?)?^^|\ - .*( (join|leave|add .* to|(delete|remove) .* from|\ - (take|sign|get) .* off|(put|sign) .* on) .* [a-z-]*list|\ - (un-?|sub?)scri(be|ption))\>|\ - ^^) -{ - # - # Then check to see if the sender is on the accept list (if foreign_submit - # is not set). - # - - :0 - * 9876543210^0 foreign_submit ?? y - * 2^0 ? formail -X"From " -xFrom: -xReply-To: -xSender: -xResent-From: \ - -xResent-Reply-To: -xResent-Sender: -xReturn-Path: | \ - multigram -b1 -m -l$submit_threshold -L$domain \ - -x$listaddr -x$listreq accept accept2 - { - - INCLUDERC=$RC_LOCAL_SUBMIT_10 - - :0 - * moderated_flag ?? y - { - :0 Bfw # contract header and body - * ^^Approved:.*$^ - | sed -e '1,/^$/{' -e '/^$/d' -e '}' - - :0 - * !$^Approved:.*$moderator_PASSWORD - | formail -R"From X-Envelope-From:" -uDate: -iReturn-Receipt-To: \ - -iRead-Receipt-To: -iAcknowledge-To: | \ - $SENDMAIL $sendmailOPT `cat moderators` - - :0 fhw - | formail -IApproved: - } - - # - # Eliminate duplicate submissions by checking the Message-ID: field. - # - - :0 Wh :msgid.lock - | formail -q- -D $idcache_size msgid.cache - - # - # Check if we need to autosubscribe anyone not on the dist list. - # - - :0 - * force_subscribe ?? y - * !? if test y = "$moderated_flag" ;\ - then formail -xFrom: -xSender: -xReply-To: ;\ - else formail -X"From " -xFrom: -xReply-To: -xSender: -xResent-From: \ - -xResent-Reply-To: -xResent-Sender: -xReturn-Path: ;\ - fi | multigram -b1 -m -l$submit_threshold -L$domain \ - -x$listaddr -x$listreq dist - { - - # - # Yes, well, then check if the person isn't on the reject list. - # - - :0 - * ? multigram -b1 -l$reject_threshold reject - { - :0 wfh - | formail -A "X-Diagnostic: Found on the reject list" \ - -A "X-Diagnostic: `multigram -b1 -l$reject_threshold reject`" - - HOST=continue_with_rc.request - } - - LOCKFILE=tmp.lock - - :0 whc - | formail -rtzc -xTo: >tmp.from - - :0 Wc :dist.lock - | sed -e '/^$/,/^-- $/ d' | formail -I "Subject: auto subscribe" \ - >tmp.request; subscribe >$subscribe_log - - LOCKFILE - } - - # - # Check if this is a digested mailinglist. If yes, processing stops - # here and the mail will be added to the digest. - # - - :0 - * digest_flag ?? y - { - # - # Forward the article back to the undigested list, if it hasn't - # come from there. - # - - :0 c - * undigested_list ?? y - * $!^X-Loop: $\undigested_list - ! $sendmailOPT $undigested_list - - # - # Finally digest the mail. - # - - :0 w :tmp.lock - | digest - } - - ARCHIVE # Wipe ARCHIVE from the environment - - # - # Check if we are the first mailinglist to distribute this message, if so - # archive the message. - # - - :0 - * archive_hist ?? [1-9] - * !^X-Mailing-List: - { - :0 c - archive/latest/. - - ARCHIVE=$LASTFOLDER # Remember where it was archived - - # - # Truncate the archive to the correct number of files (and - # possibly other housekeeping chores to keep the archive - # current). - # - - :0 c hi - | arch_trunc - } - - # - # Main header munger for submissions passing through this list. - # - - oldshellmetas="$SHELLMETAS" SHELLMETAS # Save a shell, procmail can - # do this one by itself. - :0 wfh - | formail -b -IFrom\ -IReceived: -IReturn-Receipt-To: -IErrors-To: \ - -IX-Pmrqc: -IX-Confirm-Reading-To: -IX-Ack: -IAcknowledge-To: \ - -IRead-Receipt-To: -IReturn-Receipt-Requested: -IX-Diagnostic: \ - -iStatus: -iReturn-Path: -iX-Envelope-To: -iX-Envelope-From: \ - -I"Precedence: list" -I"Resent-Sender: $listreq" \ - -uDate: -aMessage-ID: -aResent-Message-ID: \ - -a"To: $listaddr" -a"Resent-From: $listaddr" -A"X-Loop: $listaddr" \ - -a"Subject: Unidentified subject!" ${reply_to:+"-a$reply_to"} \ - -a"X-Mailing-List: <$listaddr> $ARCHIVE" - - SHELLMETAS="$oldshellmetas" oldshellmetas - - INCLUDERC=$RC_LOCAL_SUBMIT_20 - - # - # The following recipe will distribute the message to the subscribers - # using the native $SENDMAIL, but only if you disabled the alternative - # sendmail (choplist). - # - - :0 w: dist.lock - * !alt_sendmail ?? . - ! $sendmailOPT $listdist - - # - # Alternate sendmail call (used by default), does not use the file- - # including -dist alias. - # - - :0 Ew: dist.lock - | $alt_sendmail $SENDMAIL $sendmailOPT $sendmailOPTi - - :0 wfh - | formail -A "X-Diagnostic: $SENDMAIL $listdist failed" - - HOST=continue_with_rc.request - } - - :0 E wfh - | formail -A "X-Diagnostic: Not on the accept list" - - :0 A c - * ? test -f accept.txt - { - :0 fh - | formail -i"From: $listreq" -kbrtA"X-Loop: $listaddr" ; cat accept.txt - - :0 - ! $sendmailOPT -t - } - -} } - -:0 fhw -* pass_diverts ?? y -* !^X-Diagnostic: -| formail -A "X-Diagnostic: Diverted & unprocessed" - -HOST=continue_with_rc.request diff --git a/dev/cvslargo/listes-rules/help/rc.custom b/dev/cvslargo/listes-rules/help/rc.custom deleted file mode 100644 index e3272357..00000000 --- a/dev/cvslargo/listes-rules/help/rc.custom +++ /dev/null @@ -1,119 +0,0 @@ -# -# Assign the fully qualified mail address of the maintainer of this list -# to "maintainer". If empty, request-mail will not be mailed to any -# maintainer and will be stored in the "request" file for this list. -# - -maintainer = Olivier.Sirol@lip6.fr - -#LOGABSTRACT=yes # uncomment in case of emergency -#VERBOSE=yes # uncomment in case of real emergency - -size_limit = 1524288 # sanity cutoff value for submissions - -idcache_size = 8192 # duplicate-msgid cache size in bytes - -archive_hist = 20 # number of messages left archived -#archive_log = $LOGFILE # log file for archive retrievals -#subscribe_log = $LOGFILE # log file for administrivia - -#maxhist = 32 # bounce history limit -#minbounce = 4 # no. of bounces before removal -#cutoff_bounce = 256 # lines to keep in bounce processing - -#match_threshold= 30730 # for close matches to the list -#medium_threshold= 28672 # for not so close matches to the list -#loose_threshold= 24476 # for loosely finding your name - -#auto_off_threshold= $medium_threshold # for auto-unsubscribing bouncers -#off_threshold = $loose_threshold # for unsubscribing -#reject_threshold= $match_threshold # for rejecting subscriptions -#submit_threshold= $medium_threshold # for permitting submissions - -#unsub_assist -unsub_assist = 8 # uncomment (and change perhaps) this - # line to enable unsubscription - # assistance; it specifies the no. of - # multigram matches an unsuccessful - # unsubscriber will receive back -#foreign_submit = yes -##foreign_submit # uncomment this line if you - # want to restrict submitting to - # people on the accept list -#restrict_archive -##restrict_archive= yes # uncomment this line if you - # want to restrict archive retrievals - # to people on the accept list -#force_subscribe -force_subscribe= yes # uncomment to cause people to - # be autosubscribed upon first - # submission to the list -#auto_unsubscribe= yes -##auto_unsubscribe # uncomment to disable unattended - # unsubscription handling -#auto_subscribe = yes -##auto_subscribe # uncomment to disable unattended - # subscription handling -#auto_help -auto_help = yes # uncomment to enable default help - # responses to all undecipherable - # requests -#moderated_flag -##moderated_flag= yes # uncomment this to make the list - # moderated (you must create a - # `moderators' file for this to work) - # set moderator_PASSWORD to get - # stricter checking -#cc_requests -##cc_requests = yes # uncomment if you want subscribe - # and help requests to be Cc'd to - # the maintainer -#cc_unsubrequests -##cc_unsubrequests= yes # uncomment if you want unsubscribe - # requests to be Cc'd to the maintainer -#divertcheck = yes -##divertcheck # uncomment to disable the check for - # misfiled administrative requests -#pass_diverts -##pass_diverts = yes # uncomment to pass on administrative - # requests diverted from the normal - # list to the maintainer unprocessed - # (instead of trying to handle them) -#reply_to -##reply_to = "Resent-Reply-To: $listaddr" # uncomment (and perhaps change - # it to "Reply-To") to force replies - # to go to the list (discouraged) - # why discouraged? see: - # http://garcon.unicom.com/FAQ/reply-to-harmful.html -#digest_flag -##digest_flag = yes # uncomment this if you want digests -#digest_age = 262144 # maximum age of a digest in seconds -#digest_size = 32768 # maximum size of a digest in bytes -#undigested_list = $list@$domain # Reply-To: address for digests - -#moderator_PASSWORD = # put the optional password for - # moderators here, this definition - # can contain regular expression magic - # characters (to support multiple - # passwords) - -X_COMMAND = X-Command -X_COMMAND_PASSWORD = alcpass # put the literal password for - # X-Command mails here - -#daemon_bias='100^0 ^From:.*daemon@ok' # You could set "daemon_bias" to - # positively discriminate some - # mail address not to be from a daemon. Either with a regexp as demonstrated - # or with more complicated recipes that simply set it to '100^0' or nothing. - -#RC_LOCAL_SUBMIT_00 = rc.local.s00 # Uncomment (and change) these to -#RC_LOCAL_SUBMIT_10 = rc.local.s10 # call up customised local scripts -#RC_LOCAL_SUBMIT_20 = rc.local.s20 # at predefined points. -#RC_LOCAL_REQUEST_00 = rc.local.r00 -#RC_LOCAL_REQUEST_10 = rc.local.r10 -#RC_LOCAL_REQUEST_20 = rc.local.r20 -#RC_LOCAL_REQUEST_30 = rc.local.r30 - -RC_CUSTOM # clear this one from the environment - # so that we include this file only - # once diff --git a/dev/cvslargo/listes-rules/hyp b/dev/cvslargo/listes-rules/hyp deleted file mode 100755 index 4a8959a3..00000000 --- a/dev/cvslargo/listes-rules/hyp +++ /dev/null @@ -1,10 +0,0 @@ -#! /bin/sh - -YEAR_YY=`date +%y` -YEAR_YYYY=`date +%Y` -MAILL=$1 - -cd /users/largo2/webmastr/wwwroot/mailing-lists - -/usr/local/bin/hypermail -c /users/largo1/czo/cvslargo/listes-rules/hypermail/.hmrc -p -i -u -x -l "${MAILL} '${YEAR_YY}" -d "${MAILL}/${YEAR_YYYY}" - diff --git a/dev/cvslargo/listes-rules/hypermail/.hmrc b/dev/cvslargo/listes-rules/hypermail/.hmrc deleted file mode 100644 index fbcde4bb..00000000 --- a/dev/cvslargo/listes-rules/hypermail/.hmrc +++ /dev/null @@ -1,323 +0,0 @@ -# -# hmrc.example: -# -# This is a sample Hypermail configuration file. If you wish -# to use it, copy it to a new filename and edit as appropriate -# for you list needs. -# - -# hm_mbox = [ filename | NONE ] -# -# This is the default mailbox to read messages in from. Set this -# with a value of NONE to read from standard input as the default. - -hm_mbox = NONE - -# hm_label = [ Title | NONE ] -# -# This is the default title you want to call your archives. -# Set this to NONE to use the name of the input mailbox. - -hm_label = NONE - -# hm_archives = [ URL | NONE ] -# -# This creates a link in the archived index pages labeled -# "Other mail archives". Set this to NONE to omit such a link. - -hm_archives = NONE - -# hm_about = [ URL | NONE ] -# -# This creates a link in the archived index pages labeled -# "About this archive". Set this to NONE to omit such a link. - -hm_about = NONE - -# hm_dir = [ directory path | NONE ] -# -# This is the default directory that Hypermail uses when creating -# and updating archives. If set to NONE, the directory will have the -# same name as the input mailbox. - -hm_dir = NONE - -# hm_defaultindex = [ thread | date | subject | author ] -# -# This indicates the default type of main index hypermail will generate. -# Users see this type of index when the archive is first accessed. - -hm_defaultindex = thread - -# hm_reverse = [ 0 | 1 ] -# -# Setting this variable to 1 will reverse-sort the article -# entries in the date and thread index files by the date they -# were received. That is, the most recent messages will appear -# at the top of the index rather than the other way around. -# Set to 0 if you want latest message on the bottom for date and -# thread indexes. - -hm_reverse = 1 - -# hm_usetable = [ 0 | 1 ] -# -# Setting this variable to 1 will tell Hypermail to generate an -# index menu at the top and bottom of each page in a table format. -# Set to 0 if you want the standard Hypermail page look and feel. - -hm_usetable = 0 - -# hm_showprogress = [ 0 | 1 ] -# -# Set to 1 to show progress as Hypermail works. Set to 0 for silent -# operation. Output goes to standard output. - -hm_showprogress = 1 - -# hm_show_msg_links = [ 0 | 1 ] -# -# Set this to 1 if you want links to Next, Prev, Next thread, Reply to, -# etc, displayed on the article pages. Setting this to 0 disables these -# links from appearing on the generated pages. - -hm_show_msg_links = 1 - -# hm_showheaders = [ 0 | 1 ] -# -# Set this to 1 to show the RFC 822 message headers To:, -# From:, and Subject: information found in the email messages. -# Set to 0 if you want to hide mail headers in articles. - -hm_showheaders = 0 - -# hm_showreplies = [ 0 | 1 ] -# -# Set to 1 to show all replies to a message as links in article files. -# If this is set to 0 no reply links are generated. - -hm_showreplies = 1 - -# hm_showhtml = [ 0 | 1 ] -# -# Set this to 1 to show the articles in a proportionally-spaced -# font rather than a fixed-width (monospace) font. Setting this -# option to 1 also tells Hypermail to attempt to italicize quoted -# passages in articles. - -hm_showhtml = 0 - -# hm_showbr = [ 0 | 1 ] -# -# Set this to 1 if you want article lines to end with the
tag. -# Else set to 0 to have non-quoted lines word-wrap. Only takes effect -# if hm_showhtml is set to 1. - -hm_showbr = 0 - -# hm_iquotes = [ 0 | 1 ] -# -# Set this to 1 if you want quoted lines to be shown in italics. Only -# take effect if hm_showhtml is set to 1. - -hm_iquotes = 1 - -# hm_showhr = [ 0 | 1 ] -# -# Set to 1 if you want horizontal rules
before and after -# the articles. Set to 0 if you don't. - -hm_showhr = 0 - -# hm_overwrite = [ 0 | 1 ] -# -# Set to 1 to make Hypermail overwrite existing archives by default. - -hm_overwrite = 0 - -# hm_increment = [ 0 | 1 ] -# -# Define as 1 to read in one article only and update existing archives. -# Define as 0 for it to read and process entire mailboxes. - -hm_increment = 1 - -# hm_thrdlevels = number -# -# This specifies the number of thread levels to outline in the thread -# index. For instance, if hm_thrdlevels is 2, replies to messages will -# be indented once in the index, but replies to replies, etc., will only -# be indented once as well. The normal value is 2. - -hm_thrdlevels = 2 - -# hm_eurodate = [ 0 | 1 ] -# -# Set this to reflect how you want dates displayed in the index files. -# Set as 1 to to use European date format "DD MM YYYY". -# Define as 0 to to use American date format "MM DD YYYY". - -hm_eurodate = 1 - -# hm_dirmode = octal number -# -# This is an octal number representing the rwx modes that new directories -# are set to when they are created. If the archives will be made publically -# available, it's a good idea to define this as 0755. This must be an octal -# number. - -hm_dirmode = 0755 - -# hm_filemode = octal number -# -# This is an octal number representing the permission modes that new files -# are set to when they are created. If the archives will be made publically -# available, it's a good idea to define this as 0644. This must be an octal -# number. - -hm_filemode = 0644 - -# hm_mailcommand = [ direct mailto | cgi-bin script path | NONE ] -# -# This is the mail command that email links go to, for instance -# "mailto:$TO" or "/cgi-bin/mail?to=$TO&replyto=$ID&subject=$SUBJECT" -# -# In constructing this command, you can specify variables: -# -# $TO : the email address of the person you're sending mail to. -# $ID : the ID of the message you're replying to. -# $SUBJECT: the subject you're replying to. -# -# NONE disables mailcommand usage. - -hm_mailcommand = mailto:$TO?subject=$SUBJECT - -# hm_mailto = [ email-address | NONE ] -# -# The address of the contact point that is put in the HTML header line -# -# -# The header can be disabled by default by setting -# mailto to NONE. - -hm_mailto = czo@asim.lip6.fr - -# hm_domainaddr = [ domainname | NONE ] -# -# Domain-ize Addresses -- addresses appearing in the RFC822 field -# which lack hostname can't be made into proper HREFs. Because the -# MTA resides on the same host as the list, it is often not required -# to domain-ize these addresses for delivery. In such cases, hypermail -# will add the DOMAINADDR to the email address. - -hm_domainaddr = asim.lip6.fr - -# hm_body = [ HTML statement | NONE ] -# -# Set this to the line to use when generating the HTML pages. -# Set to "NONE" to use the builtin line by default. - -#hm_body = -hm_body = NONE - -# hm_hmail = [ Mailing List Submission Address | NONE ] -# -# Set this to the list's submission address. When enabled, this can be -# used to submit a new message to the list served by the hypermail archive. -# "NONE" means don't use it. - -hm_hmail = NONE - -# hm_ihtmlheader = [ path to index header template file | NONE ] -# -# Set this to the path to the Index header template file. The template -# file contains HTML directives and substitution cookies for runtime -# expansion. - -hm_ihtmlheaderfile = "/users/largo1/czo/cvslargo/listes-rules/hypermail/hypermail-index.hyp" - - -# hm_ihtmlfooter = [ path to index footer template file | NONE ] -# -# Set this to the path to the Index footer template file. The template -# file contains HTML directives and substitution cookies for runtime -# expansion. - -hm_ihtmlfooterfile = "/users/largo1/czo/cvslargo/listes-rules/hypermail/hypermail-footer.hyp" - -# hm_mhtmlheader = [ path to message header template file | NONE ] -# -# Set this to the path to the Message header template file. The template -# file contains HTML directives and substitution cookies for runtime -# expansion. - -hm_mhtmlheaderfile = "/users/largo1/czo/cvslargo/listes-rules/hypermail/hypermail-msg.hyp" - -# hm_mhtmlfooter = [ path to message footer template file | NONE ] -# -# Set this to the path to the Message footer template file. The template -# file contains HTML directives and substitution cookies for runtime -# expansion. - -hm_mhtmlfooterfile = "/users/largo1/czo/cvslargo/listes-rules/hypermail/hypermail-footer.hyp" - -###################### -# Multiline variables -###################### - -# hm_show_headers = list of RFC 822 Headers to display if hm_showheaders -# is set to 1 (TRUE) -# -# This is the list of headers to be displayed. They can be listed -# comma or space separated all on a single line such as -# hm_show_headers = From,Subject,Date,Message-ID -# or they can be listed individually or any combination of. -# hm_show_headers = From -# hm_show_headers = Subject -# hm_show_headers = Date -# hm_show_headers = Message-ID - -hm_show_headers = From,Subject,Date,Message-ID - -# hm_inline_types = indicate which types of data should be inlined -# -# This is the list of MIME types that you want inlined as opposed to -# simply linked into the message. They can be listed individually on -# multiple lines or comma or space separated on a single line. -# hm_inline_types = image/gif image/jpeg -# or -# hm_inline_types = image/gif -# hm_inline_types = image/jpeg - -hm_inline_types = image/gif image/jpeg - -# hm_ignore_types = indicate which types of attachments to ignore and -# not process. -# -# This is the list of MIME attachment types that you do not want to -# do anything with. They are quietly ignored. They can be listed -# individually on multiple lines or comma or space separated on a -# single line. -# hm_ignore_types = text/x-vcard application/x-msdownload -# or -# hm_ignore_types = text/x-vcard -# hm_ignore_types = application/x-msdownload - -hm_ignore_types = text/x-vcard -hm_ignore_types = application/x-msdownload - -# hm_prefered_types = indicate which of the alternative types to use -# -# This is the list of alternative MIME types that you want used when -# displaying the data. This can be listed individually on multiple -# lines or comma or space separated on a single line. -# hm_prefered_types = text/plain text/html -# or -# hm_prefered_types = text/plain -# hm_prefered_types = text/html -# Order is important. -# -# NOTE: This option is not fully implemented at present. - -hm_prefered_types = text/plain text/html - diff --git a/dev/cvslargo/listes-rules/hypermail/hypermail-footer.hyp b/dev/cvslargo/listes-rules/hypermail/hypermail-footer.hyp deleted file mode 100644 index 217a54e7..00000000 --- a/dev/cvslargo/listes-rules/hypermail/hypermail-footer.hyp +++ /dev/null @@ -1,10 +0,0 @@ - -

---------

- - - - diff --git a/dev/cvslargo/listes-rules/hypermail/hypermail-index.hyp b/dev/cvslargo/listes-rules/hypermail/hypermail-index.hyp deleted file mode 100644 index 8d006c60..00000000 --- a/dev/cvslargo/listes-rules/hypermail/hypermail-index.hyp +++ /dev/null @@ -1,15 +0,0 @@ - - - - - -%l: %s - - - - - - -

%l
%s

-

---------

-
diff --git a/dev/cvslargo/listes-rules/hypermail/hypermail-msg.hyp b/dev/cvslargo/listes-rules/hypermail/hypermail-msg.hyp deleted file mode 100644 index 2421e5a2..00000000 --- a/dev/cvslargo/listes-rules/hypermail/hypermail-msg.hyp +++ /dev/null @@ -1,20 +0,0 @@ - - - - - -%A -%S -%l: %s - - - - - - - -

%l
%s

-

---------

- -
- diff --git a/dev/cvslargo/listes-rules/hypreset b/dev/cvslargo/listes-rules/hypreset deleted file mode 100755 index 20cb4067..00000000 --- a/dev/cvslargo/listes-rules/hypreset +++ /dev/null @@ -1,58 +0,0 @@ -#! /bin/sh -# -# Author : Olivier.Sirol@lip6.fr -# Date : fev 1999 -# Description : -# -# (C) Czo 1998,99 -# This code is released under GPL -# -# $Id: hypreset,v 1.2 2000/06/06 15:34:00 czo Exp $ -# - -PATH=/asim/gnu/bin:/usr/ucb:/usr/etc:/bin:/usr/local/bin:${PATH} -TMPWORKDIR=/tmp/hypczo -WML=/users/largo2/webmastr/wwwroot/mailing-lists -LOCK=/usr/local/listes/.etc/rc.lock -HMRC=/users/largo1/czo/cvslargo/listes-rules/hypermail/.hmrc -SPLIT=/users/largo1/czo/cvslargo/listes-rules - -#lock -touch $LOCK - -rm -fr "$TMPWORKDIR" -cd $WML - -echo "--> Sleep 5 sec and check..." -sleep 5 -RES=`ps auxww | grep "hypermail" | grep -v grep` -if [ "$?" -eq 0 ] -then - echo "ERROR: hypermail running" -else - echo "--> generating..." - -#for MBOX in alliance-support -for MBOX in alliance-programmers alliance-support alliance-users archi help -do - echo "--> $MBOX..." - mkdir -p "$TMPWORKDIR" - cd "$WML/$MBOX" - find . -type d -maxdepth 1 -mindepth 1 | xargs rm -fr dummy - -cat "$WML/$MBOX/$MBOX.mbox" | formail -s $SPLIT/splitmailbyyear - -echo %%%%%%%%%%%%%%%%%%% -for YEARBOX in `find /tmp/hypczo -type f -printf "%P\n"` -do -echo $YEARBOX -/usr/local/bin/hypermail -c $HMRC -p -x -l "$MBOX '$YEARBOX" -d "$WML/$MBOX/$YEARBOX" -m "/tmp/hypczo/$YEARBOX" -done -rm -fr "$TMPWORKDIR" - -done -fi - -rm -f $LOCK - - diff --git a/dev/cvslargo/listes-rules/splitmailbyyear b/dev/cvslargo/listes-rules/splitmailbyyear deleted file mode 100755 index 91dbce14..00000000 --- a/dev/cvslargo/listes-rules/splitmailbyyear +++ /dev/null @@ -1,18 +0,0 @@ -#! /bin/sh - -gawk ' -BEGIN {FIRST=1;} -{ -if (FIRST) -{ -FIRST=0; -# ca cest du bug... -if ( $0 ~ /no email/ ) - gsub(/\(no email\)/,"NOMAIL"); - -YEAR=$7; -if (YEAR<1990) {YEAR=2000} -} - - print $0 >> "/tmp/hypczo/"YEAR ; -}' diff --git a/dev/cvslargo/www/cgi-bin/czo/.swisherc.alliance b/dev/cvslargo/www/cgi-bin/czo/.swisherc.alliance deleted file mode 100644 index 22b4727a..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/.swisherc.alliance +++ /dev/null @@ -1,231 +0,0 @@ -# swish-e configuration file -# -# Filename: .swisherc.alliance -# Copyright (C) 1999, 2000 Czo -# License: GPL (http://www.gnu.org/copyleft/gpl.html) -# Started: April 2000 -# Last Change: Friday 12 May 2000, 14:59 -# Edit Time: 0:15:08 -# Description: swish-e -c /users/largo1/czo/cvslargo/www/cgi-bin/czo/.swisherc.alliance -# -# $Id: .swisherc.alliance,v 1.1 2000/06/06 16:50:13 czo Exp $ -# - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### - - -IndexDir /users/largo2/webmastr/wwwroot/slash/alliance - -IndexFile /users/largo1/czo/cvslargo/www/cgi-bin/czo/alliance.dat - -ReplaceRules replace "/users/largo2/webmastr/wwwroot/slash" "http://www-asim.lip6.fr" - -IndexName "Asim Lab. index" -IndexDescription "Index by Czo" -IndexPointer "http://www-asim.lip6.fr/" -IndexAdmin "Czo [Olivier SIROL] " - - -# YOU SHOULD NOT CHANGE BELOW. Czo. -####################################################### - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### -# WINDOWS USERS NOTE: -# Specify ALL files and directory paths in the -# the config file using the forward slash, as -# in /thisdirectory. -# -################################################### - -# IndexDir http://www.lib.berkeley.edu/~ghill/spider.html -# For the FileSystem Method: -# This is a space-separated list of files and -# directories you want indexed. You can specify -# more than one of these directives. -# -# For the HTTP Method: -# Use the URL's from which you want the spidering -# to begin. -# NOTE: use hmtl files rather than directories -# for this method. - -# IndexFile /home/ghill/swishRon/dir1/myindex1 -# This is what the generated index file will be. - -# IndexName "Improvement index" -# IndexDescription "This is an index to test bug fixes in swish." -# IndexPointer "http://sunsite/~ghill/swish/index.html" -# IndexAdmin "Giulia Hill, (ghill@library.berkeley.edu)" -# Extra information you can include in the index file. - -MetaNames first author -# List of all the meta names used in the file to index, must be on one line. -# If no metanames DO NOT deleted the line. - -IndexReport 3 -# This is how detailed you want reporting. You can specify numbers -# 0 to 3 - 0 is totally silent, 3 is the most verbose. - -FollowSymLinks no -# Put "yes" to follow symbolic links in indexing, else "no". - -#UseStemming no -# Put yes to apply word stemming algorithm during indexing, -# else no. See the manual for info about stemming. Default is -# no. - -#PropertyNames author -# List of meta tags names that can be retrieved with the -p option. -# Index size increases as by the formula in the manual. -# Comment out if no PropertyNames. Case insensitive - -IgnoreTotalWordCountWhenRanking yes -# Put yes to ignore the total number of words in the file -# when calculating ranking. Often better with merges and -# small files. Default is no. - -#ReplaceRules remove "ghill/" -#ReplaceRules replace "[a-z_0-9]*_m.*\.html" "index.html" -#ReplaceRules replace "/ghill" "moreghillmore" -# ReplaceRules allow you to make changes to file pathnames -# before they're indexed. This directive uses C library -# regex.h regular expressions. -# NOTE: do not use replace "" to remove a string, -# use remove instead - you might get a core dump otherwise. - -MinWordLimit 2 -# Set the minimum length of an indexable word. Every shorter word -# will not be indexed. -# Commenting out the line will give the defaults - -#MaxWordLimit 5 -# Set the maximum length of an indexable word. Every longer word -# will not be indexed. -# Commenting out the line will give the defaults - -#WordCharacters abcdefghijklmnopqrstuvwxyz\&#;0123456789.@|,-'"[](~!@$%^{}_+? -# WORDCHARS is a string of characters which SWISH permits to -# be in words. Any strings which do not include these characters -# will not be indexed. You can choose from any character in -# the following string: -# -# abcdefghijklmnopqrstuvwxyz0123456789_\|/-+=?!@$%^'"`~,.[]{}() -# -# Note that if you omit "0123456789&#;" you will not be able to -# index HTML entities. DO NOT use the asterisk (*), lesser than -# and greater than signs (<), (>), or colon (:). -# -# Including any of these four characters may cause funny things to happen. -# NOTE: Do not escape \ nor " and they cannot be the first letter in the string -# Commenting out the line will give the defaults - -#BeginCharacters m" -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -#EndCharacters \"\ -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -# IgnoreLastChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the end. It is important to also -# set the given char's in the ENDCHARS array, otherwise the word will not -# be indexed because considered invalid. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -# IgnoreFirstChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the beginning. This was to solve -# the problem of parenthesis when there is no space between ( and the -# beginning of the word. -# Remember to add the char's to the BEGINCHARS list also. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -IgnoreLimit 50 1000 -# This automatically omits words that appear too often in the files -# (these words are called stopwords). Specify a whole percentage -# and a number, such as "80 256". This omits words that occur in -# over 80% of the files and appear in over 256 files. Comment out -# to turn of auto-stopwording. - -#IgnoreWords SwishDefault -# The IgnoreWords option allows you to specify words to ignore. -# Comment out for no stopwords; the word "SwishDefault" will -# include a list of default stopwords. Words should be separated by spaces -# and may span multiple directives. - -IndexComments 0 -# This option allows the user decide if to index the comments in the files -# default is 1. Set to 0 if comment indexing is not required. - -################################## -# DIRECTIVES for FILESYSTEMS ONLY -# Comment out if using HTTP -################################### - -#IndexOnly .html .q -# Only files with these suffixes will be indexed. - -NoContents .gif .xbm .au .mov .mpg .pdf .ps .jpg .jpeg -NoContents .gz .Z .tar .tgz .mbox .hqx .zip .ZIP .HQX .ARJ .arj .bin .dat -NoContents .exe -# Files with these suffixes will not have their contents indexed - -# only their file names will be indexed. - -FileRules pathname contains CVS RCS cgi-bin tmp -FileRules pathname contains .*dir1 -FileRules pathname contains private -FileRules filename contains % ~ .bak .orig .old old. # -#FileRules title contains construction example pointers -FileRules directory contains .htaccess -#FileRules filename is index -# Files matching the above criteria will *not* be indexed. -# The patter matching uses the C library regex.h - -################################ -# DIRECTIVES for HTTP METHOD ONLY -# Comment out if using FILESYSTEM -################################## - -#MaxDepth 15 -#(default 5) This defines how many links the spider should -#follow before stopping. A value of 0 configures the spider to -#traverse all links - -#Delay 60 -#(default 60) The number of seconds to wait between issuing -#requests to a server. - -#TmpDir /tmp/ -#(default /var/tmp) The location of a writeable temp directory -#on your system. The HTTP access method tells the Perl helper to place -#its files there. - -#SpiderDirectory ./ -#(default ./) The location of the Perl helper -#script. Remember, if you use a relative directory, it is relative to -#your directory when you run SWISH-E, not to the directory that SWISH-E -#is in. - -#EquivalentServer http://asim.lip6.fr http://www-asim.lip6.fr -# EquivalentServer http://sunsite.berkeley.edu:2000 http://sunsite.berkeley.edu -#(default nothing) This allows you to deal with -#servers that use respond to multiple DNS names. Each line should have -#a list of all the method/names that should be considered equivalent. -#If you have multiple directives, each one defines its own set of equivalent -#servers. - - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/.swisherc.allsite b/dev/cvslargo/www/cgi-bin/czo/.swisherc.allsite deleted file mode 100644 index 6572cf8c..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/.swisherc.allsite +++ /dev/null @@ -1,230 +0,0 @@ -# swish-e configuration file -# -# Filename: .swisherc.allsite -# Copyright (C) 1999, 2000 Czo -# License: GPL (http://www.gnu.org/copyleft/gpl.html) -# Started: April 2000 -# Last Change: Friday 12 May 2000, 15:30 -# Edit Time: 0:36:41 -# Description: swish-e -c /users/largo1/czo/cvslargo/www/cgi-bin/czo/.swisherc.alliance -# -# $Id: .swisherc.allsite,v 1.1 2000/06/06 16:50:13 czo Exp $ -# - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### - -IndexDir /users/largo2/webmastr/wwwroot/ - -IndexFile /users/largo1/czo/cvslargo/www/cgi-bin/czo/allsite.dat - -ReplaceRules replace "/users/largo2/webmastr/wwwroot" "http://www-asim.lip6.fr" - -IndexName "Asim Lab. index" -IndexDescription "Index by Czo" -IndexPointer "http://www-asim.lip6.fr/" -IndexAdmin "Czo [Olivier SIROL] " - - -# YOU SHOULD NOT CHANGE BELOW. Czo. -####################################################### - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### -# WINDOWS USERS NOTE: -# Specify ALL files and directory paths in the -# the config file using the forward slash, as -# in /thisdirectory. -# -################################################### - -# IndexDir http://www.lib.berkeley.edu/~ghill/spider.html -# For the FileSystem Method: -# This is a space-separated list of files and -# directories you want indexed. You can specify -# more than one of these directives. -# -# For the HTTP Method: -# Use the URL's from which you want the spidering -# to begin. -# NOTE: use hmtl files rather than directories -# for this method. - -# IndexFile /home/ghill/swishRon/dir1/myindex1 -# This is what the generated index file will be. - -# IndexName "Improvement index" -# IndexDescription "This is an index to test bug fixes in swish." -# IndexPointer "http://sunsite/~ghill/swish/index.html" -# IndexAdmin "Giulia Hill, (ghill@library.berkeley.edu)" -# Extra information you can include in the index file. - -MetaNames first author -# List of all the meta names used in the file to index, must be on one line. -# If no metanames DO NOT deleted the line. - -IndexReport 3 -# This is how detailed you want reporting. You can specify numbers -# 0 to 3 - 0 is totally silent, 3 is the most verbose. - -FollowSymLinks no -# Put "yes" to follow symbolic links in indexing, else "no". - -#UseStemming no -# Put yes to apply word stemming algorithm during indexing, -# else no. See the manual for info about stemming. Default is -# no. - -#PropertyNames author -# List of meta tags names that can be retrieved with the -p option. -# Index size increases as by the formula in the manual. -# Comment out if no PropertyNames. Case insensitive - -IgnoreTotalWordCountWhenRanking yes -# Put yes to ignore the total number of words in the file -# when calculating ranking. Often better with merges and -# small files. Default is no. - -#ReplaceRules remove "ghill/" -#ReplaceRules replace "[a-z_0-9]*_m.*\.html" "index.html" -#ReplaceRules replace "/ghill" "moreghillmore" -# ReplaceRules allow you to make changes to file pathnames -# before they're indexed. This directive uses C library -# regex.h regular expressions. -# NOTE: do not use replace "" to remove a string, -# use remove instead - you might get a core dump otherwise. - -MinWordLimit 2 -# Set the minimum length of an indexable word. Every shorter word -# will not be indexed. -# Commenting out the line will give the defaults - -#MaxWordLimit 5 -# Set the maximum length of an indexable word. Every longer word -# will not be indexed. -# Commenting out the line will give the defaults - -#WordCharacters abcdefghijklmnopqrstuvwxyz\&#;0123456789.@|,-'"[](~!@$%^{}_+? -# WORDCHARS is a string of characters which SWISH permits to -# be in words. Any strings which do not include these characters -# will not be indexed. You can choose from any character in -# the following string: -# -# abcdefghijklmnopqrstuvwxyz0123456789_\|/-+=?!@$%^'"`~,.[]{}() -# -# Note that if you omit "0123456789&#;" you will not be able to -# index HTML entities. DO NOT use the asterisk (*), lesser than -# and greater than signs (<), (>), or colon (:). -# -# Including any of these four characters may cause funny things to happen. -# NOTE: Do not escape \ nor " and they cannot be the first letter in the string -# Commenting out the line will give the defaults - -#BeginCharacters m" -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -#EndCharacters \"\ -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -# IgnoreLastChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the end. It is important to also -# set the given char's in the ENDCHARS array, otherwise the word will not -# be indexed because considered invalid. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -# IgnoreFirstChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the beginning. This was to solve -# the problem of parenthesis when there is no space between ( and the -# beginning of the word. -# Remember to add the char's to the BEGINCHARS list also. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -IgnoreLimit 50 1000 -# This automatically omits words that appear too often in the files -# (these words are called stopwords). Specify a whole percentage -# and a number, such as "80 256". This omits words that occur in -# over 80% of the files and appear in over 256 files. Comment out -# to turn of auto-stopwording. - -#IgnoreWords SwishDefault -# The IgnoreWords option allows you to specify words to ignore. -# Comment out for no stopwords; the word "SwishDefault" will -# include a list of default stopwords. Words should be separated by spaces -# and may span multiple directives. - -IndexComments 0 -# This option allows the user decide if to index the comments in the files -# default is 1. Set to 0 if comment indexing is not required. - -################################## -# DIRECTIVES for FILESYSTEMS ONLY -# Comment out if using HTTP -################################### - -#IndexOnly .html .q -# Only files with these suffixes will be indexed. - -NoContents .gif .xbm .au .mov .mpg .pdf .ps .jpg .jpeg -NoContents .gz .Z .tar .tar.gz .tgz .mbox .hqx .zip .ZIP .HQX .ARJ .arj .bin .dat -NoContents .exe -# Files with these suffixes will not have their contents indexed - -# only their file names will be indexed. - -FileRules pathname contains bkp CVS RCS cgi-bin tmp -FileRules pathname contains .*dir1 -FileRules pathname contains private -FileRules filename contains % ~ .bak .orig .old old. # -#FileRules title contains construction example pointers -FileRules directory contains .htaccess -#FileRules filename is index -# Files matching the above criteria will *not* be indexed. -# The patter matching uses the C library regex.h - -################################ -# DIRECTIVES for HTTP METHOD ONLY -# Comment out if using FILESYSTEM -################################## - -#MaxDepth 15 -#(default 5) This defines how many links the spider should -#follow before stopping. A value of 0 configures the spider to -#traverse all links - -#Delay 60 -#(default 60) The number of seconds to wait between issuing -#requests to a server. - -#TmpDir /tmp/ -#(default /var/tmp) The location of a writeable temp directory -#on your system. The HTTP access method tells the Perl helper to place -#its files there. - -#SpiderDirectory ./ -#(default ./) The location of the Perl helper -#script. Remember, if you use a relative directory, it is relative to -#your directory when you run SWISH-E, not to the directory that SWISH-E -#is in. - -#EquivalentServer http://asim.lip6.fr http://www-asim.lip6.fr -# EquivalentServer http://sunsite.berkeley.edu:2000 http://sunsite.berkeley.edu -#(default nothing) This allows you to deal with -#servers that use respond to multiple DNS names. Each line should have -#a list of all the method/names that should be considered equivalent. -#If you have multiple directives, each one defines its own set of equivalent -#servers. - - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/.swisherc.alml b/dev/cvslargo/www/cgi-bin/czo/.swisherc.alml deleted file mode 100644 index 09171562..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/.swisherc.alml +++ /dev/null @@ -1,232 +0,0 @@ -# swish-e configuration file -# -# Filename: .swisherc.alml -# Copyright (C) 1999, 2000 Czo -# License: GPL (http://www.gnu.org/copyleft/gpl.html) -# Started: April 2000 -# Last Change: Friday 12 May 2000, 14:58 -# Edit Time: 0:22:12 -# Description: swish-e -c /users/largo1/czo/cvslargo/www/cgi-bin/czo/.swisherc.alliance -# -# $Id: .swisherc.alml,v 1.1 2000/06/06 16:50:13 czo Exp $ -# - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### - - -IndexDir /users/largo2/webmastr/wwwroot/mailing-lists/alliance-programmers -IndexDir /users/largo2/webmastr/wwwroot/mailing-lists/alliance-support -IndexDir /users/largo2/webmastr/wwwroot/mailing-lists/alliance-users - -IndexFile /users/largo1/czo/cvslargo/www/cgi-bin/czo/alml.dat - -ReplaceRules replace "/users/largo2/webmastr/wwwroot" "http://www-asim.lip6.fr" - -IndexName "Asim Lab. index" -IndexDescription "Index by Czo" -IndexPointer "http://www-asim.lip6.fr/" -IndexAdmin "Czo [Olivier SIROL] " - - -# YOU SHOULD NOT CHANGE BELOW. Czo. -####################################################### - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### -# WINDOWS USERS NOTE: -# Specify ALL files and directory paths in the -# the config file using the forward slash, as -# in /thisdirectory. -# -################################################### - -# IndexDir http://www.lib.berkeley.edu/~ghill/spider.html -# For the FileSystem Method: -# This is a space-separated list of files and -# directories you want indexed. You can specify -# more than one of these directives. -# -# For the HTTP Method: -# Use the URL's from which you want the spidering -# to begin. -# NOTE: use hmtl files rather than directories -# for this method. - -# IndexFile /home/ghill/swishRon/dir1/myindex1 -# This is what the generated index file will be. - -# IndexName "Improvement index" -# IndexDescription "This is an index to test bug fixes in swish." -# IndexPointer "http://sunsite/~ghill/swish/index.html" -# IndexAdmin "Giulia Hill, (ghill@library.berkeley.edu)" -# Extra information you can include in the index file. - -MetaNames first author -# List of all the meta names used in the file to index, must be on one line. -# If no metanames DO NOT deleted the line. - -IndexReport 3 -# This is how detailed you want reporting. You can specify numbers -# 0 to 3 - 0 is totally silent, 3 is the most verbose. - -FollowSymLinks no -# Put "yes" to follow symbolic links in indexing, else "no". - -#UseStemming no -# Put yes to apply word stemming algorithm during indexing, -# else no. See the manual for info about stemming. Default is -# no. - -#PropertyNames author -# List of meta tags names that can be retrieved with the -p option. -# Index size increases as by the formula in the manual. -# Comment out if no PropertyNames. Case insensitive - -IgnoreTotalWordCountWhenRanking yes -# Put yes to ignore the total number of words in the file -# when calculating ranking. Often better with merges and -# small files. Default is no. - -#ReplaceRules remove "ghill/" -#ReplaceRules replace "[a-z_0-9]*_m.*\.html" "index.html" -#ReplaceRules replace "/ghill" "moreghillmore" -# ReplaceRules allow you to make changes to file pathnames -# before they're indexed. This directive uses C library -# regex.h regular expressions. -# NOTE: do not use replace "" to remove a string, -# use remove instead - you might get a core dump otherwise. - -MinWordLimit 2 -# Set the minimum length of an indexable word. Every shorter word -# will not be indexed. -# Commenting out the line will give the defaults - -#MaxWordLimit 5 -# Set the maximum length of an indexable word. Every longer word -# will not be indexed. -# Commenting out the line will give the defaults - -#WordCharacters abcdefghijklmnopqrstuvwxyz\&#;0123456789.@|,-'"[](~!@$%^{}_+? -# WORDCHARS is a string of characters which SWISH permits to -# be in words. Any strings which do not include these characters -# will not be indexed. You can choose from any character in -# the following string: -# -# abcdefghijklmnopqrstuvwxyz0123456789_\|/-+=?!@$%^'"`~,.[]{}() -# -# Note that if you omit "0123456789&#;" you will not be able to -# index HTML entities. DO NOT use the asterisk (*), lesser than -# and greater than signs (<), (>), or colon (:). -# -# Including any of these four characters may cause funny things to happen. -# NOTE: Do not escape \ nor " and they cannot be the first letter in the string -# Commenting out the line will give the defaults - -#BeginCharacters m" -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -#EndCharacters \"\ -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -# IgnoreLastChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the end. It is important to also -# set the given char's in the ENDCHARS array, otherwise the word will not -# be indexed because considered invalid. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -# IgnoreFirstChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the beginning. This was to solve -# the problem of parenthesis when there is no space between ( and the -# beginning of the word. -# Remember to add the char's to the BEGINCHARS list also. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -IgnoreLimit 50 1000 -# This automatically omits words that appear too often in the files -# (these words are called stopwords). Specify a whole percentage -# and a number, such as "80 256". This omits words that occur in -# over 80% of the files and appear in over 256 files. Comment out -# to turn of auto-stopwording. - -#IgnoreWords SwishDefault -# The IgnoreWords option allows you to specify words to ignore. -# Comment out for no stopwords; the word "SwishDefault" will -# include a list of default stopwords. Words should be separated by spaces -# and may span multiple directives. - -IndexComments 0 -# This option allows the user decide if to index the comments in the files -# default is 1. Set to 0 if comment indexing is not required. - -################################## -# DIRECTIVES for FILESYSTEMS ONLY -# Comment out if using HTTP -################################### - -#IndexOnly .html .q -# Only files with these suffixes will be indexed. - -NoContents .gif .xbm .au .mov .mpg .pdf .ps .jpg .jpeg -NoContents .gz .Z .tar .tgz .mbox .hqx .zip .ZIP .HQX .ARJ .arj .bin .dat -NoContents .exe -# Files with these suffixes will not have their contents indexed - -# only their file names will be indexed. - -FileRules pathname contains CVS RCS cgi-bin tmp -FileRules pathname contains .*dir1 -FileRules pathname contains private -FileRules filename contains % ~ .bak .orig .old old. # -#FileRules title contains construction example pointers -FileRules directory contains .htaccess -#FileRules filename is index -# Files matching the above criteria will *not* be indexed. -# The patter matching uses the C library regex.h - -################################ -# DIRECTIVES for HTTP METHOD ONLY -# Comment out if using FILESYSTEM -################################## - -#MaxDepth 15 -#(default 5) This defines how many links the spider should -#follow before stopping. A value of 0 configures the spider to -#traverse all links - -#Delay 60 -#(default 60) The number of seconds to wait between issuing -#requests to a server. - -#TmpDir /tmp/ -#(default /var/tmp) The location of a writeable temp directory -#on your system. The HTTP access method tells the Perl helper to place -#its files there. - -#SpiderDirectory ./ -#(default ./) The location of the Perl helper -#script. Remember, if you use a relative directory, it is relative to -#your directory when you run SWISH-E, not to the directory that SWISH-E -#is in. - -#EquivalentServer http://asim.lip6.fr http://www-asim.lip6.fr -# EquivalentServer http://sunsite.berkeley.edu:2000 http://sunsite.berkeley.edu -#(default nothing) This allows you to deal with -#servers that use respond to multiple DNS names. Each line should have -#a list of all the method/names that should be considered equivalent. -#If you have multiple directives, each one defines its own set of equivalent -#servers. - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/.swisherc.education b/dev/cvslargo/www/cgi-bin/czo/.swisherc.education deleted file mode 100644 index 6b10f744..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/.swisherc.education +++ /dev/null @@ -1,230 +0,0 @@ -# swish-e configuration file -# -# Filename: .swisherc.education -# Copyright (C) 1999, 2000 Czo -# License: GPL (http://www.gnu.org/copyleft/gpl.html) -# Started: April 2000 -# Last Change: Friday 12 May 2000, 14:58 -# Edit Time: 0:17:04 -# Description: swish-e -c /users/largo1/czo/cvslargo/www/cgi-bin/czo/.swisherc.alliance -# -# $Id: .swisherc.education,v 1.1 2000/06/06 16:50:13 czo Exp $ -# - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### - - -IndexDir /users/largo2/webmastr/wwwroot/education - -IndexFile /users/largo1/czo/cvslargo/www/cgi-bin/czo/education.dat - -ReplaceRules replace "/users/largo2/webmastr/wwwroot" "http://www-asim.lip6.fr" - -IndexName "Asim Lab. index" -IndexDescription "Index by Czo" -IndexPointer "http://www-asim.lip6.fr/" -IndexAdmin "Czo [Olivier SIROL] " - - -# YOU SHOULD NOT CHANGE BELOW. Czo. -####################################################### - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### -# WINDOWS USERS NOTE: -# Specify ALL files and directory paths in the -# the config file using the forward slash, as -# in /thisdirectory. -# -################################################### - -# IndexDir http://www.lib.berkeley.edu/~ghill/spider.html -# For the FileSystem Method: -# This is a space-separated list of files and -# directories you want indexed. You can specify -# more than one of these directives. -# -# For the HTTP Method: -# Use the URL's from which you want the spidering -# to begin. -# NOTE: use hmtl files rather than directories -# for this method. - -# IndexFile /home/ghill/swishRon/dir1/myindex1 -# This is what the generated index file will be. - -# IndexName "Improvement index" -# IndexDescription "This is an index to test bug fixes in swish." -# IndexPointer "http://sunsite/~ghill/swish/index.html" -# IndexAdmin "Giulia Hill, (ghill@library.berkeley.edu)" -# Extra information you can include in the index file. - -MetaNames first author -# List of all the meta names used in the file to index, must be on one line. -# If no metanames DO NOT deleted the line. - -IndexReport 3 -# This is how detailed you want reporting. You can specify numbers -# 0 to 3 - 0 is totally silent, 3 is the most verbose. - -FollowSymLinks no -# Put "yes" to follow symbolic links in indexing, else "no". - -#UseStemming no -# Put yes to apply word stemming algorithm during indexing, -# else no. See the manual for info about stemming. Default is -# no. - -#PropertyNames author -# List of meta tags names that can be retrieved with the -p option. -# Index size increases as by the formula in the manual. -# Comment out if no PropertyNames. Case insensitive - -IgnoreTotalWordCountWhenRanking yes -# Put yes to ignore the total number of words in the file -# when calculating ranking. Often better with merges and -# small files. Default is no. - -#ReplaceRules remove "ghill/" -#ReplaceRules replace "[a-z_0-9]*_m.*\.html" "index.html" -#ReplaceRules replace "/ghill" "moreghillmore" -# ReplaceRules allow you to make changes to file pathnames -# before they're indexed. This directive uses C library -# regex.h regular expressions. -# NOTE: do not use replace "" to remove a string, -# use remove instead - you might get a core dump otherwise. - -MinWordLimit 2 -# Set the minimum length of an indexable word. Every shorter word -# will not be indexed. -# Commenting out the line will give the defaults - -#MaxWordLimit 5 -# Set the maximum length of an indexable word. Every longer word -# will not be indexed. -# Commenting out the line will give the defaults - -#WordCharacters abcdefghijklmnopqrstuvwxyz\&#;0123456789.@|,-'"[](~!@$%^{}_+? -# WORDCHARS is a string of characters which SWISH permits to -# be in words. Any strings which do not include these characters -# will not be indexed. You can choose from any character in -# the following string: -# -# abcdefghijklmnopqrstuvwxyz0123456789_\|/-+=?!@$%^'"`~,.[]{}() -# -# Note that if you omit "0123456789&#;" you will not be able to -# index HTML entities. DO NOT use the asterisk (*), lesser than -# and greater than signs (<), (>), or colon (:). -# -# Including any of these four characters may cause funny things to happen. -# NOTE: Do not escape \ nor " and they cannot be the first letter in the string -# Commenting out the line will give the defaults - -#BeginCharacters m" -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -#EndCharacters \"\ -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -# IgnoreLastChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the end. It is important to also -# set the given char's in the ENDCHARS array, otherwise the word will not -# be indexed because considered invalid. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -# IgnoreFirstChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the beginning. This was to solve -# the problem of parenthesis when there is no space between ( and the -# beginning of the word. -# Remember to add the char's to the BEGINCHARS list also. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -IgnoreLimit 50 1000 -# This automatically omits words that appear too often in the files -# (these words are called stopwords). Specify a whole percentage -# and a number, such as "80 256". This omits words that occur in -# over 80% of the files and appear in over 256 files. Comment out -# to turn of auto-stopwording. - -#IgnoreWords SwishDefault -# The IgnoreWords option allows you to specify words to ignore. -# Comment out for no stopwords; the word "SwishDefault" will -# include a list of default stopwords. Words should be separated by spaces -# and may span multiple directives. - -IndexComments 0 -# This option allows the user decide if to index the comments in the files -# default is 1. Set to 0 if comment indexing is not required. - -################################## -# DIRECTIVES for FILESYSTEMS ONLY -# Comment out if using HTTP -################################### - -#IndexOnly .html .q -# Only files with these suffixes will be indexed. - -NoContents .gif .xbm .au .mov .mpg .pdf .ps .jpg .jpeg -NoContents .gz .Z .tar .tgz .mbox .hqx .zip .ZIP .HQX .ARJ .arj .bin .dat -NoContents .exe -# Files with these suffixes will not have their contents indexed - -# only their file names will be indexed. - -FileRules pathname contains CVS RCS cgi-bin tmp -FileRules pathname contains .*dir1 -FileRules pathname contains private -FileRules filename contains % ~ .bak .orig .old old. # -#FileRules title contains construction example pointers -FileRules directory contains .htaccess -#FileRules filename is index -# Files matching the above criteria will *not* be indexed. -# The patter matching uses the C library regex.h - -################################ -# DIRECTIVES for HTTP METHOD ONLY -# Comment out if using FILESYSTEM -################################## - -#MaxDepth 15 -#(default 5) This defines how many links the spider should -#follow before stopping. A value of 0 configures the spider to -#traverse all links - -#Delay 60 -#(default 60) The number of seconds to wait between issuing -#requests to a server. - -#TmpDir /tmp/ -#(default /var/tmp) The location of a writeable temp directory -#on your system. The HTTP access method tells the Perl helper to place -#its files there. - -#SpiderDirectory ./ -#(default ./) The location of the Perl helper -#script. Remember, if you use a relative directory, it is relative to -#your directory when you run SWISH-E, not to the directory that SWISH-E -#is in. - -#EquivalentServer http://asim.lip6.fr http://www-asim.lip6.fr -# EquivalentServer http://sunsite.berkeley.edu:2000 http://sunsite.berkeley.edu -#(default nothing) This allows you to deal with -#servers that use respond to multiple DNS names. Each line should have -#a list of all the method/names that should be considered equivalent. -#If you have multiple directives, each one defines its own set of equivalent -#servers. - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/.swisherc.intranet b/dev/cvslargo/www/cgi-bin/czo/.swisherc.intranet deleted file mode 100644 index d660ec84..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/.swisherc.intranet +++ /dev/null @@ -1,231 +0,0 @@ -# swish-e configuration file -# -# Filename: .swisherc.intranet -# Copyright (C) 1999, 2000 Czo -# License: GPL (http://www.gnu.org/copyleft/gpl.html) -# Started: April 2000 -# Last Change: Friday 12 May 2000, 14:58 -# Edit Time: 0:17:51 -# Description: swish-e -c /users/largo1/czo/cvslargo/www/cgi-bin/czo/.swisherc.alliance -# -# $Id: .swisherc.intranet,v 1.1 2000/06/06 16:50:13 czo Exp $ -# - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### - -IndexDir /users/largo2/webmastr/wwwroot/intranet -IndexDir /users/largo2/webmastr/wwwroot/mailing-lists/archi -IndexDir /users/largo2/webmastr/wwwroot/mailing-lists/help - -IndexFile /users/largo1/czo/cvslargo/www/cgi-bin/czo/intranet.dat - -ReplaceRules replace "/users/largo2/webmastr/wwwroot" "http://www-asim.lip6.fr" - -IndexName "Asim Lab. index" -IndexDescription "Index by Czo" -IndexPointer "http://www-asim.lip6.fr/" -IndexAdmin "Czo [Olivier SIROL] " - - -# YOU SHOULD NOT CHANGE BELOW. Czo. -####################################################### - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### -# WINDOWS USERS NOTE: -# Specify ALL files and directory paths in the -# the config file using the forward slash, as -# in /thisdirectory. -# -################################################### - -# IndexDir http://www.lib.berkeley.edu/~ghill/spider.html -# For the FileSystem Method: -# This is a space-separated list of files and -# directories you want indexed. You can specify -# more than one of these directives. -# -# For the HTTP Method: -# Use the URL's from which you want the spidering -# to begin. -# NOTE: use hmtl files rather than directories -# for this method. - -# IndexFile /home/ghill/swishRon/dir1/myindex1 -# This is what the generated index file will be. - -# IndexName "Improvement index" -# IndexDescription "This is an index to test bug fixes in swish." -# IndexPointer "http://sunsite/~ghill/swish/index.html" -# IndexAdmin "Giulia Hill, (ghill@library.berkeley.edu)" -# Extra information you can include in the index file. - -MetaNames first author -# List of all the meta names used in the file to index, must be on one line. -# If no metanames DO NOT deleted the line. - -IndexReport 3 -# This is how detailed you want reporting. You can specify numbers -# 0 to 3 - 0 is totally silent, 3 is the most verbose. - -FollowSymLinks no -# Put "yes" to follow symbolic links in indexing, else "no". - -#UseStemming no -# Put yes to apply word stemming algorithm during indexing, -# else no. See the manual for info about stemming. Default is -# no. - -#PropertyNames author -# List of meta tags names that can be retrieved with the -p option. -# Index size increases as by the formula in the manual. -# Comment out if no PropertyNames. Case insensitive - -IgnoreTotalWordCountWhenRanking yes -# Put yes to ignore the total number of words in the file -# when calculating ranking. Often better with merges and -# small files. Default is no. - -#ReplaceRules remove "ghill/" -#ReplaceRules replace "[a-z_0-9]*_m.*\.html" "index.html" -#ReplaceRules replace "/ghill" "moreghillmore" -# ReplaceRules allow you to make changes to file pathnames -# before they're indexed. This directive uses C library -# regex.h regular expressions. -# NOTE: do not use replace "" to remove a string, -# use remove instead - you might get a core dump otherwise. - -MinWordLimit 2 -# Set the minimum length of an indexable word. Every shorter word -# will not be indexed. -# Commenting out the line will give the defaults - -#MaxWordLimit 5 -# Set the maximum length of an indexable word. Every longer word -# will not be indexed. -# Commenting out the line will give the defaults - -#WordCharacters abcdefghijklmnopqrstuvwxyz\&#;0123456789.@|,-'"[](~!@$%^{}_+? -# WORDCHARS is a string of characters which SWISH permits to -# be in words. Any strings which do not include these characters -# will not be indexed. You can choose from any character in -# the following string: -# -# abcdefghijklmnopqrstuvwxyz0123456789_\|/-+=?!@$%^'"`~,.[]{}() -# -# Note that if you omit "0123456789&#;" you will not be able to -# index HTML entities. DO NOT use the asterisk (*), lesser than -# and greater than signs (<), (>), or colon (:). -# -# Including any of these four characters may cause funny things to happen. -# NOTE: Do not escape \ nor " and they cannot be the first letter in the string -# Commenting out the line will give the defaults - -#BeginCharacters m" -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -#EndCharacters \"\ -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -# IgnoreLastChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the end. It is important to also -# set the given char's in the ENDCHARS array, otherwise the word will not -# be indexed because considered invalid. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -# IgnoreFirstChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the beginning. This was to solve -# the problem of parenthesis when there is no space between ( and the -# beginning of the word. -# Remember to add the char's to the BEGINCHARS list also. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -IgnoreLimit 50 1000 -# This automatically omits words that appear too often in the files -# (these words are called stopwords). Specify a whole percentage -# and a number, such as "80 256". This omits words that occur in -# over 80% of the files and appear in over 256 files. Comment out -# to turn of auto-stopwording. - -#IgnoreWords SwishDefault -# The IgnoreWords option allows you to specify words to ignore. -# Comment out for no stopwords; the word "SwishDefault" will -# include a list of default stopwords. Words should be separated by spaces -# and may span multiple directives. - -IndexComments 0 -# This option allows the user decide if to index the comments in the files -# default is 1. Set to 0 if comment indexing is not required. - -################################## -# DIRECTIVES for FILESYSTEMS ONLY -# Comment out if using HTTP -################################### - -#IndexOnly .html .q -# Only files with these suffixes will be indexed. - -NoContents .gif .xbm .au .mov .mpg .pdf .ps .jpg .jpeg -NoContents .gz .Z .tar .tgz .mbox .hqx .zip .ZIP .HQX .ARJ .arj .bin .dat -NoContents .exe -# Files with these suffixes will not have their contents indexed - -# only their file names will be indexed. - -FileRules pathname contains CVS RCS cgi-bin tmp -FileRules pathname contains .*dir1 -FileRules pathname contains private -FileRules filename contains % ~ .bak .orig .old old. # -#FileRules title contains construction example pointers -FileRules directory contains .htaccess -#FileRules filename is index -# Files matching the above criteria will *not* be indexed. -# The patter matching uses the C library regex.h - -################################ -# DIRECTIVES for HTTP METHOD ONLY -# Comment out if using FILESYSTEM -################################## - -#MaxDepth 15 -#(default 5) This defines how many links the spider should -#follow before stopping. A value of 0 configures the spider to -#traverse all links - -#Delay 60 -#(default 60) The number of seconds to wait between issuing -#requests to a server. - -#TmpDir /tmp/ -#(default /var/tmp) The location of a writeable temp directory -#on your system. The HTTP access method tells the Perl helper to place -#its files there. - -#SpiderDirectory ./ -#(default ./) The location of the Perl helper -#script. Remember, if you use a relative directory, it is relative to -#your directory when you run SWISH-E, not to the directory that SWISH-E -#is in. - -#EquivalentServer http://asim.lip6.fr http://www-asim.lip6.fr -# EquivalentServer http://sunsite.berkeley.edu:2000 http://sunsite.berkeley.edu -#(default nothing) This allows you to deal with -#servers that use respond to multiple DNS names. Each line should have -#a list of all the method/names that should be considered equivalent. -#If you have multiple directives, each one defines its own set of equivalent -#servers. - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/.swisherc.mpc b/dev/cvslargo/www/cgi-bin/czo/.swisherc.mpc deleted file mode 100644 index b78e99fd..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/.swisherc.mpc +++ /dev/null @@ -1,230 +0,0 @@ -# swish-e configuration file -# -# Filename: .swisherc.mpc -# Copyright (C) 1999, 2000 Czo -# License: GPL (http://www.gnu.org/copyleft/gpl.html) -# Started: April 2000 -# Last Change: Friday 12 May 2000, 14:59 -# Edit Time: 0:18:15 -# Description: swish-e -c /users/largo1/czo/cvslargo/www/cgi-bin/czo/.swisherc.alliance -# -# $Id: .swisherc.mpc,v 1.1 2000/06/06 16:50:13 czo Exp $ -# - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### - - -IndexDir /users/largo2/webmastr/wwwroot/mpc - -IndexFile /users/largo1/czo/cvslargo/www/cgi-bin/czo/mpc.dat - -ReplaceRules replace "/users/largo2/webmastr/wwwroot" "http://www-asim.lip6.fr" - -IndexName "Asim Lab. index" -IndexDescription "Index by Czo" -IndexPointer "http://www-asim.lip6.fr/" -IndexAdmin "Czo [Olivier SIROL] " - - -# YOU SHOULD NOT CHANGE BELOW. Czo. -####################################################### - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### -# WINDOWS USERS NOTE: -# Specify ALL files and directory paths in the -# the config file using the forward slash, as -# in /thisdirectory. -# -################################################### - -# IndexDir http://www.lib.berkeley.edu/~ghill/spider.html -# For the FileSystem Method: -# This is a space-separated list of files and -# directories you want indexed. You can specify -# more than one of these directives. -# -# For the HTTP Method: -# Use the URL's from which you want the spidering -# to begin. -# NOTE: use hmtl files rather than directories -# for this method. - -# IndexFile /home/ghill/swishRon/dir1/myindex1 -# This is what the generated index file will be. - -# IndexName "Improvement index" -# IndexDescription "This is an index to test bug fixes in swish." -# IndexPointer "http://sunsite/~ghill/swish/index.html" -# IndexAdmin "Giulia Hill, (ghill@library.berkeley.edu)" -# Extra information you can include in the index file. - -MetaNames first author -# List of all the meta names used in the file to index, must be on one line. -# If no metanames DO NOT deleted the line. - -IndexReport 3 -# This is how detailed you want reporting. You can specify numbers -# 0 to 3 - 0 is totally silent, 3 is the most verbose. - -FollowSymLinks no -# Put "yes" to follow symbolic links in indexing, else "no". - -#UseStemming no -# Put yes to apply word stemming algorithm during indexing, -# else no. See the manual for info about stemming. Default is -# no. - -#PropertyNames author -# List of meta tags names that can be retrieved with the -p option. -# Index size increases as by the formula in the manual. -# Comment out if no PropertyNames. Case insensitive - -IgnoreTotalWordCountWhenRanking yes -# Put yes to ignore the total number of words in the file -# when calculating ranking. Often better with merges and -# small files. Default is no. - -#ReplaceRules remove "ghill/" -#ReplaceRules replace "[a-z_0-9]*_m.*\.html" "index.html" -#ReplaceRules replace "/ghill" "moreghillmore" -# ReplaceRules allow you to make changes to file pathnames -# before they're indexed. This directive uses C library -# regex.h regular expressions. -# NOTE: do not use replace "" to remove a string, -# use remove instead - you might get a core dump otherwise. - -MinWordLimit 2 -# Set the minimum length of an indexable word. Every shorter word -# will not be indexed. -# Commenting out the line will give the defaults - -#MaxWordLimit 5 -# Set the maximum length of an indexable word. Every longer word -# will not be indexed. -# Commenting out the line will give the defaults - -#WordCharacters abcdefghijklmnopqrstuvwxyz\&#;0123456789.@|,-'"[](~!@$%^{}_+? -# WORDCHARS is a string of characters which SWISH permits to -# be in words. Any strings which do not include these characters -# will not be indexed. You can choose from any character in -# the following string: -# -# abcdefghijklmnopqrstuvwxyz0123456789_\|/-+=?!@$%^'"`~,.[]{}() -# -# Note that if you omit "0123456789&#;" you will not be able to -# index HTML entities. DO NOT use the asterisk (*), lesser than -# and greater than signs (<), (>), or colon (:). -# -# Including any of these four characters may cause funny things to happen. -# NOTE: Do not escape \ nor " and they cannot be the first letter in the string -# Commenting out the line will give the defaults - -#BeginCharacters m" -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -#EndCharacters \"\ -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -# IgnoreLastChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the end. It is important to also -# set the given char's in the ENDCHARS array, otherwise the word will not -# be indexed because considered invalid. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -# IgnoreFirstChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the beginning. This was to solve -# the problem of parenthesis when there is no space between ( and the -# beginning of the word. -# Remember to add the char's to the BEGINCHARS list also. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -IgnoreLimit 50 1000 -# This automatically omits words that appear too often in the files -# (these words are called stopwords). Specify a whole percentage -# and a number, such as "80 256". This omits words that occur in -# over 80% of the files and appear in over 256 files. Comment out -# to turn of auto-stopwording. - -#IgnoreWords SwishDefault -# The IgnoreWords option allows you to specify words to ignore. -# Comment out for no stopwords; the word "SwishDefault" will -# include a list of default stopwords. Words should be separated by spaces -# and may span multiple directives. - -IndexComments 0 -# This option allows the user decide if to index the comments in the files -# default is 1. Set to 0 if comment indexing is not required. - -################################## -# DIRECTIVES for FILESYSTEMS ONLY -# Comment out if using HTTP -################################### - -#IndexOnly .html .q -# Only files with these suffixes will be indexed. - -NoContents .gif .xbm .au .mov .mpg .pdf .ps .jpg .jpeg -NoContents .gz .Z .tar .tgz .mbox .hqx .zip .ZIP .HQX .ARJ .arj .bin .dat -NoContents .exe -# Files with these suffixes will not have their contents indexed - -# only their file names will be indexed. - -FileRules pathname contains CVS RCS cgi-bin tmp -FileRules pathname contains .*dir1 -FileRules pathname contains private -FileRules filename contains % ~ .bak .orig .old old. # -#FileRules title contains construction example pointers -FileRules directory contains .htaccess -#FileRules filename is index -# Files matching the above criteria will *not* be indexed. -# The patter matching uses the C library regex.h - -################################ -# DIRECTIVES for HTTP METHOD ONLY -# Comment out if using FILESYSTEM -################################## - -#MaxDepth 15 -#(default 5) This defines how many links the spider should -#follow before stopping. A value of 0 configures the spider to -#traverse all links - -#Delay 60 -#(default 60) The number of seconds to wait between issuing -#requests to a server. - -#TmpDir /tmp/ -#(default /var/tmp) The location of a writeable temp directory -#on your system. The HTTP access method tells the Perl helper to place -#its files there. - -#SpiderDirectory ./ -#(default ./) The location of the Perl helper -#script. Remember, if you use a relative directory, it is relative to -#your directory when you run SWISH-E, not to the directory that SWISH-E -#is in. - -#EquivalentServer http://asim.lip6.fr http://www-asim.lip6.fr -# EquivalentServer http://sunsite.berkeley.edu:2000 http://sunsite.berkeley.edu -#(default nothing) This allows you to deal with -#servers that use respond to multiple DNS names. Each line should have -#a list of all the method/names that should be considered equivalent. -#If you have multiple directives, each one defines its own set of equivalent -#servers. - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/.swisherc.multimedia b/dev/cvslargo/www/cgi-bin/czo/.swisherc.multimedia deleted file mode 100644 index 977b375c..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/.swisherc.multimedia +++ /dev/null @@ -1,229 +0,0 @@ -# swish-e configuration file -# -# Filename: .swisherc.multimedia -# Copyright (C) 1999, 2000 Czo -# License: GPL (http://www.gnu.org/copyleft/gpl.html) -# Started: April 2000 -# Last Change: Friday 12 May 2000, 14:59 -# Edit Time: 0:19:30 -# Description: swish-e -c /users/largo1/czo/cvslargo/www/cgi-bin/czo/.swisherc.alliance -# -# $Id: .swisherc.multimedia,v 1.1 2000/06/06 16:50:14 czo Exp $ -# - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### - -IndexDir /users/largo2/webmastr/wwwroot/multimedia - -IndexFile /users/largo1/czo/cvslargo/www/cgi-bin/czo/multimedia.dat - -ReplaceRules replace "/users/largo2/webmastr/wwwroot" "http://www-asim.lip6.fr" - -IndexName "Asim Lab. index" -IndexDescription "Index by Czo" -IndexPointer "http://www-asim.lip6.fr/" -IndexAdmin "Czo [Olivier SIROL] " - - -# YOU SHOULD NOT CHANGE BELOW. Czo. -####################################################### - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### -# WINDOWS USERS NOTE: -# Specify ALL files and directory paths in the -# the config file using the forward slash, as -# in /thisdirectory. -# -################################################### - -# IndexDir http://www.lib.berkeley.edu/~ghill/spider.html -# For the FileSystem Method: -# This is a space-separated list of files and -# directories you want indexed. You can specify -# more than one of these directives. -# -# For the HTTP Method: -# Use the URL's from which you want the spidering -# to begin. -# NOTE: use hmtl files rather than directories -# for this method. - -# IndexFile /home/ghill/swishRon/dir1/myindex1 -# This is what the generated index file will be. - -# IndexName "Improvement index" -# IndexDescription "This is an index to test bug fixes in swish." -# IndexPointer "http://sunsite/~ghill/swish/index.html" -# IndexAdmin "Giulia Hill, (ghill@library.berkeley.edu)" -# Extra information you can include in the index file. - -MetaNames first author -# List of all the meta names used in the file to index, must be on one line. -# If no metanames DO NOT deleted the line. - -IndexReport 3 -# This is how detailed you want reporting. You can specify numbers -# 0 to 3 - 0 is totally silent, 3 is the most verbose. - -FollowSymLinks no -# Put "yes" to follow symbolic links in indexing, else "no". - -#UseStemming no -# Put yes to apply word stemming algorithm during indexing, -# else no. See the manual for info about stemming. Default is -# no. - -#PropertyNames author -# List of meta tags names that can be retrieved with the -p option. -# Index size increases as by the formula in the manual. -# Comment out if no PropertyNames. Case insensitive - -IgnoreTotalWordCountWhenRanking yes -# Put yes to ignore the total number of words in the file -# when calculating ranking. Often better with merges and -# small files. Default is no. - -#ReplaceRules remove "ghill/" -#ReplaceRules replace "[a-z_0-9]*_m.*\.html" "index.html" -#ReplaceRules replace "/ghill" "moreghillmore" -# ReplaceRules allow you to make changes to file pathnames -# before they're indexed. This directive uses C library -# regex.h regular expressions. -# NOTE: do not use replace "" to remove a string, -# use remove instead - you might get a core dump otherwise. - -MinWordLimit 2 -# Set the minimum length of an indexable word. Every shorter word -# will not be indexed. -# Commenting out the line will give the defaults - -#MaxWordLimit 5 -# Set the maximum length of an indexable word. Every longer word -# will not be indexed. -# Commenting out the line will give the defaults - -#WordCharacters abcdefghijklmnopqrstuvwxyz\&#;0123456789.@|,-'"[](~!@$%^{}_+? -# WORDCHARS is a string of characters which SWISH permits to -# be in words. Any strings which do not include these characters -# will not be indexed. You can choose from any character in -# the following string: -# -# abcdefghijklmnopqrstuvwxyz0123456789_\|/-+=?!@$%^'"`~,.[]{}() -# -# Note that if you omit "0123456789&#;" you will not be able to -# index HTML entities. DO NOT use the asterisk (*), lesser than -# and greater than signs (<), (>), or colon (:). -# -# Including any of these four characters may cause funny things to happen. -# NOTE: Do not escape \ nor " and they cannot be the first letter in the string -# Commenting out the line will give the defaults - -#BeginCharacters m" -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -#EndCharacters \"\ -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -# IgnoreLastChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the end. It is important to also -# set the given char's in the ENDCHARS array, otherwise the word will not -# be indexed because considered invalid. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -# IgnoreFirstChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the beginning. This was to solve -# the problem of parenthesis when there is no space between ( and the -# beginning of the word. -# Remember to add the char's to the BEGINCHARS list also. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -IgnoreLimit 50 1000 -# This automatically omits words that appear too often in the files -# (these words are called stopwords). Specify a whole percentage -# and a number, such as "80 256". This omits words that occur in -# over 80% of the files and appear in over 256 files. Comment out -# to turn of auto-stopwording. - -#IgnoreWords SwishDefault -# The IgnoreWords option allows you to specify words to ignore. -# Comment out for no stopwords; the word "SwishDefault" will -# include a list of default stopwords. Words should be separated by spaces -# and may span multiple directives. - -IndexComments 0 -# This option allows the user decide if to index the comments in the files -# default is 1. Set to 0 if comment indexing is not required. - -################################## -# DIRECTIVES for FILESYSTEMS ONLY -# Comment out if using HTTP -################################### - -#IndexOnly .html .q -# Only files with these suffixes will be indexed. - -NoContents .gif .xbm .au .mov .mpg .pdf .ps .jpg .jpeg -NoContents .gz .Z .tar .tgz .mbox .hqx .zip .ZIP .HQX .ARJ .arj .bin .dat -NoContents .exe -# Files with these suffixes will not have their contents indexed - -# only their file names will be indexed. - -FileRules pathname contains CVS RCS cgi-bin tmp -FileRules pathname contains .*dir1 -FileRules pathname contains private -FileRules filename contains % ~ .bak .orig .old old. # -#FileRules title contains construction example pointers -FileRules directory contains .htaccess -#FileRules filename is index -# Files matching the above criteria will *not* be indexed. -# The patter matching uses the C library regex.h - -################################ -# DIRECTIVES for HTTP METHOD ONLY -# Comment out if using FILESYSTEM -################################## - -#MaxDepth 15 -#(default 5) This defines how many links the spider should -#follow before stopping. A value of 0 configures the spider to -#traverse all links - -#Delay 60 -#(default 60) The number of seconds to wait between issuing -#requests to a server. - -#TmpDir /tmp/ -#(default /var/tmp) The location of a writeable temp directory -#on your system. The HTTP access method tells the Perl helper to place -#its files there. - -#SpiderDirectory ./ -#(default ./) The location of the Perl helper -#script. Remember, if you use a relative directory, it is relative to -#your directory when you run SWISH-E, not to the directory that SWISH-E -#is in. - -#EquivalentServer http://asim.lip6.fr http://www-asim.lip6.fr -# EquivalentServer http://sunsite.berkeley.edu:2000 http://sunsite.berkeley.edu -#(default nothing) This allows you to deal with -#servers that use respond to multiple DNS names. Each line should have -#a list of all the method/names that should be considered equivalent. -#If you have multiple directives, each one defines its own set of equivalent -#servers. - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/.swisherc.publications b/dev/cvslargo/www/cgi-bin/czo/.swisherc.publications deleted file mode 100644 index 611c95aa..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/.swisherc.publications +++ /dev/null @@ -1,230 +0,0 @@ -# swish-e configuration file -# -# Filename: .swisherc.publications -# Copyright (C) 1999, 2000 Czo -# License: GPL (http://www.gnu.org/copyleft/gpl.html) -# Started: April 2000 -# Last Change: Friday 12 May 2000, 14:59 -# Edit Time: 0:20:05 -# Description: swish-e -c /users/largo1/czo/cvslargo/www/cgi-bin/czo/.swisherc.alliance -# -# $Id: .swisherc.publications,v 1.1 2000/06/06 16:50:14 czo Exp $ -# - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### - - -IndexDir /users/largo2/webmastr/wwwroot/publications - -IndexFile /users/largo1/czo/cvslargo/www/cgi-bin/czo/publications.dat - -ReplaceRules replace "/users/largo2/webmastr/wwwroot" "http://www-asim.lip6.fr" - -IndexName "Asim Lab. index" -IndexDescription "Index by Czo" -IndexPointer "http://www-asim.lip6.fr/" -IndexAdmin "Czo [Olivier SIROL] " - - -# YOU SHOULD NOT CHANGE BELOW. Czo. -####################################################### - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### -# WINDOWS USERS NOTE: -# Specify ALL files and directory paths in the -# the config file using the forward slash, as -# in /thisdirectory. -# -################################################### - -# IndexDir http://www.lib.berkeley.edu/~ghill/spider.html -# For the FileSystem Method: -# This is a space-separated list of files and -# directories you want indexed. You can specify -# more than one of these directives. -# -# For the HTTP Method: -# Use the URL's from which you want the spidering -# to begin. -# NOTE: use hmtl files rather than directories -# for this method. - -# IndexFile /home/ghill/swishRon/dir1/myindex1 -# This is what the generated index file will be. - -# IndexName "Improvement index" -# IndexDescription "This is an index to test bug fixes in swish." -# IndexPointer "http://sunsite/~ghill/swish/index.html" -# IndexAdmin "Giulia Hill, (ghill@library.berkeley.edu)" -# Extra information you can include in the index file. - -MetaNames first author -# List of all the meta names used in the file to index, must be on one line. -# If no metanames DO NOT deleted the line. - -IndexReport 3 -# This is how detailed you want reporting. You can specify numbers -# 0 to 3 - 0 is totally silent, 3 is the most verbose. - -FollowSymLinks no -# Put "yes" to follow symbolic links in indexing, else "no". - -#UseStemming no -# Put yes to apply word stemming algorithm during indexing, -# else no. See the manual for info about stemming. Default is -# no. - -#PropertyNames author -# List of meta tags names that can be retrieved with the -p option. -# Index size increases as by the formula in the manual. -# Comment out if no PropertyNames. Case insensitive - -IgnoreTotalWordCountWhenRanking yes -# Put yes to ignore the total number of words in the file -# when calculating ranking. Often better with merges and -# small files. Default is no. - -#ReplaceRules remove "ghill/" -#ReplaceRules replace "[a-z_0-9]*_m.*\.html" "index.html" -#ReplaceRules replace "/ghill" "moreghillmore" -# ReplaceRules allow you to make changes to file pathnames -# before they're indexed. This directive uses C library -# regex.h regular expressions. -# NOTE: do not use replace "" to remove a string, -# use remove instead - you might get a core dump otherwise. - -MinWordLimit 2 -# Set the minimum length of an indexable word. Every shorter word -# will not be indexed. -# Commenting out the line will give the defaults - -#MaxWordLimit 5 -# Set the maximum length of an indexable word. Every longer word -# will not be indexed. -# Commenting out the line will give the defaults - -#WordCharacters abcdefghijklmnopqrstuvwxyz\&#;0123456789.@|,-'"[](~!@$%^{}_+? -# WORDCHARS is a string of characters which SWISH permits to -# be in words. Any strings which do not include these characters -# will not be indexed. You can choose from any character in -# the following string: -# -# abcdefghijklmnopqrstuvwxyz0123456789_\|/-+=?!@$%^'"`~,.[]{}() -# -# Note that if you omit "0123456789&#;" you will not be able to -# index HTML entities. DO NOT use the asterisk (*), lesser than -# and greater than signs (<), (>), or colon (:). -# -# Including any of these four characters may cause funny things to happen. -# NOTE: Do not escape \ nor " and they cannot be the first letter in the string -# Commenting out the line will give the defaults - -#BeginCharacters m" -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -#EndCharacters \"\ -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -# IgnoreLastChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the end. It is important to also -# set the given char's in the ENDCHARS array, otherwise the word will not -# be indexed because considered invalid. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -# IgnoreFirstChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the beginning. This was to solve -# the problem of parenthesis when there is no space between ( and the -# beginning of the word. -# Remember to add the char's to the BEGINCHARS list also. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -IgnoreLimit 50 1000 -# This automatically omits words that appear too often in the files -# (these words are called stopwords). Specify a whole percentage -# and a number, such as "80 256". This omits words that occur in -# over 80% of the files and appear in over 256 files. Comment out -# to turn of auto-stopwording. - -#IgnoreWords SwishDefault -# The IgnoreWords option allows you to specify words to ignore. -# Comment out for no stopwords; the word "SwishDefault" will -# include a list of default stopwords. Words should be separated by spaces -# and may span multiple directives. - -IndexComments 0 -# This option allows the user decide if to index the comments in the files -# default is 1. Set to 0 if comment indexing is not required. - -################################## -# DIRECTIVES for FILESYSTEMS ONLY -# Comment out if using HTTP -################################### - -#IndexOnly .html .q -# Only files with these suffixes will be indexed. - -NoContents .gif .xbm .au .mov .mpg .pdf .ps .jpg .jpeg -NoContents .gz .Z .tar .tgz .mbox .hqx .zip .ZIP .HQX .ARJ .arj .bin .dat -NoContents .exe -# Files with these suffixes will not have their contents indexed - -# only their file names will be indexed. - -FileRules pathname contains CVS RCS cgi-bin tmp -FileRules pathname contains .*dir1 -FileRules pathname contains private -FileRules filename contains % ~ .bak .orig .old old. # -#FileRules title contains construction example pointers -FileRules directory contains .htaccess -#FileRules filename is index -# Files matching the above criteria will *not* be indexed. -# The patter matching uses the C library regex.h - -################################ -# DIRECTIVES for HTTP METHOD ONLY -# Comment out if using FILESYSTEM -################################## - -#MaxDepth 15 -#(default 5) This defines how many links the spider should -#follow before stopping. A value of 0 configures the spider to -#traverse all links - -#Delay 60 -#(default 60) The number of seconds to wait between issuing -#requests to a server. - -#TmpDir /tmp/ -#(default /var/tmp) The location of a writeable temp directory -#on your system. The HTTP access method tells the Perl helper to place -#its files there. - -#SpiderDirectory ./ -#(default ./) The location of the Perl helper -#script. Remember, if you use a relative directory, it is relative to -#your directory when you run SWISH-E, not to the directory that SWISH-E -#is in. - -#EquivalentServer http://asim.lip6.fr http://www-asim.lip6.fr -# EquivalentServer http://sunsite.berkeley.edu:2000 http://sunsite.berkeley.edu -#(default nothing) This allows you to deal with -#servers that use respond to multiple DNS names. Each line should have -#a list of all the method/names that should be considered equivalent. -#If you have multiple directives, each one defines its own set of equivalent -#servers. - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/.swisherc.users b/dev/cvslargo/www/cgi-bin/czo/.swisherc.users deleted file mode 100644 index 67550fae..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/.swisherc.users +++ /dev/null @@ -1,231 +0,0 @@ -# swish-e configuration file -# -# Filename: .swisherc.users -# Copyright (C) 1999, 2000 Czo -# License: GPL (http://www.gnu.org/copyleft/gpl.html) -# Started: April 2000 -# Last Change: Friday 12 May 2000, 14:59 -# Edit Time: 0:21:49 -# Description: swish-e -c /users/largo1/czo/cvslargo/www/cgi-bin/czo/.swisherc.alliance -# -# $Id: .swisherc.users,v 1.1 2000/06/06 16:50:14 czo Exp $ -# - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### - -# ypcat passwd | grep users\/cao | gawk -F : '{printf ("IndexDir %s\/public_html\n", $6)}' | sort -u - -IndexDir /users/largo2/webmastr/wwwroot/homepages - -IndexFile /users/largo1/czo/cvslargo/www/cgi-bin/czo/users.dat - -ReplaceRules replace "/users/largo2/webmastr/wwwroot" "http://www-asim.lip6.fr" - -IndexName "Asim Lab. index" -IndexDescription "Index by Czo" -IndexPointer "http://www-asim.lip6.fr/" -IndexAdmin "Czo [Olivier SIROL] " - - -# YOU SHOULD NOT CHANGE BELOW. Czo. -####################################################### - -# DIRECTIVES COMMON to HTTP and FILESYSTEM METHODS -################################################### -# WINDOWS USERS NOTE: -# Specify ALL files and directory paths in the -# the config file using the forward slash, as -# in /thisdirectory. -# -################################################### - -# IndexDir http://www.lib.berkeley.edu/~ghill/spider.html -# For the FileSystem Method: -# This is a space-separated list of files and -# directories you want indexed. You can specify -# more than one of these directives. -# -# For the HTTP Method: -# Use the URL's from which you want the spidering -# to begin. -# NOTE: use hmtl files rather than directories -# for this method. - -# IndexFile /home/ghill/swishRon/dir1/myindex1 -# This is what the generated index file will be. - -# IndexName "Improvement index" -# IndexDescription "This is an index to test bug fixes in swish." -# IndexPointer "http://sunsite/~ghill/swish/index.html" -# IndexAdmin "Giulia Hill, (ghill@library.berkeley.edu)" -# Extra information you can include in the index file. - -MetaNames first author -# List of all the meta names used in the file to index, must be on one line. -# If no metanames DO NOT deleted the line. - -IndexReport 3 -# This is how detailed you want reporting. You can specify numbers -# 0 to 3 - 0 is totally silent, 3 is the most verbose. - -FollowSymLinks no -# Put "yes" to follow symbolic links in indexing, else "no". - -#UseStemming no -# Put yes to apply word stemming algorithm during indexing, -# else no. See the manual for info about stemming. Default is -# no. - -#PropertyNames author -# List of meta tags names that can be retrieved with the -p option. -# Index size increases as by the formula in the manual. -# Comment out if no PropertyNames. Case insensitive - -IgnoreTotalWordCountWhenRanking yes -# Put yes to ignore the total number of words in the file -# when calculating ranking. Often better with merges and -# small files. Default is no. - -#ReplaceRules remove "ghill/" -#ReplaceRules replace "[a-z_0-9]*_m.*\.html" "index.html" -#ReplaceRules replace "/ghill" "moreghillmore" -# ReplaceRules allow you to make changes to file pathnames -# before they're indexed. This directive uses C library -# regex.h regular expressions. -# NOTE: do not use replace "" to remove a string, -# use remove instead - you might get a core dump otherwise. - -MinWordLimit 2 -# Set the minimum length of an indexable word. Every shorter word -# will not be indexed. -# Commenting out the line will give the defaults - -#MaxWordLimit 5 -# Set the maximum length of an indexable word. Every longer word -# will not be indexed. -# Commenting out the line will give the defaults - -#WordCharacters abcdefghijklmnopqrstuvwxyz\&#;0123456789.@|,-'"[](~!@$%^{}_+? -# WORDCHARS is a string of characters which SWISH permits to -# be in words. Any strings which do not include these characters -# will not be indexed. You can choose from any character in -# the following string: -# -# abcdefghijklmnopqrstuvwxyz0123456789_\|/-+=?!@$%^'"`~,.[]{}() -# -# Note that if you omit "0123456789&#;" you will not be able to -# index HTML entities. DO NOT use the asterisk (*), lesser than -# and greater than signs (<), (>), or colon (:). -# -# Including any of these four characters may cause funny things to happen. -# NOTE: Do not escape \ nor " and they cannot be the first letter in the string -# Commenting out the line will give the defaults - -#BeginCharacters m" -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -#EndCharacters \"\ -# Of the characters that you decide can go into words, this is -# a list of characters that words can begin with. It should be -# a subset of (or equal to) WordCharacters -# Same rule of syntax as for WordCharacters - -# IgnoreLastChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the end. It is important to also -# set the given char's in the ENDCHARS array, otherwise the word will not -# be indexed because considered invalid. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -# IgnoreFirstChar -# Array that contains the char that, if considered valid in the middle of -# a word need to be disreguarded when at the beginning. This was to solve -# the problem of parenthesis when there is no space between ( and the -# beginning of the word. -# Remember to add the char's to the BEGINCHARS list also. -# Commenting out the line will give the defaults -# NOTE: if " is the first char in the string it needs to be escaped with \ -# Do not escape otherwise - -IgnoreLimit 50 1000 -# This automatically omits words that appear too often in the files -# (these words are called stopwords). Specify a whole percentage -# and a number, such as "80 256". This omits words that occur in -# over 80% of the files and appear in over 256 files. Comment out -# to turn of auto-stopwording. - -#IgnoreWords SwishDefault -# The IgnoreWords option allows you to specify words to ignore. -# Comment out for no stopwords; the word "SwishDefault" will -# include a list of default stopwords. Words should be separated by spaces -# and may span multiple directives. - -IndexComments 0 -# This option allows the user decide if to index the comments in the files -# default is 1. Set to 0 if comment indexing is not required. - -################################## -# DIRECTIVES for FILESYSTEMS ONLY -# Comment out if using HTTP -################################### - -#IndexOnly .html .q -# Only files with these suffixes will be indexed. - -NoContents .gif .xbm .au .mov .mpg .pdf .ps .jpg .jpeg -NoContents .gz .Z .tar .tgz .mbox .hqx .zip .ZIP .HQX .ARJ .arj .bin .dat -NoContents .exe -# Files with these suffixes will not have their contents indexed - -# only their file names will be indexed. - -FileRules pathname contains CVS RCS cgi-bin tmp -FileRules pathname contains .*dir1 -FileRules pathname contains private -FileRules filename contains % ~ .bak .orig .old old. # -#FileRules title contains construction example pointers -FileRules directory contains .htaccess -#FileRules filename is index -# Files matching the above criteria will *not* be indexed. -# The patter matching uses the C library regex.h - -################################ -# DIRECTIVES for HTTP METHOD ONLY -# Comment out if using FILESYSTEM -################################## - -#MaxDepth 15 -#(default 5) This defines how many links the spider should -#follow before stopping. A value of 0 configures the spider to -#traverse all links - -#Delay 60 -#(default 60) The number of seconds to wait between issuing -#requests to a server. - -#TmpDir /tmp/ -#(default /var/tmp) The location of a writeable temp directory -#on your system. The HTTP access method tells the Perl helper to place -#its files there. - -#SpiderDirectory ./ -#(default ./) The location of the Perl helper -#script. Remember, if you use a relative directory, it is relative to -#your directory when you run SWISH-E, not to the directory that SWISH-E -#is in. - -#EquivalentServer http://asim.lip6.fr http://www-asim.lip6.fr -# EquivalentServer http://sunsite.berkeley.edu:2000 http://sunsite.berkeley.edu -#(default nothing) This allows you to deal with -#servers that use respond to multiple DNS names. Each line should have -#a list of all the method/names that should be considered equivalent. -#If you have multiple directives, each one defines its own set of equivalent -#servers. - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/alliance.dat b/dev/cvslargo/www/cgi-bin/czo/alliance.dat deleted file mode 100644 index 43b0a7c4..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/alliance.dat and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/allsite.dat b/dev/cvslargo/www/cgi-bin/czo/allsite.dat deleted file mode 100644 index bedf36af..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/allsite.dat and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/alml.dat b/dev/cvslargo/www/cgi-bin/czo/alml.dat deleted file mode 100644 index cc9a3e12..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/alml.dat and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/counter.cgi b/dev/cvslargo/www/cgi-bin/czo/counter.cgi deleted file mode 100755 index 296a6b5c..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/counter.cgi +++ /dev/null @@ -1,147 +0,0 @@ -#!/usr/local/bin/perl -####################################################################### -# Audric's Counter v1.0 FREEWARE -# Full copyright and legal speak at: -# http://www.aimsweb.com/goodies/counter2.htm -# -# Inspired on Matt's Wright Counter program -# Matt's Script Archive http://www.worldwidemart.com/scripts/ -####################################################################### - -# Define Variables - -### FILE AND DIRECTORY LOCATIONS, REFERERS ### -$count_file = "/users/cao7/czo/public_html/cgi-bin/count.txt"; # must be chmod 777 -$digit_dir = "/ssi/"; -$access_log = "/users/cao7/czo/public_html/cgi-bin/access_log"; # must be chmod 777 -$error_log = "/users/cao7/czo/public_html/cgi-bin/error_log"; # must be chmod 777 - -# If someone wants to use your counter from theri pages and their domain -# is not contained into @refers show them this gif. -$bad_referer_img = "http://www.aimsweb.com/images/bad_referer.gif"; - -# Domains you want to allow to use this script -@referers=( - "lip6.fr", - "127.0.0.1" -); - -### IMAGE SETTINGS ### -# If you change the 0-9.gif set make sure you chage those accordingly -$width = "9"; -$height = "20"; - -### OPTIONS ### -$uselog = "1"; # 1 = YES; 0 = NO - -# Done - You shouldn't need to change anything below this line.. -####################################################################### - -################# -# Get the Date For Logging Purposes -if ($uselog == 1) { - ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time); - $mon++; # fixes Matt's Counter bug - if ($sec < 10) { $sec = "0$sec"; } - if ($min < 10) { $min = "0$min"; } - if ($hour < 10) { $hour = "0$hour"; } - if ($mday < 10) { $mday = "0$mday"; } - if ($mon < 10) { $monc = "0$mon"; } - $date = "$hour\:$min\:$sec $mon/$mday/$year"; -} - -################# -# Make Sure People Aren't Messing With the Counter From Other Web Pages -#&check_referer; - -################# -# Get the Counter Number And Write New One to File -&get_num; - -################# -# Determine Length of Counter Number -# Set Individual Counter Numbers Into Associative Array -$savedcount=$count; -$num = $length = length($count); -while ($num > 0) { - $CHAR{$num} = chop($count); - $num--; -} - -################# -# Generates HTML to use pre-generated GIFs -$j = 1; -$myNumber=""; -while ($j <= $length) { - $myNumber .= ""; - $j++; -} - -################# -# Write the generated HTML to STDOUT -print "Content-Type: text/html\n\n"; -print "
$myNumber
\n"; - - -################# -# Log the Counter Access -if ($uselog == 1) { - &log_access; -} - -exit; - - -###################################################### -# SUBROUTINES -###################################################### - - -################# -sub check_referer { - if (@referers && $ENV{'HTTP_REFERER'}) { - foreach $referer (@referers) { - if ($ENV{'HTTP_REFERER'} =~ /$referer/) { - $ref = 1; - last; - } - } - } - else { - $ref = 1; - } - - if ($ref != 1) { - print "Content-Type: text/html\n\n $bad_referer_img\n\n"; - - if ($uselog == 1) { - open(LOG,">>$error_log") || die "Can't Open User Error Log: $!\n"; - print LOG "$error: $ENV{'REMOTE_HOST'} [$date] $ENV{'HTTP_REFERER'} - $ENV{'HTTP_USER_AGENT'}\n"; - close(LOG); - } - exit; - } -} - -################# -sub get_num { - open(COUNT,"$count_file") || die "Can't Open Count Data File: $!\n"; - $count = ; - close(COUNT); - if ($count =~ /\n$/) { - chop($count); - } - - $count++; - - open(COUNT,">$count_file") || die "Can't Open Count Data File For Writing: $!\n"; - print COUNT "$count"; - close(COUNT); -} - -################# -sub log_access { - open(LOG,">>$access_log") || die "Can't Open User Access Log: $!\n"; - print LOG "[$date] $ENV{'HTTP_REFERER'} - $ENV{'REMOTE_HOST'} - $ENV{'HTTP_USER_AGENT'}\n"; - close(LOG); -} diff --git a/dev/cvslargo/www/cgi-bin/czo/education.dat b/dev/cvslargo/www/cgi-bin/czo/education.dat deleted file mode 100644 index a02c7c81..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/education.dat and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/execasimut.cgi b/dev/cvslargo/www/cgi-bin/czo/execasimut.cgi deleted file mode 100755 index a9fea9aa..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/execasimut.cgi +++ /dev/null @@ -1,70 +0,0 @@ -#!/usr/local/bin/perl -w -use CGI; - -#start_multipart_form(); -$query = new CGI; - - -$TMP="/tmp/ExecAsimut.$$" ; - -mkdir ($TMP , 0777) ; - -print "Content-type: text/html\n\n"; -#while (($key, $val) = each %ENV) { -# print "$key = $val
\n"; -#} - -print "\n"; -print "\n"; -print " Simulation Asimut\n"; -print "\n"; -print "\n"; -print "
\n";
-
-       # Read a text file and print it out
- #                 while (<$filename>) {
-  #                   print "$_
\n\n"; - # } - -# $type = $query->uploadInfo($filename)->{'Content-Type'}; -# unless ($type eq 'text/html') { -# die "HTML FILES ONLY!"; -# } - -$filename = $query->param('vbe'); -#print "

$filename
\n\n"; - -# Copy a binary file to somewhere safe - open (OUTFILE,">>$TMP/description.vbe"); - while ($bytesread=read($filename,$buffer,1024)) { - print OUTFILE $buffer; - } - close (OUTFILE); - -$filename = $query->param('pat'); - - open (OUTFILE,">>$TMP/unproc_patterns.pat"); - while ($bytesread=read($filename,$buffer,1024)) { - print OUTFILE $buffer; - } - close (OUTFILE); - - - -#exec ( "( sleep 50 ; /asim/gnu/bin/rm -fr $TMP ) & " ) ; -#print "
Exec done...\n
"; - -open ( RESULT, "( cd $TMP ; . /users/soft5/newlabo/alliance/share/etc/alc_env.sh ; asimut -b description unproc_patterns res_patterns ) 2>&1 |" ); - -while () { -print ; -} -close RESULT ; -print "
done...\n
"; -print "
Vous pouvez recuper le fichier de pat simulé ici\n
"; -print "
\n"; - - -print "\n"; -print "\n"; - diff --git a/dev/cvslargo/www/cgi-bin/czo/flag.cgi b/dev/cvslargo/www/cgi-bin/czo/flag.cgi deleted file mode 100755 index 3a91555d..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/flag.cgi +++ /dev/null @@ -1,46 +0,0 @@ -#!/usr/local/bin/bash - -# disable filename globbing -set -f - -echo Content-type: text/plain -echo - -# echo "argc is '"$#"' argv is '"$*"'" -# pwd - -# echo $REQUEST_URI - -URI="${DOCUMENT_ROOT}${REQUEST_URI}" - -res=`echo $URI | grep \/$` -if [ X"$res"Y != XY ] -then - URI=${URI}index.html -fi - -URI_ROOT=`echo $URI | sed 's,\/[^\/]*$,/,'` -URI_DOC=`echo $URI | sed 's,^.*\/,,' | sed 's,\.gb\.html$,,' | sed 's,\.fr\.html$,,' | sed 's,\.html$,,'` - -#echo $URI_ROOT -#echo $URI_DOC - -FILE0="${URI_ROOT}${URI_DOC}.html" -FILE1="${URI_ROOT}${URI_DOC}.fr.html" -FILE2="${URI_ROOT}${URI_DOC}.gb.html" - - -if [ -f "$FILE0" -a -f "$FILE1" -a -f "$FILE2" ] -then - -cat << EOF - -
-[FRENCH] [ENGLISH] -
-
- -EOF - -fi - diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/doit b/dev/cvslargo/www/cgi-bin/czo/hit/doit deleted file mode 100755 index 83b0289a..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/hit/doit +++ /dev/null @@ -1,25 +0,0 @@ -mv HIT.CFG hit.cfg -mv HIT.CNT hit.cnt -mv HIT.FLK hit.flk -mv HIT.XBM hit.xbm -mv HIT1.DAT hit1.dat -mv HIT1.LOG hit1.log -mv HIT10.DAT hit10.dat -mv HIT11.DAT hit11.dat -mv HIT12.DAT hit12.dat -mv HIT2.DAT hit2.dat -mv HIT2.LOG hit2.log -mv HIT3.DAT hit3.dat -mv HIT4.DAT hit4.dat -mv HIT5.DAT hit5.dat -mv HIT6.DAT hit6.dat -mv HIT7.DAT hit7.dat -mv HIT8.DAT hit8.dat -mv HIT9.DAT hit9.dat -mv HITCFG.PL hitcfg.pl -mv HITMAN.PL hitman.pl -mv HITMAT.CGI hitmat.cgi -mv HITMAT.PWD hitmat.pwd -mv HITXBM.PL hitxbm.pl -mv HOW2HIT.TXT how2hit.txt -mv SINCE.XBM since.xbm diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit.cfg b/dev/cvslargo/www/cgi-bin/czo/hit/hit.cfg deleted file mode 100644 index 56d6433d..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/hit/hit.cfg +++ /dev/null @@ -1 +0,0 @@ -1|1|1|N| diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit.cnt b/dev/cvslargo/www/cgi-bin/czo/hit/hit.cnt deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit.flk b/dev/cvslargo/www/cgi-bin/czo/hit/hit.flk deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit.xbm b/dev/cvslargo/www/cgi-bin/czo/hit/hit.xbm deleted file mode 100644 index 09d8ed6c..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/hit/hit.xbm +++ /dev/null @@ -1,4 +0,0 @@ -#define hit_width 1 -#define hit_height 1 -static char hit_bits[] = { -0x00}; diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit1.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit1.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit1.log b/dev/cvslargo/www/cgi-bin/czo/hit/hit1.log deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit10.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit10.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit11.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit11.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit12.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit12.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit2.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit2.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit2.log b/dev/cvslargo/www/cgi-bin/czo/hit/hit2.log deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit3.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit3.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit4.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit4.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit5.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit5.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit6.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit6.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit7.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit7.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit8.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit8.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hit9.dat b/dev/cvslargo/www/cgi-bin/czo/hit/hit9.dat deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hitcfg.pl b/dev/cvslargo/www/cgi-bin/czo/hit/hitcfg.pl deleted file mode 100755 index f5bf92db..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/hit/hitcfg.pl +++ /dev/null @@ -1,215 +0,0 @@ -#! /usr/local/bin/perl -# -# HITCFG.PL -# File maintenance module required by HITMATIC -# -# Filename: hitcfg.pl -# Last revised: July 08, 1998 -# Copyright: 1997,1998 by Joe DePasquale -# E-Mail: crypt@getcruising.com -# Website: http://www.GetCruising.com -# -######################################################################## -# # -# This script and accompanying files may be distributed freely # -# and modified, provided this header with my name, E-Mail address and # -# this notice remain intact. Ownership rights remain with me. You may # -# not sell this script without my approval. # -# # -# This script comes with no guarantee or warranty except for my good # -# intentions. By using this code you agree to indemnify me from any # -# liability that might arise from it's use. # -# # -# There is no technical support for this script, neither am I a # -# professional programmer. Refer to 'HELPME.TXT' for further guidance. # -# # -######################################################################## - -sub checkCfg # Maintain hit.log, hitx.dat and hit.cfg -{ - open (CFG,"+<$HITCFG") || &endIt; - flock (CFG,2); seek (CFG,0,0); - $cfgFile = ; - ($logDay,$datMonth,$cntMonth,$cntFlag,$eol) = split (/\|/,$cfgFile); - - # If not done since midnight ... - - # If new day, add daily hits to month file - if ($logDay != $dayStamp) - { &newDay; - } - # If new month, empty last year's month file and update cfg - if ($datMonth+0 != $month) - { &newMonth; - } - # If new count, recount hits since cntMonth - if ($cntFlag eq 'Y') - { require "./hitxbm.pl"; - &newCount; - } - close (CFG); -} # end checkCfg - -sub newDay -{ - $HITDAT = "$HITMON$datMonth.dat"; - @dyinMon = (0,31,28,31,30,31,30,31,31,30,31,30,31); - $dyinMon = $dyinMon[$datMonth]; - - open (DAT,"+<$HITDAT") || &endIt; - flock (DAT,2); seek (DAT,0,0); - @hitDat = ; - - # Backup monthly data if trigger - if ($bakFlag eq 'Y' && ($jDate % $bakTime ==0) && !-e $HITBAK) - { &backUp (@hitDat); - } - - # add this month's hits to Tbl hash - foreach $hitLine (@hitDat) - { @hits = split (/\|/,$hitLine); - $page = $hits[0]; - - $Tbl{$page}[0] = $page; - for $day (1..$dyinMon) - { $Tbl{$page}[$day] += $hits[$day]; - } - $Index{$page} = 'Y'; - } - - # Read log file - open (LOG1,"+<$HITLOG1") || &endIt; - flock (LOG1,2); seek (LOG1,0,0); - @logFile = ; - - # add yesterday's hits to Tbl hash - foreach $logLine (@logFile) - { @log = split (/\|/,$logLine,3); - $page = $log[1]; - - # must create new line if no previous hits - if (!$Tbl{$page}[0]) - { $Tbl{$page}[0] = $page; - for $day (1..$dyinMon) - { $Tbl{$page}[$day] +=0; - } - $Index{$page} = 'Y'; - } - $Tbl{$page}[$logDay]++; - -# Count unique ip visitors per group on logday -# $group,$foo = split (/\+/,$page); -# if (!$Ip{$ENV{'REMOTE_ADDR'}}{$group} -# { $Ip{$ENV{'REMOTE_ADDR'}}{$group} = 'Y'; -# $Tbl{"~IP\+$group"}[$logDay] ++; -# } -# - - } - - # write updated Tbl back to file - seek (DAT,0,0); - - foreach $page (sort {uc($a) cmp uc($b)} keys %Index) - { $line = ''; - for $day (0..$dyinMon) - { $line .= "$Tbl{$page}[$day]\|"; - } - print DAT "$line\n"; - } - truncate (DAT,tell(DAT)); close (DAT); - - open (LOG2,">$HITLOG2") || &endIt; - flock (LOG2,2); seek (LOG2,0,0); - print (LOG2 @logFile); - truncate (LOG2,tell(LOG2)); close (LOG2); - - truncate (LOG1,0); close (LOG1); - - $logDay = $dayStamp; - &changeCfg; - -} # end newDay - -sub newMonth -{ - # Empty last year's month file and update cfg if new month - $datMonth = $month; - $HITDAT = "$HITMON$datMonth.dat"; - - open (DAT,">$HITDAT") || &endIt; - flock (DAT,2); - truncate (DAT,0); close (DAT); - &changeCfg; - -} # end newMonth - -sub newCount -{ - foreach $x (1..12) - { if (($cntMonth <= $monthStamp && $x >= $cntMonth && $x <= $monthStamp) - || ($cntMonth > $monthStamp && ($x <= $monthStamp || $x >= $cntMonth))) - { - $HITDAT = "$HITMON$x.dat"; - open (DAT,"<$HITDAT") || &endIt; - flock (DAT,1); seek (DAT,0,0); - while ($hitLine = ) - { @hits = split (/\|/,$hitLine); - $page = $hits[0]; - foreach $day (1..31) - { $PageTtl{$page} += $hits[$day]; - } - } - close (DAT); - } - } - # Create a new hit.cnt file with this data - while (($pagecode,$pagecount) = each %PageTtl) - { $addLine = join ("\|",$pagecount,$pagecode,"\n"); - push @inFile, $addLine; - } - @outFile = sort {($b =~ /(\d+)/)[0] <=> ($a =~ /(\d+)/)[0]} @inFile; - - open (CNT,">$HITCNT") || &endIt; - flock (CNT,2); seek (CNT,0,0); - print (CNT @outFile); - truncate (CNT,tell(CNT)); - close (CNT); - - if ($monthStamp >= $cntMonth) - { $year = $yearStamp +0; - } else - { $year = $yearStamp -1; - } - &makeXbm ("$cntMonth".substr("$year",2,2),4,"$hitmatDir/$SINCEXBM"); - - $cntFlag = ''; - &changeCfg; -} # end newCount - -sub changeCfg # update hit cfg file -{ - $cfgFile = join ("\|",$logDay,$datMonth,$cntMonth,$cntFlag,$eol); - seek (CFG,0,0); - print (CFG $cfgFile); - truncate (CFG,tell(CFG)); -} # end changeCfg - -sub backUp # Backup data and delete old backups -{ - @bakData = @_; - open (BAK,">$HITBAK") || &endIt; - print (BAK @bakData); - close (BAK); - chmod 0666, $HITBAK; - - opendir (BAKDIR,$bakDir); - @bakFiles = grep (/hit\d{3}\.bak/, readdir(BAKDIR)); - closedir (BAKDIR); - - foreach $bakFile (@bakFiles) - { if (-M "$bakDir/$bakFile" > $bakMax) { unlink "$bakDir/$bakFile"; } - } -} # end backup - -1; # return true diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hitman.pl b/dev/cvslargo/www/cgi-bin/czo/hit/hitman.pl deleted file mode 100755 index beb055ab..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/hit/hitman.pl +++ /dev/null @@ -1,435 +0,0 @@ -#! /usr/local/bin/perl -# -# HITMAN - The HITMATIC Manager -# Displays and reports various hit count statistics. -# -# Filename: hitman.pl -# Last revised: March 15, 1998 -# Copyright: 1997,1998 by Joe DePasquale -# E-Mail: crypt@getcruising.com -# Website: http://www.GetCruising.com -# -######################################################################## -# # -# This script and accompanying files may be distributed freely # -# and modified, provided this header with my name, E-Mail address and # -# this notice remain intact. Ownership rights remain with me. You may # -# not sell this script without my approval. # -# # -# This script comes with no guarantee or warranty except for my good # -# intentions. By using this code you agree to indemnify me from any # -# liability that might arise from it's use. # -# # -# There is no technical support for this script, neither am I a # -# professional programmer. Refer to 'HELPME.TXT' for further guidance. # -# # -######################################################################## - -sub hitman { - -@labels = ('Foo','Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'); -@dyinMon = (0,31,28,31,30,31,30,31,31,30,31,30,31); - -# Parse form input -read (STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); -@cgiPairs = split(/&/,$buffer); -foreach $cgiPair (@cgiPairs) -{ - ($name, $value) = split(/=/,$cgiPair); - $name =~ s/\+/ /g; $value =~ s/\+/ /g; - $name =~ s/%(..)/pack("c",hex($1))/ge; - $value =~ s/%(..)/pack("c",hex($1))/ge; - $Form{$name} .= "\0" if (defined($Form{$name})); - $Form{$name} .= "$value"; -} -undef $name; undef $value; - -print "Content-type: text/html\n\n"; -print "\n$headTitle\n"; -print "$bodyTag\n$bodyTitle

\n"; - -&passtest ($HITPWD); -print qq|

\n|; -print qq|\n|; - -######################################################################## -# Case: View Hit stats by year - -if ($Form{'hittable'}) -{ - if ($Form{'detail'} && $Form{'detail'} =~ /^(M|G|P)\|(.+)/) - { - if ($1 eq "M") # month - { $month = $2; - print "Hits By MONTH for: $labels[$month] "; - if ($monthStamp >= $month) {$year = $yearStamp +0;} else {$year = $yearStamp -1;} - print "$year
\n"; - if ($year %4 == 0) { $dyinMon[2] = 29; } - - # Read all data into hashes - $total = 0; - - $HITDAT = "$HITMON$month.dat"; - open (DAT,"<$HITDAT") || &endMan ("Read: $HITDAT"); - flock (DAT,1); seek (DAT,0,0); - - while ($line = ) - { @hits = split (/\|/,$line); - $page = $hits[0]; - if ($page =~ /(.+)\+(.+)/) { $group =$1; } - - foreach $day (1..$dyinMon[$month]) - { $Tbl{$page}{$day} += $hits[$day]; - $PageTtl{$page} += $hits[$day]; - if ($group) - { $Tbl{$group}{$day} += $hits[$day]; - $GroupTtl{$group} += $hits[$day]; - } - $DayTtl{$day} += $hits[$day]; - } - $total += $PageTtl{$page}; - } - close (DAT); - - @pages = sort {$PageTtl{$b} <=> $PageTtl{$a}} keys %PageTtl; - @groups = sort {$GroupTtl{$b} <=> $GroupTtl{$a}} keys %GroupTtl; - - print qq|\n|; - print qq|\n|; - - foreach $day (1..$dyinMon[$month]) { print qq||; } - print qq||; - - # print group hit rows - print qq|\n\n|; - - foreach $group (@groups) - { print qq|\n\n|; - foreach $day (1..$dyinMon[$month]) { print qq||; } - print qq||; - } - # print page hit rows - print qq|\n\n|; - - foreach $page (@pages) - { print qq|\n\n|; - foreach $day (1..$dyinMon[$month]) { print qq||; } - print qq||; - } - print qq|\n\n|; - - foreach $day (1..$dyinMon[$month]) { print qq||; } - print qq||; - print qq|\n

Days:
$dayGroup
/Page
Totals
GROUPS:
$group$Tbl{$group}{$day}$GroupTtl{$group}
PAGES:
$page$Tbl{$page}{$day}$PageTtl{$page}
Day Totals$DayTtl{$day}$total

Completed on $timeStamp\n

\n|; - } - else # group or page - { - print "Hits By "; - if ($1 eq "G") - { $group = $2; - print "GROUP for "$group""; - } else - { $page = $2; - print "PAGE for "$page""; - } - print "
\n"; - - # Read all data into hashes - $total = 0; - - foreach $month (1..12) - { $MonthTtl{$month} =0; - $HITDAT = "$HITMON$month.dat"; - open (DAT,"<$HITDAT") || &endMan ("Read: $HITDAT"); - flock (DAT,1); seek (DAT,0,0); - while ($line = ) - { @hits = split (/\|/,$line); - if ($hits[0] eq $page || $hits[0] =~ /^$group\+/) - { foreach $day (1..31) - { $Tbl{$month}{$day} += $hits[$day]; - $DayTtl{$day} += $hits[$day]; - $MonthTtl{$month} += $Tbl{$month}{$day}; - } - } - } - close (DAT); - $total += $MonthTtl{$month}; - } - print "\n"; - print "\n"; - - # Print col headers and order the months - $month = $monthStamp; - do - { if ($month == 12) {$month =1;} else {$month++;} - print "\n"; - push @monthCol, $month; - } until ($month == $monthStamp); - print ""; - - foreach $day (1..31) - { print "\n\n"; - foreach $month (@monthCol) { print ""; } - print ""; - } - print "\n\n"; - - foreach $month (@monthCol) { print ""; } - print ""; - print "\n

Months:

$labels[$month]
"; - if ($month > $monthStamp) {$year = $yearStamp -1;} else {$year = $yearStamp +0;} - print "$year
Day
Totals
$day$Tbl{$month}{$day}$DayTtl{$day}
Month Totals$MonthTtl{$month}$total

Completed on $timeStamp\n

\n"; - } - } - else # default by year - { - print "Hits By YEAR as of $timeStamp
\n"; - # Read all data into hashes - $total = 0; - foreach $month (1..12) - { $MonthTtl{$month} =0; - - $HITDAT = "$HITMON$month.dat"; - open (DAT,"<$HITDAT") || &endMan ("Read: $HITDAT"); - flock (DAT,1); seek (DAT,0,0); - while ($line = ) - { @hits = split (/\|/,$line); - $page = $hits[0]; - if ($page =~ /(.+)\+(.+)/) { $group =$1; } - $Tbl{$month}{$page} =0; - - foreach $day (1..31) - { $Tbl{$month}{$page} += $hits[$day]; - } - $PageTtl{$page} += $Tbl{$month}{$page}; - $MonthTtl{$month} += $Tbl{$month}{$page}; - - if ($group) - { $Tbl{$month}{$group} += $Tbl{$month}{$page}; - $GroupTtl{$group} += $Tbl{$month}{$page}; - } - } - close (DAT); - $total += $MonthTtl{$month}; - } - # Sort by descending page total - @pages = sort {$PageTtl{$b} <=> $PageTtl{$a}} keys %PageTtl; - @groups = sort {$GroupTtl{$b} <=> $GroupTtl{$a}} keys %GroupTtl; - - print "\n"; - print "\n"; - - # Print col headers and order the months - $month = $monthStamp; - do - { if ($month == 12) {$month =1;} else {$month++;} - print "\n"; - push @monthCol, $month; - } until ($month == $monthStamp); - print ""; - - # print group hit rows - print "\n\n"; - foreach $group (@groups) - { print "\n\n"; - foreach $month (@monthCol) { print ""; } - print ""; - } - - # print page hit rows - print "\n\n"; - foreach $page (@pages) - { print "\n\n"; - foreach $month (@monthCol) { print ""; } - print ""; - } - # print month subtotal row - print "\n\n"; - - foreach $month (@monthCol) { print ""; } - print ""; - print "\n

Months:

$labels[$month]
"; - if ($month > $monthStamp) {$year = $yearStamp -1;} else {$year = $yearStamp +0;} - print "$year
Group
/Page
Totals
GROUPS:
$group$Tbl{$month}{$group}$GroupTtl{$group}
PAGES:
$page$Tbl{$month}{$page}$PageTtl{$page}
Month Totals$MonthTtl{$month}$total

\n"; - } # end default by year - - print <<__HITFORM; - - - - - - - -
Hit Tables
For more detail select any MONTH, GROUP or PAGE button above, then..
PRESS:
Hit Counter
For the count DISPLAYED to users or to RESET counter date..
PRESS:
-__HITFORM - &manFooter; -} # end case hittable - -######################################################################## -# Case: Flag to reset hitcount at next daily maintenance - -elsif ($Form{'resetcount'}) -{ - open (LOCK,">$HITFLK") || &endMan ("Write: $HITFLK"); - if (!flock (LOCK,2)) { &endMan ("Lock: $HITFLK"); } - - # Write new cnt date to CFG - open (CFG,"+<$HITCFG") || &endMan ("Read\/Write: $HITCFG"); - flock (CFG,2); seek (CFG,0,0); - $cfgFile = ; - ($logDay,$datMonth,$cntMonth,$cntFlag,$eol) = split (/\|/,$cfgFile); - - $cntMonth = $Form{'setmonth'} +0; - $cntFlag = 'Y'; - $cfgFile = join ("\|",$logDay,$datMonth,$cntMonth,$cntFlag,$eol); - - seek (CFG,0,0); - print (CFG $cfgFile); - truncate (CFG,tell(CFG)); close (CFG); - close (LOCK); - - print "Hit Counter will be reset at next daily maintenance
\n to $labels[$cntMonth] 1, $year\n

\n"; - - &hitCount; - &manFooter; -} # end resetcount - -######################################################################## -# Default Case: Display hitcount - -else -{ &hitCount; - &manFooter; -} # end default -} # end hitman - -######################################################################## - -sub hitCount # Display hitcount -{ - open (CNT,"<$HITCNT") || &endMan ("Read: $HITCNT"); - flock (CNT,1); seek (CNT,0,0); - @hitFile = ; - close (CNT); - - print "\n\n"; - $hitTtl =0; - for ($x=0; $x<=$#hitFile; $x++) - { print "\n\n"; - ($count,$code,$eol) = split (/\|/,$hitFile[$x]); - if ($code =~/\+/) - { ($group,$page) = split (/\+/,$code); - $GroupTtl{$group} += $count; - } - print ""; - $hitTtl = $hitTtl + $count; - } - print "\n
HITSby PAGECODE
$count$code

\n"; - - if ($group) - { print "\n\n"; - @groups = sort {$GroupTtl{$b} <=> $GroupTtl{$a}} keys %GroupTtl; - foreach $group (@groups) - { print "\n\n"; - print ""; - } - print "\n
HITSby GROUP
$GroupTtl{$group}$group

\n"; - } - open (CFG,"<$HITCFG") || &endMan ("Read: $HITCNT"); - flock (CFG,1); seek (CFG,0,0); - $cfgFile = ; - close (CFG); - - ($logDay,$datMonth,$cntMonth,$cntFlag,$eol) = split (/\|/,$cfgFile); - - print "Total: $hitTtl hits for $x pages since $labels[$cntMonth] 1, "; - if ($monthStamp >= $cntMonth) {$year = $yearStamp +0;} else {$year = $yearStamp -1;} - print "$year\n
Completed at $timeStamp\n

\n"; - - print qq|\n\n|; - print qq|\n|; - - print qq|\n|; - print qq|\n|; - print qq|\n
Hit Counter\n|; - print qq|
To reset the counter and starting date, select a starting MONTH and press CHANGE. A new image of the SINCE date will also be created.
SINCE: \n \n|; - print qq|
Hit Tables
For ALL hits by MONTH, GROUP or PAGE
PRESS:
\n|; -} # end hitCount - -sub manFooter # print hitman footer -{ - print qq|

\nExit $headTitle\n|; - print qq|

HITMATIC is one of Joe's CGI Scripts From The Crypt!\n|; - print qq|

\n\n|; -} # end manFooter - -sub passtest # password routines -{ - $PASSFILE = $_[0]; - if (-s $PASSFILE) - { if ($Form{'password'}) - { open (PASS,"<$PASSFILE"); - $passcode = ; - close (PASS); - chop ($passcode) if $passcode =~ /\n$/; - $lp = length $Form{'password'}; - $salt = substr($Form{'password'},$lp-2,1).substr($Form{'password'},1,1); - if ($passcode eq crypt ($Form{'password'},$salt)) - { if ($Form{'newpassword'}) - { $lp = length $Form{'newpassword'}; - if ($Form{'newpassword'} =~ /^\w{$lp}\b/) - { $Form{'password'} = $Form{'newpassword'}; - $salt = substr($Form{'password'},$lp-2,1).substr($Form{'password'},1,1); - $passcode = crypt ($Form{'password'},$salt); - open (PASS,">$PASSFILE"); - print PASS "$passcode"; - close (PASS); - } else - { &passbox ("Bad choice, Creep!!"); - } - } - } else - { &passbox ("Wrong, Creep!!"); - } - } else - { &passbox ("What's the Password, Creep?"); - } - } else - { &endMan ("Password File $PASSFILE Not Found"); - } -} -sub passbox -{ - print <<__PASSBOX; -

- - - - - -
$_[0]
Enter Password:
Change Password:

- Password must be 4 to 12 alpha-numeric characters.
-

-__PASSBOX - exit; -} # end passbox - -sub endMan # Error handling for manager scripts -{ - print "ERROR:
$_[0]
\n

"; - if ($!) { print "Server made a Boo-Boo! $!\n"; } - else { print "Use your browser's [BACK] button and try again.\n"; } - print "

\n"; - exit; -} # end endMan - -1; # return true diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hitmat.cgi b/dev/cvslargo/www/cgi-bin/czo/hit/hitmat.cgi deleted file mode 100755 index f0aea258..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/hit/hitmat.cgi +++ /dev/null @@ -1,223 +0,0 @@ -#! /usr/local/bin/perl -w -# -# HITMATIC -# Maintains counts for a page or all pages and logs accesses. -# Can optionally output the count to the browser. -# -# Filename: hitmat.cgi -# Last revised: July 08, 1998 -# Copyright: 1996-1998 by Joe DePasquale -# E-Mail: crypt@getcruising.com -# Website: http://www.GetCruising.com -# -######################################################################## -# # -# This script and accompanying files may be distributed freely # -# and modified, provided this header with my name, E-Mail address and # -# this notice remain intact. Ownership rights remain with me. You may # -# not sell this script without my approval. # -# # -# This script comes with no guarantee or warranty except for my good # -# intentions. By using this code you agree to indemnify me from any # -# liability that might arise from it's use. # -# # -# There is no technical support for this script, neither am I a # -# professional programmer. Refer to 'HELPME.TXT' for further guidance. # -# # -######################################################################## -# -# 2. CONFIGURE SCRIPT - -# -# Change these sample paths to the actual paths on your server: - -# Your Unix system date command -$dateCmd = '/bin/date'; - -# Unix path to hitmat directory -$hitmatDir = '/users/largo1/czo/cvslargo/www/cgi-bin/czo/hit'; - -# URL path to hitmat.cgi -$scriptUrl = 'http://asim.lip6.fr/cgi-bin/czo/hit/hitmat.cgi'; - -# URL path to hitmat directory -$hitmatUrl = 'http://asim.lip6.fr/cgi-bin/czo/hit/'; - -# Go to this URL when exiting manager -$exitUrl = 'http://asim.lip6.fr/'; - -# Log will record hit but exclude domain names matching this tail -$myTail = '.li.fr'; - -# OPTIONAL - You can edit these variables if desired: - -# File Maintenance is triggered each day when the FIRST HIT between -# midnight and $trigHour is received. This will 1) swap 'hit1.log' and -# 'hit2.log' and 2) initialize a 'hitx.dat' file on the first day of a -# month. You can use any 24-hour time from 1 (1 AM) to 23 (11 PM). -$trigHour = 06; - -$headTitle = "HITMATIC Website Counter System"; -$bodyTag = qq||; -$bodyTitle = qq|i>HITMATIC|; - -# Change the table border size? (0 = no border) -$border = 0; - -# If you DON'T want to backup the hit*.dat files, set $bakFlag to 'N', -# otherwise set the correct values in the 'if' loop .. -$bakFlag = 'Y'; - -if ($bakFlag eq 'Y') -{ $bakTime = 1; # days btwn backups - $bakMax = 7; # days to keep backups - - # Unix path to backup directory - $bakDir = '/usr/home/you/htdocs/bak'; - -# END OF INSTALLATION - SHOULD NOT CHANGE STUFF BELOW THIS LINE -######################################################################## - - chop ($jDate = `$dateCmd +"%j"`); - $HITBAK = "$bakDir/hit$jDate.bak"; -} -chop ($dayStamp = `$dateCmd +"%e"`); $dayStamp =~ s/\s*//g; -chop ($hourStamp = `$dateCmd +"%H"`); -chop ($timeStamp = `$dateCmd +"%a %D %H%M%Z"`); -chop ($dateStamp = `$dateCmd +"%Y%m%d"`); -$yearStamp = substr ($dateStamp,0,4); -$monthStamp = substr ($dateStamp,4,2); -$month = $monthStamp +0; - -$HITCFG = "$hitmatDir/hit.cfg"; -$HITCNT = "$hitmatDir/hit.cnt"; -$HITDAT = "$hitmatDir/hit$month.dat"; -$HITFLK = "$hitmatDir/hit.flk"; -$HITLOG1 = "$hitmatDir/hit1.log"; -$HITLOG2 = "$hitmatDir/hit2.log"; -$HITMON = "$hitmatDir/hit"; -$HITXBM = "$hitmatDir/hit.xbm"; -$SINCEXBM = "since.xbm"; - -######################################################################## -# Read GET or POST input and setup stuff - -if (-e "./referer.pl") -{ require "./referer.pl"; - &referer; -} -if ($ENV{'QUERY_STRING'} eq 'manager' || $ENV{'REQUEST_METHOD'} eq 'POST') -{ require "./hitman.pl"; - require "./hitxbm.pl"; - $HITPWD = "$hitmatDir/hitmat.pwd"; - &hitman; - exit; -} elsif ($ENV{'QUERY_STRING'} =~ /(\S+?)(\+(\S))?=(\S+?)(&.*|$)/) -{ $pagecode =$1; $group =$3; $command =$4; - if ($group) { $pagecode = "$group\+$pagecode"; } -} else -{ &endIt; -} - -open (LOCK,">$HITFLK") || &endIt; -if (!flock (LOCK,2)) { &endIt; } - -# Daily maintenance if trigger time -if ($hourStamp < $trigHour) -{ require "./hitcfg.pl"; - &checkCfg; -} - -# Add hit to main counter -open (CNT,"+<$HITCNT") || &endIt; -flock (CNT,2); seek (CNT,0,0); -@inFile = ; -$recNbr = 0; $foundFlag = 'N'; - -while (($recNbr <= $#inFile) && ($foundFlag eq 'N')) -{ ($count,$code,$eol) = split(/\|/,$inFile[$recNbr]); - if ($code eq $pagecode) - { if ($count < 999999) {$count++;} else {$count =1;} - $inFile[$recNbr] = join ("\|",$count,$pagecode,"\n"); - $foundFlag = 'Y'; - } - $recNbr++; -} -if ($foundFlag eq 'N') # new page -{ $count =1; - $addLine = join ("\|",$count,$pagecode,"\n"); - push @inFile, $addLine; -} -@outFile = sort {($b =~ /(\d+)/)[0] <=> ($a =~ /(\d+)/)[0]} @inFile; - -seek (CNT,0,0); -print (CNT @outFile); -truncate (CNT,tell(CNT)); close (CNT); - -# Make the XBM image according to COMMAND -if ($command eq "PAGE") -{ require "./hitxbm.pl"; - &makeXbm ($count,6,$HITXBM); -} -elsif ($command eq "GROUP") -{ require "./hitxbm.pl"; - open (CNT,"<$HITCNT") || &endIt; - flock (CNT,1); seek (CNT,0,0); - @inFile = ; - close (CNT); - $groupTtl = 0; - foreach $inLine (@inFile) - { if ($inLine =~ /^\d+\|$group\+/) - { ($count,$code,$eol,) = split(/\|/,$inLine); - $groupTtl += $count; - } - } - &makeXbm ($groupTtl,6,$HITXBM); -} -elsif ($command eq "SITE") -{ require "./hitxbm.pl"; - open (CNT,"<$HITCNT") || &endIt; - flock (CNT,1); seek (CNT,0,0); - @inFile = ; - close (CNT); - $siteTtl = 0; - foreach $inLine (@inFile) - { ($count,$code,$eol,) = split(/\|/,$inLine); - $siteTtl += $count; - } - &makeXbm ($siteTtl,6,$HITXBM); -} -elsif ($command eq "NONE") -{ open (XBM,">$HITXBM"); - flock (XBM,2); seek (XBM,0,0); - print (XBM "#define hit_width 1\n"); - print (XBM "#define hit_height 1\n"); - print (XBM "static char hit_bits[] = { 0x00 };\n"); - truncate (XBM,tell(XBM)); - close (XBM); -} -# Send the XBM image to Stdout -if ($command ne "IMG") -{ print "Content-type: image/x-xbitmap\n\n"; - print `cat $HITXBM`; -} - -# Record hit in the log -$hitLine = join ("\|",$timeStamp,$pagecode,$command,$banNbr,$ENV{'REMOTE_HOST'},$ENV{'HTTP_USER_AGENT'}); -if ($ENV{'HTTP_REFERER'} !~ /$myTail/i) -{ $hitLine .= "\|$ENV{'HTTP_REFERER'}"; -} -if (open (LOG,">>$HITLOG1")) -{ flock (LOG,2); seek (LOG,0,2); - print (LOG "$hitLine\n"); - close (LOG); -} -close (LOCK); -exit; - -# end main program -###################################################################### - -sub endIt # exit on error -{ exit; -} # end endIt - diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hitmat.pwd b/dev/cvslargo/www/cgi-bin/czo/hit/hitmat.pwd deleted file mode 100644 index accd4519..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/hit/hitmat.pwd +++ /dev/null @@ -1 +0,0 @@ -raPko.wpxNfW2 \ No newline at end of file diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/hitxbm.pl b/dev/cvslargo/www/cgi-bin/czo/hit/hitxbm.pl deleted file mode 100755 index 898220be..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/hit/hitxbm.pl +++ /dev/null @@ -1,72 +0,0 @@ -#! /usr/local/bin/perl -# -# HITXBM.PL - Module required by hitmat.cgi -# -# Copyright: 1996,1997,1998 by Joe DePasquale -# Last revised: January 28, 1997 -# E-Mail: crypt@getcruising.com -# Website: http://www.GetCruising.com -# -########################################################################### -# The bitmap data file @gened is used with the author's permission. -# number.xbm (C) 1994 Eugene E. Devereaux -# Adapted for UUNET (NCSA httpd) by David MacKenzie -########################################################################### - -# Sub: Make an x-bitmap image of the count - -sub makeXbm -{ - ($printTtl,$digits,$XBM) = @_; - - $printTtl = substr ($printTtl,0); - $pad = $digits - length ($printTtl); - $xbmWidth = $digits * 16; - - for ($x=0; $x<$digits; $x++) - { if ($x<$pad) { $printTtl = "0".$printTtl; } - push @xbmNbr, substr ($printTtl,$x,1); - } - - # assign bitmap byte octals for numbers 0..9 to list of lists - @gened = ( - ['00','00','e0','07','f0','0f','30','0c','30','0c','30','0c','30','0c','30','0c', - '30','0c','30','0c','30','0c','30','0c','30','0c','f0','0f','e0','07','00','00'], - ['00','00','80','01','c0','01','e0','01','80','01','80','01','80','01','80','01', - '80','01','80','01','80','01','80','01','80','01','e0','07','e0','07','00','00'], - ['00','00','e0','07','f8','1f','18','18','18','18','18','1c','00','0e','00','07', - '80','03','c0','01','e0','00','70','00','38','00','f8','1f','f8','1f','00','00'], - ['00','00','f0','07','f0','0f','30','0c','00','0c','00','0c','00','0c','c0','0f', - 'c0','0f','00','0c','00','0c','00','0c','30','0c','f0','0f','f0','07','00','00'], - ['00','00','00','06','00','0f','80','0f','c0','0d','e0','0c','70','0c','f0','0f', - 'f0','0f','00','0c','00','0c','00','0c','00','0c','00','0c','00','0c','00','00'], - ['00','00','e0','0f','f0','0f','30','00','30','00','30','00','30','00','f0','07', - 'e0','0f','00','0c','00','0c','00','0c','30','0c','f0','07','e0','03','00','00'], - ['00','00','20','00','30','00','30','00','30','00','30','00','30','00','f0','07', - 'f0','0f','30','0c','30','0c','30','0c','30','0c','f0','0f','e0','0f','00','00'], - ['00','00','f0','0f','f0','0f','30','0c','30','0c','00','06','00','03','00','03', - '80','01','80','01','c0','00','c0','00','60','00','60','00','60','00','00','00'], - ['00','00','e0','07','f0','0f','30','0c','30','0c','30','0c','60','06','c0','03', - 'c0','03','60','06','30','0c','30','0c','30','0c','f0','0f','e0','07','00','00'], - ['00','00','e0','07','f0','0f','30','0c','30','0c','30','0c','e0','0f','c0','0f', - '00','0e','00','0e','00','07','80','03','c0','01','e0','00','60','00','00','00'], - ); - - # create image file of printTtl - open (XBM,">$XBM"); - flock (XBM,2); seek (XBM,0,0); - print (XBM "#define hit_width $xbmWidth\n"); - print (XBM "#define hit_height 16\n"); - print (XBM "static char hit_bits[] = {\n"); - - for ($y=0; $y<=30; $y=$y+2) - { foreach $x (@xbmNbr) - { print (XBM "0x$gened[$x][$y],0x$gened[$x][$y+1],"); - } - print (XBM "\n"); - } - print (XBM "};\n"); - truncate (XBM,tell(XBM)); close (XBM); -} # end makeXbm - -1; # return true diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/how2hit.txt b/dev/cvslargo/www/cgi-bin/czo/hit/how2hit.txt deleted file mode 100644 index c3e5c71a..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/hit/how2hit.txt +++ /dev/null @@ -1,185 +0,0 @@ -Installation and Usage - for HITMATIC Website Hit Statistics System - - This copy of HITMAT.ZIP contains the latest revised - edition with all required files for a complete installation. - - Revision Date: hitmat.zip - July 8, 1998 - Copyright: 1996,1997,1998 by Joe DePasquale - E-Mail: crypt@getcruising.com - Website: http://www.GetCruising.com - -======================================================================== - This application is for Unix web servers running Perl 5.0 or higher. - -Additional documentation is available at http://www.GetCruising/crypt - helpme.txt - How to install Perl scripts on a Unix server. - whatsnew.txt - Revision history for all 'CGI Scripts from the Crypt'. - - Also visit the "Users' Self-Support Forum" to post questions and - answers, especially if you have some extra time, knowledge and - a desire to help some other poor lost souls! - -THERE IS *NO* FREE *NOR* FEE-BASED TECHNICAL SUPPORT FOR THESE SCRIPTS! - Due to extremely limited time, E-Mail with technical support - questions WILL NOT BE ANSWERED! Please use the available resources - here and elsewhere on the WWW to solve problems. - E-Mail genuine bug reports to: crypt@getcruising.com - -======================================================================== - -WHAT IT DOES: - -HITMATIC can become as complex and valuable as you wish. At its simplest, -it can display the hitcount for a page to your visitors. At your option, -it can also be configured for complete website tracking and analysis. - -Input to the script comes from special image tags that you place on each -web page that you want included in the system. When a browser loads -one of these pages it expects to receive a graphic from the URL in the -tag. Instead, the URL runs HITMATIC which counts and categorizes the hit, -does some maintenance stuff and finally creates the graphic (an X-Bitmap) -and outputs it to the browser. - -Why X-Bitmap? Of the 3 standard image formats that web browsers can -display (.jpg, .gif and .xbm) this is the only one that uses an ASCII -file format and can be created by simple math. The overhead of having -to include a compiled jpg or gif generator is avoided, and HITMATIC -uses resources to calculate stats rather than displays pretty fonts. - -To learn more about X-Bitmaps, read the comments in 'hitxbm.pl'. - -'hit1.log' and 'hit2.log' save todays' and yesterday's hit data with -one line per hit (date, time, $pagecode, $command, user's IP address, -cookies and referring page). 'hitcfg.pl' runs daily file maintenance, -'hitxbm.pl' creates the XBM-BITMAP images of the hitcounts. - -Twelve files numbered hit1.dat - hit12.dat which each hold hit -counts by day and pagecode for one month. - -The manager module (hitman.pl) gives you a choice of statistical tables -showing counts by month, by page, by group or full year. - -The 'By YEAR' table starts 12 months ago and ends at the end of current -month. The grid shows the total hits by month for each group and each -page, ranked most to least popular. 'By MONTH' shows the hits for one -month on a daily basis. 'By PAGE' shows the hits for one page on a yearly -basis. - -The HIT COUNTER shows the current hit count for each page since last -reset. You can reset the counter to any month in the pop-up box, and -HITMATIC will recalculate hits from data in the monthly hit files also -making a new 'since.xbm' image of the month and date which can be -displayed. - -Daily file maintenance is run when the first visitor of the day causes -HITMATIC to run. Several things happen: 'hit1.log' is read and all hits -for the previous day are added to the monthly data files. If it's the -first day of a new month, last year's month file is emptied. 'hit1.log' -is renamed 'hit2.log', yesterday's 'hit2.log' is emptied and renamed -'hit1.log'. Finally, if a new hit count was requested since the last -maintenance, the 'hit.cnt' file is recalculated. - -HITMATIC uses the Perl 'flock' function to prevent simultaneous -changes (corruption) of data files. - -======================================================================== - -INSTALLATION: - -1. SETUP YOUR FILES - - -Open 'hit.cfg' in a text editor. The default file is '1|1|1|N|'. Change -the first '1' to current day-of-month (1-31), the second '1' to current -month (1-12). Leave the other fields as is and save the file. Hereafter, -these values will be read, changed and written by the script(s) so no -further editing should be required. - -Add a reference to each HTML page to be counted, following this example: - - -You will need to make these substitutions -- - -'PAGECODE' is a unique name (with NO SPACES) for the page being counted. -It can be real or symbolic (albert/home.html, links, page1, etc.). - -'GROUPCODE' is optional but you can subdivide your hitcounts into -subject areas. Use a SINGLE letter or number for each group. - -'COMMAND' tells the script which count to output on the page -- - 'SITE' - display total hits to website, - 'GROUP' - display hits for a group, - 'PAGE' - display hits for a page, or - 'NONE' - display nothing, i.e. sends a null bitmap image. - -Example of a full site hitcount displayed on my 'index.html' page: - - Pages Served Since Last Reset - -Note the PAGECODE is 'index', GROUPCODE is 'G' and COMMAND is 'SITE'. - -As in the example, you can include an image tag for 'since.xbm' -to display the date (MMYY) when counter was last reset. - -Adding width and height tags allows the page to load quicker -- - For 'SITE, 'GROUP' and 'PAGE' use 'width=96 height=16', - For 'NONE' use 'width=0 height=0', - For 'since.xbm' use 'width=64 height=16'. - - -2. CONFIGURE THE SCRIPT - - -Open the main script file 'hitmat.cgi' in a text editor and change -the sample paths in the "CONFIGURE THE SCRIPT" section, -following the instructions found there. - - -3. UPLOAD FILES AND SET (CHMOD) PERMISSIONS - - -All files should be uploaded in ASCII mode (yes even the .xbm's). - -Place 'hitmat.cgi' (755), 'hitcfg.pl' (644), 'hitman.pl' (644) -and 'hitxbm.pl' (644) into your main cgi directory. - -Create a directory named 'hitmat' (755) and place 'hit.cfg' (666), -'hit.cnt' (666), 'hit.flk' (666), 'hit1.log' (666), 'hit2.log' (666), -'hit.xbm' (666), 'hitmat.pwd' (666) plus the 12 files 'hit1.dat' -thru 'hit12.dat' (666) there. - -If you enable the back-up option, create an empty directory named -'bak' (777) which can be shared with my other scripts that make -back-up files. This directory MUST be world-writeable! - -======================================================================== - -HOW TO USE IT: - -If set up correctly (!) just sit back and watch (?) as the script -and your visitors do all the work. - -To RUN HITMATIC MANAGER, use 'manager' as a query-string. - -Examples - - http://www.GetCruising.com/cgibin/hitmat.cgi?manager - -The response should be the password authorization form. The -initial password is 'password'. Of course you should change it soon -to something unique by entering a new password in the -'Change Password' box. - -The default HIT TABLE is 'By YEAR' starting 12 months ago and ending at -the end of current month. To switch to detailed displays 'By MONTH', -'By GROUP' or 'By PAGE', select a radio button and press 'HIT TABLES'. -You can switch between displays in the same way. - -Select 'HIT COUNTER' for a list of current hit count for each page -since last reset. To reset the counter to the beginning of a month, -select a starting month in the pop-up box, then press 'CHANGE'. - -======================================================================== - -What are you reading this for? DO IT! - diff --git a/dev/cvslargo/www/cgi-bin/czo/hit/since.xbm b/dev/cvslargo/www/cgi-bin/czo/hit/since.xbm deleted file mode 100644 index 74947b56..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/hit/since.xbm +++ /dev/null @@ -1,20 +0,0 @@ -#define hit_width 64 -#define hit_height 16 -static char hit_bits[] = { -0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, -0xe0,0x07,0xf0,0x07,0xe0,0x07,0xf0,0x0f, -0xf0,0x0f,0xf0,0x0f,0xf0,0x0f,0xf0,0x0f, -0x30,0x0c,0x30,0x0c,0x30,0x0c,0x30,0x0c, -0x30,0x0c,0x00,0x0c,0x30,0x0c,0x30,0x0c, -0x30,0x0c,0x00,0x0c,0x30,0x0c,0x00,0x06, -0x30,0x0c,0x00,0x0c,0xe0,0x0f,0x00,0x03, -0x30,0x0c,0xc0,0x0f,0xc0,0x0f,0x00,0x03, -0x30,0x0c,0xc0,0x0f,0x00,0x0e,0x80,0x01, -0x30,0x0c,0x00,0x0c,0x00,0x0e,0x80,0x01, -0x30,0x0c,0x00,0x0c,0x00,0x07,0xc0,0x00, -0x30,0x0c,0x00,0x0c,0x80,0x03,0xc0,0x00, -0x30,0x0c,0x30,0x0c,0xc0,0x01,0x60,0x00, -0xf0,0x0f,0xf0,0x0f,0xe0,0x00,0x60,0x00, -0xe0,0x07,0xf0,0x07,0x60,0x00,0x60,0x00, -0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, -}; diff --git a/dev/cvslargo/www/cgi-bin/czo/index.html b/dev/cvslargo/www/cgi-bin/czo/index.html deleted file mode 100644 index 20c20858..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/index.html +++ /dev/null @@ -1,34 +0,0 @@ - - - - - - - - - - - - - -

ERROR :

- -

 

- -

This page does not -exist.

- -

Please notify its -maintainer.

- -

( You can use the -link on the lower left corner of this page to mail its -maintainer. )

- - - - - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/intranet.dat b/dev/cvslargo/www/cgi-bin/czo/intranet.dat deleted file mode 100644 index 9aebc860..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/intranet.dat +++ /dev/null @@ -1,16 +0,0 @@ -# SWISH format 1.3 -# Swish-e format 1.3 -# -# Name: Asim Lab. index -# Saved as: intranet.dat -# Counts: -# Indexed on: 06/06/00 06:31:27 MEST -# Description: Index by Czo -# Pointer: http://www-asim.lip6.fr/ -# Maintained by: Czo [Olivier SIROL] -# DocumentProperties: Enabled -# Stemming Applied: 0 -000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000002480000000000000247800000000000024790000000000002479 - - -first author diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/-.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/-.gif deleted file mode 100644 index c6a7f0d7..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/-.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/0.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/0.gif deleted file mode 100644 index eac4e3e0..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/0.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/1.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/1.gif deleted file mode 100644 index e551ad76..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/1.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/2.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/2.gif deleted file mode 100644 index b5dea246..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/2.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/3.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/3.gif deleted file mode 100644 index 85472d0c..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/3.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/4.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/4.gif deleted file mode 100644 index 4958feaf..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/4.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/5.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/5.gif deleted file mode 100644 index 34bba7e1..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/5.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/6.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/6.gif deleted file mode 100644 index 996fea53..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/6.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/7.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/7.gif deleted file mode 100644 index 787926ea..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/7.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/8.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/8.gif deleted file mode 100644 index 1384c4cc..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/8.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/9.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/9.gif deleted file mode 100644 index ed79b8b2..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/9.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/a.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/a.gif deleted file mode 100644 index 7b6ccf16..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/a.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/a_dolink.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/a_dolink.pl deleted file mode 100755 index c90c70ea..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/a_dolink.pl +++ /dev/null @@ -1,30 +0,0 @@ -#LogCount v3.8 link count and redirect -sub do_link { -($scrap, $lnkNumb) = split(/\=/,$query_string); - if (!open (COUNT, "+<$log_path$lnks_name")) {$err = "Links File Access"; &err_log;} - eval"flock(COUNT,2)"; - @lns = ; - $cnts = 0; - foreach $ln (@lns){ - @TL = split(/\|/,$ln); - if ($TL[0] eq $lnkNumb) { - $the_link = $TL[1]; - if ($pn eq "l") { - $TL[2]++; - $lns[$cnts] = "$TL[0]|$TL[1]|$TL[2]\n"; - seek(COUNT,0,0); - print COUNT @lns; - last; - } } - $cnts++; - } - eval"flock(COUNT,8)"; -close(COUNT); - if (!($the_link eq "")) {print "Location: $the_link\n\n";} - else { - print "Content-type: text/html\n\n"; print qq~Error Response

 

 Link Error Response

 
The link you requested cannot be found.

 Please report this error to the webmaster. Thank you 

return with your Back Arrow
~; - exit; - } -exit; -} -1; #line must remain last and as is diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/a_errlog.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/a_errlog.pl deleted file mode 100755 index dc1a66c5..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/a_errlog.pl +++ /dev/null @@ -1,19 +0,0 @@ -# LogCount v3.8 error logging -sub err_logs { - if ((-e "$log_path"."$ENV{'REMOTE_ADDR'}.tf") || (-s "$log_path$badlog_name") > 2000000 || !open (LOG, ">>$log_path$badlog_name")) {exit;} - open (LOGG, ">$log_path"."$ENV{'REMOTE_ADDR'}.tf") || exit; - eval"flock(LOG, 2)"; - my $trim = date_time(1)."|$err|$ENV{'HTTP_REFERER'}|$ENV{'REMOTE_ADDR'}"; - $trim = substr($trim,0,150); - print LOG "$trim\n"; - eval"flock(LOG, 8)"; - close(LOG); - close(LOGG); - if (!($pn eq "l")) {&sendFile($img_url."trans.gif", "image/gif");} - else {print "Content-type: text/html\n\n"; - print "Pages are copyright. Remote link access refused!
Please link via the actual on-site page\n";} - sleep 10; - unlink ("$log_path"."$ENV{'REMOTE_ADDR'}.tf"); -exit; -} -1; #line must remain last and as is diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/cntcnfg.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/cntcnfg.pl deleted file mode 100755 index 524dccb6..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/cntcnfg.pl +++ /dev/null @@ -1,42 +0,0 @@ -#### adding/subtracting zeros alters length of visible counters ---# -$iszeros = "000000"; - -#### Select British ("0"), US ("1"), Internat ("2") date pattern --# -$dtUS = "2"; - -#### An array of accepted referers domain names / IP#s ------------# -@referers = ('armandino.free.fr','www-asim.lip6.fr', ); - -#### An array of rejected domain names / IP#s ---------------------# -$rjct = "|myfoobars.com|000.000.000.000|wallies.edu.ca/~bloggs|"; - -#### Path to Records and Counter Images, SEE readme.txt file ------# -$gmt_pth = "$log_path/gmtset.pl"; -#$log_path = "counters/"; # - with forward slash -$count_name = "hitcount.t"; -$log_name = "hitlog.t"; -$lnks_name = "hitlnk.t"; -$badlog_name = "hitbadlog.t"; -$def_pge = "index"; -$iwid = 13; -$ihgt = 17; -$ssi_zro = 1; - -#### PATH OR URL to NON SSI img display images --------------------# -#-- this can be the same as the $ssi_url value! (see readme) -# $img_url = "counters/"; # PATH - with forward slash - #$img_url = "http://yourdomain.name/ssi_img/"; # URL - with forward slash - -#### URL to the images for SSI img display (see readme) -----------# - $ssi_url = "http://www-asim.lip6.fr/ssi/img/"; # - with forward slash - -#### SSI Output (0 = hidden (blank), 1 = Text, 2 = Images ---------# - $ssi_img = 1; - -#### E-Mail address of the Webmaster ------------------------------# - $webmstr = "mailto:Olivier.Sirol\@lip6.fr?subject=Link_Error"; - -#### Show Referer Domain Names, SEE readme.txt file ---------------# - $showDoms = "1"; - -1; # this line MUST remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/gmtset.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/gmtset.pl deleted file mode 100755 index 154ed0ed..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/gmtset.pl +++ /dev/null @@ -1,6 +0,0 @@ -#### value = GMT at your locality, in seconds (cen setup via admin!)--------# -#### ie (5hrs AHEAD) = 5X60X60 = 18000, (3.5hrs BEHIND) = -3.5X60X60 = -12600 - -$gmtPlusMinus = 7200; - -1; # this line must remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitbadlog.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitbadlog.t deleted file mode 100644 index 47e5bfed..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitbadlog.t +++ /dev/null @@ -1,17 +0,0 @@ -2000/05/26 15:06:52|bad referrer, off-site access denied||132.227.103.10 -2000/05/26 15:07:36|bad referrer, off-site access denied||132.227.103.10 -2000/05/26 15:09:31|bad referrer, off-site access denied||132.227.103.10 -2000/05/26 15:09:31|bad referrer, off-site access denied||132.227.103.10 -2000/05/26 15:09:41|bad referrer, off-site access denied||132.227.103.10 -2000/05/26 15:09:54|bad referrer, off-site access denied||132.227.103.10 -2000/05/26 15:10:48|bad referrer, off-site access denied||132.227.103.10 -2000/05/26 15:10:48|bad referrer, off-site access denied||132.227.103.10 -2000/05/26 15:10:58|bad referrer, off-site access denied||132.227.103.10 -2000/06/05 12:12:40|bad referrer, off-site access denied||132.227.103.10 -2000/06/05 12:13:27|bad referrer, off-site access denied||132.227.103.10 -2000/06/05 13:44:28|bad referrer, off-site access denied||132.227.103.10 -2000/06/05 14:42:45|bad referrer, off-site access denied||132.227.103.10 -2000/06/05 14:43:23|bad referrer, off-site access denied||132.227.103.10 -2000/06/05 14:43:38|bad referrer, off-site access denied||132.227.103.10 -2000/06/05 14:44:24|bad referrer, off-site access denied||132.227.103.10 -2000/06/05 14:45:02|bad referrer, off-site access denied||132.227.103.10 diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitcount.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitcount.t deleted file mode 100644 index 9a037142..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitcount.t +++ /dev/null @@ -1 +0,0 @@ -10 \ No newline at end of file diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitlnk.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitlnk.t deleted file mode 100644 index 70cccad8..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitlnk.t +++ /dev/null @@ -1 +0,0 @@ -widgets|http://www.widgetstuff.net/|345 diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitlog.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitlog.t deleted file mode 100644 index 917e7882..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/hitlog.t +++ /dev/null @@ -1,10 +0,0 @@ -2000/05/26 14:42:39, 132.227.103.10, /, Mozilla/4.7 [en] (WinNT; I), chantaco -2000/05/26 15:01:38, 132.227.103.10, /, Mozilla/4.7 [en] (WinNT; I), chantaco -2000/05/26 15:02:39, 132.227.103.10, /, Mozilla/4.7 [en] (WinNT; I), chantaco -2000/05/26 15:11:25, 132.227.103.10, /, Mozilla/4.7 [en] (WinNT; I), chantaco -2000/05/26 16:09:38, 132.227.103.10, /, Mozilla/4.7 [en] (WinNT; I), chantaco -2000/05/26 16:11:14, 132.227.103.10, /, Mozilla/4.7 [en] (WinNT; I), chantaco -2000/05/26 16:20:05, 132.227.103.10, /, Mozilla/4.7 [en] (WinNT; I), chantaco -2000/05/27 12:05:15, 212.27.40.168, /, Mozilla/4.7 [en] (WinNT; I), paris11-nas1-40-168.dial.proxad.net -2000/06/05 14:46:26, 132.227.103.10, /, Mozilla/4.7 [en] (WinNT; I), chantaco -2000/06/05 14:46:29, 132.227.103.10, /, Mozilla/4.7 [en] (WinNT; I), chantaco diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/look.pwd b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/look.pwd deleted file mode 100644 index f4386907..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/look.pwd +++ /dev/null @@ -1 +0,0 @@ -a.M5r8pTqIbSw \ No newline at end of file diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/lookcnfg.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/lookcnfg.pl deleted file mode 100755 index 1de51ef2..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/lookcnfg.pl +++ /dev/null @@ -1,23 +0,0 @@ -#### Path to Records and Counter Images, SEE readme.txt file ------# -$lookcfg_pth = "$log_path/lookcnfg.pl"; -$pwrd_name = "look.pwd"; - -$grf1_url = "$ssi_url"."grf0.gif"; -$grf0_url = "$ssi_url"."grf1.gif"; - -#### URL of the prefered return page (Home) -----------------------# -$hm_url = "http://armandino.free.fr/"; - -#### URL of the LOGLOOK.CGI log viewer script ---------------------# -$logScrpt = "http://www-asim.lip6.fr/cgi-bin/czo/lc/cgi-bin/loglook.cgi"; - -#### URL of the LOGCNT.CGI counter script -------------------------# -$countScrpt = "http://www-asim.lip6.fr/cgi-bin/czo/lc/cgi-bin/logcnt.cgi"; - -#### Enable display of last 7 days ("1") --------------------------# -$shwDays7 = "1"; - -#### Enter a Password or leave blank(""), SEE readme.txt file -----# -$theword = "log"; - -1; # this line MUST remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/p.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/p.gif deleted file mode 100644 index 5c5635bd..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/p.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/trans.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/trans.gif deleted file mode 100644 index e7749f21..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/armandino/trans.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/-.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/-.gif deleted file mode 100644 index c6a7f0d7..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/-.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/0.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/0.gif deleted file mode 100644 index eac4e3e0..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/0.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/1.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/1.gif deleted file mode 100644 index e551ad76..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/1.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/2.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/2.gif deleted file mode 100644 index b5dea246..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/2.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/3.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/3.gif deleted file mode 100644 index 85472d0c..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/3.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/4.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/4.gif deleted file mode 100644 index 4958feaf..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/4.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/5.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/5.gif deleted file mode 100644 index 34bba7e1..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/5.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/6.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/6.gif deleted file mode 100644 index 996fea53..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/6.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/7.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/7.gif deleted file mode 100644 index 787926ea..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/7.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/8.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/8.gif deleted file mode 100644 index 1384c4cc..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/8.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/9.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/9.gif deleted file mode 100644 index ed79b8b2..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/9.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/a.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/a.gif deleted file mode 100644 index 7b6ccf16..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/a.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/a_dolink.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/a_dolink.pl deleted file mode 100755 index c90c70ea..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/a_dolink.pl +++ /dev/null @@ -1,30 +0,0 @@ -#LogCount v3.8 link count and redirect -sub do_link { -($scrap, $lnkNumb) = split(/\=/,$query_string); - if (!open (COUNT, "+<$log_path$lnks_name")) {$err = "Links File Access"; &err_log;} - eval"flock(COUNT,2)"; - @lns = ; - $cnts = 0; - foreach $ln (@lns){ - @TL = split(/\|/,$ln); - if ($TL[0] eq $lnkNumb) { - $the_link = $TL[1]; - if ($pn eq "l") { - $TL[2]++; - $lns[$cnts] = "$TL[0]|$TL[1]|$TL[2]\n"; - seek(COUNT,0,0); - print COUNT @lns; - last; - } } - $cnts++; - } - eval"flock(COUNT,8)"; -close(COUNT); - if (!($the_link eq "")) {print "Location: $the_link\n\n";} - else { - print "Content-type: text/html\n\n"; print qq~Error Response

 

 Link Error Response

 
The link you requested cannot be found.

 Please report this error to the webmaster. Thank you 

return with your Back Arrow
~; - exit; - } -exit; -} -1; #line must remain last and as is diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/a_errlog.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/a_errlog.pl deleted file mode 100755 index dc1a66c5..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/a_errlog.pl +++ /dev/null @@ -1,19 +0,0 @@ -# LogCount v3.8 error logging -sub err_logs { - if ((-e "$log_path"."$ENV{'REMOTE_ADDR'}.tf") || (-s "$log_path$badlog_name") > 2000000 || !open (LOG, ">>$log_path$badlog_name")) {exit;} - open (LOGG, ">$log_path"."$ENV{'REMOTE_ADDR'}.tf") || exit; - eval"flock(LOG, 2)"; - my $trim = date_time(1)."|$err|$ENV{'HTTP_REFERER'}|$ENV{'REMOTE_ADDR'}"; - $trim = substr($trim,0,150); - print LOG "$trim\n"; - eval"flock(LOG, 8)"; - close(LOG); - close(LOGG); - if (!($pn eq "l")) {&sendFile($img_url."trans.gif", "image/gif");} - else {print "Content-type: text/html\n\n"; - print "Pages are copyright. Remote link access refused!
Please link via the actual on-site page\n";} - sleep 10; - unlink ("$log_path"."$ENV{'REMOTE_ADDR'}.tf"); -exit; -} -1; #line must remain last and as is diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/cntcnfg.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/cntcnfg.pl deleted file mode 100755 index c74a586e..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/cntcnfg.pl +++ /dev/null @@ -1,42 +0,0 @@ -#### adding/subtracting zeros alters length of visible counters ---# -$iszeros = "000000"; - -#### Select British ("0"), US ("1"), Internat ("2") date pattern --# -$dtUS = "2"; - -#### An array of accepted referers domain names / IP#s ------------# -@referers = ('asim.lip6.fr','www-asim.lip6.fr', 'chantaco.lip6.fr', ); - -#### An array of rejected domain names / IP#s ---------------------# -$rjct = "|myfoobars.com|000.000.000.000|wallies.edu.ca/~bloggs|"; - -#### Path to Records and Counter Images, SEE readme.txt file ------# -$gmt_pth = "$log_path/gmtset.pl"; -#$log_path = "counters/"; # - with forward slash -$count_name = "hitcount.t"; -$log_name = "hitlog.t"; -$lnks_name = "hitlnk.t"; -$badlog_name = "hitbadlog.t"; -$def_pge = "index"; -$iwid = 13; -$ihgt = 17; -$ssi_zro = 1; - -#### PATH OR URL to NON SSI img display images --------------------# -#-- this can be the same as the $ssi_url value! (see readme) -# $img_url = "counters/"; # PATH - with forward slash - #$img_url = "http://yourdomain.name/ssi_img/"; # URL - with forward slash - -#### URL to the images for SSI img display (see readme) -----------# - $ssi_url = "http://www-asim.lip6.fr/ssi/img/"; # - with forward slash - -#### SSI Output (0 = hidden (blank), 1 = Text, 2 = Images ---------# - $ssi_img = 1; - -#### E-Mail address of the Webmaster ------------------------------# - $webmstr = "mailto:Olivier.Sirol\@lip6.fr?subject=Link_Error"; - -#### Show Referer Domain Names, SEE readme.txt file ---------------# - $showDoms = "1"; - -1; # this line MUST remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/gmtset.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/gmtset.pl deleted file mode 100755 index 154ed0ed..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/gmtset.pl +++ /dev/null @@ -1,6 +0,0 @@ -#### value = GMT at your locality, in seconds (cen setup via admin!)--------# -#### ie (5hrs AHEAD) = 5X60X60 = 18000, (3.5hrs BEHIND) = -3.5X60X60 = -12600 - -$gmtPlusMinus = 7200; - -1; # this line must remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitbadlog.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitbadlog.t deleted file mode 100644 index 060a4aee..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitbadlog.t +++ /dev/null @@ -1,4 +0,0 @@ -2000/06/07 17:07:36|log file access|/index.html|132.227.103.10 -2000/06/07 17:09:00|log file access|/alliance/index.html|132.227.103.10 -2000/06/07 17:09:41|log file access|/mailing-lists/alliance-support/1999/0037.html|216.35.116.46 -2000/06/07 17:09:45|log file access|/alliance/mailing-lists/alliance-support/1999/0058.html|198.142.189.168 diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitcount.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitcount.t deleted file mode 100644 index 5b801f9a..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitcount.t +++ /dev/null @@ -1 +0,0 @@ -21785 \ No newline at end of file diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitlnk.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitlnk.t deleted file mode 100644 index 8ec92f65..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitlnk.t +++ /dev/null @@ -1,3 +0,0 @@ -3451|../samp.htm|3387 -dtp|http://www.dtp-aus.com/index.html|97 -widgets|http://www.widgetstuff.net/|345 diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitlog.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitlog.t deleted file mode 100644 index f4db80b9..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/hitlog.t +++ /dev/null @@ -1,4 +0,0 @@ -2000/06/06 19:12:07, 62.172.199.22, /publications/resumes/1997/1997.023/index.gb.html, Slurp.so/1.0 (slurp@inktomi.com; http://www.inktomi.com/slurp.html), -2000/06/07 17:11:11, 132.227.103.10, /alliance/index.html, Mozilla/4.0 (compatible; MSIE 5.01; Windows NT), chantaco -2000/06/07 17:11:26, 210.170.215.218, /alliance/index.html, WWWC/0.93 (Win32; http://www.kinet.or.jp/naka/tomo/), ppp72.tama-ap6.dti.ne.jp -2000/06/07 17:12:02, 132.227.103.10, /alliance/index.html, Mozilla/4.0 (compatible; MSIE 5.01; Windows NT), chantaco diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/look.pwd b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/look.pwd deleted file mode 100644 index f4386907..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/look.pwd +++ /dev/null @@ -1 +0,0 @@ -a.M5r8pTqIbSw \ No newline at end of file diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/lookcnfg.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/lookcnfg.pl deleted file mode 100755 index ca2681e9..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/lookcnfg.pl +++ /dev/null @@ -1,23 +0,0 @@ -#### Path to Records and Counter Images, SEE readme.txt file ------# -$lookcfg_pth = "$log_path/lookcnfg.pl"; -$pwrd_name = "look.pwd"; - -$grf1_url = "$ssi_url"."grf0.gif"; -$grf0_url = "$ssi_url"."grf1.gif"; - -#### URL of the prefered return page (Home) -----------------------# -$hm_url = "http://www-asim.lip6.fr/"; - -#### URL of the LOGLOOK.CGI log viewer script ---------------------# -$logScrpt = "http://www-asim.lip6.fr/cgi-bin/czo/lc/cgi-bin/loglook.cgi"; - -#### URL of the LOGCNT.CGI counter script -------------------------# -$countScrpt = "http://www-asim.lip6.fr/cgi-bin/czo/lc/cgi-bin/logcnt.cgi"; - -#### Enable display of last 7 days ("1") --------------------------# -$shwDays7 = "1"; - -#### Enter a Password or leave blank(""), SEE readme.txt file -----# -$theword = "log"; - -1; # this line MUST remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/p.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/p.gif deleted file mode 100644 index 5c5635bd..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/p.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/trans.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/trans.gif deleted file mode 100644 index e7749f21..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/asim/trans.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/-.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/-.gif deleted file mode 100644 index c6a7f0d7..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/-.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/0.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/0.gif deleted file mode 100644 index eac4e3e0..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/0.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/1.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/1.gif deleted file mode 100644 index e551ad76..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/1.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/2.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/2.gif deleted file mode 100644 index b5dea246..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/2.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/3.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/3.gif deleted file mode 100644 index 85472d0c..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/3.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/4.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/4.gif deleted file mode 100644 index 4958feaf..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/4.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/5.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/5.gif deleted file mode 100644 index 34bba7e1..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/5.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/6.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/6.gif deleted file mode 100644 index 996fea53..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/6.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/7.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/7.gif deleted file mode 100644 index 787926ea..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/7.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/8.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/8.gif deleted file mode 100644 index 1384c4cc..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/8.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/9.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/9.gif deleted file mode 100644 index ed79b8b2..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/9.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/a.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/a.gif deleted file mode 100644 index 7b6ccf16..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/a.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/a_dolink.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/a_dolink.pl deleted file mode 100755 index c90c70ea..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/a_dolink.pl +++ /dev/null @@ -1,30 +0,0 @@ -#LogCount v3.8 link count and redirect -sub do_link { -($scrap, $lnkNumb) = split(/\=/,$query_string); - if (!open (COUNT, "+<$log_path$lnks_name")) {$err = "Links File Access"; &err_log;} - eval"flock(COUNT,2)"; - @lns = ; - $cnts = 0; - foreach $ln (@lns){ - @TL = split(/\|/,$ln); - if ($TL[0] eq $lnkNumb) { - $the_link = $TL[1]; - if ($pn eq "l") { - $TL[2]++; - $lns[$cnts] = "$TL[0]|$TL[1]|$TL[2]\n"; - seek(COUNT,0,0); - print COUNT @lns; - last; - } } - $cnts++; - } - eval"flock(COUNT,8)"; -close(COUNT); - if (!($the_link eq "")) {print "Location: $the_link\n\n";} - else { - print "Content-type: text/html\n\n"; print qq~Error Response

 

 Link Error Response

 
The link you requested cannot be found.

 Please report this error to the webmaster. Thank you 

return with your Back Arrow
~; - exit; - } -exit; -} -1; #line must remain last and as is diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/a_errlog.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/a_errlog.pl deleted file mode 100755 index dc1a66c5..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/a_errlog.pl +++ /dev/null @@ -1,19 +0,0 @@ -# LogCount v3.8 error logging -sub err_logs { - if ((-e "$log_path"."$ENV{'REMOTE_ADDR'}.tf") || (-s "$log_path$badlog_name") > 2000000 || !open (LOG, ">>$log_path$badlog_name")) {exit;} - open (LOGG, ">$log_path"."$ENV{'REMOTE_ADDR'}.tf") || exit; - eval"flock(LOG, 2)"; - my $trim = date_time(1)."|$err|$ENV{'HTTP_REFERER'}|$ENV{'REMOTE_ADDR'}"; - $trim = substr($trim,0,150); - print LOG "$trim\n"; - eval"flock(LOG, 8)"; - close(LOG); - close(LOGG); - if (!($pn eq "l")) {&sendFile($img_url."trans.gif", "image/gif");} - else {print "Content-type: text/html\n\n"; - print "Pages are copyright. Remote link access refused!
Please link via the actual on-site page\n";} - sleep 10; - unlink ("$log_path"."$ENV{'REMOTE_ADDR'}.tf"); -exit; -} -1; #line must remain last and as is diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/cntcnfg.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/cntcnfg.pl deleted file mode 100755 index b9ec5802..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/cntcnfg.pl +++ /dev/null @@ -1,42 +0,0 @@ -#### adding/subtracting zeros alters length of visible counters ---# -$iszeros = "000000"; - -#### Select British ("0"), US ("1"), Internat ("2") date pattern --# -$dtUS = "2"; - -#### An array of accepted referers domain names / IP#s ------------# -@referers = ('neptune.ufr-info-p6.jussieu.fr','www-asim.lip6.fr', ); - -#### An array of rejected domain names / IP#s ---------------------# -$rjct = "|myfoobars.com|000.000.000.000|wallies.edu.ca/~bloggs|"; - -#### Path to Records and Counter Images, SEE readme.txt file ------# -$gmt_pth = "$log_path/gmtset.pl"; -#$log_path = "counters/"; # - with forward slash -$count_name = "hitcount.t"; -$log_name = "hitlog.t"; -$lnks_name = "hitlnk.t"; -$badlog_name = "hitbadlog.t"; -$def_pge = "index"; -$iwid = 13; -$ihgt = 17; -$ssi_zro = 1; - -#### PATH OR URL to NON SSI img display images --------------------# -#-- this can be the same as the $ssi_url value! (see readme) -# $img_url = "counters/"; # PATH - with forward slash - #$img_url = "http://yourdomain.name/ssi_img/"; # URL - with forward slash - -#### URL to the images for SSI img display (see readme) -----------# - $ssi_url = "http://www-asim.lip6.fr/ssi/img/"; # - with forward slash - -#### SSI Output (0 = hidden (blank), 1 = Text, 2 = Images ---------# - $ssi_img = 1; - -#### E-Mail address of the Webmaster ------------------------------# - $webmstr = "mailto:Olivier.Sirol\@lip6.fr?subject=Link_Error"; - -#### Show Referer Domain Names, SEE readme.txt file ---------------# - $showDoms = "1"; - -1; # this line MUST remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/gmtset.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/gmtset.pl deleted file mode 100755 index 154ed0ed..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/gmtset.pl +++ /dev/null @@ -1,6 +0,0 @@ -#### value = GMT at your locality, in seconds (cen setup via admin!)--------# -#### ie (5hrs AHEAD) = 5X60X60 = 18000, (3.5hrs BEHIND) = -3.5X60X60 = -12600 - -$gmtPlusMinus = 7200; - -1; # this line must remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitbadlog.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitbadlog.t deleted file mode 100644 index 15f35236..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitbadlog.t +++ /dev/null @@ -1,8 +0,0 @@ -2000/05/26 17:00:05|bad referrer, off-site access denied||134.157.252.132 -2000/05/26 17:00:34|bad referrer, off-site access denied||134.157.252.132 -2000/05/26 17:00:34|bad referrer, off-site access denied||134.157.252.132 -2000/05/26 17:00:34|bad referrer, off-site access denied||134.157.252.132 -2000/05/26 17:00:48|bad referrer, off-site access denied||134.157.252.132 -2000/05/26 17:01:19|bad referrer, off-site access denied||134.157.252.132 -2000/05/29 17:03:37|bad referrer, off-site access denied||134.157.252.132 -2000/05/30 12:26:09|bad referrer, off-site access denied||134.157.252.132 diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitcount.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitcount.t deleted file mode 100644 index 19c7bdba..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitcount.t +++ /dev/null @@ -1 +0,0 @@ -16 \ No newline at end of file diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitlnk.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitlnk.t deleted file mode 100644 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitlog.t b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitlog.t deleted file mode 100644 index 7dd2ca58..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/hitlog.t +++ /dev/null @@ -1,16 +0,0 @@ -2000/05/26 17:01:30, 132.227.65.52, /menu.html, Mozilla/4.61 [en] (X11; I; Linux 2.2.5-15epona0 i586), epona.edite-de-paris.com.fr -2000/05/26 17:01:43, 132.227.65.52, /menu.html, Mozilla/4.61 [en] (X11; I; Linux 2.2.5-15epona0 i586), epona.edite-de-paris.com.fr -2000/05/26 17:01:50, 132.227.65.52, /menu.html, Mozilla/4.61 [en] (X11; I; Linux 2.2.5-15epona0 i586), epona.edite-de-paris.com.fr -2000/05/26 17:44:23, 132.227.65.52, /menu.html, Mozilla/4.61 [en] (X11; I; Linux 2.2.5-15epona0 i586), epona.edite-de-paris.com.fr -2000/05/29 12:48:08, 134.157.252.132, /menu.html, Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt), wwwcache.jussieu.fr -2000/05/29 17:29:05, 132.227.65.52, /menu.html, Mozilla/4.61 [en] (X11; I; Linux 2.2.5-15epona0 i586), epona.edite-de-paris.com.fr -2000/05/29 17:30:03, 132.227.65.23, /menu.html, Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt), mercure.edite-de-paris.com.fr -2000/05/30 10:53:31, 132.227.65.52, /menu.html, Mozilla/4.61 [en] (X11; I; Linux 2.2.5-15epona0 i586), epona.edite-de-paris.com.fr -2000/05/30 11:23:27, 132.227.68.5, /menu.html, ÊMozilla/3.0 (compatible; MSIE 3.01; Mac_PowerPC; Mac OS8), mac-isabelle-azam.ufr-info-p6.jussieu.fr -2000/05/30 12:00:08, 134.157.252.132, /menu.html, Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt), wwwcache.jussieu.fr -2000/05/30 14:39:37, 132.227.65.52, /menu.html, Mozilla/4.61 [en] (X11; I; Linux 2.2.5-15epona0 i586), epona.edite-de-paris.com.fr -2000/05/30 15:00:32, 134.157.252.131, /menu.html, Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt), wwwcache.jussieu.fr -2000/05/30 15:45:31, 132.227.68.5, /menu.html, ÊMozilla/3.0 (compatible; MSIE 3.01; Mac_PowerPC; Mac OS8), mac-isabelle-azam.ufr-info-p6.jussieu.fr -2000/05/30 15:59:36, 134.157.252.131, /menu.html, Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt), wwwcache.jussieu.fr -2000/05/30 17:38:43, 132.227.65.52, /menu.html, Mozilla/4.61 [en] (X11; I; Linux 2.2.5-15epona0 i586), epona.edite-de-paris.com.fr -2000/05/31 10:35:39, 132.227.205.102, /menu.html, Mozilla/4.0 (compatible; MSIE 4.5; Mac_PowerPC), mac-ghislaine.lip6.fr diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/look.pwd b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/look.pwd deleted file mode 100644 index f4386907..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/look.pwd +++ /dev/null @@ -1 +0,0 @@ -a.M5r8pTqIbSw \ No newline at end of file diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/lookcnfg.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/lookcnfg.pl deleted file mode 100755 index 1de51ef2..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/lookcnfg.pl +++ /dev/null @@ -1,23 +0,0 @@ -#### Path to Records and Counter Images, SEE readme.txt file ------# -$lookcfg_pth = "$log_path/lookcnfg.pl"; -$pwrd_name = "look.pwd"; - -$grf1_url = "$ssi_url"."grf0.gif"; -$grf0_url = "$ssi_url"."grf1.gif"; - -#### URL of the prefered return page (Home) -----------------------# -$hm_url = "http://armandino.free.fr/"; - -#### URL of the LOGLOOK.CGI log viewer script ---------------------# -$logScrpt = "http://www-asim.lip6.fr/cgi-bin/czo/lc/cgi-bin/loglook.cgi"; - -#### URL of the LOGCNT.CGI counter script -------------------------# -$countScrpt = "http://www-asim.lip6.fr/cgi-bin/czo/lc/cgi-bin/logcnt.cgi"; - -#### Enable display of last 7 days ("1") --------------------------# -$shwDays7 = "1"; - -#### Enter a Password or leave blank(""), SEE readme.txt file -----# -$theword = "log"; - -1; # this line MUST remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/p.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/p.gif deleted file mode 100644 index 5c5635bd..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/p.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/trans.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/trans.gif deleted file mode 100644 index e7749f21..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/edite/trans.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/new.tgz b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/new.tgz deleted file mode 100644 index a37e48ec..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/counters/new.tgz and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/logcnt.cgi b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/logcnt.cgi deleted file mode 100755 index 183ecd68..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/logcnt.cgi +++ /dev/null @@ -1,228 +0,0 @@ -#!/usr/local/bin/perl -w - -# Czo : 2000/05/25 -# - -use CGI; -$query = new CGI; - - -############################################################################## -# An IMG SRC, SSI and A HREF(links) called script that saves to common # -# log files also used by the Loglook.cgi log viewer and SSI count viewers # -# DO NOT use this script without first reading the accompanying README # -# installation and help page IN DETAIL. # -############################################################################## -# The script "LOGCNT.CGI" was written (c) by Ron F Woolley, Melbourne # -# Australia. Copyright 1998'99 2000. This script can be altered for personal # -# site use or commercial site use EXCEPT THAT: # -# ALL COPYRIGHT NOTICES must remain in the code, visible on all output pages,# -# AND ALL of the header notices MUST REMAIN intact as is, # -# AND using the script without first reading the README.HTM, is prohibited. # -# # -# Australian copyright is recognised/supported in over 130 countries... # -# per the Berne Convention and other treaties. (including USA!) # -# # -# The scripts and associated files REMAIN the property of Ron F Woolley. # -# NO PROFIT what so ever is to be gained from users of these scripts by # -# installation of these scripts, except that a reasonable minimal charge # -# for installation MAY be allowed. Supply, per installation, is directly # -# from dtp-aus.com ONLY. Remote hosting of this program is strictly # -# not allowed. # -# # -# Ron Woolley, the author, MUST be notified via the addresses/URLs below # -# if any gain is to be made for the installation of these scripts. # -# # -############################################################################## -# NOTE: If you use these files, you do so entirely at your own risk, and # -# take on full responsibility for the consequences of using the described # -# files. You must first agree that Ron Woolley / HostingNet, the only # -# permitted supplier of this and/or accompanying files is exempt from any # -# responsibility for all or any resulting problems, losses or costs caused # -# by your using these or any associated files. If you disagree with ANY of # -# the included requirements, you must IMMEDIATELY DESTROY ALL FILES. # -############################################################################## -# This program script is free to use Copyright notices must remain # -############################################################################## -# These program scripts are free-to-use, but if you use them, a donation to # -# the author would be appreciated and help in continuing support for # -# LogCount and the creation of other scripts for users of the internet. # -# An on-line Visa / MasterCard payment cart is available for support # -# donations and low cost program installations. # -############################################################################## -# HELP/ADVICE page at: # -# http://www.dtp-aus.com/cgiscript/scrpthlp.htm # -# Files from: # -# http://www.dtp-aus.com/cgiscript/cntscrpt.shtml # -############################################################################## -# THESE FILES can only be obtained via the above web addresses,and MUST # -# NOT BE PASSED ON TO OTHERS in any form by any means what so ever. This # -# DOES NOT contradict any other statements above. # -# EACH USER SITE MUST OBTAIN THESE FILES from URL above. # -############################################################################## -# VERSION 3.8 Februrary 2000 # - -#--- Alter these two paths only, if needed! ---------------------# - -$log_path = "counters/"; # - with forward slash -$img_url = "counters/"; # PATH - with forward slash - -$sitename = $query->param('site'); -if ( $sitename eq "" ) - {$sitename="asim";} - - $pn="l"; -$log_path = $log_path . "$sitename/"; -$img_url = $img_url . "$sitename/"; - - if (-s "$log_path/gmtset.pl") {require "$log_path/gmtset.pl";} else {print "Content-type: text/html\n\n"; print "Missing/Bad Path to GMTime file\n"; exit;} - if (-s "$log_path/cntcnfg.pl") {require "$log_path/cntcnfg.pl";} else {print "Content-type: text/html\n\n"; print "Missing/Bad Path to Config file\n"; exit;} - - -#--- Do Not make any changes below this line. -------------------# - -sub logged_as { - $pnm = $ENV{'HTTP_REFERER'}; - $pnm =~ s/\#.*$//g ; - $pnm =~ s/\?.*$//g; - $pid = $pnm ; - if ($pid =~ /https?:\/\/.*\/([^\/]*.*\/[^\.].*\..*)$/i) {$pid = $1;} - elsif ($pid =~ /https?:\/\/.*(\/[^\.].*\..*)$/i) {$pid = $1;} - elsif ($pid =~ /https?:\/\/.*\/(.*\/)$/) {$pid = $1;} - elsif ($pid =~ /https?:\/\/.*(\/.*)$/) {$pid = $1;} - else {$pid = "/$def_pge" if !$ENV{'DOCUMENT_URI'};} - $pid =~ s/^\.+//; -} -sub sg_count { - &do_count($log_path.$count_name); - my $tmp; - if ($pn eq "p" && (-s "$pnm")) { - ($tmp = $pid) =~ s/\./-/g; - $tmp =~ s/\//_/g; - &do_count($log_path.$tmp) } - $cnb = (substr($iszeros,1,length($iszeros) - length($cnb)).$cnb); -} -sub do_count { - my $fle = shift; - if (!(-e "$fle")) {if (!open (COUNT, ">$fle")) {$err = "creating new count file"; &err_log;} close (COUNT);} - if (!open (COUNT, "+<$fle")) {$err = "count file access"; &err_log;} - eval"flock(COUNT,2)"; - $cnb = ; - if ( $pn eq "0" || $pn eq "t" || $pn eq "c" || substr($query_string,0,2) eq "p0" || $ENV{'DOCUMENT_URI'} ) { - if ($rjct !~ /(\|$ENV{'REMOTE_HOST'}\||\|$ENV{'REMOTE_ADDR'}\|)/i) {$cnb = $cnb + 1;} - seek (COUNT, 0, 0); - print COUNT $cnb; - } - eval"flock(COUNT,8)"; - close (COUNT); - chomp($cnb); -} -sub do_log { - if ($rjct =~ /(\|$ENV{'REMOTE_HOST'}\||\|$ENV{'REMOTE_ADDR'}\|)/i) {return;} - if (($ENV{'REMOTE_ADDR'} eq $ENV{'REMOTE_HOST'} || !$ENV{'REMOTE_HOST'}) && $ENV{'REMOTE_ADDR'} =~ /(\d+)\.(\d+)\.(\d+)\.(\d+)/) { - $pk = pack('C4', $1, $2, $3, $4); - $cnvrt = (gethostbyaddr($pk, 2))[0]; - if ($cnvrt) {$ENV{'REMOTE_HOST'} = $cnvrt;} - } - if (!open (MLOG, ">>$log_path$log_name")) {$err = "log file access"; &err_log;} - eval"flock(MLOG,2)"; - print MLOG date_time(1).", $ENV{'REMOTE_ADDR'}, $pid, $ENV{'HTTP_USER_AGENT'}, $ENV{'REMOTE_HOST'}\n"; - eval"flock(MLOG,8)"; - close(MLOG); -} -sub sendFile { - if ($img_url eq $ssi_url) {print "Location: $_[0]\n\n";} - else { - die("$0: sendFile called w/o File\n") unless my $File = $_[0]; - die("$0: sendFile called on $File, no type\n") unless my $type = $_[1]; - my $size = 0; - if ( open(FILE, $File)) { - $size = ( -s $File); - print "Content-type: $type\n"; print "Content-length: $size\n\n"; print ; - close (FILE); - } else {$err = "send-image file access error"; &err_log;} - $size; - } -} -sub date_time { - ($which,$z) = ($_[0],"a"); my($sec,$min,$hour,$mday,$mon,$year); - if (!$which) { - ($min,$hour) = (gmtime(time + $gmtPlusMinus))[1,2]; - if ($hour > 11) {$z = "p";} - if ($hour > 12) {$hour = $hour - 12;} - return sprintf("%02d-%02d$z",$hour,$min); - } - elsif ($which) { - ($sec,$min,$hour,$mday,$mon,$year) = (gmtime(time + $gmtPlusMinus)); - if ($year > 99) {$year = 2000 + ($year - 100);} - elsif ($year < 100) {$year = "19$year";} - if ($dtUS eq "1") {return sprintf("%02d\/%02d\/%04d %02d:%02d:%02d",$mon + 1,$mday,$year,$hour,$min,$sec);} - elsif ($dtUS eq "2") {return sprintf("%04d\/%02d\/%02d %02d:%02d:%02d",$year,$mon + 1,$mday,$hour,$min,$sec);} - else {return sprintf("%02d\/%02d\/%04d %02d:%02d:%02d",$mday,$mon + 1,$year,$hour,$min,$sec);} - } -} -sub do_ssi { - &sg_count; print "Content-type: text/html\n\n"; - if ($cnb eq 0 || $cnb eq "") {$cnb = "???";} - $cnb =~ s/^(0+)// if !$ssi_zro; - if (!$ssi_img) {print " ";} - elsif ($ssi_img == 1) {print "$cnb";} - else { - for($cnt = 0; $cnt <= length($cnb) - 1; $cnt++) { $digit = substr($cnb,$cnt,1); - print "";} - } - $ENV{'HTTP_REFERER'} = $ENV{'DOCUMENT_URI'}; - &logged_as; &do_log; -exit; -} -sub do_clock { - local($digit,$chk) = ($_[0],$_[0]); - $digit = substr(date_time(0),$digit,1); - &sendFile($img_url.$digit.".gif", "image/gif"); - if ($pn eq "c" && $chk eq 0) {&sg_count; &do_log;} -exit; -} -sub err_log {require "$log_path"."a_errlog.pl"; &err_logs} - -########## Main - if ( $ENV{'DOCUMENT_URI'} ) { &do_ssi; } -if (0) { - - if ( $ENV{'REQUEST_METHOD'} eq 'GET' ) {;} - elsif ( $ENV{'REQUEST_METHOD'} eq 'POST' ) {;} - else {$err = "illegal method"; &err_log;} - - $query_string = $query->param('log'); - $query_string =~ s/(\0|`|..\\)//g; - $pn = substr($query_string,0,1); - - my $crf = 0; - - if ($ENV{'HTTP_REFERER'}) { - foreach $referer (@referers) { - if ($ENV{'HTTP_REFERER'} =~ m|\Ahttps?://([^/]*)$referer|i) { - $crf = 1; - last; - } } } - if ($crf == 0) {$err = "bad referrer, off-site access denied"; &err_log;} - &logged_as; - if ($pn =~ /\Al\Z/i) {require "$log_path"."a_dolink.pl"; &do_link;} - elsif ($pn =~ /^(c|n)/) {&do_clock(substr($query_string,1,1));} - &sg_count; - if ($pn eq "p") { - local($digit) = substr($cnb,substr($query_string,1,1),1); - &sendFile($img_url.$digit.".gif", "image/gif"); - &do_log if $query_string =~ /^p0$/; - } elsif ($pn eq "t") { - &sendFile($img_url."trans.gif", "image/gif"); - &do_log ; - } elsif ($pn eq "0" || $pn eq "v") { - local($digit) = substr($cnb,0,1); - &sendFile($img_url.$digit.".gif", "image/gif"); - &do_log if $pn eq "0"; - } elsif ($pn =~ /[1-7]/) { - local($digit) = substr($cnb,$pn,1); - &sendFile($img_url.$digit.".gif", "image/gif"); - } - } -exit(0); diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/loglook.cgi b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/loglook.cgi deleted file mode 100755 index 52a5591e..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/loglook.cgi +++ /dev/null @@ -1,1026 +0,0 @@ -#!/usr/local/bin/perl - -# Czo : 2000/05/25 -# - -use CGI; -$query = new CGI; - - -############################################################################## -# The script "LOGLOOK.CGI" was written (c) by Ron F Woolley, Melbourne # -# Australia. Copyright 1998'99 2000. This script can be altered for personal # -# site use or commercial site use EXCEPT THAT: # -# ALL COPYRIGHT NOTICES must remain in the code, visible on all output pages,# -# AND ALL of the header notices MUST REMAIN intact as is, # -# AND using the script without first reading the README.HTM, is prohibited. # -# # -# Australian copyright is recognised/supported in over 130 countries... # -# per the Berne Convention and other treaties. (including USA!) # -# # -# The scripts and associated files REMAIN the property of Ron F Woolley. # -# NO PROFIT what so ever is to be gained from users of these scripts by # -# installation of these scripts, except that a reasonable minimal charge # -# for installation MAY be allowed. Supply, per installation, is directly # -# from dtp-aus.com ONLY. Remote hosting of this program is strictly # -# not allowed. # -# # -# Ron Woolley, the author, MUST be notified via the addresses/URLs below # -# if any gain is to be made for the installation of these scripts. # -# # -############################################################################## -# NOTE: If you use these files, you do so entirely at your own risk, and # -# take on full responsibility for the consequences of using the described # -# files. You must first agree that Ron Woolley / HostingNet, the only # -# permitted supplier of this and/or accompanying files is exempt from any # -# responsibility for all or any resulting problems, losses or costs caused # -# by your using these or any associated files. If you disagree with ANY of # -# the included requirements, you must IMMEDIATELY DESTROY ALL FILES. # -############################################################################## -# This program script is free to use Copyright notices must remain # -############################################################################## -# These program scripts are free-to-use, but if you use them, a donation to # -# the author would be appreciated and help in continuing support for # -# LogCount and the creation of other scripts for users of the internet. # -# An on-line Visa / MasterCard payment cart is available for support # -# donations and low cost program installations. # -############################################################################## -# HELP/ADVICE page at: # -# http://www.dtp-aus.com/cgiscript/scrpthlp.htm # -# Files from: # -# http://www.dtp-aus.com/cgiscript/cntscrpt.shtml # -############################################################################## -# THESE FILES can only be obtained via the above web addresses,and MUST # -# NOT BE PASSED ON TO OTHERS in any form by any means what so ever. This # -# DOES NOT contradict any other statements above. # -# EACH USER SITE MUST OBTAIN THESE FILES from URL above. # -############################################################################## -# VERSION 3.8 Februrary 2000 - -#--- Alter these three paths only, if needed! ---------------------# - -$log_path = "counters/"; # - with forward slash -$img_url = "counters/"; # PATH - with forward slash - -$sitename = $query->param('site'); -if ( $sitename eq "" ) - {$sitename="unknown";} - -$log_path = $log_path . "$sitename/"; -$img_url = $img_url . "$sitename/"; - - if (-s "$log_path/cntcnfg.pl") {require "$log_path/cntcnfg.pl";} else {print "Content-type: text/html\n\n"; print "Missing/Bad Path to LogCount Config file\n"; exit;} - if (-s "$log_path/lookcnfg.pl") {require "$log_path/lookcnfg.pl";} else {print "Content-type: text/html\n\n"; print "Missing/Bad Path to LogLook Config file\n"; exit;} - if (-s "$log_path/gmtset.pl") {require "$log_path/gmtset.pl";} else {print "Content-type: text/html\n\n"; print "Missing/Bad Path to GMTime file\n"; exit;} - -#--- Do Not make any changes below this line. ---------------------# - - &check_method; - &is_referer_ok; -sub tallypages { - local($arrayBit); local($inputItem) = (@_); - foreach $arrayBit (@pgT) { - if( $arrayBit eq $inputItem ) { - ++$pageCount{$inputItem}; - return; - } } - push(@pgT,$inputItem); -} -sub tallyips { - if($dalips !~ / $lineInArray[1] /) { - $dalips .= " $lineInArray[1] "; - $ipperDay++ } - if($alips !~ / $lineInArray[1] /) { - $alips .= " $lineInArray[1] "; - $wiz++ } -} -sub calcips { - my($arrayBit); my($inputItem) = (@_); - foreach $arrayBit (@ipT) { - if( $arrayBit eq $inputItem ) { - ++$ipCount{$inputItem}; - return; - } } - push(@ipT,$inputItem); -} -sub tallyagents { -$agents++; -local($inputItem) = (@_); -if ($inputItem =~ /mozilla\//i && $inputItem !~ /compatible/i) { - if ($inputItem =~ /mozilla\/1/i) {$nscp1++;} - elsif ($inputItem =~ /mozilla\/2/i) {$nscp2++;} - elsif ($inputItem =~ /mozilla\/3/i) {$nscp3++;} - elsif ($inputItem =~ /mozilla\/4/i) {$nscp4++;} - elsif ($inputItem =~ /mozilla\/5/i) {$nscp5++;} - elsif ($inputItem =~ /mozilla\/6/i) {$nscp6++;} - else {$nscp_Othr++;} } -elsif ($inputItem =~ /mozilla\//i && $inputItem =~ /MSIE/i) { - if ($inputItem =~ /MSIE 1/i) {$iexp1++;} - elsif ($inputItem =~ /MSIE 2/i) {$iexp2++;} - elsif ($inputItem =~ /MSIE 3/i) {$iexp3++;} - elsif ($inputItem =~ /MSIE 4/i) {$iexp4++;} - elsif ($inputItem =~ /MSIE 5/i) {$iexp5++;} - elsif ($inputItem =~ /MSIE 6/i) {$iexp6++;} - else {$iexp_Othr++;} } -elsif ($inputItem =~ /mozilla\//i && $inputItem =~ /compatible/i) {$moz_compat++;} -if ($inputItem =~ /webtv/i) {$wbtv++;} -if ($inputItem =~ /opera/i) {$opera++;} -if ($inputItem =~ /AOL [1-5]/) {$aol++;} -if ($inputItem =~ /OS\/[1-5]/i) {$IBMOS++;} -if ($inputItem =~ /X11/i) {$x11++;} -if ($inputItem =~ /linux/i) {$lnx++;} -if ($inputItem =~ /sunos/i) {$sunos++;} -if ($inputItem =~ /irix/i) {$irx++;} -if ($inputItem =~ /macintosh;/i) { - if ($inputItem =~ /68K/i) {$mac68++;} - elsif ($inputItem =~ /PPC/i) {$macppc++;} - else {$mac_unk++;} } -elsif ($inputItem =~ /mac\_powerpc;/i || $inputItem =~ /mac\_ppc;/i) {$macppc++;} -elsif ($inputItem =~ /mac\_86000/i) {$mac68++;} -if ($inputItem =~ /windows/i || $inputItem =~ /win/i) { - if ($inputItem =~ /win95/i || $inputItem =~ /windows 95/i) {$win95++;} - elsif ($inputItem =~ /winnt/i || $inputItem =~ /windows nt/i) {$winnt++;} - elsif ($inputItem =~ /win98/i || $inputItem =~ /windows 98/i) {$win98++;} - elsif ($inputItem =~ /win16/i || $inputItem =~ /windows 3/i) {$win3++;} - elsif ($inputItem =~ /windows/i && $inputItem =~ /16bit/i) {$win3++;} - else {$win_unk++;} -} } -sub admwd { - &r_acnt; - if (!$FORM{'admwrd'} && !$acnt) {return;} - elsif (crypt($FORM{'admwrd'}, substr($FORM{'admwrd'},2,2)) ne $acnt) {&showErr('Incorrect ADMIN Password');} -} -sub r_lnx { - if (!open (LINKS, "<$log_path$lnks_name")) {&showErr("Link File Access");} - eval"flock (LINKS, 2)"; - @lns = ; - eval"flock (LINKS, 8)"; - close (LINKS); -} -sub w_lnx { - if (!open (LINKS, ">$log_path$lnks_name")) {&showErr("Link File Access");} - eval"flock (LINKS, 2)"; - print LINKS sort @lns; - eval"flock (LINKS, 8)"; - close (LINKS); -} -sub r_acnt { - if (!(-e "$log_path$pwrd_name")) {open(ACCNT, ">$log_path$pwrd_name");} - else {open(ACCNT, "<$log_path$pwrd_name") || &showErr("Unable to Read Admin PassWRD File");} - $acnt = ; - chomp ($acnt); - close(ACCNT); -} -sub w_acnt { - open(ACCNT, ">$log_path$pwrd_name") || &showErr('Unable to Write Admin PassWRD File'); - print ACCNT $newrd; - close(ACCNT); -} -sub date_time { - my $which = $_[0] ; - if ($which eq 0) { - ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday) = (localtime)[0,1,2,3,4,5,6,7];} - elsif ($which eq 1) { - ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday) = (gmtime(time + $gmtPlusMinus))[0,1,2,3,4,5,6,7];} - if ($year < 38) { $year = "20$year" } - elsif ($year > 99) { $year = 2000 + ( $year - 100 ) } - elsif ($year > 37) { $year = "19$year" } - if ($dtUS eq "1") {return sprintf("%02d\/%02d\/%04d %02d:%02d:%02d",$mon + 1,$mday,$year,$hour,$min,$sec);} - elsif ($dtUS eq "2") {return sprintf("%04d\/%02d\/%02d %02d:%02d:%02d",$year,$mon + 1,$mday,$hour,$min,$sec);} - else {return sprintf("%02d\/%02d\/%04d %02d:%02d:%02d",$mday,$mon+1,$year,$hour,$min,$sec);} -} -sub check_method { - if ( $ENV{'REQUEST_METHOD'} eq 'GET' ) {$query_string = $ENV{'QUERY_STRING'};} - elsif ( $ENV{'REQUEST_METHOD'} eq 'POST' ) {read(STDIN,$query_string, $ENV{'CONTENT_LENGTH'});} - else {&showErr('Improper Request Method');} -} -sub pwrd { - if ($_[0] ne $theword) { - -# print "Content-type: text/html\n\n"; -# print $theword . "\n" ; - &showErr('Incorrect Access Password'); - } - else {return 1;} -} -sub shwcode { - $FORM{'icol'} = "w"; - $ilen = length($iszeros); - $oneline = ""; - $vizis = ""; - $vizno = ""; - $tmeis = ""; - $tmeno = ""; - $vizpge = ""; - for ($cnt = 1; $cnt < $ilen; $cnt++) { - $tg = $cnt; - $vizis .= ""; - $vizno .= ""; - $tg = "c" . $cnt; - $tmeis .= ""; - $tg = "n" . $cnt; - $tmeno .= ""; - $tg = "p" . $cnt; - $vizpge .= ""; - } - print "Content-type: text/html\n\n"; -print < -Your Counter Source Code - - -

Click here to return to your admin page

- - - - -
html source code for your counters
Copy and paste source code into relevant html pages
note: Over use of visible counters can lead to a site appearing 'amateurish'
To copy - right mouse button click on texts, then 'Select All', then 'Copy'
-
-

Simple HIDDEN hit counter without display   CLICK to Select!
-
- this is the preferred counter for most pages ( and faster loading )
place near the top of your html code within the <body> ... </body> tags

-

Hit counter with number display   CLICK to Select!
-
- displays the count total AND updates the counter

-

NON counting with number display   CLICK to Select!
-
- displays the count total without updating the counter
useful for your non-public webmasters utility-links page

-

Hit counter with time display   CLICK to Select!
-
- displays the time AND updates the counter

-

NON counting with time display   CLICK to Select!
-
- displays the time without updating the counter

-

PAGE hit counting with number display   CLICK to Select!
-
- displays the "Page" count, plus updates the log and site count!

-

SSI Server Side Include html imbedded text counter
- <!--#exec cgi="/cgi-bin/logcnt.cgi"-->
If your site allows SSI cgi calls, the path to the program should be
relative to the root directory - some servers may differ.

-

page top

-

Click here to return to your admin page

-
-EOT -exit; -} -sub eds { - &admwd; -if ($FORM{edlog}) { - if ($FORM{deldates} eq "d" && $FORM{dlist}) { - local(@fileout); - open(MAINlog, "$log_path$log_name") || &showErr("$log_name
Log File Access"); - eval"flock (MAINlog, 2)"; - @fileinput = ; - eval"flock (MAINlog, 8)"; - close(MAINlog); - $s2 = 0; - foreach $s1(@fileinput) { - chomp($s1); - if ($s1 =~ /$FORM{'dlist'}/) {$s2 = 1;} - if ($s1 !~ /$FORM{'dlist'}/ && $s2) {push(@fileout,$s1."\n");} - } - if (!$s2) {&showErr('No Matching Dates Found');} - if (@fileout) { - open(MAINlog, ">$log_path$log_name") || &showErr('Unable to Overwrite Log File'); - eval"flock (MAINlog, 2)"; - print MAINlog @fileout; - eval"flock (MAINlog, 8)"; - close(MAINlog); - } - $fsize = ( -s "$log_path$log_name"); - if (!$fsize) {&showErr('Critical Error!
Review Your Hit Page');} - if (!@fileout) {&showErr('NO Records were Removed');} - $rsltpnl = '

Log Pruning comeplete

'; - $FORM{'l'} = $theword; goto jmpin; - } - elsif ($FORM{deldates} eq "k") { - open(MAINlog, ">$log_path$log_name") || &showErr('Unable to Open Log File'); - close(MAINlog); - $fsize = ( -s "$log_path$log_name" ); - if ($fsize) {&showErr('Failure, Log File Not Empty!');} - $rsltpnl = '

All Log Records were Deleted

'; - $FORM{'l'} = $theword; goto jmpin; - } -else {&showErr('Please check your Edit Options');} -} -elsif ($FORM{'gmted'} eq "y") { - if ($FORM{'gmt'} !~ /[0-9]/) {&showErr('GMT Value Error');} - elsif ($FORM{'gmt'} > 12 || $FORM{'gmt'} < -12) {&showErr('GMT Value + or - 12 maximum');} - $s1 = "\$gmtPlusMinus = ".($FORM{'gmt'} * 60 * 60).";\n"; - open (GMT, "<$gmt_pth") || &showErr('GMTSET File Access'); - eval "flock (GMT,2)"; - @gmtin = ; - eval "flock (GMT,8)"; - close (GMT); - $cnts = 0; $s3 = 0; - foreach $s2 (@gmtin) { - if ($s2 =~ /gmtPlusMinus/) {$gmtin[$cnts] = $s1; $s3 = 1; last;} - $cnts++; - } - if ($s3 eq 0) {&showErr('gmtset.pl Variable Not Found');} - open (GMT, ">$gmt_pth") || &showErr('GMTSET File Access'); - eval "flock (GMT,2)"; - print GMT @gmtin; - eval "flock (GMT,8)"; - close (GMT); - $gmtPlusMinus = $FORM{'gmt'} * 60 * 60; - $rsltpnl = '

New GMT Value Saved

'; - $FORM{'l'} = $theword; goto jmpin; -} -elsif ($FORM{'vdychange'} eq "y") { - if ($FORM{'vdys'}) {$s1 = "\$shwDays7 = \"1\";\n";} - else {$s1 = "\$shwDays7 = \"\";\n";} - open (CFG, "<$lookcfg_pth") || &showErr('CONFIG File Access'); - eval "flock (CFG,2)"; - @cfgin = ; - eval "flock (CFG,8)"; - close (GMT); - $cnts = 0; $s3 = 0; - foreach $s2 (@cfgin) { - if ($s2 =~ /\$shwDays7/) {$cfgin[$cnts] = $s1; $s3 = 1; last;} - $cnts++; - } - if ($s3 eq 0) {&showErr('$shwDays7 Variable Not Found');} - open (CFG, ">$lookcfg_pth") || &showErr('CONFIG File Access'); - eval "flock (CFG,2)"; - print CFG @cfgin; - eval "flock (CFG,8)"; - close (CFG); - $shwDays7 = $FORM{'vdys'}; - $rsltpnl = '

New Dates-to-View Value Saved

'; - $FORM{'l'} = $theword; goto jmpin; -} -elsif ($FORM{'edwrd'}) { - if ($FORM{'newwrd'} !~ /^\w{3,}$/) {&showErr("Use minimum 3 Alpha-Numeric characters only
( a to z, A to Z, 0 to 9, and _ )");} - if ($FORM{'newwrd'} ne $FORM{'newwrd2'}) {&showErr('New Password Entries Do Not Match');} - elsif (length ($FORM{'newwrd'}) > 15 || length ($FORM{'newwrd2'}) > 15) {&showErr('15 characters Maximum');} - elsif (!$FORM{'newwrd'} && !$acnt) {&showErr('No Changes Requested');} - elsif (crypt($FORM{'newwrd'}, substr($FORM{'newwrd'},2,2)) eq $acnt) {&showErr('No Changes Requested');} - $newrd = crypt($FORM{'newwrd'}, substr($FORM{'newwrd'},2,2)); - &w_acnt; - $rsltpnl = '

New ADMIN Password Installed

'; - $FORM{'l'} = $theword; goto jmpin; -} -else { - $rsltpnl = '

Editing Options were NOT recognised

'; - $FORM{'l'} = $theword; goto jmpin; } -} -sub lnxed { - &admwd; -if ($FORM{'deladd'} eq "add") { - if ($FORM{'newname'} !~ /^\w+$/) {&showErr("Use only Alpha-Numeric characters in Name
( a to z, A to Z, 0 to 9, and _ )");} - if (length($FORM{'newname'}) > 20) {&showErr("Maximum Name_Length is 20 characters");} - if ($FORM{'newurl'} =~ /\s+/) {&showErr("Do not use spaces etc in URLs");} - if (length($FORM{'newurl'}) > 200) {&showErr("Maximum URL_Length is 200 characters");} - &r_lnx; - $s1 = 0; - foreach $ln (@lns) {if ($ln =~ /^$FORM{'newname'}\|/i) {$s1 = 1; last;} } - if ($s1) {&showErr("Link_Name Already Exists in list");} - else {push(@lns,"$FORM{'newname'}|$FORM{'newurl'}|0\n");} - &w_lnx; - $fsize = ( -s "$log_path$lnks_name" ); - if (!$fsize) {&showErr('Critical Failure. Contact Host');} - $rsltpnl = '

New Link successfully added

'; - $FORM{'l'} = $theword; goto jmpin; -} -elsif ($FORM{'deladd'} eq "del") { - if (length($FORM{'oldname'}) > 20) {&showErr("Maximum Name_Length is 20 characters");} - ($FORM{'newurl'}) = ""; - &r_lnx; - $s1 = 0; - for($cnt = 0; $cnt < @lns; $cnt++) { - if ($lns[$cnt] =~ /^$FORM{'oldname'}\|/i) {splice(@lns,$cnt,1); $s1 = 1; last;} - } - if (!$s1) {&showErr("Link_Name Not Found");} - &w_lnx; - $fsize = ( -s "$log_path$lnks_name" ); - if (!$fsize) {&showErr('Critical Failure. Contact Host');} - $rsltpnl = '

Link_Name successfully Removed

'; - $FORM{'l'} = $theword; goto jmpin; -} -elsif ($FORM{'deladd'} eq "delrst") { - if (length($FORM{'oldname'}) > 20) {&showErr("Maximum Name_Length is 20 characters");} - ($FORM{'newurl'}) = ""; - &r_lnx; - $s1 = 0; - for($cnt = 0; $cnt < @lns; $cnt++) { - @flds = split(/\|/,$lns[$cnt]); - if (uc $flds[0] eq uc $FORM{'oldname'}) { - $lns[$cnt] = "$flds[0]|$flds[1]|0\n"; - $s1 = 1; last;} - } - if (!$s1) {&showErr("Link_Name Not Found");} - &w_lnx; - $fsize = ( -s "$log_path$lnks_name" ); - if (!$fsize) {&showErr('Critical Failure. Contact Host');} - $rsltpnl = '

Link_Count successfully Reset

'; - $FORM{'l'} = $theword; goto jmpin; -} -elsif ($FORM{'deladd'} eq "deled") { - if ($FORM{'oldname'} !~ /^\w+$/) {&showErr("Use only Alpha-Numeric characters in Name
( a to z, A to Z, 0 to 9, and _ )");} - if (length($FORM{'oldname'}) > 20) {&showErr("Maximum Name_Length is 20 characters");} - if ($FORM{'newurl'} =~ /\s+/) {&showErr("Do not use spaces etc in URLs");} - if (length($FORM{'newurl'}) > 200) {&showErr("Maximum URL_Length is 200 characters");} - &r_lnx; - $s1 = 0; - for($cnt = 0; $cnt < @lns; $cnt++) { - @flds = split(/\|/,$lns[$cnt]); - if (uc $flds[0] eq uc $FORM{'oldname'}) { - chomp($flds[2]); - $lns[$cnt] = "$flds[0]|$FORM{'newurl'}|$flds[2]\n"; - $s1 = 1; last; - } - } - if (!$s1) {&showErr("Link_Name Not Found");} - &w_lnx; - $fsize = ( -s "$log_path$lnks_name" ); - if (!$fsize) {&showErr('Critical Failure. Contact Host');} - $rsltpnl = '

Link_URL Edit successful

'; - $FORM{'l'} = $theword; goto jmpin; -} -else {&showErr('Edit Request Not Recognised');} -exit; -} -sub do_get { - &r_lnx; -foreach $listin (@lns) { - if ($listin =~ /^$FORM{'htm'}\|/) { - ($c1) = split(/\|/,$listin); - $box = "<a href="$countScrpt?l=$c1">object</a>"; - $nofind = 1; - last; - } } - if (!$nofind) {$shwget = "

The Link Name $FORM{'htm'} could not be found.

";} - else { - ($sname = $ENV{'SCRIPT_NAME'}) =~ s/^([^\.].*)\.//; - if ($ENV{'SCRIPT_NAME'} =~ m/^(\/.*\/)/ || $ENV{'SCRIPT_NAME'} =~ m/^(\\.*\\)/) {$bin = $1;} - else {$bin = "/???/";} - $rname = "$FORM{'htm'}.$sname"; - $shwget = "

Here is the hyperlink tag for your $FORM{'htm'} link.

Copy the code from this text box   CLICK to Select!

drag cursor over tag (highlight), then right mouse button click - 'Copy'

\n"; - $shwget .= '

SSI utilities

'."\n"; - $shwget .= "

   CLICK to Select!

\n"; - $shwget .= "Copy and rename the "linkname.cgi" script to $rname (chmod 755), and use the above tag in an SSI page. The click total will display as text.
\n"; - $shwget .= "OR
   CLICK to Select!

\n"; - $shwget .= "Copy and rename the "linkcount.cgi" script to $rname (chmod 755), and use the above tag in an SSI page. The hyperlink plus click total will display as text.

\n";} - - print "Content-type: text/html\n\n"; -print < - -Link HTML Code - - -

 

- -
-Your Hyperlink Sample
- -
-$shwget
CLOSE THIS WINDOW to display the admin page
LogLook v3.8 Copyright 1998'99 2000
 
-EOT -exit; -} -sub is_referer_ok { - $check_referer = 0; - if ($ENV{'HTTP_REFERER'}) { - foreach $referer (@referers) { - if ($ENV{'HTTP_REFERER'} =~ m|\Ahttps?://$referer|i) { - $check_referer = 1; - return; - } } } - &showErr('Bad Referer offsite access denied...
use only links/forms ON this site!'); -} -sub showErr { - print "Content-type: text/html\n\n"; - print < - - Error Response - -

 

-
LogLook Viewer Error Response
- - - - -
-

The program has responded with an error

-
The result is:
-
$_[0]
  Use your Back Arrow to return. Thank you.  
-EOT -exit; -} -sub shw_agnts { -print "
 
BROWSERS and OPERATING SYSTEMS
\n"; -print "\n"; -print "
\n"; - $nscp = ($nscp1 + $nscp2 + $nscp3 + $nscp4 + $nscp5 + $nscp_Othr); - $iexp = ($iexp1 + $iexp2 + $iexp3 + $iexp4 + $iexp5 + $iexp_Othr); -print " Use as a guide only - the many derivatives of and changes to browser definitions cannot guarantee accuaracy\n"; -print "

 Of the $agents logged hits:-

\n"; -if ($agents > 0) { -print "Major Browser comparison:\n"; -print "
\n"; -print "\n"; -print "\n"; -print "\n"; -print "\n"; -print "\n"; -print "\n"; -print "
 totalpercentage
Netscape (all types) $nscp".sprintf("%0.2f",($nscp/$agents)*100)."%
Internet Explorer $iexp".sprintf("%0.2f",($iexp/$agents)*100)."%
others
Mozilla Compatible $moz_compat".sprintf("%0.2f",($moz_compat/$agents)*100)."%
Remainder ".sprintf("%d",($agents - $nscp - $iexp - $moz_compat))."".sprintf("%0.2f",(($agents - $nscp - $iexp - $moz_compat)/$agents)*100)."%
\n"; -if ($wbtv || $aol || $opera) { - print " 
Other Recognised Browser Names:\n"; - print "
\n"; - if ($wbtv) {print "\n";} - if ($aol) {print "\n";} - if ($opera) {print "\n";} - print "
WebTV$wbtv".sprintf("%0.2f",($wbtv/$agents)*100)."%
AOL$aol".sprintf("%0.2f",($aol/$agents)*100)."%
Opera$opera".sprintf("%0.2f",($opera/$agents)*100)."%
\n"; -} -print " 
Netscape and IExplorer versions:\n"; -print "
\n"; -print "\n"; -print "\n"; -if ($nscp) {print "\n";} -print "\n"; -if ($iexp) {print "\n";} -print "
version<1><2><3><4><5><6>
Netscape $nscp1 $nscp2 $nscp3 $nscp4 $nscp5 $nscp6
 ".sprintf("%0.2f",($nscp1/$nscp)*100)."%".sprintf("%0.2f",($nscp2/$nscp)*100)."%".sprintf("%0.2f",($nscp3/$nscp)*100)."%".sprintf("%0.2f",($nscp4/$nscp)*100)."%".sprintf("%0.2f",($nscp5/$nscp)*100)."%".sprintf("%0.2f",($nscp6/$nscp)*100)."%
IExplorer $iexp1 $iexp2 $iexp3 $iexp4 $iexp5 $iexp6
 ".sprintf("%0.2f",($iexp1/$iexp)*100)."%".sprintf("%0.2f",($iexp2/$iexp)*100)."%".sprintf("%0.2f",($iexp3/$iexp)*100)."%".sprintf("%0.2f",($iexp4/$iexp)*100)."%".sprintf("%0.2f",($iexp5/$iexp)*100)."%".sprintf("%0.2f",($iexp6/$iexp)*100)."%
\n"; - $wins = ($win95 + $winnt + $win98 + $win3 + $win_unk); - $macs = ($mac68 + $macppc + $mac_unk); -print " 
The common Operating System breakdown is:\n"; -print "
\n"; -print "\n"; - if ($wins) {print "\n";} - if ($macs) {print "\n";} - if ($IBMOS) {print "\n";} - if ($x11) {print "\n";} - if ($lnx) {print "\n";} - if ($sunos) {print "\n";} - if ($irx) {print "\n";} -print "
  *Some definitions might share hitstotalpercentage
MS Windows$wins".sprintf("%0.2f",($wins/$agents)*100)."%
Macintosh$macs".sprintf("%0.2f",($macs/$agents)*100)."%
IBM OS$IBMOS".sprintf("%0.2f",($IBMOS/$agents)*100)."%
X11*$x11".sprintf("%0.2f",($x11/$agents)*100)."%
Linux*$lnx".sprintf("%0.2f",($lnx/$agents)*100)."%
Sun OS*$sunos".sprintf("%0.2f",($sunos/$agents)*100)."%
IRIX*$irx".sprintf("%0.2f",($irx/$agents)*100)."%
\n"; -print " 
MS Windows versions breakdown:\n"; -print "
\n"; -print "\n"; -print "\n"; - if ($wins) {print "\n";} -print "
WinNTWin98Win95Win16Bitunknown
 $winnt $win98 $win95 $win3 $win_unk
".sprintf("%0.2f",($winnt/$wins)*100)."%".sprintf("%0.2f",($win98/$wins)*100)."%".sprintf("%0.2f",($win95/$wins)*100)."%".sprintf("%0.2f",($win3/$wins)*100)."%".sprintf("%0.2f",($win_unk/$wins)*100)."%
\n"; -print " 
Macintosh versions breakdown:\n"; -print "
\n"; -print "\n"; -print "\n"; - if ($macs) {print "\n";} -print "
PowerMac68Kunknown
 $macppc $mac68 $mac_unk
".sprintf("%0.2f",($macppc/$macs)*100)."%".sprintf("%0.2f",($mac68/$macs)*100)."%".sprintf("%0.2f",($mac_unk/$macs)*100)."%
\n"; -} -else {print "NO AGENTS DATA FOUND OR RECOGNISED!\n";} - -print "
\n"; -print "
\n"; -} - @pairs = split(/&/, $query_string); - foreach $pair (@pairs) { - ($name, $value) = split(/=/, $pair); - $value =~ tr/+/ /; - $name =~ tr/+/ /; - $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg; - $name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg; - $value =~ s/~!/ ~!/g; - $value =~ s/<([^>]|\n)*>//g; - $value =~ s/!--#(.|\n)*--//g; - $value =~ s/`//g; - $name =~ s/(\0|\\|\.?\.\/)//mg; - $value =~ s/(\0|\\|\.?\.\/)//mg; - $FORM{$name} = $value; - } - my (@allArray,@dtList,@dtLst,@countaDay,$dateChange,$alips,$shw_day,$ld,$mnu); - $mnu = qq~ 7 DAYS •~ if $shwDays7 && $FORM{'c'} ne $theword; -jmpin: - - if ($FORM{'m'} && &pwrd($FORM{'m'})) {$listAll = 1;} - elsif ($FORM{'c'} && &pwrd($FORM{'c'})) {$listAll = 1;} - elsif ($FORM{'dl'} && &pwrd($FORM{'dl'})) {$listAll = 1;} - elsif ($FORM{'i'} && &pwrd($FORM{'i'}) && $FORM{'idt'} =~ /^\d+\/\d+\/\d+?/) {$listAll = 1; $showIPs = 1;} - elsif ($FORM{'a'} && &pwrd($FORM{'a'})) {$shw_agnt = 1;} - elsif ($FORM{'l'} && &pwrd($FORM{'l'})) {$listLnk = 1;} - elsif ($FORM{'d'} && &pwrd($FORM{'d'}) && $FORM{'dt'}) {$shw_day = $FORM{'dt'}; $listAll = 1;} - elsif (($FORM{'edlog'} == 1 || $FORM{'vdays'} == 1 || $FORM{'gmed'} == 1 || $FORM{'edwrd'} == 1) && &pwrd($FORM{'pwd'})) {&eds;} - elsif ($FORM{'edlnx'} == 1 && &pwrd($FORM{'pwd'})) {&lnxed;} - elsif ($FORM{'shwcde'} == 1 && &pwrd($FORM{'pwd'})) {&shwcode;} - elsif ($FORM{'htm'} && &pwrd($FORM{'pwd'})) {&do_get;} - else { - &showErr('Unknown Request
or bad password'); - } - - open (COUNT, "<$log_path$count_name") || &showErr("$count_name
Count File Access"); - eval"flock (COUNT, 2)"; - $counter = ; - eval"flock (COUNT, 8)"; - close (COUNT); -$| = 1; - print "Content-type: text/html\n\n"; - print< - - - LogLook, Log viewer and Admin program - - - - -MAIN •";} -if ($shw_agnt) {print "

HOME •$lnkbit DATES • $mnu LINKS  LogLook for LogCount CGI

\n";} -elsif (!($listLnk)) {print "

HOME •$lnkbit $mnu LINKSAGENTS  LogLook for LogCount CGI

\n";} -else {print "

HOME MAINDATES • $mnu AGENTS     Log Viewer for LogCount CGI

\n";} - $nosingleIP = 1; - open(MAINlog, "$log_path$log_name") || &showErr('Log File Access'); - eval"flock (MAINlog, 2)"; - -$fsize = ( -s "$log_path$log_name" ); -$isnow = &date_time(1); -print "
\n"; -print "Log File size: $fsize bytes • Current Counter Total: $counter
\n"; -print "Server-Date: ".&date_time(0)." • Zoned-Date: $isnow\n"; -print "
\n"; -($isnow,$scrap) = split(/ /,$isnow); - - my $nn = 0; my $perDay = 0; -while ($input_line = ) { - chomp($input_line); - @lineInArray = split(/\,/,$input_line); - $nn++; $perDay++; - @datein = split(/ /,$lineInArray[0]); - if ($datein[0] ne $dateChange) { - push(@dtList,$lineInArray[0]); - push(@dtLst,$datein[0]); - push(@countaDay,$perDay); - push(@countaIP,$ipperDay); -$nnn++; - $ipperDay = 0; - $dalips = ""; - $perDay = 0; - $dateChange = $datein[0]; - } - - if ($FORM{'m'} && $listAll) { - ($pageName,$scrap) = split(/\#/,$lineInArray[2]); - if ($pageName !~ /[a-z0-9\/]/i) {$pageName = "/$def_pge";} - push(@allArray,$input_line); - &tallypages($pageName); - &tallyips; - } - - elsif ($showIPs && $lineInArray[0] =~ /$FORM{'idt'}/) { - push(@allArray,$input_line); - &calcips($lineInArray[1]); - } - elsif ($listAll && !$shw_day) { - push(@allArray,$input_line); - &tallyips; - } - elsif ($listAll && ($datein[0] eq $shw_day)) { - $ld = $nnn if !$ld; - push(@allArray,$input_line); - &tallyips; - } - elsif ($shw_agnt) { &tallyagents($lineInArray[3]); } - - $lastDate = $lineInArray[0]; -} - eval"flock (MAINlog, 8)"; - close(MAINlog); - - push(@countaIP,$ipperDay); - $dalips = ""; - $alips = ""; - push(@countaDay,$perDay+1); - $firstDate = $dtList[0]; - ($scrap,$scrap1) = split(/ /,$lastDate); - @scrap = split(/\:/,$scrap1); - $partdays = ((($scrap[0]*60)+$scrap[1])/60)/24+(@dtList-1); - -if ($listAll && @allArray > 0 && @dtList > 0) { -if (!$shw_day && !$showIPs) { -print "
\n"; -print "

 
$nn hits over ".sprintf("%0.2f",$partdays)." days, "; -print "averaging ".sprintf("%0.2f",$nn/$partdays)." hits per day.
\n"; -if ($wiz && $nn) {print "$wiz recorded as unique IP#s, [ averaging ".sprintf("%0.2f",$nn/$wiz).":1 page views ]
\n";} -print "First Hit: $firstDate • Last hit: $lastDate
 

\n"; -print "

\n"; -} -print "
\n"; -$cnts = 0; $cnts2 = 0; -foreach $scrap (@dtList) { - ($scrap1,$scrap2) = split(/ /,$scrap); - push (@dateList,$scrap1); - if ($cnts eq 6) { - $cnts = 0; - print "\n"; - } - $cnts++; $cnts2++; - if ($shw_day ne $scrap1) {$dtbits = "$scrap1";} else {$dtbits = "$scrap1";} - print "\n"; -} - if ($cnts < 6) { for ($cnts = $cnts; $cnts < 6; $cnts++) {print "\n";} } - $wch = ""; - if ($shw_day) {$shwDays7 = $shw_day;} - elsif ($shwDays7 && @dateList > 7) {$shwDays7 = @dateList[@dateList-7]; $ld = 7;} - elsif ((!($shwDays7)) && @dateList > 1) {$shwDays7 = @dateList[@dateList-1]; $ld = 1;} - else {$shwDays7 = $wch = "1"; $ld = @dateList;} -print "
$dtbits
Hits:
$countaDay[$cnts2]
 
\n"; - -if ($FORM{'m'} && $listAll) { -print "
\n"; -print " # Hits Page Name\ \; \; \; \; \;"; -if ($pagesup){$scrap = "Highest ".$pagesup." of all";} -else {$scrap = "All";} -print "$scrap pages logged over ".sprintf("%0.2f",$partdays)." days
\n"; - undef @new; -foreach $s2 (@pgT) { -$ss2 = $pageCount{$s2}+1; -push(@new, $ss2."\|".$s2); } - $cnt1 = 1; - foreach $element(sort{$b <=> $a}@new) { - ($numb,$value) = split(/\|/,$element); - if ($pagesup && $cnt1 eq $pagesup + 1) {next;} - if ($cnt1 eq 1) {$wid = $numb}; - print "$cnt1\: $numb $value

\n"; - ++$cnt1; } -} - -elsif ($showIPs) { -print "
\n"; -print "
Hit totals by logged Referrers [ $FORM{'idt'} ]
\n"; -print "\n"; - undef @new; -foreach $s2 (@ipT) { - $ss2 = $ipCount{$s2}+1; -if (!($nosingleIP && $ss2 eq 1)) { - push(@new, $ss2."\|".$s2); } -else {$singles++;} } - $cnt1 = 1; - foreach $element(sort{$b <=> $a}@new) { - ($numb,$value) = split(/\|/,$element); - @clrs = split (/\./, $value); - if (!($cnt1 % 2)) { - if (!$simple) {print "\n";} - else {print "\n";} - } else { - if (!$simple) {print "";} - else {print "";} - } - ++$cnt1; } -if (!($cnt1 % 2)) {print "\n"; } -print "
$cnt1\:$numb\ \;\ \;$value
$cnt1\:$numb \ \;\ \;$value
$cnt1\:$numb\ \;\ \;$value
$cnt1\:$numb\ \;\ \;$value\ \;\ \;\ \;\ \;\ \;
\n"; -if ($singles) {print "$singles single-hit referrers were not listed.
\n";} -if ($form1 eq "d") {print "• View Complete List •\n";} -print "
\n"; -} - -elsif (($FORM{'c'} || $FORM{'d'}) && $listAll) { -print "
\n"; - if ($shw_day) {$dybits = "Hits for 1 selected day";} else {$dybits = "Hits for the last $ld days";} -print "
$dybits
\n"; - $cnts = 1; $dateChange = ""; $ld = (@dtLst - $ld) + 1 if !$shw_day; -foreach $wooza(@allArray) { - if ($wch || $wooza =~ /$shwDays7/) { - $wch = "1"; - @dt = split(/, /,$wooza); - ($hitdate,$hitTime) = (split / /,$dt[0]); - if ($hitdate ne $dateChange) { - $pcent = $countaDay[$ld]; $pcent = " [ averaging ".sprintf("%0.2f",($pcent/$countaIP[$ld])).":1 page views ]" if $pcent; - print "
\n"; - print "
\n"; - print "\n"; - $dateChange = $hitdate; - $cnts = 1; $ld++; - } - if ($dt[2] !~ /[a-z0-9]/i) {$dt[2] = "/$def_pge";} - ($pageName,$scrap) = split(/\#/,$dt[2]); - @clrs = split (/\./, $dt[1]); - print "\n"; - $cnts++; - } -} -} -print "
  • $hitdate   $countaIP[$ld] unique IP# from $countaDay[$ld] hits $pcent   [view]
$cnts$hitTime"; - print "$dt[1]  $pageName"; - if ($showDoms) {print " - $dt[4]";} - print "

\n"; -} - -elsif ($shw_agnt) {&shw_agnts;} - -elsif ($listLnk) { - $lstbx = " \n"; - &r_lnx; - print "
\n"; - print " 
Installed Counted-Links\n"; - print "\n"; - print "\n"; - print "\n"; - print "\n"; - print "\n"; - foreach $ln (sort(@lns)) { - chomp ($ln); @TL = split(/\|/,$ln); - if ($TL[0]) { - print "\n"; - print "\n"; - $lstbx .= " \n"; - print "\n"; - print "\n"; - } } - print "
TagNameCountURL  testing a link ( to a new window ) will not update count
GET  ED$TL[0]$TL[2]$TL[1]
\n"; - @dtList = ""; - $tmp = ""; - pop @dtLst; - foreach $s1 (@dtLst) { - ($s2, $scrap) = split(/ /,$s1); - $tmp .= " \n"; } - if ($shwDays7) {$dy = "7"; $dyy = " checked";} - else {$dy = "1"; $dyy = "";} - $gm = sprintf("%0.2f",$gmtPlusMinus / 60 / 60); - $datetime = &date_time(1); - -print < - - - - - - - - - -
-
add, edit, reset, or delete links
- Enter NEW Link Name needed only for ADD option!
-    20 characters max
-   OR
- Select EXISTING Name for Edit, Reset, and Delete options

  
 
New Link URL - only needed if adding to or editing the list
-   
 
-

Confirm ADD
- Select this button to ADD a
new link Name (and link URL).
-
Confirm EDIT
- Select this button to Edit the
URL of the selected Link Name.
-
Confirm RESET
- Select this button to Reset the
selected Link Names Counter.
-
Confirm DELETE
- Select this button to Delete
the selected Link Name.

- Admin PWrd:     
-EOT - print "Current Program Defaults\n"; - print "
 
\n"; - if ($shwDays7) {print "7 Day View = enabled
\n";} - else {print "7 Day View = disabled
\n";} - print "Zeros Padding = $iszeros
\n"; - print "GMT Plus/Minus= ".sprintf("%0.2f",$gmtPlusMinus/60/60)." hrs
\n"; - if ($dtUS eq "1") {print "Date Format = US
\n";} - elsif ($dtUS eq "2") {print "Date Format = International
\n";} - else {print "Date Format = British
\n";} - print "Home URL:
      $hm_url
\n"; - if ($showDoms) {print "Resolve Host Names = Yes
\n";} - else {print "View Referer Hosts = No
\n";} - @tmp = split(/\|/,$rjct); - print "Rejected Addresses:
\n"; - foreach $rj (@tmp) { - if ($rj) {print "      $rj
\n";} - } - $webmstr =~ s/mailto\://g; - print "
Webmaster Address:
      $webmstr\n"; - print "
\n"; - -print < - - - - - - - - - - - - - -
- -
delete some or all log records
Last Date
-
- to Remove
  Confirm Delete
NOTE - All dates from the beginning, up to and including, the selected date will be permanently deleted. The most recent logged date cannot be deleted with this option, and should not appear in the list.

KILL Log   NOTE : This option will DELETE ALL records from the Log File.
Admin PWrd:
- -
- - - - - - - -
- - -
veiw counter source code
Display link samples for your counters.
-
- -
- - - - - - - - - - -
logged dates displayed by LogLook    current = $dy
 Default: NO view option 
-
 Select: allow 7 day view 
Confirm Change
- You can enable an option to view the last 7 days of the current logged dates. If hits rise to numbers making this page take too long to load (or crashes the program due to server cut-off), then de-select this option and it will not appear on the top link menu.
     Also select "confirm" to save the change.
Admin PWrd: - -
- -
- - - - - - - - - - -
Adjust site GMT Time Zone    current time: $datetime
 GMT
-     
- Hours + or -
- Confirm Change
A common file and value for all dtp-aus.com programs; - If you move from the current time zone, or change to / from daylight savings, enter the new value. Even if the local GMT time zone equals the servers (0.00), you must have your local GMT time zone value entered here. (ie 0.0 or 5.5 or -9 etc).... refer to your local pc clock setup? ie Windows.     Also select "confirm" to save the change.
admin PWrd: - -
- -
- - - - - - - - - - - - - - -
- -
administration password
Use this form to add/change your admin password - required to edit these options.
 New Admin Password
-
Repeat New Password
-
 
- Old Admin PWrd:     
-EOT -} -else {print "

Not enough data for a listing

\n";} -print "

TOP

\n"; -print "

LogLook v3.8, copyright 1998'99 2000

\n"; -print "\n"; -exit; diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/linkcount.cgi b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/linkcount.cgi deleted file mode 100755 index 81b891d1..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/linkcount.cgi +++ /dev/null @@ -1,62 +0,0 @@ -#!/usr/local/bin/perl - -# A free SSI utility for LOGCNT.CGI users. -# THIS program displays the hyperlink PLUS the count. -# linkname.cgi displays only the total of a counted link. -# This script written (and ©) by Ron F Woolley, Melbourne Australia. -# Copyright 1998. This script can be altered for personal use, BUT -# all of this header text MUST REMAIN intact as is. -# -# Support Information is available via: -# http://www.dtp-aus.com/scrpthlp.htm -# File from http://www.dtp-aus.com/cgiscript/cntscrpt.shtml -# -# This file can only be obtained via the above web addresses, -# and MUST NOT be passed on to others in any form by any means -# what so ever. -# -# TO USE - SSI ONLY: If you would like to place text displaying the number of -# times one of your counted hyperlinks has been clicked, place this -# call in the html text of an SSI page (.shtml etc) ie: -# -# Down Load . -# -# where 'linkname' is one of the names you entered in the "hitlink.t" file. -# For each link count you want to access, simply copy this file with the new -# name and place it in your cgi-bin (chmod 755). -# ie link1.cgi, Contact.cgi, Page_One.cgi, etc. (must be legal file name format) -# So, to display 5 different counted link values, you will have, and call, -# 5 different scripts - simple. I use them on my 'Webmasters page' so I don't -# have to run the Admin page every time I log on to the Internet. A result of -# only "-" means the names do not match, "!" = a script or file access error. -# The supplied "webmster.shtml" includes examples. - -# -- If you changed the default path, you will need to change this line also --- - require "sets/cntcnfg.pl"; -# ------------------------------------------------------------------------------ - $cnt = "!"; - if (!$ENV{'SCRIPT_NAME'}) {print "Content-type: text/html\n\n"; &errs;} - $lnkName = $ENV{'SCRIPT_NAME'}; - $lnkName =~ s|^.*/||; - $lnkName =~ s|^.*\\||; - print "Content-type: text/html\n\n"; - print &get_lnk_dat; -exit; -sub get_lnk_dat { - $cnt = "-"; - if (!open (COUNT, "<$log_path$lnks_name")) {&errs;} - eval "flock(COUNT,2)"; - @lns = ; - eval "flock(COUNT,8)"; - close(COUNT); - foreach $ln (@lns) { - @TL = split(/\|/,$ln); - if ($lnkName =~ /(^$TL[0]\.cgi)/) { - $cnt = $TL[2]; - last; - } } -chomp($cnt); -# if you change this line, the visible format must be suitable for ALL links -return "$TL[0]
($cnt)"; -} -sub errs {print $cnt; exit; } diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/linkname.cgi b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/linkname.cgi deleted file mode 100755 index f3cbdb66..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/linkname.cgi +++ /dev/null @@ -1,61 +0,0 @@ -#!/usr/local/bin/perl - -# A free SSI utility for LOGCNT.CGI users. -# THIS program displays only the total of a counted link. -# linkcount.cgi displays the hyperlink PLUS the count. -# This script written (and ©) by Ron F Woolley, Melbourne Australia. -# Copyright 1998. This script can be altered for personal use, BUT -# all of this header text MUST REMAIN intact as is. -# -# Support Information is available via: -# http://www.dtp-aus.com/scrpthlp.htm -# File from http://www.dtp-aus.com/cgiscript/cntscrpt.shtml -# -# This file can only be obtained via the above web addresses, -# and MUST NOT be passed on to others in any form by any means -# what so ever. -# -# TO USE - SSI ONLY: If you would like to place text displaying the number of -# times one of your counted hyperlinks has been clicked, place this -# call in the html text of an SSI page (.shtml etc) ie: -# -# "File downloaded times." -# -# where 'linkname' is one of the names you entered in the "hitlink.t" file. -# For each link count you want to access, simply copy this file with the new -# name and place it in your cgi-bin (chmod 755). -# ie link1.cgi, Contact.cgi, Page_One.cgi, etc. (must be legal file name format) -# So, to display 5 different counted link values, you will have, and call, -# 5 different scripts - simple. I use them on my 'Webmasters page' so I don't -# have to run the Admin page every time I log on to the Internet. A result of -# only "-" means the names do not match, "!" = a script or file access error. -# The supplied "webmster.shtml" includes examples. - -# -- If you changed the default path, you will need to change this line also --- - require "sets/cntcnfg.pl"; -# ------------------------------------------------------------------------------ - $cnt = "!"; - if (!$ENV{'SCRIPT_NAME'}) {print "Content-type: text/html\n\n"; &errs;} - $lnkName = $ENV{'SCRIPT_NAME'}; - $lnkName =~ s|^.*/||; - $lnkName =~ s|^.*\\||; - print "Content-type: text/html\n\n"; - print &get_lnk_dat; -exit; -sub get_lnk_dat { - $cnt = "-"; - if (!open (COUNT, "<$log_path$lnks_name")) {&errs;} - flock(COUNT,2); - @lns = ; - flock(COUNT,8); - close(COUNT); - foreach $ln (@lns) { - @TL = split(/\|/,$ln); - if ($lnkName =~ /(^$TL[0]\.cgi)/) { - $cnt = $TL[2]; - last; - } } -chomp($cnt); -return $cnt; -} -sub errs {print $cnt; exit; } diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/makedir.cgi b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/makedir.cgi deleted file mode 100755 index 30579839..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/makedir.cgi +++ /dev/null @@ -1,65 +0,0 @@ -#!/usr/local/bin/perl - -#### Once this script is used, DELETE IT immediatly.#### -#### Once this script is used, DELETE IT immediatly.#### -#### Input to this script is not protected #### - -##--Place in your cgi-bin directory and chmod 755 (7=r+w+x, 5=r+x). -##--Then run from browser command line, ie http://www.yourdomain.path/cgi-bin/makedir.cgi - -$dir = "sets"; -mkdir $dir,"766"; -chmod(0766, "$dir"); - -$dir1 = "counters"; -mkdir $dir1,"766"; -chmod(0766, "$dir1"); - -if (!open (NEW, "+<$dir/gmtset.pl")) {open (NEW, ">$dir/gmtset.pl");} -close (NEW); chmod(0766, "$dir/gmtset.pl"); -if (!open (NEW, "+<$dir/cntcnfg.pl")) {open (NEW, ">$dir/cntcnfg.pl");} -close (NEW); chmod(0766, "$dir/cntcnfg.pl"); -if (!open (NEW, "+<$dir/lookcnfg.pl")) {open (NEW, ">$dir/lookcnfg.pl");} -close (NEW); chmod(0766, "$dir/lookcnfg.pl"); -if (!open (NEW, "+<$dir1/a_dolink.pl")) {open (NEW, ">$dir1/a_dolink.pl");} -close (NEW); chmod(0766, "$dir1/a_dolink.pl"); -if (!open (NEW, "+<$dir1/a_errlog.pl")) {open (NEW, ">$dir1/a_errlog.pl");} -close (NEW); chmod(0766, "$dir1/a_errlog.pl"); -if (!open (NEW, "+<$dir1/hitbadlog.t")) {open (NEW, ">$dir1/hitbadlog.t");} -close (NEW); chmod(0766, "$dir1/hitbadlog.t"); -if (!open (NEW, "+<$dir1/hitcount.t")) {open (NEW, ">$dir1/hitcount.t");} -close (NEW); chmod(0766, "$dir1/hitcount.t"); -if (!open (NEW, "+<$dir1/hitlnk.t")) {open (NEW, ">$dir1/hitlnk.t");} -close (NEW); chmod(0766, "$dir1/hitlnk.t"); -if (!open (NEW, "+<$dir1/hitlog.t")) {open (NEW, ">$dir1/hitlog.t");} -close (NEW); chmod(0766, "$dir1/hitlog.t"); -if (!open (NEW, "+<$dir1/look.pwd")) {open (NEW, ">$dir1/look.pwd");} -close (NEW); chmod(0766, "$dir1/look.pwd"); - -print "Content-type: text/html\n\n"; -print "\n"; - -if (!( -e "$dir")) {print "New $dir Directory not created.
\n"; $s1 = 1;} -if (!( -e "$dir1")) {print "New $dir1 Directory not created.
\n"; $s1 = 1;} -if (!( -e "$dir/gmtset.pl")) {print "$dir/gmtset.pl File not created.
\n"; $s1 = 1;} -if (!( -e "$dir/cntcnfg.pl")) {print "$dir/cntcnfg.pl File not created.
\n"; $s1 = 1;} -if (!( -e "$dir/lookcnfg.pl")) {print "$dir/lookcnfg.pl File not created.
\n"; $s1 = 1;} -if (!( -e "$dir1/a_dolink.pl")) {print "$dir1/a_dolink.pl File not created.
\n"; $s1 = 1;} -if (!( -e "$dir1/a_errlog.pl")) {print "$dir1/a_errlog.pl File not created.
\n"; $s1 = 1;} -if (!( -e "$dir1/hitbadlog.t")) {print "$dir1/hitbadlog.t File not created.
\n"; $s1 = 1;} -if (!( -e "$dir1/hitcount.t")) {print "$dir1/hitcount.t File not created.
\n"; $s1 = 1;} -if (!( -e "$dir1/hitlnk.t")) {print "$dir1/hitlnk.t File not created.
\n"; $s1 = 1;} -if (!( -e "$dir1/hitlog.t")) {print "$dir1/hitlog.t File not created.
\n"; $s1 = 1;} -if (!( -e "$dir1/look.pwd")) {print "$dir1/look.pwd File not created.
\n"; $s1 = 1;} - -if ($s1) {print "
Errors Occurred! Read the Readme file for options.\n";} -else {print "No Errors reported, so the sub directory and files should be ready for you to copy to (FTP). See Readme file.\n";} -print "
Script finished, ".localtime(time).", Server Local Time.\n"; -print "

The absolute pathname of this script is $ENV{'SCRIPT_FILENAME'}.
\n"; -print "The relative pathname of this script (via the root directory) is $ENV{'SCRIPT_NAME'}.
Delete this script NOW!.

\n"; -print "\n"; - -exit; - -#### Once this script is used, DELETE IT immediatly.#### -#### Once this script is used, DELETE IT immediatly.#### diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/-.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/-.gif deleted file mode 100755 index 3dc633e1..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/-.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/0.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/0.gif deleted file mode 100755 index eac4e3e0..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/0.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/1.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/1.gif deleted file mode 100755 index e551ad76..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/1.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/2.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/2.gif deleted file mode 100755 index b5dea246..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/2.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/3.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/3.gif deleted file mode 100755 index 85472d0c..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/3.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/4.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/4.gif deleted file mode 100755 index 4958feaf..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/4.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/5.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/5.gif deleted file mode 100755 index 34bba7e1..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/5.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/6.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/6.gif deleted file mode 100755 index 996fea53..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/6.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/7.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/7.gif deleted file mode 100755 index 787926ea..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/7.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/8.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/8.gif deleted file mode 100755 index 1384c4cc..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/8.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/9.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/9.gif deleted file mode 100755 index ed79b8b2..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/9.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/a.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/a.gif deleted file mode 100755 index 7b6ccf16..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/a.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/p.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/p.gif deleted file mode 100755 index 5c5635bd..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics1/p.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/-.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/-.gif deleted file mode 100755 index 4017ef79..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/-.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/0.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/0.gif deleted file mode 100755 index 925a2b61..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/0.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/1.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/1.gif deleted file mode 100755 index 59b283cd..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/1.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/2.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/2.gif deleted file mode 100755 index 009166b8..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/2.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/3.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/3.gif deleted file mode 100755 index df73e917..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/3.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/4.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/4.gif deleted file mode 100755 index 110b82ba..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/4.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/5.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/5.gif deleted file mode 100755 index 507302b8..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/5.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/6.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/6.gif deleted file mode 100755 index 6348c761..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/6.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/7.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/7.gif deleted file mode 100755 index f39bcfc7..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/7.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/8.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/8.gif deleted file mode 100755 index a97343b9..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/8.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/9.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/9.gif deleted file mode 100755 index 94bf9e5a..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/9.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/a.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/a.gif deleted file mode 100755 index 1e9e2de1..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/a.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/p.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/p.gif deleted file mode 100755 index 7faaa664..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/pics2/p.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/sets/cntcnfg.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/sets/cntcnfg.pl deleted file mode 100755 index 18e9ed64..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/sets/cntcnfg.pl +++ /dev/null @@ -1,42 +0,0 @@ -#### adding/subtracting zeros alters length of visible counters ---# -$iszeros = "000000"; - -#### Select British ("0"), US ("1"), Internat ("2") date pattern --# -$dtUS = "2"; - -#### An array of accepted referers domain names / IP#s ------------# -@referers = ('armandino.free.fr', 'chantaco.lip6.fr','asim.lip6.fr','www-asim.lip6.fr','lip6.fr','132.227.86.2',); - -#### An array of rejected domain names / IP#s ---------------------# -$rjct = "|myfoobars.com|000.000.000.000|wallies.edu.ca/~bloggs|"; - -#### Path to Records and Counter Images, SEE readme.txt file ------# -$gmt_pth = "sets/gmtset.pl"; -#$log_path = "counters/"; # - with forward slash -$count_name = "hitcount.t"; -$log_name = "hitlog.t"; -$lnks_name = "hitlnk.t"; -$badlog_name = "hitbadlog.t"; -$def_pge = "index"; -$iwid = 13; -$ihgt = 17; -$ssi_zro = 1; - -#### PATH OR URL to NON SSI img display images --------------------# -#-- this can be the same as the $ssi_url value! (see readme) -# $img_url = "counters/"; # PATH - with forward slash - #$img_url = "http://yourdomain.name/ssi_img/"; # URL - with forward slash - -#### URL to the images for SSI img display (see readme) -----------# - $ssi_url = "http://www-asim.lip6.fr/ssi/img/"; # - with forward slash - -#### SSI Output (0 = hidden (blank), 1 = Text, 2 = Images ---------# - $ssi_img = 1; - -#### E-Mail address of the Webmaster ------------------------------# - $webmstr = "mailto:Olivier.Sirol\@lip6.fr?subject=Link_Error"; - -#### Show Referer Domain Names, SEE readme.txt file ---------------# - $showDoms = "1"; - -1; # this line MUST remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/sets/gmtset.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/sets/gmtset.pl deleted file mode 100755 index 91fec8e7..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/sets/gmtset.pl +++ /dev/null @@ -1,6 +0,0 @@ -#### value = GMT at your locality, in seconds (cen setup via admin!)--------# -#### ie (5hrs AHEAD) = 5X60X60 = 18000, (3.5hrs BEHIND) = -3.5X60X60 = -12600 - -$gmtPlusMinus = 0; - -1; # this line must remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/sets/lookcnfg.pl b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/sets/lookcnfg.pl deleted file mode 100755 index 1a033880..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/sets/lookcnfg.pl +++ /dev/null @@ -1,23 +0,0 @@ -#### Path to Records and Counter Images, SEE readme.txt file ------# -$lookcfg_pth = "sets/lookcnfg.pl"; -$pwrd_name = "look.pwd"; - -$grf1_url = "$ssi_url"."grf0.gif"; -$grf0_url = "$ssi_url"."grf1.gif"; - -#### URL of the prefered return page (Home) -----------------------# -$hm_url = "http://www-asim.lip6.fr/"; - -#### URL of the LOGLOOK.CGI log viewer script ---------------------# -$logScrpt = "http://www-asim.lip6.fr/cgi-bin/czo/lc/cgi-bin/loglook.cgi"; - -#### URL of the LOGCNT.CGI counter script -------------------------# -$countScrpt = "http://www-asim.lip6.fr/cgi-bin/czo/lc/cgi-bin/logcnt.cgi"; - -#### Enable display of last 7 days ("1") --------------------------# -$shwDays7 = "1"; - -#### Enter a Password or leave blank(""), SEE readme.txt file -----# -$theword = "log"; - -1; # this line MUST remain in all 'require' files. diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/-.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/-.gif deleted file mode 100755 index c6a7f0d7..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/-.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/0.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/0.gif deleted file mode 100755 index eac4e3e0..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/0.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/1.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/1.gif deleted file mode 100755 index e551ad76..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/1.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/2.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/2.gif deleted file mode 100755 index b5dea246..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/2.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/3.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/3.gif deleted file mode 100755 index 85472d0c..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/3.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/4.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/4.gif deleted file mode 100755 index 4958feaf..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/4.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/5.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/5.gif deleted file mode 100755 index 34bba7e1..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/5.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/6.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/6.gif deleted file mode 100755 index 996fea53..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/6.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/7.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/7.gif deleted file mode 100755 index 787926ea..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/7.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/8.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/8.gif deleted file mode 100755 index 1384c4cc..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/8.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/9.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/9.gif deleted file mode 100755 index ed79b8b2..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/9.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/a.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/a.gif deleted file mode 100755 index 7b6ccf16..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/a.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/grf0.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/grf0.gif deleted file mode 100755 index f8531607..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/grf0.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/grf1.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/grf1.gif deleted file mode 100755 index c4bc6c71..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/grf1.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/p.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/p.gif deleted file mode 100755 index 5c5635bd..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/p.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/trans.gif b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/trans.gif deleted file mode 100755 index e7749f21..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/ssi_img/trans.gif and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/testbin.cgi b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/testbin.cgi deleted file mode 100755 index a7e9f8bc..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/testbin.cgi +++ /dev/null @@ -1,120 +0,0 @@ -#!/usr/local/bin/perl - -# DO NOT EDIT code below this line!! - -# The first line above must be a call to the location of your PERL 5 program. -# This MUST BE CORRECT - view installed scripts or consult Hosts Manual. -# FTP upload as an ASCII file to your CGI-BIN and set permissions to chmod 755 -# CALL as "http://www.yourdomain.name/cgi-bin/testbin.cgi -# CHANGE this next line to the correct URL to this program - - $sriptURL = "http://asim.lip6.fr/cgi-bin/czo/lc/cgi-bin/testbin.cgi"; - -# DO NOT LEAVE this program on your site - delete after use!!! -# Australian/International copyright Ron F Woolley 2000 - - $field{'mailpth'} = "/usr/lib/sendmail"; my $cnvrt; my $boo = " 
"; &GetFormInput; - &is_mail if $field{'mailpth'} && $field{'email'} && $field{'send'}; - print "Content-Type: text/html\n\n"; -open (FLE, $0);@p1 = ;close (FLE);($pl = $p1[0]) =~s/\n//g if $p1[0] =~ /^#!\//; -if (-e "C:/" || $^O =~ /MSWin32/i) {$is32 = " on Win32:NT!";} - if (($ENV{'REMOTE_ADDR'} eq $ENV{'REMOTE_HOST'} || !$ENV{'REMOTE_HOST'}) && $ENV{'REMOTE_ADDR'} =~ /(\d+)\.(\d+)\.(\d+)\.(\d+)/) { - $pk = pack('C4', $1, $2, $3, $4); $cnvrt = (gethostbyaddr($pk, 2))[0]; if ($cnvrt) {$ENV{'REMOTE_HOST'} = $cnvrt;} } - if ($] =~ /^5/ && !$is32) { -$t1 = "

If you can read this page then the cgi-bin and
-this script have executed without errors. Your
-CGI-BIN is set up and working correctly. - -

If installing dtp-aus.com scripts, you can now
-try the makedir.cgi script to create directories
-and empty files, ready for FTP uploading of all
-the files supplied (see readme.htm)."; } - elsif ($] && $] !~ /^5/ && !$is32) { -$t1 = "

If you can read this page then the cgi-bin and
-this script have executed without errors. Your
-CGI-BIN is set up and working correctly. - -

However, $pl is
-is NOT calling Perl versions 5. My dtp-aus.com
-scripts are written for Perl Version 5. Contact
-your Host Service for the correct path to Perl 5
-on your server.
"; } - elsif ($is32) { -$t1 = "

My dtp-aus.com Perl 5 scripts are not written for
-MS NT, nor do they currently receive any support
-for that operating system.
- -

But, if you can read this page then the cgi-bin
-and this script have executed without errors. Your
-CGI-BIN is set up and working correctly."; } - elsif (!$]) { -$t1 = "

Your Perl Version could not be ascertained
-for installation verification.
- -

But, if you can read this page then the cgi-bin
-and this script have executed without errors. Your
-CGI-BIN is set up and working correctly."; } - else {$t1 = "

Details could not be ascertained.";} -print qq~Unix CGI-BIN Perl 5 Test -

$boo
$pl
Perl $]$is32
-Absolute path : $ENV{'SCRIPT_FILENAME'}
$t1

Thank You
Ron Woolley - www.dtp-aus.com / www.hostingnet.com

-
-
 
-If the latest v5 of perl is not reported above, try another (first line, top of the script).
-   ** From most servers a list should have been created below.
 
-To check your Sendmail program, enter the path in the first box.
IF A CRASH OCCURS then use the back arrow to return and try another. BUT IF this
-page reappears then check your e-mail where a simple letter should arrive within minutes.
 
-The PATH to your servers "Sendmail" program -
Your E-Mail address ( double check it ) -
-
  *   malfunctioning server Sendmail set up can receive without error BUT not send!!
-NOTE: Some servers might report the Sendmail path below.
  ** perl paths may be listed below from some servers but not the sendmail path.
~; -print qq~

~; - $mprog =`whereis sendmail`; - $path =`whereis perl`; - @chked1 = split(" ",$mprog); - @chked2 = split(" ",$path); - $is = `which perl`; - $mis = `which sendmail`; -print qq~

Perl Path(s)
~; foreach $s2 (@chked2) {print "• $s2
";} -print qq~Default Perl : $is
Sendmail Path(s)
~; foreach $s2 (@chked1) {print "• $s2
";} -print qq~Default Sendmail : $mis


~; - -exit(0); -sub is_mail { - my ($mprog,$rec,$tm); $tm = localtime(time); - $mprog = "$field{'mailpth'}"; - $rec = "$field{'email'}"; - if (open (MAIL, "|$mprog -t")) { - print MAIL "To: $rec\n"; - print MAIL "From: $rec\n"; - print MAIL "Subject: TESTBIN.CGI\n"; - print MAIL "\n\n"; - print MAIL "--------------------------------\n" ; - print MAIL " This is just test blurb.\n Your Sendmail path worked!!\n \"$field{'mailpth'}\"\n" ; - print MAIL "--------------------------------\n" ; - print MAIL " IP# < $ENV{'REMOTE_ADDR'} >\n Host < $ENV{'REMOTE_HOST'} >\n $tm\n\n"; - close (MAIL); - $boo = "

Mail 'attempt' passed - check your mail

"; } - else {$boo = "

Could not open Sendmail!

";} -} -sub GetFormInput { - if ( $ENV{'REQUEST_METHOD'} eq 'GET' ) { $buffa = $ENV{'QUERY_STRING'}; } - elsif ( $ENV{'REQUEST_METHOD'} eq 'POST' ) { read(STDIN,$buffa,$ENV{'CONTENT_LENGTH'}); } - else { print "Content-Type: text/html\n\n"; print "OOOPs!

Use ONLY GET or POST method!

"; exit(0);} - @bvals = split(/&/,$buffa); - foreach $i (0 .. $#bvals){ - ($name,$val) = split (/=/,$bvals[$i],2); - $val=~tr/+/ /; - $val=~ s/%(..)/pack("c",hex($1))/ge; - $name=~tr/+/ /; - $name=~ s/%(..)/pack("c",hex($1))/ge; - $val =~ s/~!/ ~!/g; - $val =~ s/`//g; - $val =~ s/<([^>]|\n)*>//g; - $name =~ s///g; - $val =~ s///g; - $field{$name} = $val; - } -} diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/utility.txt b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/utility.txt deleted file mode 100755 index c015ec21..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/utility.txt +++ /dev/null @@ -1,27 +0,0 @@ -********** SSI counted link viewing utilities ********** - -The files, utility.txt, linkcount.cgi, linkname.cgi, and -webmster.shtml are intended as free utility additions to LOGCOUNT. -Link counts can be viewed via LogLook. However should you wish -to add certain ones to a secure webmasters master page without -using LogLook all the time... for example, or display a counted -hyperlink with the current total next to it, then the scripts -linkcount.cgi and linkname.cgi can be utilised via SSI calls. - -So, LogCount can be used to keep a count of each "counted link" -you install on your site. If you use this facility, it is a simple -matter of renaming linkcount.cgi or linkname.cgi to the name of -EACH of your installed counted links you want to display on SSI web -pages, ie link1.cgi and link2.cgi etc, and placing each new -copy of the script into your cgi-bin (chmod 755). - -The name must match the link name exactly, U/L case included. - -Sample SSI calls are in the scripts plus in the html code of -the additional "webmster.shtml" file (with ). - -Contact me at somename@dtp-aus.com for assistance or to report -its usefulness. As with logcnt.cgi and loglook.cgi, you do not -have to be registered for basic support etc, but general program -installation e-mail help is NOT available as these are not -beginners programs. Thank you - Ron. \ No newline at end of file diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/webmster.shtml b/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/webmster.shtml deleted file mode 100755 index fd3f9bc3..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/cgi-bin/private/webmster.shtml +++ /dev/null @@ -1,95 +0,0 @@ - - - -Webmasters page - - - - -

Webmasters Utility Access page

- - - - -

site count • - -local time. -

- - -
- - -
-
- - - -
- View LogCount records
Counter Log Password: -   -
- leave box empty if password not required
-
-
- - -  -
- - - - - - - - - - - - - - - - - - - - - -
Add other utility links here.Add other utility links here.
Add other utility links here.Add other utility links here.
- linkName1
- linkName2
- linkName3 -
- -
- -
- - -
- linkName4
- linkName5
- linkName6 -
- -
- -
- - -
- -  - -
- - - diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/readme.htm b/dev/cvslargo/www/cgi-bin/czo/lc/readme.htm deleted file mode 100755 index 8c93a825..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/readme.htm +++ /dev/null @@ -1,1006 +0,0 @@ - - - - - -Welcome to the LogCount - - - - -

-

- Welcome to the -www.dtp-aus.com Counter and Log Viewer scripts.
-
-
-

-

-

- IMPORTANT -INFORMATION THAT MUST BE READ IF YOU WANT TO USE THESE -SCRIPTS -
-

-

-

- - - - -
-

The scripts "LOGCNT.CGI" and "LOGLOOK.CGI" written (and (c)) by Ron F Woolley, Melbourne - Australia. - Copyright 1998 '99 2000. These free-to-use scripts can be altered - for personal use, BUT
-
  ALL COPYRIGHT NOTICES must remain in the code, and visible on all output pages,
-   AND ALL of the header notices MUST REMAIN intact as is,
-   AND using the script(s) without first reading the README.HTM, is prohibited.

-
-

Australian copyright is recognised/supported in over 130 countries
- per Berne Convention and other treaties - ( including USA! )
-

-
-

The - scripts and associated files remain the property of Ron F Woolley/HostingNet.

-
-

- NO PROFIT what so ever is to be gained from users for supply of these scripts for the use of - these - scripts, - except that a reasonable minimal charge for installation may be allowed - if - installing - as a site - developer, for a user on the users site that is not on / in the developers domain OR site... remote hosting NOT allowed.

-

- This programs must NOT be used for multiple LogCount users on one site/domain
- and the program/resources must not be supplied as a remote service.

-

- Ron Woolley, the author, MUST be notified via the addresses/URLs - below
- if any monetary charge is applied for the installation of these scripts.

-

NOTE: If you use these - files, you do so entirely at your own risk, and take on full responsibility for the - consequences of using the described files. You must first agree that Ron Woolley / - HostingNet, the only permtted supplier of this and/or accompanying files are exempt from any responsibility for - all or any resulting problems, losses or costs caused by your using these or any - associated files - even if problems are known.

-
-

If you disagree - with any of these requirements,
- you must immediately destroy all files.

-

Although this program script is free to - use, if you use it and find it useful, a donation to help continue this support and keep - new scripts / upgrades coming would of course be appreciated.
-       On line Visa / MasterCard payments are available for donations and low cost installations.
-

-

These - files can only be obtained via the above web addresses, and
- must not be passed on to others in any form by any means what so ever.
- This does not contradict any other statements above - & ensures user obtained the latest.

-

- - - - -


- - -
- - - - - - - -
DESCRIPTIONVARIABLES INSTALLINGTAGS
- • LINK COUNTINGLOGLOOKUTILITIES
-
-

-

- - NEW** Version 3.8, February 2000; - NEW and CHANGED: **Changed -
-
check every few months for upgrades
-

-

Like all other dtp-aus.com free programs, LogCount is a fully working program for webmasters, and not a common "play with and plagiarise" free script as found on many sites...
-     - available / continuously developed for more than 15 months supporting webmasters.

-

History....
- 1
. - v2.0 The auto creation of count and log files has been - removed because of the possible temporary loss of access deleting - file contents. The empty files are now supplied in the zip file - (see 3).
-
2. - v2.0 If your server does not supply 'REMOTE_HOST' info, - the counter script now attempts to create this info from the - local Domain Name Server.
-
3. - November ’98 vrsn. 2.0 to 2.1
- - included free utility SSI script for inserting text counts - of counted hyperlinks into SSI HTML pages. (instructions in - file, somename.cgi)
- - included utility set up script for creating directory structure, - files and chmod permissions (makedir.cgi).
-
4. - v3.0 The 'referrer rejection' option did not work at all - and had been overlooked. This version fixes that with a very - minor change to the $rjct variable values (see 'Rejecting - Specific Addresses' below), and corrected code in the logcnt.cgi - script. Also added to LogCount is the ability to show a static - digital clock or time display (hours and minutes). - The clock can be used for display only, or used as the counter - adding to the log etc.
- v3.1 Minor change that now uses the character "n" - in place of "C" to display the time WITHOUT counting. - This is necessary for non case-sensitive servers.
-
5. v3.3 Changes to the date / time routines September '99.
- 6. v3.5 Major additions to LogLook plus minor changes to the LogCount program and config files October '99.
-
7. v3.5b Only a week or so after releasing v3.5, the supplied utility SSI program has been upgraded to two SSI programs. "linkname.cgi" that displays just a hyperlink count total as text, and "linkcount.cgi" that displays both the counted hyperlink tag and the hyperlink count total as text. see below
-      - 3.5c = minor addition to LogLook counted-link tag generation

-

8. v3.8 Changes to the config files (LogLook now has its own config file). Ability to display and count individual page counts while still updating the site count and log! Major enhancements to the free LogLook viewer. All page names logged with their directory name (if in a sub dir off the root). Use one of three display methods for SSI counters - display blank (hidden), or Text, or Images! Two new "require" sub routine files to trim the counter program.

-

Low cost installations can be carried out by the author; see program page for details link.
- This program is written to be compiled by Perl versions 5+ on Unix servers

-

MENU

-
- - - - -
-
-

ABOUT
-

-

Six programs are supplied. LogCount the counter, LogLook the very unique basic log viewer, two utilities to help you install the program, and two utilities some may find handy to SSI imbed activated counted hyperlink totals, or link and totals, in ot SSI activated pages

-

This "About" section plus the other detailed sections will cover all the options available to you for your site. However here is a list of things to look for:
- • Leading Zeros control
- • Hidden img tag counter
- • Visible img tag counter/display
- • Visible img tag NON counting display
- • Display Time counter
- • Display Time NON counter -
- • SSI Hidden counting
- • SSI Text Display counting -
- • SSI Img Tag Display counting
- • Visible SSI Displays with/without leading zeros
- • Page Counting Display while still adding to site log AND site counter
- • Keep count totals of Clicked Hyperlinks of special interest
- • Generate ALL counter and activated named link tags - simple copy and paste!
-
• visually track visitors page accesses
- • view most popular pages
- • view browser type comparisons
- • view total unique IP#s and pages-viewed averages -
- • view above for any date retained in the current log
- • view IP# page totals for any date in the current log

-

So, you can use the lot or just one of those options. But you can see why you get such a large help page as this one.

-

Version 3.8 includes some important set up changes and enhancements to LogLook and a new page counting option - LogCount is a proper site counter - see history above.

-

v3.5 LogLook included administrative options for creating, editing, resetting, and deleting counted hyperlinks. The tag for any counted hyperlink can be readily generated for a simple copy and paste in to web pages. The tags for all counter methods can also be readily generated via LogLook for simple copy and paste in to web pages, plus several other setup options can be changed.

-

pre v3.3 UPGRADE
- Pre version 3.3 users will find several new variables in the config file. Also note the renaming of both the config and GMT files. If you are using other dtp-aus.com programs sharing the "sets" sub directory, either rename the gmt file reference in those other programs or change the new file name. -This has occurred because gradually all programs will be using require files with the extension ".pl". The new LogCount and LogLook programs can upload over v3.3 - unless the previous have been altered... and I cannot help.

-

Once installed
- It is strongly suggested that LogLook be the first program to test. The simple mistakes often made in setting up counter tags can be misleading and many inexperienced people assume wrongly when fault tracking. By using LogLook first, once it works and options can be changed, or even if the error reports inbuilt are generated, then most of the installation can be then be assumed as correct and later counter tags can be looked at with more confidence.

-

Then install the webmasters access page even if not going to use the supplied one! This includes a couple of NON-counting visible counters to check paths etc. All digits should show zero unless you manually add a count to the count file - see variables below

-

PROPERLY SET UP the programs CANNOT be accessed from remote pages containing links to them OR a browser command line - this is a first level security feature and INCLUDES YOU!

-

All relevant files are - supplied in one compressed .zip file that includes the recommended - directory structure. It is assumed that the .zip file has been - uncompressed to the directory structure included in the .zip - file on your local pc before proper FTP uploading - keep perl programs away from MSFrontPage and other site posting wysiwyg editors!

-

You MUST alter all reference - to "yourdomain.name" in the config 'require' files plus the - webmasters page, and change the configuration variables, as described - in this Readme text. Also set up the paths and URLs correctly in both program config files in the sets directory (the "sets" directory is used by all dtp-aus.com programs and will achieve even greater importance in the near future - currently the GMT config file is accessed/can be changed by all dtp-aus.com programs ie one change upgrades all programs!).

-

Firstly, a few explanations. - LogCount does not use in-built count images, allowing you to - use any counter image "sets" that are readily available - via the Internet. These sets must include 10 images, displaying - 0 - 9, and when placed in the appropriate directory (folder), - they must be named or renamed "0.gif" through to "9.gif". - *Note* The clock option, if used, requires - conversion of any of your current images to a full colon ( : - ) named "-.gif", an image displaying "am" - named "a.gif", and one displaying "pm" named - "p.gif".

-

Both of - the supplied image sets have been updated - with these images (to display the clock on any page, see "Displaying - The Clock" below).

-

Extra server resources - are not called upon by calling additional "on call" - programs that create the images. The only loss here is the ability - to add "pretty" borders to the count display. Logcount, - and Loglook scripts are designed for conservative tracking and analysing visitor - trends and page popularity etc, so it is suggested that the majority - of pages only include the simple "Hidden Counter" options. - Small conservative light and dark background count images are - supplied.

-
- - - - - - - - - - - - -
Please NOTE:
If you install and use this script, please contact us at logcountreport@dtp-aus.com with server - type detailsand how the script installed and worked etc, - for a report base assisting others.
-
( a vote at cgi.resourceindex.com - via red form on the LogCount program page - or any other cgi links site would also be appreciated to help "spread the word" )
-
  Thank you.
-
-

MENU

-
-

For INTERMEDIATE installation experience - Help / Advice information is available. CONFIGURATION VARIABLES in DETAIL

-

NOTE: these variables are now spread over two config files but are all covered below!

-

INCLUDED or REQUIRED - FILES
-
The Perl language - allows the inclusion of extra files containing libraries of commonly - accessed sub routines or common lists of script variables etc. - The scripts logcnt.cgi and loglook.cgi together "require" four - such files. One includes a variable used by the date/time routines - and the other contains the "user" variables. In case - I get a few more scripts prepared and available for general use, - I have included the GMT reference variable in a separate file - as used by all my scripts on dtp-aus.com. If I need to change - this common variable, then I only have to change one file, not - many.

-

SSI IMBEDDED SCRIPT - CALLS
-
If you wish to - place a simple "hidden", "text", or "image" count on your page, and your - Host service allows SSI (Server Side Includes) calls, then the - inclusion of one simple SSI call to the script will perform this - task. Place the call in the text of your html page where you - want it to appear ie:

-

"<p>Current - site count is <!--#exec - cgi="/cgi-bin/logcnt.cgi"--> - page views.</p>" and the result could be:
- '
Current - site count is 02365 page views.'

-

$ssi_img Which of the three display methods depends on the $ssi_img config variable.

-

LogCount recognises an - SSI call and responds accordingly. NOTE: Most servers require - the HTML page file extensions of ".shtml" or ".sht" - for SSIs to work. NOT all servers allow SSI to receive external data for very good security reasons, Although some simple SSI programs rely on that, LogCount does not and is designed to work without!

-

Comments about relative - paths and directory choices etc are included below.

-

GMT TIME ZONE reference - NOTE: this value can be set easily from the LogLook admin pages
-
Like myself with - www.dtp-aus.com, Hosting services are being used now that are - "remote" from ones local ISP service. Normally this - means that all of our scripts etc report dates and times different - to that of our local access points, ie our home locality from - where we view our sites. To overcome this I use a Perl facility - that allows us to use (G)reenwich (M)ean (T)ime with an offset - reference reporting in my local time and date. One of the perl - "Include" files, 'gmt.set', contains a variable name - -
-
$gmtPlusMinus
- - whose value MUST be set for your local GMT offset. I live in - a world time zone 15 hours ahead of that of my Host Servers. - Therefore, when I set the variable to 36000 (GMT+10hrs), the - server logs record, and I view, all dates and times relevant - to my locality irrespective of where my Hosting service is. With - this method I can move my Domain and the results would not change.

-

This value can now be changed via the LogLook program. To get an idea of your local GMT zone value, check the "date" set up in your local pc date configuration - ie Windows.

-

The manual calculation is simple. - Your local GMT time, multiplied by 60, and multiplied by 60 again. - ie 10X60X60. Therefore my variable entry is "$gmtPlusMinus = 36000". If your GMT zone is a - negative value, simply include a negative value ie "$gmtPlusMinus = -36000"

-

LEADING ZEROs
-
All displays of - the count value will include the standard "leading zeros" - method of displaying numbers. The configuration file for LogCount - and LogLook is called 'cntcnfg.set'. By adjusting the variable - named "
$iszeros", you can control the length - of the output number. ie
- '
$iszeros = "000000"' will display 029384, and '$iszeros = "0000"' will display 0087 and so forth. - If your site receives a small number of hits per month then it - probably looks better with a smaller number of digits. However, - never be too pessimistic and allow for growth. ie '00000' will - allow the count to proceed up to 99999 without altering your - html code calls to the counter, and 000000 will display up to - 999999.

-

The length or number of - zeros MUST be matched by the number of <img src... calls and - visa versa when using the visible counter options. How you call each digit will be - described below.

-

NOTE: "$ssi_zro" The SSI calls can now be set to include OR not include the leading zeros.

-

US, BRITISH, or INTERNATIONAL DATE - reporting
-
LogCount and LogLook - can save and view logs using the US mm/dd/yyyy format, - or the BRITISH dd/mm/yyyy format, or the International date format yyyy/mm/dd. In the configuration file, - 'cntcnfg.set', you will find a variable named
$dtUS. Leaving this variable value - as null, ie '$dtUS = - ""' will - cause the scripts to use "dd/mm/yyyy". Setting this - variable to '$dtUS = - "1"' will - force 'mm/dd/yyyy'. Setting this - variable to '$dtUS = - "2"' will - force 'yyyy/mm/dd'.

-

@referers array
- CHECKING FOR CORRECT - REFERRERS
- " Bad referrer, access denied!"
-
This option in - the 'cntcnfg.set' file allows you create an "array" - of Domain names and IP numbers that LogCount and LogLook will - respond positively to. By including the acceptable calls to your - pages and/or your IP#, ie 'http://www.yourdomain.com' and http://yourdomain.com' - you effectively stop improper additions to your count and log. - However, LogCount saves incorrect referrers to a separate log - that you can view from time to time to see if there are any patterns - in the list. This is not 100% foolproof, but in most cases you - will also be able to detect copied pages from your site that - are being viewed on "online servers" elsewhere.
- The array is named "
@referers" and you simply (MUST) enter - your preferences in place of the examples. NOTE: The brackets, - quotes and commas enclosing each item must be included else an - error will occur, ie:

-

('www.yourdomain.com','yourdomain.com','000.000.000.000',). - Leave out the IP# if you do not have a true domain name with - a static IP#. "www.ahost.net/mysite/" etc will also - work for second level site calls etc. If your scripts are called - from the cgi-bin of a domain that is housing your site and your - specific scripts are in that domains cgi-bin, you will have to - include the cgi-bin also ie: "ahost.net/cgi-bin/".

-

NOTE: Even your browser command line AND a copy of your page on your home computer will be blocked by referrer checking. ONLY use links / forms ON your site. This is not just to stop others spamming your counter BUT is a first level security measure should a program have security holes. Use a/the webmasters access page - see below in "utilities" section.

-

At this point I will bring - your attention to the semi colons (;) appearing at the end of -
- each line in the config files. These MUST remain else an error - will occur.

-

REJECTING SPECIFIC - ADDRESSES
-
If have the need - to reject certain domains or IP#s from adding to the count, the - variable named
$rjct in the 'cntcnfg.set' file must - include them. Unlike an indexed array, this is a simple variable - that will be searched for items INBETWEEN the important ( | ) - separators. NOTE: There is now a required vertical bar - character ( | ) at the beginning AND end of this string.
- I have left an example string in the variables value, to show - the separators, but you can leave this as a null value. ie
$rjct = "". Remember, if you include a server - address in this variable, then ALL visitors from that server - will not be counted - a large company, ISP or university will - have many computers that could access your site through that - one server address.

-

PATHS TO FILES ACCESSED - BY SCRIPTS
-
The defaults used - in the 'cntcnfg.set' file assume you will place these files in - your cgi-bin and add a directory to it called "counters". - If you have to use other directory names, or your "cgi-bin" - has a different name, then you will have to change the paths - accordingly; "cgi-yourdomain" is not uncommon. There - are three path types that can be used at various times with in - a program or script. A full URL is the same as the path you enter - in your browsers address box when typing in a site path that - you wish to go to: ie 'http://www.wooz.com/harry.htm'. A relative - path is a path description to a source, relative to the directory - of the program, file or web page that is calling it: ie "jimbo.htm" - means that the file being called should be in the same directory. - "inone/jimbo.htm" refers to a file that should be in - a directory named 'inone' which is a directory within the current - directory, and "../jimbo.htm" means that the file should - be in a directory one above the current directory, and "../../jimbo.htm" - is in a directory two above etc.

-

For some servers, a simple - relative path called by a script is unacceptable, so a path relative - to the sites root directory must be called. There are also variations - to this description but "web/yourdomain/yourdirectory/jimbo.htm" - (example only) is a relative root path description that works - on many servers. Another root path is "/home/yourdomain/www/yourdirectory/jimbo.htm". - If you have trouble with accessing the default simple relative - paths included in the 'cntcnfg.set' file, try the root reference - ie "web/yourdomain/cg-bin/counters/hitcount.t" etc. - If this is still a problem, look in any installed scripts on - your server for a reference, or contact your hosting support - staff and send them the 'cntcnfg.set' file.

-

NOTE: Double check ALL permission's - (below) before changing the default paths, unless you know in - advance what the paths should be.

-

CONFIG FILES PATHS - program code AND config files
- The programs need to load the config files. Admin editing also needs a reference to the three config files, cntcnfg.pl and gmtset.pl. Near the top of BOTH program's code just below the header info are paths that must be set before installation.

-

- $gmt_url and $lookcfg_pth are also the variables needed for this purpose in the config files.
-
NOTE: the LogLook config file includes the "$lookcfg_pth" variable and the LogCount config file includes the "$gmt_url".

-

RECORDS DIRECTORY AND FILES
- These variables direct the programs to the record files. They should be self explanatory and not need changing. NOTE the first is the PATH to the records directory (default relative), the others are the names of files residing in that directory.

- $log_path = "counters/";        # - MUST end with a forward slash -
- $count_name = "hitcount.t"; -
- $log_name = "hitlog.t"; -
- $lnks_name = "hitlnk.t"; -
- $badlog_name = "hitbadlog.t"; -

-

- DEFAULT PAGE NAME
- $def_pge = "index"; -
- When the counter or LogLook viewer encounters a referrer not including a page name (ie "http://yourdomain.name/") this value will be appended. Without an extension it will be distinguishable from the other directory default pages.

-

Left empty only the directory name will be logged/displayed - LogCount now saves page names WITH their directory name also!! ie:
-   /
-   wally/
-   wally/page.name
- even a multi level directory will be displayed as above - reducing viewer distortion from long URLs. -

-

-

IMAGE SIZE
- To generate the tags for you for all the counter methods, LogLook needs to know the image width and height of the bitmaps used to display the count or time. -The value of $iwid is the width set to the default images, and the value of
$ihgt is the height also set to the default images. Change these only if you decide to use other images.

-

IMAGE DIRECTORY
- LogCount can now access and read/send images from the default "counters" sub directory of the cgi-bin OR now access images from an HTML Docs directory. One or two servers have been reported to get cranky when opening/sending images so this option has been added.
-    $img_url = "counters/";  - PATH - with forward slash
- OR -
-   #$img_url = "http://yourdomain.name/ssi_img/";  - URL - with forward slash

-

Place a hash character ( # ) at the beginning of the option you do NOT wish to use.
- NOTE: the URL option should be set to the same directory as the SSI Images directory - see next variable description.

-

SSI IMAGE DIRECTORY - value = a URL
- $ssi_url SSI counter displays have to be written as a URL to the images - embedded in the pages HTML code - so this is the url to those SSI images. NOTE: this should be the same as the "URL" option in the previous description UNLESS you want to use two different image sets. -

-

LOGLOOK BAR GRAPHS - do NOT change these variables
- Version 3.8 of LogCount included major enancements to the free LogLook log viewer and admin program. The first page that should be accessed via the password entry in the webmastres page should be a list of all current log pages listed from most popular down. With this list each page name is also accompanied by a simple but affective bar garph for easy visual comparison. These are the file names of the graph images AND they MUST be in the SSI HTML Docs directory.
-   $grf1_url = "$ssi_url"."grf0.gif";
-   $grf0_url = "$ssi_url"."grf1.gif";
- NOTE the URL includes the previous variable!! -

-

SSI COUNTER DISPLAY TYPE
- $ssi_img -Adding more versatility to LogCount, SSI counters can be preset to one of three styles.
- They are:
-   HIDDEN
-   NUMBER
-   IMAGES
- Preset this value at installation time (or change at time afterwards!)
- NOTE: the visible options, "number" and "images" can be enhanced by including leading zeros just like the main standard counter by setting the "$ssi_zro" variable to "1".
-

-

RETURN PAGE URL
-
The value for - the variable named "
$hm_url" in the 'cntcnfg.set' file - needs to be altered to include the FULL URL Path to your home - page or any page that you wish to return to after using the LogLook - script to view your log details.

-

LOGLOOK.CGI URL
-
The value for - the variable named "
$logScrpt" in the 'cntcnfg.set' file - needs to be altered to include the FULL URL Path to the loglook.cgi - script (the viewer). It is suggested that the scripts be placed - in your cgi-bin or equivalent.

-

LOGCNT.CGI URL
-
The value for - the variable named "
$countScrpt" in the 'cntcnfg.set' file - needs to be altered to include the FULL URL Path to the logcnt.cgi - script (the counter). It is suggested that the scripts be placed - in your cgi-bin or equivalent.

-

WEBMASTERS E-MAIL ADDRESS
-
The LogLook script - includes various errors that can be reported back to you via - an html page. Although it is expected that only you will use - the counting facilities, I have included the webmasters address - in some of these hyperlink error reports. Probably of little use in the current - versions, but change this address to yours or your webmasters - if you are not he/she. ie
- '
$webmstr = "webmaster\@yourdomain.name?subject=Link - Error"'.

-

NOTE: The backslash ( \ ) is - very important for Perl 5 users. All string references that include - the (@) character must insert a backslash before that character.

-

DISPLAY LAST 7 DAYS
-
The value for - the variable named "
$shwDays7" in the 'lookcnfg.set' file - enables the last 7 days display option - from the LogLook viewer. If you do not have a high daily - hit count and yet keep a large log file, then you can try using - the 7 day list view option by setting the value for this variable - to ("1"). On the other hand, you just may be cooking - AND eating dinner while your server attempts to send back the - possibly gynormous (big) html file. Therefore, '$shwDays7 = ""' diables the option, and '$shwDays7 = "1"' enables the display of the last 7.

-

Note With the supplied and - useful LogLook viewer, you can change this value via an admin page.

-

Note v3.5 Also with the supplied LogLook viewer, you can now delete - entries as the log file gets too large. Around midnight Saturdays - is a good time to prune or delete files.

-

 

-

SHOW DOMAIN NAMES
-
LogCount records - the domain names as well as the IP#s (referers) for each access. - However, not all hosting servers enable this option, resulting - in the IP# and the domain name being just an identical IP number. - The value for the variable named "
$showDoms" in the 'cntcnfg.set' file - can disable the duplication of IP#s in the daily log list displayed - by LogLook. '$showDoms - = ""' disables - their inclusion, and '$showDoms - = "1"' will - display them.

-

PASSWORDS
-
You MUST include - a basic password-only access to the LogLook script by entering
your unique password to - the value of the variable named "$theword". The default is "log". Change it to suit.

-

$pwrd_name the name of the Admin Password file written to by LogLook admin.
- The use of LogLook can - be protected from others by a basic password method that requires - that the password be included in the call to the script. Also, - once you have accessed the main page the password is imbeded - in the html so that you can jump between the two main pages by - hyperlinks. If you are generally the only user of the computer - you access the log with, then this is a simple answer. However, - you must remember that Browser Cache can keep copies of your - pages, and even worse is the History folder that records all - page access calls. So editing of options via LogLook is protected via a further "admin" editing password you must create when the LogLook program is first run.

-

Although I have included - the "no-cache" meta tag in the pages generated by LogLook, - and a "WebMasters" access page that you can add other - utilities to also, the only sure-fire way of protecting access - to any web page (unless your host server is hacked) is to place - the webmasters access page in a server controlled password protected - directory; most decent host services will supply one for you - for free, often named "secure" (except perhaps the - 'Free Web Page' services).

-

- - - - -

MENU

-
- -

-

INSTALLING

-

THE PATH TO PERL
-
At the top of - each script (and must remain as the first line) is a default - path to the Perl program on your host server. This can vary slightly - between UNIX servers. If you have problems running the scripts, - check with your host support staff about the correct path described - in this line. The default entry is "
#!/usr/bin/perl" and another common variation - is "#!/usr/local/bin/perl". In Perl scripts the hash - sign "#" character comments out - the code on a line starting with this character. Here it has - a special meaning to Perl.

-

Even if you have installed other CGI programs you are not necessarily an experienced cgi installer. Because a path worked on another program does not mean it is v5+ (5.003+ preferred)!
- The scripts help page (URL above) contains helpful advice; if you are humble enough to learn!

-

LOG AND COUNT FILES - Plus PERMISSIONS
-
LogCount will - attempt to create and set permissions on the files it needs for - the count, counter log, and bad referrers log. Should your server - refuse to give
scripts the right to create - new files, then you will have to create them your self via FTP - or Telnet. The Link List file needs to be created by you because - you have to enter the links and their names (see below). Each - of these files must be given read and write permissions (chmod - 766). The directory that they are placed in will also have to - have read and write permissions. Either read and write chmod - 766 (r+w) or possibly chmod 777 (r+w+x) will work - try the first - before the latter. Note the makedir comment below if using makedir.cgi to setup quickly.

-

UP LOADING FILES (Posting)
-
CGI-BIN permissions - are set by the server and no attempt should be made to change - them. Should you have to use another directory, AND your server - allows the execution of Perl CGI scripts in other directories, - then that directory should be set with read and execute permissions - - chmod 755 (r+x). Also, The scripts and 'require files should - be set to chmod 755 (r+x).

-

By far the biggest problems - faced when installing scripts are firstly the file transport - encoding used and secondly the permissions settings set for both - files and new directories. Bitmap images must be sent to the - server using the "Binary" protocol. Text files, ie - html pages, CGI SCRIPTS and require files, MUST be sent in "ASCII" - format. Failure to do this will result in a server failing to - recognise and execute the scripts. Although often referred to - as programs, scripts must be compiled before they do anything. - As an example, files with the .EXE extension on programs that - are installed on Wintel machines are pre-compiled binary executable - programs. Perl scripts on the other hand are compiled in memory - by Perl before they can be executed. The script (text) must be - in ASCII text format for the interpreter to be able to read it. -

-

REPEAT: Up load scripts as "ASCII" files, images - as "Binary".

-

So, assuming the default - directory structure is used, you will up load into:

-
-
-
Directory: - -
cgi-bin (server) -
logcnt.cgi, loglook.cgi - (chmod 755) -
cgi-bin/sets (chmod 766 - or 777) -
cntcnfg.pl, lookcnfg.pl, gmtset.pl - (chmod 766 or 777) -
cgi-bin/counters (chmod - 766 or 777) -
hitlnk.t, hitbadlog.t, a_dolink.pl, a_errlog.pl, look.pwd (chmod 766 - or 777), -
- hitcount.t, hitlog.t, trans.gif, images(0 to 9 + a,p,-).gif
- (chmod 766 - or 777) -
html page directory ( named "ssi_img" ) -
images(0 to 9 + a,p,-).gif, grf0.gif, grf1.gif, - [ trans.gif ? ] -
html page directory - - preferably secure -
webmster.html (server) -
If - you have to create them yourself: - -
cgi-bin/counters -
counters/hitcount.t (chmod - 766 - or 777) -
counters/hitlog.t (chmod - 766 - or 777)
- counters/hitlnk.t (chmod - 766 - or 777)
- counters/look.pwd (chmod - 766 - or 777)
- - -
counters/hitbadlog.t - (chmod 766 - or 777) - -
-
-

MENU

-
-

TAGS CALLING THE COUNTERS

-

NOTE: the complete set of counter call tags are generated by LogLook Admin.

-

INSTALLING COUNTER - CALLS IN HTML
-
If you can follow - the above example of a call to LogCount for a link count, then - the general counting and display calls are even easier. Remember - the "l" (lowercase "L") refers to - a
link count.

-

To call a HIDDEN COUNTER - - the most common use for LogCount - you include the letter "t" - instead of the "l", ie:

-

<img src="http://yourdomain.name/cgi-bin/logcnt.cgi?t" - width="1" height="1">

-

…and there is no - "=**" value needed. The "t" stands - for transparent, and there is a tiny transparent - GIF file supplied in the default 'counters' directory. When the - page is accessed, the server sends the 1X1 pixel image to the - browser and records a hit. It is best to place the counter call - near the top of the page to ensure the hit is recorded before - the visitor goes to another page.

-

The next VISIBLE COUNTER - option requires as many "img src.." tags as there are - images to display (numbers). If you want the counter to show - five numbers including zero padding (if any), then you simply - repeat the tag five times and change the query character in each - accordingly ie:

-

<img src="http://yourdomain.name/cgi-bin/logcnt.cgi?0" - width="13" height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?1" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?2" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?3" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?4" width="13" - height="17">

-

The query tag is a number, - 0 to (1 less than the total images), where the total number - of images equals the length of 'zeros' configured in the 'cntcnfg.set' - file. If you have less image calls than the zero padding, then - you will only see the left-most numbers of the count. If you - have more the script will return an error because it will look - for a digit that does not exist.

-

To VIEW THE COUNT WITHOUT - RECORDING A HIT
- Repeat the img tags as above, BUT change the query letter on - the first imag tag to "v" (view) ie:

-

<img src="http://yourdomain.name/cgi-bin/logcnt.cgi?v" - width="13" height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?1" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?2" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?3" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?4" width="13" - height="17">

-

Only the query characters - "t" and "0"(zero) will record - a hit. Numbers 1 to 7 will simply return the appropriate - count character image (a number). LogCount will only! handle - numbers up to 8 characters in length. For most of us this would - be wishful thinking indeed as that would represent 99999999!!

-

If you do not understand - why I have written the tags with the second and subsequent tags - broken after the "<img " name, this is the method - used to stop the browser placing one space between objects. You - could just write all img src tags out in one long line instead - but the above method produces very readable code.

-

DISPLAYING THE CLOCK
- From version 3 onwards the script can be used to show a static - digital clock or time display. The time display can also be used - as the counter adding to the log etc.

-

Counting With The Clock
- Similar to the normal counter display, the clock is called with - "img src" calls, but the number of calls is fixed at - 6, and uses two characters as reference. ie:

-

TIME DISPLAY (number of tags = 6)
- <img src="http://yourdomain.name/cgi-bin/logcnt.cgi?c0" - width="13" height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?c1" - width="13" height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?c2" - width="13" height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?c3" - width="13" height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?c4" - width="13" height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?c5" - width="13" height="17">

-

Clock Display Without - Counting
- To display the clock without adding to the counter or log, use - the above code BUT simply change the lowercase "c" - to "n".

-

USING OTHER IMAGE SETS
-
Correct html coding - should always include the width and height attributes in img - src... tags. To use other counter image sets, just change the - width and height attribute values accordingly. Also make sure - the names are (or changed to) 0.gif, 1.gif, 2.gif, 3.gif, 4.gif, - 5.gif, 6.gif, 7.gif, 8.gif, 9.gif. DO NOT use .JPGs. NOTE: See - the ABOUT section at the top of this page regarding the need - for "-.gif, a.gif and p.gif" if - you want to use the digital clock with images other than - those supplied .

-

The .zip file includes - two extra directories that contain the original default counter - digit .gif files. Simply copy either of these image sets - in to the "counters" directory or equivalent. The default - "counters" directory already includes the white digits - on black background images.

-

Two sample logcnt.cgi counter - calls are:

-

SSI TEXT - COUNTER DISPLAY
-
<!--#exec cgi="/cgi-bin/logcnt.cgi"--> - or similar for your server

-

HIDDEN - COUNTER
-
<img src="http://yourdomain.name/cgi-bin/logcnt.cgi?t" - width="1" height="1">

-

VISIBLE - COUNTER (number of - tags = number of zero padding digits)
- <img src="http://yourdomain.name/cgi-bin/logcnt.cgi?0" - width="13" height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?1" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?2" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?3" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?4" width="13" - height="17">

-

NO-HIT - VISIBLE COUNTER (number - of tags = number of zero padding digits)
- <img src="http://yourdomain.name/cgi-bin/logcnt.cgi?v" - width="13" height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?1" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?2" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?3" width="13" - height="17"><img
- src="http://yourdomain.name/cgi-bin/logcnt.cgi?4" width="13" - height="17">

-

LINK TRACKING
-
<a href="http://yourdomain.name/cgi-bin/logcnt.cgi?l=name">hyperlink</a>

-

LINK DATA - FORMAT (hitlnk.t)
- Name|Link|Count (ie "
widget|http://www.widgetstuff.com/|0") - also see the supplied - sample file.

-

A Link to the LogLook.cgi log viewer script
-
<a href="http://yourdomain.name/cgi-bin/loglook.cgi?m=password">
View Log Data</a> - NOTE: For security, the script can - only be called from a hyperlink on a page loaded from your server. - Calling it from a remote server or a browsers command line will - not work; this is controlled by the security @referers array.

-

SSI COUNT VIEWS - non counting
- Supplied with LogCount and LogLook was a simple SSI program that could be copied and renamed with the name given to a counted hyperlink (ie "widgets.cgi"). As of version 3.5b that one script was replaced by two scripts. "linkname.cgi" works the same as the previous 'somename' in that it displays only the link total for the counted hyperlink it is named after, and now "linkcount.cgi" will display the actual hyperlink tag followed by the count total for the counted hyperlink it is named after. -

Because they are SSI programs the SSI call has to be placed in the texts of an SSI html page, ie pagename.shtml, pagename.sht. You have to know if your host service allows SSI HTML pages before using these programs.

-

So by placing this code calling the linkname.cgi script now copied and renamed barts.cgi (the name barts is the name of a hyperlink created in the LogLook admin pages):
-    File downloaded <!--#exec cgi="/cgi-bin/barts.cgi"--> times.
-
- in your page when it was loaded you would see
-    File downloaded 2033 times.
-
- OR
- by placing this code calling the linkcount.cgi script now copied and renamed Bonzo-Zip.cgi (the name Bonzo-Zip is the name of a hyperlink created in the LogLook admin pages):
-    Down Load <!--#exec cgi="/cgi-bin/Bonzo-Zip.cgi"-->.
-
- in your html code you would see
-    Down Load Bonzo-Zip
(284).

-

You can of course also use the standard hyperlink counting method:
-    <a href="http://yourdomain.name/cgi-bin/logcnt.cgi?l=linkname">Text</a> -
- followed by the "linkname.cgi" renaming method:
-    <!--#exec cgi="/cgi-bin/barts.cgi"--> -
- to add the count where and how you want. This way you can place it all in the pages texts if the above "linkcount.cgi" method is difficult to include in a manner that makes sense.

-

So I have included the two utility scripts giving you three SSI counted link options PLUS the standard counted link method generated in the LogLook admin page. Either way for displaying the count next to a counted ink, or just the including the count total in the pages text will work as long as the page is an SSI named and enabled page. Notes for renaming these two cgi scripts are also in the script header.

-

MENU

-
-

COUNTING LINKS

-

LINK USAGE RECORDS - and HYPERLINK CALLS
-
LogCount can be - used to log the number of times visitors use specific hyperlinks - on your web pages. Both links from one page to another local - page, or links to other sites can be included. The call is a - simple change to the "A HREF tag that you wish to track, - ie:

-

<a href="http://yourdomain.name/cgi-bin/logcnt.cgi?l=3">hyperlink</a>
-    or
-
<a href="http://yourdomain.name/cgi-bin/logcnt.cgi?l=jimbo"><img - src....></a>.

-

The question mark denotes - the start of the query string that follows it. The "l" - is a lowercase "L", NOT a numeric 1. The "l" - tells LogCount to handle the query as a hyper(l)ink. After the - "=" sign is a number in the first example and a word - in the second example. I have shown this so you can see that - this is indeed a name, and numbers could be used while words - could be more descriptive. The name refers to an identical name - entered in the Link List file, 'hitlnk.t', that you must configure - if using this option.

-

Also in the examples are - two hyperlinked objects, a simple text link in the first example - and an image link in the second. If you want your link to open - another browser window then include the standard 'target="_blank"' - attribute ie:

-

<a href="http://yourdomain.name/cgi-bin/logcnt.cgi?l=widget" - target="_blank">

-

Note v3.5 The counted hyperlinks can now be set up via the LogLook admin page, plus the tag for each named link can also be readily generated.

-

I have included an example - 'hitlnk.t' file for you to configure and up load to the "counters" - directory (default). In this file you will identify four example - links, and they include the special "|" vertical - line character. The item pattern is as follows: Name|Link|Count, - ie
- "
widget|http://www.widgetstuff.com/|0".
- The third item, the count value must be set initially to zero - "0". You can configure as many hyperlink click records - as you wish, but do not apply them to all of your links just - because you can. This is an excellant way of analysing how many - visitors leave your site to other sites you link to.

-

The second page of LogLook - will display the count progress of your links. Each listed link - shown by LogLook includes an embedded hyperlink to logcnt.cgi - allowing you to occasionally check that the call is working and - not a broken link.

-

MENU

-
-

LOGLOOK - free LOG VIEWER

-

There is no need to describe in detail the options/views in LogLook as they are self evident once viewed. REMEMBER you MUST access the program ONLY via a password form ON your site - ie the supplied webmasters page.

-

Besides the various viewing options, LogLook generates all the necessary tag code for your counters for simple "copy and paste" in to relevant HTML pages (or perhaps a temporary open text file where they can be stored).

-

LogLook also manages all the creation, editing, and deleting of counted "named" hyperlinks. The html tag code for these links can also be generated once activated.

-

New views added to v3.8 are:
-   most popular pages
-   visitor browser type comparisons
-   view any date retained in the current log
-   view IP# page totals for any date in the current log

-

As your log gets over around 1.4Meg in size (approx. by experinece - some servers will vary) the hit tracking pages may be very slow to load and eventually crash due to server applied "life" time restrictions. Use the admin page to regularly "prune" dates from the log; once viewed, trends noted, days compared, there is realy little need to keep old dates in the log. In the future (partially complete) there will be a history option for those that want to keep a few details but just can't be bothered writing them down!!

-

MENU

-
-

UTILITIES

-

THE WEBMASTERS PAGE - NOTE: you need this or similar to access LogLook!
-
The supplied webmasters - page includes a form for accessing the LogLook log viewer script. - You must enter - the correct password in the form on this page to view your - logs. This page - also includes a current Non-Counting Count display, so the form - "action" path and the img src paths need to be altered - as instructed.

-

UTILITY testbin.cgi
- I have created a simple utility script that can be placed in your cgi-bin and run from your browsers command line. This script will, in almost all cases, detect the Perl version you are using and report its findings. If it reports version 4 as a default, then you must ask your Host Service for the correct path to Perl 5 (Always top and FIRST line in all scripts). LogCount and LogLook are Perl 5 programs for Unix servers.

-

Testbin.cgi will attempt to get all perl paths from the server and list them at the bottom of its page. Not all servers will make this information available.

-

Testbin.cgi can also be used to test your path to "Sendmail". The program will attempt to get this information from the server but not all will make it available. To test the Sendmail path you MUST change the variable value near the top of the code which is the URL to the testbin program!

-

So!
- Place "testbin.cgi" in your cgi-bin directory and chmod 755 (7=r+w+x, 5=r+x).
- Then run from a browser command line, ie http://www.yourdomain.path/cgi-bin/testbin.cgi

-

UTILITY makedir.cgi -
- I have created a simple utility script that can be placed in your cgi-bin and run from your browsers command line. If your server allows directory creation via cgi scripts, then this utility will attempt to create the default (recommended) directories and file names for you, and set the permissions. It is unprotected and there is no guarantee that it will work; try it at your own risk (disclaimer only). It has worked well on many sites. - -

-

Try installing and running this script first. It will report success or failure when creating the files/directories and prove the correctness of your Perl Path", plus indicate that the default relative paths will work OK. If the default urls/paths are not used, then you will have to change them first.

-

- -To use it, make sure the "Perl Path" at the top of the script is correct. NOTE: the default Dir/File permissions are set to 766. Change these values to 777 if your site so requires BEFORE running the script. If running the script is successful, you only have to FTP your supplied files over the new empty ones. (note: for security reasons, makedir does NOT prepare an empty file for the cgi scripts, you must upload them (as ascii) and set chmod 755 your self).

-

777 for sub directories and 766 for files is probably the most common in a well set-up true cgi-bin directory. - -

-

Once run, delete the file immediately because it has no input protection and could be run again by some low-life wanting to cause mischief - -

-

So!
- Place "makedir.cgi" in your cgi-bin directory and chmod 755 (7=r+w+x, 5=r+x). -Then run from a browser command line, ie: -http://www.yourdomain.path/cgi-bin/makedir.cgi -

-

Enjoy - & please let me know how - you get on with this script, how/what server type it installed - to.
-       Ron

-

MENU -


-
-
- - diff --git a/dev/cvslargo/www/cgi-bin/czo/lc/webmster.html b/dev/cvslargo/www/cgi-bin/czo/lc/webmster.html deleted file mode 100755 index cefc59cf..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lc/webmster.html +++ /dev/null @@ -1,69 +0,0 @@ - - - -Webmasters page - - - - -

Webmasters Utility Access page

- - - - -

site count • - -local time. -

- - -
- - -
-
- - - -
- View LogCount records
Counter Log Password: -   -
- leave box empty if password not required
-
-
- - -  -
- - - - - - - - - - - -
Add other utility links here.Add other utility links here.
Add other utility links here.Add other utility links here.
- -  - -
- - - diff --git a/dev/cvslargo/www/cgi-bin/czo/linux.gif.cgi b/dev/cvslargo/www/cgi-bin/czo/linux.gif.cgi deleted file mode 100755 index e69de29b..00000000 diff --git a/dev/cvslargo/www/cgi-bin/czo/lock.cgi b/dev/cvslargo/www/cgi-bin/czo/lock.cgi deleted file mode 100755 index 01f16fb1..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/lock.cgi +++ /dev/null @@ -1,36 +0,0 @@ -#!/usr/bin/perl -w - -use Fcntl ':flock'; # import LOCK_* constants - -$res=flock("/tmp/my.lock", LOCK_EX); -print $res . "\n"; -# system ("ls -alrt /tmp"); -sleep 10; - -exit 0 -__END__ - - - - -sub lock { - flock(MBOX,LOCK_EX); - # and, in case someone appended - # while we were waiting... - seek(MBOX, 0, 2); -} - - - sub unlock { - flock(MBOX,LOCK_UN); -} - -open(MBOX, ">>/usr/spool/mail/$ENV{'USER'}") - or die "Can't open mailbox: $!"; - -lock(); -print MBOX $msg,"\n\n"; -unlock(); - - - diff --git a/dev/cvslargo/www/cgi-bin/czo/maintenedby.cgi b/dev/cvslargo/www/cgi-bin/czo/maintenedby.cgi deleted file mode 100755 index ef57bb65..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/maintenedby.cgi +++ /dev/null @@ -1,24 +0,0 @@ -#!/usr/local/bin/bash - -# disable filename globbing -set -f - -echo Content-type: text/plain -echo - -# echo "argc is '"$#"' argv is '"$*"'" - -if [ X"$USER_NAME"Y = XY ] -then - USER_NAME=czo -fi - -if [ X"$USER_NAME"Y = XistesY ] -then - USER_NAME=czo -fi - -FINGER=` finger -m $USER_NAME | head -1 | cut -d ":" -f3 | sed 's/-/ /g' ` - -echo ''$FINGER'' - diff --git a/dev/cvslargo/www/cgi-bin/czo/mpc.dat b/dev/cvslargo/www/cgi-bin/czo/mpc.dat deleted file mode 100644 index 4be35051..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/mpc.dat +++ /dev/null @@ -1,16 +0,0 @@ -# SWISH format 1.3 -# Swish-e format 1.3 -# -# Name: Asim Lab. index -# Saved as: mpc.dat -# Counts: -# Indexed on: 06/06/00 06:31:27 MEST -# Description: Index by Czo -# Pointer: http://www-asim.lip6.fr/ -# Maintained by: Czo [Olivier SIROL] -# DocumentProperties: Enabled -# Stemming Applied: 0 -000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000002475000000000000247300000000000024740000000000002474 - - -first author diff --git a/dev/cvslargo/www/cgi-bin/czo/multimedia.dat b/dev/cvslargo/www/cgi-bin/czo/multimedia.dat deleted file mode 100644 index 8117f764..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/multimedia.dat and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/my.cgi b/dev/cvslargo/www/cgi-bin/czo/my.cgi deleted file mode 100755 index 3b388522..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/my.cgi +++ /dev/null @@ -1,199 +0,0 @@ -#!/usr/local/bin/perl -w - -#============================================================================ -# Copyright 1999 Mikodocs Guide to HTML, http://www.mikodocs.com/ -# You may distribute this program freely, but keep -# this notice in place. -#============================================================================ - - -#============================================================================ -# modules -# -use strict; -use CGI; -use CGI::Carp 'fatalsToBrowser', 'croak'; -$CGI::POST_MAX = 10240; # set maximum size of post -# -# modules -#============================================================================ - - -#============================================================================ -# variables -# -my ( - $query, # CGI query object - $maxFields, # maximum number of fields to accept - $rand, # random number for banners - $paramKey, # a single parameter name - $inputdata, # filehandle for uploaded files - @inputVals, # values for a field (they can send more than one) - $inputVal, # a single values for a field - $modval, # modified value of - $fileinfo, # uploaded file information - @params, # array of all fields sent - $key,$val, # key an value for $fileinfo hash - ); -$query=CGI->new; # get CGI object -$maxFields=30; # maximum number of fields to accept -$rand = int(rand(100000)); # random number for ad banner -# -# variables -#============================================================================ - - -#============================================================================ -# top of page -# -print $query->header; -print <<"(TOPOFPAGE)"; - - -Mikodocs Guide to HTML: My CGI - - - -

Env

- -(TOPOFPAGE) -# -# top of page -#============================================================================ - - -#============================================================================ -# list -# - -# get list of fields -@params = $query->param; -if (@params > $maxFields) - {croak "No more than $maxFields fields please"} - -# open table if necessary -print "

\n" if @params; - -foreach $paramKey (@params) - { - print ""; - - #---------------------------------------------------------------- - # value - # - $inputdata=$query->param($paramKey); - $fileinfo=$query->uploadInfo($inputdata); - - # if it's an uploaded file - if (defined($fileinfo)) - { - print ""; # name of field - print "\n"; - } - # - # value - #---------------------------------------------------------------- - - print "\n"; - } - -# close table if necessary -print "
", tablesc($paramKey), "\n"; - while (($key,$val) = each %{$fileinfo}) - { - # content-disposition gives several pieces of - # information about the file, so let's parse it up - if (lc($key) eq "content-disposition") - { - my ($dis,@dispieces); - foreach $dis (split(m|\s*;\s*|,$val)) - { - @dispieces=split("\s*=\s*",$dis,2); - next unless defined $dispieces[1]; - next if $dispieces[0] =~ m|^name$|i; - print - "\n"; - } - } - - # else just print the field - else - { - print - "\n"; - } - } - - # output the file size - seek($inputdata,0,2); # go to end of file handle - print "\n"; - print "
", - tablesc($dispieces[0]), - "", - tablesc($dispieces[1]), - "
", - tablesc($key), - "", - tablesc($val), - "
size", - tell($inputdata), - "
"; # - } - - # else it's not an uploaded file - else - { - # get array of input values - @inputVals=$query->param($paramKey); - @inputVals=grep(tablesc($_),@inputVals); - - # name of field - print "
", - tablesc($paramKey), "
";
-
-        #out put value(s) for field
-        foreach $inputVal (@inputVals)
-            {$inputVal = tablesc($inputVal)}
-        print join("
",@inputVals), 
-            "

\n" if @params; - -# -# list -#============================================================================ - - -#============================================================================ -# bottom of document -# - -# ************************************************************************ -# *** IF YOU COPY My CGI, ABSOLUTELY PLEASE DO NOT CHANGE THIS SECTION *** -# ************************************************************************ - -print <<"(END BOTTOM OF PAGE)"; -


- - -(END BOTTOM OF PAGE) -# -# bottom of document -#============================================================================ - - -#============================================================================ -# tablesc -# return   undefined or for space-only/empty string, -# otherwise change < > and & to character entities -# -sub tablesc -{ -return " " if (! defined $_[0]) || ($_[0] !~ m|\S|); -$_[0] =~ s|&|&|gso; -$_[0] =~ s|<|<|gso; -$_[0] =~ s|>|>|gso; -$_[0]; -} -# -# tablesc -#============================================================================ diff --git a/dev/cvslargo/www/cgi-bin/czo/printenv.cgi b/dev/cvslargo/www/cgi-bin/czo/printenv.cgi deleted file mode 100755 index 37a09b6e..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/printenv.cgi +++ /dev/null @@ -1,9 +0,0 @@ -#!/usr/local/bin/perl -$TMP=">/tmp/toto.123" ; -open sotie, $TMP ; -print "Content-type: text/html\n\n"; -print "PrintEnv:\n\n

\n";
-while (($key, $val) = each %ENV) {
-	print "$key = $val
\n"; -} -print "
\n"; diff --git a/dev/cvslargo/www/cgi-bin/czo/private/.htaccess b/dev/cvslargo/www/cgi-bin/czo/private/.htaccess deleted file mode 100644 index dc068e5a..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/private/.htaccess +++ /dev/null @@ -1,4 +0,0 @@ -AuthName "Confidentiel ASIM (intranet)" -AuthType Basic -AuthUserFile /users/largo2/webmastr/ASIM-AuthUserFile -require user asim diff --git a/dev/cvslargo/www/cgi-bin/czo/private/search-intranet.cgi b/dev/cvslargo/www/cgi-bin/czo/private/search-intranet.cgi deleted file mode 100755 index 290f99f7..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/private/search-intranet.cgi +++ /dev/null @@ -1,82 +0,0 @@ -#!/asim/gnu/bin/perl -# (C) Copyright 1997,98 Czo -# Parts (C) A.Fenyo -use CGI; - -$ASIM_HEADER=`/bin/cat /users/soft5/webmastr/wwwroot/ssi/asim.header/index.gb.html`; -$ASIM_FOOTER=`/bin/cat /users/soft5/webmastr/wwwroot/ssi/asim.footer/index.gb.html`; -$SEARCH_HEADER=`/bin/cat /users/soft5/webmastr/wwwroot/ssi/search.header-intranet/index.gb.html`; -$SEARCH_MIDDLE=`/bin/cat /users/soft5/webmastr/wwwroot/ssi/search.middle-intranet/index.gb.html`; -$SEARCH_FOOTER=`/bin/cat /users/soft5/webmastr/wwwroot/ssi/search.footer/index.gb.html`; - -print "Content-type: text/html\n\n"; - -$query = new CGI; - -$str = $query->param('searchstring'); - -# Czo 990607 : autorise . et _ - -$str =~ s/[^a-zA-Z0-9-_ \*\.]//g; -$str =~ s/ -/ /g; -$str =~ s/^-/ /; - -print "$ASIM_HEADER\n$SEARCH_HEADER\n"; -print ' '; -print "$SEARCH_MIDDLE\n"; - - - - -#system (date); -#print system ( "/usr/local/home/czo/local/FreeBSD/bin/swish-e -f /usr/local/home/czo/public_html/cgi-bin/index.swish-e -w $str" ); -#$RET = `/usr/local/home/czo/local/FreeBSD/bin/swish-e -c /usr/local/home/czo/public_html/cgi-bin/index.swish-e -w $str`; -#print "
";
-open RESULT, "/asim/gnu/bin/swish-e -m 40 -f /users/soft5/webmastr/wwwroot/cgi-bin/intranet.dat -w $str |";
-
-
-$cpt = 0;
-while () {
-#    chop;
-#print ;
-
-    m/err: no results/ && do
-    {
-      print 'No match found. ';
-      print '';
-     };
-
-    m/^# Number of hits: (.*)/ && do 
-    {
-      print ''.$1.' matches were found. ';
-      print '';
-     };
-
-    m/^#/ && next;
-
-    
-    m/^(.*) (.*) "(.*)" (.*)/ && (($res1, $res2, $res3, $res4) = ($1, $2, $3, $4)) && do
-      {
-         $cpt++;
-         $tmp1 = $res1/10; $tmp1 =~ s/^(.*)\..*/\1/;
-         $tmp = $res4/1024; $tmp =~ s/^(.*\..).*/\1/;
-
-print '

'.$cpt.'. ['.$tmp1.'%] '.$res3.'
-[URL: '.$res2.']
-Page size '.$tmp.' Kb

' ; -#Last modified 7-Oct-97 - - -# $RR =`/asim/gnu/bin/lynxx -dump $res2 | /asim/gnu/bin/grep -1 $str | /asim/gnu/bin/sed -e 's/\\($str\\)/\\\\1\\<\\/B\\>/g'`; -# print "

Containing : \n$RR\n
\n" ; - }; -# print ''.$cpt.'- http://mpc.lip6.fr'.$file.'
'; -# -} -# -close(RESULT); - - -print "$SEARCH_FOOTER\n$ASIM_FOOTER\n"; -exit 0 -__END__ - diff --git a/dev/cvslargo/www/cgi-bin/czo/private/search.log b/dev/cvslargo/www/cgi-bin/czo/private/search.log deleted file mode 100644 index 97b26cfa..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/private/search.log +++ /dev/null @@ -1,358 +0,0 @@ -1999/10/29 10:28:51 132.227.103.10 "Whole Asim Site" "czo" 774 -1999/10/29 10:29:26 132.227.103.10 "Whole Asim Site" "jacomme" 102 -1999/10/29 10:29:38 132.227.103.10 "Whole Asim Site" "ludo or jacomme " 113 -1999/10/29 10:29:47 132.227.103.10 "Whole Asim Site" "sirol" 221 -1999/10/29 10:30:02 132.227.103.10 "Whole Asim Site" "olivier" 271 -1999/10/29 11:45:22 193.25.30.87 "Whole Asim Site" "DLX" 41 -1999/10/29 12:30:20 193.25.30.87 "Whole Asim Site" "dlxm" 21 -1999/10/29 15:41:29 193.149.100.107 "Whole Asim Site" "asimut" 127 -1999/10/31 03:39:14 129.127.236.253 "Alliance" "DP_RGF2CC" 0 -1999/10/31 03:39:32 129.127.236.253 "Whole Asim Site" "dp_rgf*" 2 -1999/10/31 03:40:32 129.127.236.253 "Whole Asim Site" "DP_RGF2CC" 0 -1999/10/31 03:40:47 129.127.236.253 "Whole Asim Site" "dp_rfg2cc" 2 -1999/10/31 04:59:10 129.127.236.253 "Whole Asim Site" "DP_IMPORT" 4 -1999/10/31 09:55:48 195.116.87.46 "Alliance" "" -1999/10/31 09:56:26 195.116.87.46 "Alliance" "vlsi" 116 -1999/11/01 02:55:05 129.127.236.253 "Whole Asim Site" "ms_y" 6 -1999/11/01 07:42:04 131.228.4.225 "Whole Asim Site" "alliance download" 62 -1999/11/01 09:53:23 194.243.148.18 "Whole Asim Site" "pezuol" 2 -1999/11/01 22:47:35 15.255.216.3 "Whole Asim Site" "place and route" 33 -1999/11/02 00:22:08 129.127.236.253 "Alliance" "padlib" 37 -1999/11/02 00:22:48 129.127.236.253 "Whole Asim Site" "pali_sp" 0 -1999/11/02 00:23:07 129.127.236.253 "Whole Asim Site" "pad*" 99 -1999/11/02 00:23:16 129.127.236.253 "Whole Asim Site" "sclib" 89 -1999/11/02 00:24:03 129.127.236.253 "Whole Asim Site" "no2_y" 4 -1999/11/02 05:33:26 129.127.236.253 "Whole Asim Site" "Error code 20" 15 -1999/11/02 05:34:20 129.127.236.253 "Whole Asim Site" "Error code 20" 15 -1999/11/02 06:02:46 129.127.236.253 "Whole Asim Site" "Distance between connector " 1 -1999/11/02 06:43:15 129.127.236.253 "Whole Asim Site" "padlib" 37 -1999/11/02 12:50:02 193.140.221.62 "Whole Asim Site" "package" 86 -1999/11/02 14:54:28 195.221.228.2 "Whole Asim Site" "RISC" 14 -1999/11/02 15:03:21 195.221.228.2 "Whole Asim Site" "FRISC" 1 -1999/11/02 15:46:33 141.35.14.26 "Alliance" "fpga" 39 -1999/11/02 16:07:32 141.35.14.26 "Whole Asim Site" "alligator" 8 -1999/11/02 19:38:30 195.152.254.179 "Multimedia" "viewlogic" 0 -1999/11/02 19:38:41 195.152.254.181 "Whole Asim Site" "viewlogic" 0 -1999/11/03 10:28:31 unknown "Whole Asim Site" "greiner" 57 -1999/11/03 16:31:30 193.25.29.70 "Whole Asim Site" "32 bit" 24 -1999/11/03 23:30:52 213.36.8.251 "Whole Asim Site" "rasic" 0 -1999/11/03 23:31:15 213.36.8.251 "Personal pages" "rasic" 0 -1999/11/04 01:55:43 195.238.129.98 "Whole Asim Site" "graal runtime" 0 -1999/11/04 01:55:53 195.238.129.98 "Alliance" "graal runtime" 0 -1999/11/04 01:56:06 195.238.129.98 "Alliance Mailling Lists" "graal runtime" 0 -1999/11/04 05:41:27 129.127.236.253 "Whole Asim Site" "Distance between connector vdd and connector vdd of the core isnt big enough." 0 -1999/11/04 05:41:47 129.127.236.253 "Whole Asim Site" "ring" 44 -1999/11/04 12:59:22 146.64.248.113 "Whole Asim Site" "schematic" 15 -1999/11/04 16:29:46 193.25.29.70 "Whole Asim Site" "FPGA" 55 -1999/11/05 04:04:35 202.230.194.2 "Whole Asim Site" "process" 102 -1999/11/05 04:08:33 202.230.194.2 "Whole Asim Site" "process statement" 8 -1999/11/05 08:29:57 129.127.236.11 "Alliance" "chip.c" 5 -1999/11/05 14:26:41 unknown, unknown "Whole Asim Site" "BIST RAM" 0 -1999/11/05 16:02:32 195.101.38.197 "Whole Asim Site" "beowulf" 0 -1999/11/05 16:02:46 195.101.38.197 "Publications" "beowulf" 0 -1999/11/05 16:34:06 132.227.103.10 "Personal pages" "sex*" 2 -1999/11/06 11:09:29 195.53.170.189 "Alliance Mailling Lists" "Problems linux" 72 -1999/11/06 11:12:48 195.53.170.189 "Whole Asim Site" "Problems linux motif" 6 -1999/11/06 11:23:14 195.53.170.189 "Whole Asim Site" "linux motif lesstif" 6 -1999/11/07 21:29:50 202.188.70.177 "Whole Asim Site" "fir filter design architecture" 0 -1999/11/07 21:32:41 202.188.70.177 "Personal pages" "fir filter design architecture" 0 -1999/11/08 11:18:04 193.25.29.70 "Whole Asim Site" "ROM" 42 -1999/11/08 13:27:01 192.94.38.34 "Whole Asim Site" "vcd" 0 -1999/11/08 13:32:48 158.49.97.162 "Alliance Mailling Lists" "dreal lesstif" 2 -1999/11/08 13:35:43 158.49.97.162 "Whole Asim Site" "dreal" 119 -1999/11/08 13:38:18 158.49.97.162 "Whole Asim Site" "dreal linux" 23 -1999/11/08 13:38:19 158.49.97.162 "Whole Asim Site" "dreal linux" 23 -1999/11/08 15:14:28 193.25.29.72 "" "" -1999/11/08 16:12:00 193.25.29.70 "Whole Asim Site" "testbench" 0 -1999/11/08 20:19:39 205.147.9.166 "Whole Asim Site" "vhdl" 321 -1999/11/09 10:08:51 199.203.189.147 "Whole Asim Site" "vhdlcompiler" 0 -1999/11/09 10:24:46 129.254.187.12 "Whole Asim Site" "codesign" 0 -1999/11/09 10:25:18 129.254.187.12 "Whole Asim Site" "conception" 89 -1999/11/09 11:34:38 193.25.29.72 "Whole Asim Site" "am2910" 0 -1999/11/09 11:34:55 193.25.29.72 "Whole Asim Site" "am2900" 0 -1999/11/09 11:35:04 193.25.29.72 "Whole Asim Site" "am2901" 4 -1999/11/09 13:57:39 132.227.67.9 "Whole Asim Site" "bug" 1140 -1999/11/09 14:26:53 193.25.29.70 "Whole Asim Site" "dlxm" 21 -1999/11/09 14:58:03 202.56.248.244 "Whole Asim Site" "vlsi projects" 8 -1999/11/09 16:38:56 193.25.29.70 "Whole Asim Site" "dlxm" 21 -1999/11/09 17:03:54 139.62.208.15 "Whole Asim Site" "computer in brazil" 0 -1999/11/09 23:14:43 205.226.11.91 "Whole Asim Site" "1355" 8 -1999/11/10 00:48:25 208.32.26.78 "Whole Asim Site" "xilinx" 24 -1999/11/10 00:51:19 208.32.26.78 "Whole Asim Site" "FPGA" 58 -1999/11/10 10:36:05 134.214.104.111 "Whole Asim Site" "metepr" 0 -1999/11/10 10:36:12 134.214.104.111 "Whole Asim Site" "meteor" 0 -1999/11/10 10:40:13 134.214.104.111 "Personal pages" "derieux" 9 -1999/11/10 10:43:11 134.214.104.111 "Whole Asim Site" "derieux" 32 -1999/11/10 12:33:13 193.25.29.70 "Whole Asim Site" "bibliothek" 0 -1999/11/10 12:34:18 193.25.29.70 "Whole Asim Site" "standard bibliotheque" 0 -1999/11/10 12:39:16 193.25.29.72 "Whole Asim Site" "dlxm" 21 -1999/11/10 13:28:51 193.25.29.70 "Whole Asim Site" "dlxm" 21 -1999/11/10 14:29:46 193.25.29.70 "Whole Asim Site" "dlxm" 21 -1999/11/10 15:12:47 193.25.29.70 "Whole Asim Site" "dlxm" 21 -1999/11/10 16:23:20 130.226.137.66 "Whole Asim Site" "GDSII" 12 -1999/11/11 02:55:44 204.71.192.35 "Alliance Mailling Lists" "bugs" 30 -1999/11/11 02:57:14 204.71.192.35 "Whole Asim Site" "bugs" 34 -1999/11/11 04:15:05 155.69.164.203 "Whole Asim Site" "os2" 2 -1999/11/11 09:21:50 209.214.105.213 "Alliance" "" -1999/11/11 18:34:11 203.80.88.121 "Whole Asim Site" "graal" 191 -1999/11/11 18:44:20 203.80.103.31 "Whole Asim Site" "xpat" 43 -1999/11/11 18:50:28 203.80.103.31 "Alliance Mailling Lists" "graal" 177 -1999/11/11 19:25:43 203.80.88.121 "Whole Asim Site" "linuxELF" 0 -1999/11/11 19:25:52 203.80.88.121 "Whole Asim Site" "linux" 252 -1999/11/12 16:41:14 132.227.63.108 "Whole Asim Site" "chaker" 8 -1999/11/12 17:12:32 203.80.66.201 "Whole Asim Site" "xpat" 43 -1999/11/13 03:01:23 208.219.99.60 "Whole Asim Site" "sdram" 0 -1999/11/15 10:14:37 195.178.164.65 "Whole Asim Site" "technology" 157 -1999/11/15 10:21:00 195.178.164.65 "Whole Asim Site" "technology mosis" 6 -1999/11/15 10:33:27 193.25.29.70 "Whole Asim Site" "dlxm " 24 -1999/11/15 11:15:19 144.16.68.86 "Whole Asim Site" "FPGA" 58 -1999/11/15 13:57:45 195.178.164.65 "Whole Asim Site" "xpat" 43 -1999/11/15 14:24:20 192.117.186.146 "Whole Asim Site" "DETECTOR" 0 -1999/11/15 14:24:35 192.117.186.146 "Whole Asim Site" "SENSOR" 0 -1999/11/15 18:08:34 140.105.19.177 "Whole Asim Site" "Tutorials" 69 -1999/11/15 21:48:22 140.105.19.177 "Whole Asim Site" "addaccu.vbe" 15 -1999/11/16 10:50:31 192.168.1.26 "Whole Asim Site" "hspice" 1 -1999/11/16 16:33:09 140.105.19.201 "Whole Asim Site" "Technology Files" 69 -1999/11/16 16:57:58 193.25.29.70 "Whole Asim Site" "dlxm" 24 -1999/11/17 11:18:34 210.64.153.187 "Whole Asim Site" "Yagle" 65 -1999/11/17 15:38:28 194.214.169.248 "Whole Asim Site" "recognition" 18 -1999/11/17 16:46:08 132.227.63.110 "Whole Asim Site" "noe" 3 -1999/11/17 19:42:10 195.115.162.75 "Whole Asim Site" "xml" 0 -1999/11/17 19:42:28 195.115.162.75 "Personal pages" "joly" 2 -1999/11/17 19:43:41 195.115.162.75 "Personal pages" "joly" 2 -1999/11/17 19:45:18 195.115.162.75 "Personal pages" "philipe" 0 -1999/11/17 19:45:33 195.115.162.75 "Whole Asim Site" "rosa" 8 -1999/11/17 19:47:40 195.115.162.75 "Whole Asim Site" "gwan" 0 -1999/11/17 19:50:47 195.115.162.75 "Personal pages" "gwan" 0 -1999/11/17 19:56:26 195.115.162.75 "Personal pages" "gwe" 3 -1999/11/17 19:58:47 195.115.162.75 "Whole Asim Site" "phi" 0 -1999/11/17 19:58:56 195.115.162.75 "Personal pages" "phi" 1 -1999/11/18 18:52:03 147.234.2.4 "Mpc" "routers" 0 -1999/11/18 18:52:16 147.234.2.4 "Whole Asim Site" "1533" 0 -1999/11/18 18:52:27 147.234.2.4 "Whole Asim Site" "1355" 8 -1999/11/18 18:57:03 147.234.2.4 "Whole Asim Site" "rcube" 27 -1999/11/18 21:11:39 128.2.216.64 "Whole Asim Site" "bechmark circuits" 0 -1999/11/18 22:13:01 62.161.74.80 "Whole Asim Site" "sxlib" 49 -1999/11/18 22:16:25 62.161.74.80 "Whole Asim Site" "sxlib AND download" 0 -1999/11/18 22:16:40 62.161.74.80 "Whole Asim Site" "sxlib download" 0 -1999/11/19 01:33:57 210.64.153.187 "Whole Asim Site" "source code" 67 -1999/11/19 01:34:03 210.64.153.187 "Whole Asim Site" "source code" 67 -1999/11/19 18:31:58 192.168.11.50 "Whole Asim Site" "dff" 2 -1999/11/20 14:01:48 212.123.147.107 "Whole Asim Site" "compiling" 80 -1999/11/21 22:06:35 193.250.82.100 "Whole Asim Site" "chemin critique" 1 -1999/11/22 12:50:31 193.25.29.70 "Whole Asim Site" "alliance-support" 746 -1999/11/22 16:59:14 212.198.117.9 "Whole Asim Site" "Emmanuel Coulon" 3 -1999/11/22 17:09:16 132.227.63.108 "Whole Asim Site" "fpgen" 89 -1999/11/22 17:09:43 132.227.63.108 "Whole Asim Site" "fpgen" 89 -1999/11/23 00:40:17 192.76.27.151 "Alliance" "alliance 4.0" 4 -1999/11/23 10:17:50 193.25.29.70 "Whole Asim Site" "fpgen" 89 -1999/11/23 10:21:23 193.49.124.107 "Whole Asim Site" "dsp" 5 -1999/11/23 10:33:21 193.25.29.70 "Whole Asim Site" "fpgen" 89 -1999/11/23 14:59:06 140.105.19.188 "Whole Asim Site" "ASIC" 23 -1999/11/23 14:59:56 140.105.19.188 "Whole Asim Site" "fpga designA" 0 -1999/11/23 15:00:16 140.105.19.188 "Whole Asim Site" "fpga design" 26 -1999/11/23 15:00:49 10.13.84.9 "Whole Asim Site" "th" 93 -1999/11/23 21:49:31 194.247.44.173 "Whole Asim Site" "downloads" 0 -1999/11/23 21:49:42 194.247.44.173 "Whole Asim Site" "cadence" 35 -1999/11/23 21:54:19 194.247.44.173 "Whole Asim Site" "design frame work" 0 -1999/11/23 21:54:41 194.247.44.173 "Whole Asim Site" "design frame " 2 -1999/11/23 23:42:58 194.247.44.173 "Whole Asim Site" "source.readme" 0 -1999/11/23 23:43:12 194.247.44.173 "Whole Asim Site" "sourcecode" 0 -1999/11/23 23:43:28 194.247.44.173 "Alliance" "sourcecode" 0 -1999/11/23 23:57:44 140.105.19.154 "Alliance" "bbr" 17 -1999/11/24 10:34:25 195.178.164.65 "" "" -1999/11/24 13:45:17 200.249.140.69 "Alliance Mailling Lists" "" -1999/11/24 13:48:46 200.249.140.69 "Whole Asim Site" "syf" 334 -1999/11/24 14:19:51 195.239.69.14 "Whole Asim Site" "general management" 3 -1999/11/24 16:42:40 132.227.103.10 "Whole Asim Site" "Alliance Mailling Lists" 23 -1999/11/24 18:54:18 unknown "Whole Asim Site" "MIPS" 57 -1999/11/24 18:55:34 unknown "Whole Asim Site" "MIPS" 57 -1999/11/25 01:53:40 unknown "Whole Asim Site" "verilog" 11 -1999/11/25 15:34:49 134.157.116.130 "Whole Asim Site" "mips compiler" 1 -1999/11/25 16:17:18 193.25.29.70 "Whole Asim Site" "dlxm" 27 -1999/11/25 16:54:38 62.161.74.80 "Alliance" "sxlib" 51 -1999/11/25 16:56:04 62.161.74.80 "Alliance Mailling Lists" "sxlib" 51 -1999/11/25 16:56:16 62.161.74.80 "Personal pages" "sxlib" 0 -1999/11/25 16:56:21 62.161.74.80 "Mpc" "sxlib" 0 -1999/11/25 17:02:58 193.25.29.70 "Whole Asim Site" "8bit " 4 -1999/11/25 17:07:24 193.25.29.70 "Whole Asim Site" "fpgen" 89 -1999/11/25 17:21:16 193.25.29.70 "Whole Asim Site" "fpgen" 89 -1999/11/25 17:37:23 193.25.29.70 "Whole Asim Site" "dea 8190" 0 -1999/11/25 17:37:32 193.25.29.70 "Whole Asim Site" "dea8190" 0 -1999/11/25 17:37:44 193.25.29.70 "Whole Asim Site" "dea" 62 -1999/11/25 17:42:29 193.25.29.70 "Whole Asim Site" "8190" 0 -1999/11/25 17:42:52 193.25.29.70 "Whole Asim Site" "hasard" 0 -1999/11/25 17:43:11 193.25.29.70 "Whole Asim Site" "control" 31 -1999/11/25 19:44:34 132.227.63.52 "Whole Asim Site" "czo" 1024 -1999/11/26 04:57:03 129.127.236.253 "Whole Asim Site" "connectors vss and vdd are on the same equi" 0 -1999/11/26 04:57:18 129.127.236.253 "Whole Asim Site" "on the same equi" 1 -1999/11/26 04:58:24 129.127.236.253 "Whole Asim Site" "vdd and vss" 167 -1999/11/26 05:03:17 129.127.236.253 "Whole Asim Site" "DP_KEEP" 1 -1999/11/26 05:06:07 129.127.236.253 "Alliance Mailling Lists" "dpr" 46 -1999/11/26 05:08:21 129.127.236.253 "Whole Asim Site" "equi" 2 -1999/11/26 05:20:16 129.127.236.253 "Alliance" "same equi" 1 -1999/11/26 05:49:29 129.127.236.253 "Alliance" "power vdd vss" 14 -1999/11/26 05:50:26 129.127.236.253 "Whole Asim Site" "power vdd vss dpr" 2 -1999/11/26 06:44:21 209.239.213.246 "Whole Asim Site" "free vhdl software" 11 -1999/11/26 08:50:08 130.231.60.44 "Whole Asim Site" "download" 67 -1999/11/26 08:50:25 130.231.60.44 "Alliance" "download" 67 -1999/11/26 10:29:35 192.58.194.4 "Whole Asim Site" "download" 67 -1999/11/26 11:07:09 193.25.29.70 "Whole Asim Site" "dlxm" 28 -1999/11/26 11:18:11 193.50.5.156 "Whole Asim Site" "lestrade" 0 -1999/11/26 11:25:39 193.25.29.70 "Whole Asim Site" "dlxm" 28 -1999/11/26 14:11:06 193.25.29.70 "Whole Asim Site" "linux redHat6" 0 -1999/11/26 14:11:24 193.25.29.70 "Whole Asim Site" "Red" 7 -1999/11/26 14:26:08 164.129.1.38 "Whole Asim Site" "fpmap" 58 -1999/11/26 14:36:21 193.25.29.70 "Whole Asim Site" "REd Haat" 0 -1999/11/26 14:36:32 193.25.29.70 "Whole Asim Site" "REd Hat" 3 -1999/11/26 14:47:50 193.25.29.70 "Whole Asim Site" "Red Hat" 3 -1999/11/26 14:59:52 202.54.61.147 "Whole Asim Site" "free " 125 -1999/11/26 15:01:13 202.54.61.147 "Whole Asim Site" "free compilers" 0 -1999/11/26 15:16:37 134.206.22.37 "Whole Asim Site" "TRANSISTOR" 56 -1999/11/26 21:09:29 194.247.44.211 "Whole Asim Site" "compling alliance" 0 -1999/11/26 21:09:58 194.247.44.211 "Alliance" "compiling alliance" 79 -1999/11/27 18:32:34 193.95.115.33 "Whole Asim Site" "transistor" 56 -1999/11/27 19:12:14 213.228.24.30 "Whole Asim Site" "multimedia" 29 -1999/11/27 19:29:32 193.95.114.137 "" "" -1999/11/27 19:29:56 193.95.114.137 "" "" -1999/11/28 01:18:53 206.132.186.131 "" "" -1999/11/28 16:52:44 194.38.166.88 "Whole Asim Site" "" -1999/11/28 16:52:57 194.38.166.88 "Whole Asim Site" "torture" 0 -1999/11/28 19:03:52 171.211.231.70 "Whole Asim Site" "synthesis" 61 -1999/11/29 07:40:30 192.168.2.150 "Whole Asim Site" "FPGA" 58 -1999/11/29 07:44:27 192.168.2.150 "Whole Asim Site" "Altera" 4 -1999/11/29 10:59:45 193.25.29.70 "Whole Asim Site" "dlxm" 29 -1999/11/29 12:52:14 134.157.116.130 "Whole Asim Site" "mips" 57 -1999/11/30 10:59:42 213.228.23.44 "Whole Asim Site" "mips r 3000" 0 -1999/11/30 10:59:50 213.228.23.44 "Whole Asim Site" "mips exe" 0 -1999/11/30 10:59:56 213.228.23.44 "Whole Asim Site" "mips" 57 -1999/11/30 12:05:29 140.105.19.201 "Whole Asim Site" "technology file" 67 -1999/11/30 12:13:50 140.105.19.201 "Whole Asim Site" "founderiestfile" 0 -1999/11/30 12:13:59 140.105.19.201 "Whole Asim Site" "founderies" 0 -1999/11/30 12:14:16 140.105.19.201 "Whole Asim Site" "foundry" 9 -1999/11/30 12:14:55 140.105.19.201 "Whole Asim Site" "alcatel" 4 -1999/11/30 14:35:19 193.49.185.149 "Whole Asim Site" "DMA copy" 0 -1999/11/30 14:35:32 193.49.185.149 "Mpc" "DMA copy" 0 -1999/11/30 14:49:35 149.225.36.12 "Whole Asim Site" "libSM" 0 -1999/11/30 14:50:07 149.225.36.12 "Alliance" "libSM*" 33 -1999/11/30 15:00:30 149.225.36.12 "Alliance Mailling Lists" "libSM.so.6.0.0" 0 -1999/11/30 15:00:45 149.225.36.12 "Alliance" "libSM.so.6.0.0" 0 -1999/11/30 15:00:59 149.225.36.12 "Whole Asim Site" "libSM.so.6.0" 29 -1999/11/30 17:21:59 128.2.250.207 "Personal pages" "baillard" 0 -1999/11/30 21:38:19 156.26.30.226 "Alliance Mailling Lists" "genlib" 123 -1999/12/01 02:24:54 156.26.30.226 "Alliance" "genlib" 309 -1999/12/01 13:39:28 194.199.136.75 "Whole Asim Site" "saraiva" 17 -1999/12/01 13:39:46 194.58.207.147 "Whole Asim Site" "FPMAP" 58 -1999/12/01 13:59:34 194.58.207.147 "Whole Asim Site" "CMP AND EuroPractice" 1 -1999/12/01 16:44:25 131.254.50.57 "Whole Asim Site" "briot jean-pierre" 0 -1999/12/01 16:44:31 131.254.50.57 "Whole Asim Site" "briot" 0 -1999/12/01 16:44:38 131.254.50.57 "Mpc" "briot" 0 -1999/12/01 16:44:41 131.254.50.57 "Multimedia" "briot" 0 -1999/12/01 16:44:45 131.254.50.57 "Alliance" "briot" 0 -1999/12/01 16:44:49 131.254.50.57 "Alliance Mailling Lists" "briot" 0 -1999/12/01 16:44:52 131.254.50.57 "Education" "briot" 0 -1999/12/01 16:44:55 131.254.50.57 "Publications" "briot" 0 -1999/12/01 16:44:59 131.254.50.57 "Personal pages" "briot" 2 -1999/12/01 17:03:42 141.35.14.89 "Whole Asim Site" "DLX" 56 -1999/12/01 17:19:10 141.35.14.89 "Whole Asim Site" "dlx" 56 -1999/12/01 17:24:51 141.35.14.89 "Whole Asim Site" "dlx" 56 -1999/12/01 17:34:01 141.35.14.89 "Whole Asim Site" "amd" 8 -1999/12/01 19:12:53 193.136.138.186 "Whole Asim Site" "synopsys" 649 -1999/12/01 19:13:47 193.136.138.186 "Alliance" "synopsys tools" 11 -1999/12/01 20:32:42 209.232.84.2 "Whole Asim Site" "a 1.2ghz cmos" 0 -1999/12/01 20:32:53 209.232.84.2 "Whole Asim Site" "bendak" 0 -1999/12/01 20:49:09 139.133.204.82 "Whole Asim Site" "ppc" 0 -1999/12/01 20:49:15 139.133.204.82 "Whole Asim Site" "linux" 258 -1999/12/01 23:37:30 156.26.38.46 "Whole Asim Site" "cif errors" 11 -1999/12/01 23:48:59 156.26.38.46 "Alliance" "dreal" 129 -1999/12/01 23:50:08 156.26.38.46 "Whole Asim Site" "dreal" 129 -1999/12/02 00:04:48 156.26.38.46 "Whole Asim Site" "problems with dreal" 23 -1999/12/02 17:28:57 194.204.222.100 "Whole Asim Site" "programmation of bitmaps files" 0 -1999/12/02 17:30:07 194.204.222.100 "Publications" "bitmap" 0 -1999/12/02 22:10:30 212.53.97.7 "Whole Asim Site" "freebsd" 19 -1999/12/03 11:39:58 132.227.103.10 "Whole Asim Site" "asim" 1360 -1999/12/03 13:53:36 202.54.89.82 "Whole Asim Site" "test benches" 1 -1999/12/03 15:53:05 195.232.71.243 "Alliance" "microprocesseur x86" 0 -1999/12/03 15:53:34 195.232.71.243 "Whole Asim Site" "microprocesseur and x86" 0 -1999/12/03 15:54:58 195.232.71.243 "Whole Asim Site" "x86" 16 -1999/12/03 15:56:01 195.232.71.243 "Whole Asim Site" "modle" 0 -1999/12/03 15:56:19 195.232.71.243 "Whole Asim Site" "microprocesseur " 17 -1999/12/03 15:56:31 195.232.71.243 "Whole Asim Site" "models" 26 -1999/12/04 07:36:14 202.230.44.207 "Whole Asim Site" "FPGA" 58 -1999/12/04 11:29:00 212.35.11.133 "Whole Asim Site" "8086" 3 -1999/12/05 00:33:21 195.68.47.244 "Whole Asim Site" "collet" 0 -1999/12/05 00:33:29 195.68.47.244 "Personal pages" "collet" 0 -1999/12/05 22:43:31 212.67.134.149 "Whole Asim Site" "conditional signal assignment" 2 -1999/12/05 22:44:34 212.67.134.149 "Whole Asim Site" "concurrent statements" 7 -1999/12/06 11:13:48 193.76.202.246 "Whole Asim Site" "wawecom" 1 -1999/12/06 13:46:00 193.25.29.70 "Whole Asim Site" "16 bit" 13 -1999/12/06 13:50:56 193.25.29.70 "Whole Asim Site" "8bit " 4 -1999/12/06 14:05:56 193.25.29.70 "Whole Asim Site" "8bit processor" 0 -1999/12/06 14:06:17 193.25.29.70 "Whole Asim Site" "microprocessor" 22 -1999/12/06 14:24:08 193.25.29.70 "Whole Asim Site" "8 bit microprocessor" 0 -1999/12/06 14:24:18 193.25.29.70 "Whole Asim Site" "8bit microprocessor" 0 -1999/12/06 14:24:42 193.25.29.70 "Whole Asim Site" "16bit microprocessor" 0 -1999/12/06 14:25:25 193.25.29.70 "Whole Asim Site" "microprocessor" 22 -1999/12/06 14:26:04 193.25.29.70 "Whole Asim Site" "processor" 29 -1999/12/06 14:36:19 193.25.29.70 "Whole Asim Site" "8bit processor" 0 -1999/12/06 14:37:07 193.25.29.70 "Whole Asim Site" "16 bit processor" 0 -1999/12/06 14:37:17 193.25.29.70 "Whole Asim Site" "16bit processor" 0 -1999/12/06 14:37:46 193.25.29.70 "Whole Asim Site" "16 BIT " 13 -1999/12/06 14:42:44 193.25.29.70 "Whole Asim Site" "mips" 57 -1999/12/06 15:07:44 193.25.29.70 "Whole Asim Site" "vliew" 0 -1999/12/06 15:08:11 193.25.29.70 "Whole Asim Site" "vl" 2 -1999/12/06 15:09:23 193.25.29.70 "Whole Asim Site" "VLview" 0 -1999/12/06 15:09:37 193.25.29.70 "Whole Asim Site" "VL" 2 -1999/12/06 15:10:21 193.25.29.70 "Whole Asim Site" "DEA" 62 -1999/12/06 15:16:43 193.25.29.70 "Whole Asim Site" "vlview" 0 -1999/12/06 15:17:14 193.25.29.70 "Whole Asim Site" "1994" 24 -1999/12/06 16:30:38 194.136.176.162 "Whole Asim Site" "alliance4.0" 0 -1999/12/06 16:40:52 164.138.13.82 "Whole Asim Site" "bus pci" 16 -1999/12/07 00:38:15 24.12.96.149 "Whole Asim Site" "PowerPC" 2 -1999/12/07 00:39:14 24.12.96.149 "Whole Asim Site" "PowerMacintosh" 0 -1999/12/07 14:20:59 193.25.29.70 "Whole Asim Site" "amd" 8 -1999/12/07 14:24:13 193.25.29.70 "Whole Asim Site" "amd" 8 -1999/12/07 22:09:43 193.95.32.185 "Whole Asim Site" "fabrication" 12 -1999/12/07 23:39:27 207.135.216.203 "Whole Asim Site" "IRIX" 4 -1999/12/08 10:28:45 132.227.63.8 "Personal pages" "VTS" 3 -1999/12/08 10:29:16 132.227.63.8 "Whole Asim Site" "Habilitation" 2 -1999/12/08 10:29:26 132.227.63.8 "Personal pages" "Habilitation" 1 -1999/12/08 10:29:47 132.227.63.8 "Whole Asim Site" "IRIS" 7 -1999/12/08 10:29:57 132.227.63.8 "Personal pages" "IRIS" 10 -1999/12/08 13:58:36 212.67.136.254 "Whole Asim Site" "Hamming Code generator" 0 -1999/12/08 13:58:47 212.67.136.254 "Whole Asim Site" "FIFO" 0 -1999/12/08 13:58:55 212.67.136.254 "Whole Asim Site" "example" 698 -1999/12/08 13:59:35 212.67.136.254 "Whole Asim Site" "counter" 11 -1999/12/08 13:59:37 212.67.136.254 "Whole Asim Site" "counter" 11 -1999/12/08 16:47:15 193.25.29.72 "" "" -1999/12/08 17:04:24 195.207.143.129 "Whole Asim Site" "lul" 0 -1999/12/08 18:48:34 193.49.146.252 "Whole Asim Site" "Antivirus Mac" 0 -1999/12/08 18:48:42 193.49.146.252 "Whole Asim Site" "Antivirus " 0 -1999/12/08 18:49:39 193.49.146.252 "Whole Asim Site" "virus" 0 -1999/12/09 07:06:20 163.32.251.110 "Whole Asim Site" "technology file" 67 -1999/12/09 07:14:22 163.32.251.110 "Whole Asim Site" "techmology file" 0 -1999/12/09 07:15:11 163.32.251.110 "Whole Asim Site" "technology file" 67 -1999/12/09 13:26:15 171.209.184.27 "Whole Asim Site" "MPEG" 2 -1999/12/09 13:56:35 193.25.29.70 "Whole Asim Site" "control" 33 -1999/12/09 19:12:02 194.141.68.219 "Whole Asim Site" "simips" 3 -1999/12/09 22:47:04 139.133.204.100 "Whole Asim Site" "source" 213 -1999/12/09 22:54:17 139.133.204.100 "Whole Asim Site" "linux" 258 -1999/12/10 10:18:01 139.133.204.82 "Whole Asim Site" "mac" 13 -1999/12/10 10:24:51 139.133.204.82 "Whole Asim Site" "linux PPC" 0 -1999/12/10 10:25:01 139.133.204.82 "Whole Asim Site" "linux " 258 -1999/12/10 12:03:11 192.100.101.17 "Alliance Mailling Lists" "list" -1999/12/10 13:23:17 132.227.103.10 "Whole Asim Site" "" -1999/12/10 14:16:18 132.227.103.10 "Whole Asim Site" "hjgc" 0 -1999/12/10 14:54:22 132.227.63.117 "Whole Asim Site" "projets dea " 5 -1999/12/10 14:55:30 132.227.63.117 "Whole Asim Site" "propositon AND stage" 0 -1999/12/10 14:55:43 132.227.63.117 "Whole Asim Site" "proposition AND stage" 33 -1999/12/10 15:16:58 unknown, unknown "Whole Asim Site" "desbarbieux" 12 -1999/12/10 15:20:26 132.227.103.10 "Whole Asim Site" "mkisofs" 0 -1999/12/10 15:57:48 132.227.67.64 "Whole Asim Site" "window-area" 0 -1999/12/10 15:58:02 132.227.67.64 "Whole Asim Site" "window_area" 0 -1999/12/10 15:58:14 132.227.67.64 "Whole Asim Site" "window" 29 -1999/12/10 15:59:53 132.227.67.64 "Whole Asim Site" "dpr" 54 -1999/12/12 19:32:55 212.216.138.4 "Whole Asim Site" "Nti" 0 -1999/12/12 19:32:59 212.216.138.4 "Whole Asim Site" "Ntie" 12 -2000/05/12 17:12:29 "" "" -2000/05/12 17:13:05 "" "gen" diff --git a/dev/cvslargo/www/cgi-bin/czo/publications.dat b/dev/cvslargo/www/cgi-bin/czo/publications.dat deleted file mode 100644 index f462b21f..00000000 Binary files a/dev/cvslargo/www/cgi-bin/czo/publications.dat and /dev/null differ diff --git a/dev/cvslargo/www/cgi-bin/czo/search.cgi b/dev/cvslargo/www/cgi-bin/czo/search.cgi deleted file mode 100755 index 18780004..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/search.cgi +++ /dev/null @@ -1,213 +0,0 @@ -#!/usr/local/bin/perl -# (C) Copyright 1997,98 Czo -# Parts (C) A.Fenyo - -BEGIN { - - # Use the CGI::Carp module and import the carpout() function. - # - use CGI::Carp qw(carpout); - - # Send warnings and die messages to the browser. - # - carpout(STDOUT); - -} - - - -use CGI; -use POSIX; - -# SCRIPT_NAME = /cgi-bin/test.cgi -# SCRIPT_FILENAME = /users/largo2/webmastr/wwwroot/cgi-bin/printenv.cgi - - -$ASIM_HEADER=`/bin/cat /users/largo2/webmastr/wwwroot/slash/ssi/asim_header.html`; -$ASIM_FOOTER=`/bin/cat /users/largo2/webmastr/wwwroot/slash/ssi/asim_footer.html`; -$SEARCH_HEADER=`/bin/cat /users/largo2/webmastr/wwwroot/slash/ssi/search_header.html`; -$SEARCH_MIDDLE=`/bin/cat /users/largo2/webmastr/wwwroot/slash/ssi/search_middle.html`; -$SEARCH_FOOTER=`/bin/cat /users/largo2/webmastr/wwwroot/slash/ssi/search_footer.html`; - -$lock = "/tmp/search.lock"; -$log = "/users/largo2/webmastr/wwwroot/slash/cgi-bin/private/search.log"; - -print "Content-type: text/html\n\n"; - -#unlink("$lock"); - -$query = new CGI; - -$str = $query->param('searchstring'); - -# Czo 990607 : autorise . et _ - -$str =~ s/[^a-zA-Z0-9-_ \*\.]//g; -$str =~ s/ -/ /g; -$str =~ s/^-/ /; - -$grepstr=$str; - -$grepstr =~ tr/A-Z/a-z/; -@words = split / +/, $grepstr; -foreach $word (@words) { - $word =~ s/ *//; - next if (!$word); - next if (($word eq 'or') || ($word eq 'and')); - @allwords = (@allwords, $word); -}; - - - -$scope = $query->param('ComboSearchList'); - - if ( $scope eq "Alliance Mailling Lists" ) { - $scopefile = "/users/largo2/webmastr/wwwroot/slash/cgi-bin/alml.dat"; - } elsif ( $scope eq "Alliance" ) { - $scopefile = "/users/largo2/webmastr/wwwroot/slash/cgi-bin/alliance.dat"; - } elsif ( $scope eq "Education" ) { - $scopefile = "/users/largo2/webmastr/wwwroot/slash/cgi-bin/education.dat"; - } elsif ( $scope eq "Mpc" ) { - $scopefile = "/users/largo2/webmastr/wwwroot/slash/cgi-bin/mpc.dat"; - } elsif ( $scope eq "Multimedia" ) { - $scopefile = "/users/largo2/webmastr/wwwroot/slash/cgi-bin/multimedia.dat"; - } elsif ( $scope eq "Publications" ) { - $scopefile = "/users/largo2/webmastr/wwwroot/slash/cgi-bin/publications.dat"; - } elsif ( $scope eq "Personal pages" ) { - $scopefile = "/users/largo2/webmastr/wwwroot/slash/cgi-bin/users.dat"; - } else { $scopefile = "/users/largo2/webmastr/wwwroot/slash/cgi-bin/allsite.dat"; - } - - -if (-e $lock) { -print "$ASIM_HEADER\n$SEARCH_HEADER\n"; -print ' '; -print "$SEARCH_MIDDLE\n"; - print 'Sorry, server was busy, please try again.'; -print "\n"; -print "$SEARCH_FOOTER\n$ASIM_FOOTER\n"; - } -else { - -print "$ASIM_HEADER\n$SEARCH_HEADER\n"; -print ' '; -print "$SEARCH_MIDDLE\n"; - -#system (date); -#print system ( "/usr/local/home/czo/local/FreeBSD/bin/swish-e -f /usr/local/home/czo/public_html/cgi-bin/index.swish-e -w $str" ); -#$RET = `/usr/local/home/czo/local/FreeBSD/bin/swish-e -c /usr/local/home/czo/public_html/cgi-bin/index.swish-e -w $str`; -#print "
";
-
-open RESULT, "/usr/local/bin/swish-e -m 40 -f $scopefile -w $str |";
-
-$cpt = 0;
-while () {
-#    chop;
-#print ;
-
-    m/err: no results/ && do
-    {
-      $nmatch=0;
-      print 'No match found in "'.$scope.'". ';
-      print '';
-     };
-
-    m/^# Number of hits: (.*)/ && do 
-    {
-      $nmatch=$1;
-      print ''.$1.' matches were found in "'.$scope.'". ';
-      print '';
-     };
-
-    m/^#/ && next;
-
-    
-    m/^(.*) (.*) "(.*)" (.*)/ && (($res1, $res2, $res3, $res4) = ($1, $2, $3, $4)) && do
-      {
-         $cpt++;
-         $tmp1 = $res1/10; $tmp1 =~ s/^(.*)\..*/\1/;
-         $tmp = $res4/1024; $tmp =~ s/^(.*\..).*/\1/;
-
-print '

'.$cpt.'. ['.$tmp1.'%] '.$res3.'
-[URL: '.$res2.']
-Page size '.$tmp.' Kb

' ; -#Last modified 7-Oct-97 - - -# $file=$res2; -# $file =~ s%http://www-asim.lip6.fr/%/users/largo2/webmastr/wwwroot/%; -# -# # print "

$file\n

"; -# -# #$FILE = `/asim/gnu/bin/lynxx -dump -reload -nolist $file`; -# $FILE = `cat $file`; -# -# $FILE =~ s/
/ - /sg; -# $FILE =~ s/


/ - /sg; -# $FILE =~ s/
  • / - /sg; -# $FILE =~ s/
    / - /sg; -# $FILE =~ s/
    / - /sg; -# $FILE =~ s/

    / - /sg; -# $FILE =~ s/-( -)*/-/sg; -# -# $FILE =~ s/<.*?>/ /sg; -# -# foreach $word (@allwords) { -# $FILEinsensitive = $FILE; -# $FILEinsensitive =~ tr/A-Z/a-z/; -# $wordinsensitive = $word; -# $wordinsensitive =~ tr/A-Z/a-z/; -# $fileindex = index $FILEinsensitive, $wordinsensitive; -# next if ($fileindex == -1); -# -# $fileindex = 160 if ($fileindex < 160); -# $grep = substr $FILE, $fileindex - 160, 320; -# $grep =~ s/^[^ ]* //s; -# $grep =~ s/ [^ ]*$//s; -# -# foreach $w (@allwords) { -# $grep =~ s%($w)%\1%si; -# }; -# -# print "... $grep ...

    \n"; -# -# last; -# }; -# -# -# -# - }; - -} ; - -close(RESULT); - -#print "$scopefile\n"; -print "$SEARCH_FOOTER\n$ASIM_FOOTER\n"; - - - -# REMOTE_ADDR = 132.227.103.10 -# HTTP_X_FORWARDED_FOR = 132.227.103.10 - -$CLIENT = $ENV{"HTTP_X_FORWARDED_FOR"}; - -if ( $CLIENT eq "" ) { -$CLIENT = $ENV{"REMOTE_ADDR"}; -} - - -$TIME=strftime("%Y/%m/%d %H:%M:%S",localtime()); -open(LOCK,">$lock") || warn "Can't open lock : $!"; -close (LOCK); -open(SORTIE, ">>$log") || die "Can't open log : $!"; -print SORTIE "$TIME $CLIENT \"$scope\" \"$str\" $nmatch\n";; -close (SORTIE); -unlink("$lock") || warn "Can't delete lock : $!"; - -} - -exit 0 -__END__ - - diff --git a/dev/cvslargo/www/cgi-bin/czo/searchres.cgi b/dev/cvslargo/www/cgi-bin/czo/searchres.cgi deleted file mode 100755 index e7aa379b..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/searchres.cgi +++ /dev/null @@ -1,166 +0,0 @@ -#!/usr/local/bin/perl - -#- Configurable Variables ---------------------------------------------------# - -#Path to SWISH-E executable -$swish = "/usr/local/bin/swish-e"; - -#Path to this CGI script -$swishcgi = "/cgi-bin/searchres.cgi"; - -#Path to the SWISH-E index -$index = "/local/largo2/wwwpages/cgi-bin/index.swish-e"; - -#Path to the SWISH-E configuration file -$config = "/opt/swish/swish-e/ConfigFiles/SwishTest.conf"; - -#- Main Program -------------------------------------------------------------# - -#Parse the form data -&parse_form_data (*FORM); - -#Construct a simple query -$query = $FORM{'query'}; - -$results = $FORM{'results'}; - -if ($query) { - &search_parse; -}else{ - &search_error("You must enter a keyword or phrase in one or more of the text boxes"); -} - -#- Subroutines ---------------------------------------------------------------# - -#Subroutine for checking and parsing the incoming form data. - -sub parse_form_data { - -local (*FORM_DATA) = @_; -local ($request_method, $query_string, @key_value_pairs, $key_value, $key, $value); - -$request_method = $ENV{'REQUEST_METHOD'}; - -if ($request_method eq "GET") { - $query_string = $ENV{'QUERY_STRING'}; -} elsif ($request_method eq "POST") { - read (STDIN, $query_string, $ENV{'CONTENT_LENGTH'}); -} else { - &search_error ("Forms must use either GET or POST."); -} - -@key_value_pairs = split (/&/, $query_string); - -foreach $key_value (@key_value_pairs) { - ($key, $value) = split (/=/, $key_value); - $value =~ tr/+/ /; - $value =~ s/%([\dA-Fa-f][\dA-Fa-f])/pack ("C", hex ($1))/eg; - if (defined ($FORM_DATA{$key})) { - $FORM_DATA{$key} = join ("\0", $FORM_DATA{$key}, $value); - } else { - $FORM_DATA{$key} = $value; - } -} - -} - -#Subroutine for constructing the Swish-E search request and formating the results. - -sub search_parse { - -#Create your SWISH-E query command - -$count=0; - -open(SWISH, "$swish -w $query -m $results -f $index|"); - -#Check for errors - -while () { - chop; - - if ($_ eq "err: no results") - {&search_error("There were no items that matched your search request");} - - if ($_ eq "err: could not open index file") - {&search_error("Could not open SWISH Index File $index");} - - if ($_ eq "err: no search words specified") - {&search_error("Please Enter at least one Search Word");} - - if ($_ eq "err: a word is too common") - {&search_error("One of your search terms is too common, please try again");} - - next if /^\D/; - $count++; - push(@results, $_); - -} - -#Print the results page - -&html_header("Search Results"); - -print < -Swish found the following items, listed in order of computed relevance
    -Your Search for $query, returned $count Items -

    -
    -
      -Search_Results - -foreach (@results) { - select(STDOUT); - ($stringone, $title, $filesize) = split(/\"/, $_); - ($rank, $url) = split(/ /, $stringone); - print "
    • $title
      \n"; -} - -print "
    \n"; -&html_trailer; - -} - -#Subroutine for printing a generic HTML header. - -sub html_header { - -$document_title = $_[0]; - -print < - -$document_title - - -

    $document_title

    -HTML_Header -} - -#Subroutine for printing a generic HTML trailer. - -sub html_trailer { - -print < - - -HTML_Trailer - -exit; - -} - -#Subroutine for printing error messages. - -sub search_error { - -&html_header("Search Error"); -$error_message = $_[0]; -print "

    \n$error_message

    \n"; -&html_trailer; - -} diff --git a/dev/cvslargo/www/cgi-bin/czo/searchwais.cgi b/dev/cvslargo/www/cgi-bin/czo/searchwais.cgi deleted file mode 100755 index 9a98070c..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/searchwais.cgi +++ /dev/null @@ -1,52 +0,0 @@ -#!/usr/local/bin/perl -use CGI; - -$WAISDIR="/usr/local/home/alex/cvs/alex/MPC-OS/docs/www/waissrc"; -$HEADER=`/bin/cat /usr/local/home/alex/cvs/alex/MPC-OS/docs/www/header.html`; -$FOOTER=`/bin/cat /usr/local/home/alex/cvs/alex/MPC-OS/docs/www/footer.html`; -$START=`/bin/cat /usr/local/home/alex/cvs/alex/MPC-OS/docs/www/start.html`; -$STOP=`/bin/cat /usr/local/home/alex/cvs/alex/MPC-OS/docs/www/stop.html`; - -print "Content-type: text/html\n\n"; - -$query = new CGI; - -$str = $query->param('searchstring'); - -$str =~ s/[^a-zA-Z0-9- ]//g; -$str =~ s/ -/ /g; -$str =~ s/^-/ /; - -print "$START\n$HEADER\n"; - -print '

    Search result for query "'.$str.'"

    '; - -open RESULT, "/usr/local/bin/waisq -f - -g -s $WAISDIR -S mpc.src -g $str | grep :headline |"; - -print ''; - -print "
    ";
    -$cpt = 0;
    -while () {
    -    chop;
    -    m/^#/ && next;
    -    m/:headline "(.*) (.*)"/ && do { $file = $2.$1; };
    -    $file =~ s%.*cvs/alex/MPC-OS/docs/www%%;
    -    $cpt++;
    -    print '
    '; - -} - -close(RESULT); - -print '
    '.$cpt.'- http://mpc.lip6.fr'.$file.'

    -
    -
    Search: - -
    -
    -'; -print "$FOOTER\n$STOP\n"; - -__END__ - diff --git a/dev/cvslargo/www/cgi-bin/czo/startform.cgi b/dev/cvslargo/www/cgi-bin/czo/startform.cgi deleted file mode 100755 index 9d9fa6c7..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/startform.cgi +++ /dev/null @@ -1,110 +0,0 @@ -#!/usr/local/bin/perl - -use CGI; - -$query = new CGI; -$CGI::POST_MAX = 102400; # set maximum size of post - -print $query->header; -print $query->start_html("Example CGI.pm Form"); -print "

    Example CGI.pm Form

    \n"; -&print_prompt($query); -&do_work($query); -&print_tail; -print $query->end_html; - -sub print_prompt { - my($query) = @_; - - print $query->startform; - print "What's your name?
    "; - print $query->textfield('name'); - print $query->checkbox('Not my real name'); - -print $query->filefield('uploaded_file','starting value',50,80); -# ACCEPT="filetype/*" - print "

    Where can you find English Sparrows?
    "; - print $query->checkbox_group( - -name=>'Sparrow locations', - -values=>[England,France,Spain,Asia,Hoboken], - -linebreak=>'yes', - -defaults=>[England,Asia]); - - print "

    How far can they fly?
    ", - $query->radio_group( - -name=>'how far', - -values=>['10 ft','1 mile','10 miles','real far'], - -default=>'1 mile'); - - print "

    What's your favorite color? "; - print $query->popup_menu(-name=>'Color', - -values=>['black','brown','red','yellow'], - -default=>'red'); - - print $query->hidden('Reference','Monty Python and the Holy Grail'); - - print "

    What have you got there?
    "; - print $query->scrolling_list( - -name=>'possessions', - -values=>['A Coconut','A Grail','An Icon', - 'A Sword','A Ticket'], - -size=>5, - -multiple=>'true'); - - print "

    Any parting comments?
    "; - print $query->textarea(-name=>'Comments', - -rows=>10, - -columns=>50); - - print "

    ",$query->reset; - print $query->submit('Action','Shout'); - print $query->submit('Action','Scream'); - print $query->endform; - print "


    \n"; -} - -sub do_work { - my($query) = @_; - my(@values,$key); - - print "

    Here are the current settings in this form

    "; - - foreach $key ($query->param) { - print "$key -> "; - @values = $query->param($key); - print join(", ",@values),"
    \n"; - } -} - -sub print_tail { -$filename = $query->param('uploaded_file'); - -print "

    $filename
    \n\n"; - -# Read a text file and print it out -# while (<$filename>) { -# print; -# } - - $type = $query->uploadInfo($filename)->{'Content-Type'}; - print "

    $type
    \n\n"; -# unless ($type eq 'text/html') { -# die "HTML FILES ONLY!"; -# } - -print "

    fini
    \n\n"; - - # Copy a binary file to somewhere safe - open (OUTFILE,">/tmp.vbe"); - while ($bytesread=read($filename,$buffer,1024)) { - print OUTFILE $buffer; - } - -print "

    fini
    \n\n"; -print < -
    Lincoln D. Stein

    -Home Page -END -} diff --git a/dev/cvslargo/www/cgi-bin/czo/test.cgi b/dev/cvslargo/www/cgi-bin/czo/test.cgi deleted file mode 100755 index a9a263e2..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/test.cgi +++ /dev/null @@ -1,44 +0,0 @@ -#!/bin/sh - -# disable filename globbing -set -f - -echo Content-type: text/plain -echo - -echo CGI/1.0 test script report: -echo - -echo argc is $#. argv is "$*". -echo - -id -echo - -touch /tmp/toto.234 - -pwd -echo - -echo SERVER_SOFTWARE = $SERVER_SOFTWARE -echo SERVER_NAME = $SERVER_NAME -echo GATEWAY_INTERFACE = $GATEWAY_INTERFACE -echo SERVER_PROTOCOL = $SERVER_PROTOCOL -echo SERVER_PORT = $SERVER_PORT -echo REQUEST_METHOD = $REQUEST_METHOD -echo HTTP_ACCEPT = "$HTTP_ACCEPT" -echo PATH_INFO = "$PATH_INFO" -echo PATH_TRANSLATED = "$PATH_TRANSLATED" -echo SCRIPT_NAME = "$SCRIPT_NAME" -echo QUERY_STRING = "$QUERY_STRING" -echo REMOTE_HOST = $REMOTE_HOST -echo REMOTE_ADDR = $REMOTE_ADDR -echo REMOTE_USER = $REMOTE_USER -echo AUTH_TYPE = $AUTH_TYPE -echo CONTENT_TYPE = $CONTENT_TYPE -echo CONTENT_LENGTH = $CONTENT_LENGTH - -id - -ls -al / - diff --git a/dev/cvslargo/www/cgi-bin/czo/testtime.cgi b/dev/cvslargo/www/cgi-bin/czo/testtime.cgi deleted file mode 100755 index b5b873b1..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/testtime.cgi +++ /dev/null @@ -1,7 +0,0 @@ -#!/usr/local/bin/perl -w -use POSIX; -$TIME=strftime(" %Y/%m/%d %H:%M:%S",localtime()); -#$TIME=localtime(); -print $TIME ; - - diff --git a/dev/cvslargo/www/cgi-bin/czo/users.dat b/dev/cvslargo/www/cgi-bin/czo/users.dat deleted file mode 100644 index 6f86824c..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/users.dat +++ /dev/null @@ -1,16 +0,0 @@ -# SWISH format 1.3 -# Swish-e format 1.3 -# -# Name: Asim Lab. index -# Saved as: users.dat -# Counts: -# Indexed on: 06/06/00 06:32:42 MEST -# Description: Index by Czo -# Pointer: http://www-asim.lip6.fr/ -# Maintained by: Czo [Olivier SIROL] -# DocumentProperties: Enabled -# Stemming Applied: 0 -000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000002477000000000000247500000000000024760000000000002476 - - -first author diff --git a/dev/cvslargo/www/cgi-bin/czo/wwwlog.cgi b/dev/cvslargo/www/cgi-bin/czo/wwwlog.cgi deleted file mode 100755 index c664c4ef..00000000 --- a/dev/cvslargo/www/cgi-bin/czo/wwwlog.cgi +++ /dev/null @@ -1,11 +0,0 @@ -#!/usr/local/bin/perl - -if (!open (COUNT,">>/users/largo2/webmastr/wwwroot/cgi-bin/log.db")) { - exit 1; -} -while (($key, $val) = each %ENV) { - print COUNT "$key = $val; "; -} - print COUNT "\n"; - close COUNT; -