荔园在线
荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀
[回到开始]
[上一篇][下一篇]
发信人: jjksam (In Linux), 信区: InstallBBS
标 题: [转载] Re: 请教(关于天气预报)(转寄)
发信站: 荔园晨风BBS站 (Sat Nov 24 22:55:46 2001), 转信
【 以下文字转载自 jjksam 的信箱 】
【 原文由 jjksam@smth.org 所发表 】
发信人: yiyo (为爱走天涯), 信区: BBSMan_Dev
标 题: Re: 请教(关于天气预报)
发信站: BBS 水木清华站 (Thu Nov 8 16:37:46 2001)
/*
* predict.c: auto weather predict
*
* Author: Chain.bbs@bbs.sjtu.edu.cn
*
*
* Copyright (C) 2000-2001 Sjtu BBS Dev Group. <bbs.sjtu.edu.cn>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
* $Id: predict.c,v 1.0 2001/03/16 13:45:07 chain Exp $
*/
#include <sys/types.h>
#include <sys/socket.h>
#include <sys/stat.h>
#include <sys/un.h>
#include <netinet/in.h>
#include <fcntl.h>
#include <unistd.h>
#include <stdio.h>
#include <strings.h>
#define BBSHOME "./"
#define LOCALTMPFILE "predict.tmp"
#define TMPPATH "./"
#define LOCALFILE "weather"
#define DEST_IP "159.226.237.82"
#define DEST_PORT 80
#define LINELEN 84
int
read_stream(int fd, char *ptr, int maxbytes)
{
int nleft, nread;
nleft = maxbytes;
while (nleft > 0) {
if ( (nread = read(fd, ptr, nleft)) < 0)
return(nread); /* error, return < 0 */
else if (nread == 0)
break; /* EOF, return #bytes read */
nleft -= nread;
ptr += nread;
}
return(maxbytes - nleft); /* return >= 0 */
}
int get_predict(){
int fd,len,flag;/*flag mean save to the file have begin*/
FILE* lfd;
int lastpos;
struct sockaddr_in i_a,my_addr;
int pos=-1;
char tmpfile[40];
char reply[401];
int havefeedback;
int n;
static char request[] = "GET /cgi-bin/cgi200010/query?03 \r\n\r\n";
if ((fd=socket(AF_INET,SOCK_STREAM,0))<0){
printf("socket create error");
return -1;
}
memset(&i_a,0,sizeof(struct sockaddr_in));
i_a.sin_family = AF_INET;
i_a.sin_addr.s_addr = inet_addr(DEST_IP);
i_a.sin_port = htons(DEST_PORT);
if ((connect(fd,(struct sockaddr*)&i_a,sizeof(struct sockaddr)))==-1){
printf("connect error\n");
return -2;
}
if (send(fd, request, strlen(request),0)==-1){
printf("send error");
return -3;
}
strcpy(tmpfile,TMPPATH);
strcat(tmpfile,LOCALTMPFILE);
if ((lfd=fopen(tmpfile,"w"))==NULL){
printf("create tmp file error\n");
printf("%s\n",tmpfile); return -4;
}
while ((n = read_stream(fd, reply, 400)) > 0) {
fwrite(reply,n,1,lfd);
}
close(fd);
fclose(lfd);
write_valid_weather_file(tmpfile);
if (n < 0)
printf("read error\n");
exit(0);
}
int write_valid_weather_file(char* tmpfile)
{
FILE *fp;
char rdstring[401];
char *rtval;
int flag=0;
int totalcount=33;
int citycount=0;
int i,windlen;
char genbuf[LINELEN];
int startpoint[6]={12,22,32,37,44,60};
fp=fopen(tmpfile,"r");
if (fp==NULL)
{
printf("Open temp file failed\n");
return 1;
}
while (flag!=2)
{
if (flag==0)
{
rtval=fgets(rdstring,400,fp);
if (rtval==NULL)
{
return -1;
}
else
{
if (strstr(rdstring,"月")!=NULL && strstr(rdstring,"日")!=NULL && strstr
(rdstring,"时")!=NULL && strstr(rdstring,"至")!=NULL)
{
printf("\n 国内城市24小时天气预报\n");
printf(" %s\n",rdstring);/*年月日*/
printf(" **************************************************************
*************\n");
printf(" * 城 市 天气现象 温度（C） 风向风力
*\n");
printf(" * 夜间 白天 最低 最高 夜间
白天 *\n");
printf(" **************************************************************
*************\n");
}
else if ((rtval=(char*)strstr(rdstring,"北京"))!=NULL)
{
for ( i=0;i<LINELEN;i++)
genbuf[i]=' ';
genbuf[1]='*';
strcpy(genbuf+4,"北京");
genbuf[8]=' ';
flag=1;
for (i=0;i<6;i++)
{
fgets(rdstring,400,fp);
rtval=(char*)strstr(rdstring+71,"</");
if (rtval!=NULL)
{
rdstring[rtval-rdstring]='\0';
strcpy(genbuf+startpoint[i],rdstring+71);
genbuf[startpoint[i]+rtval-rdstring-71]=' ';
}
}
strcpy(genbuf+75,"*");
printf("%s\n",genbuf);
fgets(rdstring,400,fp);
fgets(rdstring,400,fp);
}
}
}
else if (flag==1)
{
for (;totalcount>0;totalcount--)
{
for ( i=0;i<LINELEN;i++)
genbuf[i]=' ';
genbuf[1]='*';
fgets(rdstring,400,fp);
rtval=(char*)strstr(rdstring+88,"</");
rdstring[rtval-rdstring]='\0';
strcpy(genbuf+3,rdstring+88);
genbuf[3+rtval-rdstring-88]=' ';
for (i=0;i<6;i++)
{
fgets(rdstring,400,fp);
rtval=(char*)strstr(rdstring+71,"</");
if (rtval!=NULL)
{
rdstring[rtval-rdstring]='\0';
strcpy(genbuf+startpoint[i],rdstring+71);
genbuf[startpoint[i]+rtval-rdstring-71]=' ';
}
}
strcpy(genbuf+75,"*");
if(totalcount==33)//上海，使用特殊的颜色
{
printf(" *");
printf(";34;47m");
genbuf[75]='\0';
printf("%s",genbuf+2);
printf("m");
printf("*\n");
}
else
{
printf("%s\n",genbuf);
}
fgets(rdstring,400,fp);
fgets(rdstring,400,fp);
}
flag=2;
}
}
fclose(fp);
printf(" ******************************************************************
*********\n");
printf(" 气象信息取自 中国气象在线(www.nmc.gov.cn) \n");
return 0;
}
int main()
{
get_predict();
return 0;
}
【 在 mayi (启明星~~蚂蚁) 的大作中提到: 】
: 把源程序铁出来看看吧
--
※ 来源:·BBS 水木清华站 smth.org·[FROM: 202.113.24.109]
--
※ 转载:·荔园晨风BBS站 bbs.szu.edu.cn·[FROM: 192.168.0.146]
[回到开始]
[上一篇][下一篇]
荔园在线首页 友情链接：深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店