/
Configure.pl
382 lines (228 loc) · 8.52 KB
/
Configure.pl
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
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
#! perl -w
# Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
# $Id$
=head1 NAME
Configure.pl - Parrot's Configuration Script
=head1 SYNOPSIS
% perl Configure.pl [options]
=head1 DESCRIPTION
This is Parrot's configuration script. It should be run to create the
necessary system-specific files before building Parrot.
=head2 Command-line Options
General Options
=over
=item C<--help>
Prints out a description of the options and exits.
=item C<--version>
Prints out the version number of Configure.pl and exits.
=item C<--verbose>
Tells Configure.pl to output extra information about the configuration
data it is setting.
=item C<--verbose=2>
Tells Configure.pl to output information about i<every> setting added or
changed.
=item C<--verbose-step={N|regex}>
Run C<--verbose=2> for step number C<N> or matching description.
=item C<--nomanicheck>
Tells Configure.pl not to run the MANIFEST check.
=item C<--ask>
This turns on the user prompts.
=back
Compile Options
You can add and remove option values with C<< :rem{<opt>} >> and
C<< :add{<opt>} >>. For example:
perl Configure.pl --ccflags=":rem{-g} :add{-O2}"
=over
=item C<--debugging=0>
Debugging is turned on by default. Use this to disable it.
=item C<--profile>
Turn on profiled compile (gcc only for now)
Tell the compiler to do an optimization phase.
=item C<--optimize>
Tell the compiler to do an optimization phase.
=item C<--inline>
Tell Configure that the compiler supports C<inline>.
=item C<--cc=(compiler)>
Specify which compiler to use.
=item C<--ccflags=(flags)>
Use the given compiler flags.
=item C<--ccwarn=(flags)>
Use the given compiler warning flags.
=item C<--libs=(libs)>
Use the given libraries.
=item C<--link=(linker)>
Specify which linker to use.
=item C<--linkflags=(flags)>
Use the given linker flags
=item C<--ld=(linker)>
Specify which loader to use for shared libraries.
=item C<--ldflags=(flags)>
Use the given loader flags for shared libraries
=item C<--lex=(lexer)>
Specify which lexer to use.
=item C<--yacc=(parser)>
Specify which parser to use.
=item C<--define=val1[,val2]>
Generate "#define PARROT_DEF_VAL1 1" ... entries in has_header.h.
Currently needed to use inet_aton for systems that lack inet_pton:
--define=inet_aton
=back
Parrot Options
=over
=item C<--intval=(type)>
Use the given type for C<INTVAL>.
=item C<--floatval=(type)>
Use the given type for C<FLOATVAL>.
=item C<--opcode=(type)>
Use the given type for opcodes.
=item C<--ops=(files)>
Use the given ops files.
=item C<--pmc=(files)>
Use the given PMC files.
=item C<--cgoto=0>
Don't build cgoto core. This is recommended when you are short of memory.
=item C<--jitcapable>
Use JIT system.
=item C<--execcapable>
Use JIT to emit a native executable.
=item C<--gc=(type)>
Determine the type of garbage collection. The value for C<type> should
be one of: C<gc>, C<libc>, C<malloc> or C<malloc-trace>. The default is
C<gc>.
=back
ICU Options
=over
=item C<--icuplatform=(platform)>
Use the given platform name to pass to ICU's runConfigureICU. (See icu/source/runConfigureICU for the list of available "platform" names, which specify both operating system and compiler.)
=item C<--icuconfigureargs=(arguments)>
Pass the given arguments to ICU's configuration script, instead of the default.
=item C<--icudatadir=(path)>
Use the given directory to locate ICU's data file(s) at runtime
If you have an installed unicode package, you can use these two options instead:
=item C<--icushared=(linkeroption)>
Linker command to link against ICU library version 2.6.
E.g.
--icushared='-L /opt/openoffice/program -licudata -licuuc'
(The libs in openoffice are actually version 2.2 and do not work)
=item C<--icuheaders=(header_dir)>
Location of ICU header files without the /unicode suffix. The header files must match your platform, especially F<platform.h> must be present.
E.g.
--icuheaders='/home/lt/icu/'
You might also need '--nomanicheck'.
=back
Other Options (may not be implemented)
=over
=item C<--maintainer>
Use this option if you want imcc's parser and lexer files to be
generated. Needs a working parser and lexer.
=item C<--miniparrot>
Build parrot assuming only pure ANSI C is available.
=item C<--expnetwork>
Enable experimental networking. This is an unused option and should
probably be removed.
=back
=cut
use 5.005_02;
use strict;
use vars qw($parrot_version @parrot_version);
use lib 'lib';
use Parrot::BuildUtil;
use Parrot::Configure::RunSteps;
$| = 1;
$parrot_version = parrot_version();
@parrot_version = parrot_version();
# Handle options
my %args;
for(@ARGV) {
my($key, $value)=/--([-\w]+)(?:=(.*))?/;
$key = 'help' unless defined $key;
$value = 1 unless defined $value;
for($key) {
/version/ && do {
my $cvsid='$Id$';
print <<"END";
Parrot Version $parrot_version Configure 2.0
$cvsid
END
exit;
};
/help/ && do {
print <<"EOT";
$0 - Parrot Configure 2.0
General Options:
--help Show this text
--version Show version information
--verbose Output extra information
--verbose=2 Output every setting change
--verbose-step=N Set verbose for step N only
--verbose-step=regex Set verbose for step matching description
--nomanicheck Don't check the MANIFEST
--ask Have Configure ask for commonly-changed info
Compile Options:
You can add and remove option values with :rem{<opt>} and :add{<opt>}
e.g. : --ccflags="rem{-g} :add{-O2}"
--debugging=0 Disable debugging, default = 1
--profile Turn on profiled compile (gcc only for now)
--optimize Optimized compile
--inline Compiler supports inline
--cc=(compiler) Use the given compiler
--ccflags=(flags) Use the given compiler flags
--ccwarn=(flags) Use the given compiler warning flags
--libs=(libs) Use the given libraries
--link=(linker) Use the given linker
--linkflags=(flags) Use the given linker flags
--ld=(linker) Use the given loader for shared libraries
--ldflags=(flags) Use the given loader flags for shared libraries
--lex=(lexer) Use the given lexical analyzer generator
--yacc=(parser) Use the given parser generator
--define=inet_aton Quick hack to use inet_aton instead of inet_pton
Parrot Options:
--intval=(type) Use the given type for INTVAL
--floatval=(type) Use the given type for FLOATVAL
--opcode=(type) Use the given type for opcodes
--ops=(files) Use the given ops files
--pmc=(files) Use the given PMC files
--cgoto=0 Don't build cgoto core - recommended when short of mem
--jitcapable Use JIT
--execcapable Use JIT to emit a native executable
--gc=(type) Determine the type of garbage collection
type=(gc|libc|malloc|malloc-trace) default is gc
ICU Options:
--icuplatform=(platform) Platform name to pass to ICU's runConfigureICU
--icuconfigureargs=(args) Arguments to pass to ICU's configuration script
--icudatadir=(path) Directory to locate ICU's data file(s)
For using a system ICU, these options can be used
--icuheaders=(header_dir) Location of headers w/o /unicode
--icushared=(linkeroption)> Full linker command
Other Options (may not be implemented):
--maintainer Create imcc's parser and lexer files. Needs a working
parser and lexer.
--miniparrot Build parrot assuming only pure ANSI C is available
--expnetwork Enable experimental networking (unused)
EOT
exit;
};
$args{$key}=$value;
}
}
$args{debugging} = 1 unless ((exists $args{debugging}) && !$args{debugging});
print <<"END";
Parrot Version $parrot_version Configure 2.0
Copyright (C) 2001-2003 The Perl Foundation. All Rights Reserved.
Hello, I'm Configure. My job is to poke and prod your system to figure out
how to build Parrot. The process is completely automated, unless you passed in
the `--ask' flag on the command line, in which case it'll prompt you for a few
pieces of info.
Since you're running this script, you obviously have Perl 5--I'll be pulling
some defaults from its configuration.
END
#Run the actual steps
Parrot::Configure::RunSteps->runsteps(%args);
print <<"END";
Okay, we're done!
You can now use `make' (or your platform's equivalent to `make') to build your
Parrot. After that, you can use `make test' to run the test suite.
Happy Hacking,
The Parrot Team
END
exit(0);