home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 25 / nopv25.iso / 040A / CCDL150L.ZIP / IO / TEST / RWTST.C < prev    next >
Encoding:
C/C++ Source or Header  |  1996-07-27  |  1.9 KB  |  95 lines
  1. #include "..\stdinc\stdio.h"
  2. #include <time.h>
  3. #include <stdlib.h>
  4. #include <string.h>
  5.  
  6. extern FILE *STDOUT,*STDIN;
  7. FILE * FOPEN(char *,char *);
  8. FILE * FREOPEN(char *,char *,FILE *);
  9.  
  10. void main(void)
  11. {
  12.     char buf[1000];
  13.     int i;
  14.     FILE *fil;
  15.     _LL_INIT();
  16.  
  17.     FPUTS("hello\n",STDOUT);
  18.     FPUTS("hello ",STDOUT);
  19.     FPUTS("hello\n",STDOUT);
  20.     FPUTS("hello\n",STDOUT);
  21.  
  22.     FGETS(buf,10,STDIN);
  23.     PRINTF("%s",buf);
  24.  
  25.     SCANF("%d",&i);
  26.     FPRINTF(STDOUT,"HELLO DAVE %d\n",i);
  27.  
  28.     fil = FOPEN("z1","wb");
  29.     for (i=0; i < 523; i++)
  30.         buf[i] = i & 0xff;
  31.     i = FWRITE(buf,523,1,fil);
  32.     PRINTF("%d\n",i);
  33.     FCLOSE(fil);
  34.  
  35.     fil = FOPEN("z2","w");
  36.     i = FWRITE(buf,523,1,fil);
  37.     FCLOSE(fil);
  38.  
  39.     fil = FOPEN("Z2","r");
  40.     i = FREAD(buf,1,1000,fil);
  41.     PRINTF("%d %d %d\n",i,feof(fil),ferror(fil));
  42.     FCLOSE(fil);
  43.  
  44.     fil = FOPEN("Z2","rb");
  45.     i = FREAD(buf,1,1000,fil);
  46.     PRINTF("%d %d %d\n",i,feof(fil),ferror(fil));
  47.  
  48.     fil = FREOPEN("Z1","rb+",fil);
  49.  
  50.     i = 500;
  51.     FSEEK(fil,i,SEEK_SET);
  52.     FGETPOS(fil,&i);
  53.     PRINTF("%d %d\n",i,FTELL(fil));
  54.  
  55.     i = FREAD(buf,1,1000,fil);
  56.     PRINTF("%d %d %d\n",i,feof(fil),ferror(fil));
  57.     FGETPOS(fil,&i);
  58.     PRINTF("%d %d\n",i,FTELL(fil));
  59.  
  60.     i = 50;
  61.     FSEEK(fil,i,SEEK_SET);
  62.     FGETPOS(fil,&i);
  63.     PRINTF("%d %d\n",i,FTELL(fil));
  64.  
  65.     i = FREAD(buf,20,1,fil);
  66.     FGETPOS(fil,&i);
  67.     PRINTF("%d %d\n",i,FTELL(fil));
  68.  
  69.     i = 50;
  70.     FSEEK(fil,i,SEEK_SET);
  71.     FGETPOS(fil,&i);
  72.     PRINTF("%d %d\n",i,FTELL(fil));
  73.  
  74.     i = FWRITE(buf,20,1,fil);
  75.     FGETPOS(fil,&i);
  76.     PRINTF("%d %d\n",i,FTELL(fil));
  77.     FCLOSE(fil);
  78.  
  79.     fil = FOPEN("z1","rb");
  80.     UNGETC('c',fil);
  81.     UNGETC('a',fil);
  82.     PRINTF("%d %d %d %d\n",FGETC(fil),FGETC(fil),FGETC(fil),FGETC(fil));
  83.     UNGETC('c',fil);
  84.     PRINTF("%d %d %d %d\n",FGETC(fil),FGETC(fil),FGETC(fil),FGETC(fil));
  85.     FCLOSE(fil);
  86.  
  87.     for(i=0; i<20; i++)
  88.         PRINTF("%s",TMPNAM());
  89.  
  90.     fil = TMPFILE();
  91.     FPRINTF(fil,"hi dave");
  92.     FCLOSE(fil);
  93.  
  94.     CLOSEALL();
  95. }