ref: 5f3987b8e5f4c1ce992e5f9caff744af822bcba2
dir: /setup/WRCNFGGL.i/
/*
WRCNFGGL.i
Copyright (C) 2007 Paul C. Pratt
You can redistribute this file and/or modify it under the terms
of version 2 of the GNU General Public License as published by
the Free Software Foundation. You should have received a copy
of the license along with this file; see the file COPYING.
This file 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
license for more details.
*/
/*
WRite "CNFGGLob.h"
*/
LOCALPROC WriteConfigurationWarning(void)
{
WriteBlankLineToDestFile();
WriteDestFileLn(
"This file is automatically generated by the build system,");
WriteDestFileLn(
"which tries to know what options are valid in what");
WriteDestFileLn(
"combinations. Avoid changing this file manually unless");
WriteDestFileLn(
"you know what you're doing.");
}
LOCALPROC WriteCommonCNFGGLOBContents(void)
{
WriteDestFileLn("/*");
++DestFileIndent;
WriteDestFileLn(
"Configuration options used by both platform specific");
WriteDestFileLn(
"and platform independent code.");
WriteConfigurationWarning();
--DestFileIndent;
WriteDestFileLn("*/");
WriteBlankLineToDestFile();
WriteDestFileLn("/* adapt to current compiler/host processor */");
if (gbk_ide_mw8 == cur_ide) {
WriteDestFileLn("/* make sure this is correct CNFGGLOB */");
WriteCheckPreDef("__MWERKS__");
switch (gbo_cpufam) {
case gbk_cpufam_68k:
WriteCheckPreDef("__MC68K__");
if (gbk_targ_mfpu == cur_targ) {
WriteCheckPreDef("__MC68881__");
} else {
WriteCheckPreNDef("__MC68881__");
}
break;
case gbk_cpufam_ppc:
WriteCheckPreDef("__POWERPC__");
break;
case gbk_cpufam_x86:
WriteCheckPreDef("__INTEL__");
break;
}
} else if ((gbk_ide_bgc == cur_ide)
|| (gbk_ide_xcd == cur_ide)
|| (gbk_ide_mvc == cur_ide))
{
switch (gbo_cpufam) {
case gbk_cpufam_x86:
WriteDestFileLn("#ifdef __x86_64__");
WriteDestFileLn("#error \"source is configured for"
" 32 bit compiler\"");
WriteDestFileLn("#endif");
break;
case gbk_cpufam_x64:
WriteDestFileLn("#ifdef __i386__");
WriteDestFileLn("#error \"source is configured for"
" 64 bit compiler\"");
WriteDestFileLn("#endif");
break;
}
}
WriteBlankLineToDestFile();
#if NeedIntFormatInfo
WriteCompCondBool("MostSigByteFirst",
(gbk_cpufam_68k == gbo_cpufam)
|| (gbk_cpufam_ppc == gbo_cpufam));
WriteCompCondBool("LeastSigByteFirst",
(gbk_cpufam_x86 == gbo_cpufam)
|| (gbk_cpufam_x64 == gbo_cpufam));
WriteCompCondBool("TwosCompSigned",
(gbk_cpufam_68k == gbo_cpufam)
|| (gbk_cpufam_ppc == gbo_cpufam)
|| (gbk_cpufam_x86 == gbo_cpufam)
|| (gbk_cpufam_x64 == gbo_cpufam));
#endif
if (gbk_cpufam_68k == gbo_cpufam) {
WriteDestFileLn("#define HaveCPUfamM68K 1");
}
if ((gbk_ide_bgc == cur_ide)
|| (gbk_ide_xcd == cur_ide)
|| (gbk_ide_mvc == cur_ide)
|| (gbk_ide_cyg == cur_ide)
|| (gbk_ide_dkp == cur_ide))
{
WriteDestFileLn(
"#define MayInline inline __attribute__((always_inline))");
} else
if (gbk_ide_snc == cur_ide) {
WriteDestFileLn("#define MayInline inline");
} else
if (gbk_ide_mw8 == cur_ide) {
WriteDestFileLn("#define MayInline __inline__");
} else
if (gbk_ide_msv == cur_ide) {
if (ide_vers >= 6000) {
WriteDestFileLn("#define MayInline __forceinline");
} else {
WriteDestFileLn("#define MayInline __inline");
}
} else
{
/* WriteDestFileLn("#define MayInline"); */
}
if ((gbk_ide_bgc == cur_ide)
|| (gbk_ide_xcd == cur_ide)
|| (gbk_ide_mvc == cur_ide)
|| (gbk_ide_cyg == cur_ide)
|| (gbk_ide_dkp == cur_ide))
{
WriteDestFileLn(
"#define MayNotInline __attribute__((noinline))");
} else
if ((gbk_ide_msv == cur_ide) && (ide_vers >= 7000)) {
WriteDestFileLn("#define MayNotInline __declspec(noinline)");
} else
{
/* WriteDestFileLn("#define MayNotInline"); */
}
if (gbk_ide_mvc == cur_ide) {
if ((gbk_cpufam_68k == gbo_cpufam)
|| (gbk_cpufam_ppc == gbo_cpufam))
{
WriteDestFileLn("#define BigEndianUnaligned 1");
WriteDestFileLn("#define LittleEndianUnaligned 0");
} else if ((gbk_cpufam_x86 == gbo_cpufam)
|| (gbk_cpufam_x64 == gbo_cpufam))
{
WriteDestFileLn("#define BigEndianUnaligned 0");
WriteDestFileLn("#define LittleEndianUnaligned 1");
} else {
WriteDestFileLn("#define BigEndianUnaligned 0");
WriteDestFileLn("#define LittleEndianUnaligned 0");
}
if (gbk_cpufam_x86 == gbo_cpufam) {
WriteDestFileLn(
"#define my_reg_call __attribute__ ((regparm(3)))");
}
if (gbk_cpufam_x86 == gbo_cpufam) {
WriteDestFileLn(
"#define my_osglu_call __attribute__ "
"((force_align_arg_pointer))");
}
WriteDestFileLn("#define my_cond_rare(x) "
"(__builtin_expect(x, 0))");
WriteDestFileLn("#define Have_ASR 1");
if (gbk_cpufam_x64 == gbo_cpufam) {
WriteDestFileLn("#define HaveUi6Div 1");
}
if (gbk_targ_wcar == cur_targ) {
WriteDestFileLn("#define HaveUi5to6Mul 0");
}
if ((gbk_cpufam_x64 == gbo_cpufam)
|| (gbk_cpufam_ppc == gbo_cpufam)
|| (gbk_cpufam_arm == gbo_cpufam))
{
WriteDestFileLn("#define HaveGlbReg 1");
}
WriteDestFileLn(
"#define my_align_8 __attribute__ ((aligned (8)))");
}
WriteCompCondBool("SmallGlobals", gbk_cpufam_68k == gbo_cpufam);
if ((gbk_ide_bgc == cur_ide)
|| (gbk_ide_xcd == cur_ide)
|| (gbk_ide_mvc == cur_ide)
|| (gbk_ide_ccc == cur_ide)
|| (gbk_ide_dvc == cur_ide)
|| (gbk_ide_mgw == cur_ide)
|| (gbk_ide_dmc == cur_ide)
|| (gbk_ide_lcc == cur_ide)
|| (gbk_ide_cyg == cur_ide)
|| (gbk_ide_dkp == cur_ide)
)
{
WriteDestFileLn("#define cIncludeUnused 0");
} else {
WriteDestFileLn("#define cIncludeUnused 1");
}
if (gbk_ide_lcc == cur_ide) {
WriteDestFileLn("#define UnusedParam(x)");
} else {
WriteDestFileLn("#define UnusedParam(p) (void) p");
}
if (gbk_ide_msv == cur_ide) {
WriteBlankLineToDestFile();
WriteDestFileLn("/* --- set up compiler options --- */");
WriteBlankLineToDestFile();
WriteDestFileLn("/* ignore integer conversion warnings */");
WriteDestFileLn(
"#pragma warning(disable : 4244 4761 4018 4245 4024 4305)");
WriteBlankLineToDestFile();
WriteDestFileLn("/* ignore unused inline warning */");
WriteDestFileLn("#pragma warning(disable : 4514 4714)");
#if 0
WriteBlankLineToDestFile();
WriteDestFileLn("/* ignore type redefinition warning */");
WriteDestFileLn("#pragma warning(disable : 4142)");
#endif
WriteBlankLineToDestFile();
WriteDestFileLn(
"/* ignore unary minus operator"
" applied to unsigned type warning */");
WriteDestFileLn("#pragma warning(disable : 4146)");
if (cur_mIIorIIX
|| (em_cpu_vers >= 2))
{
/* C4127: conditional expression is constant */
/*
C4701: local variable may have been used without having
been initialized
*/
WriteBlankLineToDestFile();
WriteDestFileLn("/* more warnings */");
WriteDestFileLn("#pragma warning(disable : 4127 4701)");
}
} else if (gbk_ide_plc == cur_ide) {
WriteBlankLineToDestFile();
WriteDestFileLn("#pragma warn(disable: 2135 2137)");
}
if (gbk_ide_mw8 == cur_ide) {
if (gbk_dbg_on != gbo_dbg) {
WriteBlankLineToDestFile();
WriteDestFileLn("#ifdef OptForSpeed");
WriteDestFileLn("#pragma optimize_for_size off");
WriteDestFileLn("#endif");
}
}
WriteBlankLineToDestFile();
WriteDestFileLn("/* --- integer types ---- */");
/*
define signed and unsigned integer types
for 8 bits, 16 bits, 32 bits, and so on.
the computer might not have integer types
of a given size. in this case should define
a type of correct size, such as a structure
type, even if the computer can't directly do
integer operations on it. then set
HaveReal?i?b to 0.
*/
/* 8 bits */
/* (ui3b)0 - (ui3b)1 == (ui3b)255 */
WriteBlankLineToDestFile();
WriteDestFileLn("typedef unsigned char ui3b;");
WriteDestFileLn("#define HaveRealui3b 1");
/* sizeof(si3b) == sizeof(ui3b) */
WriteBlankLineToDestFile();
WriteDestFileLn("typedef signed char si3b;");
WriteDestFileLn("#define HaveRealsi3b 1");
/* 16 bits */
/* (ui4b)0 - (ui4b)1 == (ui4b)65535 */
WriteBlankLineToDestFile();
WriteDestFileLn("typedef unsigned short ui4b;");
WriteDestFileLn("#define HaveRealui4b 1");
/* sizeof(si4b) == sizeof(ui4b) */
WriteBlankLineToDestFile();
WriteDestFileLn("typedef short si4b;");
WriteDestFileLn("#define HaveRealsi4b 1");
/* 32 bits */
/* (ui5b)0 - (ui5b)1 == (ui5b)4294967295 */
WriteBlankLineToDestFile();
if (gbk_cpufam_x64 == gbo_cpufam) {
WriteDestFileLn("typedef unsigned int ui5b;");
} else {
WriteDestFileLn("typedef unsigned long ui5b;");
}
WriteDestFileLn("#define HaveRealui5b 1");
/* sizeof(si5b) == sizeof(ui5b) */
WriteBlankLineToDestFile();
if (gbk_cpufam_x64 == gbo_cpufam) {
WriteDestFileLn("typedef int si5b;");
} else {
WriteDestFileLn("typedef long si5b;");
}
WriteDestFileLn("#define HaveRealsi5b 1");
/* 64 bits */ /* this is mostly for illustration, not used */
#if 0
struct ui6b {
ui5b f0;
ui5b f1;
};
typedef struct ui6b ui6b;
struct si6b {
ui5b f0;
si5b f1;
};
typedef struct si6b si6b;
#endif
WriteBlankLineToDestFile();
WriteDestFileLn("#define HaveRealui6b 0");
WriteDestFileLn("#define HaveRealsi6b 0");
WriteBlankLineToDestFile();
WriteDestFileLn("/* --- integer representation types ---- */");
/*
for each integer type, define
the most efficient representation
for parameter passing and temporary
variables on the current
computer.
*/
WriteBlankLineToDestFile();
#if ModPPCi3rTypes
if (gbk_cpufam_ppc == gbo_cpufam) {
WriteDestFileLn("typedef ui5b ui3r;");
WriteDestFileLn("#define ui3beqr 0");
} else
#endif
{
WriteDestFileLn("typedef ui3b ui3r;");
WriteDestFileLn("#define ui3beqr 1");
}
WriteBlankLineToDestFile();
#if ModPPCi3rTypes
if (gbk_cpufam_ppc == gbo_cpufam) {
WriteDestFileLn("typedef si5b si3r;");
WriteDestFileLn("#define si3beqr 0");
} else
#endif
{
WriteDestFileLn("typedef si3b si3r;");
WriteDestFileLn("#define si3beqr 1");
}
WriteBlankLineToDestFile();
WriteDestFileLn("typedef ui4b ui4r;");
WriteDestFileLn("#define ui4beqr 1");
WriteBlankLineToDestFile();
WriteDestFileLn("typedef si4b si4r;");
WriteDestFileLn("#define si4beqr 1");
WriteBlankLineToDestFile();
WriteDestFileLn("typedef ui5b ui5r;");
WriteDestFileLn("#define ui5beqr 1");
WriteBlankLineToDestFile();
WriteDestFileLn("typedef si5b si5r;");
WriteDestFileLn("#define si5beqr 1");
if (gbk_ide_mvc == cur_ide) {
if (gbk_cpufam_x86 == gbo_cpufam)
{
WriteBlankLineToDestFile();
WriteDestFileLn("/* for probable register parameters */");
WriteDestFileLn("#define ui4rr ui5r");
WriteDestFileLn("#define ui3rr ui5r");
} else if (gbk_cpufam_x64 == gbo_cpufam) {
#if 0
WriteBlankLineToDestFile();
WriteDestFileLn("/* for probable register parameters */");
WriteDestFileLn("#define ui4rr unsigned long int");
WriteDestFileLn("#define ui3rr unsigned long int");
#endif
WriteDestFileLn("#define si5rr signed long");
}
WriteBlankLineToDestFile();
WriteDestFileLn(
"#define MySwapUi5r(x) ((ui5r)__builtin_bswap32(x))");
WriteDestFileLn("#define HaveMySwapUi5r 1");
}
}
LOCALPROC Write64bitConfig(void)
{
WriteBlankLineToDestFile();
if (gbk_ide_msv == cur_ide) {
WriteDestFileLn("typedef signed __int64 si6r;");
WriteDestFileLn("typedef signed __int64 si6b;");
WriteDestFileLn("typedef unsigned __int64 ui6r;");
WriteDestFileLn("typedef unsigned __int64 ui6b;");
WriteDestFileLn("#define LIT64(a) a##Ui64");
} else {
WriteDestFileLn("typedef signed long long si6r;");
WriteDestFileLn("typedef signed long long si6b;");
WriteDestFileLn("typedef unsigned long long ui6r;");
WriteDestFileLn("typedef unsigned long long ui6b;");
WriteDestFileLn("#define LIT64(a) a##ULL");
}
}