workbench/devs/diskimage/support/dos64.c

   1 /* Copyright 2007-2012 Fredrik Wikstrom. All rights reserved.
   2 **
   3 ** Redistribution and use in source and binary forms, with or without
   4 ** modification, are permitted provided that the following conditions
   5 ** are met:
   6 **
   7 ** 1. Redistributions of source code must retain the above copyright
   8 **    notice, this list of conditions and the following disclaimer.
   9 **
  10 ** 2. Redistributions in binary form must reproduce the above copyright
  11 **    notice, this list of conditions and the following disclaimer in the
  12 **    documentation and/or other materials provided with the distribution.
  13 **
  14 ** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
  15 ** AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16 ** IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17 ** ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  18 ** LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  19 ** CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  20 ** SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  21 ** INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  22 ** CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  23 ** ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  24 ** POSSIBILITY OF SUCH DAMAGE.
  25 */
  26
  27 #include "support.h"
  28 #include <proto/dos.h>
  29 #ifndef __AROS__
  30 #include "dos64.h"
  31 #endif
  32
  33 #ifdef __AROS__
  34
  35 QUAD GetFileSize64 (BPTR file) {
  36         SetIoErr(ERROR_ACTION_NOT_KNOWN);
  37         return -1LL;
  38 }
  39
  40 QUAD GetFilePosition64 (BPTR file) {
  41         SetIoErr(ERROR_ACTION_NOT_KNOWN);
  42         return -1LL;
  43 }
  44
  45 LONG ChangeFilePosition64 (BPTR file, QUAD offset, LONG mode) {
  46         SetIoErr(ERROR_ACTION_NOT_KNOWN);
  47         return FALSE;
  48 }
  49
  50 #endif
  51
  52 QUAD GetFileSize (BPTR file) {
  53         QUAD size = GetFileSize64(file);
  54         if (size == -1LL &&
  55                 IoErr() == ERROR_ACTION_NOT_KNOWN)
  56         {
  57                 struct FileInfoBlock *fib;
  58                 fib = AllocDosObject(DOS_FIB, NULL);
  59                 if (fib) {
  60                         if (ExamineFH(file, fib)) {
  61                                 size = (ULONG)fib->fib_Size;
  62                         }
  63                         FreeDosObject(DOS_FIB, fib);
  64                 }
  65         }
  66         return size;
  67 }
  68
  69 QUAD GetFilePosition (BPTR file) {
  70         QUAD position = GetFilePosition64(file);
  71         if (position == -1LL &&
  72                 IoErr() == ERROR_ACTION_NOT_KNOWN)
  73         {
  74                 position = Seek(file, 0, OFFSET_CURRENT);
  75         }
  76         return position;
  77 }
  78
  79 LONG ChangeFilePosition (BPTR file, QUAD position, LONG mode) {
  80         LONG res;
  81         res = ChangeFilePosition64(file, position, mode);
  82         if (!res &&
  83                 IoErr() == ERROR_ACTION_NOT_KNOWN)
  84         {
  85                 LONG pos;
  86                 pos = Seek(file, (LONG)position, mode);
  87                 if (pos != -1 || !IoErr()) {
  88                         res = TRUE;
  89                 }
  90         }
  91         return res;
  92 }