home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c025 / 1.ddi / FGETC.C < prev    next >
Encoding:
Text File  |  1985-01-23  |  564 b   |  28 lines
  1. main()    /* fgetc.c -- demonstrates fgetc() and fputc() */
  2.     /* simple file copier with console echo */
  3. {
  4.     FILE *fi, *fo;
  5.     int c;
  6.     char source[25], dest[25];
  7.  
  8.     printf("Input filename: ");
  9.     gets(source);
  10.     printf("Output filename: ");
  11.     gets(dest);
  12.     if((fi = fopen(source, "r")) == NULL) {
  13.         printf("\tCan't open %s\n",source);
  14.         exit();
  15.     }
  16.     if((fo = fopen(dest, "w")) == NULL) {
  17.         printf("\tCan't open %s\n",dest);
  18.         exit();
  19.     }
  20.     while((c = fgetc(fi)) != EOF) {
  21.         putchar(c);
  22.         fputc(c, fo);
  23.     }
  24.     fclose(fi);
  25.     fclose(fo);
  26.     puts("\n{DONE}");
  27. }
  28.