printdir-deldir-bmp

#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[4]={0x5089,0x474E,0x0A0D,0x0A1A},
        GIF[3]={0x4947,0x3846,0x6139};
char path1[256],path2[256],watchdog[256],name[256];
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
");
    fp=fopen("wrg.text","w+");
    flog=fopen("wrlog.text","w+");
    fbmp=fopen("bmpname.text","w+");
}
void Exit()
{
    printf("everything is gone
");
    fclose(fp);
    fclose(fbmp);
    fclose(flog);
}
int istupian(char entry[])
/*返加值为
1 bmp;
2 jpg;
3 png;
4 gif;
*/
{
    FILE *fis;
    short int i=0;
    unsigned short pis[5];
    int flag=0;//每次调用都进行初始化
    if((fis=fopen(entry,"r"))==NULL) 
        printf("can not read %s
",entry);
    fread(pis,8,1,fis);
    
    if(pis[0]==BMP)    
    {
        flag=1;        
        printf("it is a bmp
");
    }
    else if(pis[0]==JPG)    
    {
        flag=2;
        printf("it is a jpg
");
    }
    else if(PNG[0]==pis[0]&&PNG[1]==pis[1]&&PNG[2]==pis[2]&&PNG[3]==pis[3])    
    {
        flag=3;        
        printf("it is a png
");
    }
    else if(GIF[0]==pis[0]&&GIF[1]==pis[1]&&GIF[2]==pis[2])    
    {
        flag=4;        
        printf("it is a gif
");
    }
    return flag;


}
void wrtlog()/*将文件的路径写入路径中*/
{    
    printf("write to wrtlg
");
    fprintf(fp,"%s/%s
",getcwd(NULL,1024),entry->d_name);
    fprintf(fbmp,"%s
",entry->d_name);
}
void wrlog(char name[])//  将日记写入文件中
{
  static int i=0;
  (void)time(&the_time);
  //tm_ptr=gmtime(&the_time);
  if(i==0) fprintf(flog,"文件名                    /状态            ／时间            ／
");
  ++i;
  fprintf(flog,"%s		删除		 ",name);
  
  fprintf(flog,"%s
",ctime(&the_time));
  //fprintf(flog,"%02d:%02d:%02d:%02d:%02d:%02d
",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
");
    if((dp=opendir(dir))==NULL)
    {
        fprintf(stderr,"cannot open directory:%s
",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)==0||strcmp("..",entry->d_name)==0)
                continue;
            printdir(entry->d_name);
        }
        else 
            wrtlog();
    }
    chdir("..");
    closedir(dp);
}
int bmp(char filename[])
{
    FILE *fo,*fin;
    RGN rgb,black={0,0,0,0},white={255,255,255,0};
    char name[256]="";
    unsigned char temp[14]="";
    unsigned int offset=0;
    //在文件名中添加copy_来区别原文件
    int len=strlen(filename);
    strncpy(name,filename,len-4);
    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("œ«ÖžÕëÒƶ¯µœÎ»ÍŒÊýŸÝµÄÆðʌλÖÃ
");
    fseek(fo,10,0);
                            printf("¿ªÊŒ¶ÁÈ¡Æ«ÒÆÁ¿
");
    fread(&offset,4,1,fo);
                            printf("ÏÔÊŸÆ«ÒÆλÖÃŽóС:");
    printf("%X
",offset);
                            printf("œ«ÖžÕëÒƶ¯µœÍŒÆ¬µÄÆðʌλÖÃ
");
    fseek(fo,0,0); 
                            
    
                        printf("¿ªÊŒÐŽÈëbmpÎÄŒþ
");  
    unsigned int i=1;
                            printf("Í·ÎÄŒþÐŽÈëÖÐ
");
    while(i<=offset)
    {
        fread(temp,1,1,fo);
        fwrite(temp,1,1,fin);
        i+=1;
    }
                            printf("ÑÕɫת»»ÖÐ
");
    while(!feof(fo))
    {
        fread(&rgb,4,1,fo);
        if((rgb.Blue+rgb.Green+rgb.Red)/3<125)
            fwrite(&black,4,1,fin);
        else
            fwrite(&white,4,1,fin);
    }
        
    fclose(fo);
    fclose(fin);
    printf("͌Ƭת»»³ÉºÚ°×¶þֵ͌œáÊø");
    return 0;
}
//硬连接
/*返加值为
1 bmp;
2 jpg;
3 png;
4 gif;
*/
void lkbmp()
{    
  fseek(fp,0,0);
  fseek(fbmp,0,0);
  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)==0)
    {
      printf(" link is successful
");
    }
      else 
    printf(" link is error
");
      //恢复母路径
      if(istupian(path2)==1)
    bmp(path2);
      strcpy(path2,watchdog);
  }
  
}
//删除非图片文件
void del_dir()
{
  int picture=0;
  fseek(fbmp,0,0);
  fseek(fp,0,0);
  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)==0)
      {
        printf("unlink %s is successful
",path2);
        wrlog(path2);
      }
    else 
      printf("unlink %s is error
",path2);
          //恢复母路径
    strcpy(path2,watchdog);
  }
  
}

#include"myhead.h"
#pragma pack(1)
int main(int argc,char *argv[])
{
    pid_t fork_res;
    char topdir[128] = ".";
    if(argc>=2)
    strcpy(topdir,argv[1]);
    
    printf("已经得到目录："%s"
",topdir);
    printf("初始化中");
    init();
    printf("初始化完毕
");
    printf("start printdir
");
    printf("进入原始路径,得到母路径。");
    chdir(topdir);
    chdir("..");
    strcpy(path2,getcwd(NULL,1024));

      //创建D目录,可以以作为子进程
      strcat(path2,"/D/");
      mkdir(path2,0770);
      printf("母路径:%s
",path2);
      strcpy(watchdog,path2);
    
      printdir(topdir);
      //链接文件
      lkbmp();
      printf("done.
");
      //退出
      //删除原文件
     del_dir();
     //进入D目录
     Exit();
    
     printf("程序运行结束");
     
     
      
}