2 # ws-manifest.pl - create a generic manifest file (including u3 information) from the wireshark.nsi
6 # These are the known directories in the distribution and where they should live on a U3 device
10 $INSTDIR\${GTK_WIMP_DLLDST_DIR} host
11 $INSTDIR\${GTK_WIMP_RCDST_DIR} host
12 $INSTDIR\diameter device
14 $INSTDIR\etc\gtk-2.0 host
15 $INSTDIR\etc\pango host
17 $INSTDIR\lib\gtk-2.0\${GTK_LIB_DIR}\engines host
18 $INSTDIR\lib\gtk-2.0\${GTK_LIB_DIR}\immodules host
19 $INSTDIR\lib\gtk-2.0\${GTK_LIB_DIR}\loaders host
20 $INSTDIR\lib\gtk-2.0\modules host
21 $INSTDIR\plugins\${VERSION} device
22 $INSTDIR\radius device
23 $INSTDIR\snmp\mibs device
26 $INSTDIR\wimaxasncp device
29 my @dirs; # the directories in the manifest
30 my @defines; # stack of defines
33 if($line =~ /^SetOutPath (.+)$/) {
35 $outpath =~ s/^'(.*)'$/$1/;
36 if($outpath ne '$PROFILE') { # ignore the PROFILE
37 push(@dirs, $outpath);
39 } elsif ($line =~ /!ifdef (.*)$/) {
41 } elsif ($line =~ /!endif/) {
43 if(scalar(@defines) == 0) {
46 } elsif ($line =~ /^File[^\"]+\"([^\"]+)\"/) {
48 # make things relative to the root rather than the NSIS directory
49 if($file =~ /^[^\.\$]/) { $file = "packaging\\nsis\\" . $file; }
50 $file =~ s/\.\.\\\.\.\\//; # remove ../../
51 push(@$outpath, $file);
53 if(defined @defines) {
54 push(@$file, "ifdef=" . $defines[-1]);
57 # there may be a parameter - copy it across
58 if($line =~ /\/(\S+)/) {
64 print "#\n# DO NOT EDIT - autogenerated from wireshark.nsi\n#\n";
66 foreach $dir(sort @dirs) {
73 print "[". $dir . " u3loc=" . $loc . "]\n";
75 foreach $file(sort @$dir) {
78 foreach $param (sort(@$file)) {
82 if($dir eq '$INSTDIR') { # try and find a better location
83 if($file =~ /\.dll$|\.exe$|EXE}$|DLL}$/ && !($file =~ /WinPcap/) && !($file =~ /VCREDIST_EXE/)) {
99 if(defined @ignored) {
101 print STDERR "ERROR\nThe following directories have no known location on a U3 device:\n";
103 foreach $dir(sort @ignored) {
104 print STDERR "\t" . $dir . " ";