X
bbs.cgi開発【WebProg板】
0002nobodyさん垢版02/04/19 08:49ID:???
【bbs.cgiのメインフロー】
　１、システム関連設定（タイムゾーン＆日付・時刻＆連想配列）
　２、ＰＯＳＴ入力情報を取得（$FORM{}に格納）
　３、入力要素の体裁（コントロールコードや<>を除く）
　４、各種ファイルＰＡＴＨ生成（詳細は下記参照）
　５、設定ファイルから規制などを設定（詳細は下記）
　６、ホスト情報（$HOST・$PROXY・$IP）
　７、クッキー発行
　８、書きこみ状態のチェック＆補完（monazilla＆携帯）
　９、書き込み情報のチェック＆補完（トリップ＆キャップ＆節穴＆名無し）
１０、エラーレスポンス（ポスト情報の判定）
１１、要素ごとのサイズや入力の判定（長さや入力無し）
１２、ポートチェック
１３、新規スレッドと普通書き込みの分岐
１４、レス書き込みまたはスレッド立て規制
１５、書き込み情報設定（レスポンスアンカー・ＩＤ）
１６、ＤＡＴファイルへ書き込み（.dat）
１７、関連ファイルの更新（.html・subject・subback・iモード）
１８、index.htmlの更新（圧縮）
0003nobodyさん垢版02/04/19 08:49ID:???
【変数の指定】
use vars qw(%FORM);入力情報
use vars qw(%SETTING);設定情報
use vars qw($NOWTIME);現在の時間
use vars qw($DATE);表示日付
use vars qw($IP);ホスト情報（生？）
use vars qw($PROXY);ホスト情報（プロクシ）
use vars qw($HOST);ホスト情報（$IP<$PROXY>）
use vars qw($PATH);$PATH = "../" . $FORM{'bbs'} . "/";（板アドレス）
use vars qw($DATPATH);$DATPATH = $PATH . "dat/";（データディレクトリ）
use vars qw($TEMPPATH);$TEMPPATH = $PATH . "html/";（テンポディレクトリ）
use vars qw($INDEXFILE);$INDEXFILE = $PATH . "index.html";
use vars qw($INDEXGZFILE);$INDEXGZFILE = $PATH . "index.html.gz";
use vars qw($SUBFILE);$SUBFILE = $PATH . "subback.html";
use vars qw($SUBGZFILE);$SUBGZFILE = $PATH . "subback.html.gz";
use vars qw($IMODEFILE);$IMODEFILE = $PATH . "i/index.html";
use vars qw($DATAFILE);データファイル
なお、これらについては、変数自体を使わないという選択もありです。
0004nobodyさん垢版02/04/19 09:06ID:???
#!/usr/local/bin/perl

use strict 'vars';



# とりあえずな感じ。
# last modified 2002年 3月 17日 by トオル

use vars qw($version);
$version ="２００２年";



#====================================================
#　システム関連設定（タイムゾーン）
#====================================================
use vars qw(%FORM);
use vars qw(%SETTING);
use vars qw($NOWTIME);
$NOWTIME = time;

# タイムゾーンをセットする
{
　　　$ENV{'TZ'} = "JST-9";
}
# シグナル対処関数
sub SigExit {
　　　exit(0);
}
{
　　　$SIG{'PIPE'} = $SIG{'INT'} = $SIG{'HUP'} = $SIG{'QUIT'} = $SIG{'TERM'} = "SigExit";
}
0005nobodyさん垢版02/04/19 09:07ID:???
use vars qw($IP);
use vars qw($HOST);
use vars qw($PROXY);

