/***************************************************************************//*                                                                         *//*  ftsystem.c                                                             *//*                                                                         *//*    Amiga-specific FreeType low-level system interface (body).           *//*                                                                         *//*  Copyright 1996-2001, 2002, 2005, 2006 by                               *//*  David Turner, Robert Wilhelm, Werner Lemberg and Detlef W黵kner.       *//*                                                                         *//*  This file is part of the FreeType project, and may only be used,       *//*  modified, and distributed under the terms of the FreeType project      *//*  license, LICENSE.TXT.  By continuing to use, modify, or distribute     *//*  this file you indicate that you have read the license and              *//*  understand and accept it fully.                                        *//*                                                                         *//***************************************************************************/  /*************************************************************************/  /*                                                                       */  /* This file contains the Amiga interface used by FreeType to access     */  /* low-level, i.e. memory management, i/o access as well as thread       */  /* synchronisation.                                                      */  /*                                                                       */  /*************************************************************************/  /*************************************************************************/  /*                                                                       */  /* Maintained by Detlef W黵kner <TetiSoft@apg.lahn.de>                   */  /*                                                                       */  /* Based on the original ftsystem.c,                                     */  /* modified to avoid fopen(), fclose(), fread(), fseek(), ftell(),       */  /* malloc(), realloc(), and free().                                      */  /*                                                                       */  /* Those C library functions are often not thread-safe or cant be        */  /* used in a shared Amiga library. If thats not a problem for you,       */  /* you can of course use the default ftsystem.c with C library calls     */  /* instead.                                                              */  /*                                                                       */  /* This implementation needs exec V39+ because it uses AllocPooled() etc */  /*                                                                       */  /*************************************************************************/#define __NOLIBBASE__#define __NOGLOBALIFACE__#define __USE_INLINE__#include <proto/exec.h>#include <dos/stdio.h>#include <proto/dos.h>#ifdef __amigaos4__extern struct ExecIFace *IExec;extern struct DOSIFace  *IDOS;#elseextern struct Library   *SysBase;extern struct Library   *DOSBase;#endif#define IOBUF_SIZE 512/* structure that helps us to avoid * useless calls of Seek() and Read() */struct SysFile{  BPTR  file;  ULONG iobuf_start;  ULONG iobuf_end;  UBYTE iobuf[IOBUF_SIZE];};#ifndef __amigaos4__/* C implementation of AllocVecPooled (see autodoc exec/AllocPooled) */APTRAlloc_VecPooled( APTR   poolHeader,                 ULONG  memSize ){  ULONG  newSize = memSize + sizeof ( ULONG );  ULONG  *mem = AllocPooled( poolHeader, newSize );  if ( !mem )    return NULL;  *mem = newSize;  return mem + 1;}/* C implementation of FreeVecPooled (see autodoc exec/AllocPooled) */voidFree_VecPooled( APTR  poolHeader,                APTR  memory ){  ULONG  *realmem = (ULONG *)memory - 1;  FreePooled( poolHeader, realmem, *realmem );}#endif#include <ft2build.h>#include FT_CONFIG_CONFIG_H#include FT_INTERNAL_DEBUG_H#include FT_SYSTEM_H#include FT_ERRORS_H#include FT_TYPES_H#include <stdio.h>#include <stdlib.h>#include <string.h>  /*************************************************************************/  /*                                                                       */  /*                       MEMORY MANAGEMENT INTERFACE                     */  /*                                                                       */  /*************************************************************************/  /*************************************************************************/  /*                                                                       */  /* It is not necessary to do any error checking for the                  */  /* allocation-related functions.  This is done by the higher level       */  /* routines like ft_mem_alloc() or ft_mem_realloc().                     */  /*                                                                       */  /*************************************************************************/  /*************************************************************************/  /*                                                                       */  /* <Function>                                                            */  /*    ft_alloc                                                           */  /*                                                                       */  /* <Description>                                                         */  /*    The memory allocation function.                                    */  /*                                                                       */  /* <Input>                                                               */  /*    memory :: A pointer to the memory object.                          */  /*                                                                       */  /*    size   :: The requested size in bytes.                             */  /*                                                                       */  /* <Return>                                                              */  /*    The address of newly allocated block.                              */  /*                                                                       */  FT_CALLBACK_DEF( void* )  ft_alloc( FT_Memory  memory,            long       size )  {#ifdef __amigaos4__    return AllocVecPooled( memory->user, size );#else    return Alloc_VecPooled( memory->user, size );#endif  }  /*************************************************************************/  /*                                                                       */  /* <Function>                                                            */  /*    ft_realloc                                                         */  /*                                                                       */  /* <Description>                                                         */  /*    The memory reallocation function.                                  */  /*                                                                       */  /* <Input>                                                               */  /*    memory   :: A pointer to the memory object.                        */  /*                                                                       */  /*    cur_size :: The current size of the allocated memory block.        */  /*                                                                       */  /*    new_size :: The newly requested size in bytes.                     */  /*                                                                       */  /*    block    :: The current address of the block in memory.            */  /*                                                                       */  /* <Return>                                                              */  /*    The address of the reallocated memory block.                       */  /*                                                                       */  FT_CALLBACK_DEF( void* )  ft_realloc( FT_Memory  memory,              long       cur_size,              long       new_size,              void*      block )  {    void* new_block;#ifdef __amigaos4__    new_block = AllocVecPooled ( memory->user, new_size );#else    new_block = Alloc_VecPooled ( memory->user, new_size );#endif    if ( new_block != NULL )    {      CopyMem ( block, new_block,                ( new_size > cur_size ) ? cur_size : new_size );#ifdef __amigaos4__      FreeVecPooled ( memory->user, block );#else      Free_VecPooled ( memory->user, block );#endif    }    return new_block;  }  /*************************************************************************/  /*                                                                       */  /* <Function>                                                            */  /*    ft_free                                                            */  /*                                                                       */  /* <Description>                                                         */  /*    The memory release function.                                       */  /*                                                                       */  /* <Input>                                                               */  /*    memory  :: A pointer to the memory object.                         */  /*                                                                       */  /*    block   :: The address of block in memory to be freed.             */  /*                                                                       */  FT_CALLBACK_DEF( void )  ft_free( FT_Memory  memory,           void*      block )  {#ifdef __amigaos4__    FreeVecPooled( memory->user, block );#else    Free_VecPooled( memory->user, block );#endif  }  /*************************************************************************/  /*                                                                       */  /*                     RESOURCE MANAGEMENT INTERFACE                     */  /*                                                                       */  /*************************************************************************/  /*************************************************************************/  /*                                                                       */  /* The macro FT_COMPONENT is used in trace mode.  It is an implicit      */  /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log  */  /* messages during execution.                                            */  /*                                                                       */#undef  FT_COMPONENT#define FT_COMPONENT  trace_io  /* We use the macro STREAM_FILE for convenience to extract the       */  /* system-specific stream handle from a given FreeType stream object */#define STREAM_FILE( stream )  ( (struct SysFile *)stream->descriptor.pointer )  /*************************************************************************/  /*                                                                       */  /* <Function>                                                            */  /*    ft_amiga_stream_close                                              */  /*                                                                       */  /* <Description>                                                         */  /*    The function to close a stream.                                    */  /*                                                                       */  /* <Input>                                                               */  /*    stream :: A pointer to the stream object.                          */  /*                                                                       */  FT_CALLBACK_DEF( void )  ft_amiga_stream_close( FT_Stream  stream )  {    struct SysFile* sysfile;    sysfile = STREAM_FILE( stream );    Close ( sysfile->file );