tools/geniexpress

   1 #!/usr/bin/perl -w
   2
   3 if ( $#ARGV < 3 ) {
   4   printf("usage: geniexpress SFX.EXE TITLE SETUP.EXE [Files...]\n");
   5   exit(1);
   6 }
   7
   8 $TargetName   = shift @ARGV;
   9 $FriendlyName = shift @ARGV;
  10 $AppLaunched  = shift @ARGV;
  11
  12 $template = <<"__EOM__";
  13 [Version]
  14 Class=IEXPRESS
  15 SEDVersion=3
  16
  17 [Options]
  18 PackagePurpose=InstallApp
  19 ShowInstallProgramWindow=0
  20 HideExtractAnimation=0
  21 UseLongFileName=1
  22 InsideCompressed=0
  23 CAB_FixedSize=0
  24 CAB_ResvCodeSigning=0
  25 RebootMode=N
  26 InstallPrompt=
  27 DisplayLicense=
  28 FinishMessage=
  29 TargetName=$TargetName
  30 FriendlyName=$FriendlyName
  31 AppLaunched=$AppLaunched
  32 PostInstallCmd=<None>
  33 AdminQuietInstCmd=
  34 UserQuietInstCmd=
  35 SourceFiles=SourceFiles
  36
  37 [SourceFiles]
  38 SourceFiles0=.\\
  39
  40 [SourceFiles0]
  41 __EOM__
  42
  43 foreach $i ( sort @ARGV ) {
  44   $template .= "$i=\n";
  45 }
  46 print $template;