| 1 | #!/bin/sh |
1 | #!/bin/sh |
|
|
2 | |
|
|
3 | # perl-strip strips Time::HiRes to {use 5.006} which 5.10.1 cannot pasre, but 5.8 and 5.12 can |
|
|
4 | |
|
|
5 | # 1. build |
|
|
6 | # 2. gendist |
|
|
7 | # 3. ota_publish |
|
|
8 | |
|
|
9 | if [ "$1" ]; then |
|
|
10 | eval "do_$1=1" |
|
|
11 | else |
|
|
12 | do_l32=1 |
|
|
13 | do_l64=1 |
|
|
14 | do_osx=1 |
|
|
15 | do_win=1 |
|
|
16 | fi |
| 2 | |
17 | |
| 3 | ############################################################################# |
18 | ############################################################################# |
| 4 | # copy and install modules |
19 | # copy and install modules |
| 5 | |
20 | |
| 6 | if ! [ "$SKIP_INSTALL" ] ; then |
21 | if ! [ "$SKIP_INSTALL" ] ; then |
| 7 | cpan="Win32::Exe Pod::POM LWP" |
22 | cpan="Win32::Exe Pod::POM LWP PPI Getopt::Long" |
|
|
23 | mods="common-sense Guard JSON-XS AnyEvent EV BDB Coro Compress-LZF" |
|
|
24 | mods="$mods IO-AIO AnyEvent-AIO AnyEvent-BDB Perl-Strip Perl-LibExtractor Urlader" |
|
|
25 | mods="$mods deliantra/Deliantra deliantra/Deliantra-Client" |
|
|
26 | |
| 8 | cpan="" |
27 | cpan="" |
| 9 | mods="common-sense Guard JSON-XS AnyEvent EV BDB Coro Compress-LZF IO-AIO Urlader deliantra/Deliantra deliantra/Deliantra-Client" |
|
|
| 10 | #mods="deliantra/Deliantra-Client" |
|
|
| 11 | |
28 | |
| 12 | cd /root/src || exit |
29 | copy_to() { |
| 13 | for host in vm osx105; do |
30 | host="$1"; shift |
|
|
31 | |
| 14 | ( |
32 | ( |
|
|
33 | cd /root/src |
| 15 | cvsfind $mods |
34 | cvsfind $mods |
| 16 | echo Urlader/liblzf/lzfP.h |
35 | echo Urlader/liblzf/lzfP.h |
| 17 | echo Urlader/liblzf/lzf_c_best.c |
36 | echo Urlader/liblzf/lzf_c_best.c |
| 18 | echo Urlader/liblzf/lzf_d.c |
37 | echo Urlader/liblzf/lzf_d.c |
| 19 | ) | rsync --files-from=- -aessh /root/src $host:src/. || exit |
38 | ) | rsync --files-from=- -aessh /root/src --chmod=a+rwX $host:src/. || exit |
| 20 | done |
39 | } |
| 21 | |
40 | |
| 22 | osx105() { ssh osx105 "$1"; } |
41 | osx105() { ssh osx105 "$1"; } |
| 23 | linux32() { s32 bash -c "$1"; } |
42 | linux32() { s32 bash -c "$1"; } |
| 24 | linux64() { s64 bash -c "$1"; } |
43 | linux64() { s64 bash -c "$1"; } |
| 25 | windows() { ssh vm ". .setenv; $1"; } |
44 | windows() { ssh vm ". .setenv; $1"; } |
| … | |
… | |
| 27 | upd() { |
46 | upd() { |
| 28 | MAKE="$1"; shift |
47 | MAKE="$1"; shift |
| 29 | PERL="$1"; shift |
48 | PERL="$1"; shift |
| 30 | echo "building on platform <$@>" |
49 | echo "building on platform <$@>" |
| 31 | "$@" ' |
50 | "$@" ' |
| 32 | cpan '"$cpan"' </dev/null >log 2>&1 || { cat log; exit 68; } |
51 | if [ "'"$cpan"'" ]; then |
|
|
52 | '"$PERL"' -MCPAN -e "CPAN::Shell->notest (install => @ARGV)" '"$cpan"' </dev/null >log 2>&1 || { cat log; exit 68; } |
|
|
53 | fi |
|
|
54 | export EV_EVENTFD=0 |
|
|
55 | export EV_INOTIFY=0 |
|
|
56 | export EV_SIGNALFD=0 |
| 33 | for mod in '"$mods"'; do |
57 | for mod in '"$mods"'; do |
| 34 | echo building $mod |
58 | echo building $mod |
| 35 | cd /root/src/$mod || exit 69 |
59 | cd /root/src/$mod || exit 69 |
| 36 | rm -rf blib |
60 | rm -rf blib |
| 37 | '$PERL' Makefile.PL </dev/null >/dev/null 2>&1 |
61 | '$PERL' Makefile.PL </dev/null >/dev/null 2>&1 |
| … | |
… | |
| 52 | fi |
76 | fi |
| 53 | rm -f log |
77 | rm -f log |
| 54 | '$MAKE' clean >/dev/null |
78 | '$MAKE' clean >/dev/null |
| 55 | true |
79 | true |
| 56 | done |
80 | done |
| 57 | ' || exit |
81 | ' || touch errorflag |
| 58 | } |
82 | } |
| 59 | |
83 | |
| 60 | upd make /usr/bin/perl linux64 |
84 | [ "$do_l64" ] && ( ( upd make /usr/bin/perl linux64 ) >log.linux64 2>&1; cat log.linux64 ) & |
| 61 | upd make /usr/bin/perl linux32 |
85 | [ "$do_osx" ] && ( copy_to osx105; ( upd make /opt/local/bin/perl osx105 ) >log.osx105 2>&1; cat log.osx105 ) & |
| 62 | upd make /opt/local/bin/perl osx105 |
86 | [ "$do_win" ] && ( copy_to vm ; ( upd nmake /c/perl/bin/perl windows ) >log.windows 2>&1; cat log.windows ) & |
| 63 | upd nmake /c/perl/bin/perl windows |
87 | |
|
|
88 | wait |
|
|
89 | |
|
|
90 | # can't run parallel to 64 bit |
|
|
91 | [ "$do_l32" ] && ( ( upd make /usr/bin/perl linux32 ) >log.linux32 2>&1; cat log.linux32 ) & |
|
|
92 | |
|
|
93 | wait |
|
|
94 | |
|
|
95 | rm -f log.* |
|
|
96 | fi |
|
|
97 | |
|
|
98 | if rm errorflag 2>/dev/null; then |
|
|
99 | echo prebuild error |
|
|
100 | exit |
| 64 | fi |
101 | fi |
| 65 | |
102 | |
| 66 | ############################################################################# |
103 | ############################################################################# |
| 67 | # gather |
104 | # gather |
| 68 | |
105 | |
| 69 | mkdir -p dist |
106 | mkdir -p dist |
| 70 | util/build.linux |
107 | [ "$do_l32" -o "$do_l64" ] && util/build.linux |
| 71 | util/build.osx |
108 | [ "$do_osx" ] && util/build.osx |
| 72 | util/build.windows |
109 | [ "$do_win" ] && util/build.windows |
|
|
110 | |
|
|
111 | util/checkdiff --show |
|
|
112 | |
