1 | #!/bin/bash |
1 | #!/bin/bash |
2 | |
2 | |
3 | # Convert a gtk2-perl program to a standalone linux binary |
3 | # Convert a gtk2-perl program to a standalone linux binary |
4 | |
4 | |
|
|
5 | EV_EVENTFD= |
5 | PERL=/usr |
6 | PERL=/usr |
6 | PERLLIB=/usr/lib/perl5/ |
7 | PERLLIB=/usr/lib/perl5/ |
|
|
8 | PANGO=1.5.0 |
|
|
9 | #PERL=/opt/perl |
|
|
10 | #PERLLIB=/opt/perl/lib/perl5/ |
|
|
11 | #PANGO=1.6.0 |
|
|
12 | |
|
|
13 | for mod in AnyEvent EV JSON-XS Deliantra Compress-LZF BDB; do |
|
|
14 | ( |
|
|
15 | cd /root/src/$mod |
|
|
16 | $PERL/bin/perl Makefile.PL </dev/null |
|
|
17 | make clean |
|
|
18 | $PERL/bin/perl Makefile.PL </dev/null |
|
|
19 | make install || exit |
|
|
20 | make clean |
|
|
21 | ) |
|
|
22 | done |
7 | |
23 | |
8 | ( |
24 | ( |
9 | # patch braindamaged pango |
25 | # patch braindamaged pango |
10 | perl -pe 's{/u(?=sr/lib(32)?/pango)}{/\x00}g; s{1\.5\.0\x00}{\x00.5.0\x00}g' </usr/lib/libpango-1.0.so.0 >pango-1.0.so.0 |
26 | perl -pe 's{/u(?=sr/lib(32)?/pango)}{/\x00}g; s{\Q'$PANGO'\E\x00}{y.t.u\x00}g' </usr/lib/libpango-1.0.so.0 >pango-1.0.so.0 |
|
|
27 | printf "%s" "$PANGO" >pangoversion |
11 | cat <<EOF |
28 | cat <<EOF |
|
|
29 | pangoversion;root/pangoversion |
12 | pango-1.0.so.0;shlib/i486-linux-gnu-thread-multi/libpango-1.0.so.0 |
30 | pango-1.0.so.0;shlib/i486-linux-gnu-thread-multi/libpango-1.0.so.0 |
13 | /usr/lib/libglib-2.0.so.0;shlib/i486-linux-gnu-thread-multi/libglib-2.0.so.0 |
31 | /usr/lib/libglib-2.0.so.0;shlib/i486-linux-gnu-thread-multi/libglib-2.0.so.0 |
14 | /usr/lib/libstdc++.so.6;shlib/i486-linux-gnu-thread-multi/libstdc++.so.6 |
32 | /usr/lib/libstdc++.so.6;shlib/i486-linux-gnu-thread-multi/libstdc++.so.6 |
15 | /usr/lib/libaudio.so.2;shlib/i486-linux-gnu-thread-multi/libaudio.so.2 |
33 | /usr/lib/libaudio.so.2;shlib/i486-linux-gnu-thread-multi/libaudio.so.2 |
16 | /lib/libgcc_s.so.1;shlib/i486-linux-gnu-thread-multi/libgcc_s.so.1 |
34 | /lib/libgcc_s.so.1;shlib/i486-linux-gnu-thread-multi/libgcc_s.so.1 |
17 | /usr/lib/pango/1.5.0;root/usr/lib/pango/1.5.0 |
35 | /usr/lib/pango/$PANGO;root/usr/lib/pango/$PANGO |
18 | docwiki.pst;root/CFPlus/resources/docwiki.pst |
36 | docwiki.pst;root/Deliantra/Client/private/resources/docwiki.pst |
19 | EOF |
37 | EOF |
20 | |
38 | |
21 | perl -ne '/^(resources\/.*)/ and print "$1;root/CFPlus/$1\n"' <MANIFEST |
39 | perl -ne '/^(resources\/.*)/ and print "$1;root/Deliantra/Client/private/$1\n"' <MANIFEST |
22 | |
40 | |
23 | ) >addlist |
41 | ) >addlist |
24 | |
42 | |
25 | trap "rm addlist; rm pango-1.0.so.0" 0 |
43 | trap "rm addlist pangoversion pango-1.0.so.0" 0 |
26 | |
44 | |
27 | perl Makefile.PL |
45 | $PERL/bin/perl Makefile.PL |
|
|
46 | make clean |
|
|
47 | $PERL/bin/perl Makefile.PL |
28 | make install |
48 | make install || exit |
|
|
49 | |
|
|
50 | wait |
29 | |
51 | |
30 | LD_LIBRARY_PATH=/lib:/usr/lib \ |
52 | LD_LIBRARY_PATH=/lib:/usr/lib \ |
31 | $PERL/bin/pp -C -I /root/src/Crossfire \ |
53 | $PERL/bin/pp -C -I /root/src/Deliantra \ |
32 | -M Event::idle -M Event::io -M Event::timer -M Event::signal -M Event::var \ |
|
|
33 | -M AnyEvent::Impl::Event \ |
54 | -M AnyEvent::Impl::EV \ |
|
|
55 | -M attributes \ |
|
|
56 | -a "blib/arch/auto/Deliantra/Client/Client.so;lib/auto/Deliantra/Client/Client.so" \ |
34 | -l db-4.4 \ |
57 | -l db-4.6 \ |
35 | -l glib-2.0 -l gobject-2.0 -l gmodule-2.0 \ |
58 | -l glib-2.0 -l gobject-2.0 -l gmodule-2.0 \ |
36 | -l pangoft2-1.0 \ |
59 | -l pangoft2-1.0 \ |
37 | -l SDL -l asound \ |
60 | -l SDL -l asound \ |
38 | -l SDL_mixer -l vorbisfile -l vorbis -l ogg -l smpeg -l stdc++ \ |
61 | -l SDL_mixer -l vorbisfile -l vorbis -l ogg -l smpeg -l stdc++ \ |
39 | -l SDL_image -l png12 -l z \ |
62 | -l SDL_image -l png12 -l z \ |
40 | -o cfplus-gnu-linux-x86.bin -A addlist bin/cfplus |
63 | -o deliantra-gnu-linux-x86 -A addlist bin/deliantra || exit |
41 | |
64 | |
|
|
65 | make clean |
|
|
66 | |
|
|
67 | tar cf deliantra-gnu-linux-x86.tar deliantra-gnu-linux-x86 |
|
|
68 | gzip -9vf deliantra-gnu-linux-x86.tar |
|
|
69 | todata deliantra-gnu-linux-x86.tar.gz |
|
|
70 | |