$IP = $ENV{'REMOTE_ADDR'};
$IP = gethostbyaddr(pack('c4',split(/\./, $IP)), 2) || $IP;
if ($ENV{'HTTP_VIA'} =~ s/.*\s(\d+)\.(\d+)\.(\d+)\.(\d+)/$1.$2.$3.$4/) {
　　　$PROXY = $ENV{'HTTP_VIA'};
}
if ($ENV{'HTTP_X_FORWARDED_FOR'} =~ s/^(\d+)\.(\d+)\.(\d+)\.(\d+)(\D*).*/$1.$2.$3.$4/) {
　　　$PROXY = $ENV{'HTTP_X_FORWARDED_FOR'};
}
if ($ENV{'HTTP_FORWARDED'} =~ s/.*\s(\d+)\.(\d+)\.(\d+)\.(\d+)/$1.$2.$3.$4/) {
　　　$PROXY = $ENV{'HTTP_FORWARDED'};
}
$PROXY = gethostbyaddr(pack('c4', split(/\./, $PROXY)), 2);
$HOST = $IP;
$HOST .= "<$PROXY>" if ($PROXY);
0006nobody垢版02/04/19 09:26ID:???
一回聞いてみたかったんだけど、こういうスクリプトで
CGI.pmをわざわざ使わないようにする理由ってなに？
どうせならCGI.pmとか色々モジュール使いーの、perl5.6.1使いーの
したほうがよろしいような気がするのですが。
0007nobodyさん垢版02/04/19 13:08ID:???
利用者の多いところでCGI.pmは得策ではないだろう。（mod_perlなら話は別だが）
ただ大量のvarsはいただけないな。
Perl5.6なら"our $var = initvalue"で済むものが見苦しすぎる。
0008nobodyさん垢版02/04/19 16:41ID:eKZPn7So
2chのbbs.cgiってPerlで書かれてるの？
C言語で作られてるって聞いたんだけど・・・・
0010nobody垢版02/04/20 07:52ID:???
CGI::Simple なんてどうだろう。作者によると同機能でCGI.pmの2倍は速い
との事だけど。
0013nobodyさん垢版02/04/20 11:03ID:???
he.netで使ってるPerlのバージョンは全部5.004_01な模様なので
そこらへんも考慮しなきゃ、、
0015nobodyさん垢版02/04/20 14:01ID:???
ＣＧＩ::Sｉｍｐｌｅ見てみた。
が、バグが多すぎてまだ実用レベルではないね。
例えば、パラメタのキーに".globals"などのメタデータのキーが入ってるとクラッシュする。
(場合によってはクラッシュせずに予想外の動作をするものもある)
これじゃCGI.pm v3.xの方がまだマシだね。
0016nobodyさん垢版02/04/20 16:55ID:???
速いにこしたことはないけどCGI.pmを使いたくないほど過酷な環境
ならPerlCGIをやめたほうがいいと思うのだが。
0018nobodyさん垢版02/04/20 21:59ID:???
ＣＧＩ.pmを使っても全く影響が感じられないような素晴らしい環境なんてそうは無いだろ。
0022aki垢版02/04/22 12:02ID:???
（´-`）.oO(なんか、実験板方面が閉鎖的なんだよなぁ……。)
0024nobodyさん垢版02/04/22 21:03ID:oJQeFi6r
実験場とは別に、この板で作ってみるとか。
２ちゃんねるで使われるかどうかは別にして。
0025nobodyさん垢版02/04/23 01:31ID:Og/loODO
一応リンク

monazilla Part 3
http://pc.2ch.net/test/read.cgi/tech/1012544484/l20

2ちゃん専用ブラウザ「かちゅ〜しゃ」Part60
http://pc.2ch.net/test/read.cgi/software/1018022445/l20

２ちゃんねる用ブラウザ「ホットゾヌ」 Part10
http://pc.2ch.net/test/read.cgi/software/1018096103/l20

2ちゃんねる用ブラウザ「A Bone」Vol.15
http://pc.2ch.net/test/read.cgi/software/1017916153/l20

新鋭２ちゃんねるブラウザ「Jane2ch」 part 3
http://pc.2ch.net/test/read.cgi/software/1016550175/l20

２ちゃんねる用ブラウザ「ギコナビ」 Part2
http://pc.2ch.net/test/read.cgi/software/1015310037/l20
0026aki垢版02/04/23 16:38ID:???
>>24
賛成。
とりあえずおおざっぱな方針かな？

個人的には、もはや軽量化はどうでもよくて、
「使いやすい」2ch互換スクリプトにしたいところ。
もちろん、無駄は省かれるべきだけど。
0027nobodyさん垢版02/04/23 20:42ID:M/9S6Mh9
age
0028nobodyさん垢版02/04/25 00:36ID:Dqy3iBWZ
>>26
じゃあ、このbbs.cgiを参考にしつつ、
１７氏スクリプトを作りつつ、使いやすい２ｃｈ掲示板クローンを作るって方向でどうですか？
１７氏が引退して、「２ｃｈスクリプトくれくれ君」が増えてうざいし。。
0030nobodyさん垢版02/04/25 01:32ID:EeJjolbS
というか、どう考えても17氏スクリプトと２ｃｈ互換は、転送量とか考えたら設計が古くてだめでしょ。
アハンと１２ｃｈくらいじゃないかな？
0031nobodyさん垢版02/04/25 11:32ID:???
完全なクローンなんて作っても仕方ない。
プロトコル互換の「もっとずっと使いやすい」BBSを設計してみてはどうだろう。

.
.
.
.
.
.

でも専用ブラウザで見るなら同じことなんだよな。
0033nobodyさん垢版02/05/05 22:52ID:dTR58Yl2
ちょっと話は違うけど、PHPとDBを利用して作ったほうが
負荷も少なく、早くて、しかもログが壊れにくいと思うんだけど、
どうなんでしょうか。
0034nobodyさん垢版02/05/05 23:01ID:???
んでもひろゆきとかドル猫達はいじれない罠
0035nobodyさん垢版02/05/05 23:46ID:???
漏れはperlがなんとなく好きなんだが、
速さとかを突き詰めていけばphpとかそういう方向に行くんだろうな
0036nobodyさん垢版02/05/06 00:03ID:???
>>35
phpって速いの？Perlより遅い気がするんだけど。
もしかして4.2xは速いの？
0038nobodyさん垢版02/05/06 00:59ID:???
>>36
mod_perlを使えばperl早いけど、
夜勤さんが使わないっていってるからなぁ。
0047aki垢版02/05/08 03:51ID:???
これなに？
なんかとても面白そうな雰囲気が。
0051nobodyさん垢版02/10/03 16:43ID:???
ここでいいのかな

ﾄﾘｯﾌﾟをメール欄に書くとおかしくなるの既出？
例えば、
名前[#hogehoge]メール欄[sage]
　　　→名前[ ◆/Re6aTC.]メール欄[sage]
名前[#hogehoge]メール欄[sage #hogehoge]
　　　→名前[ ◆jG/Re6aTC.]メール欄[sage]
0052nobodyさん垢版02/10/03 16:46ID:???
>>51
昨日からトリップ10桁になったんだよ
メール欄とは無関係、メール欄の#以降が削除されるのは以前からの仕様
0053nobodyさん垢版02/10/03 16:49ID:???
ホントだ。
思い切り誤解ですた。ごめんなさい。
0055nobodyさん垢版02/11/14 15:48ID:???
843 名前：夜勤 ★ 投稿日：02/11/14 15:22 ID:??? ???
ex , ex2 うまくいっているのかなぁ。
結局は、極端にいえば「もう一行も bbs.cgi にはコード追加できません」
ってことのような感じ、もちろんコードの内容にもよりますけど。

人が増えすぎて、コードを削らなきゃならない段階のようです。

解決策は
(1) コードを削る。
(2) サーバを増設する。

ということでしょうが、どっちにしろ　なんともかんとも


さーおまいら出番ですよ。
0057ゆかりぼん垢版02/12/28 22:19ID:mkbLi1ni
うん。
0058nobodyさん垢版02/12/29 00:49ID:kIUCOKS/
>>55
夜勤が本気でそんなこと言ってるなら夜勤は真性のｱﾌｫ。
0059nobodyさん垢版02/12/29 04:37ID:???
「サーバを増設したいから、●買ってくれ」が正解。
0061nobodyさん垢版03/02/16 00:43ID:???
廃れてるなぁ。
誰かまじめにbbs.cgi開発する人いないの？
0062nobodyさん垢版03/02/16 10:28ID:???
>>61
真面目に開発している人はここには来ない罠。
0064nobodyさん垢版03/02/16 19:20ID:???
お前らも暇な奴だなぁ（ｵﾚﾓﾅｰ
っていうのは置いておいて、真面目にやっている人がいるなら
ソースコードを提供してもいいよ。ただし再配布は禁止。
どうよ？
0065nobodyさん垢版03/02/16 19:28ID:???
あー、書き忘れたけれど興味あるならメールください。
フリーメールはNGです。

kigaru2＠kigaru2.net
（正体ばればれだなぁ。）
006663垢版03/02/16 19:54ID:???
>>65
hu8up@ww2.personal.ne.jp
このメアドでよろしいでしょうか。
006763垢版03/02/16 22:18ID:???
突っ込み無い…（´・ω・`）ｼｮﾎﾞｰﾝ
0072nobodyさん垢版03/02/18 21:52ID:???
正直perl以外は（´・ω・`）ｼｮﾎﾞｰﾝ
0073nobodyさん垢版03/02/18 22:17ID:???
時代はPHPか。
勉強してみるか(お。
0078山崎渉垢版03/04/20 06:04ID:???
　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）
0079 ◆garnetGnNk 垢版03/04/20 21:46ID:???
反応なしかyo!
というか、面倒くなったのであと誰かよろ。
0080nobodyさん垢版03/04/20 23:39ID:???
１７氏の手に入った。
PATHINFO対応に改造するにはどうすればいいでつか？
0081nobodyさん垢版03/04/21 03:04ID:???
>>80
PATHINFO対応の他のBBSのソースを参考にしたら？
0082 ◆garnetGnNk 垢版03/05/05 19:13ID:o0tvPWt6
誰も突っ込みいれてない（´・ω・`）
一応動くんだけどなー。
誰か試してくれないかなー。
0083nobodyさん垢版03/05/05 19:20ID:uopb4ZqD
>>82
これはbbs.cgiをＣで書いたやつとかですか？
0084 ◆garnetGnNk 垢版03/05/05 20:13ID:o0tvPWt6
そだよ。
まだ足りない機能もあるけど＾＾；
0085nobodyさん垢版03/05/05 21:06ID:xzfVtRnc
>>84
ダウンロードとコンパイル出来ました。
ＲｅｄＨａｔ８です。
２ｃｈ初心者で申し訳無いんですけど、起動の方法がわかりません。
「ERROR：POSTしてください！」とか出ました。
0087 ◆garnetGnNk 垢版03/05/06 07:24ID:VK0iAUmq
コンパイルは適当に
gcc -O2 -Wall -o bbs.cgi bbs.c
とやればいいと思ふ。

