home *** CD-ROM | disk | FTP | other *** search
- // This may look like C code, but it is really -*- C++ -*-
- /*
- Copyright (C) 1988 Free Software Foundation
- written by Doug Lea (dl@rocky.oswego.edu)
-
- This file is part of GNU CC.
-
- GNU CC is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY. No author or distributor
- accepts responsibility to anyone for the consequences of using it
- or for whether it serves any particular purpose or works at all,
- unless he says so in writing. Refer to the GNU CC General Public
- License for full details.
-
- Everyone is granted permission to copy, modify and redistribute
- GNU CC, but only under the conditions described in the
- GNU CC General Public License. A copy of this license is
- supposed to have been given to you along with GNU CC so you
- can know your rights and responsibilities. It should be in a
- file named COPYING. Among other things, the copyright notice
- and this notice must be preserved on all copies.
- */
-
- #ifndef _SFile_h
- #ifdef __GNUG__
- #pragma once
- #pragma interface
- #endif
- #define _SFile_h 1
-
- #include <_File.h>
-
- class SFile: public File
- {
- protected:
- int sz; // unit size for structured binary IO
-
- public:
- SFile();
- SFile(const char* filename, int size, io_mode m, access_mode a);
- SFile(const char* filename, int size, const char* m);
- SFile(int filedesc, int size, io_mode m);
- SFile(FILE* fileptr, int size);
-
- ~SFile();
-
- int size();
- int setsize(int s);
-
- SFile& get(void* x);
- SFile& put(void* x);
- SFile& operator[](long i);
- };
-
- #if defined(__OPTIMIZE__) || defined(USE_LIBGXX_INLINES)
-
-
- inline int SFile::size()
- {
- return sz;
- }
-
- inline int SFile::setsize(int s)
- {
- int old = sz;
- sz = s;
- return old;
- }
-
- inline SFile& SFile::get(void* x)
- {
- read(x, sz, 1); return *this;
- }
-
- inline SFile& SFile::put(void* x)
- {
- write(x, sz, 1); return *this;
- }
-
- inline SFile& SFile::operator[](long i)
- {
- seek(i * sz, 0); return *this;
- }
-
-
- #endif
-
- #endif
-