421 lines
15 KiB
C
421 lines
15 KiB
C
/***************************************************************************/
|
|
/* */
|
|
/* ftsystem.c */
|
|
/* */
|
|
/* Unix-specific FreeType low-level system interface (body). */
|
|
/* */
|
|
/* Copyright 1996-2018 by */
|
|
/* David Turner, Robert Wilhelm, and Werner Lemberg. */
|
|
/* */
|
|
/* 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. */
|
|
/* */
|
|
/***************************************************************************/
|
|
|
|
|
|
#include <ft2build.h>
|
|
/* we use our special ftconfig.h file, not the standard one */
|
|
#include <ftconfig.h>
|
|
#include FT_INTERNAL_DEBUG_H
|
|
#include FT_SYSTEM_H
|
|
#include FT_ERRORS_H
|
|
#include FT_TYPES_H
|
|
#include FT_INTERNAL_STREAM_H
|
|
|
|
/* memory-mapping includes and definitions */
|
|
#ifdef HAVE_UNISTD_H
|
|
#include <unistd.h>
|
|
#endif
|
|
|
|
#include <sys/mman.h>
|
|
#ifndef MAP_FILE
|
|
#define MAP_FILE 0x00
|
|
#endif
|
|
|
|
#ifdef MUNMAP_USES_VOIDP
|
|
#define MUNMAP_ARG_CAST void *
|
|
#else
|
|
#define MUNMAP_ARG_CAST char *
|
|
#endif
|
|
|
|
#ifdef NEED_MUNMAP_DECL
|
|
|
|
#ifdef __cplusplus
|
|
extern "C"
|
|
#else
|
|
extern
|
|
#endif
|
|
int
|
|
munmap( char* addr,
|
|
int len );
|
|
|
|
#define MUNMAP_ARG_CAST char *
|
|
|
|
#endif /* NEED_DECLARATION_MUNMAP */
|
|
|
|
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
|
|
#ifdef HAVE_FCNTL_H
|
|
#include <fcntl.h>
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <errno.h>
|
|
|
|
|
|
/*************************************************************************/
|
|
/* */
|
|
/* MEMORY MANAGEMENT INTERFACE */
|
|
/* */
|
|
/*************************************************************************/
|
|
|
|
|
|
/*************************************************************************/
|
|
/* */
|
|
/* <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 )
|
|
{
|
|
FT_UNUSED( memory );
|
|
|
|
return malloc( size );
|
|
}
|
|
|
|
|
|
/*************************************************************************/
|
|
/* */
|
|
/* <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 )
|
|
{
|
|
FT_UNUSED( memory );
|
|
FT_UNUSED( cur_size );
|
|
|
|
return realloc( block, new_size );
|
|
}
|
|
|
|
|
|
/*************************************************************************/
|
|
/* */
|
|
/* <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 )
|
|
{
|
|
FT_UNUSED( memory );
|
|
|
|
free( block );
|
|
}
|
|
|
|
|
|
/*************************************************************************/
|
|
/* */
|
|
/* 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 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 ) ( (FILE*)stream->descriptor.pointer )
|
|
|
|
|
|
/*************************************************************************/
|
|
/* */
|
|
/* <Function> */
|
|
/* ft_close_stream_by_munmap */
|
|
/* */
|
|
/* <Description> */
|
|
/* The function to close a stream which is opened by mmap. */
|
|
/* */
|
|
/* <Input> */
|
|
/* stream :: A pointer to the stream object. */
|
|
/* */
|
|
FT_CALLBACK_DEF( void )
|
|
ft_close_stream_by_munmap( FT_Stream stream )
|
|
{
|
|
munmap( (MUNMAP_ARG_CAST)stream->descriptor.pointer, stream->size );
|
|
|
|
stream->descriptor.pointer = NULL;
|
|
stream->size = 0;
|
|
stream->base = 0;
|
|
}
|
|
|
|
|
|
/*************************************************************************/
|
|
/* */
|
|
/* <Function> */
|
|
/* ft_close_stream_by_free */
|
|
/* */
|
|
/* <Description> */
|
|
/* The function to close a stream which is created by ft_alloc. */
|
|
/* */
|
|
/* <Input> */
|
|
/* stream :: A pointer to the stream object. */
|
|
/* */
|
|
FT_CALLBACK_DEF( void )
|
|
ft_close_stream_by_free( FT_Stream stream )
|
|
{
|
|
ft_free( NULL, stream->descriptor.pointer );
|
|
|
|
stream->descriptor.pointer = NULL;
|
|
stream->size = 0;
|
|
stream->base = 0;
|
|
}
|
|
|
|
|
|
/* documentation is in ftobjs.h */
|
|
|
|
FT_BASE_DEF( FT_Error )
|
|
FT_Stream_Open( FT_Stream stream,
|
|
const char* filepathname )
|
|
{
|
|
int file;
|
|
struct stat stat_buf;
|
|
|
|
|
|
if ( !stream )
|
|
return FT_THROW( Invalid_Stream_Handle );
|
|
|
|
/* open the file */
|
|
file = open( filepathname, O_RDONLY );
|
|
if ( file < 0 )
|
|
{
|
|
FT_ERROR(( "FT_Stream_Open:" ));
|
|
FT_ERROR(( " could not open `%s'\n", filepathname ));
|
|
return FT_THROW( Cannot_Open_Resource );
|
|
}
|
|
|
|
/* Here we ensure that a "fork" will _not_ duplicate */
|
|
/* our opened input streams on Unix. This is critical */
|
|
/* since it avoids some (possible) access control */
|
|
/* issues and cleans up the kernel file table a bit. */
|
|
/* */
|
|
#ifdef F_SETFD
|
|
#ifdef FD_CLOEXEC
|
|
(void)fcntl( file, F_SETFD, FD_CLOEXEC );
|
|
#else
|
|
(void)fcntl( file, F_SETFD, 1 );
|
|
#endif /* FD_CLOEXEC */
|
|
#endif /* F_SETFD */
|
|
|
|
if ( fstat( file, &stat_buf ) < 0 )
|
|
{
|
|
FT_ERROR(( "FT_Stream_Open:" ));
|
|
FT_ERROR(( " could not `fstat' file `%s'\n", filepathname ));
|
|
goto Fail_Map;
|
|
}
|
|
|
|
/* XXX: TODO -- real 64bit platform support */
|
|
/* */
|
|
/* `stream->size' is typedef'd to unsigned long (in `ftsystem.h'); */
|
|
/* `stat_buf.st_size', however, is usually typedef'd to off_t */
|
|
/* (in sys/stat.h). */
|
|
/* On some platforms, the former is 32bit and the latter is 64bit. */
|
|
/* To avoid overflow caused by fonts in huge files larger than */
|
|
/* 2GB, do a test. Temporary fix proposed by Sean McBride. */
|
|
/* */
|
|
if ( stat_buf.st_size > LONG_MAX )
|
|
{
|
|
FT_ERROR(( "FT_Stream_Open: file is too big\n" ));
|
|
goto Fail_Map;
|
|
}
|
|
else if ( stat_buf.st_size == 0 )
|
|
{
|
|
FT_ERROR(( "FT_Stream_Open: zero-length file\n" ));
|
|
goto Fail_Map;
|
|
}
|
|
|
|
/* This cast potentially truncates a 64bit to 32bit! */
|
|
stream->size = (unsigned long)stat_buf.st_size;
|
|
stream->pos = 0;
|
|
stream->base = (unsigned char *)mmap( NULL,
|
|
stream->size,
|
|
PROT_READ,
|
|
MAP_FILE | MAP_PRIVATE,
|
|
file,
|
|
0 );
|
|
|
|
/* on some RTOS, mmap might return 0 */
|
|
if ( (long)stream->base != -1 && stream->base != NULL )
|
|
stream->close = ft_close_stream_by_munmap;
|
|
else
|
|
{
|
|
ssize_t total_read_count;
|
|
|
|
|
|
FT_ERROR(( "FT_Stream_Open:" ));
|
|
FT_ERROR(( " could not `mmap' file `%s'\n", filepathname ));
|
|
|
|
stream->base = (unsigned char*)ft_alloc( NULL, stream->size );
|
|
|
|
if ( !stream->base )
|
|
{
|
|
FT_ERROR(( "FT_Stream_Open:" ));
|
|
FT_ERROR(( " could not `alloc' memory\n" ));
|
|
goto Fail_Map;
|
|
}
|
|
|
|
total_read_count = 0;
|
|
do
|
|
{
|
|
ssize_t read_count;
|
|
|
|
|
|
read_count = read( file,
|
|
stream->base + total_read_count,
|
|
stream->size - total_read_count );
|
|
|
|
if ( read_count <= 0 )
|
|
{
|
|
if ( read_count == -1 && errno == EINTR )
|
|
continue;
|
|
|
|
FT_ERROR(( "FT_Stream_Open:" ));
|
|
FT_ERROR(( " error while `read'ing file `%s'\n", filepathname ));
|
|
goto Fail_Read;
|
|
}
|
|
|
|
total_read_count += read_count;
|
|
|
|
} while ( (unsigned long)total_read_count != stream->size );
|
|
|
|
stream->close = ft_close_stream_by_free;
|
|
}
|
|
|
|
close( file );
|
|
|
|
stream->descriptor.pointer = stream->base;
|
|
stream->pathname.pointer = (char*)filepathname;
|
|
|
|
stream->read = 0;
|
|
|
|
FT_TRACE1(( "FT_Stream_Open:" ));
|
|
FT_TRACE1(( " opened `%s' (%d bytes) successfully\n",
|
|
filepathname, stream->size ));
|
|
|
|
return FT_Err_Ok;
|
|
|
|
Fail_Read:
|
|
ft_free( NULL, stream->base );
|
|
|
|
Fail_Map:
|
|
close( file );
|
|
|
|
stream->base = NULL;
|
|
stream->size = 0;
|
|
stream->pos = 0;
|
|
|
|
return FT_THROW( Cannot_Open_Stream );
|
|
}
|
|
|
|
|
|
#ifdef FT_DEBUG_MEMORY
|
|
|
|
extern FT_Int
|
|
ft_mem_debug_init( FT_Memory memory );
|
|
|
|
extern void
|
|
ft_mem_debug_done( FT_Memory memory );
|
|
|
|
#endif
|
|
|
|
|
|
/* documentation is in ftobjs.h */
|
|
|
|
FT_BASE_DEF( FT_Memory )
|
|
FT_New_Memory( void )
|
|
{
|
|
FT_Memory memory;
|
|
|
|
|
|
memory = (FT_Memory)malloc( sizeof ( *memory ) );
|
|
if ( memory )
|
|
{
|
|
memory->user = 0;
|
|
memory->alloc = ft_alloc;
|
|
memory->realloc = ft_realloc;
|
|
memory->free = ft_free;
|
|
#ifdef FT_DEBUG_MEMORY
|
|
ft_mem_debug_init( memory );
|
|
#endif
|
|
}
|
|
|
|
return memory;
|
|
}
|
|
|
|
|
|
/* documentation is in ftobjs.h */
|
|
|
|
FT_BASE_DEF( void )
|
|
FT_Done_Memory( FT_Memory memory )
|
|
{
|
|
#ifdef FT_DEBUG_MEMORY
|
|
ft_mem_debug_done( memory );
|
|
#endif
|
|
memory->free( memory, memory );
|
|
}
|
|
|
|
|
|
/* END */
|