【 スクリプト改造工房 PART 7 】
■ このスレッドは過去ログ倉庫に格納されています
0001sage
03/09/17 15:28ID:ZcvVdw5C#================================
# スレッドの説明
#================================
「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら
ここで聞いてください。ひょっとしたらアドバイス出来るかもしれません。
質問するときは以下の点に注意して書いて下さい
(1) そのスクリプトの内容と置いてある場所を明記する (txtファイルでUPすればなお良い)
(2) どんな風に改造して欲しいのか？ (完成イメージHTMLを用意すればなお良し)
(3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い
※答えてくれないからといって逆ギレする厨はお断り
過去ログ>>2
0136nobodyさん
03/09/26 22:21ID:???このアップローダーにDL数のカウンタを付けたいのですが、さっぱり分かりません。
どなたか時間があればでいいんで改造して頂けないでしょうか？
よろしくお願いします。
0140136
03/09/26 23:21ID:???完成例のｲﾒｰｼﾞ
http://data.s8.xrea.com/tmp/upload.html
ソース
http://data.s8.xrea.com/tmp/upload.txt
です。よろしくお願いします。
0141nobodyさん
03/09/26 23:33ID:???いや、そういうことが言いたいんじゃなくてさ。
ここは自分で改造する人のスレなの。
あんたは、どういう風にしたいと言うイメージは持ってるけど、
そのためにどれだけ努力したのか（で、どこでつまづいたか）をみんなは知りたいの。
ただ単に他人に丸投げしたいだけだったら、
こんなとこで恥さらしてないで、Webプログラマさがして金を渡してやってもらった方がいいの。
0142nobodyさん
03/09/27 03:15ID:U5pwYI9oできないのを誤魔化すために煽ってる
コレ２ｃｈの常識
0143_
03/09/27 03:44ID:???http://mona.h.fc2.com/hankaku08.html
http://mona.h.fc2.com/hankaku06.html
http://mona.h.fc2.com/hankaku09.html
http://mona.h.fc2.com/hankaku10.html
http://mona.h.fc2.com/hankaku02.html
http://mona.h.fc2.com/hankaku03.html
http://mona.h.fc2.com/hankaku07.html
http://mona.h.fc2.com/hankaku01.html
http://mona.h.fc2.com/hankaku05.html
http://mona.h.fc2.com/hankaku11.html
http://mona.h.fc2.com/hankaku04.html
0144_
03/09/27 03:45ID:???（ ・∀・）/＜ こんなの有ったっち♪
http://mona.h.fc2.com/hankaku05.html
http://mona.h.fc2.com/hankaku08.html
http://mona.h.fc2.com/hankaku10.html
http://mona.h.fc2.com/hankaku02.html
http://mona.h.fc2.com/hankaku03.html
http://mona.h.fc2.com/hankaku07.html
http://mona.h.fc2.com/hankaku11.html
http://mona.h.fc2.com/hankaku06.html
http://mona.h.fc2.com/hankaku04.html
http://mona.h.fc2.com/hankaku09.html
0145_
03/09/27 03:48ID:???http://mona.h.fc2.com/jaz03.html
http://mona.h.fc2.com/jaz11.html
http://mona.h.fc2.com/jaz02.html
http://mona.h.fc2.com/jaz08.html
http://mona.h.fc2.com/jaz09.html
http://mona.h.fc2.com/jaz05.html
http://mona.h.fc2.com/jaz06.html
http://mona.h.fc2.com/jaz01.html
http://mona.h.fc2.com/jaz10.html
http://mona.h.fc2.com/jaz07.html
http://mona.h.fc2.com/jaz04.html
0146_
03/09/27 03:48ID:???川o・-・）ノ ＜先生！こんなのがありました！
http://mona.h.fc2.com/jaz07.html
http://mona.h.fc2.com/jaz08.html
http://mona.h.fc2.com/jaz10.html
http://mona.h.fc2.com/jaz07.html
http://mona.h.fc2.com/jaz03.html
http://mona.h.fc2.com/jaz05.html
http://mona.h.fc2.com/jaz01.html
http://mona.h.fc2.com/jaz06.html
http://mona.h.fc2.com/jaz04.html
http://mona.h.fc2.com/jaz09.html
0147_
03/09/27 03:54ID:???|:￣＼(∩´∀｀) ＼ ＜先生！こんなのがありました！
|:在 |:￣￣ U￣:| http://mona.h.fc2.com/hankaku10.html
http://mona.h.fc2.com/hankaku02.html
http://mona.h.fc2.com/hankaku08.html
http://mona.h.fc2.com/hankaku11.html
http://mona.h.fc2.com/hankaku07.html
http://mona.h.fc2.com/hankaku03.html
http://mona.h.fc2.com/hankaku05.html
http://mona.h.fc2.com/hankaku01.html
http://mona.h.fc2.com/hankaku06.html
http://mona.h.fc2.com/hankaku04.html
http://mona.h.fc2.com/hankaku09.html
0148_
03/09/27 03:54ID:???! i iﾉﾉﾘ）) 〉
i l l.´ヮ｀ﾉﾘ ＜先生！こんなのがありました！
l く/_只ヽ http://mona.h.fc2.com/hankaku07.html
http://mona.h.fc2.com/hankaku05.html
http://mona.h.fc2.com/hankaku08.html
http://mona.h.fc2.com/hankaku10.html
http://mona.h.fc2.com/hankaku02.html
http://mona.h.fc2.com/hankaku03.html
http://mona.h.fc2.com/hankaku11.html
http://mona.h.fc2.com/hankaku01.html
http://mona.h.fc2.com/hankaku06.html
http://mona.h.fc2.com/hankaku04.html
http://mona.h.fc2.com/hankaku09.html
0149_
03/09/27 03:58ID:???（ ・∀・）/＜ こんなのみつけたっち♪
http://mona.h.fc2.com/jaz05.html
http://mona.h.fc2.com/jaz08.html
http://mona.h.fc2.com/jaz10.html
http://mona.h.fc2.com/jaz02.html
http://mona.h.fc2.com/jaz03.html
http://mona.h.fc2.com/jaz07.html
http://mona.h.fc2.com/jaz01.html
http://mona.h.fc2.com/jaz06.html
http://mona.h.fc2.com/jaz04.html
http://mona.h.fc2.com/jaz09.html
0150_
03/09/27 03:58ID:???! i iﾉﾉﾘ）) 〉
i l l.´ヮ｀ﾉﾘ ＜先生！こんなのがありました！
l く/_只ヽ http://mona.h.fc2.com/jaz07.html
http://mona.h.fc2.com/jaz05.html
http://mona.h.fc2.com/jaz08.html
http://mona.h.fc2.com/jaz10.html
http://mona.h.fc2.com/jaz02.html
http://mona.h.fc2.com/jaz03.html
http://mona.h.fc2.com/jaz11.html
http://mona.h.fc2.com/jaz01.html
http://mona.h.fc2.com/jaz06.html
http://mona.h.fc2.com/jaz04.html
http://mona.h.fc2.com/jaz09.html
0151nobodyさん
03/09/27 06:20ID:???※答えてくれないからといって逆ギレする厨はお断り
ここに質問もってくる奴って、なんでこんなに>>1を読まないのかね。
書き込む前に>>1を確認するってのは、>>142の「2chの常識」とやらには入ってないのかなあ。
他人がどう思ってるかを無視して、俺様脳内設定で生きてる奴は楽だろうな。
そいつ自身は楽だろうけど、周囲に害毒を撒き散らすから、近寄って欲しくはないけどな。
# 厨房は嫌いだ。理屈が通じないから。ゴネれば要求がとおると思ってるなら、
# 893か北の将軍様と同類だよ。
# それに理屈が通じないってことは、およそプログラマーには向かないってことだしな。
0152nobodyさん
03/09/27 07:38ID:efY9iLPN依頼の前提条件として自分でちったぁ考える事なんて
一言も書いてない。
0153152
03/09/27 07:40ID:???0156nobodyさん
03/09/27 17:00ID:U5pwYI9o>>1より
「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら
ここで聞いてください。
つまり、スクリプトの改造を「したけど」やり方がわからない人ではなく、
スクリプトの改造を「したいけど」やり方がわからない人。
日本語理解できる？
あんたらは過去のスレの常識を持ち込もうとしてるだけ
0157nobodyさん
03/09/27 17:16ID:???どうでもいいよ、そんなの
「したいけど」やり方がわからないで書くなら書けばいい
どのように相手にするかはこっちの勝手
「したけど」やり方がわからないっていうなら
努力の跡によっては手伝おうかという気にもなる
改造したいやつは好きなほう選べや
0158nobodyさん
03/09/27 17:21ID:???その繰り返しにうんざりなのかも
0159nobodyさん
03/09/27 17:34ID:???改造に関する質問に応じないCGI作者はある意味賢いのかも
0160nobodyさん
03/09/27 18:14ID:???0162nobodyさん
03/09/27 19:14ID:???よく感じるのはファイルの開け閉めをまったく理解してない香具師が多いってこと。
初心者に教えるのはいいんだが、
最低限のラインってのもあるだろ？
ま、俺もようやく初心者から中級者に入りかけたかな？程度なわけだが・・・。
0163nobodyさん
03/09/27 19:18ID:???PerlもPHPもRubyもそりゃあ無料だ。開発者の厚意により、だが。
フリーのスクリプトだって、そりゃあ無料だ。これも、作成者の厚意だ。
だけど、本来それらは、正当な対価を要求してもおかしくないはずのものだ。
このことを理解してない奴が多いんじゃないだろうか。
で、そういう奴ほど簡単に他人に改造を丸投げするような気がする。
「タダのものなんだから、改造だってタダだろう？」
こんな論理で。なんでタダなのか理由を考えようともしない。
そういう論理で動く奴は、改造できる技量を持った人間からは、
ただの寄生虫にしか見えないだろうよ。
0164nobodyさん
03/09/27 19:29ID:???お前が去った方がきっと平和になるさ。
最低限の知識を持たない人間は、
Webプログラマ斡旋スレでも立てて、そっちに回したいね。
知恵がないなら金を出せってね。
次スレ立てるときは、>>1のテンプレにはなんか修正が必要なんじゃないか？
0165nobodyさん
03/09/27 20:35ID:???0166nobodyさん
03/09/27 20:52ID:U5pwYI9oスクリプトいや、JavaスクリプトとCGI(Perl)に絞ってでもイイんだが
改造できそうなﾔｼはコテ半にトリップつけてみん
陰でｺｿｺｿ煽るﾔｼはスルーできるように
0167nobodyさん
03/09/27 20:58ID:???JavaScriptはさすがにどうかと思うぞ。
クライアントサイドとサーバーサイドの区別がつかないと、
最低限のラインをクリアーしてるとは言いがたいだろうよ。
0168nobodyさん
03/09/28 00:34ID:???0169nobodyさん
03/09/28 05:22ID:HCEF79ZI0170nobodyさん
03/09/28 09:00ID:CAMT3ypwttp://www.fromdfj.net/javascript/typewriter.html
ここのタイプライター表示に
ttp://gang.jp/~supoka/1/type.html
こっちのBackSpace的な表現を付け加えたいのですがよろしくお願いします
0171nobodyさん
03/09/28 09:19ID:y/PDZM4hJAVAとJavaScriptは全く別物。
JavaScriptの質問はWwb製作板の管轄。
+ JavaScript の質問用スレッド vol.22 +
http://pc2.2ch.net/test/read.cgi/hp/1062943541/
0173nobodyさん
03/09/28 16:54ID:???0174nobodyさん
03/09/29 13:07ID:???今現在、こちらのサイトの（ttp://www.senobeya.com/ff/index.html）
これを（ttp://www.senobeya.com/ff/gmember05.lzh）
このスペースで（http://fh.aaacafe.ne.jp/）使用しております。
このＣＧＩでは日記が使えるようになっていて、その日記書き込み時に
HTMLタグが使えるようにしたいのですがPerl知識がないものですから
皆様の知識を借りたいと思い、こちらに伺いました。
※配布サイト様の方では改造を許可されています。
申し訳ないですが皆様の知恵をお貸しください、お願いします。
0175１７４
03/09/29 13:08ID:???すいません、サイトのスペースレンタルのURLを直リンクにしたままでした（禿汗
こちらでお願いします（ttp://fh.aaacafe.ne.jp/）
0177nobodyさん
03/09/29 14:33ID:???まぁまぁ
>>174
基本的にタグを有効にする、というのは
わざとTAGを無効にしているものを外す
ということになるんで、該当行を探して
つぶすだけでいい
第3者まで自由にするとむちゃくちゃになるので
普通は一部のタグ以外はつぶす、という操作になるんだけど
自分しか書き込まない等、書く人の身元がはっきりしてるなら
そのまま通すという手もある
で、今回のソース
=~ s/</</g;
=~ s/>/>/g;
こういう行が何ヶ所かあるので、コメントにして実行したりして試してみて
0178nobodyさん
03/09/29 14:35ID:???↓に訂正
=~ s/</</g;
=~ s/>/>/g;
0179１７４
03/09/29 14:51ID:???レス感謝です！
=~ s/</</g;
=~ s/>/>/g;
上記を検索して.cgiのメモから全て消してみます（メモ付きで）
いくつか見つかったので恐々とやってみます。
この日記はその登録されたメンバが各個人で持てるので第三者は
書き込みしない予定です。
あれ、消さない方がいいかもですね（戻せなくなったら怖ひ）
・・・ちょっと頭に###して無効にしてみます！（って、頭に#とか付けると無効に
なるんですよね？？###=~ s/</</g; こんな風で）
0180１７４
03/09/29 14:52ID:???=~ s/</</g;
=~ s/>/>/g;
やってみます！
0181１７４
03/09/29 14:53ID:???&認識するってこういう意味だったんですね（滝汗
ってことで>178のでやってみます
0182nobodyさん
03/09/29 15:29ID:???そういう積み重ねが大事なんだぞ。
0183１７４
03/09/29 16:29ID:???本当にありがとうございました。
0184sirius
03/09/29 17:13ID:6z0CkwS7データベースの登録情報として、｢香川支社｣、｢高知支社｣という情報が
あるのですが、両者を登録しようとすると、重複エラーが出てしまいます。
日本MySQLユーザ会のMLの過去ログを見たところ、｢香川県｣と｢高知県｣で
同じように悩んでいた方がいまして、｢香｣、｢高｣の文字コードが近いことが
原因であることがわかりました。
解決策として、/etc/my.cnfに、
[mysqld]
default-character-set=ujis
と記述するとあったのですが、この記述を追加するとMysqlサーバが起動しなく
なってしまいます。現在、my.cnfには、
datadir=/db_data/mysql
の記述しか書いていないのですが、どこか不都合があるのでしょうか？
どなたかご教授お願いします。
0187pino
03/09/30 00:04ID:4fn10Qi/T-Noteっていうシンプルな掲示板が気に入っておりまして、これを使おうと思っています。
ただ、この掲示板はレスがついてもそのままなので、レスがついたら先頭へ表示されるように改造したいのですが、よくわからなくて困っています。
unshiftを使えばイイのはわかってますが、どこに入れたらよいのか・・・。
すみませんが、どなたかご教授願います。
T-note掲示板 http://www.mytools.net/cgitools/note4.html
掲示板のスクリプト http://www.mytools.net/cgi/filesafe/tfsafe.cgi/source/note400/tnote-cgi.txt
0188nobodyさん
03/09/30 02:10ID:tX8JF4oWココで聞いても無駄だから
諦めた方がイイよ
0189nobodyさん
03/09/30 10:34ID:???ざっとみたけど、、
レスがつくと動作する関数 add_newreply
データ格納変数 $datas
で、add_newreply の中に下の行がある
if($datas[$_] =~ /^$repid\t(.+)\t/){
ここでレスを追加しているので、このスレ番号、$_ を記憶させていおいて
ループを抜けたら、$datas[スレ番号] を$datasにpushして$datas[スレ番号]をdelete
してみたらどうだろう。
0190189
03/09/30 10:45ID:???0191nobodyさん
03/09/30 12:29ID:???0192pino
03/09/30 15:30ID:4fn10Qi/実は私、ここに書き込みを躊躇するほどの初心者レベルの者でして、
悲しいかな189さんのレス内容をすぐに解釈できませんでした。
これから本を片手に189さんのレス内容を試してみます。
ほんとにありがとうございます。（笑）
0193nobodyさん
03/09/30 16:50ID:???ここで配布されている簡易データベースのスクリプトに関する質問です。
このままですと、検索語の大文字と小文字が区別されてしまうのですが
区別なく検索できるようにしたいです。
検索部分だけUPしてみました
http://up.isp.2ch.net/up/4c8b0822fd82.txt
自分なりに調べてみて、$swords の後に /iをつければいいのかな、と思ったんですが
どこにつけていいのかわかりません
わかる方がいらっしゃいましたら、よろしくお願いします
0194nobodyさん
03/09/30 16:58ID:???検索部分というのをちょっと見ただけだが、、、iをつけるのは
/$switem/i
こっちでない？
ぱっと見なので違ったらスマソ
0195nobodyさん
03/09/30 17:25ID:???さっそくのレスありがとうございました！
そしておっしゃる通り指定してみたところちゃんとできました！
うれしい！！！！個人的に神認定です！！
ほんとにほんとにありがとうございました！！！！！！！
0196nobodyさん
03/09/30 17:48ID:???019725
03/09/30 23:34ID:???0201nobodyさん
03/10/02 12:50ID:???せめて出来上がり予定のHTMLが吐けるくらいまでは
やってくれないと（form部分とかdummyでの画像表示）
これとこれくっつけてね！だけじゃいくらなんでも・・・
0202nobodyさん
03/10/02 23:33ID:tbcivdX5ですが、最近荒らしに遭い、ホスト名も分かっているので書き込み制限および
連続投稿をできなくするようにしたいと考えています。
書き込み制限のできるいろいろなCGIを見て、自分で改造してみようとして
みたのですが、力尽きました・・・。
分かる方がいらっしゃいましたら、ご教授のほど、何卒よろしくお願いします。
0204nobodyさん
03/10/03 04:06ID:???なじぇ放置されるのかとゆーと、>1を読んでないからだと思うな。
個人的には、
> 自分で改造してみようとしてみたのですが、力尽きました・・・。
どんな道を歩んできたのか知りたいな。
0205nobodyさん
03/10/03 06:52ID:???http://www.interq.or.jp/mouse/hexa/sendmail.txt
こちらのメールフォームを使っています。
掲示板でも既出の話題なのですが、送ったメールの本文、メールアドレス、URLが文字化けします。
(掲示板に解決策は不出)
件名と名前は正常に表示されるというのが不思議です。
sendmailの文字化けに関するページは一通り読みましたが、
見てみるとどれもちゃんと対策されているようで、お手上げ状態です。
もし原因がおわかりの方がいらっしゃいましたらどうぞよろしくお願いします。
0208nobodyさん
03/10/03 08:21ID:???0209nobodyさん
03/10/03 08:24ID:???件名と名前はＭＩＭＥエンコードしてるからでしょ
どう化けるのかわかればすぐ対策できると思うけどな
あ、Perlのバージョンによって挙動がかわる？
0210nobodyさん
03/10/03 08:51ID:???えーと、
てすと→%82%c4%82%b7%82%c6
@→%40
という風に文字化けしています。
他の項目もjcode.plでエンコードしてるのだと思ってましたが、違うのでしょうか…？
Perlのバージョンは5ですが、レンタル鯖なので他のバージョンを試すことは出来そうにもないです。
勉強不足過ぎなので何か見当違いのこと言ってたら申し訳ないです
0212202
03/10/03 20:49ID:???いろんな意味で放置が良しとされる前に、txt置いておきます。
>>204
自分が探した書き込み制限のできるいろいろなCGIは、新たに外部のCGIを
読みに行くものが多く、分かりにくくなるので、ひとつのCGIにまとめた
ものが欲しかったのです。
探していくうちに http://www.geocities.co.jp/Hollywood-Cinema/6860/yk-yybbs.txt
を見つけまして、
「投稿内容に関わらず連続投稿を指定秒数内は拒否する設定」と
「指定ホストキック」を上手く組み込めないものかと思った次第であります。
今日一日頑張ってみましたが、エラーばかりが出て、お手上げです。
どうかご教授のほど、よろしくお願いします。長文ｽﾏｿ。
ShortMessage http://www.geocities.co.jp/Hollywood-Cinema/6860/index.txt
0213205
03/10/04 01:37ID:???教えて頂いた通り「URLエンコード」でぐぐって、
$maildat =~ tr/+/ /;
$maildat =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
の2文を加えてみたところ、ちゃんと日本語にデコードされるようになりました。
困っていたので、本当に助かりました。
どうもありがとうございました。
0214nobodyさん
03/10/04 05:55ID:???204が知りたかったのは、
>>212が弄って鰓ーばかり出したスクリプトが見たいといったつもりだったんだが。。。
あの文章じゃ伝わらなかったか。。。(反省
改造出来たよ。
でも、>1 の(3)にもあるように、「少しも自分で考えない人には教えてはいけない」という暗黙の掟がこのスレにはあるようなので、
「少しは自分で考えたんだ」という証明をして欲しい。
具体的にいうと、鰓ーを出しまくった君のスクリプトが見たい！
それと重要な事だが、
yk-bbsには、「指定ホストキック」があるように見えるが、実装はしていない。
0215214
03/10/04 05:56ID:???0216202
03/10/04 08:50ID:???文章的には伝わっていましたが、改造初心者で簡単な切り張り程度しか出来ない
もので、スクリプトを出すのが恥ずかしかったのです。申し訳ありません・・・。
自分なりに、この辺にコレがいるのかな、ということを考えて改造したものを置いていきます。
このままではエラーが出ますが、コレが限界でした。
あとはどうしていいものか分かりません。
ホストキックがないことは、投稿した後気づきました（汗。
なぜないものをつけているんだろう･･･。
よろしくお願いします。
http://www.geocities.co.jp/Hollywood-Cinema/6860/index2.txt
0217nobodyさん
03/10/04 09:11ID:???なんだ？ダブルポストも対策して欲しかったの？
言ってくれなきゃ。。。
その１
###################################
# --- 投稿内容に関わらず連続投稿を指定秒数内は拒否する設定
# 制限する秒数（単位：秒）
$rtimer = 20;
# 上記調整用（上記$rtimerが60秒の場合は下記のまま、120秒以上は+80、という感じで60秒ごとに+40加算）
$timer = $rtimer + 40;
###################################
# --- 指定ホストキック。 以下のホストからアクセスしても掲示板は表示されません。
# 設定する場合は、以下を $kick_f = 1; とした上で、下のホスト名に記入してください。
$kick_f = 1;
# ホスト名を'で囲み、,で区切って複数指定可能。IPアドレスの場合は先頭の２つが適当？
# "*"は任意文字列。
# 設定例：@kick =('biglobe.be.jp','*web.ne.jp','202.124.','abc.*');
@kick = ('cache*.*.interlog.com','anonymizer','196.168.*.*');
0218nobodyさん
03/10/04 09:14ID:???sub dec_check{
# 追加ここから
if ($kick_f == 1) {
$host = $ENV{'REMOTE_HOST'};
$addr = $ENV{'REMOTE_ADDR'};
if ($host eq "" || $host eq "$addr"){$host = gethostbyaddr(pack("C4",split(/\./,$addr)),2);}
if ($host eq ""){$host = $addr;}
foreach (@kick) {
if (!$_){next;}
$_ =~ s/\*/\.\*/g;
if ($host =~ /$_/) {&error("アクセス禁止<br>ホスト名$hostは管理人によってアクセスを制限されています。");}
}
}
# 追加ここまで
if ($name eq "" or $comment eq "") { &shortmessage; }
0219nobodyさん
03/10/04 09:17ID:???その３
sub write_log {
&lock;
open(IN,"$logfile") || &error("$logfile が読み込めません。");
@readed = <IN>;
close(IN);
($tmp,$chk1,$chk2)=split(/\t/,$readed[0]);
if($name eq $chk1 and $comment eq $chk2) {
if(-e $lockfile){ unlink($lockfile); }
&shortmessage;
}
# 追加ここから
if (($dateid > $tmp) && ($dateid - $tmp < $timer) ) {
if(-e $lockfile){ unlink($lockfile); }
&error("少しお待ち下さい。悪戯対策のため$rtimer秒以内の連続投稿はできなくなっています。");
}
# 追加ここまで
0221202
03/10/05 06:09ID:???ありがとうございます！
スクリプトを見比べて、とても勉強になりました。
自分が持っているものに「sub write_log」がないぞ？と思っていたら
ShortMessageのバージョンがアップされていたのですね･･･。（遠い目
txtで上げた旧版をレイアウトを変えて使っているので、217様のスクリプトを
見ながら改造していきたいと思います。
（sub kakikomi 以下に追加していけばいいのですよね？）
ダブルポストはあれば嬉しいですが、ここまで考えていただけただけで十分です。
本当にありがとうございます。感謝多謝。
0222nobodyさん
03/10/05 07:19ID:???旧版か。。。
漏れはまだまだ初心者だから、スクリプトを見ただけでは改造できないんで、ＤＬして動かしながら改造してたんでな。
旧版スク見たんだが、217-219じゃ動かねーからな。
特に連投拒否が。
旧版のログフォーマットにカキコの時間の項目がないんでな。
そのへんちょっと改めてみた。
0223nobodyさん
03/10/05 07:20ID:???# --- ダブルポスト（同一内容連続投稿＆リロード）対策。何件前までチェックするか
$check = 5;
# 投稿内容の一部分を変えての連続投稿対策（例：...第１回目、...第２回目..）
# 投稿内容の先頭から指定した文字数の範囲内で同一内容か判断する（単位＝バイト）
$checklength = 50;
###################################
# --- 投稿内容に関わらず連続投稿を指定秒数内は拒否する設定
# 制限する秒数（単位：秒）
$rtimer = 20;
# 上記調整用（上記$rtimerが60秒の場合は下記のまま、120秒以上は+80、という感じで60秒ごとに+40加算）
$timer = $rtimer + 40;
###################################
# --- 指定ホストキック。 以下のホストからアクセスしても掲示板は表示されません。
# 設定する場合は、以下を $kick_f = 1; とした上で、下のホスト名に記入してください。
$kick_f = 1;
# ホスト名を'で囲み、,で区切って複数指定可能。IPアドレスの場合は先頭の２つが適当？
# "*"は任意文字列。
# 設定例：@kick =('biglobe.be.jp','*web.ne.jp','202.124.','abc.*');
@kick = ('cache*.*.interlog.com','anonymizer','192.168.*.*');
0224nobodyさん
03/10/05 07:21ID:???sub dec_check{
# 追加ここから
if ($kick_f == 1) {
$host = $ENV{'REMOTE_HOST'};
$addr = $ENV{'REMOTE_ADDR'};
if ($host eq "" || $host eq "$addr"){$host = gethostbyaddr(pack("C4",split(/\./,$addr)),2);}
if ($host eq ""){$host = $addr;}
foreach (@kick) {
if (!$_){next;}
$_ =~ s/\*/\.\*/g;
if ($host =~ /$_/) {&error("アクセス禁止<br>ホスト名$hostは管理人によってアクセスを制限されています。");}
}
}
# 追加ここまで
local($chk1,$chk2);
0225nobodyさん
03/10/05 07:23ID:???sub kakikomi {
&lock;
open(IN,"$logfile");
@readed = <IN>;
close(IN);
# 追加ここから
$dateid = time;
@Stat = stat("$logfile");
$i = 0;
while ($i < $check) {
($chk1,$chk2)=split(/\t/,$readed[$i]);
if (($dateid > $Stat[9]) && ($dateid - $Stat[9] < $timer) and $i == 0) {
if(-e $lockfile){ unlink($lockfile); }
&error("少しお待ち下さい。悪戯対策のため$rtimer秒以内の連続投稿はできなくなっています。");
}
if ($name eq $chk1 and substr($comment,0,$checklength) eq substr($chk2,0,$checklength) ) {
if(-e $lockfile){ unlink($lockfile); }
&error("二重投稿です。その内容はすでに投稿済みです。");
}
$i++;
}
# 追加ここまで
while ($logmax <= @readed) { pop(@readed); }
0226nobodyさん
03/10/05 07:26ID:???その４
sub error{
print "Content-type: text/html\n\n";
print "<center>";
print $_[0];
print "<hr>";
print "<a href=javascript:history.go(-1)>戻る</a>";
print "</center>";
exit;
}
これをスクリプトの一番下に追加しる。
エラー表示をさせずにスルーするなら、
その２、その３の
&error("エラーメッセージ");
を
&shortmessage;
に置き換えてな。
0227nobodyさん
03/10/06 00:32ID:???いくつかのスコアを足すやり方がわからなくて困ってる者です。
一応自分でも試行錯誤してみましたが流用させてもらってるだけなので知識が殆どなくてなかなか難しいです・・・
スコアはhttp://mrnonq.hp.infoseek.co.jp/regist.txtで登録してもらって
閲覧場所はhttp://mrnonq.hp.infoseek.co.jp/view.txtで処理されてると思います。
スコアデータはhttp://mrnonq.hp.infoseek.co.jp/list8th.txt内にあります。
どうぞよろしくお願いします。
0229未承諾広告※ ◆aiY4htt2.2
03/10/06 12:47ID:???逝ってよしなのだろうか？
HTML はページレイアウトするためのものぢゃないはずなのに。。。＿|￣|○
0232227
03/10/06 16:31ID:???5曲分のスコアの合計を表示したいんです。
http://nonq.s3.xrea.com/9thhol/hol/view.cgi?from=0&6325
↑のようなのが１曲分で、それと同じように５曲分の
Notes,Score,Great,Good,Bad,Poor全部が勝手に足されるようにしたいんです。
reg.cgiはhttp://mrnonq.hp.infoseek.co.jp/reg.txtです。
0233未承諾広告※ ◆aiY4htt2.2
03/10/06 18:25ID:???&drawresult;
のところを、
foreach (reverse(@new)){
いろいろ足し算。
&drawresult;
}
みたいにしたところで変数名はワケワカメだし、データ構造がへんてこりんだし、 sub drawresult() で、
未知の &header("Registered"); と &footer; はあるし・・・（おそらく ./lib.pl にあるんだろうけど）
胃が痛くなる悪寒がしたのでわたしゃパスm(_ _)m
0234227
03/10/07 22:57ID:???0235名無しさん
03/10/07 23:48ID:???0236nobodyさん
03/10/08 00:19ID:???じぶんとこで設置して動かしてみることが多いんだけど
>>227のはファイルが足りなくて動かせないから
検証もできないのでやるきがおきないのよ
■ このスレッドは過去ログ倉庫に格納されています