home *** CD-ROM | disk | FTP | other *** search
/ Enter 2007 April / ENTER_CD_04_07.iso / Internet / WinHTTrack 3.23 / httrack-3.23.exe / {app} / src_win / WinHTTrack / HTTrackInterface.c < prev    next >
Encoding:
C/C++ Source or Header  |  2002-11-26  |  5.5 KB  |  262 lines
  1.  
  2. #include <stdio.h>
  3. #include <stdlib.h>
  4. #include <string.h>
  5. #include <time.h>
  6.  
  7. #include <sys/types.h>
  8. #include <sys/stat.h>
  9.  
  10. #include "htsglobal.h"
  11. #include "htsbase.h"
  12.  
  13. #include "HTTrackInterface.h"
  14.  
  15. // Lecture d'une ligne (peut Ωtre unicode α priori)
  16. int linput(FILE* fp,char* s,int max) {
  17.   int c;
  18.   int j=0;
  19.   do {
  20.     c=fgetc(fp);
  21.     if (c!=EOF) {
  22.       switch(c) {
  23.         case 13: break;  // sauter CR
  24.         case 10: c=-1; break;
  25.         case 9: case 12: break;  // sauter ces caractΦres
  26.         default: s[j++]=(char) c; break;
  27.       }
  28.     }
  29.   }  while((c!=-1) && (c!=EOF) && (j<(max-1)));
  30.   s[j]='\0';
  31.   return j;
  32. }
  33. int linput_trim(FILE* fp,char* s,int max) {
  34.   int rlen=0;
  35.   char* ls=(char*) malloct(max+2);
  36.   s[0]='\0';
  37.   if (ls) {
  38.     char* a;
  39.     // lire ligne
  40.     rlen=linput(fp,ls,max);
  41.     if (rlen) {
  42.       // sauter espaces et tabs en fin
  43.       while( (rlen>0) && ((ls[max(rlen-1,0)]==' ') || (ls[max(rlen-1,0)]=='\t')) )
  44.         ls[--rlen]='\0';
  45.       // sauter espaces en dΘbut
  46.       a=ls;
  47.       while((rlen>0) && ((*a==' ') || (*a=='\t'))) {
  48.         a++;
  49.         rlen--;
  50.       }
  51.       if (rlen>0) {
  52.         memcpy(s,a,rlen);      // can copy \0 chars
  53.         s[rlen]='\0';
  54.       }
  55.     }
  56.     //
  57.     freet(ls);
  58.   }
  59.   return rlen;
  60. }
  61. int linput_cpp(FILE* fp,char* s,int max) {
  62.   int rlen=0;
  63.   s[0]='\0';
  64.   do {
  65.     int ret;
  66.     if (rlen>0)
  67.     if (s[rlen-1]=='\\')
  68.       s[--rlen]='\0';      // couper \ final
  69.     // lire ligne
  70.     ret=linput_trim(fp,s+rlen,max-rlen);
  71.     if (ret>0)
  72.       rlen+=ret;
  73.   } while((s[max(rlen-1,0)]=='\\') && (rlen<max));
  74.   return rlen;
  75. }
  76.  
  77. // idem avec les car spΘciaux
  78. void rawlinput(FILE* fp,char* s,int max) {
  79.   int c;
  80.   int j=0;
  81.   do {
  82.     c=fgetc(fp);
  83.     if (c!=EOF) {
  84.       switch(c) {
  85.         case 13: break;  // sauter CR
  86.         case 10: c=-1; break;
  87.         default: s[j++]=(char) c; break;
  88.       }
  89.     }
  90.   }  while((c!=-1) && (c!=EOF) && (j<(max-1)));
  91.   s[j++]='\0';
  92. }
  93.  
  94. // Like linput, but in memory (optimized)
  95. int binput(char* buff,char* s,int max) {
  96.   char* end;
  97.   int count;
  98.  
  99.   // clear buffer
  100.   s[0]='\0';
  101.   // end of buffer?
  102.   if ( *buff == '\0')
  103.     return 1;
  104.   // find ending \n
  105.   end=strchr(buff,'\n');
  106.   // ..or end of buffer
  107.   if (!end)
  108.     end=buff+strlen(buff);
  109.   // then count number of bytes, maximum=max
  110.   count=min(max,end-buff);
  111.   // and strip annoying ending cr
  112.   while( (count>0) && (buff[count] == '\r'))
  113.     count--;
  114.   // copy
  115.   if (count > 0) {
  116.     strncatbuff(s, buff, count);
  117.   }
  118.   // and terminate with a null char
  119.   s[count]='\0';
  120.   // then return the supplemental jump offset
  121.   return (end-buff)+1;
  122. } 
  123.  
  124. int fexist(char* s) {
  125.   struct stat st;
  126.   memset(&st, 0, sizeof(st));
  127.   if (stat(s, &st) == 0) {
  128.     if (S_ISREG(st.st_mode)) {
  129.       return 1;
  130.     }
  131.   }
  132.   return 0;
  133. } 
  134.  
  135. INTsys fsize(char* s) {
  136.   FILE* fp;
  137.   fp=fopen(s,"rb");
  138.   if (fp!=NULL) {
  139.     INTsys i;
  140.     fseek(fp,0,SEEK_END);
  141.     i=ftell(fp);
  142.     fclose(fp);
  143.     return i;
  144.   } else return -1;
  145. }
  146.  
  147. TStamp time_local(void) {
  148.   return ((TStamp) time(NULL));
  149. }
  150.  
  151.  
  152.  
  153.  
  154.  
  155. #define NOSTATIC_RESERVE(name, type, nelt) NOSTATIC_XRESERVE(name, type, nelt)
  156. #define NOSTATIC_XRESERVE(name, type, nelt) do { \
  157.   __declspec( thread ) static type thValue[nelt]; \
  158.   __declspec( thread ) int  static initValue = 0; \
  159.   name = thValue; \
  160.   if (!initValue) { \
  161.     initValue = 1; \
  162.     memset(&thValue, 0, sizeof(thValue)); \
  163.   } \
  164. } while(0)
  165.  
  166.  
  167.  
  168. typedef struct {
  169.   char buff[16][HTS_URLMAXSIZE*2*2];
  170.   int rol;
  171. } concat_strc;
  172. char* concat(const char* a,const char* b) {
  173.   concat_strc* strc;
  174.   NOSTATIC_RESERVE(strc, concat_strc, 1);
  175.   strc->rol=((strc->rol+1)%16);    // roving pointer
  176.   strcpybuff(strc->buff[strc->rol],a);
  177.   if (b) strcatbuff(strc->buff[strc->rol],b);
  178.   return strc->buff[strc->rol];
  179. }
  180. // conversion fichier / -> antislash
  181. #if HTS_DOSNAME
  182. char* __fconv(char* a) {
  183.   int i;
  184.   for(i=0;i<(int) strlen(a);i++)
  185.     if (a[i]=='/')  // convertir
  186.       a[i]='\\';
  187.   return a;
  188. }
  189. char* fconcat(char* a,char* b) {
  190.   return __fconv(concat(a,b));
  191. }
  192. char* fconv(char* a) {
  193.   return __fconv(concat(a,""));
  194. }
  195. #endif
  196.  
  197. /* / et \\ en / */
  198. char* __fslash(char* a) {
  199.   int i;
  200.   for(i=0;i<(int) strlen(a);i++)
  201.     if (a[i]=='\\')  // convertir
  202.       a[i]='/';
  203.   return a;
  204. }
  205. char* fslash(char* a) {
  206.   return __fslash(concat(a,""));
  207. }
  208.  
  209. // conversion minuscules, avec buffer
  210. char* convtolower(char* a) {
  211.   concat_strc* strc;
  212.   NOSTATIC_RESERVE(strc, concat_strc, 1);
  213.   strc->rol=((strc->rol+1)%16);    // roving pointer
  214.   strcpybuff(strc->buff[strc->rol],a);
  215.   hts_lowcase(strc->buff[strc->rol]);  // lower case
  216.   return strc->buff[strc->rol];
  217. }
  218.  
  219. // conversion en minuscules
  220. void hts_lowcase(char* s) {
  221.   int i;
  222.   for(i=0;i<(int) strlen(s);i++)
  223.     if ((s[i]>='A') && (s[i]<='Z'))
  224.       s[i]+=('a'-'A');
  225. }
  226.  
  227. char* next_token(char* p,int flag) {
  228.   int detect=0;
  229.   int quote=0;
  230.   p--;
  231.   do {
  232.     p++;
  233.     if (flag && (*p=='\\')) {   // sauter \x ou \"
  234.       if (quote) {
  235.         char c='\0';
  236.         if (*(p+1)=='\\')
  237.           c='\\';
  238.         else if (*(p+1)=='"')
  239.           c='"';
  240.         if (c) {
  241.           char tempo[8192];
  242.           tempo[0]=c; tempo[1]='\0';
  243.           strcatbuff(tempo,p+2);
  244.           strcpybuff(p,tempo);
  245.         }
  246.       }
  247.     }
  248.     else if (*p==34) {  // guillemets (de fin)
  249.       quote=!quote;
  250.     }
  251.     else if (*p==32) {
  252.       if (!quote)
  253.         detect=1;
  254.     }
  255.     else if (*p=='\0') {
  256.       p=NULL;
  257.       detect=1;
  258.     }
  259.   } while(!detect);
  260.   return p;
  261. }
  262.