/* * Copyright (C) 2000, Matias Atria * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ #ifndef _MDVI_COMMON_H #define _MDVI_COMMON_H 1 #include <stdio.h> #include <sys/types.h> #include <math.h> #include "sysdeps.h" #if STDC_HEADERS # include <string.h> #endif #if !defined(STDC_HEADERS) || defined(__STRICT_ANSI__) # ifndef HAVE_STRCHR # define strchr index # define strrchr rindex # endif # ifndef HAVE_MEMCPY # define memcpy(a,b,n) bcopy((b), (a), (n)) # define memmove(a,b,n) bcopy((b), (a), (n)) # endif #endif #if defined(STDC_HEADERS) || defined(HAVE_MEMCPY) #define memzero(a,n) memset((a), 0, (n)) #else #define memzero(a,n) bzero((a), (n)) #endif typedef struct _List { struct _List *next; struct _List *prev; } List; #define LIST(x) ((List *)(x)) typedef struct { char *data; size_t size; size_t length; } Buffer; typedef struct { List *head; List *tail; int count; } ListHead; #define MDVI_EMPTY_LIST_HEAD {NULL, NULL, 0} typedef struct { char *data; size_t size; size_t length; } Dstring; /* Functions to read numbers from streams and memory */ #define fgetbyte(p) ((unsigned)getc(p)) extern char *program_name; extern Ulong fugetn __PROTO((FILE *, size_t)); extern long fsgetn __PROTO((FILE *, size_t)); extern Ulong mugetn __PROTO((const Uchar *, size_t)); extern long msgetn __PROTO((const Uchar *, size_t)); /* To read from a stream (fu: unsigned, fs: signed) */ #define fuget4(p) fugetn((p), 4) #define fuget3(p) fugetn((p), 3) #define fuget2(p) fugetn((p), 2) #define fuget1(p) fgetbyte(p) #define fsget4(p) fsgetn((p), 4) #define fsget3(p) fsgetn((p), 3) #define fsget2(p) fsgetn((p), 2) #define fsget1(p) fsgetn((p), 1) /* To read from memory (mu: unsigned, ms: signed) */ #define MUGETN(p,n) ((p) += (n), mugetn((p)-(n), (n))) #define MSGETN(p,n) ((p) += (n), msgetn((p)-(n), (n))) #define muget4(p) MUGETN((p), 4) #define muget3(p) MUGETN((p), 3) #define muget2(p) MUGETN((p), 2) #define muget1(p) MUGETN((p), 1) #define msget4(p) MSGETN((p), 4) #define msget3(p) MSGETN((p), 3) #define msget2(p) MSGETN((p), 2) #define msget1(p) MSGETN((p), 1) #define ROUND(x,y) (((x) + (y) - 1) / (y)) #define FROUND(x) (int)((x) + 0.5) #define SFROUND(x) (int)((x) >= 0 ? floor((x) + 0.5) : ceil((x) + 0.5)) #define Max(a,b) (((a) > (b)) ? (a) : (b)) #define Min(a,b) (((a) < (b)) ? (a) : (b)) /* make 2byte number from 2 8bit quantities */ #define HALFWORD(a,b) ((((a) << 8) & 0xf) | (b)) #define FULLWORD(a,b,c,d) \ ((((Int8)(a) << 24) & 0xff000000) | \ (((Uint8)(b) << 16) & 0x00ff0000) | \ (((Uint8)(c) << 8) & 0x0000ff00) | \ ((Uint8)(d) & 0xff)) #if defined(__GNUC__) && !defined(__STRICT_ANSI__) #define SWAPINT(a,b) \ ({ int _s = a; a = b; b = _s; }) #else #define SWAPINT(a,b) do { int _s = a; a = b; b = _s; } while(0) #endif #define STREQ(a,b) (strcmp((a), (b)) == 0) #define STRNEQ(a,b,n) (strncmp((a), (b), (n)) == 0) #define STRCEQ(a,b) (strcasecmp((a), (b)) == 0) #define STRNCEQ(a,b,n) (strncasecmp((a), (b), (n)) == 0) extern char *read_string __PROTO((FILE *, int, char *, size_t)); extern size_t read_bcpl __PROTO((FILE *, char *, size_t, size_t)); extern char *read_alloc_bcpl __PROTO((FILE *, size_t, size_t *)); /* miscellaneous */ extern void mdvi_message __PROTO((const char *, ...)); extern void mdvi_crash __PROTO((const char *, ...)); extern void mdvi_fatal __PROTO((const char *, ...)); extern void mdvi_error __PROTO((const char *, ...)); extern void mdvi_warning __PROTO((const char *, ...)); extern int unit2pix __PROTO((int, const char *)); extern double unit2pix_factor __PROTO((const char *)); #define LOG_NONE -1 #define LOG_INFO 0 #define LOG_WARN 1 #define LOG_ERROR 2 #define LOG_DEBUG 3 #define DBG_OPCODE (1 << 0) #define DBG_FONTS (1 << 1) #define DBG_FILES (1 << 2) #define DBG_DVI (1 << 3) #define DBG_PARAMS (1 << 4) #define DBG_SPECIAL (1 << 5) #define DBG_DEVICE (1 << 6) #define DBG_GLYPHS (1 << 7) #define DBG_BITMAPS (1 << 8) #define DBG_PATHS (1 << 9) #define DBG_SEARCH (1 << 10) #define DBG_VARS (1 << 11) #define DBG_BITMAP_OPS (1 << 12) #define DBG_BITMAP_DATA (1 << 13) #define DBG_TYPE1 (1 << 14) #define DBG_TT (1 << 15) #define DBG_FT2 (1 << 16) #define DBG_FMAP (1 << 17) #define DBG_SILENT (1 << 31) #ifdef NODEBUG #define DEBUGGING(x) 0 #else #define DEBUGGING(x) (_mdvi_debug_mask & DBG_##x) #endif #ifndef NODEBUG extern Uint32 _mdvi_debug_mask; extern void __debug __PROTO((int, const char *, ...)); #define DEBUG(x) __debug x #define ASSERT(x) do { \ if(!(x)) mdvi_crash("%s:%d: Assertion %s failed\n", \ __FILE__, __LINE__, #x); \ } while(0) #define ASSERT_VALUE(x,y) do { \ if((x) != (y)) \ mdvi_crash("%s:%d: Assertion failed (%d = %s != %s)\n", \ __FILE__, __LINE__, (x), #x, #x); \ } while(0) #else #define DEBUG(x) do { } while(0) #define ASSERT(x) do { } while(0) #define ASSERT_VALUE(x,y) do { } while(0) #endif #define set_debug_mask(m) (_mdvi_debug_mask = (Uint32)(m)) #define add_debug_mask(m) (_mdvi_debug_mask |= (Uint32)(m)) #define get_debug_mask() _mdvi_debug_mask /* memory allocation */ extern void mdvi_free __PROTO((void *)); extern void *mdvi_malloc __PROTO((size_t)); extern void *mdvi_realloc __PROTO((void *, size_t)); extern void *mdvi_calloc __PROTO((size_t, size_t)); extern char *mdvi_strncpy __PROTO((char *, const char *, size_t)); extern char *mdvi_strdup __PROTO((const char *)); extern char *mdvi_strndup __PROTO((const char *, size_t)); extern void *mdvi_memdup __PROTO((const void *, size_t)); extern char *mdvi_build_path_from_cwd __PROTO((const char *)); extern char *mdvi_strrstr __PROTO((const char *, const char *)); /* macros to make memory allocation nicer */ #define xalloc(t) (t *)mdvi_malloc(sizeof(t)) #define xnalloc(t,n) (t *)mdvi_calloc((n), sizeof(t)) #define xresize(p,t,n) (t *)mdvi_realloc((p), (n) * sizeof(t)) extern char *xstradd __PROTO((char *, size_t *, size_t, const char *, size_t)); extern Ulong get_mtime __PROTO((int)); /* lists */ extern void listh_init __PROTO((ListHead *)); extern void listh_prepend __PROTO((ListHead *, List *)); extern void listh_append __PROTO((ListHead *, List *)); extern void listh_add_before __PROTO((ListHead *, List *, List *)); extern void listh_add_after __PROTO((ListHead *, List *, List *)); extern void listh_remove __PROTO((ListHead *, List *)); extern void listh_concat __PROTO((ListHead *, ListHead *)); extern void listh_catcon __PROTO((ListHead *, ListHead *)); extern void buff_init __PROTO((Buffer *)); extern size_t buff_add __PROTO((Buffer *, const char *, size_t)); extern char *buff_gets __PROTO((Buffer *, size_t *)); extern void buff_free __PROTO((Buffer *)); extern char *getword __PROTO((char *, const char *, char **)); extern char *getstring __PROTO((char *, const char *, char **)); extern void dstring_init __PROTO((Dstring *)); extern int dstring_new __PROTO((Dstring *, const char *, int)); extern int dstring_append __PROTO((Dstring *, const char *, int)); extern int dstring_copy __PROTO((Dstring *, int, const char *, int)); extern int dstring_insert __PROTO((Dstring *, int, const char *, int)); extern void dstring_reset __PROTO((Dstring *)); #define dstring_length(d) ((d)->length) #define dstring_strcat(d,s) dstring_append((d), (s), -1) extern char *dgets __PROTO((Dstring *, FILE *)); extern int file_readable __PROTO((const char *)); extern int file_exists __PROTO((const char *)); extern const char *file_basename __PROTO((const char *)); extern const char *file_extension __PROTO((const char *)); /* * Miscellaneous macros */ #define LIST_FOREACH(ptr, type, list) \ for(ptr = (type *)(list)->head; ptr; ptr = (ptr)->next) #define Size(x) (sizeof(x) / sizeof((x)[0])) /* multiply a fix_word by a 32bit number */ #define B0(x) ((x) & 0xff) #define B1(x) B0((x) >> 8) #define B2(x) B0((x) >> 16) #define B3(x) B0((x) >> 24) #define __tfm_mul(z,t) \ (((((B0(t) * (z)) >> 8) + (B1(t) * (z))) >> 8) + B2(t) * (z)) #define TFMSCALE(z,t,a,b) \ ((B3(t) == 255) ? \ __tfm_mul((z), (t)) / (b) - (a) : \ __tfm_mul((z), (t)) / (b)) #define TFMPREPARE(x,z,a,b) do { \ a = 16; z = (x); \ while(z > 040000000L) { z >>= 1; a <<= 1; } \ b = 256 / a; a *= z; \ } while(0) #endif /* _MDVI_COMMON_H */