aboutsummaryrefslogtreecommitdiff
path: root/win32/lib/crt1.c
blob: 1e2bd174503e593faa8a8e533d2f1c591e9e09dd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
// =============================================
// 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);
}

// =============================================