＞85
コンソールじゃなくて、CGIで起動しているんだよね？
環境変数がセットされてないのかなぁ？
ごめん、よくわからないや＾＾；
0088nobodyさん垢版03/05/06 09:35ID:???
=""とかけばよいものを、="\0"と書くのがわからない。つーか静的なんだから自動的に0に初期化されるね。
staticのついていない関数の宣言はヘッダーファイルでした方がいいよ。
getenvがNULLを返さないかどうか監視しないと、strcmp等で悲惨な結果を生むことがあるだろう。例え(環境変数が)定義されていないはずがないと思っても。
もしもデコード対象の文字列が%で終わっていたらhex_packでまずいことになるかもね。hex_packでもきちんと文字列をチェックするか、decodeで2バイトstrncpyしてstrtolするといいよ。
mallocの戻り値をチェックしているところもあればしていないところも・・・

ところで、なんで*.hファイル(ヘッダーファイルだよね？)で関数の定義をしているの？(^_^;)

>>85
書き込み用のフォームを用意していないからでしょ。直接bbs.cgiにアクセスすればそりゃあそのエラーが出るよ。
あとはPOSTじゃなくて小文字でpostだったりすると(そこは非標準関数のstrcasecmpを使えばうまくゆくね)。
>>87
コンソールから起動すれば多分Segmentation Faultが出るよ(理由は上述)。
0089nobodyさん垢版03/05/06 11:12ID:ODhBfC+Q
>>87
SETTING.TXTが2chとは違うようだけど。
0090 ◆garnetGnNk 垢版03/05/06 11:17ID:VK0iAUmq
＞88
突っ込み多謝ですm(_ _)m

