home *** CD-ROM | disk | FTP | other *** search
/ ftp.disi.unige.it / 2015-02-11.ftp.disi.unige.it.tar / ftp.disi.unige.it / pub / .person / CataniaB / teach-act / esempi / File / char.c next >
C/C++ Source or Header  |  1997-03-08  |  2KB  |  74 lines
  1. #include <stdio.h>
  2. /* 
  3.  * Esempio di gestione file, lettura caratteri, uso degli
  4.  * argomenti in linea: legge un file [say f] [argimento passato al main]
  5.  * sostituisce il carattere OLD con NEW [macrodef].
  6.  * Se chiamato con -f  aggiunge alcune parole all'inizio delle frasi;
  7.  * parole definite in una tabella ptab e selezionate in modo casuale.
  8.  * Salva il tutto in f.a
  9. */
  10.  
  11. #define PTABDIM 3
  12. #define EOL 10
  13. #define OLD 'r'        /* ...un tocco di nobilta' */
  14. #define NEW 'v'
  15. #define TAB 3
  16.  
  17. int minuscolo(int c)
  18. {  
  19.  if ( c >='A' && c <='Z') return(c-'A'+'a');
  20.  else return c;
  21. }
  22.  
  23. void copy(char *s, char *t)
  24. {
  25.   while (*s++=*t++);
  26. } 
  27.  
  28. void append(char *s, char *t)
  29. {
  30.   for (;*s;s++); 
  31.   while(*s++=*t++);  
  32. }
  33.  
  34. main(int argc,char *argv[])
  35. {
  36.  
  37.  FILE *in,*out; 
  38.  char s[30];
  39.  char *ptab [TAB]={"Non sia mai","Non si divebbe ma","Ebbene"}; 
  40.  int c,d; 
  41.  int flag=0;
  42.  int i=0;
  43.  int nl=0;
  44.  
  45.  if (argc<2) {printf("\n Almeno un parametro!\n");return(0);};  
  46.  if (flag=(*argv[1]=='-')) copy(s,(argv[1]+1)); 
  47.  else copy(s,argv[1]);
  48.          /* oppure: copy(s,(argv[1]+(flag=(*argv[1]=='-'))); */
  49.  if (!(in=fopen(s,"r"))) 
  50.              {printf("\n Oh ma che file mi dai?\n");return(0);}
  51.  strcat(s,".a");
  52.  if (!(out=fopen(s,"w"))) return(0);  
  53.  while ((c=getc(in))!=EOF) 
  54.   {
  55.     if (c==OLD) putc(NEW,out);
  56.     else if (flag && c=='.') 
  57.      {
  58.        putc(c,out);
  59.        while (((c=getc(in))=='\n') || (c==' ')) if (c=='\n') nl=1;
  60.        if (nl) putc('\n',out);
  61.        else    putc(' ',out);              
  62.        if (c!=EOF)
  63.          { 
  64.            fprintf(out,"%s ",ptab[i%TAB]);
  65.            putc(minuscolo(c),out);
  66.            i++;  /* incremento ...senza senso */
  67.          }; 
  68.      }
  69.     else putc(c,out);
  70.   };  
  71.  fclose(in);
  72.  fclose(out); 
  73. }
  74.