home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c025 / 1.ddi / CREAT.C < prev    next >
Encoding:
Text File  |  1985-02-13  |  640 b   |  27 lines
  1. main()    /* creat.c -- illustrates use of creat() */
  2. {char name[20], nameout[20];
  3. char buf[1];
  4. int fin, fout;
  5.  
  6.     printf("input name please: ");
  7.     gets(name);
  8.     if ((fin = open(name,0)) == -1)
  9.     {    printf("No such file: %s\n",name);
  10.         exit();
  11.     }
  12.     printf("Output name please: ");
  13.     gets (nameout);
  14.     if ((fout = creat(nameout, 1)) == -1) 
  15.         exit();
  16.     while(read(fin, buf, 1) >= 0)
  17.     {    if (buf[0] == 26) {
  18.             close(fin); 
  19.             close(fout); 
  20.             break;
  21.         }
  22.         putchar(buf[0]);
  23.         write(fout,buf,1);
  24.     }
  25.     close(fin); close(fout);
  26. }
  27.