summaryrefslogtreecommitdiffstats
path: root/mbbsd/bbcall.c
diff options
context:
space:
mode:
Diffstat (limited to 'mbbsd/bbcall.c')
-rw-r--r--mbbsd/bbcall.c274
1 files changed, 0 insertions, 274 deletions
diff --git a/mbbsd/bbcall.c b/mbbsd/bbcall.c
deleted file mode 100644
index 93fe499d..00000000
--- a/mbbsd/bbcall.c
+++ /dev/null
@@ -1,274 +0,0 @@
-/* $Id: bbcall.c,v 1.9 2003/06/28 08:44:03 kcwu Exp $ */
-#include "bbs.h"
-
-#define SERVER_0941 "www.chips.com.tw"
-#define SERVER_0943 "www.pager.com.tw"
-#define SERVER_0948 "www.fitel.net.tw"
-#define SERVER_0947 "www.hoyard.com.tw"
-#define SERVER_0945 "203.73.181.254"
-
-#define CGI_0948 "/cgi-bin/Webpage.dll"
-#define CGI_0941 "/cgi-bin/paging1.pl"
-#define CGI_0947 "/scripts/fp_page1.dll"
-#define CGI_0945 "/Scripts/fiss/PageForm.exe"
-#define CGI_0943 "/tpn/tpnasp/dowebcall.asp"
-
-#define CGI_RAILWAY "http://www.railway.gov.tw/cgi-bin/timetk.cgi"
-
-#define REFER_0943 "http://www.pager.com.tw/tpn/webcall/webcall.asp"
-#define REFER_0948 "http://www.fitel.net.tw/html/svc03.htm"
-#define REFER_0941 "http://www.chips.com.tw:9100/WEB2P/page_1.htm"
-#define REFER_0947 "http://web1.hoyard.com.tw/freeway/freewayi.html"
-#define REFER_0945 "http://203.73.181.254/call.HTM"
-
-static void
-pager_msg_encode(char *field, char *buf)
-{
- char *cc = field;
- unsigned char *p;
-
- for (p = (unsigned char *)buf; *p; p++) {
- if ((*p >= '0' && *p <= '9') ||
- (*p >= 'A' && *p <= 'Z') ||
- (*p >= 'a' && *p <= 'z') ||
- *p == ' ')
- *cc++ = *p == ' ' ? '+' : (char)*p;
- else {
- sprintf(cc, "%%%02X", (int)*p);
- cc += 3;
- }
- }
- *cc = 0;
-}
-
-static void
-Gettime(int flag, int *Year, int *Month, int *Day, int *Hour,
- int *Minute)
-{
- char ans[5];
-
- do {
- getdata(10, 0, "年[20-]:", ans, 3, LCECHO);
- *Year = atoi(ans);
- } while (*Year < 00 || *Year > 02);
- do {
- getdata(10, 15, "月[1-12]:", ans, 3, LCECHO);
- } while (!IsSNum(ans) || (*Month = atoi(ans)) > 12 || *Month < 1);
- do {
- getdata(10, 30, "日[1-31]:", ans, 3, LCECHO);
- } while (!IsSNum(ans) || (*Day = atoi(ans)) > 31 || *Day < 1);
- do {
- getdata(10, 45, "時[0-23]:", ans, 3, LCECHO);
- } while (!IsSNum(ans) || (*Hour = atoi(ans)) > 23 || *Hour < 0);
- do {
- getdata(10, 60, "分[0-59]:", ans, 3, LCECHO);
- } while (!IsSNum(ans) || (*Minute = atoi(ans)) > 59 || *Minute < 0);
- if (flag == 1)
- *Year -= 11;
-}
-
-#define hpressanykey(a) {move(22, 0); prints(a); pressanykey();}
-
-static int
-Connect(char *s, char *server)
-{
- FILE *fp = fopen(BBSHOME "/log/bbcall.log", "a");
- int sockfd;
- char result[2048];
- struct sockaddr_in serv_addr;
- struct hostent *hp;
-
- sockfd = socket(AF_INET, SOCK_STREAM, 0);
- if (sockfd < 0)
- return 0;
-
- memset((char *)&serv_addr, 0, sizeof(serv_addr));
- serv_addr.sin_family = AF_INET;
-
- if ((hp = gethostbyname(server)) == NULL)
- return 0;
-
- memcpy(&serv_addr.sin_addr, hp->h_addr, hp->h_length);
-
- if (!strcmp(server, SERVER_0941))
- serv_addr.sin_port = htons(9100);
- else
- serv_addr.sin_port = htons(80);
-
- if (connect(sockfd, (struct sockaddr *) & serv_addr, sizeof serv_addr)) {
- hpressanykey("無法與伺服器取得連結，傳呼失敗");
- return 0;
- } else {
- mprints(20, 0, "\033[1;33m伺服器已經連接上，請稍候"
- ".....................\033[m");
- refresh();
- }
-
- write(sockfd, s, strlen(s));
- shutdown(sockfd, 1);
-
- while (read(sockfd, result, sizeof(result)) > 0) {
- fprintf(fp, "%s\n", result);
- fflush(fp);
- if (strstr(result, "正確") ||
- strstr(result, "等待") ||
- strstr(result, "再度") ||
- strstr(result, "完 成 回 應") ||
- strstr(result, "預約中") ||
- strstr(result, "傳送中")) {
- close(sockfd);
- hpressanykey("順利送出傳呼");
- return 0;
- }
- memset(result, 0, sizeof(result));
- }
- fclose(fp);
- close(sockfd);
- hpressanykey("無法順利送出傳呼");
- return 0;
-}
-
-#define PARA \
-"Connection: Keep-Alive\r\n"\
-"User-Agent: Lynx/2.6 libwww-FM/2.14\r\n"\
-"Content-type: application/x-www-form-urlencoded\r\n"\
-"Accept: text/html, text/plain, application/x-wais-source, "\
-"application/html, */*;q=0.001\r\n"\
-"Accept-Encoding: gzip\r\n"\
-"Accept-Language: en\r\n"\
-"Accept-Charset: iso-8859-1,*,utf-8\r\n"
-
-static void halpha0943(char* CoId) {
- char tmpbuf[64],ans[2];
- char ID[8];
- char Msg[64], atrn[512], sendform[1024];
- int Year = 99, Month = 1, Day = 15, Hour = 13, Minute = 8;
-
- snprintf(tmpbuf, sizeof(tmpbuf),
- "\033[1;37m請輸入您要傳呼的號碼\033[m : %s-", CoId);
- if(!getdata(7,0, tmpbuf, ID, sizeof(ID), LCECHO) ||
- !getdata(8,0, "\033[1;37m請輸入傳呼訊息\033[m：", tmpbuf, 63, LCECHO)) {
- hpressanykey("放棄傳呼");
- return;
- }
- pager_msg_encode(Msg,tmpbuf);
- getdata(9, 0, "\033[1;37m如果你要馬上送請按 '1' "
- "如果要定時送請按 '2': \033[m", ans, sizeof(ans), LCECHO);
-
- if(ans[0] != '1')
- Gettime(0, &Year, &Month, &Day, &Hour, &Minute);
-
- snprintf(atrn, sizeof(atrn),
- "CoId=%s&ID=%s&Year=19%02d&Month=%02d&Day=%02d"
- "&Hour=%02d&Minute=%02d&Msg=%s",
- CoId, ID,Year,Month,Day,Hour,Minute,Msg);
- snprintf(sendform, sizeof(sendform), "POST %s HTTP/1.0\nReferer: "
- "%s\n%sContent-length:%d\n\n%s",
- CGI_0943, REFER_0943, PARA, strlen(atrn), atrn);
- Connect(sendform, SERVER_0943);
- return ;
-}
-
-static void hcall0941() {
- char ans[2];
- char PAGER_NO[8], TRAN_MSG[18], TIME[8];
- char trn[512], sendform[512];
- int year = 98, month = 12, day = 4, hour = 13, min = 8;
-
- if(!getdata(7, 0, "\033[1;37 請您輸入您要傳呼的號碼 : 0941- \033[m",
- PAGER_NO, sizeof(PAGER_NO), LCECHO) ||
- !getdata(8, 0, "\033[1;37m請輸入傳呼訊息\033[m：", trn, 17, LCECHO)) {
- hpressanykey("放棄傳呼");
- return;
- }
- pager_msg_encode(TRAN_MSG,trn);
- getdata(9,0, "\033[1;37m如果你要馬上送請按 '1' "
- "如果要定時送請按 '2': \033[m", ans, sizeof(ans), LCECHO);
- if(ans[0] != '1') {
- strlcpy(TIME, "DELAY", sizeof(TIME));
- Gettime(0, &year, &month, &day, &hour, &min);
- } else
- strlcpy(TIME, "NOW", sizeof(TIME));
- snprintf(trn, sizeof(trn),
- "PAGER_NO=%s&TRAN_MSG=%s&MSG_TYPE=NUMERIC&%s=1"
- "&year=19%02d&month=%02d&day=%02d&hour=%02d&min=%02d",
- PAGER_NO, TRAN_MSG, TIME,year,month,day,hour,min);
-
- snprintf(sendform, sizeof(sendform),
- "POST %s HTTP/1.0\nReferer: %s\n%s"
- "Content-length:%d\n\n%s",
- CGI_0941, REFER_0941, PARA, strlen(trn), trn);
-
- Connect(sendform, SERVER_0941);
- return ;
-}
-
-static void hcall0948() {
- int year = 87, month = 12, day = 19, hour = 12, min = 0, ya = 0;
- char svc_no[8], message[64], trn[256], sendform[512], ans[3];
-
- move(7,0);
- clrtoeol();
-
- if(!getdata(7, 0, "\033[1;37m請輸入您要傳呼的號碼\033[m：0948-",
- svc_no, sizeof(svc_no), LCECHO) ||
- !getdata(8, 0, "\033[1;37m請輸入傳呼訊息\033[m：", trn, 61, LCECHO)) {
- hpressanykey("放棄傳呼");
- return;
- }
- pager_msg_encode(message, trn);
- getdata(9, 0, "\033[1;37m如果你要馬上送請按 '1' "
- "如果要定時送請按 '2'\033[m: ", ans, sizeof(ans), LCECHO);
- if(ans[0] != '1') {
- Gettime(1, &year, &month, &day, &hour, &min);
- ya = 1;
- }
-
- snprintf(trn, sizeof(trn),
- "MfcISAPICommand=SinglePage&svc_no=%s&reminder=%d"
- "&year=%02d&month=%02d&day=%02d&hour=%02d&min=%02d&message=%s",
- svc_no, ya, year, month, day, hour, min, message);
-
- snprintf(sendform, sizeof(sendform),
- "GET %s?%s Http/1.0\n\n", CGI_0948, trn);
-
- Connect(sendform, SERVER_0948);
- return;
-}
-
-int main_bbcall() {
- char ch[2];
-
- clear();
- move(0, 30);
- prints("\033[1;37;45m 逼逼摳機 \033[m");
- move(3, 0);
- prints("\033[1;31m ┌────────────────────"
- "─────────┐\033[m\n");
- prints("\033[1;33m (1)0941 (2)0943 (3)0946 "
- " (4)0948 \033[m\n");
- prints("\033[1;31m └────────────────────"
- "─────────┘\033[m\n");
- getdata(7, 8, "\033[1;37m你的選擇? [1-4]\033[m", ch, sizeof(ch), LCECHO);
-
- switch(ch[0]) {
- case '1':
- hcall0941();
- break;
- case '2':
- halpha0943("0943");
- break;
- case '3':
- halpha0943("0946");
- break;
- case '4':
- hcall0948();
- break;
- }
- return 0;
-}
-
-
-
-
-
generated by cgit v1.2.3 (git 2.25.1) at 2024-07-17 23:20:11 +0800