2012-06-13

Author: pi8027

2012-06-13/913.c

@@ -0,0 +1,46 @@
+#include<fcntl.h>
+#include<stdio.h>
+#include<stdlib.h>
+#include<string.h>
+#include<gdbm-ndbm.h>
+
+int main(void){
+    DBM *counterdb;
+    datum key, value;
+    char *query_string;
+    int value_body;
+    fputs("Content-Type: text/plain; charset=utf-8\n\n", stdout);
+    query_string = getenv("QUERY_STRING");
+    if(!query_string) query_string = "";
+    counterdb = dbm_open("counterdb", O_RDWR | O_CREAT,
+        S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH);
+    if(!counterdb){
+        fputs("database error.\n", stdout);
+        return 0;
+    }
+    if(query_string[0] == '\0'){
+        for(key = dbm_firstkey(counterdb); key.dptr != NULL;
+                key = dbm_nextkey(counterdb)){
+            value = dbm_fetch(counterdb, key);
+            fwrite(key.dptr, 1, key.dsize, stdout);
+            fputs(" = ", stdout);
+            printf("%d\n", *(int *)value.dptr);
+        }
+    }
+    else{
+        key.dptr = query_string;
+        key.dsize = strlen(query_string);
+        value = dbm_fetch(counterdb, key);
+        if(value.dptr)
+            (*(int *)value.dptr)++;
+        else{
+            value_body = 1;
+            value.dptr = (char *)&value_body;
+            value.dsize = sizeof(int);
+        }
+        dbm_store(counterdb, key, value, DBM_REPLACE);
+        printf("%d\n", *(int *)value.dptr);
+    }
+    dbm_close(counterdb);
+    return 0;
+}

2012-06-13/OMakefile

@@ -0,0 +1,8 @@
+CFLAGS += -g -lgdbm_compat
+
+CProgram(913, 913)
+
+report: ../lib.m4 report.m4 913.c
+	m4 report.m4 | nkf -W8 -e > report
+
+.DEFAULT: report

2012-06-13/report.m4

@@ -0,0 +1,21 @@
+include(`../lib.m4')dnl
+header(`9', `913', `WWWプログラミング')dnl
+
+今回用いたプログラムのソースコードを以下に示す。
+
+source(`913.c')dnl
+
+この CGI は、複数の名前付きカウンタを提供する。データの保存、読み出しには gdbm
+ライブラリを用いた。
+
+このプログラムは、環境変数 QUERY_STRING がセットされていないか空のどちらかであれ
+ば、データベースの情報全てを読み出して出力する。環境変数 QUERY_STRING が空でない
+文字列であれば、その文字列をキーとしてデータベースから値を読み出し、インクリメン
+トした値を同じキーで書き込み、インクリメント後の値を出力する。
+
+http://www.coins.tsukuba.ac.jp/~s1111365/syspro/2012-06-13/913 に今回作成した
+CGI を設置した。この URI でアクセスすると全てのカウンタの情報を出力し、末尾に ?
+とカウンタ名を付けてアクセスすると指定したカウンタをインクリメントし、インクリメ
+ント後のカウンタの値を出力する。
+
+footer()dnl

OMakeroot

@@ -3,4 +3,4 @@ open build/C
 
 DefineCommandVars()
 
-.SUBDIRS: . 2012-04-18 2012-04-25 2012-05-02 2012-05-09 2012-05-16
+.SUBDIRS: . 2012-04-18 2012-04-25 2012-05-02 2012-05-09 2012-06-13