399
|
1 |
#!/usr/bin/perl
|
|
2 |
|
|
3 |
use strict;
|
|
4 |
use File::Copy;
|
|
5 |
use File::Path;
|
|
6 |
|
|
7 |
unlink "basesvs.zip";
|
|
8 |
rmtree "temp";
|
|
9 |
mkpath "temp/basesvs/base/general";
|
|
10 |
mkpath "temp/basesvs/winscw_udeb";
|
|
11 |
mkpath "temp/basesvs/base/t_sfsrv/general";
|
|
12 |
|
|
13 |
my $epoc=$ENV{'EPOCROOT'} . "epoc32/";
|
|
14 |
copy("test.xml", "temp/test.xml");
|
|
15 |
|
|
16 |
copy $epoc . "release/winscw/udeb/t_fat32server.exe", "temp/basesvs/winscw_udeb/t_fat32server.exe";
|
|
17 |
copy $epoc . "release/winscw/udeb/t_perf.exe", "temp/basesvs/winscw_udeb/t_perf.exe";
|
|
18 |
copy $epoc . "release/winscw/udeb/t_prompt.exe", "temp/basesvs/winscw_udeb/t_prompt.exe";
|
|
19 |
copy $epoc . "release/winscw/udeb/t_sfsrv.exe", "temp/basesvs/winscw_udeb/t_sfsrv.exe";
|
|
20 |
|
|
21 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-driveunit-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-driveunit-publicapi-any.script";
|
|
22 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-format-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-format-publicapi-ram.script";
|
|
23 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-format-publicapi-rem.script", "temp/basesvs/base/general/pbase-f32-format-publicapi-rem.script";
|
|
24 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-format-publicapi-rom.script", "temp/basesvs/base/general/pbase-f32-format-publicapi-rom.script";
|
|
25 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rawdisk-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-rawdisk-publicapi-ram.script";
|
|
26 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rawdisk-publicapi-rem.script", "temp/basesvs/base/general/pbase-f32-rawdisk-publicapi-rem.script";
|
|
27 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-dir-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-dir-publicapi-ram.script";
|
|
28 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-dirscan-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-dirscan-publicapi-ram.script";
|
|
29 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-file-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-file-publicapi-ram.script";
|
|
30 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-fileman-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-fileman-publicapi-ram.script";
|
|
31 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-fileman-publicapi-os.script", "temp/basesvs/base/general/pbase-f32-fileman-publicapi-os.script";
|
|
32 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-filenamesidentical-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-filenamesidentical-publicapi-ram.script";
|
|
33 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rdir-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-rdir-publicapi-ram.script";
|
|
34 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-entry-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-entry-publicapi-ram.script";
|
|
35 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-filetext-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-filetext-publicapi-ram.script";
|
|
36 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-volumeinfo-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-volumeinfo-publicapi-any.script";
|
|
37 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-parse-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-parse-publicapi-any.script";
|
|
38 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-parseptr-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-parseptr-publicapi-any.script";
|
|
39 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-parseptrc-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-parseptrc-publicapi-any.script";
|
|
40 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-parse-inherited-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-parse-inherited-publicapi-any.script";
|
|
41 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-parseptr-inherited-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-parseptr-inherited-publicapi-any.script";
|
|
42 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-parseptrc-inherited-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-parseptrc-inherited-publicapi-any.script";
|
|
43 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-entryarray-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-entryarray-publicapi-ram.script";
|
|
44 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-findfile-publicapi-os.script", "temp/basesvs/base/general/pbase-f32-findfile-publicapi-os.script";
|
|
45 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-findfile-publicapi-rem.script", "temp/basesvs/base/general/pbase-f32-findfile-publicapi-rem.script";
|
|
46 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-openfilescan-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-openfilescan-publicapi-ram.script";
|
|
47 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-drives-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-rfs-drives-publicapi-any.script";
|
|
48 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-files-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-rfs-files-publicapi-any.script";
|
|
49 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-misc-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-rfs-misc-publicapi-any.script";
|
|
50 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-mounts-publicapi-any.script", "temp/basesvs/base/general/pbase-f32-rfs-mounts-publicapi-any.script";
|
|
51 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-publicapi-os.script", "temp/basesvs/base/general/pbase-f32-rfs-publicapi-os.script";
|
|
52 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-drives-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-rfs-drives-publicapi-ram.script";
|
|
53 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-files-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-rfs-files-publicapi-ram.script";
|
|
54 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-misc-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-rfs-misc-publicapi-ram.script";
|
|
55 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-mounts-publicapi-ram.script", "temp/basesvs/base/general/pbase-f32-rfs-mounts-publicapi-ram.script";
|
|
56 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-publicapi-rom.script", "temp/basesvs/base/general/pbase-f32-rfs-publicapi-rom.script";
|
|
57 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-drives-publicapi-rem.script", "temp/basesvs/base/general/pbase-f32-rfs-drives-publicapi-rem.script";
|
|
58 |
|
|
59 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-driveunit-publicapi.ini", "temp/basesvs/base/general/pbase-f32-driveunit-publicapi.ini";
|
|
60 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-format-publicapi.ini", "temp/basesvs/base/general/pbase-f32-format-publicapi.ini";
|
|
61 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rawdisk-publicapi.ini", "temp/basesvs/base/general/pbase-f32-rawdisk-publicapi.ini";
|
|
62 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-dir-publicapi.ini", "temp/basesvs/base/general/pbase-f32-dir-publicapi.ini";
|
|
63 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-dirscan-publicapi.ini", "temp/basesvs/base/general/pbase-f32-dirscan-publicapi.ini";
|
|
64 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-file-publicapi.ini", "temp/basesvs/base/general/pbase-f32-file-publicapi.ini";
|
|
65 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-fileman-publicapi.ini", "temp/basesvs/base/general/pbase-f32-fileman-publicapi.ini";
|
|
66 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-filenamesidentical-publicapi.ini", "temp/basesvs/base/general/pbase-f32-filenamesidentical-publicapi.ini";
|
|
67 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rdir-publicapi.ini", "temp/basesvs/base/general/pbase-f32-rdir-publicapi.ini";
|
|
68 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-entry-publicapi.ini", "temp/basesvs/base/general/pbase-f32-entry-publicapi.ini";
|
|
69 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-filetext-publicapi.ini", "temp/basesvs/base/general/pbase-f32-filetext-publicapi.ini";
|
|
70 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-volumeinfo-publicapi.ini", "temp/basesvs/base/general/pbase-f32-volumeinfo-publicapi.ini";
|
|
71 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-parse-publicapi.ini", "temp/basesvs/base/general/pbase-f32-parse-publicapi.ini";
|
|
72 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-parseptr-publicapi.ini", "temp/basesvs/base/general/pbase-f32-parseptr-publicapi.ini";
|
|
73 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-parseptrc-publicapi.ini", "temp/basesvs/base/general/pbase-f32-parseptrc-publicapi.ini";
|
|
74 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-parsebase-inherited-publicapi.ini", "temp/basesvs/base/general/pbase-f32-parsebase-inherited-publicapi.ini";
|
|
75 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-entryarray-publicapi.ini", "temp/basesvs/base/general/pbase-f32-entryarray-publicapi.ini";
|
|
76 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-findfile-publicapi.ini", "temp/basesvs/base/general/pbase-f32-findfile-publicapi.ini";
|
|
77 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-openfilescan-publicapi.ini", "temp/basesvs/base/general/pbase-f32-openfilescan-publicapi.ini";
|
|
78 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-drives-publicapi-any.ini", "temp/basesvs/base/general/pbase-f32-rfs-drives-publicapi-any.ini";
|
|
79 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-files-publicapi-any.ini", "temp/basesvs/base/general/pbase-f32-rfs-files-publicapi-any.ini";
|
|
80 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-misc-publicapi-any.ini", "temp/basesvs/base/general/pbase-f32-rfs-misc-publicapi-any.ini";
|
|
81 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-mounts-publicapi-any.ini", "temp/basesvs/base/general/pbase-f32-rfs-mounts-publicapi-any.ini";
|
|
82 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-publicapi-os.ini", "temp/basesvs/base/general/pbase-f32-rfs-publicapi-os.ini";
|
|
83 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-drives-publicapi-ram.ini", "temp/basesvs/base/general/pbase-f32-rfs-drives-publicapi-ram.ini";
|
|
84 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-files-publicapi-ram.ini", "temp/basesvs/base/general/pbase-f32-rfs-files-publicapi-ram.ini";
|
|
85 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-misc-publicapi-ram.ini", "temp/basesvs/base/general/pbase-f32-rfs-misc-publicapi-ram.ini";
|
|
86 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-mounts-publicapi-ram.ini", "temp/basesvs/base/general/pbase-f32-rfs-mounts-publicapi-ram.ini";
|
|
87 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-publicapi-rom.ini", "temp/basesvs/base/general/pbase-f32-rfs-publicapi-rom.ini";
|
|
88 |
copy $epoc . "release/winscw/udeb/z/base/pbase-f32-rfs-drives-publicapi-rem.ini", "temp/basesvs/base/general/pbase-f32-rfs-drives-publicapi-rem.ini";
|
|
89 |
copy $epoc . "release/winscw/udeb/z/base/base_f32_env.ini", "temp/basesvs/base/general/base_f32_env.ini";
|
|
90 |
copy $epoc . "release/winscw/udeb/z/base/t_base.tcs", "temp/basesvs/base/general/t_base.tcs";
|
|
91 |
|
|
92 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/test.txt", "temp/basesvs/base/t_sfsrv/general/test.txt";
|
|
93 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/test_rom.txt", "temp/basesvs/base/t_sfsrv/general/test_rom.txt";
|
|
94 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/usbload.zip", "temp/basesvs/base/t_sfsrv/general/usbload.zip";
|
|
95 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/test1.txt", "temp/basesvs/base/t_sfsrv/general/test1.txt";
|
|
96 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/test2.txt", "temp/basesvs/base/t_sfsrv/general/test2.txt";
|
|
97 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/test3.txt", "temp/basesvs/base/t_sfsrv/general/test3.txt";
|
|
98 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/1mb", "temp/basesvs/base/t_sfsrv/general/1mb";
|
|
99 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/any.txt", "temp/basesvs/base/t_sfsrv/general/any.txt";
|
|
100 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/big_line.txt", "temp/basesvs/base/t_sfsrv/general/big_line.txt";
|
|
101 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/filetext_eof.txt", "temp/basesvs/base/t_sfsrv/general/filetext_eof.txt";
|
|
102 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/filetext_read.txt", "temp/basesvs/base/t_sfsrv/filetext_read.txt";
|
|
103 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/multiline.txt", "temp/basesvs/base/t_sfsrv/general/multiline.txt";
|
|
104 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/new_file.txt", "temp/basesvs/base/t_sfsrv/general/new_file.txt";
|
|
105 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/oneliner.txt", "temp/basesvs/base/t_sfsrv/general/oneliner.txt";
|
|
106 |
copy $epoc . "release/winscw/udeb/z/base/t_sfsrv/big.txt", "temp/basesvs/base/t_sfsrv/general/big.txt";
|
|
107 |
|
|
108 |
system("7z a -tzip basesvs.zip ./temp/*");
|