/*
Copyright (C) Magna Carta Software, Inc. 1988-1991. All Rights Reserved
C COMMUNICATIONS TOOLKIT AND C WINDOWS TOOLKIT
COMPAT.H -- This file makes code campatible across Turbo C,
Microsoft C 5.0+/Quick C, Mix Power C and Watcom C.
NOTE: Include this file BEFORE the compiler header files.
*/
#if !defined(COMPAT_H_INCLUDED)
#define COMPAT_H_INCLUDED
/*
THIS CODE DETECTS MSC, QUICK C, WATCOM C WATCOM C/386, INTEL CODE BUILDER
AND NDP C-386.
*/
#if (!defined(__POWERC) && !defined(__TURBOC__) && !defined(MSC))
#if (!defined(_INTELC32_) && !defined(__HIGHC__))
#if !defined(__WATCOMC__)
#if defined(M_I86)
#define MSC
#elif !defined(__NDPC__)
#define __NDPC__
#endif
#endif
#endif
#endif
#if defined(__TURBOC__)
#if (defined(__TINY__) || defined(__SMALL__) || defined(__MEDIUM__))
#define CCT_SMALL_DATA
#endif
/* MS-WINDOWS COMPATIBILITY MACROS */
#if !defined(CCTW)
#define DCB void
#define COMSTAT void
#include <dos.h>
#endif
/* ANSI COMPATIBILITY MACROS */
#define FCALL_
#define NEAR_ near
#define FAR_ far
#define HUGE_ huge
#define CDECL_ cdecl
#define INTERRUPT_ interrupt far
/* MSC COMPATIBILITY MACROS */
#define _disable() disable()
#define _enable() enable()
/* SYSTEM COMPATIBILITY MACROS */
#define BIOS_SEG 0
#define memavail() coreleft()
#define memcalloc(a, b) calloc((a), (b))
#define memfree(a) free(a)
/* CCT/ED COMPATIBILITY MACROS */
#if defined(DOSX286) /* using Phar Lap 286|DOS Extender */
#include <pl286.h>
#else
#define install_cas_isr
#define get_vector(a) getvect((a))
#define set_vector(a, b) setvect((a), ((void interrupt (far *)())(b)))
#endif
/* SELF-COMPATIBILITY MACROS! */
#if (defined(__TURBOC__) && !defined(__BORLANDC__))
#define outpw(port, value) outport((port),(value))
#endif
#endif
#if defined(__POWERC)
#if __POWERC < 200
#error Version 2.0.0 or later of Power C required
#elif __POWERC >= 200
#pragma library "cctp20?.lib"
#endif
/* MS-WINDOWS COMPATIBILITY MACROS */
#if !defined(CCTW)
#define DCB void
#define COMSTAT void
#include <dos.h>
#endif
#if (defined(__TINY__) || defined(__SMALL_) || defined(__MEDIUM__))
#define CCT_SMALL_DATA
#endif
#if defined(USE_PCTRACE)
typedef void WINDOW;
typedef void VSCREEN;
typedef void BUFFER; /* popup_menu, tsr_clock, field, startup ? */
#endif
/* ANSI COMPATIBILITY MACROS */
#define FCALL_
#define NEAR_ near
#define FAR_ far
#define HUGE_ huge
#define CDECL_
#define INTERRUPT_ interrupt far
/* MSC COMPATIBILITY MACROS */
#define _disable() disable()
#define _enable() enable()
/* SYSTEM COMPATIBILITY MACROS */
#define get_vector(a) getvect((a))
#define install_cas_isr
#define memavail() coreleft()
#define memcalloc(a, b) calloc((a), (b))
#define memfree(a) free(a)
#define outpw(port, value) outport((port),(value))
#define set_vector(a, b) setvect((a), ((void interrupt (far *)())(b)))
#endif
#if defined(MSC)
/* This identifier is defined under CCT/Windows */
#if (!defined(CCTW) && !defined(_WINDOWS))
#define DCB void
#define COMSTAT void
#endif
/*
The following macros make MS-DOS extensions more portable
*/
#if (defined(M_I86TM) || defined(M_I86SM) || defined(M_I86MM))
#define CCT_SMALL_DATA
#endif
#if defined(_MSC_VER)
#if !defined(FCALL_)
#define FCALL_ _fastcall
#endif
#define NEAR_ _near
#define FAR_ _far
#define HUGE_ _huge
#define CDECL_ _cdecl
#else
#if !defined(FCALL_)
#define FCALL_
#endif
#define NEAR_ near
#define FAR_ far
#define HUGE_ huge
#define CDECL_ cdecl
#endif
#define INTERRUPT_ CDECL_ interrupt FAR_
/* MEMORY-RELATED */
#if defined(CTC)
#include <commtool.h>
#else
#define memcalloc(a, b) calloc((a), (b))
#define memfree(a) free(a)
#endif
/*
The following macro creates a far pointer at a user-specified address
Under MSC 5.0 ONLY, put this macro in comments and follow the
instructions below to use the equivalent function.
*/
#define MK_FP(seg,ofs) ((void far *)((((unsigned long)(seg)) << 16) | (ofs)))
#if 0
/* MSC 5.0 ONLY!
This function replaces the above macro due to a bug in the compiler.
The function is in COMPAT.C and must be uncommented and compiled into
the CWT library.
*/
void far *MK_FP(unsigned pseg, unsigned poff);
#endif
/*
The following 4 macros emulate BASIC's "peek" and "poke" routines.
They are used internally.
*/
#define poke(a,b,c) (*((int far*)MK_FP((a),(b))) = (int)(c))
#define pokeb(a,b,c) (*((char far*)MK_FP((a),(b))) = (char)(c))
#define peek(a,b) (*((int far*)MK_FP((a),(b))))
#define peekb(a,b) (*((char far*)MK_FP((a),(b))))
/* INTERRUPT-RELATED */
/*
This function allows an interrupt call to access the BP register
(e.g. ES:BP is used in several EGA+ BIOS calls).
This function emulates the intr() function found in Turbo C, Power C
and Watcom C.
*/
struct REGPACK {
unsigned r_ax, r_bx, r_cx, r_dx;
unsigned r_bp, r_si, r_di, r_ds, r_es, r_flags;
};
void FCALL_ intr(int intno, struct REGPACK *preg);
#if defined(DOSX286)
#include <pl286.h>
#else
#define get_vector(a) _dos_getvect(a)
#define install_cas_isr
#define set_vector(a, b) _dos_setvect((a), ((void (cdecl interrupt far *)())(b)))
#endif
#define FA_ARCH _A_ARCH
/* MISCELLANEOUS */
unsigned long FCALL_ memavail(void);
#define getdate(x) _dos_getdate(x)
#if 0
#define findfirst(a, b, c) _dos_findfirst((a), (c), (struct find_t *)(b))
#define findnext(a) _dos_findnext ((struct find_t *)(a))
/* FILE-RELATED */
struct ffblk {
char ff_reserved[21];
char ff_attrib;
unsigned ff_ftime;
unsigned ff_fdate;
long ff_fsize;
char ff_name[13];
};
/* BIOS CALLS */
long FCALL_ biostime(short service, long timeval);
struct time {
unsigned char ti_min; /* Minutes */
unsigned char ti_hour; /* Hours */
unsigned char ti_hund; /* Hundredths of seconds */
unsigned char ti_sec; /* Seconds */
};
struct date {
int da_year; /* Year - 1980 */
char da_day; /* Day of the month */
char da_mon; /* Month (1 = Jan) */
};
#define harderr(a) _harderr(a)
#define hardretn(a) _hardretn(a)
#endif
#endif
/* WATCOM C */
#if defined(__WATCOMC__)
#include <stddef.h> /* WE HAVE TO DEFINE cdecl TO WATCOM C */
#if (defined(M_I86TM) || defined(M_I86SM) || defined(M_I86MM))
#define CCT_SMALL_DATA
#endif
#if defined(__386__)
#include <wc386.h>
#else
#if defined(VERSION70) /* define if using WC v7.0 */
#define NEAR_ near
#define FAR_ far
#define HUGE_ huge
#define CDECL_ cdecl
#define strcmpi(a, b) stricmp((a), (b))
#define fputchar(a) putchar(a)
#else
#define NEAR_ __near
#define FAR_ __far
#define HUGE_ __huge
#define CDECL_ __cdecl
#endif
#if defined(CTF)
#include <commtool.h>
#else
#define memcalloc(a, b) calloc((a), (b))
#define memfree(a) free(a)
#endif
#endif
#if !defined(CCTW)
#define DCB void
#define COMSTAT void
#endif
#define install_cas_isr
#define FCALL_
#define INTERRUPT_ interrupt far
/* The following 4 macros emulate BASIC's "peek" and "poke" routines.
They are used internally.
*/
#define poke(a,b,c) (*((short FAR_ *)MK_FP((a),(b))) = (short)(c))
#define pokeb(a,b,c) (*((char FAR_ *)MK_FP((a),(b))) = (char)(c))
#define peek(a,b) (*((short FAR_ *)MK_FP((a),(b))))
#define peekb(a,b) (*((char FAR_ *)MK_FP((a),(b))))
#if 0
/* FILE I/O -- WATCOM uses POSIX rather than MSC conventions. These
definitions allow code developed under a different compiler to run
under Watcom C
*/
struct ffblk {
char ff_reserved[21];
char ff_attrib;
unsigned short ff_ftime;
unsigned short ff_fdate;
long ff_fsize;
char ff_name[13];
};
#if defined(VERSION70)
int findfirst(const char *pathname, struct ffblk *ffblk, int attrib);
int findnext(struct ffblk *ffblk);
#else
#define findfirst(a, b, c) _dos_findfirst((a), (c), (struct find_t *)(b))
#define findnext(a) _dos_findnext ((struct find_t *)(a))
#endif
/* TIME AND DATE STRUCTURES FOR TC COMPATIBILITY */
struct time {
unsigned char ti_min; /* Minutes */
unsigned char ti_hour; /* Hours */
unsigned char ti_hund; /* Hundredths of seconds */
unsigned char ti_sec; /* Seconds */
};
struct date {
int da_year; /* Year - 1980 */
char da_day; /* Day of the month */
char da_mon; /* Month (1 = Jan) */
};
#endif
/* SOME MSC COMPATIBLITY MACROS, etc. */
#define get_vector(a) _dos_getvect(a)
#define max(a,b) (((a) > (b)) ? (a) : (b))
#define min(a,b) (((a) < (b)) ? (a) : (b))
#define set_vector(a, b) _dos_setvect((a), (void (INTERRUPT_ *)())(b))
unsigned long memavail(void);
#define FA_ARCH _A_ARCH
#endif
#if defined(_INTELC32_)
#include <icb.h>
#endif
#if defined(__NDPC__)
#include <ndp386.h>
#endif
#if defined(__HIGHC__)
#include <highc.h>
#endif
#if defined(_PHARLAP)
#define REAL_SEG 0X34
#else
#define REAL_SEG 0X0
#endif
/* 386 compatibility */
#if (!defined(__386__) && !defined(__NDPC__))
#define setwordreg(a) (regs.x.a)
#define setbytereg(a) (regs.h.a)
#endif
#if !defined(EOF) && !defined(__POWERC)
#define EOF (-1)
#endif
#endif
