Initial revision

git-svn-id: http://opensvn.csie.org/pttbbs/pttbbs/trunk/pttbbs@1 63ad8ddf-47c3-0310-b6dd-a9e9d9715204

1 files changed, 184 insertions, 0 deletions

diff --git a/mbbsd/indict.c b/mbbsd/indict.c
new file mode 100644
index 00000000..407b5ae9
--- /dev/null
+++ b/mbbsd/indict.c
@@ -0,0 +1,184 @@
+/* $Id: indict.c,v 1.1 2002/03/07 15:13:48 in2 Exp $ */
+#include <stdio.h>
+#include <string.h>
+#include <sys/types.h>
+#include "config.h"
+#include "pttstruct.h"
+#include "perm.h"
+#include "common.h"
+#include "modes.h"
+#include "proto.h"
+
+#define REFER "etc/dicts"
+
+extern userec_t cuser;
+char dict[41],database[41];
+
+static void addword(char word[]) {
+    char buf[150],temp[150],a[3];
+    FILE *fp = fopen(database,"r+");
+
+    fgets(buf,130,fp);
+    fseek(fp,0,2);
+    if(HAVE_PERM(PERM_LOGINOK)) {
+	clear();
+	move(4,0);
+	outs(" \033[31m警告\033[m:若蓄意填寫假資料將\033[36m砍id\033[m處份\n");
+	sprintf(temp, "\n輸入範利\n:\033[33m%s\033[m", buf);
+	outs(temp);
+	outs("\n請依上列範例輸入一行資料(直接enter放棄)\n");
+	getdata(10, 0, ":", buf, 65, DOECHO);
+	if(buf[0]) {
+	    getdata(13, 0, "確定新增?(Y/n)", a, 2, LCECHO);
+	    if(a[0] != 'n')
+		fprintf(fp, "%-65s[%s]\n", buf, cuser.userid);
+	}
+    }
+    fclose(fp);
+    clear();
+}
+
+static int choose_dict(void) {
+    int c;
+    FILE *fp;
+    char buf[10][21], data[10][21], cho[130];
+
+    move(12, 0);
+    clrtobot();
+    outs("                        "
+	 "● \033[45;33m字典唷 ◇ 要查哪一本？\033[m ●");
+
+    if((fp = fopen(REFER, "r"))) {
+	for(c = 0; fscanf(fp, "%s %s", buf[c], data[c]) != EOF; c++ ) {
+            sprintf(cho,"\n                     "
+		    "(\033[36m%d\033[m) %-20s大字典",c+1,buf[c]);
+            outs(cho);
+	}
+	
+	getdata(22, 14, "          ★ 請選擇，[Enter]離開：", cho, 3, LCECHO);
+	cho[0] -= '1';
+	if(cho[1])
+	    cho[0] = (cho[0] + 1) * 10 + (cho[1] - '1');
+	
+	if(cho[0] >= 0 && cho[0] < c) {
+	    strcpy(dict, buf[(int)cho[0]]);
+	    strcpy(database, data[(int)cho[0]]);
+	    return 1;
+	} else
+	    return 0;
+    }
+    return 0;
+}
+
+static char *lower(char str[]) {
+    int c;
+    static char temp[200];
+
+    strcpy(temp,str);
+    for(c = 0; temp[c] !=0; c++)
+	if(temp[c] >= 'A' && temp[c] <= 'Z')
+	    temp[c] += 'a' - 'A';
+    return temp;
+}
+
+int use_dict() {
+    FILE *fp;
+    char lang[150], word[80] = "";
+    char j, f, buf[120], sys[] = "|\033[31me\033[m:編籍字典";
+    int i = 0;
+    
+    setutmpmode(DICT);
+    if(!HAS_PERM(PERM_SYSOP))
+	sys[0]=0;
+    
+    clear();
+    
+    sprintf(buf,"\033[45m                           ●\033[1;44;33m"
+	    "  %-14s\033[3;45m ●                              ", dict);
+    strcpy(&buf[100],"\033[m\n");
+    for(;;) {
+	move(0, 0);
+	sprintf(lang, "  請輸入關鍵字串(%s) 或指令(h,t,a)\n", dict);
+	outs(lang);
+	sprintf(lang, "[\033[32m<關鍵字>\033[m|\033[32mh\033[m:help|\033[32m"
+		"t\033[m:所有資料|\033[32ma\033[m:新增資料%s]\n:", sys);
+	outs(lang);
+	getdata(2, 0, ":", word, 18, DOECHO);
+	outs("資料搜尋中請稍候....");
+	strcpy(word,lower(word));
+	if(word[0] == 0)
+	    return 0;
+	clear();
+	move(4, 0);
+	outs(buf);
+	if(strlen(word) == 1) {
+	    if(word[0] == 'a') {
+		clear();
+		move(4,0);
+		outs(buf);
+		addword(word);
+		continue;
+	    } else if(word[0] == 't')
+		word[0] = 0;
+	    else if(word[0] == 'h') {
+		more("etc/dict.hlp",YEA);
+		clear();
+		continue;
+	    } else if(word[0]=='e') {
+		vedit(database,NA, NULL);
+		clear();
+		continue;
+	    } else {
+		outs("字串太短,請輸入多一點關鍵字");
+		continue;
+	    }
+	}
+
+	if((fp = fopen(database,"r"))) {
+	    i = 0;
+	    while(fgets(lang,150,fp) != NULL) {
+		if(lang[65] == '[') {
+		    lang[65] = 0;
+		    f = 1;
+		} else
+		    f = 0;
+		if(strstr(lower(lang),word)) {
+		    if(f == 1)
+			lang[65] = '[';
+		    outs(lang);
+		    i++;
+		    if(!((i+1)%17)) {
+			move(23, 0);
+			outs("\033[45m                               "
+			     "任意鍵繼續  Q:離開                             "
+			     "\033[m ");
+			j = igetch();
+                        if(j == 'q')
+			    break;
+                        else {
+			    clear();
+			    move(4,0);
+			    outs(buf);
+                        }
+		    }
+		}
+	    }
+	}
+	fclose(fp);
+	if(i == 0) {
+	    getdata(5, 0, "沒這個資料耶,新增嗎?(y/N)", lang, 3, LCECHO);
+	    if(lang[0] == 'y') {
+		clear();
+		move(4,0);
+		outs(buf);
+		addword(word);
+	    }
+	}
+    }
+}
+
+int x_dict() {
+    if(choose_dict())
+	use_dict();
+    return 0;
+}