トップ差分一覧ソース検索ヘルプ PDF RSS ログイン

同一ＰＣ警告

青色は、改造箇所を示します。ファイル名：　ルーチン名：　行番号　を示します。
黒色文字は、「改造前の状態」を示します。
テキストボックスの中のプログラムを、該当の場所に上書きして下さい。

同一ＰＣ警告 Ver 1.00 ★☆☆☆☆☆☆☆

同一ＰＣからの複数キャラ使用を監視し、エラーログを記録します。
※ クッキーを元に判断するので、クッキーオフの場合検知しません。
※この改造は、セキュリティ上の理由により改造者表示を行いません。

履歴
2007/03/04　Wikiにて公開　　　　　　
2003/08/06　Version 1.00　公開

共通改造ポイント

TOP ↑ ↓

◆改造ポイント０１エラーログを記録するファイルを設定します。

TOP ↑ ↓

sos2.cgi # ---------- USER DIRECTORY Line:34
perl/filepath.cgi # ---------- USER DIRECTORY Line:19
$usrdir = 'userdata/'; # ユーザデータを格納するフォルダ
$usrdir = 'userdata/'; # ユーザデータを格納するフォルダ #-ADD $error = 'error.log'; # 同一ＰＣ複数キャラ警告を送るファイル #-END of ADD-SOSWiki0020v1.00-1-1/3
※ error.log の部分は任意のファイル名にします。
※ userdata/0000.dat とすれば、ＩＤ：0000 のマイレコードに記録されます。
※ 時々ログ整理を行わないとファイルサイズが無限に膨らみます。
新規ファイルにエラーログを記録する際は、事前にそのファイルを作成して下さい。
（空のファイルでＯＫ。）パーミッションは（666|606）

◆改造ポイント０２エラーを感知し、記録する部分を作ります。

TOP ↑ ↓

sos2.cgi # Sub Make New # Line:523
perl/option.cgi # Sub Make New # Line:143
chmod(0666,"$usrdir$id\.dat");
chmod(0666,"$usrdir$id\.dat"); #-ADD- &cookie_get; if ($c_id && $c_id ne $id && $ps ne $admpas) { @errorline = &opendat("$error"); push (@errorline,"$c_id\t$c_name\t$c_pass\t$id\t$Fm{'name'}\t$Fm{'pass'}\n"); &writedat($error,@errorline); } #-END of ADD- SION0020v1.00-2-3/3

sos2.cgi # Sub Make Continue # Line:548
perl/option.cgi # Sub Make Continue # Line:168
$fg = ''; &userout;
$fg = ''; &userout; #-ADD- &cookie_get; if ($c_id && $c_id ne $id && $ps ne $admpas) { @errorline = &opendat("$error"); push (@errorline,"$c_id\t$c_name\t$c_pass\t$id\t$nm\t$ps\n"); &writedat($error,@errorline); } #-END of ADD- SAIL0020v1.00-2-2/3

同一ＰＣ警告