cgiġ ͼġ
е ַ ۼ, cgi
Դϴ. cgi ο
Ǿ ֽϴٸ, ũƮ ġ ̶
cgi 鼭 Ͻñ
ٶϴ.
Ϲ pc
α cgiα ġ
־߸ ۵ մϴ. ̴ cgiα
ġ ȯ ٸ Դϴ.
Դϴ. ġϴĿ
μ ϴ. TECHNOTE-2001 config.cgi
Ͽ ֽϴ. ο
ٿ ־ϴٸ, ġ ʺڿԴ
ذ ʴ մϴ. ⼭
Ұ ڼ Ϸ մϴ.
config.cgi ٸ
ϰ Ѿ ڽϴ. main.cgi,
index.cgi, read.cgi, help.cgi, print.cgi , infor.cgi , iboard.cgi,
sendmail.cgi ϵ perl θ
ָ ˴ϴ. ('perl ζ' perl cgi ۵ ϴ
perl α θ մϴ.) cgiϵ ؽƮ
ù #!/usr/bin/perl Ǿ ֽϴ. ڽ ȯ ٸ
쿡 Ͻʽÿ. κ ̿ Դϴ.
#!/usr/local/bin/perl Ǿ ִ ֽϴ. ڴٸ ڳ
Ʈ "whereis perl " Ȥ
"which perl " ϸ ֽϴ.
ڿ Ͻʽÿ. տ '#!'
ּ ƴմϴ ݵ ʽÿ. (windows NT , 98
ʿ ϴ.) ƴٸ ٽ Ͻõ Ϲ
ؽƮ Ͻʽÿ. ʺ е ϴ Ǽ
ϳ ϼ ٽ unicode text Ϸ
ϴ Դϴ. ݵ ƹ Ϲ ؽƮ
Ͻʽÿ. ִ'config.cgi'
̴. ȣ 'config.cgi'
ȣ ϴ. 'URL'̶ ' http://www.technote.co.kr/~abcd
' ζ ȣ( ּ) ϸ,
'(PATH)' ǻ() θ ϴ μ
н迭 ' /usr/home/abcd/cgi-bin/.../... ' ǥؾ
Ѵ. windows windows NT 쿡 ǥ
̺ ؾ ' C:/usr/home/abcd/cgi-bin/.../...
' ǥص ȴ. 'URL' '' ȥ
⸦... , (PATH) η ־
. η ÿ main.cgi ġ
ؼ ϸ ȴ. , ' .
' 丮 ǹϸ ' .. ' Ѵܰ 丮
ǹѴ. ٿ ް,
ġ¿ ϰ ״ ġ ϴٸ Ʒ
' ο URL ' ʿ . ⺻ ´
ο URL Ǿ , 丮
cgi ϴٴ ̴. ü url, θ
ص . cgi-bin 丮
⺻ ġ ״ ġ cgi-bin丮
cgi ũƮ 丮 Ǿ ִٸ
̹ µ ̴. ̶ ̹ 丮(image)
cgi-bin ̿ ο ġ ְ Ʒ [4]
ش 丮 url ָ ȴ. ۹̼
Բ ÷ε install.shl ѹ Ű ѹ
ذȴ. install.shl Űؼ install.shl
ü chmod 755 ־ Ѵ. ״ ڳƮ
'./install.shl ' ϸ ۹̼ Ϸȴ. ڳ
Ʈ ۹̼ ൵ .
ʺڿԴ FTP ̿ ۹̼ ϴ.(readme2.html
) technote 丮 ۹̼ chmod 755 cgi
۹̼ chmod 755 ̹ ϰ 丮
chmod 777 Ȥ 776 Ȥ 766 ϸ ȴ.
'config.cgi' ̴.
[1] [2] [3] [4]
[5] ݵ ϵ Ѵ.
ȯ濡 Ǵ ȿ Ͽ
ʿ䰡 ִ.
Ʒ ϸ ũƮ ϰ ְ
̴. [1] TECHNOTE-2001
( 8 ϸ ĭ ־ Ұ)
$scripimport='arqeb'; <> ý Ȱ "TECHNOTE"
ġǾ ִ Ȳ A "ũƮ"
B "ũƮ" ̵ , ڹٽũƮ
Ȥ Ű(湮 ν) ȥ ų Ƿ
̸ ֱ ̴.
Ϸ ָ ȴ. (йȣʹ ) ũƮ
߿ ̰ ϸ 湮 ν(̸, , 湮Ƚ)
ٽ ʱȭȴ. [2] TECHNOTE-2001
( 8 ϸ ĭ ־ Ұ)
$frankscrip='uirsx';
<> Ű ̴.
[1] ̴. йȣʹ .
[3] ڵ Ǵ BOARD
⺻ йȣ( ٰ) $Automkpass='bigt'; <> ũƮ BOARD ϴ
̴. 1. հ(ROOT) ϴ
2. Ͽ ⺻ 'FREE_BOARD' 丮 ̸ Ͽ
ε ۹̼ ִ
. 3. ʴ BOARD ζ URL ȣϿ
ڵ ǰ ϴ . (, http://www.abcd.com/technote/main.cgi?board=boardname)
3
ȴ. ܾ 3
ڵ BOARD ⺻ ȣ ȴ.
1 2 BOARD ⺻ йȣ
հ йȣ ϰ ȴ. 'հ
йȣ'' BOARD йȣ' ȥ ٶ.
հ йȣ ũƮ BOARD
(ROOT) ȣ ϸ
, BOARD ȣ ũƮ س BOARD
ִ
ȣ Ѵ. [4] ̹
丮 'URL' (http://www.abcdefh.com/technote/image)
$img_dir_url='./image'; <>
ó ϸ 'technote/image' 丮()
̴. ġ 丮 ġ url ־ָ ȴ.
´ μ · ġ
쿡 ̴ ξ dz, ¿ ٸ image 丮
ġߴٸ ݵ ־ Ѵ.(, http://abcd.com/~myhome/icon/image)
ũƮ ġ image θ ϸ
ȴ. [5] main.cgi
, index.cgi ,read.cgi ... ġ 丮 'URL' (http://www.abcdefg.com/technote)
$cgi_dir_url='.'; <>
'technote' 丮 URL ش. ´ main.cgi
η Ǿ ִ. '.' Ǿ ִ main.cgi
ٷ 'technote' 丮 ġ Ƿ 丮
̴. 'technote' 丮 ü url
־ ϴ. (, http://www.abcd.net/technote)
÷(ε)ߴµ
µ ʴ´ٸ ݵ
ü URL ϵ Ѵ.
ýۿ cgiwrap ִٸ
cgiwrap Ե url ָ ȴ. cgi ۵
ڴ 'nobody' , cgiwrap
ϸ ڽ ̵ ȴ. cgiwrap
ִ ȯ̶ cgiwrap ϴ° پ ۵
Ѵ. cgiwrap ȯ渶 ٸ. ), 'http://abc.net/cgi-bin/cgiwrap/~myid/technote'
), 'http://abc.net/cgi-sys/cgiwrap/~myid/technote'
[6] 丮($cgi_dir_url
= '.';) ũƮ Ǿ ־ # Ϲ
htm, gif ϵ cgi ϸ ν Ǵ
̶ '2' ϶. # ʰ cgi , htm ,gif
ִ 丮 '1' ϶. $cgi_dir_appoint='1'; [7]board 丮
'URL' (http://www.abcdef.com/technote/board) $board_dir_url='./board'; <> technote/board 丮
ִ. شǴ url ϸ ȴ.
main.cgi ϱ η Ǿ ִ. [8] հ
(index.cgi) ȣ йȣ Ϸ '2',
OPEN Ű '1' . $MastersEnter='1'; <> հ(ROOT) index.cgi
ȣϸ µȴ. 1 ϸ ٷ հ
ȣǰ, 2 ϸ йȣ ־߸
հ ְ ȴ. [9] BOARD
丮 (, /usr/home/public_html/technote/board)
# Ȥ () $board_dir_path='./board'; <> technote/board 丮
ִ. شǴ θ ϸ ȴ.
main.cgi ϱ η Ǿ ִ.
[10] 'config' 丮 (,
/usr/home/public_html/technote/config) # Ȥ
() $config_dir_path='./config';
<> technote/config 丮
ִ. شǴ θ ϸ ȴ.
main.cgi ϱ η Ǿ ִ.
[11]
(Ų) 丮 (, /usr/home/public_html/technote/config/menu)
# Ȥ () $menu_dir_path='./config/menu';
<> technote/config/menu
丮 ִ. شǴ θ ϸ
ȴ. main.cgi ϱ η Ǿ ִ.
丮 ִ 丮̴. ο
ϸ 丮 ȴ. ũƮ
ġ 丮 θ ִ.
[12]
BOARD 'ȳ' ư µ 'URL' #
ġĿ
$infor_file_url='./infor.cgi'; <>
BOARD 'ȳ' ư ִ. ư Ŭ
µ URL ִ´. URL ߿ BOARD
'' ٽ Ҽ ִ.
⺻ ϴ ͻ̴.
[13]
CGI ̺귯 丮 Ȥ ()
$lib_dir_path='./library';
<> technote/library 丮 ִ.
شǴ θ ϸ ȴ. main.cgi
ϱ η Ǿ ִ. ũƮ ġ
丮 θ ִ.
[14] ڵ ڵð $backuptime = '3'; <> BOARD
'' 'ڵ ' ָ ð
ϵŸ Ͽ ڵ Ͽ ϰ ȴ.
ڵ ð Ѵ.
[15] CGI ' ' ϸ $maincgorfile='main.cgi'; $madecg='index.cgi';
$readcg='read.cgi';
$helfcg='help.cgi';
$imgcg='print.cgi';
$paycg='pay.cgi';
$inforcg='infor.cgi';
<> κ CGI Ȯڴ 'cgi' ̴. Ȥ
'pl' Ȯڸ ؾߐ cgi ۵Ǵ ִ.
̰ , ' ' Ȯڵ 'pl' ٲٰ Ե
ϸ ٲش. ϸ ü Ƿ ٲپ
ϰ 쿡 ̸ ٲٰ
ϸ ٲپָ ȴ. [16]
BOARD ϸ $loginfile ='logfile.cgi';
$configfile='config.cgi';
$indexfile='index.cgi';
$backupfile='backup.cgi';
$countfile='counter.cgi';
$countfile2='counter2.cgi';
$inforfile='index.html';
$idlistfile='idlist.cgi';
$idbackup='idbackup.cgi';
$idcount='idcount.cgi';
$idcntbackup='idcntbackup.cgi';
$idtempfile='idtemp.cgi';
$tempfile='temp.cgi';
$pointfile ='point.cgi';
$ptbackup='ptback.cgi';
$pointck='check.cgi';
$autobackup='autobackup.cgi';
$autoread='autoread.cgi';
$hitfile='hit.cgi';
$hitfile2='hit2.cgi';
$hitfile3='hit3.cgi';
$lockfile='filelock';
$dncount='dncount.cgi';
$dncount2='dncount2.cgi';
$shconfig='shconfig.cgi';
$accum='accum.cgi';
$accum2='accum2.cgi';
$htpasswd='htpasswd.cgi';
<> BOARD ϴ
ϵ̴. ϵ BOARD 䱸 뵵
ȣȴ. ϸ ָ Ǵ
BOARD ϵ ⼭ ϸ ȴ.
ó ġÿ ִ. ߿ ϸ
ν ϹǷ BOARD Խù
µ ʴ´.
ũƮ2000 Ȯڰ 'txt' Ǿ Ǿ.
´ ġ ߴٸ ϸ Ȯڸ txt
ְų ƴϸ ̹ Ǿ ִ Ȯڸ
cgi ־ Ѵ.
[17]
Խù - Ȯ $filename_exp='cgi'; <> ο Ÿ ÷ ο
ȴ. Ǵ Ȯڸ ִ
̴. Ǵ BOARD Խù ϵ ⼭
Ȯڷ ȴ. technote/board/text 丮
Ͽ شѴ. ó ġÿ ִ.
߿ ϸ ν ϹǷ
BOARD Խù µ ʴ´. ũƮ2000 Ȯڰ 'txt'
Ǿ Ǿ. ´ ġ ߴٸ
ϸ Ȯڸ txt ְų ƴϸ ̹ Ǿ
ִ Ȯڸ cgi ־ Ѵ. [18]
BOARD Խù Ÿ 丮 $textdir='text';
$uploaddir='upfile';
$upimgdir='upimg';
$shopdir='shop'; <>BOARD
ڷᰡ Ǵ 丮 ̸̴. ⼭ ̸ ٲپ
ָ Ǵ 丮 丮
ȴ. ߿ ٲ .
[19] 1 丮 Խù
# (Խù ⼭
Ѽ ʰ 丮 ڵ) $text_dir_maximum='1500';
<> Ÿ ϳ
丮(technote/board/text) Ǹ
Ѱ ִ.
2000 ϴ. Ѱ ̸
μ ڵ ذǰ Ѵ. ⼭ ڸŭ
Ǹ ڵ ο 丮 Ǹ鼭,
ϵǴ ڷ ο 丮 ġϰ ȴ.
ý۸ Ѱ ٸ ִ. Խù
1500 ̻ Ѵٸ
ڸ ϰ
Ѵ. [20]
亯 (ǰֱ߳) $Opiniontitle='[ǰ]'; <> ԽǷ , ϵ ۿ
ٸ 湮ڰ ǰ ̰ų ߰
ְ ִ. BOARD ''
Ѵ. ̱ Էʵ Ÿ
̴. [21]
Ϲ Ϸ νĵ Ȯ (÷,ũ
ڽâ Ѵ) $Real_sound_file
= (".mov.avi.rm.mpg.ram.mp3.mp2.mpa.m1v.m3u.rmm.rmi.ra.aif.aifc.au.qt.mpeg.mid.wav.snd.asf.");
<> Ȯڸ ε
ϰų ũϸ AUDIO Ϸ νϿ ٿε auto player
â Ѵ. AUDIO Ϸ ν Ȯڸ ߰
ϰų Ѵ. auto player â
Ȯ ȴ.
[22] Ϸ νĵ Ȯ - ڽâ ϸ,
ȭũⰡ ڵȴ. $Real_movi_file=
(".mov.avi.rm.mpg."); <>
[21] Ȯ Ϸ νĵ
Ȯڸ ش. [23]
ũ Ȯڱ #
Խù Ͻ 'ϸũ' , # Ʒ
Ȯڸ ƴ϶ â Ѵ.
$linkfile_type_conf= (".zip.tar.g.arj.rar.zoo.pak.gz.hwp.exe.ram.mp3.mp2.mpa.m1v.m3u.rmm.rmi.ra.aif.aifc.au.qt.mpeg.mid.wav.snd.asf.mov.avi.rm.mpg.");
<> '۾' Է
'URLũ' ũŲ URL ⺻
νϿ â 鼭 µȴ. ũŲ URL ߿
ƴ, Ϲ Ϸ νĵ Ȯڸ Ѵ. ⼭
Ȯڴ â ʰ â ų ٿε
ް Ѵ. [24] ũƮ
HTM ¼ҽ <HEAD>..</HEAD> ±׳
$Htm_in_head= qq! <meta http-equiv="Content-Type"
content="text/html; charset=euc-kr"> !;
<> ũƮ µǴ
html <head></head>±׳ Ե ±
߰ ִ. [25] ǥ
ִ =w , =h $Graph_w='260';
$Graph_h='9'; <>
' ' ǥ ½ ǥ
µǴµ ִ ̿ Ѵ.
[26] ü
$Subchange=''; <> ' '
ۿ Ͽ main table ½ ü
ڸ Ѵ [27]
̹ 丮 URL $Baseimg_url="$img_dir_url/baseicon";
$Faceimg_url="$img_dir_url/face";
$Userimg_url="$img_dir_url/userimage"; <> [4] ̹丮
丮 ̴. ״ Ѱ.
[28] ⺻ ϸ() # $BoardLanguage2
= "Lang-"."$BoardLanguage".".cgi";
# [29]
ũƮ $technoteversion='2001';
[30]
Ű ȿⰣ $expDate='Sunday,
31-Dec-01 23:59:59 GMT'; <>
湮ڰ ų Ȥ ̵ ϸ BOARD
Ͽ ʰ ÿ 湮 ǻͿ ȴ.
湮 ǻͿ ӽ 湮ڸ νϴ
Ұ ȴ. ̰ 'Ű' Ѵ. Ⱓ
湮 ǻͿ ڵ ŵȴ.
ȿⰣ ָ ȴ. ´ 2001,
12 31 Ͽ 23:59:59 ȿϰ Ǿ ִ.
[31]
Ű _1 --- ۾̸,,Ȩ,̵ νİ
$expPath='';
[32]
Ű _2 --- ̵,
$expPath2='';
[33] ÷/ũ
Ȯ п ̹ sub
Get_icon_type{
my($R_file,$R_num) = @_; return
'filetxt.gif' if($R_file
=~ /\.(htm|txt|html)/i);
return 'zip.gif' if($R_file
=~ /\.(zip|arj|tar|z|gz|pak|rar|zoo)/i); return
'exe.gif' if($R_file
=~ /\.(exe|bat)/i); return 'filegr.gif' if($R_file
=~ /\.(gif|jpg|psp|bmp|jpeg|cdr|tif|pcx|psd|hgi|drw)/i);
return 'hwp.gif' if($R_file
=~ /\.(hwp)/i); return 'movie.gif' if($R_file
=~ /\.(mov|avi|rm|mpg)/i); return
'music.gif' if($R_file =~
/\.(ram|mp3|mp2|mpa|m1v|m3u|rmm|rmi|ra|aif|aifc|aiff|au|qt|mpeg|mid|wav|snd|asf)/i);
return 'file.gif' if($R_num
== 17); return 'link.gif' ;
} <>忡 ÷ Ȥ ϸũ
̸ ǥϴ Ȯڷ Ͽ ϰ
Ǵµ Ȯ п
ش. ߰ϰų ִ. ǥ
ִ 丮 technote/image/subjecticon/1~n 丮̴.
ο ־ ְ [33] ߰
ָ ȴ. [34]
湮 ν, λ ¹. <> 忡 湮ڰ
Ȳ λ ش. λ
ȭϰų ִ. λ ƿ ַ
ġ Ϸ []-[main̺]-[¿ɼ]
λ ¿ɼ ϸ ȴ.
[35] 湮 ν, λ ¹. <>
[36]
¹ <> ִ ̴. Ӱ
ؼ ص ȴ.
[37] Ǵ , Ȥ 丮 ۹̼
ϴ ƾ. <> Ǵ Խù Ͻ
Ǵ ϰ 丮 ۹̼ ش. windows
ƹ ǹ . END
Copyright 1999~ TECHNOTE INC all rights reserved.
http://www.technote.co.kr info@cgitour.net
|