Perl vs. PHP vs. Rubyと言われているこの時代に
shスクリプトでcgiを書いている奴っていますか。
周りからは生きた化石と言われながら、頑固一徹
shスクリプトのcgiの可能性にかけている。
そんなcgi職人、集まれ!
shスクリプトでcgi
1nobodyさん
03/03/20 01:27ID:zBrN4BPB03/03/20 02:17ID:???
Cでcgiを書いてますが何か?
↓C++で書いてるヤシ
↓C++で書いてるヤシ
03/03/20 02:58ID:???
低パワーマシンで perl や python では重すぎる
CGI でシェルスクリプト使ったりします。
CGI でシェルスクリプト使ったりします。
03/03/20 07:31ID:???
5nobodyさん
03/03/20 08:00ID:0FfyPGzB #!/bin/sh
echo "Coutent-type:text/html;charse:Shift_JIS\r\n\r\n逝ってよし"
echo "Coutent-type:text/html;charse:Shift_JIS\r\n\r\n逝ってよし"
03/03/20 13:39ID:???
かけないこともないが
perlで重くてシェルスクリプトで軽いってことは
そんなにないだろう?
もしそうなのならマシンを見直す必要があると思うが・・・
WinのバッチファイルでCGI組んでるやつの方が
まだネタになるぞ
perlで重くてシェルスクリプトで軽いってことは
そんなにないだろう?
もしそうなのならマシンを見直す必要があると思うが・・・
WinのバッチファイルでCGI組んでるやつの方が
まだネタになるぞ
03/03/20 23:27ID:???
> WinのバッチファイルでCGI
すごい穴になりそうだな
すごい穴になりそうだな
8nobodyさん
03/03/21 00:42ID:dpOkqofd shスリプトでここまでできたという事例が聞ければうれしっす。
/bin/sh
/bin/sh
10nobodyさん
03/03/21 07:21ID:??? C++ with MFC で家庭内LAN用のCGI作ろうとしてますが、何か?
# CStringマンセー
# CStringマンセー
11nobodyさん
03/03/21 09:19ID:??? 機会があればschemeで作ろうとしてるんですけど割と神ですか?
12nobodyさん
03/03/21 09:33ID:??? どこかで404とかのドキュメントを
ブラウザの環境変数であれこれする
shスクリプト見たような気がする
ブラウザの環境変数であれこれする
shスクリプト見たような気がする
13nobodyさん
03/03/21 17:27ID:??? shbbs.cgi (1/2)
#! /bin/sh
if [ $REQUEST_METHOD = "POST" ]
then
cp log.txt dummy.txt
printf "`cat -| awk -f filt.awk`" | sed -f filt.sed >> dummy.txt
printf "<br>\n" >> dummy.txt
tail -30 dummy.txt > log.txt
fi
cat <<END_OF_HEADER
Content-type: text/html; charset=EUC-JP
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html lang="ja">
<head>
<meta http-equiv="Content-Script-Type" content="text/javascript">
<meta http-equiv="content-type" content="text/html; charset=EUC-JP">
<title>/bin/sh BBS</title>
</head>
<body onLoad="LoadCookie()">
<script type="text/javascript"><!--
function SaveCookie(val){
document.cookie = "handle_name="+escape(val)+"; path=/;";
}
#! /bin/sh
if [ $REQUEST_METHOD = "POST" ]
then
cp log.txt dummy.txt
printf "`cat -| awk -f filt.awk`" | sed -f filt.sed >> dummy.txt
printf "<br>\n" >> dummy.txt
tail -30 dummy.txt > log.txt
fi
cat <<END_OF_HEADER
Content-type: text/html; charset=EUC-JP
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html lang="ja">
<head>
<meta http-equiv="Content-Script-Type" content="text/javascript">
<meta http-equiv="content-type" content="text/html; charset=EUC-JP">
<title>/bin/sh BBS</title>
</head>
<body onLoad="LoadCookie()">
<script type="text/javascript"><!--
function SaveCookie(val){
document.cookie = "handle_name="+escape(val)+"; path=/;";
}
14nobodyさん
03/03/21 17:29ID:??? sshbbs.cgi (2/3)
function LoadCookie(){
var cookies = document.cookie.split(";"), value = "";
for(var i = 0; i < cookies.length; i++){
var piece = cookies[i].split("=");
if (piece[0].replace(" ","") == "handle_name"){
if (piece[1] != null){
document.forms[0].name.value =
unescape(piece[1]);
}
break;
}
}
}
--></script>
<h1 align="center">/bin/sh BBS</h1>
<hr>
<dl>
<dd>
END_OF_HEADER
cat log.txt
function LoadCookie(){
var cookies = document.cookie.split(";"), value = "";
for(var i = 0; i < cookies.length; i++){
var piece = cookies[i].split("=");
if (piece[0].replace(" ","") == "handle_name"){
if (piece[1] != null){
document.forms[0].name.value =
unescape(piece[1]);
}
break;
}
}
}
--></script>
<h1 align="center">/bin/sh BBS</h1>
<hr>
<dl>
<dd>
END_OF_HEADER
cat log.txt
15nobodyさん
03/03/21 17:29ID:??? snbbs.cgi (3/3)
cat <<END_OF_FOOTER
</dd>
</dl>
<hr>
<a name="form">post form</a>
<form method="POST" action="shbbs.cgi#form" onSubmit="SaveCookie(this.name.value)">
name: <input name="name" size="19"> message: <input name="message" size="80"> <input type="submit" value="Write">
</form>
<div align="right"><a href="shbbs.cgi#form">Reload</a></div>
<hr>
<div align="right">/bin/sh BBS ver 1.0</div>
</body>
</html>
END_OF_FOOTER
cat <<END_OF_FOOTER
</dd>
</dl>
<hr>
<a name="form">post form</a>
<form method="POST" action="shbbs.cgi#form" onSubmit="SaveCookie(this.name.value)">
name: <input name="name" size="19"> message: <input name="message" size="80"> <input type="submit" value="Write">
</form>
<div align="right"><a href="shbbs.cgi#form">Reload</a></div>
<hr>
<div align="right">/bin/sh BBS ver 1.0</div>
</body>
</html>
END_OF_FOOTER
16nobodyさん
03/03/21 17:30ID:??? filt.awk(1/3)
BEGIN {
FS="="
RS="&"
}
{
key = "0123456789ABCDEFabcdef"
str = ""
i = 1
while(i <= length($2)){
d = substr($2, i, 1)
i++
if (d == "%"){
oct = 0
for(j = 0; j < 2; j++){
oct *= 16
d = substr($2, i, 1)
i++
for(k = 1; k < length(key); k++){
if (d == substr(key, k, 1)){
if (k > 16) k -= 6
oct += k-1
break
}
}
}
BEGIN {
FS="="
RS="&"
}
{
key = "0123456789ABCDEFabcdef"
str = ""
i = 1
while(i <= length($2)){
d = substr($2, i, 1)
i++
if (d == "%"){
oct = 0
for(j = 0; j < 2; j++){
oct *= 16
d = substr($2, i, 1)
i++
for(k = 1; k < length(key); k++){
if (d == substr(key, k, 1)){
if (k > 16) k -= 6
oct += k-1
break
}
}
}
17nobodyさん
03/03/21 17:31ID:??? filt.awk (2/3)
# if (oct > 127) oct = 32
if (oct < 32) oct = 32
col = 64
dec = ""
while(col > 0){
d = int(oct/col)
dec = (dec d)
oct -= d*col
col = int(col/8)
}
str = (str "\\" dec)
} else {
if (d == "+") d = " "
str = (str d)
}
}
$2 = str
}
# if (oct > 127) oct = 32
if (oct < 32) oct = 32
col = 64
dec = ""
while(col > 0){
d = int(oct/col)
dec = (dec d)
oct -= d*col
col = int(col/8)
}
str = (str "\\" dec)
} else {
if (d == "+") d = " "
str = (str d)
}
}
$2 = str
}
18nobodyさん
03/03/21 17:32ID:??? filt.awk (3/3)
$1 == "name" {
name = $2
}
$1 == "message" {
message = $2
}
END {
RS = "\n"
"date +'%y/%m/%d %T'" | getline time
print ("[" time ": " name "] " message)
}
$1 == "name" {
name = $2
}
$1 == "message" {
message = $2
}
END {
RS = "\n"
"date +'%y/%m/%d %T'" | getline time
print ("[" time ": " name "] " message)
}
19nobodyさん
03/03/21 17:32ID:??? filt.sed (1/1)
s/&/\&/g
s/</\</g
s/>/\>/g
s/"/\"/g
s/&/\&/g
s/</\</g
s/>/\>/g
s/"/\"/g
22nobodyさん
03/03/21 18:02ID:??? うえーん!ソースコピペ荒らし反対!!!
24nobodyさん
03/03/22 12:41ID:Ve1PHIbC26nobodyさん
03/03/23 14:34ID:emAJ6ArI shスクリプトで投稿文のデコードはどう行なうの?
http://www.mahoroba.ne.jp/~makkie7/CGI/cgi_008.html
ここ見ながら勉強を初めたのだが、うちのサーバーには
cgiparseというソフトが見あたらない。そのHPにはNCSA
のサーバなら附属してくるとなっているが、 当方Apache
なので。。。
どなたか御教示を頂ければ。
http://www.mahoroba.ne.jp/~makkie7/CGI/cgi_008.html
ここ見ながら勉強を初めたのだが、うちのサーバーには
cgiparseというソフトが見あたらない。そのHPにはNCSA
のサーバなら附属してくるとなっているが、 当方Apache
なので。。。
どなたか御教示を頂ければ。
27nobodyさん
03/03/23 15:21ID:??? >>26
作ろか?標準入力から入ってきたデータURLデコードするプログラム。
って言うかawkでも使えば?じゃあPerl使った方が早いなぁ・・・。
って言うかPerlの関数呼び出しとshのプロセス起動させまくり、どっちが軽いの?
作ろか?標準入力から入ってきたデータURLデコードするプログラム。
って言うかawkでも使えば?じゃあPerl使った方が早いなぁ・・・。
って言うかPerlの関数呼び出しとshのプロセス起動させまくり、どっちが軽いの?
28nobodyさん
03/03/23 15:33ID:emAJ6ArI29nobodyさん
03/03/23 17:48ID:??? >>28
27じゃないけど、単に標準入力から読んでデコードして標準出力に書き出すだけならこれでいいかな。
きちんとテストしていないけど。一度全てバッファに取り込んだ方がいいかな?
#include <stdio.h>
#include <stdlib.h>
int main()
{
char s[3]={0};
int c;
while((c=getchar())!=EOF){
switch(c){
case '+':
putchar(' ');
break;
case '%':
s[0]=((c=getchar())==EOF)?'\0':c;
s[1]=((c=getchar())==EOF)?'\0':c;
putchar(strtol(s,NULL,16));
break;
default:
putchar(c);
break;
}
}
return 0;
}
27じゃないけど、単に標準入力から読んでデコードして標準出力に書き出すだけならこれでいいかな。
きちんとテストしていないけど。一度全てバッファに取り込んだ方がいいかな?
#include <stdio.h>
#include <stdlib.h>
int main()
{
char s[3]={0};
int c;
while((c=getchar())!=EOF){
switch(c){
case '+':
putchar(' ');
break;
case '%':
s[0]=((c=getchar())==EOF)?'\0':c;
s[1]=((c=getchar())==EOF)?'\0':c;
putchar(strtol(s,NULL,16));
break;
default:
putchar(c);
break;
}
}
return 0;
}
30nobodyさん
03/03/23 21:53ID:emAJ6ArI03/03/23 22:26ID:???
sh スクリプトで URL デコード。
URL エンコードされてない無関係な文字列が入ってると破綻するけど。
% cat urldec.sh
#!/bin/sh
( echo ibase=16; echo obase=8; echo "$@" | tr a-z% A-Z\\n ) |\
bc |\
while read a; do
echo -e \\0$a
done |\
tr -d \\n
% sh urldec.sh %A4%DB%A4%B2
URL エンコードされてない無関係な文字列が入ってると破綻するけど。
% cat urldec.sh
#!/bin/sh
( echo ibase=16; echo obase=8; echo "$@" | tr a-z% A-Z\\n ) |\
bc |\
while read a; do
echo -e \\0$a
done |\
tr -d \\n
% sh urldec.sh %A4%DB%A4%B2
32nobodyさん
03/03/23 23:12ID:826klXke >>11
おいらLISP(clisp)でつくってるよ〜
#! /usr/bin/perl
open (MYLISP,">mylisp.lisp");
print MYLISP "S式";
close(MYLISP);
system("clisp mylisp.lisp");
こんなんだけど・・・
おいらLISP(clisp)でつくってるよ〜
#! /usr/bin/perl
open (MYLISP,">mylisp.lisp");
print MYLISP "S式";
close(MYLISP);
system("clisp mylisp.lisp");
こんなんだけど・・・
33nobodyさん
03/03/23 23:15ID:e2yFDnGv03/03/23 23:26ID:???
そういえば、cgi じゃなくて httpd そのものが
sh で書かれてるというのがあるんだった。
http://www.ascii.co.jp/pb/book1/announce/inet256/Source/shttpd
sh で書かれてるというのがあるんだった。
http://www.ascii.co.jp/pb/book1/announce/inet256/Source/shttpd
38nobodyさん
03/03/25 15:20ID:??? mod_brainfuck で…。(誰か使ってる人いない?)
39nobodyさん
03/03/29 00:47ID:??? なつかしーな。1994年ごろは、カウンタっていったら、shとperlが半々だったきがする
40nobodyさん
03/04/06 00:59ID:/7G2cvSN >>39
shスクリプトが生き残れなかったのはなんでだろう?
shスクリプトが生き残れなかったのはなんでだろう?
レスを投稿する
ニュース
- 普通免許で走れるEVトゥクトゥクが人気 維持費「1日20円」、30~50代に広がる新モビリティー [バイト歴50年★]
- 「相手役に恵まれすぎてた」「つぅーーーーせつに実感している」佐藤二朗、2度の楽屋訪問から2週間後に発信し削除した投稿が物議★13 [Ailuropoda melanoleuca★]
- 【芸能】有吉弘行 渡部建とトラブルの鬼越・良ちゃんに憤慨「吉本の人間は吉本以外はクソみたいなもん」 [冬月記者★]
- 【速報】『MLBドラフト』佐々木麟太郎 マーリンズが8巡目、全体235位で指名! 7月中にソフトバンク入り、大学残留との選択へ [冬月記者★]
- 【W杯】「フランスにフランス人はいない」準決勝で対戦するスペインの元首相の発言が大炎上「人種差別的な暴言」★2 [ネギうどん★]
- 【芸能】「おじさんはキャップを被るな」の風潮にとろサーモン・久保田が大反論! 「じゃあババアはミニスカートをはくなよと」 [冬月記者★]