Very Computer

Hi,

I heard that there are some of the people that support(ed) SASC here,
so i thought that this might be a good place for this...

I am porting some code over from a UNIX box which does not seem to be
working on the Amiga.

The general scenario is that there is a class called database which
uses a binary tree data structure and this is the top of the function
that should open a file and read it into the structure:

int database::file_open(ifstream &file, node *& root1)
{
        if (!file)
                return 0;               //file would not open - eject!

        file.seekg(0, ios::end);         //goto end of file
        int eofile = file.tellg();               //find size of file.

        etc...

the problem is that eofile is always coming back as 0 (when i know the
file is much larger).  This code works fine with gcc and visual c.  Is
this likely to be a difference in the Amiga implementation, a bug in
my code, or a problem with SAS?

Many thanks,

        Rick.

Change this code on line 57 of CXXINCLUDE:iostream.h

      operator long()
        _INLINE_FUNC(
          // treat it as an offset, even if it's not.
          {
          return _offset;
          }
        )

to

      operator long()
          // treat it as an offset, even if it's not.
          {
          return _offset + _fpos;
          }

Note: Removing the _INLINE_FUNC() will insure that this version
      will be used instead of the version in sc.lib, for both
      debug, and optimized compiles. Normally, the library version
      is used for debug compiles.

|> The general scenario is that there is a class called database which
|> uses a binary tree data structure and this is the top of the function
|> that should open a file and read it into the structure:
|>
|> int database::file_open(ifstream &file, node *& root1)
|> {
|>         if (!file)
|>                 return 0;               //file would not open - eject!
|>
|>         file.seekg(0, ios::end);         //goto end of file
|>         int eofile = file.tellg();               //find size of file.

Steve Krueger already reported a workaround for this, but here is
the response from Gavin Koch, one of our C++ experts and a member
of the ANSI C++ committee:

Quote:> You can't get the size of a file this way using SAS/C++'s library.
> Whether it's a bug or not is a much more complicated question.  
> Basically SAS/C++ uses pos_t's for tracking positions in files, rather
> than offsets.  Most implementations use offsets (or implement pos_t's
> as offsets).  If you're not sure about the difference between pos_t's and
> offsets you can look them up in any (good) ANSI-C manual.  It's a valid
> ANSI-C++ implementation, and has the advantage that you can seek in HUGE
> files, but has the disadvantage that it ain't what other implementations
> did, and does not support getting the size of a file by seeking to the
> end.  The implementation choice was required for the 370, but probably
> was not the best for the Amiga.

> There is no *ANSI* portable way to get the size of a file (without
> reading the whole file and counting :-) ).  On the Amiga (using SAS/C)
> you may have to get the file handle out of the stream, and ask the OS
> how big the file is.  I don't know the Amiga that well any more, there
> may be an easier way.

Quote:>>the problem is that eofile is always coming back as 0 (when i know the
>>file is much larger).

>This is a bug in the SAS/C streampos. I will include a fix in 6.57,
>but until then, you can try a a simple change to iostream.h which will
>fix the problem.

        Rick.