This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
e23b35992cf5c56d3592f0ba2044d6f8ba0b6cfe
[perl5.git] / symbian / config.pl
1 #!/usr/bin/perl -w
2
3 # Copyright (c) 2004-2005 Nokia.  All rights reserved.
4 # This utility is licensed under the same terms as Perl itself.
5
6 use strict;
7 use lib "symbian";
8
9 print "Configuring...\n";
10 print "Configuring with: Perl version $] ($^X)\n";
11
12 do "sanity.pl";
13
14 my %VERSION = %{ do "version.pl" };
15
16 printf "Configuring for:  Perl version $VERSION{REVISION}.%03d%03d\n",
17   $VERSION{VERSION}, $VERSION{SUBVERSION};
18
19 my $VERSION = "$VERSION{REVISION}$VERSION{VERSION}$VERSION{SUBVERSION}";
20 my $R_V_SV  = "$VERSION{REVISION}.$VERSION{VERSION}.$VERSION{SUBVERSION}";
21
22 my ($SYMBIAN_ROOT, $SYMBIAN_VERSION, $SDK_NAME, $SDK_VARIANT, $SDK_VERSION) =
23     @{ do "sdk.pl" };
24 my %PORT = %{ do "port.pl" };
25
26 if ($SYMBIAN_ROOT eq 'C:\Symbian\Series60_1_2_CW') {
27     ( $SYMBIAN_VERSION, $SDK_VERSION ) = qw(6.1 1.2);
28 }
29
30 my $WIN = $ENV{WIN} ; # 'wins', 'winscw' (from sdk.pl)
31 my $ARM = 'thumb';    # 'thumb', 'armv5'
32 my $S60SDK = $ENV{S60SDK}; # qw(1.2 2.0 2.1 2.6) (from sdk.pl)
33 my $S80SDK = $ENV{S80SDK}; # qw(2.0) (from sdk.pl)
34 my $UIQSDK = $ENV{UIQSDK}; # qw(2.0 2.1) (from sdk.pl)
35
36 my $UREL = $ENV{UREL}; # from sdk.pl
37 $UREL =~ s/-ARM-/$ARM/;
38 my $UARM = $ENV{UARM}; # from sdk.pl
39
40 die "$0: SDK not recognized\n"
41   if !defined($SYMBIAN_VERSION) ||
42      !defined($SDK_VERSION) ||
43      (!defined($S60SDK) && !defined($S80SDK) && !defined($UIQSDK));
44
45 die "$0: does not know which Windows compiler to use\n"
46     unless defined $WIN;
47
48 print "Symbian $SYMBIAN_VERSION SDK $SDK_VARIANT $SDK_VERSION ($WIN) installed at $SYMBIAN_ROOT\n";
49
50 my $CWD = do "cwd.pl";
51 print "Build directory $CWD\n";
52
53 die "$0: '+' in cwd does not work with Series 60 SDK 1.2\n"
54     if defined $S60SDK && $S60SDK eq '1.2' && $CWD =~ /\+/;
55
56 my @unclean;
57 my @mmp;
58
59 sub create_mmp {
60     my ( $target, $type, @x ) = @_;
61     my $miniperl = $target eq 'miniperl';
62     my $perl     = $target eq 'perl';
63     my $mmp        = "$target.mmp";
64     my $targetpath = $miniperl
65       || $perl ? "TARGETPATH\t\\System\\Apps\\Perl" : "";
66     if ( open( my $fh, ">$mmp" ) ) {
67         print "\t$mmp\n";
68         push @mmp,     $mmp;
69         push @unclean, $mmp;
70         print $fh <<__EOF__;
71 TARGET          $target.$type
72 TARGETTYPE      $type
73 $targetpath
74 EPOCHEAPSIZE    1024 8388608
75 EPOCSTACKSIZE   65536
76 EXPORTUNFROZEN
77 SRCDBG
78 __EOF__
79         if ($SDK_VARIANT eq 'S60') {
80             print $fh "MACRO\t__SERIES60__\n";
81             print $fh "MACRO\t__SERIES60_1X__\n" if $S60SDK =~ /^1\./;
82             print $fh "MACRO\t__SERIES60_2X__\n" if $S60SDK =~ /^2\./;
83         }
84         if ($SDK_VARIANT eq 'S80') {
85             print $fh "MACRO\t__SERIES80__\n";
86             print $fh "MACRO\t__SERIES80_1X__\n" if $S80SDK =~ /^1\./;
87             print $fh "MACRO\t__SERIES80_2X__\n" if $S80SDK =~ /^2\./;
88         }
89         if ($SDK_VARIANT eq 'UIQ') {
90             print $fh "MACRO\t__UIQ__\n";
91             print $fh "MACRO\t__UIQ_1X__\n" if $UIQSDK =~ /^1\./;
92             print $fh "MACRO\t__UIQ_2X__\n" if $UIQSDK =~ /^2\./;
93         }
94         my ( @c, %c );
95         @c = map  { glob } qw(*.c);       # Find the .c files.
96         @c = map  { lc } @c;              # Lowercase the names.
97         @c = grep { !/malloc\.c/ } @c;    # Use the system malloc.
98         @c = grep { !/main\.c/ } @c;      # main.c must be explicit.
99         push @c, map { lc } @x;
100         @c = map { s:^\.\./::; $_ } @c;    # Remove the leading ../
101         @c = map { $c{$_}++ } @c;          # Uniquefy.
102         @c = sort keys %c;                 # Beautify.
103
104         for (@c) {
105             print $fh "SOURCE\t\t$_\n";
106         }
107         print $fh <<__EOF__;
108 SOURCEPATH      $CWD
109 USERINCLUDE     $CWD
110 USERINCLUDE     $CWD\\ext\\DynaLoader
111 USERINCLUDE     $CWD\\symbian
112 SYSTEMINCLUDE   \\epoc32\\include\\libc
113 SYSTEMINCLUDE   \\epoc32\\include
114 LIBRARY         euser.lib
115 LIBRARY         estlib.lib
116 LIBRARY         eikcore.lib
117 LIBRARY         cone.lib
118 LIBRARY         efsrv.lib
119 __EOF__
120         if ( $miniperl || $perl || $type eq 'dll' ) {
121             print $fh <<__EOF__;
122 LIBRARY         charconv.lib
123 LIBRARY         hal.lib
124 LIBRARY         estor.lib
125 __EOF__
126         }
127         if ($SDK_VARIANT =~ /^S[68]0$/) {
128             print $fh <<__EOF__;
129 LIBRARY         commonengine.lib
130 __EOF__
131         }
132         if (defined $S60SDK) {
133             print $fh <<__EOF__;
134 LIBRARY         avkon.lib
135 LIBRARY         commondialogs.lib 
136 __EOF__
137         }
138         if (defined $S80SDK) {
139             print $fh <<__EOF__;
140 LIBRARY         eikctl.lib
141 LIBRARY         eikcoctl.lib
142 LIBRARY         eikdlg.lib
143 LIBRARY         ckndlg.lib
144 __EOF__
145         }
146         if (defined $UIQSDK) {
147             print $fh <<__EOF__;
148 LIBRARY         eikctl.lib
149 LIBRARY         eikcoctl.lib
150 LIBRARY         eikdlg.lib
151 LIBRARY         qikctl.lib
152 __EOF__
153         }
154         if ( $type eq 'exe' ) {
155             print $fh <<__EOF__;
156 STATICLIBRARY   ecrt0.lib
157 __EOF__
158         }
159         if ($miniperl) {
160             print $fh <<__EOF__;
161 MACRO           PERL_MINIPERL
162 __EOF__
163         }
164         if ($perl) {
165             print $fh <<__EOF__;
166 MACRO           PERL_PERL
167 __EOF__
168         }
169         print $fh <<__EOF__;
170 MACRO           PERL_CORE
171 MACRO           MULTIPLICITY
172 MACRO           PERL_IMPLICIT_CONTEXT
173 __EOF__
174         unless ( $miniperl || $perl ) {
175             print $fh <<__EOF__;
176 MACRO           PERL_GLOBAL_STRUCT
177 MACRO           PERL_GLOBAL_STRUCT_PRIVATE
178 RESOURCE        symbian\\PerlUi.rss
179 __EOF__
180         }
181         close $fh;
182     }
183     else {
184         warn "$0: failed to open $mmp for writing: $!\n";
185     }
186 }
187
188 sub create_bld_inf {
189     if ( open( BLD_INF, ">bld.inf" ) ) {
190         print "\tbld.inf\n";
191         push @unclean, "bld.inf";
192         print BLD_INF <<__EOF__;
193 PRJ_PLATFORMS
194 ${WIN} ${ARM}
195 PRJ_MMPFILES
196 __EOF__
197         for (@mmp) { print BLD_INF $_, "\n" }
198         close BLD_INF;
199     }
200     else {
201         warn "$0: failed to open bld.inf for writing: $!\n";
202     }
203 }
204
205 my %config;
206
207 sub load_config_sh {
208     if ( open( CONFIG_SH, "symbian/config.sh" ) ) {
209         while (<CONFIG_SH>) {
210             if (/^(\w+)=['"]?(.*?)["']?$/) {
211                 my ( $var, $val ) = ( $1, $2 );
212                 $val =~ s/x.y.z/$R_V_SV/gi;
213                 $val =~ s/thumb/$ARM/gi;
214                 $val = "'$SYMBIAN_VERSION'" if $var eq 'osvers';
215                 $val = "'$SDK_VERSION'"     if $var eq 'sdkvers';
216                 $config{$var} = $val;
217             }
218         }
219         close CONFIG_SH;
220     }
221     else {
222         warn "$0: failed to open symbian\\config.sh for reading: $!\n";
223     }
224 }
225
226 sub create_config_h {
227     load_config_sh();
228     if ( open( CONFIG_H, ">config.h" ) ) {
229         print "\tconfig.h\n";
230         push @unclean, "config.h";
231         if ( open( CONFIG_H_SH, "config_h.SH" ) ) {
232             while (<CONFIG_H_SH>) {
233                 last if /\#ifndef _config_h_/;
234             }
235             print CONFIG_H <<__EOF__;
236 /*
237  * Package name      : perl
238  * Source directory  : .
239  * Configuration time: 
240  * Configured by     : 
241  * Target system     : symbian
242  */
243
244 #ifndef _config_h_
245 __EOF__
246             while (<CONFIG_H_SH>) {
247                 last if /!GROK!THIS/;
248                 s/\$(\w+)/exists $config{$1} ? $config{$1} : (warn "$0: config.sh missing '$1'\n", "")/eg;
249                 s/^#undef\s+(\S+).+/#undef $1/g;
250                 s:\Q/**/::;
251                 print CONFIG_H;
252             }
253             close CONFIG_H_SH;
254         }
255         else {
256             warn "$0: failed to open ../config_h.SH for reading: $!\n";
257         }
258         close CONFIG_H;
259     }
260     else {
261         warn "$0: failed to open config.h for writing: $!\n";
262     }
263 }
264
265 sub create_DynaLoader_cpp {
266     print "\text\\DynaLoader\\DynaLoader.cpp\n";
267     system(
268 q[perl -Ilib lib\ExtUtils\xsubpp ext\DynaLoader\dl_symbian.xs >ext\DynaLoader\DynaLoader.cpp]
269       ) == 0
270       or die "$0: creating DynaLoader.cpp failed: $!\n";
271     push @unclean, 'ext\DynaLoader\DynaLoader.cpp';
272
273 }
274
275 sub create_symbian_port_h {
276     print "\tsymbian\\symbian_port.h\n";
277     if ( open( SYMBIAN_PORT_H, ">symbian/symbian_port.h" ) ) {
278         my ($sdkmajor, $sdkminor);
279         if ($SDK_VARIANT eq 'S60') {
280             $S60SDK =~ /^(\d+)\.(\d+)$/;
281             ($sdkmajor, $sdkminor) = ($1, $2);
282         }
283         if ($SDK_VARIANT eq 'S80') {
284             $S80SDK =~ /^(\d+)\.(\d+)$/;
285             ($sdkmajor, $sdkminor) = ($1, $2);
286         }
287         if ($SDK_VARIANT eq 'UIQ') {
288             $UIQSDK =~ /^(\d+)\.(\d+)$/;
289             ($sdkmajor, $sdkminor) = ($1, $2);
290         }
291         print SYMBIAN_PORT_H <<__EOF__;
292 /* Copyright (c) 2004-2005, Nokia.  All rights reserved. */
293
294 #ifndef __symbian_port_h__
295 #define __symbian_port_h__
296
297 #define PERL_SYMBIANPORT_MAJOR $PORT{dll}->{MAJOR}
298 #define PERL_SYMBIANPORT_MINOR $PORT{dll}->{MINOR}
299 #define PERL_SYMBIANPORT_PATCH $PORT{dll}->{PATCH}
300
301 #define PERL_SYMBIANSDK_FLAVOR  L"$SDK_VARIANT"
302 #define PERL_SYMBIANSDK_MAJOR   $sdkmajor
303 #define PERL_SYMBIANSDK_MINOR   $sdkminor
304
305 #endif /* #ifndef __symbian_port_h__ */
306 __EOF__
307         close(SYMBIAN_PORT_H);
308         push @unclean, 'symbian\symbian_port.h';
309     }
310     else {
311         warn "$0: failed to open symbian/symbian_port.h for writing: $!\n";
312     }
313 }
314
315 sub create_perlmain_c {
316     print "\tperlmain.c\n";
317     system(
318 q[perl -ne "print qq[    char *file = __FILE__;\n] if /dXSUB_SYS/;print;print qq[    newXS(\"DynaLoader::boot_DynaLoader\", boot_DynaLoader, file);\n] if /dXSUB_SYS/;print qq[EXTERN_C void boot_DynaLoader (pTHX_ CV* cv);\n] if /Do not delete this line/" miniperlmain.c > perlmain.c]
319       ) == 0
320       or die "$0: Creating perlmain.c failed: $!\n";
321     push @unclean, 'perlmain.c';
322 }
323
324 sub create_PerlApp_pkg {
325     print "\tsymbian\\PerlApp.pkg\n";
326     if ( open( PERLAPP_PKG, ">symbian\\PerlApp.pkg" ) ) {
327         my $ProductId =
328             defined $S60SDK ?
329 qq[;Supports Series 60 v0.9\n(0x101F6F88), 0, 0, 0, {"Series60ProductID"}\n] :
330             defined $S80SDK ?
331 qq[;Supports Series 80 v2.0\n(0x101F8ED2), 0, 0, 0, {"Series80ProductID"}\n] :
332             defined $UIQSDK && $SDK_VERSION =~  /^(\d)\.(\d)$/ ?
333 qq[;Supports UIQ v2.1\n(0x101F617B), $1, $2, 0, {"UIQ21ProductID"}\n] :
334             ";Supports Series NN";
335         my $APPS = $UREL;
336         if (($SDK_VARIANT eq 'S60' && $SDK_VERSION ne '1.2' || $WIN eq 'winscw') || defined $S80SDK) { # Do only if not in S60 1.2 VC.
337             $APPS =~ s!\\epoc32\\release\\(.+)\\$UARM$!\\epoc32\\data\\z\\system\\apps\\PerlApp!i;
338         }
339         # TODO: in S60 3.0 there will be no more recognizers.
340         my $mdl = qq["$UREL\\PerlRecog.mdl"-"!:\\system\\recogs\\PerlRecog.mdl";];
341         my $AIF = $SDK_VARIANT =~ /^S[68]0/ ? qq["$APPS\\PerlApp.aif"-"!:\\system\\apps\\PerlApp\\PerlApp.aif"] : "";
342         print PERLAPP_PKG <<__EOF__;
343 ; !!!!!!   DO NOT EDIT THIS FILE   !!!!!!
344 ; This file is built by symbian\\config.pl.
345 ; Any changes made here will be lost!
346 ;
347 ; PerlApp.pkg
348 ;
349 ; Note that the demo_pl needs to be run to create the demo .pl scripts.
350 ;
351 ; Languages
352 &EN;
353
354 ; Standard SIS file header
355 #{"PerlApp"},(0x102015F6),0,2,0
356
357 $ProductId
358
359 ; Files
360 "$UREL\\PerlApp.APP"-"!:\\system\\apps\\PerlApp\\PerlApp.app"
361 $mdl
362 "$APPS\\PerlApp.rsc"-"!:\\system\\apps\\PerlApp\\PerlApp.rsc"
363 $AIF
364 __EOF__
365         if ( open( DEMOS, "perl symbian\\demo_pl list |" ) ) {
366             while (<DEMOS>) {
367                 chomp;
368                 print PERLAPP_PKG qq["$_"-"!:\\Perl\\$_"\n];
369             }
370             close(DEMOS);
371         }
372         close(PERLAPP_PKG);
373     }
374     else {
375         die "$0: symbian\\PerlApp.pkg: $!\n";
376     }
377     push @unclean, 'symbian\PerlApp.pkg';
378 }
379
380 print "Creating...\n";
381 create_mmp(
382     'miniperl',             'exe',
383     'miniperlmain.c',       'symbian\symbian_stubs.c',
384     'symbian\PerlBase.cpp',
385     'symbian\PerlUi.cpp',
386     'symbian\PerlUtil.cpp',
387     'symbian\symbian_utils.cpp',
388 );
389 create_mmp(
390     "perl",                      'exe',
391     'perlmain.c',                'symbian\symbian_stubs.c',
392     'symbian\symbian_utils.cpp',
393     'symbian\PerlBase.cpp',
394     'symbian\PerlUi.cpp',
395     'symbian\PerlUtil.cpp',
396     'ext\DynaLoader\DynaLoader.cpp',
397 );
398
399 create_mmp(
400     "perl$VERSION",              'dll',
401     'symbian\symbian_dll.cpp',   'symbian\symbian_stubs.c',
402     'symbian\symbian_utils.cpp',
403     'symbian\PerlBase.cpp',
404     'symbian\PerlUi.cpp',
405     'symbian\PerlUtil.cpp',
406     'ext\DynaLoader\DynaLoader.cpp',
407 );
408
409 create_bld_inf();
410 create_config_h();
411 create_perlmain_c();
412 create_symbian_port_h();
413 create_DynaLoader_cpp();
414 create_PerlApp_pkg();
415
416 if ( open( PERLAPP_MMP, ">symbian/PerlApp.mmp" ) ) {
417     my @MACRO;
418     my @LIB;
419     push @MACRO, 'PERL_IMPLICIT_CONTEXT';
420     push @MACRO, 'MULTIPLICITY';
421     if (defined $S60SDK) {
422         push @MACRO, '__SERIES60__';
423         push @MACRO, '__SERIES60_1X__' if $S60SDK =~ /^1\./;
424         push @MACRO, '__SERIES60_2X__' if $S60SDK =~ /^2\./;
425         push @LIB, <<__EOF__;
426 LIBRARY         avkon.lib
427 LIBRARY         commondialogs.lib 
428 __EOF__
429     }
430     if (defined $S80SDK) {
431         push @MACRO, '__SERIES80__';
432         push @MACRO, '__SERIES80_1X__' if $S80SDK =~ /^1\./;
433         push @MACRO, '__SERIES80_2X__' if $S80SDK =~ /^2\./;
434         push @LIB, <<__EOF__;
435 LIBRARY         eikctl.lib
436 LIBRARY         eikcoctl.lib
437 LIBRARY         eikdlg.lib
438 LIBRARY         ckndlg.lib
439 __EOF__
440     }
441     if (defined $UIQSDK) {
442         push @MACRO, '__UIQ__';
443         push @MACRO, '__UIQ_1X__' if $UIQSDK =~ /^1\./;
444         push @MACRO, '__UIQ_2X__' if $UIQSDK =~ /^2\./;
445         push @LIB, <<__EOF__;
446 LIBRARY         eikctl.lib
447 LIBRARY         eikcoctl.lib
448 LIBRARY         eikdlg.lib
449 LIBRARY         qikctl.lib
450 __EOF__
451     }
452     print PERLAPP_MMP <<__EOF__;
453 // !!!!!!   DO NOT EDIT THIS FILE   !!!!!!
454 // This file is built by symbian\\config.pl.
455 // Any changes made here will be lost!
456 TARGET            PerlApp.app
457 TARGETTYPE        app
458 UID               0x100039CE 0x102015F6
459 TARGETPATH        \\system\\apps\\PerlApp
460 SRCDBG
461 EXPORTUNFROZEN
462 SOURCEPATH        .
463 SOURCE            PerlApp.cpp 
464
465 USERINCLUDE       .
466 USERINCLUDE       ..
467 USERINCLUDE       \\symbian\\perl\\$R_V_SV\\include
468
469 SYSTEMINCLUDE     \\epoc32\\include
470 SYSTEMINCLUDE     \\epoc32\\include\\libc
471
472 LIBRARY           apparc.lib
473 LIBRARY           bafl.lib
474 LIBRARY           charconv.lib 
475 LIBRARY           cone.lib
476 LIBRARY           efsrv.lib
477 LIBRARY           eikcore.lib
478 LIBRARY           estlib.lib 
479 LIBRARY           euser.lib
480 LIBRARY           perl$VERSION.lib
481 @LIB
482 RESOURCE          perlapp.rss
483 __EOF__
484     if (@MACRO) {
485         for my $macro (@MACRO) {
486             print PERLAPP_MMP <<__EOF__;
487 MACRO             $macro
488 __EOF__
489         }
490     }
491     if ($SDK_VARIANT =~ /^S[68]0$/) {
492         print PERLAPP_MMP <<__EOF__;
493 AIF               PerlApp.aif . PerlAppAif.rss 
494 __EOF__
495     }
496     close(PERLAPP_MMP);
497     push @unclean, 'symbian\PerlApp.mmp';
498 }
499 else {
500     warn "$0: failed to create symbian\\PerlApp.mmp";
501 }
502
503 if ( open( MAKEFILE, ">Makefile" ) ) {
504     my $perl = "perl$VERSION";
505     my $windef1 = "$SYMBIAN_ROOT\\Epoc32\\Build$CWD\\$perl\\$WIN\\$perl.def";
506     my $windef2 = "..\\BWINS\\${perl}u.def";
507     my $armdef1 = "$SYMBIAN_ROOT\\Epoc32\\Build$CWD\\$perl\\$ARM\\$perl.def";
508     my $armdef2 = "..\\BMARM\\${perl}u.def";
509     my $MF = $WIN eq 'wins' ? 'vc6' : $WIN eq 'winscw' ? 'cw_ide' : "UNKNOWN";
510     print "\tMakefile\n";
511     print MAKEFILE <<__EOF__;
512 help:
513         \@echo === Perl for Symbian ===
514         \@echo Useful targets:
515         \@echo all win arm clean
516         \@echo perldll.sis perlext.sis perlsdk.zip
517
518 WIN     = ${WIN}
519 ARM     = ${ARM}
520
521 all:    build
522
523 build:  rename_makedef build_${WIN} build_arm
524
525 @unclean: symbian\\config.pl
526         perl symbian\\config.pl
527
528 build_${WIN}:   abld.bat perldll_${WIN}
529
530 build_vc6:      abld.bat perldll_wins
531
532 build_vc7:      abld.bat perldll_wins
533
534 build_cw:       abld.bat perldll_winscw
535
536 build_arm:      abld.bat perl_arm miniperl_arm perldll_arm
537
538 miniperl_win miniperl_${WIN}:   miniperl.mmp abld.bat rename_makedef
539         abld build ${WIN} udeb miniperl
540
541 miniperl_arm:   miniperl.mmp abld.bat rename_makedef
542         abld build \$(ARM) $UARM miniperl
543
544 miniperl:       miniperl_${WIN} miniperl_arm
545
546 perl:   perl_${WIN} perl_arm
547
548 perl_win perl_${WIN}:   perl.mmp abld.bat rename_makedef
549         abld build ${WIN} perl
550
551 perl_arm:       perl.mmp abld.bat rename_makedef
552         abld build \$(ARM) $UARM perl
553
554 perldll_win perldll_${WIN}: perl${VERSION}_${WIN} freeze_${WIN} perl${VERSION}_${WIN}
555
556 perl${VERSION}_win perl${VERSION}_${WIN}:       perl$VERSION.mmp abld.bat rename_makedef
557         abld build ${WIN} perl$VERSION
558
559 perldll_arm: perl${VERSION}_arm freeze_arm perl${VERSION}_arm
560
561 perl${VERSION}_arm:     perl$VERSION.mmp abld.bat rename_makedef
562         abld build \$(ARM) $UARM perl$VERSION
563
564 perldll perl$VERSION:   perldll_${WIN} perldll_arm
565
566 win ${WIN}:     miniperl_${WIN} perl_${WIN} perldll_${WIN}
567
568 thumb arm:      miniperl_arm perl_arm perldll_arm
569
570 rename_makedef:
571         -ren makedef.pl nomakedef.pl
572
573 # Symbian SDK has a makedef.pl of its own,
574 # and we don't need Perl's.
575 rerename_makedef:
576         -ren nomakedef.pl makedef.pl
577
578 symbian\\PerlUi.rss: symbian\\PerlUi$SDK_VARIANT.rss
579         copy symbian\\PerlUi$SDK_VARIANT.rss symbian\\PerlUi.rss
580
581 abld.bat abld: bld.inf symbian\\PerlUi.rss
582         bldmake bldfiles
583
584 vc6:    win.mf vc6.mf build_vc6
585
586 vc7:    win.mf vc7.mf build_vc7
587
588 cw:     win.mf cw.mf build_cw
589
590 ${WIN}_miniperl.mf: abld.bat symbian\\config.pl
591         abld makefile ${MF} miniperl
592         echo > ${WIN}_miniperl.mf
593
594 ${WIN}_perl.mf: abld.bat symbian\\config.pl
595         abld makefile ${MF} perl
596         echo > ${WIN}_perl.mf
597
598 ${WIN}_${VERSION}.mf: abld.bat symbian\\config.pl
599         abld makefile ${MF} perl${VERSION}
600         echo > ${WIN}_${VERSION}.mf
601
602 symbian\\${WIN}.mf:
603         cd symbian; make ${WIN}.mf
604
605 ${WIN}.mf: ${WIN}_miniperl.mf ${WIN}_perl.mf ${WIN}_${VERSION}.mf symbian\\${WIN}.mf
606
607 arm_miniperl.mf: abld.bat symbian\\config.pl
608         echo > arm_miniperl.mf
609
610 arm_perl.mf: abld.bat symbian\\config.pl
611         echo > arm_perl.mf
612
613 arm_${VERSION}.mf: abld.bat symbian\\config.pl
614         echo > arm_${VERSION}.mf
615
616 arm.mf: arm_miniperl.mf arm_perl.mf arm_${VERSION}.mf
617
618 win.mf:  vc6.mf cw.mf
619         echo > win.mf
620
621 vc6.mf: abld.bat symbian\\config.pl
622         abld makefile vc6
623         echo > vc6.mf
624
625 vc7.mf: abld.bat symbian\\config.pl
626         abld makefile vc7
627         echo > vc7.mf
628
629 cw.mf: abld.bat symbian\\config.pl
630         abld makefile cw_ide
631         echo > cw.mf
632
633 PM  = lib\\Config.pm lib\\Cross.pm lib\\lib.pm ext\\DynaLoader\\DynaLoader.pm ext\\DynaLoader\\XSLoader.pm ext\\Errno\\Errno.pm
634 POD = lib\\Config.pod
635
636 pm:     \$(PM)
637
638 XLIB    = -Ixlib\\symbian
639
640 XSBOPT  = --win=\$(WIN) --arm=\$(ARM)
641
642 lib\\Config.pm:
643         copy symbian\\config.sh config.sh
644         perl -pi.bak -e "s:x\\.y\\.z+:$R_V_SV:g" config.sh
645         perl \$(XLIB) configpm --cross=symbian
646         copy xlib\\symbian\\Config.pm lib\\Config.pm
647         perl -pi.bak -e "s:x\\.y\\.z:$R_V_SV:g" lib\\Config.pm
648         perl -pi.bak -e "s:5\\.\\d+\\.\\d+:$R_V_SV:g" lib\\Config.pm
649         -perl -pi.bak -e "s:x\\.y\\.z:$R_V_SV:g" xlib\\symbian\\Config_heavy.pl
650
651 lib\\lib.pm:
652         perl lib\\lib_pm.PL
653
654 ext\\DynaLoader\\DynaLoader.pm:
655         -del /f ext\\DynaLoader\\DynaLoader.pm
656         perl -Ixlib\\symbian ext\\DynaLoader\\DynaLoader_pm.PL
657         perl -pi.bak -e "s/__END__//" DynaLoader.pm
658         copy /y DynaLoader.pm ext\\DynaLoader\\DynaLoader.pm
659         -del /f DynaLoader.pm DynaLoader.pm.bak
660
661 ext\\DynaLoader\\XSLoader.pm:
662         perl \$(XLIB) symbian\\xsbuild.pl \$(XSBOPT) XSLoader
663
664 ext\\Errno\\Errno.pm:
665         perl \$(XLIB) symbian\\xsbuild.pl \$(XSBOPT) Errno
666
667 miniperlexe.sis:        miniperl_arm symbian\\makesis.pl
668         perl \$(XLIB) symbian\\makesis.pl miniperl
669
670 perlexe.sis:    perl_arm symbian\\makesis.pl
671         perl \$(XLIB) symbian\\makesis.pl perl
672
673
674 allsis: all miniperlexe.sis perlexe.sis perldll.sis perllib.sis perlext.sis perlapp.sis
675
676 perldll.sis perl$VERSION.sis:   perldll_arm pm symbian\\makesis.pl
677         perl \$(XLIB) symbian\\makesis.pl perl${VERSION}dll
678
679 perl${VERSION}lib.sis perllib.sis:      \$(PM)
680         perl \$(XLIB) symbian\\makesis.pl perl${VERSION}lib
681
682 perl${VERSION}ext.sis perlext.sis:      perldll_arm buildext_sis
683         perl symbian\\makesis.pl perl${VERSION}ext
684
685 EXT =   Compress::Zlib Cwd Data::Dumper Devel::Peek Digest::MD5 Errno Fcntl File::Glob Filter::Util::Call IO List::Util MIME::Base64 PerlIO::scalar PerlIO::via SDBM_File Socket Storable Time::HiRes XSLoader attrs
686
687 buildext: perldll symbian\\xsbuild.pl lib\\Config.pm
688         perl \$(XLIB) symbian\\xsbuild.pl \$(XSBOPT) \$(EXT)
689
690 buildextcpp: perldll symbian\\xsbuild.pl lib\\Config.pm
691         perl \$(XLIB) symbian\\xsbuild.pl --csuffix .cpp \$(XSBOPT) \$(EXT)
692
693 buildext_sis: perldll.sis symbian\\xsbuild.pl lib\\Config.pm
694         perl \$(XLIB) symbian\\xsbuild.pl \$(XSBOPT) --sis \$(EXT)
695
696 buildextcpp_sis: perldll.sis symbian\\xsbuild.pl lib\\Config.pm
697         perl \$(XLIB) symbian\\xsbuild.pl --csuffix .cpp \$(XSBOPT) --sis \$(EXT)
698
699 cleanext: symbian\\xsbuild.pl
700         perl \$(XLIB) symbian\\xsbuild.pl \$(XSBOPT) --clean \$(EXT)
701
702 distcleanext: symbian\\xsbuild.pl
703         perl \$(XLIB) symbian\\xsbuild.pl \$(XSBOPT) --distclean \$(EXT)
704
705 sis makesis:    miniperl perl perldll pm buildext perlapp.sis
706         perl \$(XLIB) symbian\\makesis.pl
707
708 APIDIR = \\Symbian\\perl\\$R_V_SV
709
710 sdkinstall:
711         -mkdir \\Symbian\\perl
712         -mkdir \\Symbian\\perl\\$R_V_SV
713         -mkdir \$(APIDIR)\\include
714         -mkdir \$(APIDIR)\\include\\symbian
715         -mkdir \$(APIDIR)\\lib
716         -mkdir \$(APIDIR)\\lib\\ExtUtils
717         -mkdir \$(APIDIR)\\pod
718         -mkdir \$(APIDIR)\\bin
719         -mkdir \$(BINDIR)
720         copy /y *.h   \$(APIDIR)\\include
721         -copy /y *.inc \$(APIDIR)\\include
722         copy /y lib\\ExtUtils\\xsubpp  \$(APIDIR)\\lib\\ExtUtils
723         copy /y lib\\ExtUtils\\typemap \$(APIDIR)\\lib\\ExtUtils
724         copy /y lib\\ExtUtils\\ParseXS.pm \$(APIDIR)\\lib\\ExtUtils
725         copy /y symbian\\xsbuild.pl    \$(APIDIR)\\bin
726         copy /y symbian\\sisify.pl     \$(APIDIR)\\bin
727         copy /y symbian\\PerlBase.h    \$(APIDIR)\\include
728         copy /y symbian\\PerlUi.h      \$(APIDIR)\\include
729         copy /y symbian\\PerlUtil.h    \$(APIDIR)\\include
730         copy /y symbian\\symbian*.h    \$(APIDIR)\\include\\symbian
731         copy /y symbian\\PerlBase.pod  \$(APIDIR)\\pod
732         copy /y symbian\\PerlUtil.pod  \$(APIDIR)\\pod
733
734 RELDIR  = $SYMBIAN_ROOT\\epoc32\\release
735 RELWIN = \$(RELDIR)\\\$(WIN)\\udeb
736 RELARM = \$(RELDIR)\\\$(ARM)\\$UARM
737 SDKZIP = perl${VERSION}sdk.zip
738
739
740 \$(SDKZIP) perlsdk.zip: perldll sdkinstall
741         -del /f perl${VERSION}sdk.zip
742         zip -r perl${VERSION}sdk.zip \$(RELWIN)\\perl$VERSION.* \$(RELARM)\\perl$VERSION.* \$(APIDIR)
743         \@echo perl${VERSION}sdk.zip created.
744
745 PERLSIS = perl${VERSION}.SIS perl${VERSION}lib.SIS perl${VERSION}ext.SIS
746 ALLSIS  = \$(PERLSIS) perlapp.sis
747 ETC     = README.symbian symbian\\PerlBase.pod symbian\\PerlUtil.pod symbian\\sisify.pl symbian\\TODO
748
749 perl${VERSION}dist.zip perldist.zip: \$(ALLSIS) \$(SDKZIP) \$(ETC)
750         -del /f perl${VERSION}dist.zip
751         zip -r perl${VERSION}dist.zip \$(ALLSIS) \$(SDKZIP) \$(ETC)
752
753 perlapp:        sdkinstall perlapp_${WIN} perlapp_arm
754
755 perlapp_arm_minimal sisify_hex perlappmin.hex perlrscmin.hex:   sdkinstall config.h
756         cd symbian; make perlapp_arm USERDEFS=-DCreatePerlAppMinimal
757         perl symbian\\hexdump.pl
758
759 perlapp_win perlapp_${WIN}: config.h
760         cd symbian; make perlapp_${WIN}
761
762 perlapp_arm: config.h
763         cd symbian; make perlapp_arm
764
765 perlapp_arm_clean:
766         cd symbian; make clean
767
768 perlapp_demo_extract:
769         cd symbian; make perlapp_demo_extract
770
771 perlapp.sis: perlapp_arm
772         cd symbian; make perlapp.sis
773
774 perlapp.zip:
775         cd symbian; zip perlapp.zip PerlApp.* PerlRecog.* PerlBase.* PerlUtil.* demo_pl
776
777 zip:    perlsdk.zip perlapp.zip
778
779 freeze: freeze_${WIN} freeze_arm
780
781 freeze_${WIN}:
782         abld freeze ${WIN} perl$VERSION
783
784 freeze_arm:
785         abld freeze \$(ARM) perl$VERSION
786
787 defrost:        defrost_${WIN} defrost_arm
788
789 defrost_${WIN}:
790         -del /f $windef1
791         -del /f $windef2
792
793 defrost_arm:
794         -del /f $armdef1
795         -del /f $armdef2
796
797 clean_${WIN}: abld.bat
798         abld clean ${WIN}
799
800 clean_arm: abld.bat
801         abld clean \$(ARM)
802
803 clean:  clean_${WIN} clean_arm rerename_makedef
804         -del /f \$(PM)
805         -del /f \$(POD)
806         -del /f lib\\Config.pm.bak
807         -del /f xlib\\symbian\\Config_heavy.pl
808         -rmdir /s /q xlib
809         -del /f config.sh
810         -del /f DynaLoader.pm ext\\DynaLoader\\DynaLoader.pm
811         -del /f ext\\DynaLoader\\Makefile
812         -del /f ext\\SDBM_File\\sdbm\\Makefile
813         -del /f symbian\\*.lst
814         -del /f abld.bat @unclean *.pkg *.sis *.zip
815         -del /f symbian\\abld.bat symbian\\*.sis symbian\\*.zip
816         -del /f symbian\\perl5*.pkg symbian\\miniperl.pkg
817         -del arm_*.mf ${WIN}_*.mf vc*.mf cw*.mf
818         -del symbian\\Makefile
819         -del symbian\\PerlUi.rss symbian\\PerlApp.rss
820         -del perlappmin.hex perlrscmin.hex
821         -perl symbian\\xsbuild.pl \$(XSBOPT) --clean \$(EXT)
822         -rmdir /s /q perl${VERSION}_Data
823         -cd symbian; make clean
824
825 reallyclean: abld.bat
826         abld reallyclean
827
828 distclean: defrost reallyclean clean
829         -perl symbian\\xsbuild.pl \$(XSBOPT) --distclean \$(EXT)
830         -del /f config.h config.sh.bak symbian\\symbian_port.h
831         -del /f Makefile symbian\\PerlApp.mmp
832         -del /f BMARM\\*.def
833         -del /f *.cwlink *.resources *.pref
834         -del /f perl${VERSION}.xml perl${VERSION}.mcp uid.cpp
835         -rmdir /s /q BMARM
836         cd symbian; make distclean
837         -del /f symbian\\Makefile
838 __EOF__
839     close MAKEFILE;
840 }
841 else {
842     warn "$0: failed to create Makefile: $!\n";
843 }
844
845 if ( open( MAKEFILE, ">symbian/Makefile")) {
846     my $wrap = defined $S60SDK && $S60SDK eq '1.2' && $WIN ne '${WIN}cw';
847     my $ABLD = $wrap ? 'perl b.pl': 'abld';
848     print "\tsymbian/Makefile\n";
849     my $MF = $WIN eq 'wins' ? 'vc6' : $WIN eq 'winscw' ? 'cw_ide' : "UNKNOWN";
850     print MAKEFILE <<__EOF__;
851 WIN = $WIN
852 ARM = $ARM
853 ABLD = $ABLD
854 MF = $MF
855
856 abld.bat:
857         bldmake bldfiles
858
859 perlapp_${WIN}: abld.bat ..\\config.h PerlApp.h PerlApp.cpp
860         copy PerlUi$SDK_VARIANT.rss PerlApp.rss
861         bldmake bldfiles
862         \$(ABLD) build ${WIN} udeb
863
864 perlapp_arm: ..\\config.h PerlApp.h PerlApp.cpp
865         copy PerlUi$SDK_VARIANT.rss PerlApp.rss
866         bldmake bldfiles
867         \$(ABLD) build ${ARM} $UARM
868
869 $MF:
870         abld makefile $MF
871
872 win.mf:
873         bldmake bldfiles
874         abld makefile $MF
875
876 perlapp_demo_extract:
877         perl demo_pl extract
878
879 perlapp.sis: perlapp_arm perlapp_demo_extract
880         -del /f perlapp.SIS
881         makesis perlapp.pkg
882         copy /y perlapp.SIS ..\\perlapp.SIS
883
884 clean:
885         -perl demo_pl cleanup
886         -del /f perlapp.sis
887         -del /f b.pl
888         -del PerlApp.rss
889         abld clean $WIN
890         abld clean thumb
891         -del Makefile
892
893 distclean: clean
894         -del /f *.cwlink *.resources *.pref
895         -del /f PerlApp.xml PerlApp.mcp uid.cpp
896         -rmdir /s /q PerlApp_Data
897         -del /f abld.bat
898 __EOF__
899     close(MAKEFILE);
900     if ($wrap) {
901         if ( open( B_PL, ">symbian/b.pl")) {
902             print B_PL <<'__EOF__';
903 # abld.pl wrapper.
904
905 # nmake doesn't like MFLAGS and MAKEFLAGS being set to -w and w.
906 delete $ENV{MFLAGS};
907 delete $ENV{MAKEFLAGS};
908
909 system("abld @ARGV");
910 __EOF__
911             close(B_PL);
912         } else {
913             warn "$0: failed to create symbian/b.pl: $!\n";
914         }
915     }
916 } else {
917     warn "$0: failed to create symbian/Makefile: $!\n";
918 }
919
920 print "Deleting...\n";
921 for my $config (
922                 # Do not delete config.h here.
923                 "config.sh",
924                 "lib\\Config.pm",
925                 "xlib\\symbian\\Config.pm",
926                 "xlib\\symbian\\Config_heavy.pl",
927                 "symbian\\PerlUi.rss",
928                 "symbian\\PerlApp.rss",
929                 ) {
930     print "\t$config\n";
931     unlink($config);
932 }
933
934 print <<__EOM__;
935 Configuring done.
936 Now you can run:
937     make all
938     make allsis
939 __EOM__
940
941 1;    # Happy End.