Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. #include <stdio.h>
  2. #include <kolibrisys.h>
  3.  
  4. int fread(void *buffer,int size,int count,FILE* file)
  5. {
  6.         dword res;
  7.         dword fullsize;
  8.  
  9.         if ((file->mode!=FILE_OPEN_READ) || (file->mode==FILE_OPEN_PLUS))       return 0;
  10.  
  11.         fullsize=count*size;
  12.         if ((fullsize+file->filepos)>(file->filesize))
  13.         {
  14.                 fullsize=file->filesize-file->filepos;
  15.                 if (fullsize<=0) return(0);
  16.         }
  17.  
  18.         res=_ksys_readfile(file->filename,file->filepos,fullsize,buffer);
  19.         if (res==0)
  20.         {      
  21.                 file->filepos=file->filepos+fullsize;
  22.                 fullsize=fullsize/size;
  23.                 return(fullsize);
  24.         }
  25.         else    return 0;
  26. }