/*
發信人: kid@lmcc (球僮小橋), 信區: ADMIN
標  題: 讀取 CNA 放至 Movie(轉寄)
發信站: FUJEN LMCC BBS (Thu Jul  4 08:47:34 1996)
*/
/* 程式功能: 抓取 cna news 放入 movie 中 */
/* 修改 by wisely 5/20/98 */

#include <stdio.h>
#include <bbs.h>

#define STRLEN           80

main()
{
        FILE *fp1,*fp2;
        struct fileheader m1;
        char tmp1[STRLEN],tmp2[STRLEN],tmp3[STRLEN],tmp4[STRLEN],tmp5[STRLEN];
        char TOPSTR[160];
        char shift[]="                    ";
        strcpy(TOPSTR,"\n                    --==【  中央社即時新聞報導  】==--"
);

        fp1=fopen(BBSHOME"/boards/today/.DIR","rb");
        while(1)
        {
                if(fread(&m1,sizeof(m1),1,fp1)<=0) break;
                strcpy(tmp1,tmp2);
                strcpy(tmp2,tmp3);
                strcpy(tmp3,tmp4);
                strcpy(tmp4,tmp5);
                strcpy(tmp5,m1.title);
        }
        fclose(fp1);

        system("mv /mnt2/BBS/bbs/bbs/etc/cnanews /mnt2/BBS/bbs/bbs/etc/cnanews2"
);
        if((fp1=fopen("/mnt2/BBS/bbs/bbs/etc/cnanews","w" ))==NULL) return;
/*        if((fp2=fopen("/mnt2/BBS/bbs/bbs/etc/cnanews2","r"))==NULL) return;
        while(fgets( foo,sizeof(foo), fp2)!=NULL)
/*        if((fp2=fopen("/mnt2/BBS/bbs/bbs/etc/cnanews2","r"))==NULL) return;
        while(fgets( foo,sizeof(foo), fp2)!=NULL)
        {
                if(strstr(foo,TOPSTR)) break;
                fprintf(fp1,"%s",foo);
        }*/
/* 這段無用, 只會讓cnanews越來越大 */
        fprintf(fp1,"%s\n\n",TOPSTR);
        fprintf(fp1,"           ╭═══════════════════════
══╮\n", TOPSTR);
        fprintf(fp1,"%s%-56s\n",shift,tmp1);
        fprintf(fp1,"%s%-56s\n",shift,tmp2);
        fprintf(fp1,"%s%-56s\n",shift,tmp3);
        fprintf(fp1,"%s%-56s\n",shift,tmp4);
        fprintf(fp1,"%s%-56s\n",shift,tmp5);
        fprintf(fp1,"           ╰═══════════════════════
══╯\n", TOPSTR);
//        fclose(fp2);
        fclose(fp1);
}