#include<unistd.h>

 #include<stdio.h>

 #include<dirent.h>

 #include<string.h>

 #include<stdlib.h>

 #include<sys/stat.h>

 #include<sys/types.h>

 #include<sys/wait.h>

 #include<time.h>

 FILE *fp,*fbmp,*flog;

 struct dirent *entry;

 struct stat statbuf;

 unsigned short  BMP=0x4D42,

             JPG=0xD8FF,

         PNG[]={0x5089,0x474E,0x0A0D,0x0A1A},

         GIF[]={0x4947,0x3846,0x6139};

 char path1[],path2[],watchdog[],name[];

 struct tm *tm_ptr;

 time_t the_time;

 //判断图片头文件的结构体

 typedef struct tagRGBQUAD

 {

 unsigned char Blue;// À¶É«µÄÁÁ¶È£šÖµ·¶Î§Îª0-255)

 unsigned char Green; // ÂÌÉ«µÄÁÁ¶È£šÖµ·¶Î§Îª0-255)

 unsigned char Red; // ºìÉ«µÄÁÁ¶È£šÖµ·¶Î§Îª0-255)

 unsigned char Reserved;// ±£Áô£¬±ØÐëΪ0

 } RGN;

 void init()/*用于初始化程序*/

 {

     printf("file opened now\n");

     fp=fopen("wrg.text","w+");

     flog=fopen("wrlog.text","w+");

     fbmp=fopen("bmpname.text","w+");

 }

 void Exit()

 {

     printf("everything is gone\n");

     fclose(fp);

     fclose(fbmp);

     fclose(flog);

 }

 int istupian(char entry[])

 /*返加值为

 1 bmp;

 2 jpg;

 3 png;

 4 gif;

 */

 {

     FILE *fis;

     short int i=;

     unsigned short pis[];

     int flag=;//每次调用都进行初始化

     if((fis=fopen(entry,"r"))==NULL)

         printf("can not read %s\n",entry);

     fread(pis,,,fis);

     if(pis[]==BMP)

     {

         flag=;

         printf("it is a bmp\n");

     }

     else if(pis[]==JPG)

     {

         flag=;

         printf("it is a jpg\n");

     }

     else if(PNG[]==pis[]&&PNG[]==pis[]&&PNG[]==pis[]&&PNG[]==pis[])

     {

         flag=;

         printf("it is a png\n");

     }

     else if(GIF[]==pis[]&&GIF[]==pis[]&&GIF[]==pis[])

     {

         flag=;

         printf("it is a gif\n");

     }

     return flag;

 }

 void wrtlog()/*将文件的路径写入路径中*/

 {

     printf("write to wrtlg\n");

     fprintf(fp,"%s/%s\n",getcwd(NULL,),entry->d_name);

     fprintf(fbmp,"%s\n",entry->d_name);

 }

 void wrlog(char name[])//  将日记写入文件中

 {

   static int i=;

   (void)time(&the_time);

   //tm_ptr=gmtime(&the_time);

   if(i==) fprintf(flog,"文件名                    /状态            ／时间            ／\n");

   ++i;

   fprintf(flog,"%s\t\t删除\t\t ",name);

   fprintf(flog,"%s\n",ctime(&the_time));

   //fprintf(flog,"%02d:%02d:%02d:%02d:%02d:%02d\n",tm_ptr->tm_year,tm_ptr->tm_mon+1,tm_ptr->tm_mday,tm_ptr->tm_hour,tm_ptr->tm_min,tm_ptr->tm_sec);

 }

 void printdir(char dir[])/*打印目录*/

 {

     DIR *dp;

         printf("printdir ******doing now\n");

     if((dp=opendir(dir))==NULL)

     {

         fprintf(stderr,"cannot open directory:%s\n",dir);

         return;

     }

     chdir(dir);

     while((entry=readdir(dp))!=NULL)

     {

         lstat(entry->d_name,&statbuf);

         if(S_ISDIR(statbuf.st_mode))

         {

             if(strcmp(".",entry->d_name)==||strcmp("..",entry->d_name)==)

                 continue;

             printdir(entry->d_name);

         }

         else

             wrtlog();

     }

     chdir("..");

     closedir(dp);

 }

 int bmp(char filename[])

 {

     FILE *fo,*fin;

     RGN rgb,black={,,,},white={,,,};

     char name[]="\0";

     unsigned char temp[]="\0";

     unsigned int offset=;

     //在文件名中添加copy_来区别原文件

     int len=strlen(filename);

     strncpy(name,filename,len-);

     strcat(name,"_copy.bmp");

     if((fo=fopen(filename,"rb"))==NULL)

         printf("can not open %s",filename);

     if((fin=fopen(name,"wb"))==NULL)

         printf("can not open %s",name);

                             printf("œ«ÖžÕëÒƶ¯µœÎ»ÍŒÊýŸÝµÄÆðʌλÖÃ\n");

     fseek(fo,,);

                             printf("¿ªÊŒ¶ÁÈ¡Æ«ÒÆÁ¿\n");

     fread(&offset,,,fo);

                             printf("ÏÔÊŸÆ«ÒÆλÖÃŽóС:");

     printf("%X\n",offset);

                             printf("œ«ÖžÕëÒƶ¯µœÍŒÆ¬µÄÆðʌλÖÃ\n");

     fseek(fo,,); 

                         printf("¿ªÊŒÐŽÈëbmpÎÄŒþ\n");

     unsigned int i=;

                             printf("Í·ÎÄŒþÐŽÈëÖÐ\n");

     while(i<=offset)

     {

         fread(temp,,,fo);

         fwrite(temp,,,fin);

         i+=;

     }

                             printf("ÑÕɫת»»ÖÐ\n");

     while(!feof(fo))

     {

         fread(&rgb,,,fo);

         if((rgb.Blue+rgb.Green+rgb.Red)/<)

             fwrite(&black,,,fin);

         else

             fwrite(&white,,,fin);

     }

     fclose(fo);

     fclose(fin);

     printf("͌Ƭת»»³ÉºÚ°×¶þֵ͌œáÊø");

     return ;

 }

 //硬连接

 /*返加值为

 1 bmp;

 2 jpg;

 3 png;

 4 gif;

 */

 void lkbmp()

 {

   fseek(fp,,);

   fseek(fbmp,,);

   while(fscanf(fp,"%s",path1)!=EOF&&fscanf(fbmp,"%s",name)!=EOF)

   {

     //path2 的路径已经初始化，将文件名接到path2中，链接好后，将watchsog重新载入watchdog中

     strcat(path2,name);

     printf("%s",path2);

     if(link(path1,path2)==)

     {

       printf(" link is successful\n");

     }

       else

     printf(" link is error\n");

       //恢复母路径

       if(istupian(path2)==)

     bmp(path2);

       strcpy(path2,watchdog);

   }

 }

 //删除非图片文件

 void del_dir()

 {

   int picture=;

   fseek(fbmp,,);

   fseek(fp,,);

   if(fscanf(fbmp,"%s",name)==EOF)

     printf("del_dir is error");

   else while(fscanf(fp,"%s",path1)!=EOF&&fscanf(fbmp,"%s",name)!=EOF)

   {

     //path2 的路径已经初始化，将文件名接到path2中，链接好后，将watchsog重新载入watchdog中

     strcat(path2,name);

     if(!(picture=istupian(path2))&&unlink(path2)==)

       {

         printf("unlink %s is successful\n",path2);

         wrlog(path2);

       }

     else

       printf("unlink %s is error\n",path2);

           //恢复母路径

     strcpy(path2,watchdog);

   }

 }

 #include"myhead.h"

 #pragma pack(1)

 int main(int argc,char *argv[])

 {

     pid_t fork_res;

     char topdir[] = ".";

     if(argc>=)

     strcpy(topdir,argv[]);

     printf("已经得到目录：\"%s\"\n",topdir);

     printf("初始化中");

     init();

     printf("初始化完毕\n");

     printf("start printdir\n");

     printf("进入原始路径,得到母路径。");

     chdir(topdir);

     chdir("..");

     strcpy(path2,getcwd(NULL,));

       //创建D目录,可以以作为子进程

       strcat(path2,"/D/");

       mkdir(path2,);

       printf("母路径:%s\n",path2);

       strcpy(watchdog,path2);

       printdir(topdir);

       //链接文件

       lkbmp();

       printf("done.\n");

       //退出

       //删除原文件

      del_dir();

      //进入D目录

      Exit();

      printf("程序运行结束");

 }