這隻程式要有 popupmenu 功能才能直接使用唷 ～
假如沒有的話 , 得把 main 中的 popupmenu_ans 改成 vans :)
/*-------------------------------------------------------*/
/* star.c (YZU WindTopBBS Ver 3.02 ) */
/*-------------------------------------------------------*/
/* author : verit.bbs@bbs.yzu.edu.tw */
/* target : http://mindcity.sina.com.tw */
/* create : 01/07/09 */
/* modify : 03/07/12 */
/*-------------------------------------------------------*/
#include "bbs.h"
#define mouts(y,x,s) { move(y,x); outs(s); }
#define PROXY_PORT 8080
#define PROXY_HREF "proxy.yzu.edu.tw"
#define SERVER_HREF "http://mindcity.sina.com.tw"
#define LINE_WORD 50
char *tag_s[4] = {"!--START:HORO_TODAY--","!--START:HORO_TOMORROW--"};
char *tag_e[4] = {"!--END:HORO_TODAY--","!--END:HORO_TOMORROW--"};
char *star[12] = {"aries","taurus","gemini","cancer","leo","virgo",
"libra","scorpio","sagittarius","capricorn","aquarius","pisces"};
char *draw_star[20] = {"╭─╮","│ │","╰─╮","│ │","╰─╯",
"╭┬╮","│││","│││"," │ "," │ ",
"╭─╮","│ │","├─┤","│ │","│ │",
"╭─╮","│ │","├─╯","│ ＼ ","│ │"};
static int
http_conn(char *server, char *s,int kind)
{
int sockfd, start_show,chinese=0,state=0;
int cc, tlen,word=0,show=0;
char *xhead, *xtail, tag[128], fname[50];
static char pool[2048];
FILE *fp;
mouts(23, 0, "正在連接伺服器，請稍後..........");
if ((sockfd = dns_open(server, PROXY_PORT)) < 0)
{
vmsg("無法與伺服器取得連結，查詢失敗");
return 0;
}
else
{
refresh();
}
write(sockfd, s, strlen(s));
shutdown(sockfd, 1);
/* parser return message from web server */
xhead = pool;
xtail = pool;
tlen = 0;
start_show = 0;
sprintf(fname, "tmp/%s.star", cuser.userid);
clear();
fp = fopen(fname, "w");
fprintf(fp,"\n %s",draw_star[show++]);
for (;;)
{
if (xhead >= xtail)
{
xhead = pool;
cc = read(sockfd, xhead, sizeof(pool));
if (cc <= 0)
break;
xtail = xhead + cc;
}
cc = *xhead++;
if ((tlen == strlen(tag_s[kind])+1) && (!str_ncmp(tag,tag_s[kind],strlen(tag_s[kind]))))
start_show = 1;
if ((tlen == strlen(tag_e[kind])+1) && (!str_ncmp(tag,tag_e[kind],strlen(tag_e[kind]))))
break;
if (cc == '<' || cc == '&')
{
tlen = 1;
continue;
}
if (tlen)
{
if (cc == '>' || cc == ';')
{
if ((tlen == 3) && (!str_ncmp(tag, "br", 2)) && start_show == 1 && state == 0)
{
fprintf(fp,"\n %s\t",draw_star[show++]);
state = 1;
}
else if ((tlen == 3) && (!str_ncmp(tag, "tr", 2)) && start_show == 1 && kind>1 && state == 0)
{
fprintf(fp,"\n %s\t",draw_star[show++]);
state =1;
}
tlen = 0;
word=0;
continue;
}
if (tlen <= 128)
tag[tlen - 1] = cc;
tlen++;
continue;
}
if (start_show)
{
if (word > LINE_WORD && cc<0 && chinese==0 && state == 0)
{
fprintf(fp,"\n %s\t",draw_star[show++]);
state = 1;
word = 0 ;
}
if (cc == ' ')
chinese=0;
else if (cc != '\r' && cc != '\n')
{
word++;
fputc(cc, fp);
state =0 ;
chinese = (cc<0)?((chinese==1)?0:1):0;
}
else
{
word = 0;
}
}
}
close(sockfd);
fprintf(fp,"\n %s\t資料來源為新浪星座算命網(http://mindcity.sina.com.tw/)",
(show>19)?"":draw_star[show]);
fclose(fp);
more(fname, NULL);
unlink(fname);
return 0;
}
/* 起始點 */
int
main()
{
char buf[128],c1,c2;
char *strades[13] = {
"AAries 牡羊座", "BTaurus 金牛座", "CGemini 雙子座", "DCancer 巨蟹座",
"ELeo 獅子座", "FVirgo 處女座", "GLibra 天秤座", "HScorpio 天蠍座",
"ISagittarius 射手座", "JCapricorn 魔羯座", "KAquarius 水瓶座", "LPisces 雙魚座",NULL};
char *_kind[3] = {"AToday 今日運勢","BTomorrow 明日運勢",NULL};
if((c1 = popupmenu_ans(strades,"選擇星座",5,18)))
{
if((c2 = popupmenu_ans(_kind,"選擇類型",8,18)))
{
sprintf(buf,"GET %s/west/MC-12stars/%s%d.html HTTP/1.0\n\n",SERVER_HREF,star[c1-'a'],c2-'a'+1);
http_conn(PROXY_HREF,buf,c2-'a');
}
}
return 0;
}
--
※ Origin: 元智大學 風之塔 <bbs.yzu.edu.tw>
※ From : bbs.yzu.edu.tw
討論串 (同標題文章)