＞ところで、なんで*.hファイル(ヘッダーファイルだよね？)で関数の定義をしているの？(^_^;)
他のコードを書くのに便利そうな関数は別ファイルにしようかなぁと。
それなら*.cにしる！ってことなんですけれども＾＾；
0091 ◆garnetGnNk 垢版03/05/06 11:20ID:VK0iAUmq
＞89
実験室仕様です。
2chに合わせるにはbbs.hを書き換えればいいと思います。
若干（でもないけど）テンポラリファイルの仕様も違うけど、
多分大丈夫＾＾；
0092nobodyさん垢版03/05/06 13:26ID:ODhBfC+Q
>>91
書き換えるのがめんどいのでSETTING.TXTもアップしてけろ
0093nobodyさん垢版03/05/06 13:27ID:???
SETTINT.TXTをパースする仕組みがないのでは。
0094 ◆garnetGnNk 垢版03/05/06 14:00ID:VK0iAUmq
更新したー。
88さんの指摘と、ID生成部分の修正、DATファイルの書き込み判定を追加。

＞92
http://www90.sakura.ne.jp/~hoehoe/temp/kigaru/SETTING.TXT
bbs.hの書き換えは俺も面倒い＾＾；

＞93
文字列を分割する処理だよね？＜パース
これのことではない？

value = split( key, '=' );
split( value, '\n' );
0097 ◆dq7M./4Uw. 垢版03/05/18 01:04ID:???
男爵Cも書けるのか…
まぁそれはいいとしておいらはCはほとんど書けないから出番なしかなー。
0098山崎渉垢版03/05/22 02:01ID:???
━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━―
0099山崎渉垢版03/05/28 17:20ID:???
　　　 　∧＿∧
ﾋﾟｭ.ｰ　(　　＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。
　　＝〔~∪￣￣〕
　　＝ ◎――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉
0100コナン ◆Hj.s1.SYl2 垢版03/06/01 18:47ID:???
今だ！100ゲットォォｫｫ！！
￣￣￣￣￣∨￣￣￣　　　　　　　(´´
　　　　 ∧∧　　　）　　　　　　(´⌒(´
　　⊂（ﾟДﾟ⊂⌒｀つ≡≡≡(´⌒;;;≡≡≡
　　　　　　 ￣￣　 (´⌒(´⌒;;
新着レスの表示
レスを投稿する

ニューススポーツなんでも実況