mirror of
https://github.com/frida/tinycc
synced 2024-12-03 12:51:55 +03:00
86e3cd0c5a
'-run' suported. argvs are converted. But don't use compliled Unicode CLI exe-file to get inputs interactively in other codepage! Please add other compliling supports than 'build-tcc.bat' (Who is good at them).
89 lines
2.1 KiB
C
89 lines
2.1 KiB
C
// =============================================
|
|
// crt1.c
|
|
|
|
// _UNICODE for tchar.h, UNICODE for API
|
|
#include <tchar.h>
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
|
|
#define _UNKNOWN_APP 0
|
|
#define _CONSOLE_APP 1
|
|
#define _GUI_APP 2
|
|
|
|
#define _MCW_PC 0x00030000 // Precision Control
|
|
#define _PC_24 0x00020000 // 24 bits
|
|
#define _PC_53 0x00010000 // 53 bits
|
|
#define _PC_64 0x00000000 // 64 bits
|
|
|
|
typedef struct
|
|
{
|
|
int newmode;
|
|
} _startupinfo;
|
|
|
|
#ifdef _UNICODE
|
|
#define __tgetmainargs __wgetmainargs
|
|
#define _tstart _wstart
|
|
#define _tmain wmain
|
|
#define _runtmain _runwmain
|
|
#else
|
|
#define __tgetmainargs __getmainargs
|
|
#define _tstart _start
|
|
#define _tmain main
|
|
#define _runtmain _runmain
|
|
#endif
|
|
|
|
int __cdecl __tgetmainargs(int *pargc, _TCHAR ***pargv, _TCHAR ***penv, int globb, _startupinfo*);
|
|
void __cdecl __set_app_type(int apptype);
|
|
unsigned int __cdecl _controlfp(unsigned int new_value, unsigned int mask);
|
|
extern int _tmain(int argc, _TCHAR * argv[], _TCHAR * env[]);
|
|
|
|
/* Allow command-line globbing with "int _dowildcard = 1;" in the user source */
|
|
int _dowildcard;
|
|
|
|
void _tstart(void)
|
|
{
|
|
__TRY__
|
|
int argc, ret;
|
|
_TCHAR **argv;
|
|
_TCHAR **env;
|
|
_startupinfo start_info;
|
|
|
|
// Sets the current application type
|
|
__set_app_type(_CONSOLE_APP);
|
|
|
|
// Set default FP precision to 53 bits (8-byte double)
|
|
// _MCW_PC (Precision control) is not supported on
|
|
// the ARM and x64 architectures
|
|
#ifdef __i386
|
|
_controlfp(_PC_53, _MCW_PC);
|
|
#endif
|
|
|
|
start_info.newmode = 0;
|
|
__tgetmainargs( &argc, &argv, &env, _dowildcard, &start_info);
|
|
ret = _tmain(argc, argv, env);
|
|
exit(ret);
|
|
}
|
|
|
|
void _runtmain(int argc0, /* as tcc passed in */ char **argv0)
|
|
{
|
|
__TRY__
|
|
int argc, ret;
|
|
_TCHAR **argv;
|
|
_TCHAR **env;
|
|
_startupinfo start_info;
|
|
|
|
__set_app_type(_CONSOLE_APP);
|
|
|
|
#ifdef __i386
|
|
_controlfp(_PC_53, _MCW_PC);
|
|
#endif
|
|
|
|
start_info.newmode = 0;
|
|
__tgetmainargs( &argc, &argv, &env, _dowildcard, &start_info);
|
|
ret = _tmain(argc0, argv + argc - argc0, env);
|
|
exit(ret);
|
|
}
|
|
|
|
// =============================================
|