haneやらkageやらdameやら
teletypeやらpreやらnukeanasanやら
おみくじやら何やらの機能を付けたりして改造するスレです。
ぜろちゃんねるろだ
http://zeroch.ps.land.to/
imodeidはリクエストヘッダにあるからそれを取得してる
>>20を見ればわかると思うのだが
utnをつけてるのは元のソースに追加しただけだから。
あ〜調べてみたらそうみたいだ。
拡張ヘッダの方にあるIDはGETパラメータにguid=ONつければ取得可能になってるのか今は。
20の改造でログに記載されるHOSTが
auは「xxxxxxxxxxxxxx_mb.ezweb.ne.jp」だけど
ドコモは「xxxxxxx」と7桁のimodeIDしか取得していないのからそれがID生成に支障をきたしてるんじゃない？
実際ドコモはID固定されているし。
ttp://www.nttdocomo.co.jp/service/imode/make/content/ip/index.html#imodeid
に
＞利用時の注意点
＞
＞ * 注意ユーザのiモードID利用設定がOFFの場合にはiモードIDの拡張ヘッダは付与されません。
って記述あるから確認したほうがいいかも
>>37
送信しなかったらエラーが出るようになってるのもソースを見ればわかると思うんだけど
今確認したらそうなってたわｽﾏｿ。
＞my $product = GetProductInfo($Sys->{'CONV'},$ENV{'HTTP_USER_AGENT'});
＞if($product eq undef){
＞ return 950;
＞}
ここか。
auの間違いだった。
>>38
管轄は知ってるけどIDに関する改造なんて21が貼ってる
http://0ch.mine.nu/test/read.cgi/jikken/1046702960/637-639
くらいしかないと思うが。
ていうかどこからID固定の改造の話が出てきたのかがわからない。
シリアルの一部を抜き出してそれを$hostに入れるって感じで出来るかな
galadriel.plのMakeIDのところを変える
sub MakeID
{
my $this = shift;
my ($server,$column,$hosts) = @_;
my @times = localtime(time());
my (@nums,$ret,$host,$str,$capID);
# 種の生成
#ezweb端末番号から
if($hosts =~ /\.ezweb\.ne\.jp/){
$host = $ENV{'HTTP_X_UP_SUBNO'}
$host = substr($host , 3 , 4) #上から三つ目から四桁抽出
}
#iモードIDから
elsif($hosts =~ /\.docomo\.ne\.jp/){
$host = $ENV{'HTTP_X_DCMGUID'};
$host = substr($host, 0 , 3) #上から三つ取得
}
#端末シリアル番号から
elsif($hosts =~ /\.jp-.\.ne.jp/){
$agent = $ENV{'HTTP_USER_AGENT'};
$agent =~ /SN([A-Za-z0-9]｛5｝)(\1+)/; #上から五桁取得
$host = $1;
}
#どれでもなかったときIPから
else{
@nums = split(/\./,$ENV{'REMOTE_ADDR'}); # ez番号を分解
$host = substr($nums[3],-3) . substr($nums[2],-1) . substr($nums[1],-1); # 上位3つの1桁目取得;
}
$str = $host . substr(crypt($server,$times[4]),-5); # server名結合
$column = -1 * $column;
# IDの生成
$ret = substr(crypt(crypt($str,$times[5]),$times[3]+31),$column);
$ret =~ s/\./+/g;
return $ret;
}
vara.plの135行目あたり
$id = $oConv->MakeID($oSys->Get('SERVER'),8,$oForm->Get('HOST'));
に変更
galadriel.plにMakeID部分の書換えをすると、500 Internal Server Errorでぜろちゃんねる管理にログイン出来なくなります
#馬鹿なミスしてしまった
sub MakeID
{
my$this = shift;
my($server,$column,$hosts) = @_;
my@times = localtime(time());
my(@nums,$ret,$host,$str,$capID);
# 種の生成
#ezweb端末番号から
if($hosts =~ /\.ezweb\.ne\.jp/){
$host = $ENV{'HTTP_X_UP_SUBNO'};
$host = substr($host , 3 , 4);#上から三つ目から四桁抽出
}
#iモードIDから
elsif($hosts =~ /\.docomo\.ne\.jp/){
$host = $ENV{'HTTP_X_DCMGUID'};
$host = substr($host, 0 , 3);#上から三つ取得
}
#端末シリアル番号から
elsif($hosts =~ /\.jp-.\.ne.jp/){
$agent = $ENV{'HTTP_USER_AGENT'};
$agent =~ /SN([A-Za-z0-9]｛5｝)(\1+)/;#上から五桁取得
$host = $1;
}
#どれでもなかったときIPから
else{
@nums= split(/\./,$ENV{'REMOTE_ADDR'});# ez番号を分解
$host= substr($nums[3],-3) . substr($nums[2],-1) . substr($nums[1],-1);# 上位3つの1桁目取得
}
$str= $host . substr(crypt($server,$times[4]),-5);# server名結合
$column= -1 * $column;
# IDの生成
$ret= substr(crypt(crypt($str,$times[5]),$times[3]+31),$column);
$ret=~ s/\./+/g;
return $ret;
}
vara.plの135行目あたり
$id= $oConv->MakeID($oSys->Get('SERVER'),8,$oForm->Get('HOST'));
に変更
サブスクライバIDって呼んでほしかったの？
どうでもいい
まあ
／）
／／／）
／,.=ﾞ''"／
／ i f ,.r='"-‐'つ＿＿＿_ こまけぇこたぁいいんだよ！！
/ / _,.-‐'~／⌒ ⌒＼
／ ,i ,二ﾆ⊃（ ●）. （●）＼
/ ﾉ ilﾞフ::::::⌒（__人__）⌒::::: ＼
,ｲ｢ﾄ､ ,!,!| |r┬-| |
/ iﾄヾヽ_/ｨ"＼ `ー'´ ／
とりあえずezwebについてはID固定を確認出来ました
docomoは利用者が全然来てくれないので未確認
docomoはID固定ならずでしたよ
アホすぎるだろ俺
sub MakeID
{
my$this = shift;
my($server,$column) = @_;
my@times = localtime(time());
my(@nums,$ret,$host,$str,$capID);
my$IP = $ENV{'REMOTE_ADDR'};
my$hosts = gethostbyaddr(pack('c4',split(/\./, $IP)), 2) || $IP;
# 種の生成
#ez番号から
if($hosts =~ /\.ezweb\.ne\.jp$/){
$host = $ENV{'HTTP_X_UP_SUBNO'};
$host = substr($host , 3 , 4);#上から三つ目から四桁抽出
}
#iモードIDから
elsif($hosts =~ /\.docomo\.ne\.jp$/){
$host = $ENV{'HTTP_X_DCMGUID'};
$host = substr($host, 0 , 3);#上から三つ取得
}
#softbank端末シリアル番号から
elsif($hosts =~ /\.jp-.\.ne.jp$/){
$agent = $ENV{'HTTP_USER_AGENT'};
$agent =~ /SN([A-Za-z0-9]｛5｝)(\1+)/;#上から五桁取得
$host = $1;
}
#どれでもなかったときIPから
else{
@nums= split(/\./,$ENV{'REMOTE_ADDR'});# ip番号を分解
$host= substr($nums[3],-3) . substr($nums[2],-1) . substr($nums[1],-1);# 上位3つの1桁目取得
}
$str= $host . substr(crypt($server,$times[4]),-5);# server名結合
$column= -1 * $column;
# IDの生成
$ret= substr(crypt(crypt($str,$times[5]),$times[3]+31),$column);
$ret=~ s/\./+/g;
return $ret;
}
vara.plの135行目あたり
$id= $oConv->MakeID($oSys->Get('SERVER'),8);
に戻して
変更いらない
てす1
名前：名無しさん[] 投稿日：2009/05/14(木) 17:23:07 ID:+yNQ/sn2O
てす2
やっぱダメぽいですね
ログに記録されるホストはどうなってる？
sub MakeID
{
my$this = shift;
my($server,$column,$hosts) = @_;
my@times = localtime(time());
my(@nums,$ret,$host,$str,$capID);
# 種の生成
#ez番号から
if($hosts =~ /\.ezweb\.ne\.jp/){
$host = $ENV{'HTTP_X_UP_SUBNO'};
$host = substr($host , 3 , 4);#上から三つ目から四桁抽出
}
#iモードIDから
elsif($hosts =~ /\.docomo\.ne\.jp/){
$host = $ENV{'HTTP_X_DCMGUID'};
$host = substr($host, 0 , 3);#上から三つ取得
}
#softbank端末シリアル番号から
elsif($hosts =~ /\.jp-.\.ne.jp/){
$agent = $ENV{'HTTP_USER_AGENT'};
$agent =~ /SN([A-Za-z0-9]｛5｝)(\1+)/;#上から五桁取得
$host = $1;
}
#どれでもなかったときIPから
else{
@nums= split(/\./,$ENV{'REMOTE_ADDR'});# ip番号を分解
$host= substr($nums[3],-3) . substr($nums[2],-1) . substr($nums[1],-1);# 上位3つの1桁目取得
}
$str= $host . substr(crypt($server,$times[4]),-5);# server名結合
$column= -1 * $column;
# IDの生成
$ret= substr(crypt(crypt($str,$times[5]),$times[3]+31),$column);
$ret=~ s/\./+/g;
return $ret;
}
vara.plの135行目あたり
$id= $oConv->MakeID($oSys->Get('SERVER'),8,$oConv->GetRemoteHost());
に変更
1242289356<>22<>0ch BBS 2007-01-24<>210.136.161.165
1242289387<>22<>0ch BBS 2007-01-24<>210.136.161.162
ログ履歴です
うちの掲示板でもIPで記録される時もあればiモードIDで記録される時もあるよ
それぐらいしか原因思いつかない
ログ確認してみたらうちの掲示板では>>47の改造をした直後からIPでしか記録されなくなってる
なら書き込みフォームにguid=ONが抜けてるとかとかとか。。。
それなら、vara.plのID作成部分で変にGetRemoteHostとかやっちゃってるのが原因かなぁ。
MakeIDの中でIPをgethostbyaddrして、キャリアを分ける、あとはキャリア毎のシリアルからID生成とかすれば、、。
あとまぁ、あんま心配は要らないかもしれないんですが、
DoCoMoの携帯は設定によってはGUID送ってくれないので、
からっぽだった時の対策を何かしとくといいかもしれません、
$Sys->{'FORM'}->Set('HOSTS',$ENV{'REMOTE_HOST'});
vara.plの135行目あたり
$id= $oConv->MakeID($oSys->Get('SERVER'),8,$oForm->Get('HOSTS'));
で、>>61って感じで。
>>73
それが原因なんですかね
16日に1件だけドコモからの書き込みがあったみたいなので
ログを確認してみたらその書き込みだけHOSTに何の記録もなく空欄でした
HOSTが記録されないのでは恐らくID固定はされない気がします
まあID作成関数とログは何の関係もないから…とだけ
取得できない理由かあ…再現できないから対処のしようもないし
環境が原因でなければ何が原因なのか…
こんな感じでどーすか。
sub MakeID
{
my $this = shift;
my ($server,$column) = @_;
my @times = localtime(time());
my (@nums,$ret,$host,$str);
# 種の生成
@nums = split(/\./,$ENV{'REMOTE_ADDR'}); # IPを分解
my $hosts = gethostbyaddr(pack('c4',@nums), 2);
if($hosts =~m/docomo\.ne\.jp/){
$host = $ENV{'HTTP_X_DCMGUID'};
$host = substr($host, 0 , 3);#上から三つ取得
}elsif($hosts =~m/ezweb\.ne\.jp/){
$host = $ENV{'HTTP_X_UP_SUBNO'};
$host = substr($host , 3 , 4);#上から三つ目から四桁抽出
}elsif($hosts =~m/jp-[cdhknqrst]\.ne\.jp/){
$ENV{"HTTP_USER_AGENT"} =~m|SN([A-Za-z0-9]{5})(\1+)| and $host = $1;
}else{
$host = substr($nums[3],-3) . substr($nums[2],-1) . substr($nums[1],-1); # 上位3つの1桁目取得
}
$str = $host . substr(crypt($server,$times[4]),-5); # server名結合
$column = -1 * $column; # 桁設定
# IDの生成
$ret = substr(crypt(crypt($str,$times[5]),$times[3]+31),$column);
$ret =~ s/\./+/g;
return $ret;
}
それとも>>80のみでいいのかな？
vara.plはノータッチのままで。
3 名前：名無しさんの次レスにご期待下さい[] 投稿日：2009/05/19(火) 17:50:56 ID:N+MJh5F+O
携帯（ドコーモ）IDはダメぽです。ランダムはスルーで
じゃなくて
pack('C4',@nums);//大文字C
じゃね？小文字だと符号付きchar扱いになるはず。
129 名前：[] 投稿日：2009/05/26(火) 08:18:13 ID:KjFgOQ56O
てすと1
1243293493<>8<>0ch BBS 2007-01-24<>210.136.161.2
130 名前：[] 投稿日：2009/05/26(火) 08:18:28 ID:Yz2FI8dUO
てすと2
1243293508<>8<>0ch BBS 2007-01-24<>210.153.84.9
>>87のcを小文字から大文字に変更
131 名前：[] 投稿日：2009/05/26(火) 08:19:58 ID:x3U9ZR6AO
てす1
1243293598<>12<>0ch BBS 2007-01-24<>210.153.86.109
132 名前：[] 投稿日：2009/05/26(火) 08:20:57 ID:D3JQnc92O
てす2
1243293657<>10<>0ch BBS 2007-01-24<>210.153.86.17
小文字から大文字に変更したら投稿時間の縛りが出来るようになりましたが
IDは依然固定されないままです。
ソースのフォーム生成箇所もいじらないとダメなはず。
パラメータだけで送信されるはず。
i?guid=ONは>>20などで既出だよ
だからすでにくっつけ済み、だけど固定出来ない
sub GetAgentMode
{
my $this = shift;
my ($UA) = @_;
$_ = $UA;
if (m/DoCoMo/){ return 1; } # docomo携帯
if (m/SoftBank|Vodafone|J-PHONE/){ return 2; } # J-Phone携帯
if (m/KDDI/){ return 3; } # au携帯
if (m/WILLCOM|DDIPOCKET|MobilePhone|Windows CE|/){ return 4; } # willcom
if (m/jig browser/){ return 5; } # jigブラウザ
if (m/ibisBrowser/){ return 6; } # ibisBrowser
if (m/OpenBrowser/){ return 7; } # e-mobile
return 0;
}
>if(m/WILLCOM|DDIPOCKET|MobilePhone|Windows CE|/){return 4;}# willcom
は
if(m/WILLCOM|DDIPOCKET|MobilePhone|Windows CE/){return 4;}# willcom
に差し替えておいて。
さすがにややこしくなってくる頃だと思うけど
えーっと
7Mさんがやってくれた>>80と>>20と>>23かな？
何を今更ｗ
HTML化されてたらそれへの誘導リンクになるやつってどうするんだ？
ホストログのみの改造だとちゃんと出力されるんだよね？
試してみて
何が聞きたいのかわからない。
ああああ（以下大量
だとウィンドウサイズに合わせてテーブルが可変して
文字列も自動改行？されていますが
1234567890
のように半角英数文字だとテーブルがウィンドウ枠を超えて
ブラウザの下の横スクロールが現れてしまいます
もし分かる方居たら改造お願いします
ttp://zeroch.ps.land.to/src/zeroch_0012.txt
galadrielの適切な場所と置き換えてねー
http://qb5.2ch.net/test/read.cgi/operate/1244993904/
らしい
これだけだと、◆や＜＞”（←実際には半角）の無変換がないですよね？
いや、だから、その変換をやったあとに ConvertTrip したら駄目なんだっての。
新仕様ではその手の変換はやらないでトリップに変換する。
$n =~ s/◆/◇/g;
$n =~ s/●/○/g;
$n =~ s/削除/”削除”/g;
こうだろ
if ($$pName =~ /#(.+)/){
$n = substr($$pName,0,index($$pName,'#'));
$k = substr($$pName,index($$pName,'#')+1);
$k =~ s/☆/★/g;
$k =~ s/◇/◆/g;
$k =~ s/○/●/g;
$k =~ s/”管理”/管理/g;
$k =~ s/”管直”/管直/g;
if (length $k >= 12){
それでも駄目かと。新仕様では #fusianasan も可能だし。
vara.pl の変換順序を変えるべきだと思う。
トリップ作成サブルーチンに引数として$name_tripを使えばいいような。
ただし最近2chで導入された12桁トリップだと
1024バイトまでキーとして読み込むため
10桁トリップのの前に2文字追加する12桁ではないようです
よろしくおねがいしまーす
ありがとうございます〜
新仕様って独自のかと思いまして〜
2ch新仕様12桁トリップ とかなんとか付けていただけないと分からないと思います〜
初心者乙、半年ROMれ
ついでに要望として
jane等で1000オーバーのスレはスレタイの文字色が黒→灰色に変更します
管理ページの書き込みログの表示
削除レスの復活
どこかにあったがスーパーsage機能もあったりしたらいいな・・・
pealのサイト見ながらスクリプトと戦闘中
これはJaneに要望しないとだめだろ 外部板では有効にされてないだけだから
スーパーsageはほんのちょっとの改造でつけられるよ
(ﾟдﾟ)
(ﾟдﾟ)
普通に余裕だろ
ttp://zeroch.ps.land.to/src/zeroch_0014.zip
ただ単にバージョンが古いだけだった。
最新版に入れ替えたら普通に出来たよ。
プロクシチェックを有効にすると携帯（HOST：pv**proxy**.ezweb.ne.jpなど）からの書き込みまで
串扱いされてしまうのでなんとか改造で対処出来ないでしょうか？
>>20
>>23
貼られた時から既に導入していますが>>20>>23はプロクシチェックとは関係ないかと
プロクシ規制とケータイからの書き込みを両立させたいのでしょ
こんな感じです
犯罪予告をするアフォな人。2
http://qb5.2ch.net/test/read.cgi/sec2ch/1192351304/
ずっと待ってます
どなたかお聞かせいただけると嬉しいです。
2007-01-24版を使っているのですが、これにhage・dame機能をつけるには
どうしたらよいんでしょうか？
以上
弄ろうとしたんだけど、p.cgiにそれらしい記述が無くって、
困っとります。
何のモジュールを弄れば良いんでしょうか？
ｽﾚｯﾄﾞ表示を↑のようにするには
いったいどうしたらいい？ あんまり詳しくないんだ。ごめんよ。
というわけでもないが大幅な改造が必要なので自分でやれ
ありがとう。
名前<>メール<>時刻とID(ID:は抜き)<>本文10byte<>?<>ホスト<>IP<>●<>UA
とりあえずメモ
ttp://info.2ch.net/wiki/index.php?%B3%C6%B9%D3%A4%E9%A4%B7%CA%F3%B9%F0%A4%CE%BD%F1%BC%B0#Appendix
名前<>メール欄<>日付 時間 ID<>本文の先頭部分<>スレ立てならスレタイ<>host<>IP<>●ならID
・レス書き込み(？)＋●使用(0chには●は無いので参考程度に)
名前<>メール<>日付 時間 ID<>本文30byte<>スレタイ<>リモホ[●ID]<>IP<>●ID<>UA
途中で送信してしまったorz
規制議論板見て調べてみた
・レス書き込み(？)
名前<>メール<>日付 時間 ID<>本文30byte<><>リモホ<>IP<><>UA
・レス書き込み(？)＋●使用(0chには●は無いので参考程度に)
名前<>メール<>日付 時間 ID<>本文30byte<><>リモホ[●ID]<>IP<>●ID<>UA
スレ立て時のログがどうなってるかは分からなかった
・スレ立て時
名前<>メール<>日付 時間 ID<>本文30byte<>スレタイ<>リモホ<>IP<> ( )<>UA
名前<>メール<>日付 時間 ID<>本文30byte<>スレタイ<>リモホ[●ID]<>IP<>●ID ( )<>UA
●ID欄にある「 ( )」って何なんだろうね
こんな感じかねぇ
その気になれば簡単に実装できるな。
wikiのヤツでダメなのかい？
2chで導入されてるSambaのように4回目で警告をだすにはどうすれば良いでしょうか
>>180 作者の手抜きだ うちの鯖でも1回目は記録されない
ttp://kwskkkst.net/jp/kg6wupl
俺もやったけど、マジ寝てるだけで金くれたぞ！！
2ちゃんねるだと携帯はこっちから見てくださいのリンクが出るんだけど…
適当な出力サブルーチン書いて
sub ReadCGIをいじって出せばいいじゃない
「スレッド一覧はこちら」から表示されるスレ数の上限は500のようですが、
仮に1000とかに設定するにはどうすればいいでしょうか？
ようは「過去ログ倉庫はこちら」ではなく「スレッド一覧はこちら」で
すべての過去ログを表示させたいのです
よろしくお願いします
-----
ＥＲＲＯＲ：アクセス規制中です！！(\.ne.jp)
ここで告知されています。
ホスト nes.net
名前： 名無しさん＠_＠
E-mail：
内容：
----
って出るんだけどぜろちゃんねるでこんな風に表示することは出来ます？
できるかできないかって言ったらできるだろー
規制したときにアクセス規制中です(\.jp)とかって出す方法を教えてください
教えてあげないよ♪じゃん
このあたりを参考にするといいと思うよー
◆windyakingちゃんそろそろ公開してな
\.*とかと表示するｱﾚを追加しようとしたものです、windyaking氏の助言を頼りにやってみましたが無理でしたorz
require('./module/faramir.pl');
$vUser = new FARAMIR;
$vUser->Load($oSYS);
$check = $vUser->Check($host);
if ($check == 4){
$oSYS->Set('USER',$flag);
return 601;
}
if ($check == 2){
$this->{'FORM'}->Set('FROM',"<font color=tomato>$host</font>");
}
vara.plにこんな感じで追加してerrmsg.cgiに
601<>規制ユーザ<>アクセス規制中です！{!USER!}
てやりましたが駄目でしたorz どこが間違ってるかご教示くださいorz
ぜろちゃんねるプラスに組み込む予定
v1.x.xまでには過去ログ保管庫モードを搭載する
というかどこを特化すればいいのかがわからんｗ
read.cgiぐらいしか変更する場所が無いような…
>>213
いきなり出てきてる$flagってなに…
img0chのパクリだけど
マジレスするとfaramir.plを改造して、ヒットした部分を保持するようにしないと無理
2chみたいにchモリ払えﾎﾞｹの様なめっせーじでも表示するのか
#個人的にはSambaの機能を正常にしてほしいなぁとか思う
うへぁ(^_^;)
結構面倒なんだね。仕方ないね。
>>217
要は ttp://www.monositu.net/ みたいなのを作るという感じです。
chモリはいらないです
＞#
はい。
一回目がうまく記録されません！助けてください
それと規制時間内にPOSTしてきた場合に0秒にリセットするにはどうすればいいでしょう
7M.さん来ないならわたしがやるかー
といっても週末までできないかもしれないけど
ちょうど秒速10回くらい書き込まれてもびくともしないSambaを作りたいと思ってる所だし
その実験がてらで
日付がなんかおかしいような・・・
＼(^o^)／
>>225
何をいまさらw
# 18:03:15
特定した
未だなし
・Samba
まだ時間がとれてない(想定内)
しかし自転車はなおしたw
こうして考えてみるとimg0chは偉大だな
こうして考えるとSamba24って良く考えてあるな
Sambaは少し遅れそうな予感…
設定で全板共通にしたとして…
・「n sec たたないと書けません。」のうちは板別にカウント
・「もうずっと書けませんよ。」になったら全板でかけなくなる
これって需要ある？
需要あります
主に俺に
599 連打しないでください。もうそろそろ規制リストに入れますよ。。(￣ー￣)ニヤリッ
---------------------------------------------------------------------------------------
(Samba24-2.13)
ちょっと気になるんだけど、その警告って2回出たりするのかな？
・Samba24は板別に秒数が違う が指定秒数内はどこの板でも書けない
・３回バカ見たいに連打すると599エラーを二回返す
・規制は各時00分に全てリセットされる
・120sec規制の場合beにログインしてると回避できる(news+除く)
とこんな感じ
どもです
このレスがなかったら599を一回しか出さない仕様にしてたかもしれませんw
だいぶ前からぜろちゃんねるの"ハッテン"に貢献してるけど
∧ ∧
(*‘ω‘ *) ちんぽっぽ
( )
v v
ぼいんっ
川
( ( ) )
過疎過疎過疎過疎〜〜〜〜〜〜〜〜
／ ■■■■■■■::::ｌ|!ｌ ┏┛┗┓ ┃┏━┓┃ ┃┃
／ ■■■■■■■ `::::::＼ ┗┓┏┛ ┃┗━┛┃ ┃┃
／ ■■■■■■■ `::::::＼ ┏┛┗┓ ┃┏━┓┃ ┏━━━━━┓ ┃┃
／ ＿_ ■■■■■■■ ＿ `:::::::＼: ┗┓┏┛ ┗┛ ┃┃ ┗━━━━━┛ ┗┛
!ｌ|| ／ ヽ ｌ|||!||ｌ!!||ｌ!!|ｌ ／ ヽ `::::::::＼ ┃┃ ┃┃ ┏┓
／ .|;;;; ◎ ;;;;| !!ｌ||!|ｌｌ!ｌ||!|ｌ |;;;; ◎ ;;;;|!ｌ|ｌ|!::::::::::＼ ┗┛ ┗┛ ┗┛
／ ⊂⊃ .ノ ｌ|ｌ!' |! `|!ヽ ＿ ノｌ||!!|::::::::::::::||ｌ!
!ｌ| ￣ .|!エエエエエエ! ||ｌ|!!!ｌ||!!!||ｌ!!!!|||:::::::::::::＼
/´ |;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;| !!|||ｌ|ｌ!|ｌ!|||ｌ|!||ｌ`:::::::::::::::／..:|. ..／:|
| .|;;;;;;;;;;;;;;;;;;;;;;;;;;;;;| !ｌｌｌｌ||ｌ!|ｌ!!|!|ｌ `::...／ .:::| .／ ::;|
!ｌ|| .|;;;;;;;;;;;;;;;;;;;;;;;;;;;;;| `ｌ!|ｌ ｌ! | ...::::;| ./ :::;|
| .|;;;;;;;/⌒ ⌒ヽ;;;;;| ..:::::i ￣￣⌒ﾞﾞ^――／ ::::::::|
| ｉ |;;;;;| ''' .| ''' .|;;;;| ｉ ...::::::/＿,,___ . _,,,,__,_ ::::::::::＼
＼ ﾍ | |;;;;;| ! .|;;;;| | ﾍ ..:::::／ ﾞ^＼ヽ.. , /ﾞ ¨＼,.-z ::::::::::＼
ヽ /:::ヽ| .|;;;;;;| |;;;| | /::ヽ...::::::::「 ● | 》 l| ● :ﾞ》 ミ.. :::::::＼
, !|| ./:::::::ヽ |!エエエエエエ!| |/::;:::ヽ:::::::;;/i,. .,ﾉ .l| 《 ...:;|´_ilﾄ ::::::::::::!
／||! / ::::::::::::ヽヽ ＿＿＿＿＿ / /::::::::::ヽ / ＼___,,,,,_／ .'″ ^=u,,,,_ v／.. :::::::::::::::l!
/ ::::::::::::::ヽ＿＿＿＿＿＿ノ.:::::::::::: ::| ￣ ,,､ i し.／:::::::::::}
/ ＿ ::::::::::::::::::::::::::: ＿ ::::::;| / ,,__＿＿ _,／￣ ＼ ＼ ﾉ ( ::::::::::|
／ ／。 ヽ＿ ヽ V /::: ／ 。ヽ :::;| |.. | ／└└└└＼../.＼ ＼ '~ヽ :::::::::::::|
./ ／￣￣￣/ ＿＿＿＿ ヽ￣￣￣＼ :::| .∨::::::::::::::::::::::::::::::::::::::;;;;;;| ::::::::::|
.| :::::::::::::::::::: / / ┬ーーー| ヽ ::::::::::::::::::| |.|;;;;;;;;;;;;;／⌒／ ⌒ ::::;;| :::::::::::｝
| ::::::: ::: |ヽ´ | ::: ::| |.|;;;;;;;/ / .:::;| ::::::::::［
.| :::: :: | | .| | :: | |.|;;;;;;/ / . ::;| .| :::::::::::|
.| ::: | | ⊂ニニ::ヽ | | .| |.|;;;;;! / .∧/ / :::::::::::::／
.| : | | |::::::ヽ:::::::| | ／ ｝ ∧lll;;;,. ' ../ / ／ :::::::::::::::::＼
| : | |:::::::|::::::::| ／ /| ＼┌┌┌┌┌/...／ .／::: ::::::::::::::::::＼
.| : | ┌┌┌┌┌ .| ( ﾞﾞ^^¨^¨ﾞﾞ¨ ￣￣￣ ／::::::::::: ::::::::::::＼
＼ ├―----‐-――┤ ヽｰ─¬ｰ〜ｰ―-- ' ::::::::::::::
faramir.plを弄るとかとのことですが、、どうかその方法の伝授をお願いいたします
これから示す行数とかファイル名は純正のtest070124です。
きちんと動くかどうかは保証の限りではありません(^_^;)
test/module/vara.pl l.316-317辺り IsRegulation の
> $vUser->Load($oSYS);
> $check = $vUser->Check($host);
を
> $vUser->Load($oSYS);
> $check = $vUser->Check($oSYS, $host);
に置換
次に
test/module/faramir.pl l.191-192辺り Check
> my $this = shift;
> my ($host) = @_;
を
> my $this = shift;
> my ($sys, $host) = @_;
に置換
さらに同ファイル l.195-197
> foreach (@{$this->{'USER'}}){
> if ($host =~ /$_/){
> $flag = 1;
を
> foreach (@{$this->{'USER'}}){
> if ($host =~ /$_/){
> $flag = 1;
> $sys->Set('HITS', $_);
に置換
test/info/errmsg.cgi l.32
> 601<>規制ユーザ<>書き込みホストは現在規制されています。PROXY抜くか管理者に相談してね。
を
> 601<>規制ユーザ<>アクセス規制中です！！({!HITS!})
に置換
多分これでできるはず。
エラーメッセージはお好みで
> 601<>規制ユーザ<>アクセス規制中です！！({!HITS!})<br><a href="http://yakin.38-ch.net/windyakin/">ここ</a>で告知されています。
みたいにするのもいいかもね。
以上解説終わり
> $sys->Set('HITS', $_);
↓
> $sys->Set('HITS', "($_)");
> 601<>規制ユーザ<>アクセス規制中です！！({!HITS!})
↓
> 601<>規制ユーザ<>アクセス規制中です！！{!HITS!}
にするといいかも
限定ユーザーを別のエラーにするっていうのもありかもしれないけど
本当にありがとう 本当にありがとう
早く作りなさいよ！
あーっ！
とりあえずA○USさんにハングするなって言っといてもらえます(；＾ω＾)
サボるな be開発しろ sssp://実装しろ！
適当にimgタグに変換するだけのプラグイン
BE(HS)(偽)用に作ってあるものなので通常利用には向いてないかも
本当ならBBS_OVERSEA_PROXYとかなんたらけどしらん
ttp://zeroch.ps.land.to/src/zeroch_0020.txt
思っただけで催促など断じてしていません
ご内密に
これで長年の信頼もパーだぜ
PCはとりあえずなんとかなったので、後はダウンタイム発生によるﾄﾞﾀﾊﾞﾀをなんとかしたらとりかかれるかな
／⌒ヽ |;;lヽ::/ ∧_∧ /__ o、 |、 / ξ / つ ,_______,,,
（ ＾ω＾）∫. .|;;|:::|~ （ ´・ω・）ﾉ .ii | ・ ＼ﾉ ⊂|￣￣￣|⊃ （_（＿⌒） γ;;;;;;;;;ζ'ヽ
（ つc□ i===i=i c□c□c□ ...旦只旦旦（ ｏ 旦| ・ | |＿＿＿| ●,；しし' ヾニニニニニフ
|￣￣￣￣￣￣￣￣￣￣￣￣￣￣| |￣￣￣￣￣￣￣￣￣￣￣￣￣￣| |￣￣￣￣￣￣￣￣￣￣￣￣￣￣|
| コーヒーの方はこちらへ | | お茶の方はこちらへ .| | 男乃カレーの方はこちらへ .
Samba動いてんぞー windyakingよーSambaは次期0chPlusに含めるの？
Sambaはもう入ってる
|＿≦三三≧ｘ'| / :| / ! ./ ,∠二l |. || ■ ■ ■ ■
|.,≧厂 `>〒寸ｋ j / }/,z≦三≧ |. | ﾘ ■ ■ ■■■ ■ ■ ■ ■ ■ ■ ■
／ﾍ { /{ 〉ﾏﾑ ／ ,≦ｼ､ }仄 .j. ./ ■ ■ ■ ■ ■
. V八 {l ＼／ : :}八 / ,ｲ /: :} ﾉ :| /| ／ ■ ■ ■ ■ ■
V ＼ V: : : : : :ﾘ ＼ ./ .ﾄｲ: :/ ﾉ／ .}／ ■ ■ ■ ■
' , ￣￣￣ └‐┴' { ∧ ■ ■■ ■ ■ ■
V ＼ヽ＼ヽ＼ ヽ ＼ヽ＼ | ＼. ■ ■ ■ ■ ■ ■
＼ , イ▽` ‐- ＿_ 人 ＼ ■■ ■ ■ ■
:∧ ∨ ∨ ／ ﾊ
::::∧ ﾍ, / , イﾊ |
::::::∧. ﾐ≧ ､ ,∠, イ: : : : :.', |
::::::::::} 了`＞ｧ-‐ ´ } : : : : : : : : ', |
:::::::/ | ∨／＼ / : : : : : : : : : } |
:::::/ レ'7￣{`ヽ. V/ : : : : : : : : : / .|
::/ / / V∧/: : : : : : : : : : / /
#!/usr/local/bin/speedy -- -r1 -b1048576 -t60
#!/usr/local/bin/speedy -- -M64 -b1048576 -t660 -T/md/tmp/speedy/t
#!/usr/local/bin/speedy -- -b1048576 -t660 -T/md/tmp/speedy/t
use strict 'vars';
#########################################################
#
# bbs.cgi for SpeedyCGI (written by FOX)
# 2004/12/02
#
# 必要なファイル(同じディレクトリに入れる)
# public_html/test/bbs.cgi これ
# test/bbs-entry.cgi 各種初期処理(SETTING.TXT,ad関係読み込み等)
# test/bbs-main.cgi 本体
# /bbs-tool.cgi Samba用
# /bbs-yakin.cgi ●実装用
#
#########################################################
require "../../test/bbs-entry.cgi";
&bbs_entry ;
exit ;
0chplusの最新版使ってます
もしかしたら他のメンバーが対応してくれるかも
最近知った
規制を確認できる奴
>>363は散々荒らした挙句、他人のせいにしている荒らしですよ！？
真に受けないでくださいねｗ
荒らしは消えろクズ
by zerochplus0.4.4ver
報告ありがとうございます
BBS_SLIPの不具合は確認しました、次バージョンにて修正します
書き込み規制秒数の件はこちらで確認することが出来ませんでした
もう少し状況を詳しく説明していただけませんか
0chと2chの相違点
・2chのSamba24は板別設定 リリース数週間は鯖別だったような希ガス
・bbs.cgiのスレ立て時はローカルルールとフォームが一体？している
・CookieをEcmascriptで取得している
3年ぶりくらいだな
もっと具体的に言うと・・・
そうですね、書き込み規制秒数を5に設定しても5秒経つ前に書き込み出来てしまうような状況です