This commit was manufactured by cvs2svn to create branch

'SSU_PERSONAL_20000301'.

git-svn-id: svn://10.0.0.236/branches/SSU_PERSONAL_20000301@62133 18797224-902f-48f8-a5cc-f745e15eee43

mozilla/build/mac/build_scripts/BuildMozilla.pl

@@ -1,80 +0,0 @@
-#!perl
-
-#
-# The contents of this file are subject to the Netscape Public
-# License Version 1.1 (the "License"); you may not use this file
-# except in compliance with the License. You may obtain a copy of
-# the License at http://www.mozilla.org/NPL/
-#
-# Software distributed under the License is distributed on an "AS
-# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
-# implied. See the License for the specific language governing
-# rights and limitations under the License.
-#
-# The Original Code is mozilla.org code.
-#
-# The Initial Developer of the Original Code is Netscape
-# Communications Corporation.  Portions created by Netscape are
-# Copyright (C) 1998 Netscape Communications Corporation. All
-# Rights Reserved.
-#
-# Contributor(s): 
-#   Simon Fraser <sfraser@netscape.com>
-#
-
-require 5.004;
-
-use strict;
-
-use Cwd;
-use Moz::BuildUtils;
-use Moz::BuildCore;
-
-#-------------------------------------------------------------
-# Where have the build options gone?
-# 
-# The various build flags have been centralized into one place. 
-# The master list of options is in MozBuildFlags.txt. However, 
-# you should never need to edit that file, or this one.
-# 
-# To customize what gets built, or where to start the build, 
-# edit the $prefs_file_name file in
-# System Folder:Preferences:Mozilla build prefs:
-# Documentation is provided in that file.
-#-------------------------------------------------------------
-
-my($prefs_file_name) = "Mozilla opt build prefs";
-my($config_header_file_name) = ":mozilla:config:mac:DefinesOptions.h";
-
-#-------------------------------------------------------------
-# hashes to hold build options
-#-------------------------------------------------------------
-my(%build);
-my(%options);
-my(%filepaths);
-my(%optiondefines);
-
-# Hash of input files for this build. Eventually, there will be
-# input files for manifests, and projects too.
-my(%inputfiles) = (
-  "buildflags",     "MozillaBuildFlags.txt",
-  "checkoutdata",   "MozillaCheckoutList.txt",
-  "buildprogress",  "¥ Mozilla opt progress",
-  "buildmodule",    "MozillaBuildList.pm",
-  "checkouttime",   "Mozilla last checkout"
-);
-#-------------------------------------------------------------
-# end build hashes
-#-------------------------------------------------------------
-
-# set the build root directory, which is the the dir above mozilla
-SetupBuildRootDir(":mozilla:build:mac:build_scripts");
-
-# Set up all the flags on $main::, like DEBUG, CARBON etc.
-# Override the defaults using the preferences files.
-SetupDefaultBuildOptions(0, ":mozilla:dist:viewer:", $config_header_file_name);
-
-my($do_checkout)    = 0;
-my($do_build)       = 1;
-
-RunBuild($do_checkout, $do_build, \%inputfiles, $prefs_file_name);

mozilla/build/mac/build_scripts/BuildMozillaDebug.pl

@@ -1,80 +0,0 @@
-#!perl
-
-#
-# The contents of this file are subject to the Netscape Public
-# License Version 1.1 (the "License"); you may not use this file
-# except in compliance with the License. You may obtain a copy of
-# the License at http://www.mozilla.org/NPL/
-#
-# Software distributed under the License is distributed on an "AS
-# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
-# implied. See the License for the specific language governing
-# rights and limitations under the License.
-#
-# The Original Code is mozilla.org code.
-#
-# The Initial Developer of the Original Code is Netscape
-# Communications Corporation.  Portions created by Netscape are
-# Copyright (C) 1998 Netscape Communications Corporation. All
-# Rights Reserved.
-#
-# Contributor(s): 
-#   Simon Fraser <sfraser@netscape.com>
-#
-
-require 5.004;
-
-use strict;
-
-use Cwd;
-use Moz::BuildUtils;
-use Moz::BuildCore;
-
-#-------------------------------------------------------------
-# Where have the build options gone?
-# 
-# The various build flags have been centralized into one place. 
-# The master list of options is in MozBuildFlags.txt. However, 
-# you should never need to edit that file, or this one.
-# 
-# To customize what gets built, or where to start the build, 
-# edit the $prefs_file_name file in
-# System Folder:Preferences:Mozilla build prefs:
-# Documentation is provided in that file.
-#-------------------------------------------------------------
-
-my($prefs_file_name) = "Mozilla debug build prefs";
-my($config_header_file_name) = ":mozilla:config:mac:DefinesOptionsDebug.h";
-
-#-------------------------------------------------------------
-# hashes to hold build options
-#-------------------------------------------------------------
-my(%build);
-my(%options);
-my(%filepaths);
-my(%optiondefines);
-
-# Hash of input files for this build. Eventually, there will be
-# input files for manifests, and projects too.
-my(%inputfiles) = (
-  "buildflags",     "MozillaBuildFlags.txt",
-  "checkoutdata",   "MozillaCheckoutList.txt",
-  "buildprogress",  "¥ Mozilla debug progress",
-  "buildmodule",    "MozillaBuildList.pm",
-  "checkouttime",   "Mozilla last checkout"
-);
-#-------------------------------------------------------------
-# end build hashes
-#-------------------------------------------------------------
-
-# set the build root directory, which is the the dir above mozilla
-SetupBuildRootDir(":mozilla:build:mac:build_scripts");
-
-# Set up all the flags on $main::, like DEBUG, CARBON etc.
-# Override the defaults using the preferences files.
-SetupDefaultBuildOptions(1, ":mozilla:dist:viewer_debug:", $config_header_file_name);
-
-my($do_pull)        = 0;    # overridden by flags and prefs
-my($do_build)       = 1;
-
-RunBuild($do_pull, $do_build, \%inputfiles, $prefs_file_name);

mozilla/build/mac/build_scripts/Moz/BuildCore.pm

@@ -1,595 +0,0 @@
-#!perl -w
-package Moz::BuildCore;
-
-require 5.004;
-require Exporter;
-
-use strict;
-use vars qw( @ISA @EXPORT );
-
-# perl includes
-use Cwd;
-use POSIX;
-use Time::Local;
-use File::Basename;
-use LWP::Simple;
-
-# homegrown
-use Moz::Moz;
-use Moz::Jar;
-use Moz::BuildFlags;
-use Moz::BuildUtils;
-use Moz::CodeWarriorLib;
-
-# use MozillaBuildList;   # eventually, this should go away, and be replaced by data input
-
-
-@ISA        = qw(Exporter);
-@EXPORT     = qw(
-                    RunBuild
-                );
-
-
-#//--------------------------------------------------------------------------------------------------
-#// DoPrebuildCheck
-#//
-#// Check the build tools etc before running the build.
-#//--------------------------------------------------------------------------------------------------
-sub DoPrebuildCheck()
-{
-    SanityCheckBuildOptions();
-
-    # launch codewarrior and persist its location. Have to call this before first
-    # call to getCodeWarriorPath().
-    my($ide_path_file) = $main::filepaths{"idepath"};
-    $ide_path_file = full_path_to($ide_path_file);
-    LaunchCodeWarrior($ide_path_file);
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// SanityCheckBuildOptions
-#//--------------------------------------------------------------------------------------------------
-sub SanityCheckBuildOptions()
-{
-    my($bad_options) = 0;
-
-    # Jar options
-    if (!$main::options{chrome_jars} && !$main::options{chrome_files})
-    {
-        print "Warning: Both \$options{chrome_jars} and \$options{chrome_files} are off. You won't get any chrome.\n";
-        $bad_options = 1;
-    }
-
-    if (!$main::options{chrome_jars} && $main::options{use_jars})
-    {
-        print "Warning: \$options{chrome_jars} is off but \$options{use_jars} is on. Your build won't run (expects jars, got files).\n";
-        $bad_options = 1;
-    }
-
-    if (!$main::options{chrome_files} && !$main::options{use_jars})
-    {
-        print "Warning: \$options{chrome_jars} is off but \$options{chrome_files} is on. Your build won't run (expects files, got jars).\n";
-        $bad_options = 1;
-    }
-
-    if ($main::options{ldap_experimental} && !$main::options{ldap})
-    {
-        print "Warning: \$options{ldap_experimental} is on but \$options{ldap} is off. LDAP experimental features will not be built.\n";
-        $bad_options = 1;
-    }
-
-    if ($main::options{wsp} && !$main::options{xmlextras})
-    {
-        print "Warning: \$options{wsp} is on but \$options{xmlextras} is off. wsp will not be built.\n";
-        $bad_options = 1;
-    }
-
-    if ($bad_options) {
-        print "Build will start in 5 seconds. Press command-. to stop\n";
-        
-        DelayFor(5);
-    }
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// GenBuildSystemInfo
-#//--------------------------------------------------------------------------------------------------
-
-sub GenBuildSystemInfo()
-{
-    # always rebuild the configuration program.
-    BuildProjectClean(":mozilla:build:mac:tools:BuildSystemInfo:BuildSystemInfo.mcp", "BuildSystemInfo");
-
-    # delete the configuration file.
-    unlink(":mozilla:build:mac:BuildSystemInfo.pm");
-    
-    # run the program.
-    system(":mozilla:build:mac:BuildSystemInfo");
-
-    # wait for the file to be created.
-    while (!(-e ":mozilla:build:mac:BuildSystemInfo.pm")) { WaitNextEvent(); }
-    
-    # wait for BuildSystemInfo to finish, so that we see correct results.
-    while (IsProcessRunning("BuildSystemInfo")) { WaitNextEvent(); }
-
-    # now, evaluate the contents of the file.
-    open(F, ":mozilla:build:mac:BuildSystemInfo.pm");
-    while (<F>) { eval; }
-    close(F);
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// Make library aliases
-#//--------------------------------------------------------------------------------------------------
-
-sub MakeLibAliases()
-{
-    my($dist_dir) = GetBinDirectory();
-
-    #// ProfilerLib
-    if ($main::PROFILE)
-    {
-        my($profilerlibpath) = Moz::CodeWarriorLib::getCodeWarriorPath("MacOS Support:Profiler:Profiler Common:ProfilerLib");
-        MakeAlias("$profilerlibpath", "$dist_dir"."Essential Files:");
-    }
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// ConfigureBuildSystem
-#//
-#// defines some build-system configuration variables.
-#//--------------------------------------------------------------------------------------------------
-sub ConfigureBuildSystem()
-{
-    #// In the future, we may want to do configurations based on the actual build system itself.
-    #// GenBuildSystemInfo();
-        
-    #// For now, if we discover a newer header file than existed in Universal Interfaces 3.2,
-    #// we'll assume that 3.3 or later is in use.
-    my($universal_interfaces) = Moz::CodeWarriorLib::getCodeWarriorPath("MacOS Support:Universal:Interfaces:CIncludes:");
-    if (-e ($universal_interfaces . "ControlDefinitions.h")) {
-        $main::UNIVERSAL_INTERFACES_VERSION = 0x0330;
-    }
-
-    #// Rename IC SDK folder in the Mac OS Support folder
-    my($ic_sdk_folder) = Moz::CodeWarriorLib::getCodeWarriorPath("MacOS Support:ICProgKit2.0.2");
-    if( -e $ic_sdk_folder)
-    {
-        my($new_ic_folder_name) = Moz::CodeWarriorLib::getCodeWarriorPath("MacOS Support:(ICProgKit2.0.2)");
-        rename ($ic_sdk_folder, $new_ic_folder_name);
-        # note that CodeWarrior doesn't descend into folders with () the name
-        print "Mozilla no longer needs the Internet Config SDK to build:\n  Renaming the 'ICProgKit2.0.2' folder to '(ICProgKit2.0.2)'\n";
-    }
-
-    printf("UNIVERSAL_INTERFACES_VERSION = 0x%04X\n", $main::UNIVERSAL_INTERFACES_VERSION);
-
-    # alias required CodeWarrior libs into the Essential Files folder (only the Profiler lib now)
-    MakeLibAliases();
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// CheckOutModule. Takes variable number of args; first two are required
-#//--------------------------------------------------------------------------------------------------
-sub CheckOutModule($$$$)
-{
-    my($session, $module, $revision, $date) = @_;
-
-    my($result) = $session->checkout($module, $revision, $date);
-    
-    # result of 1 is success
-    if ($result) { return; }
-    
-    my($checkout_err) = $session->getLastError();
-    if ($checkout_err == 708) {
-        die "Error: Checkout was cancelled.\n";
-    } elsif ($checkout_err == 911) {
-        die "Error: CVS session settings are incorrect. Check your password, and the CVS root settings.\n";
-    } elsif ($checkout_err == 703) {
-        die "Error: CVS checkout failed. Unknown module, unknown tag, bad username, or other CVS error.\n";
-    } elsif ($checkout_err == 711) {
-        print "Checkout of '$module' failed.\n";
-    }
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// getScriptFolder
-#//--------------------------------------------------------------------------------------------------
-sub getScriptFolder()
-{
-    return dirname($0);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// getScriptFolder
-#//--------------------------------------------------------------------------------------------------
-sub get_url_contents($)
-{
-    my($url) = @_;
-
-    my($url_contents) = LWP::Simple::get($url);
-    $url_contents =~ s/\r\n/\n/g;     # normalize linebreaks
-    $url_contents =~ s/\r/\n/g;       # normalize linebreaks
-    return $url_contents;
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// get_files_from_content
-#//--------------------------------------------------------------------------------------------------
-sub uniq
-{
-    my $lastval;
-    grep(($_ ne $lastval, $lastval = $_)[$[], @_);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// get_files_from_content
-#//--------------------------------------------------------------------------------------------------
-sub get_files_from_content($)
-{
-    my($content) = @_;
-  
-    my(@jscalls) = grep (/return js_file_menu[^{]*/, split(/\n/, $content));
-    my $i;
-  
-    for ($i = 0; $i < @jscalls ; $i++)
-    {
-        $jscalls[$i] =~ s/.*\(|\).*//g;
-        my(@callparams) = split(/,/, $jscalls[$i]);
-        my ($repos, $dir, $file, $rev) = grep(s/['\s]//g, @callparams);
-        $jscalls[$i] = "$dir/$file";
-    }
-
-  &uniq(sort(@jscalls));
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// getLastUpdateTime
-#// 
-#// Get the last time we updated. Return 0 on failure
-#//--------------------------------------------------------------------------------------------------
-sub getLastUpdateTime($)
-{
-    my($timestamp_file) = @_;
- 
-    my($time_string);
-    
-    local(*TIMESTAMP_FILE);  
-    unless (open(TIMESTAMP_FILE, "< $timestamp_file")) { return 0; }
-
-    while (<TIMESTAMP_FILE>)
-    {
-        my($line) = $_;
-        chomp($line);
-
-        # ignore comments and empty lines
-        if ($line =~ /^\#/ || $line =~ /^\s*$/) {
-            next;
-        }
-        
-        $time_string = $line;
-    }
-
-    # get the epoch seconds
-    my($last_update_secs) = $time_string;
-    $last_update_secs =~ s/\s#.+$//;
-    
-    print "FAST_UPDATE found that you last updated at ".localtime($last_update_secs)."\n";
-    
-    # how long ago was this, in hours?
-    my($gm_now) = time();
-    my($update_hours) = 1 + ceil(($gm_now - $last_update_secs) / (60 * 60));
-    
-    return $update_hours;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// saveCheckoutTimestamp
-#// 
-#// Create a file on disk containing the current time. Param is time(), which is an Epoch seconds
-#// (and therefore in GMT).
-#// 
-#//--------------------------------------------------------------------------------------------------
-sub saveCheckoutTimestamp($$)
-{
-    my($gm_secs, $timestamp_file) = @_;
-        
-    local(*TIMESTAMP_FILE);
-    open(TIMESTAMP_FILE, ">$timestamp_file") || die "Failed to open $timestamp_file\n";
-    print(TIMESTAMP_FILE "# time of last checkout or update, in GMT. Used by FAST_UPDATE\n");
-    print(TIMESTAMP_FILE "$gm_secs \# around ".localtime()." local time\n");
-    close(TIMESTAMP_FILE);
-
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// FastUpdate
-#// 
-#// Use Bonsai url data to update only those dirs which have new files
-#// 
-#//--------------------------------------------------------------------------------------------------
-sub FastUpdate($$)
-{
-    my($modules, $timestamp_file) = @_;          # list of modules to check out
-
-    my($num_hours) = getLastUpdateTime($timestamp_file);
-    if ($num_hours == 0 || $num_hours > 170) {
-        print "Can't fast_update; last update was too long ago, or never. Doing normal checkout.\n";
-        return 0;
-    }
-
-    print "Doing fast update, pulling files changed in the last $num_hours hours\n";
-
-    my($cvsfile) = AskAndPersistFile($main::filepaths{"sessionpath"});
-    my($session) = Moz::MacCVS->new( $cvsfile );
-    unless (defined($session)) { die "Error: Checkout aborted. Cannot create session file: $session" }
-
-    # activate MacCVS
-    ActivateApplication('Mcvs');
-    
-    my($checkout_start_time) = time();
-
-    #print "Time now is $checkout_start_time ($checkout_start_time + 0)\n";
-    
-    my($this_co);
-    foreach $this_co (@$modules)
-    {
-        my($module, $revision, $date) = ($this_co->[0], $this_co->[1], $this_co->[2]);        
-        
-        # assume that things pulled by date wont change
-        if ($date ne "") {
-            print "$module is pulled by date, so ignoring in FastUpdate.\n";
-            next;
-        }
-
-        my($search_type) = "hours";
-        my($min_date) = "";
-        my($max_date) = "";
-        my($url) = "http://bonsai.mozilla.org/cvsquery.cgi?treeid=default&module=${module}&branch=${revision}&branchtype=match&dir=&file=&filetype=match&who=&whotype=match&sortby=Date&hours=${num_hours}&date=${search_type}&mindate=${min_date}&maxdate=${max_date}&cvsroot=%2Fcvsroot";
-
-        if ($revision eq "") {
-            print "Getting list of checkins to $module from Bonsai...\n";
-        } else {
-            print "Getting list of checkins to $module on branch $revision from Bonsai...\n";
-        }
-        my(@files) = &get_files_from_content(&get_url_contents($url));
-
-        if ($#files > 0)
-        {
-           my(@cvs_co_list);
-        
-           my($co_file);
-           foreach $co_file (@files)
-           {
-               print "Updating $co_file\n";
-               push(@cvs_co_list, $co_file);
-           }
-
-            my($result) = $session->update($revision, \@cvs_co_list);
-            # result of 1 is success
-            if (!$result) { die "Error: Fast update failed\n"; }
-        } else {
-            print "No files in this module changed\n";        
-        }
-    }
-    
-    saveCheckoutTimestamp($checkout_start_time, $timestamp_file);
-    return 1;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// Checkout
-#//--------------------------------------------------------------------------------------------------
-sub CheckoutModules($$$)
-{
-    my($modules, $pull_date, $timestamp_file) = @_;          # list of modules to check out
-
-    my($start_time) = TimeStart();
-
-#    assertRightDirectory();
-    my($cvsfile) = AskAndPersistFile($main::filepaths{"sessionpath"});
-    my($session) = Moz::MacCVS->new( $cvsfile );
-    unless (defined($session)) { die "Error: Checkout aborted. Cannot create session file: $session" }
-
-    my($checkout_start_time) = time();
-    
-    # activate MacCVS
-    ActivateApplication('Mcvs');
-
-    my($this_co);
-    foreach $this_co (@$modules)
-    {
-        my($module, $revision, $date) = ($this_co->[0], $this_co->[1], $this_co->[2]);
-        if ($date eq "") {
-            $date = $pull_date;
-        }
-        CheckOutModule($session, $module, $revision, $date);
-        # print "Checking out $module with ref $revision, date $date\n";
-    }
-
-    saveCheckoutTimestamp($checkout_start_time, $timestamp_file);
-    TimeEnd($start_time, "Checkout");
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// ReadCheckoutModulesFile
-#//--------------------------------------------------------------------------------------------------
-sub ReadCheckoutModulesFile($$)
-{
-    my($modules_file, $co_list) = @_;
-
-    my($checkout_file) = getScriptFolder().":".$modules_file;
-    local(*CHECKOUT_FILE);  
-    open(CHECKOUT_FILE, "< $checkout_file") || die "Error: failed to open checkout list $checkout_file\n";
-    while (<CHECKOUT_FILE>)
-    {
-        my($line) = $_;
-        chomp($line);
-    
-        # ignore comments and empty lines
-        if ($line =~ /^\#/ || $line =~ /^\s*$/) {
-            next;
-        }
-    
-        my(@cvs_co) = ["", "", ""];
-        
-        my($module, $revision, $date) = (0, 1, 2);
-        
-        if ($line =~ /\s*([^#,\s]+)\s*\,\s*([^#,\s]+)\s*\,\s*([^#]+)/)
-        {
-            @cvs_co[$module] = $1;
-            @cvs_co[$revision] = $2;
-            @cvs_co[$date] = $3;
-        }
-        elsif ($line =~ /\s*([^#,\s]+)\s*\,\s*([^#,\s]+)\s*(#.+)?/)
-        {
-            @cvs_co[$module] = $1;
-            @cvs_co[$revision] = $2;
-        }
-        elsif ($line =~ /\s*([^#,\s]+)\s*\,\s*,\s*([^#,]+)/)       
-        {
-            @cvs_co[$module] = $1;
-            @cvs_co[$date] = $2;
-        }
-        elsif ($line =~ /\s*([^#,\s]+)/)
-        {
-            @cvs_co[$module] = $1;
-        }
-        else
-        {
-            die "Error: unrecognized line '$line' in $modules_file\n";
-        }
-        
-        # strip surrounding space from date
-        @cvs_co[$date] =~ s/^\s*|\s*$//g;
-        
-        # print "Going to check out '@cvs_co[$module]', '@cvs_co[$revision]', '@cvs_co[$date]'\n";
-        push(@$co_list, \@cvs_co);
-    }
-
-    close(CHECKOUT_FILE);
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// PullFromCVS
-#//--------------------------------------------------------------------------------------------------
-sub PullFromCVS($$)
-{
-    unless ( $main::build{pull} ) { return; }
-    
-    my($modules_file, $timestamp_file) = @_;
-
-    StartBuildModule("pull");
-    
-    my(@cvs_co_list);
-    ReadCheckoutModulesFile($modules_file, \@cvs_co_list);
-
-    if ($main::FAST_UPDATE && $main::options{pull_by_date})
-    {
-        die "Error: you can't use FAST_UPDATE if you are pulling by date.\n";
-    }
-
-    my($did_fast_update) = $main::FAST_UPDATE && FastUpdate(\@cvs_co_list, $timestamp_file);
-    if (!$did_fast_update)
-    {
-        my($pull_date) = "";
-        if ($main::options{pull_by_date})
-        {
-            # acceptable CVS date formats are (in local time):
-            # ISO8601 (e.g. "1972-09-24 20:05") and Internet (e.g. "24 Sep 1972 20:05").
-            # Perl's localtime() string format also seems to work.
-            $pull_date = localtime().""; # force string interp.
-            print "Pulling by date $pull_date\n";
-        }
-
-        CheckoutModules(\@cvs_co_list, $pull_date, $timestamp_file);
-    }
-
-    EndBuildModule("pull");
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// RunBuild
-#//--------------------------------------------------------------------------------------------------
-sub RunBuild($$$$)
-{
-    my($do_pull, $do_build, $input_files, $build_prefs) = @_;
-
-    InitBuildProgress($input_files->{"buildprogress"});
-    
-    # if we are pulling, we probably want to do a full build, so clear the build progress
-    if ($do_pull) {
-        ClearBuildProgress();    
-    }
-    
-    # read local prefs, and the build progress file, and set flags to say what to build
-    SetupBuildParams(\%main::build,
-                     \%main::options,
-                     \%main::optiondefines,
-                     \%main::filepaths,
-                     $input_files->{"buildflags"},
-                     $build_prefs);
-    
-    # If we were told to pull, make sure we do, overriding prefs etc.
-    if ($do_pull)
-    {
-        $main::build{"pull"} = 1;
-    }
-    
-    # transfer this flag
-    $CodeWarriorLib::CLOSE_PROJECTS_FIRST = $main::CLOSE_PROJECTS_FIRST;
-    
-    # setup the build log
-    SetupBuildLog($main::filepaths{"buildlogfilepath"}, $main::USE_TIMESTAMPED_LOGS);
-    StopForErrors();
-    
-    if ($main::LOG_TO_FILE) {
-        RedirectOutputToFile($main::filepaths{"scriptlogfilepath"});
-    }
-        
-    # run a pre-build check to see that the tools etc are in order
-    DoPrebuildCheck();
-    
-    # do the pull
-    PullFromCVS($input_files->{"checkoutdata"}, $input_files->{"checkouttime"});
-    
-    unless ($do_build) { return; }
-
-    my($build_start) = TimeStart();
-
-    # check the build environment
-    ConfigureBuildSystem();
-
-    # here we load and call methods in the build module indirectly.
-    # we have to use indirection because the build module can be named
-    # differently for different builds.
-    chdir(dirname($0));     # change to the script dir
-    my($build_module) = $input_files->{"buildmodule"};
-    # load the build module
-    require $build_module;
-    {   # scope for no strict 'refs'
-        no strict 'refs';
-        
-        my($package_name) = $build_module;
-        $package_name =~ s/\.pm$//;
-        
-        chdir($main::MOZ_SRC);
-        &{$package_name."::BuildDist"}();
-        
-        chdir($main::MOZ_SRC);
-        &{$package_name."::BuildProjects"}();
-    }
-    
-    # the build finished, so clear the build progress state
-    ClearBuildProgress();
-    
-    TimeEnd($build_start, "Build");
-    print "Build complete\n";
-}
-
-1;

mozilla/build/mac/build_scripts/Moz/BuildFlags.pm

@@ -1,425 +0,0 @@
-#!perl -w
-package Moz::BuildFlags;
-
-require 5.004;
-require Exporter;
-
-# Package that attempts to read a file from the Preferences folder,
-# and get build settings out of it
-
-use strict;
-use Exporter;
-
-use Cwd;
-use File::Basename;
-
-use Moz::Moz;
-use Moz::Prefs;
-
-use vars qw(@ISA @EXPORT);
-
-@ISA      = qw(Exporter);
-@EXPORT   = qw(
-                SetupBuildParams
-                InitBuildProgress
-                WriteBuildProgress
-                ClearBuildProgress
-                ReadBuildProgress
-              );
-
-
-my(@build_flags);
-my(@options_flags);
-my(@filepath_flags);
-
-my(%arrays_list) = (
-  "build_flags",    \@build_flags,
-  "options_flags",  \@options_flags,
-  "filepath_flags", \@filepath_flags
-);
-
-my($progress_file) = "¥ÊBuild progress";
-
-#-------------------------------------------------------------------------------
-# appendArrayFlag
-# 
-# Set a flag in the array
-#-------------------------------------------------------------------------------
-sub appendArrayFlag(@)
-{
-  my($array_name) = shift;
-  my($setting) = shift;
-  my($value) = shift;
-  
-  my(@optional_values);
-  foreach (@_) {
-    push(@optional_values, $_);
-  }
-
-  my(@this_flag) = [$setting, $value, @optional_values];
-  my($flags_array) = $arrays_list{$array_name};
-  if ($flags_array)
-  {
-    push(@{$flags_array}, @this_flag) || die "Failed to append\n";
-  }
-  else
-  {
-    die "Error: unknown build flags array $array_name\n";
-  }
-}
-
-#-------------------------------------------------------------------------------
-# readFlagsFile
-# 
-# Read the file of build flags from disk. File path is relative to the
-# script directory.
-#-------------------------------------------------------------------------------
-sub readFlagsFile($)
-{
-  my($flags_file) = @_;
-
-  my($file_path) = $0;
-  $file_path =~ s/[^:]+$/$flags_file/;
-  
-  print "Reading build flags from '$file_path'\n";
-
-  local(*FLAGS_FILE);
-  open(FLAGS_FILE, "< $file_path") || die "Error: failed to open flags file $file_path\n";
-
-  my($cur_array) = "";
-  
-  while(<FLAGS_FILE>)
-  {
-      my($line) = $_;
-      chomp($line);
-      
-      # ignore comments and empty lines  
-      if ($line =~ /^\#/ || $line =~ /^\s*$/) {
-        next;
-      }
-
-      # 1-word line, probably array name
-      if ($line =~ /^([^#\s]+)\s*$/)
-      {
-        $cur_array = $1;
-        next;  
-      }
-      elsif ($line =~ /^([^#\s]+)\s+\"(.+)\"(\s+#.+)?$/)    # quoted option, possible comment
-      {
-        my($flag) = $1;
-        my($setting) = $2;
-        
-        appendArrayFlag($cur_array, $flag, $setting);
-      }
-      elsif ($line =~ /^([^#\s]+)((\s+[^#\s]+)+)(\s+#.+)?$/)  # multiple word line, possible comment
-      {
-        my($flag) = $1;
-        
-        appendArrayFlag($cur_array, $flag, split(' ', $2));
-      }
-      else
-      {
-        die "Error: unknown build flag at '$line'\n";
-      }
-  
-  }
-  
-  close(FLAGS_FILE);
-}
-
-
-
-#-------------------------------------------------------------------------------
-# flagsArrayToHash
-# 
-# Utility routine to migrate flag from a 2D array to a hash, where
-# item[n][0] is the hash entry name, and item[n][1] is the hash entry value.
-#-------------------------------------------------------------------------------
-
-sub flagsArrayToHash($$)
-{
-  my($src_array, $dest_hash) = @_;
-  
-  my($item);
-  foreach $item (@$src_array)
-  {
-    $dest_hash->{$item->[0]} = $item->[1];
-  }
-}
-
-#-----------------------------------------------
-# printHash
-#
-# Utility routine to print a hash
-#-----------------------------------------------
-sub printHash($)
-{
-  my($hash_ref) = @_;
- 
-  print "Printing hash:\n";
-  
-  my($key, $value);
-  
-  while (($key, $value) = each (%$hash_ref))
-  {
-    print "  $key $value\n";
-  }
-}
-
-
-#-----------------------------------------------
-# printBuildArray
-#
-# Utility routine to print a 2D array
-#-----------------------------------------------
-sub printBuildArray($)
-{
-  my($build_array) = @_;
-  
-  my($entry);
-  foreach $entry (@$build_array)
-  {  
-    print "$entry->[0] = $entry->[1]\n";
-  }
-
-}
-
-#-------------------------------------------------------------------------------
-# SetBuildFlags
-#-------------------------------------------------------------------------------
-sub SetBuildFlags($)
-{
-  my($build) = @_;
-
-  flagsArrayToHash(\@build_flags, $build);
-}
-
-#-------------------------------------------------------------------------------
-# SetBuildOptions
-#-------------------------------------------------------------------------------
-sub SetBuildOptions($)
-{
-  my($options) = @_;
-
-  flagsArrayToHash(\@options_flags, $options);
-}
-
-#-------------------------------------------------------------------------------
-# SetFilepathFlags
-#-------------------------------------------------------------------------------
-sub SetFilepathFlags($)
-{
-  my($filepath) = @_;
-
-  flagsArrayToHash(\@filepath_flags, $filepath);
-}
-
-#-------------------------------------------------------------------------------
-# SetOptionDefines
-#-------------------------------------------------------------------------------
-sub SetOptionDefines($)
-{
-  my($optiondefines) = @_;
-
-  foreach my $entry (@options_flags)
-  {
-    if (defined($entry->[2])) {
-      $optiondefines->{$entry->[0]}{$entry->[2]} = 1;
-    }
-  }
-}
-
-
-#-------------------------------------------------------------------------------
-# PropagateAllFlags
-#-------------------------------------------------------------------------------
-sub PropagateAllFlags($)
-{
-  my($build_array) = @_;
-  
-  # if "all" is set, set all the flags to 1
-  unless ($build_array->[0][0] eq "all") { die "Error: 'all' must come first in the flags array\n"; }
-  
-  if ($build_array->[0][1] == 1)
-  {
-    my($index);
-    foreach $index (@$build_array)
-    {
-      $index->[1] = 1;
-    }
-  }
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// _getBuildProgressFile
-#//--------------------------------------------------------------------------------------------------
-sub _getBuildProgressFile()
-{
-  return $progress_file;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// setBuildProgressStart
-#// 
-#// This automagically sets $build{"all"} to 0
-#//--------------------------------------------------------------------------------------------------
-sub setBuildProgressStart($$)
-{
-  my($build_array, $name) = @_;
-
-  my($index);
-  foreach $index (@$build_array)
-  {
-    $index->[1] = 0;
-    if ($index->[0] eq $name) {
-      last;
-    }    
-  }
-
-  print "Building from module after $name, as specified by build progress\n";
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// InitBuildProgress
-#//--------------------------------------------------------------------------------------------------
-sub InitBuildProgress($)
-{
-  my($prog_file) = @_;
-  if ($prog_file ne "") {
-    $progress_file = full_path_to($prog_file);
-    print "Writing build progress to $progress_file\n";
-  }
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// WriteBuildProgress
-#//--------------------------------------------------------------------------------------------------
-sub WriteBuildProgress($)
-{
-  my($module_built) = @_;
-
-  my($progress_file) = _getBuildProgressFile();
-  
-  if ($progress_file ne "")
-  {
-    open(PROGRESS_FILE, ">>$progress_file") || die "Failed to open $progress_file\n";
-    print(PROGRESS_FILE "$module_built\n");
-    close(PROGRESS_FILE);
-  }
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// ClearBuildProgress
-#//--------------------------------------------------------------------------------------------------
-sub ClearBuildProgress()
-{
-  my($progress_file) = _getBuildProgressFile();
-  if ($progress_file ne "") {
-    unlink $progress_file;
-  }
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// WipeBuildProgress
-#//--------------------------------------------------------------------------------------------------
-sub WipeBuildProgress()
-{
-  print "Ignoring build progress\n";
-  ClearBuildProgress();
-  $progress_file = "";
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// ReadBuildProgress
-#//--------------------------------------------------------------------------------------------------
-sub ReadBuildProgress($)
-{
-  my($build_array) = @_;
-  my($progress_file) = _getBuildProgressFile();
-
-  my($last_module);
-  
-  if (open(PROGRESS_FILE, "< $progress_file"))
-  {
-    print "Getting build progress from $progress_file\n";
-    
-    while (<PROGRESS_FILE>)
-    {
-      my($line) = $_;
-      chomp($line);
-      $last_module = $line;
-    }
-    
-    close(PROGRESS_FILE);
-  }
-  
-  if ($last_module)
-  {
-    setBuildProgressStart($build_array, $last_module);
-  }
-}
-
-#-------------------------------------------------------------------------------
-# clearOldBuildSettings
-#-------------------------------------------------------------------------------
-sub clearOldBuildSettings($$$$)
-{
-  my($build, $options, $optiondefines, $filepaths) = @_;
-
-  # empty the arrays in case we're being called twice
-  @build_flags = ();
-  @options_flags = ();
-  @filepath_flags = ();
-  
-  # and empty the hashes
-  %$build = ();
-  %$options = ();
-  %$optiondefines = ();
-  %$filepaths = ();
-}
-
-#-------------------------------------------------------------------------------
-# SetupBuildParams
-#-------------------------------------------------------------------------------
-sub SetupBuildParams($$$$$$)
-{
-  my($build, $options, $optiondefines, $filepaths, $flags_file, $prefs_file) = @_;
-  
-  # Empty the hashes and arrays, to wipe out any stale data.
-  # Needed because these structures persist across two build scripts
-  # called using 'do' from a parent script.
-  clearOldBuildSettings($build, $options, $optiondefines, $filepaths);
-  
-  # Read from the flags file, which sets up the various arrays
-  readFlagsFile($flags_file);
-  
-  # If 'all' is set in the build array, propagate that to all entries
-  PropagateAllFlags(\@build_flags);
-  
-  # read the user pref file, that can change values in the array
-  ReadMozUserPrefs($prefs_file, \@build_flags, \@options_flags, \@filepath_flags);
-
-  # If build progress exists, this clears flags in the array up to a certain point
-  if ($main::USE_BUILD_PROGRESS) {
-    ReadBuildProgress(\@build_flags);
-  } else {
-    WipeBuildProgress();
-  }
-  
-#  printBuildArray(\@build_flags);
-#  printBuildArray(\@options_flags);
-  
-  SetBuildFlags($build);
-  SetBuildOptions($options);
-  SetOptionDefines($optiondefines);
-  SetFilepathFlags($filepaths);
-  
-#  printHash($build);
-#  printHash($options);
-}
-
-
-1;

mozilla/build/mac/build_scripts/Moz/BuildUtils.pm

@@ -1,786 +0,0 @@
-
-package Moz::BuildUtils;
-
-require 5.004;
-require Exporter;
-
-# Package that contains build util functions specific to the Mozilla build
-# process.
-
-use strict;
-use Exporter;
-
-use Cwd;
-use File::Path;
-use File::Basename;
-
-use Mac::Events;
-use Mac::StandardFile;
-
-use Moz::Moz;
-use Moz::BuildFlags;
-use Moz::MacCVS;
-#use Moz::ProjectXML;  #optional; required for static build only
-
-use vars qw(@ISA @EXPORT);
-
-@ISA      = qw(Exporter);
-@EXPORT   = qw(
-                SetupDefaultBuildOptions
-                SetupBuildRootDir
-                StartBuildModule
-                EndBuildModule
-                GetBinDirectory
-                BuildOneProjectWithOutput
-                BuildOneProject
-                BuildProject
-                BuildProjectClean
-                BuildIDLProject
-                BuildFolderResourceAliases
-                AskAndPersistFile
-                DelayFor
-                TimeStart
-                TimeEnd
-                EmptyTree
-                SetupBuildLog
-                SetBuildNumber
-                SetTimeBomb
-                UpdateConfigHeader
-              );
-
-#//--------------------------------------------------------------------------------------------------
-#// SetupDefaultBuildOptions
-#//--------------------------------------------------------------------------------------------------
-sub SetupDefaultBuildOptions($$$)
-{
-    my($debug, $bin_dir, $config_header_file_name) = @_;
-
-    # Here we set up defaults for the various build flags.
-    # If you want to override any of these, it's best to do
-    # so via the relevant preferences file, which lives in
-    # System Folder:Preferences:Mozilla build prefs:{build prefs file}.
-    # For the name of the prefs file, see the .pl script that you
-    # run to start this build. The prefs files are created when
-    # you run the build, and contain some documentation.
-    
-    #-------------------------------------------------------------
-    # configuration variables that globally affect what is built
-    #-------------------------------------------------------------
-    $main::DEBUG                  = $debug;
-    $main::PROFILE                = 0;
-    $main::RUNTIME                = 0;    # turn on to just build runtime support and NSPR projects
-    $main::GC_LEAK_DETECTOR       = 0;    # turn on to use GC leak detection
-    $main::MOZILLA_OFFICIAL       = 0;    # generate build number
-    $main::LOG_TO_FILE            = 0;    # write perl output to a file
-    
-    #-------------------------------------------------------------
-    # configuration variables that affect the manner of building, 
-    # but possibly affecting the outcome.
-    #-------------------------------------------------------------    
-    $main::ALIAS_SYM_FILES        = $main::DEBUG;
-    $main::CLOBBER_LIBS           = 1;      # turn on to clobber existing libs and .xSYM files before
-                                            # building each project                         
-    # The following two options will delete all dist files (if you have $main::build{dist} turned on),
-    # but leave the directory structure intact.
-    $main::CLOBBER_DIST_ALL       = 1;    # turn on to clobber all aliases/files inside dist (headers/xsym/libs)
-    $main::CLOBBER_DIST_LIBS      = 0;    # turn on to clobber only aliases/files for libraries/sym files in dist
-    $main::CLOBBER_IDL_PROJECTS   = 0;    # turn on to clobber all IDL projects.
-    $main::CLOBBER_PROJECTS       = 0;    # turn on to remove object code from each project before building it
-    
-    $main::UNIVERSAL_INTERFACES_VERSION = 0x0320;
-    
-    #-------------------------------------------------------------
-    # configuration variables that are preferences for the build,
-    # style and do not affect what is built.
-    #-------------------------------------------------------------
-    $main::CLOSE_PROJECTS_FIRST   = 0;
-                                    # 1 = close then make (for development),
-                                    # 0 = make then close (for tinderbox).
-    $main::USE_TIMESTAMPED_LOGS   = 0;
-    $main::USE_BUILD_PROGRESS     = 1;    # track build progress for restartable builds
-    #-------------------------------------------------------------
-    # END OF CONFIG SWITCHES
-    #-------------------------------------------------------------
-    
-    $main::BIN_DIRECTORY = $bin_dir;
-    $main::DEFINESOPTIONS_FILE = $config_header_file_name;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// SetupBuildRootDir
-#//--------------------------------------------------------------------------------------------------
-sub SetupBuildRootDir($)
-{
-    my($rel_path_to_script) = @_;
-
-    my($cur_dir) = cwd();
-    $cur_dir =~ s/$rel_path_to_script$//;
-    chdir($cur_dir) || die "Error: failed to set build root directory to '$cur_dir'.\nYou probably need to put 'mozilla' one level down (in a folder).\n";
-    $main::MOZ_SRC = cwd();
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// StartBuildModule
-#//--------------------------------------------------------------------------------------------------
-sub StartBuildModule($)
-{
-    my($module) = @_;
-
-    print("---- Start of $module ----\n");
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// EndBuildModule
-#//--------------------------------------------------------------------------------------------------
-sub EndBuildModule($)
-{
-    my($module) = @_;
-    WriteBuildProgress($module);
-    print("---- End of $module ----\n");
-}
-
-#--------------------------------------------------------------------------------------------------
-# GetBinDirectory
-#--------------------------------------------------------------------------------------------------
-sub GetBinDirectory()
-{
-    if ($main::BIN_DIRECTORY eq "") { die "Dist directory not set\n"; }
-    return $main::BIN_DIRECTORY;
-}
-
-#--------------------------------------------------------------------------------------------------
-# AskAndPersistFile stores the information about the user pick inside
-# the file $session_storage
-#--------------------------------------------------------------------------------------------------
-sub AskAndPersistFile($)
-{
-    my ($sessionStorage) = @_;
-    my $cvsfile;
-
-    if (( -e $sessionStorage) &&
-        open( SESSIONFILE, $sessionStorage ))
-    {
-    # Read in the path if available
-        $cvsfile = <SESSIONFILE>;
-        chomp $cvsfile;
-        close SESSIONFILE;
-        if ( ! -e $cvsfile )
-        {
-            print STDERR "$cvsfile has disappeared\n";
-            undef $cvsfile;
-        }
-    }
-    unless (defined ($cvsfile))
-    {
-        # make sure that MacPerl is a front process
-        ActivateApplication('McPL');
-        MacPerl::Answer("Could not find your MacCVS session file. Please choose one", "OK");
-        
-        # prompt user for the file name, and store it
-        my $macFile = StandardGetFile( 0, "McvD");  
-        if ( $macFile->sfGood() )
-        {
-            $cvsfile = $macFile->sfFile();
-            # save the choice if we can
-            if ( open (SESSIONFILE, ">" . $sessionStorage))
-            {
-                printf SESSIONFILE $cvsfile, "\n";
-                close SESSIONFILE;
-            }
-            else
-            {
-                print STDERR "Could not open storage file $sessionStorage for saving $cvsfile\n";
-            }
-        }
-    }
-    return $cvsfile;
-}
-
-
-#--------------------------------------------------------------------------------------------------
-# BuildIDLProject
-#
-#--------------------------------------------------------------------------------------------------
-
-sub BuildIDLProject($$)
-{
-    my ($project_path, $module_name) = @_;
-
-    if ($main::CLOBBER_IDL_PROJECTS)
-    {
-        my (@suffix_list) = (".mcp", ".xml");
-        my ($project_name, $project_dir, $suffix) = fileparse($project_path, @suffix_list);
-        if ($suffix eq "") { die "Error: Project, $project_path must end in .xml or .mcp\n"; }
-
-        my($datafolder_path);
-        if ($suffix eq ".xml")
-        {
-            $datafolder_path = $project_dir . "_" . $project_name . " Data:";
-        }
-        else {
-            $datafolder_path = $project_dir . $project_name . " Data:";
-        }
-
-        print STDERR "Deleting IDL data folder: $datafolder_path\n";
-        EmptyTree($datafolder_path);
-    }
-
-    BuildOneProject($project_path,  "headers", 0, 0, 0);
-    BuildOneProject($project_path,  $module_name.".xpt", 1, 0, 1);
-}
-
-
-#--------------------------------------------------------------------------------------------------
-# CreateStaticLibTargets
-#
-#--------------------------------------------------------------------------------------------------
-sub CreateXMLStaticLibTargets($)
-{
-    my($xml_path) = @_;
-
-    my (@suffix_list) = (".xml");
-    my ($project_name, $project_dir, $suffix) = fileparse($xml_path, @suffix_list);
-    if ($suffix eq "") { die "XML munging: $xml_path must end in .xml\n"; }
-
-    #sniff the file to see if we need to fix up broken Pro5-exported XML
-    print "Parsing $xml_path\n";
-    
-    my $ide_version = Moz::ProjectXML::SniffProjectXMLIDEVersion($xml_path);
-    if ($ide_version eq "4.0")
-    {
-        my $new_file = $project_dir.$project_name."2.xml";
-        
-        print "Cleaning up Pro 5 xml to $new_file\n";
-        
-        Moz::ProjectXML::CleanupPro5XML($xml_path, $new_file);
-
-        unlink $xml_path;
-        rename ($new_file, $xml_path);
-    }
-    
-    my $doc = Moz::ProjectXML::ParseXMLDocument($xml_path);
-    my @target_list = Moz::ProjectXML::GetTargetsList($doc);
-    my $target;
-    
-    my %target_hash;    # for easy lookups below
-    foreach $target (@target_list) { $target_hash{$target} = 1; }
-    
-    foreach $target (@target_list)
-    {
-        if ($target =~ /(.+).shlb$/)        # if this is a shared lib target
-        {
-            my $target_base = $1;
-            my $static_target = $target_base.".o";
-            
-            # ensure that this does not exist already
-            if ($target_hash{$static_target}) {
-                print "Static target $static_target already exists in project. Not making\n";
-                next;
-            }
-            
-            print "Making static target '$static_target' from target '$target'\n";
-
-            Moz::ProjectXML::CloneTarget($doc, $target, $static_target);
-            Moz::ProjectXML::SetAsStaticLibraryTarget($doc, $static_target, $static_target);
-        }
-    }
-    
-    print "Writing XML file to $xml_path\n";
-    my $temp_path = $project_dir."_".$project_name.".xml";
-    Moz::ProjectXML::WriteXMLDocument($doc, $temp_path, $ide_version);
-    Moz::ProjectXML::DisposeXMLDocument($doc);
-    
-    if (-e $temp_path)
-    {
-        unlink $xml_path;
-        rename ($temp_path, $xml_path);
-    }
-    else
-    {
-        die "Error: Failed to add new targets to XML project\n";
-    }
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// ProcessProjectXML
-#// 
-#// Helper routine to allow for XML pre-processing. This should read in the XML, process it,
-#// and replace the original file with the processed version.
-#//--------------------------------------------------------------------------------------------------
-sub ProcessProjectXML($)
-{
-    my($xml_path) = @_;
-  
-    # we need to manually load Moz::ProjectXML, becaues not everyone will have the
-    # required perl modules in their distro.
-    my($cur_dir) = cwd();
-    
-    chdir(dirname($0));     # change to the script dir
-    eval "require Moz::ProjectXML";
-    if ($@) { die "Error: could not do Project XML munging because you do not have the correct XML modules installed. Error is:\n################\n $@################"; }
-    
-    chdir($cur_dir);
-    
-    CreateXMLStaticLibTargets($xml_path);
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// Build one project, and make the alias. Parameters are project path, target name, shared  library
-#// name, make shlb alias (boolean), make xSYM alias (boolean), and is component (boolean).
-#//--------------------------------------------------------------------------------------------------
-
-sub BuildOneProjectWithOutput($$$$$$)
-{
-    my ($project_path, $target_name, $output_name, $alias_lib, $alias_xSYM, $component) = @_;
-
-    unless ($project_path =~ m/^$main::BUILD_ROOT.+/) { return; }
-
-    my (@suffix_list) = (".mcp", ".xml");
-    my ($project_name, $project_dir, $suffix) = fileparse($project_path, @suffix_list);
-    if ($suffix eq "") { die "Error: Project, $project_path must end in .xml or .mcp\n"; }
-    
-    my($dist_dir) = GetBinDirectory();
-    
-    # Put libraries in "Essential Files" folder, Components in "Components" folder
-    my($output_dir)  = $component ? "Components:" : "Essential Files:";
-    my($output_path) = $dist_dir.$output_dir;
-
-    if ($main::options{static_build})
-    {      
-      if ($output_name =~ /\.o$/ || $output_name =~ /\.[Ll]ib$/)
-      {
-        $alias_xSYM = 0;
-        $alias_lib  = 1;
-        $output_path = $main::DEBUG ? ":mozilla:dist:static_libs_debug:" : ":mozilla:dist:static_libs:";
-      }
-    }
-
-    # if the flag is on to export projects to XML, export and munge them
-    if ($main::EXPORT_PROJECTS && !($project_path =~ /IDL\.mcp$/))
-    {
-        my $xml_out_path = $project_path;
-
-        $xml_out_path =~ s/\.mcp$/\.xml/;
-
-        # only do this if project is newer?
-        if (! -e $xml_out_path)
-        {
-          ExportProjectToXML(full_path_to($project_path), full_path_to($xml_out_path));
-          ProcessProjectXML($xml_out_path);
-        }
-    }
-        
-    # if the flag is set to use XML projects, default to XML if the file 
-    # is present.
-    if ($main::USE_XML_PROJECTS && !($project_path =~ /IDL\.mcp$/))
-    {
-      my $xml_project_path = $project_dir.$project_name.".xml";
-      if (-e $xml_project_path)
-      {
-        $project_path = $xml_project_path;
-        $suffix = ".xml";
-      }
-    }
-    
-    if ($suffix eq ".xml")
-    {
-        my($xml_path) = $project_path;
-        # Prepend an "_" onto the name of the generated project file so it doesn't conflict
-        $project_path = $project_dir . "_" . $project_name . ".mcp";
-        my($project_modtime) = (-e $project_path ? GetFileModDate($project_path) : 0);
-        my($xml_modtime) = (-e $xml_path ? GetFileModDate($xml_path) : 0);
-
-        if ($xml_modtime > $project_modtime)
-        {
-            print("Importing $project_path from $project_name.xml.\n");
-            unlink($project_path);
-            # Might want to delete the "xxx.mcp Data" dir ???
-            ImportXMLProject(full_path_to($xml_path), full_path_to($project_path));
-        }
-    }
-
-
-    if ($main::CLOBBER_LIBS)
-    {
-        unlink "$project_dir$output_name";              # it's OK if these fail
-        unlink "$project_dir$output_name.xSYM";
-    }
-    
-    DoBuildProject($project_path, $target_name, $main::CLOBBER_PROJECTS);
-    
-    $alias_lib  ? MakeAlias("$project_dir$output_name",      "$output_path") : 0;
-    $alias_xSYM ? MakeAlias("$project_dir$output_name.xSYM", "$output_path") : 0;
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// For compatiblity with existing scripts, BuildOneProject now just calls
-#// BuildOneProjectWithOutput, with the output name and target name identical.
-#// Note that this routine assumes that the target name and the shared libary name
-#// are the same.
-#//--------------------------------------------------------------------------------------------------
-
-sub BuildOneProject($$$$$)
-{
-    my ($project_path, $target_name, $alias_lib, $alias_xSYM, $component) = @_;
-    
-	BuildOneProjectWithOutput($project_path, $target_name, $target_name,
-							  $alias_lib, $alias_xSYM, $component);
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// For compatiblity with existing scripts, BuildProject now just calls
-#// BuildOneProjectWithOutput, with the output name and target name identical.
-#// Note that this routine assumes that the target name and the shared libary name
-#// are the same. No aliases of the output are made.
-#//--------------------------------------------------------------------------------------------------
-
-sub BuildProject($$)
-{
-    my ($project_path, $target_name) = @_;
-    
-	BuildOneProjectWithOutput($project_path, $target_name, $target_name, 0, 0, 0);
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// Identical to BuildProject but clobbers the project before building it.
-#//--------------------------------------------------------------------------------------------------
-
-sub BuildProjectClean($$)
-{
-    my ($project_path, $target_name) = @_;
-    my ($save_clobber_flag) = $main::CLOBBER_PROJECTS;
-    $main::CLOBBER_PROJECTS = 1;
-	BuildOneProjectWithOutput($project_path, $target_name, $target_name, 0, 0, 0);
-	$main::CLOBBER_PROJECTS = $save_clobber_flag;
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// Make resource aliases for one directory
-#//--------------------------------------------------------------------------------------------------
-
-sub BuildFolderResourceAliases($$)
-{
-    my($src_dir, $dest_dir) = @_;
-        
-    # get a list of all the resource files
-    opendir(SRCDIR, $src_dir) || die("can't open $src_dir");
-    my(@resource_files) = readdir(SRCDIR);
-    closedir(SRCDIR);
-    
-    # make aliases for each one into the dest directory
-    print("Placing aliases to all files from $src_dir in $dest_dir\n");
-    for ( @resource_files )
-    {
-        next if $_ eq "CVS";
-        #print("    Doing $_\n");
-        if (-l $src_dir.$_)
-        {
-            print("     $_ is an alias\n");
-            next;
-        }
-        my($file_name) = $src_dir . $_; 
-        MakeAlias($file_name, $dest_dir);
-    }
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// DelayFor
-#//
-#// Delay for the given number of seconds, allowing the script to be cancelled
-#//--------------------------------------------------------------------------------------------------
-
-sub DelayFor($)
-{
-  my($delay_secs) = @_;
-  
-  STDOUT->autoflush(1);
-  
-  my($end_time) = time() + $delay_secs;
-    
-  my($last_time) = 0;
-  my($cur_time) = time();
-  
-  while ($cur_time < $end_time)
-  {
-    $cur_time = time();
-    if ($cur_time > $last_time)
-    {
-      print ".";
-      $last_time = $cur_time;
-    }
-    
-    WaitNextEvent();
-  }
-
-  print "\n";
-  STDOUT->autoflush(0);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// TimeStart
-#//--------------------------------------------------------------------------------------------------
-sub TimeStart()
-{
-    return time();
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// TimeEnd
-#//--------------------------------------------------------------------------------------------------
-sub TimeEnd($$)
-{
-    use integer;
-    
-    my($start_time, $operation_name) = @_;
-    my($end_time) = time();
-    
-    my($tot_sec) = $end_time - $start_time;
-    
-    my($seconds) = $tot_sec;
-    
-    my($hours) = $seconds / (60 * 60);
-    $seconds -= $hours * (60 * 60);
-    
-    my($minutes) = $seconds / 60;
-    $seconds -= $minutes * 60;
-        
-    print "$operation_name took $hours hours $minutes minutes and $seconds seconds\n";
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// Remove all files from a tree, leaving directories intact (except "CVS").
-#//--------------------------------------------------------------------------------------------------
-
-sub EmptyTree($)
-{
-    my ($root) = @_; 
-    #print "EmptyTree($root)\n";
-    opendir(DIR, $root);
-    my $sub;
-    foreach $sub (readdir(DIR))
-    {
-        my $fullpathname = $root.$sub; # -f, -d only work on full paths
-
-        # Don't call empty tree for the alias of a directory.
-        # -d returns true for the alias of a directory, false for a broken alias)
-
-        if (-d $fullpathname)
-        {
-            if (-l $fullpathname)   # delete aliases
-            {
-                unlink $fullpathname;
-                next;
-            }
-            EmptyTree($fullpathname.":");
-            if ($sub eq "CVS")
-            {
-                #print "rmdir $fullpathname\n";
-                rmdir $fullpathname;
-            }
-        }
-        else
-        {
-            unless (unlink $fullpathname) { die "Failed to delete $fullpathname\n"; }
-        }
-    }
-    closedir(DIR);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// Recurse through a directory hierarchy, looking for MANIFEST files.
-#// Currently unused.
-#//--------------------------------------------------------------------------------------------------
-
-sub ScanForManifestFiles($$$$)
-{
-    my($dir, $theme_root, $theme_name, $dist_dir) = @_;
-
-    opendir(DIR, $dir) or die "Cannot open dir $dir\n";
-    my @files = readdir(DIR);
-    closedir DIR;
-
-    my $file;
-
-    foreach $file (@files)
-    {    
-        my $filepath = $dir.":".$file;
-
-        if (-d $filepath)
-        {
-            # print "Looking for MANIFEST files in $filepath\n";        
-            ScanForManifestFiles($filepath, $theme_root, $theme_name, $dist_dir);
-        }
-        elsif ($file eq "MANIFEST")
-        {
-            # print "Doing manifest file $filepath\n";
-
-            # Get the dest path from the first line of the file
-
-            open(MANIFEST, $filepath) || die "Could not open file $file";
-            # Read in the path if available
-            my($dest_line) = <MANIFEST>;
-            chomp $dest_line;
-            close MANIFEST;
-
-            $dest_line =~ s|^#!dest[\t ]+|| || die "No destination line found in $filepath\n";
-
-            my($dest_path) = $dist_dir."chrome:skins:$theme_name:$dest_line";
-            # print " Destination is $dest_path\n";
-
-            InstallResources($filepath, "$dest_path", 0);
-        }
-    }
-}
-
-
-#-----------------------------------------------
-# SetupBuildLog
-#-----------------------------------------------
-sub SetupBuildLog($$)
-{
-    my($logfile_path, $timestamped_log) = @_;
-    
-    my($logdir) = "";
-    my($logfile) = $logfile_path;
-    
-    if ($logfile_path =~ /(.+?:)([^:]+)$/)       # ? for non-greedy match
-    {
-        $logdir = $1;
-        $logfile = $2;
-        
-        mkpath($logdir);
-    }
-    
-    if ($timestamped_log)
-    {
-        #Use time-stamped names so that you don't clobber your previous log file!
-        my $now = localtime();
-        while ($now =~ s@:@.@) {} # replace all colons by periods
-        OpenErrorLog("${logdir}${now}");
-    }
-    else
-    {
-        OpenErrorLog("${logdir}${logfile}");
-    }
-}
-
-#-----------------------------------------------
-# SetBuildNumber
-#-----------------------------------------------
-sub SetBuildNumber($$)
-{
-    my($build_num_file, $files_to_touch) = @_;
-
-    # Make sure we add the config dir to search, to pick up mozBDate.pm
-    # Need to do this dynamically, because this module can be used before
-    # mozilla/config has been checked out.
-    
-    my ($inc_path) = $0;        # $0 is the path to the parent script
-    $inc_path =~ s/:build:mac:build_scripts:.+$/:config/;
-    push(@INC, $inc_path);
-
-    require mozBDate;
-    
-    mozBDate::UpdateBuildNumber($build_num_file, $main::MOZILLA_OFFICIAL);
-   
-    my($file);
-    foreach $file (@$files_to_touch)
-    {
-        print "Writing build number to $file from ${file}.in\n";
-        mozBDate::SubstituteBuildNumber($file, $build_num_file, "${file}.in");
-    }
-}
-
-#-----------------------------------------------
-# SetTimeBomb
-#-----------------------------------------------
-sub SetTimeBomb($$)		
-{
-  my ($warn_days, $bomb_days) = @_;
-  
-  system("perl :mozilla:config:mac-set-timebomb.pl $warn_days $bomb_days");
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// Regenerate a configuration header file if necessary
-#//--------------------------------------------------------------------------------------------------
-sub UpdateConfigHeader($)
-{
-    my($config_path) = @_;
-    
-    my($config, $oldconfig) = ("", "");
-    my($define, $definevalue, $defines);
-    my($k, $l,);
-
-    foreach $k (keys(%main::options))
-    {
-        if ($main::options{$k})
-        {
-            foreach $l (keys(%{$main::optiondefines{$k}}))
-            {
-                $my::defines{$l} = $main::optiondefines{$k}{$l};
-                print "Setting up my::defines{$l}\n";
-            }
-        }
-    }
-
-    my $config_headerfile = current_directory().$config_path;
-    if (-e $config_headerfile)
-    {
-        open(CONFIG_HEADER, "< $config_headerfile") || die "$config_headerfile: $!\n";
-        my($line);
-        while ($line = <CONFIG_HEADER>)
-        {
-            if ($line =~ m/#define\s+([^\s]*)\s+([^\s]*)\s*\n/)
-            {
-                $define = $1;
-                $definevalue = $2;
-                
-                #canonicalize so that whitespace changes are not significant
-                my $canon_value = "#define " . $define . " " . $definevalue . "\n";
-                $oldconfig .= $canon_value;
-                
-                if (exists ($my::defines{$define}) and ($my::defines{$define} == $definevalue))
-                {
-                    delete $my::defines{$define};
-                    $config .= $canon_value;
-                }
-            }
-        }
-        close(CONFIG_HEADER);
-    }
-
-    if (%my::defines)
-    {
-        foreach $k (keys(%my::defines))
-        {
-            $config .= "#define " . $k . " " . $my::defines{$k} . "\n";
-        }
-    }
-
-    my $file_name = basename($config_headerfile);
-    if (($config ne $oldconfig) || (!-e $config_headerfile))
-    {
-        printf("Writing new configuration header $file_name\n");
-        open(CONFIG_HEADER, "> $config_headerfile") || die "$config_headerfile: $!\n";
-        print(CONFIG_HEADER "/* This file is auto-generated based on build options. Do not edit. */\n");
-        print CONFIG_HEADER ($config);
-        close(CONFIG_HEADER);
-
-        MacPerl::SetFileInfo("CWIE", "TEXT", $config_headerfile);
-    }
-    else
-    {
-        printf("Configuration header $file_name is up-to-date\n");
-    }
-}
-
-
-1;
-

mozilla/build/mac/build_scripts/Moz/CodeWarriorLib.pm

@@ -1,660 +0,0 @@
-#!perl
-package Moz::CodeWarriorLib;
-
-=pod
-
-=head1 NAME
-
-CodeWarriorLib - supply interface to CodeWarrior
-
-=head1 SYNOPSIS
-
-	#!perl
-	use CodeWarriorLib;
-	CodeWarriorLib::activate();
-	$had_errors = CodeWarriorLib::build_project(
-		$project_path, $target_name, $recent_errors_file, $clean_build
-	);
-
-=head1 DESCRIPTION
-
-Replaces the AppleScript library I<CodeWarriorLib>.
-
-=over 4
-
-=cut
-
-use strict;
-
-use Cwd;
-use File::Basename;
-
-use Mac::Types;
-use Mac::Events;
-use Mac::AppleEvents;
-use Mac::AppleEvents::Simple;
-use Mac::Processes;
-use Mac::MoreFiles;
-use Mac::StandardFile;
-
-
-use vars qw($VERSION);
-$VERSION = '1.02';
-
-my($app)  = 'CWIE';
-my($scriptDir) = cwd();         # could use $0 for this
-my($ide_loc_file) = "";
-
-# 0 == don't switch CWIE to front app in do_event(), 1 == do switch
-# note: activate() still switches when called
-$Mac::AppleEvents::Simple::SWITCH = 0;
-# $Mac::AppleEvents::Simple::WARN = 1;
-
-# supply your own path to the source here
-#_test('PowerPudgeIV:mozilla:mozilla:');
-
-# If you want to understand the gobbldeygook that's used to build Apple Events,
-# you should start by reading the AEGizmos documentation.
-
-=pod
-
-=item _get_project($full_path)
-
-A private routine returning a reference to the open project with the given name,
-or else the empty string (when that project is not open)
-
-full_path is a string identifying the project to be built and is of the form, 
-e.g., "HD:ProjectFolder:MyProject.mcp".  It must be supplied.
-
-=cut
-
-sub _get_project ($) {
-	my(
-		$full_path, $candidate_projects
-	) = @_;
-	$candidate_projects = _doc_named(basename($full_path, '*'));
-	if ($candidate_projects) {
-		my($cps) = _get_dobj($candidate_projects);
-		my($num) = AECountItems($cps);
-		if ($num) {  # is a list
-			foreach (1 .. AECountItems($cps)) {
-				my($cp) = AEGetNthDesc($cps, $_);
-				if (lc $full_path eq lc _full_path($cp)) {
-					return($cp);
-				}
-			}
-		} else {     # is only one, not a list
-			if (lc $full_path eq lc _full_path($cps)) {
-				return($cps);
-			}
-		}
-	}
-	return;
-}
-
-=pod
-
-=item build_project
-
-Build a selected target of a project, saving any errors to a file, if supplied.
-	
-full_path is a string identifying the project to be built and is of the form, 
-e.g., "HD:ProjectFolder:MyProject.mcp".  It must be supplied.
-
-If target_name is the empty string, the current target of the selected project 
-will be built, else, target_name should be a string matching a target name in 
-the selected project.
-	
-If error_path is the empty string, errors will not be saved to a file,
-else, error_path should be the full path of a file to save error messages into.
-
-=cut
-
-$CodeWarriorLib::CLOSE_PROJECTS_FIRST = 0; # If true we close then make. If false, make then close.
-my $last_project_built = "";
-my $last_project_was_closed = 0;
-
-sub build_project ($;$$$) {
-	my(
-		$full_path, $target_name, $error_path,
-		$remove_object, $p, $project_was_closed, $had_errors
-	) = @_;
-	_close_errors_window();
-
-	if ($CodeWarriorLib::CLOSE_PROJECTS_FIRST && ($last_project_built ne $full_path))
-	{
-		# If we're in "close first" mode, we don't close if the current project
-		# is the same as the previous one.
-		if ($last_project_was_closed) {
-			$p = _get_project($last_project_built);
-			_close($p);
-		}
-		$last_project_built = $full_path;
-		$last_project_was_closed = 0; # now refers to the new project
-	}
-	$project_was_closed = 0;
-	while (1) {
-		$p = _get_project($full_path);
-		if (!$p) {
-			if ($project_was_closed) {
-				print "### Error - request for project document failed after opening\n";
-				die "### possibly CW Pro 4 bug: be sure to close your Find window\n";
-			}
-			$project_was_closed = 1;
-			$last_project_was_closed = 1;
-			_open_file($full_path);
-		} else {
-			last;
-		}
-	}
-
-	$had_errors = 0;
-	if ($target_name eq '') {
-		if ($remove_object) {_remove_object($p)}
-		_build($p);
-	} else {
-		if ($remove_object) {_remove_object($p, $target_name)}
-		_build($p, $target_name);
-	}
-
-	if ($error_path ne '') {
-		_save_errors_window($error_path);
-	}
-	$had_errors = _close_errors_window();
-
-	if (!$CodeWarriorLib::CLOSE_PROJECTS_FIRST)
-	{
-		if ($project_was_closed) {
-			$p = _get_project($full_path);
-			_close($p);
-		}
-	}
-
-	return($had_errors);
-}
-
-=pod
-
-=item appIsRunning()
-
-=cut
-sub _appIsRunning($)
-{
-	my ($appSignature) = @_;
-	my ($psi);
-	my ($found) = 0;
-	my ($appPSN);
-
-	foreach $psi (values(%Process))
-	{
-		if ($psi->processSignature() eq $appSignature)
-		{
-			$appPSN = $psi->processNumber();
-			$found = 1;
-            last;
-		}
-	}
-	
-	return $found;
-}
-
-=pod
-
-=item appIsFrontmost()
-
-=cut
-sub _appIsFrontmost($)
-{
-	my ($appSignature) = @_;
-	my ($psi);
-	my ($found) = 0;
-	my ($appPSN);
-
-	foreach $psi (values(%Process))
-	{
-		if ($psi->processSignature() eq $appSignature)
-		{
-			$appPSN = $psi->processNumber();
-			$found = 1;
-            last;
-		}
-	}
-	
-	return (GetFrontProcess() == $appPSN);
-}
-
-
-=pod
-
-=item activate()
-
-Launches CodeWarrior and brings it to the front.
-
-Once found, path will be saved in $idepath_file for future reference.
-Edit or delete this file to change the location of the IDE.  If app is
-moved, C<activate()> will prompt for a new location.
-
-First looks for an open CodeWarrior app.  Second, tries to open previously
-saved location in ':idepath.txt'.  Third, tries to find it and allow user
-to choose it with Navigation Services (if present).  Fourth, uses good old
-GUSI routines built-in to MacPerl for a Choose Directory dialog box.
-
-=cut
-
-sub activate ($) {
-
-    $ide_loc_file = $_[0];     # save in global
-        
-	my($filepath, $appath, $psi) = ($ide_loc_file);
-
-	foreach $psi (values(%Process)) {
-		if ($psi->processSignature() eq $app) {
-			$appath = $psi->processAppSpec();
-			_save_appath($filepath, $appath);
-			last;
-		}
-	}
-
-	if (!$appath || !-x $appath) {
-		$appath = _read_appath($filepath);
-	}
-	
-	if (!$appath || ! -x $appath)
-	{
-		# make sure that MacPerl is a front process
-		#ActivateApplication('McPL');
-		MacPerl::Answer("Please locate the CodeWarrior application.", "OK");
-		
-		# prompt user for the file name, and store it
-		my $macFile = StandardGetFile( 0, "APPL");
-		if ( $macFile->sfGood() )
-		{
-			$appath = $macFile->sfFile();
-		}
-		else
-		{
-			die "Operation canceled\n";
-		}
-	
-#		if (eval {require Mac::Navigation}) {
-#			my($options, $nav);
-#			Mac::Navigation->import();
-#			$options = NavGetDefaultDialogOptions();
-#			$options->message('Where is CodeWarrior IDE?');
-#			$options->windowTitle('Find CodeWarrior IDE');
-#			$nav = NavChooseObject($Application{$app}, $options);
-#			die "CodeWarrior IDE not found.\n" if (!$nav || !$nav->file(1));
-#			$appath = $nav->file(1);
-#		} else {
-#			local(*D);
-#			my $cwd = `pwd`;
-#			$appath = _get_folder(
-#                               'Where is the CW IDE folder?',
-#				dirname($Application{$app})
-#			);
-#			die "CodeWarrior IDE not found.\n" if !$appath;
-#			opendir(D, $appath) or die $!;
-#			chdir($appath);
-#			foreach my $file (sort readdir (D)) {
-#				my(@app) = MacPerl::GetFileInfo($file);
-#				if ($app[0] && $app[1] &&
-#					$app[1] eq 'APPL' && $app[0] eq $app
-#				) {
-#					$appath .= $file;
-#					last;
-#				}
-#			}
-#			chomp($cwd);
-#			chdir($cwd);
-#		}
-		_save_appath($filepath, $appath);
-	}
-
-	my($lp) = LaunchParam->new(
-		launchAppSpec => $appath,
-		launchControlFlags => launchContinue() + launchNoFileFlags()
-	);
-	
-	unless (LaunchApplication($lp)) {
-		unlink($filepath);
-		die $^E;
-	}
-	
-	# wait for CodeWarrior to show up in the list of processes
-	while (!_appIsRunning('CWIE'))
-	{
-		WaitNextEvent();
-	}
-
-	# wait for CodeWarrior to come to the front
-	while (!_appIsFrontmost('CWIE'))
-	{
-		WaitNextEvent();
-	}
-}
-
-=pod
-
-=item getCodeWarriorPath()
-
-Returns a file path relative to the CodeWarrior folder
-
-=cut
-
-sub getCodeWarriorPath($)
-{
-    my($subfolder)=@_;
-    
-    my($app_path) = _read_appath($ide_loc_file);
-    if ($app_path eq "") { die "Error: Failed to get CodeWarrior IDE path\n"; }
-    
-    my($codewarrior_root) = $app_path;
-    $codewarrior_root =~ s/[^:]*$//;
-    return ($codewarrior_root . $subfolder);
-}
-
-
-=pod
-
-=item getCodeWarriorIDEName()
-
-Returns the name of the CodeWarrior application
-
-=cut
-
-sub getCodeWarriorIDEName()
-{
-    my($subfolder)=@_;
-
-    my($app_path) = _read_appath($ide_loc_file);
-    if ($app_path eq "") { die "Error: Failed to get CodeWarrior IDE path\n"; }
-
-    my(@codewarrior_path) = split(/:/, $app_path);
-    return pop(@codewarrior_path);
-}
-
-
-=pod
-
-=item quit()
-
-Quits CodeWarrior.
-
-=cut
-
-sub quit() {
-
-	$last_project_built = "";
-	$last_project_was_closed = 0;
-
-	my($evt) = do_event(qw/aevt quit/, $app);
-}
-
-
-sub _build ($;$) {
-	my($evt);
-	if ($_[1]) {
-		my($prm) =
-			q"'----':obj {form:name, want:type(TRGT), seld:TEXT(@), from:" .
-			AEPrint($_[0]) . '}';
-		$evt = do_event(qw/CWIE MAKE/, $app, $prm, $_[1]);
-	} else {
-		my($prm) = q"'----':" . AEPrint($_[0]);
-		$evt = do_event(qw/CWIE MAKE/, $app, $prm);
-	}
-}
-
-sub _remove_object ($;$) {
-	my($evt);
-	if ($_[1]) {
-		my($prm) =
-			q"'----':obj {form:name, want:type(TRGT), seld:TEXT(@), from:" .
-			AEPrint($_[0]) . '}';
-		$evt = do_event(qw/CWIE RMOB/, $app, $prm, $_[1]);
-	} else {
-		my($prm) = q"'----':" . AEPrint($_[0]);
-		$evt = do_event(qw/CWIE RMOB/, $app, $prm);
-	}
-}
-
-sub _open_file ($) {
-	my($prm) =
-		q"'----':obj {form:name, want:type(alis), " .
-		q"seld:TEXT(@), from:'null'()}";
-
-	do_event(qw/aevt odoc/, $app, $prm, $_[0]);
-}
-
-sub import_project ($$) {
-	my($xml_file, $project_path) = @_;
-	
-	my($prm) = "kocl:type(PRJD), rtyp:TEXT(@), data:TEXT(@), &subj:'null'()";
-	
-	my($evt) = do_event(qw/core crel/, $app, $prm, $project_path, $xml_file);    
-	my($result) = _get_event_result($evt);
-	
-	if ($result eq "") {
-		_close(_get_project($project_path));
-	}
-	return $result;
-}
-
-sub export_project ($$) {
-	my($project_path, $xml_out_path) = @_;
-	my($p, $project_was_closed);
-	
-	$project_was_closed = 0;
-	while (1) {
-		$p = _get_project($project_path);
-		if (!$p) {
-			if ($project_was_closed) {
-				print "### Error - request for project document failed after opening\n";
-				die "### possibly CW bug: be sure to close your Find window\n";
-}
-			$project_was_closed = 1;
-			_open_file($project_path);
-		} else {
-			last;
-		}
-	}
-
-    # avoid problems with the Project Messages window
-    _close_named_window("Project Messages");
-    
-	my($prm) =
-		q"'----':obj {form:indx, want:type(PRJD), " .
-		q"seld:1, from:'null'()}, kfil:TEXT(@)";
-
-	my($evt) = do_event(qw/CWIE EXPT/, $app, $prm, $xml_out_path);    
-	
-	if ($project_was_closed) {
-		$p = _get_project($project_path);
-		_close($p);
-	}
-	
-	return _get_event_result($evt);
-}
-
-sub _doc_named ($) {
-	my($prm) =
-		q"'----':obj {form:test, want:type(docu), from:'null'(), " .
-		q"seld:cmpd{relo:'=   ', 'obj1':obj {form:prop, want:type" .
-		q"(prop), seld:type(pnam), from:'exmn'()}, 'obj2':TEXT(@)}}";
-
-	my($evt) = do_event(qw/core getd/, $app, $prm, $_[0]);
-	return($evt->{REPLY} eq 'aevt\ansr{}' ? undef : $evt);
-}
-
-sub _full_path ($) {
-	my($obj) = $_[0];
-	my($prm) =
-		q"'----':obj {form:prop, want:type(prop), seld:type(FILE), " .
-		q"from:" . AEPrint($_[0]) . q"}, rtyp:type(TEXT)";
-	my($evt) = do_event(qw/core getd/, $app, $prm);
-
-	return MacPerl::MakePath(
-		MacUnpack('fss ', (
-			AEGetParamDesc($evt->{REP}, keyDirectObject()))->data()->get()
-		)
-	);
-}
-
-sub _save_errors_window ($) {
-	my($prm) = 
-		q"'----':obj {form:name, want:type(alis), seld:TEXT(@), from:'null'()}";
-	do_event(qw/MMPR SvMs/, $app, $prm, $_[0]);
-}
-
-
-sub _close_errors_window () {
-    return _close_named_window('Errors & Warnings');
-}
-
-
-sub _close_named_window ($) {
-    my($window_name) = @_;
-    
-	my($prm) =
-		q"'----':obj {form:name, want:type(cwin), " .
-		q"seld:TEXT(@), from:'null'()}";
-
-	my($evt) = do_event(qw/core clos/, $app, $prm, $window_name);
-	return($evt->{REPLY} eq 'aevt\ansr{}' ? 1 : 0);
-}
-
-sub _close () {
-	my($prm) = q"'----':" . AEPrint($_[0]);
-	do_event(qw/core clos/, $app, $prm);
-}
-
-sub _get_dobj ($) {
-	return(AEGetParamDesc($_[0]->{REP}, keyDirectObject()));
-}
-
-sub _get_folder ($$) {
-    require 'GUSI.ph';
-    my($prompt, $default) = @_;
-    MacPerl::Choose(
-        GUSI::AF_FILE(), 0, $prompt, '',
-        GUSI::CHOOSE_DIR() + ($default ? &GUSI::CHOOSE_DEFAULT : 0),
-        $default
-    );
-}
-
-sub _get_event_result ($)
-{
-    my($evt) = @_;
-
-    my($result) = $evt->{ERROR};
-    
-    if ( $result eq "" && $evt->{ERRNO} != 0 )
-    {
-        $result = "unknown error (".$evt->{ERRNO}.")";
-    }
-    
-    return $result;
-}
-
-
-sub _save_appath ($$) {
-
-	my($cwd) = cwd();	# remember the current working dir
-	chdir($scriptDir);	# change dir to the script dir
-
-	local(*F);
-	open(F, '>' . $_[0]) or die $!;
-	print F $_[1];
-	close(F);
-		
-	chdir($cwd);		# restore the cwd
-}
-
-sub _read_appath ($) {
-
-	my($filepath) = @_;
-
-	my($cwd) = cwd();	# remember the current working dir
-	chdir($scriptDir);	# change dir to the script dir
-	
-	if (! -e $filepath) {
-		return "";
-	}
-
-	local(*F);
-	open(F, $filepath);
-	my($appath) = <F>;
-	close(F);
-		
-	chdir($cwd);		# restore the cwd
-	return($appath);
-}
-
-
-sub _test ($) {
-	activate($ide_loc_file);
-	my($path) = $_[0];
-	build_project(
-	  "${path}modules:xml:macbuild:XML.mcp", '',
-	  "${path}build:mac:Mozilla.BuildLog.part"
-	);
-}
-
-1;
-
-=pod
-
-=back
-
-=head1 HISTORY
-
-=over 4
-
-=item v1.02, September 23, 1998
-
-Made fixes in finding and saving location of CodeWarrior IDE.
-
-=item v1.01, June 1, 1998
-
-Made fixes to C<chdir()> in C<activate()>, made C<activate()> more robust 
-in finding CodeWarrior IDE, added global variable to NOT switch to IDE
-for each sent event, a few other fixes.
-
-=item v1.00, May 30, 1998
-
-First shot
-
-=back
-
-
-=head1 AUTHORS
-
-Chris Nandor F<E<lt>pudge@pobox.comE<gt>>, and the author of the
-original I<CodeWarriorLib>, Scott Collins F<E<lt>scc@netscape.comE<gt>>.
-
-=head1 SEE ALSO
-
-BuildProject L<Moz>.
-
-=head1 COPYRIGHT
-
-The contents of this file are subject to the Netscape Public
-License Version 1.1 (the "License"); you may not use this file
-except in compliance with the License. You may obtain a copy of
-the License at http://www.mozilla.org/NPL/
-
-Software distributed under the License is distributed on an "AS
-IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
-implied. See the License for the specific language governing
-rights and limitations under the License.
-
-The Original Code is Mozilla Communicator client code, released
-March 31, 1998.
-
-The Initial Developer of the Original Code is Netscape
-Communications Corporation. Portions created by Netscape are
-Copyright (C) 1998-1999 Netscape Communications Corporation. All
-Rights Reserved.
-
-Contributor(s): 
-
-=cut

mozilla/build/mac/build_scripts/Moz/Jar.pm

@@ -1,573 +0,0 @@
-#!perl -w
-package Moz::Jar;
-
-#
-# Module for creating jar files, either using a jar manifest, or
-# simply jarring up folders on disk.
-#
-
-require 5.004;
-require Exporter;
-
-use strict;
-use Archive::Zip;
-use File::Path;
-
-use Mac::Files;
-
-use Moz::Moz;
-
-use vars qw( @ISA @EXPORT );
-
-@ISA        = qw(Exporter);
-@EXPORT     = qw(
-                    CreateJarFileFromDirectory
-                    CreateJarFromManifest
-                    WriteOutJarFiles
-                    SanityCheckJarOptions
-                );
-
-
-#-------------------------------------------------------------------------------
-# Add the contents of a directory to the zip file
-#
-#-------------------------------------------------------------------------------
-sub _addDirToJar($$$$)
-{
-    my($dir, $jar_root, $zip, $compress) = @_;
-
-    opendir(DIR, $dir) or die "Error: Cannot open dir $dir\n";
-    my @files = readdir(DIR);
-    closedir DIR;
-    
-    my $unix_jar_root = $jar_root;
-    $unix_jar_root =~ s|:|/|g;       # colon to slash conversion
-    
-    my $file;
-    
-    foreach $file (@files)
-    {        
-        my $filepath = $dir.":".$file;
-        
-        if (-d $filepath)
-        {
-            print "Adding files to jar from $filepath\n";            
-            _addDirToJar($filepath, $jar_root, $zip, $compress);
-        }
-        else
-        {
-            my $member = Archive::Zip::Member->newFromFile($filepath);
-            die "Error: Failed to create zip file member $filepath\n" unless $member;
-            
-            my $unixName = $filepath;
-            $unixName =~ s|:|/|g;               # colon to slash conversion
-            $unixName =~ s|^$unix_jar_root||;   # relativise
-            
-            $member->fileName($unixName);
-            
-            # print "Adding $file as $unixName\n";
-            
-            if ($compress) {
-                $member->desiredCompressionMethod(Archive::Zip::COMPRESSION_DEFLATED);            
-            } else {
-                $member->desiredCompressionMethod(Archive::Zip::COMPRESSION_STORED);
-            }
-            
-            $zip->addMember($member);
-        }
-    }
-}
-
-#-------------------------------------------------------------------------------
-# Add the contents of a directory to the zip file
-#
-#-------------------------------------------------------------------------------
-
-sub CreateJarFileFromDirectory($$$)
-{
-    my($srcdir, $jarpath, $compress) = @_;
-
-    my $zip = Archive::Zip->new();
-
-    _addDirToJar($srcdir, $srcdir, $zip, $compress);
-
-    print "Saving zip file...\n";
-    my $status = $zip->writeToFileNamed($jarpath);
-    if ($status == 0) {
-        print "Zipping completed successfully\n";
-    } else {
-        print "Error saving zip file\n";
-    }
-    
-    # set the file type/creator to something reasonable
-    MacPerl::SetFileInfo("ZIP ", "ZIP ", $jarpath);
-}
-
-
-#-------------------------------------------------------------------------------
-# printZipContents
-# 
-#-------------------------------------------------------------------------------
-sub printZipContents($)
-{
-    my($zip) = @_;
-
-    my(@members) = $zip->memberNames();
-    
-    print "Zip contains:\n";
-    
-    my($member);
-    foreach $member (@members)
-    {
-        print "  $member\n";
-    }
-}
-
-
-#-------------------------------------------------------------------------------
-# safeSaveJarFile
-# 
-# Archive::Zip has a problem where you cannot save a zip file on top of
-# an existing zip file that it has open, because it holds references
-# into that zip. So we have to save to a temp file, then do a swap.
-# 
-# Note that the zip will become invalid after this operation.
-# If you want to do further operations on it, you'll have to reread it.
-#-------------------------------------------------------------------------------
-sub safeSaveJarFile($$)
-{
-    my($zip, $full_dest_path) = @_;
-    
-    my($temp_file_name) = $full_dest_path."_temp";
-
-    ($zip->writeToFileNamed($temp_file_name) == Archive::Zip::AZ_OK) || die "Error: died writing jar to temp file $temp_file_name\n";
-    
-    unlink $full_dest_path;
-    
-    (rename $temp_file_name, $full_dest_path) || die "Error: Failed to rename $temp_file_name\n";
-    
-    MacPerl::SetFileInfo("ZIP ", "ZIP ", $full_dest_path);
-}
-
-
-#-------------------------------------------------------------------------------
-# addToJarFile
-# 
-# Add a file to a jar file
-#
-# Parameters:
-#   1. Jar ID. Unix path of jar file inside chrome.
-#   2. Abs path to jar.mn file (i.e. source)    (mac breaks)
-#   3. File source, relative to jar.mn path     (mac breaks)
-#   4. Abs path to the resulting .jar file      (mac breaks)
-#   5. Relative file path within the jar        (unix breaks)
-#   6. Reference to hash of jar files
-#
-#-------------------------------------------------------------------------------
-
-sub addToJarFile($$$$$$$)
-{
-    my($jar_id, $jar_man_dir, $file_src, $jar_path, $file_jar_path, $override, $jars) = @_;
-
-    # print "addToJarFile with:\n  $jar_man_dir\n  $file_src\n  $jar_path\n  $file_jar_path\n";
-
-    unless ($jar_path =~ m/(.+:)([^:]+)$/) { die "Error: Bad jar path $jar_path\n"; }
-    
-    my($target_dir) = $1;
-    my($jar_name) = $2;
-
-    $target_dir =~ s/[^:]+$//;
-    
-    # print "¥ $target_dir $jar_name\n";
-
-    # find the source file
-    my($src) = $jar_man_dir.":".$file_src;
-    if ((!-e $src) && ($file_src =~ m/.+:([^:]+)$/))    # src does not exist. Fall back to looking for src in jar.mn dir
-    {
-        $file_src = $1;
-        $src = $jar_man_dir.":".$file_src;
-        
-        if (!-e $src) {
-            die "Error: Can't find chrome file $src\n";
-        }
-    }
-    
-    if ($main::options{chrome_jars})
-    {
-        my($zip) = $jars->{$jar_id};
-        unless ($zip) { die "Error: Can't find Zip entry for $jar_id\n"; }
-        
-        # print "Adding $file_src to jar file $jar_path at $file_jar_path\n";
-        my($member) = Archive::Zip::Member->newFromFile($src);
-        unless ($member) { die "Error: Failed to create zip file member $src\n"; }
-
-        $member->fileName($file_jar_path);    
-    
-        my($compress) = 1;
-        if ($compress) {
-            $member->desiredCompressionMethod(Archive::Zip::COMPRESSION_DEFLATED);            
-            $member->desiredCompressionLevel(Archive::Zip::COMPRESSION_LEVEL_DEFAULT);   # defaults to 6
-        } else {
-            $member->desiredCompressionMethod(Archive::Zip::COMPRESSION_STORED);
-        }
-
-        my($old_member) = $zip->memberNamed($file_jar_path);
-        
-        if ($override)
-        {
-            if ($old_member)
-            {
-                # print "Overriding $file_jar_path in jar file $jar_id\n";
-                # need to compare mod dates or use the + here
-                $zip->removeMember($old_member);
-            }
-        
-            $zip->addMember($member);
-        }
-        else
-        {
-            if ($old_member)
-            {
-                #compare dates here
-                my($member_moddate) = $old_member->lastModTime();
-                my($file_moddate) = GetFileModDate($src);
-            
-                if ($file_moddate > $member_moddate)
-                {
-                    print "Updating older file $file_jar_path in $jar_id\n";
-                    $zip->removeMember($old_member);
-                    $zip->addMember($member);
-                }
-                else
-                {
-                    print "File $file_jar_path in $jar_id is more recent. Not updating.\n";
-                }
-            }
-            else
-            {
-                $zip->addMember($member);
-            }
-        }
-    }
-    
-    if ($main::options{chrome_files})  # we install raw files too
-    {
-        my($rel_path) = $file_jar_path;
-        $rel_path =~ s|/|:|g;       # slash to colons
-        
-        my($dir_name) = $jar_name;
-        $dir_name =~ s/\.jar$//;
-        
-        my($dst) = $target_dir.$dir_name.":".$rel_path;
-                
-        # print "Aliassing $src\n to\n$dst\n";        
-        if ($override)
-        {
-            unlink $dst;
-        MakeAlias($src, $dst);      # don't check errors, otherwise we fail on replacement
-    }
-        else
-        {
-            if (-e $dst)
-            {
-                #compare dates here
-                my($dst_moddate) = GetFileModDate($dst);
-                my($file_moddate) = GetFileModDate($src);
-            
-                if ($file_moddate > $dst_moddate)
-                {
-                    print "Updating older file $rel_path in $dir_name\n";
-                    unlink $dst;
-                    MakeAlias($src, $dst);
-                }
-                else
-                {
-                    print "File $file_jar_path in $jar_id is more recent. Not updating.\n";
-                }
-            
-            }
-            else
-            {
-                MakeAlias($src, $dst);
-            }
-        }
-        
-    }
-}
-
-
-#-------------------------------------------------------------------------------
-# setupJarFile
-# 
-# setup a zip for writing
-#-------------------------------------------------------------------------------
-
-sub setupJarFile($$$)
-{
-    my($jar_id, $dest_path, $jar_hash) = @_;
-
-    # print "Creating jar file $jar_id at $jar_path\n";
-    
-    my($jar_file) = $jar_id;
-    $jar_file =~ s|/|:|g;           # slash to colons
-    my($full_jar_path) = full_path_to($dest_path.":".$jar_file);
-
-    if ($main::options{chrome_jars})
-    {
-        my($zip) = $jar_hash->{$jar_id};
-        if (!$zip)      # if we haven't made it already, do so
-        {
-	        my($zip) = Archive::Zip->new();
-	        $jar_hash->{$jar_id} = $zip;
-
-            # does the jar file exist already? If so, read it in
-            if (-e $full_jar_path)
-            {
-                print "Reading in jar file $jar_id\n";
-                if ($zip->read($full_jar_path) != Archive::Zip::AZ_OK) { die "Error: Failed to re-read $full_jar_path\n"; }
-                
-                # printZipContents($zip);
-            }
-
-        }
-    }
-    else
-    {
-        # installing files.
-        # nothing to do. MakeAlias creates dirs as needed.
-
-	    # add this jar to the list
-	    $jar_hash->{$jar_id} = 1;
-    }
-}
-
-
-#-------------------------------------------------------------------------------
-# closeJarFile
-# 
-# We're done with this jar file _for this jar.mn_. We may add more entries
-# to it later, so keep it open in the hash.
-#-------------------------------------------------------------------------------
-sub closeJarFile($$)
-{
-    my($jar_path, $jar_hash) = @_;
-
-    # print "Closing jar file $jar_path\n";
-
-    if ($main::options{chrome_jars})
-    {
-    
-    }
-    else
-    {
-        # installing files.
-        # nothing to do
-    }
-}
-
-
-#-------------------------------------------------------------------------------
-# WriteOutJarFiles
-# 
-# Now we dump out the jars
-#-------------------------------------------------------------------------------
-sub WriteOutJarFiles($$)
-{
-    my($chrome_dir, $jars) = @_;
-
-    unless ($main::options{chrome_jars}) { return; }
-    
-    my($full_chrome_path) = full_path_to($chrome_dir);
-
-    my($key);
-    foreach $key (keys %$jars)
-    {
-        my($zip) = $jars->{$key};
-        
-        my($rel_path) = $key;
-        $rel_path =~ s/\//:/g;
-        
-        my($output_path) = $full_chrome_path.":".$rel_path;
-        
-        print "Writing zip file $key to $output_path\n";
-
-        # ensure the target dirs exist
-        my($path) = $output_path;
-        $path =~ s/[^:]+$//;
-        mkpath($path);
-        
-        # unlink $output_path;        # remove any existing jar
-        safeSaveJarFile($zip, $output_path);
-        # $zip is invalid after this operation, so nuke it here
-        $jars->{$key} = 0;
-    }
-}
-
-
-#-------------------------------------------------------------------------------
-# registerChromePackage
-# 
-# Enter a chrome package into the installed-chrome.txt file
-#-------------------------------------------------------------------------------
-sub registerChromePackage($$$$$$)
-{
-    my($jar_file, $file_path, $chrome_dir, $jar_hash, $chrome_type, $pkg_name) = @_;
-
-    my($manifest_subdir) = $jar_file;
-    $manifest_subdir =~ s/:/\//g;
-    
-    my($chrome_entry);
-    
-    if ($main::options{use_jars}) {
-        $chrome_entry = "$chrome_type,install,url,jar:resource:/chrome/$manifest_subdir!/$chrome_type/$pkg_name";
-    } else {
-        $manifest_subdir =~ s/\.jar$//;
-        $chrome_entry = "$chrome_type,install,url,resource:/chrome/$manifest_subdir/$chrome_type/$pkg_name";
-    }
-
-    # print "Entering $chrome_entry in installed-chrome.txt\n";
-    
-    # ensure chrome_dir exists
-    mkpath($chrome_dir);
-    
-    my($inst_chrome) = ${chrome_dir}.":installed-chrome.txt";
-    
-    if (open(CHROMEFILE, "<$inst_chrome")) {
-        while (<CHROMEFILE>) {
-            chomp;
-            if ($_ eq $chrome_entry) {
-                # $chrome_entry already appears in installed-chrome.txt file
-                # just update the mod date
-                my $now = time;
-                utime($now, $now, $inst_chrome) || die "Error: Couldn't touch $inst_chrome";
-                print "+++ updating chrome $inst_chrome\n+++\t\t$chrome_entry\n";
-                close(CHROMEFILE) || die "Error: can't close $inst_chrome: $!";
-                return 0;
-            }
-        }
-        close(CHROMEFILE) || die "Error: can't close $inst_chrome: $!";
-    }
-    open(CHROMEFILE, ">>${inst_chrome}") || die "Error: Failed to open $inst_chrome\n";
-    print(CHROMEFILE "${chrome_entry}\n");
-    close(CHROMEFILE) || die "Error: Failed to close $inst_chrome\n";
-    print "+++ adding chrome $inst_chrome\n+++\t\t$chrome_entry\n";
-}
-
-#-------------------------------------------------------------------------------
-# Create or add to a jar file from a jar.mn file.
-# Both arguments are relative to the mozilla root dir.
-#
-#
-#-------------------------------------------------------------------------------
-sub CreateJarFromManifest($$$)
-{
-    my($jar_man_path, $dest_path, $jars) = @_;
-    
-    if ($main::options{chrome_jars}) {
-        print "Jarring from $jar_man_path\n";
-    }
-    if ($main::options{chrome_files}) {
-        print "Installing files from $jar_man_path\n";
-    }
-
-    $jar_man_path = full_path_to($jar_man_path);
-    $dest_path = full_path_to($dest_path);
-
-    # if the jars hash is empty, nuke installed-chrome.txt
-    if (! scalar(%$jars))
-    {
-        print "Nuking installed-chrome.txt\n";
-	    my($installed_chrome) = $dest_path.":installed-chrome.txt";
-	    # unlink $installed_chrome;
-    }
-    
-    my $jar_man_dir = "";
-    my $jar_man_file = "";
-    
-    if ($jar_man_path =~ /(.+):([^:]+)$/)
-    {
-        $jar_man_dir = $1;      # no trailing :
-        $jar_man_file = $2;
-    }
-
-    # Keep a hash of jar files, keyed on relative jar path (e.g. "packages/core.jar")
-    # Entries are open Archive::Zips (if zipping), and installed-chrome entries.
-    
-    my($jar_id) = "";       # Current foo/bar.jar from jar.mn file
-    my($jar_file) = "";     # relative path to jar file (from $dest_path), with mac separators
-    my($full_jar_path);
-    
-    open(FILE, "<$jar_man_path") || die "Error: could not open \"$jar_man_path\": $!";
-    while (<FILE>)
-    {
-        my($line) = $_;
-        chomp($line);
-        
-        # print "$line\n";
-        
-        if ($line =~ /^\s*\#.*$/) {     # skip comments
-            next;
-        }
-        
-        if ($line =~/^([\w\d.\-\_\\\/]+)\:\s*$/)                                  # line start jar file entries
-        {
-            $jar_id = $1;
-            $jar_file = $jar_id;
-            $jar_file =~ s|/|:|g;           # slash to colons
-            $full_jar_path = $dest_path.":".$jar_file;
-                        
-            setupJarFile($jar_id, $dest_path, $jars);
-
-        }
-        elsif ($line =~ /^(\+?)\s+([\w\d.\-\_\\\/]+)\s*(\([\w\d.\-\_\\\/]+\))?$\s*/)     # jar file entry
-        {
-            my($override) = ($1 eq "+");
-            my($file_dest) = $2;
-            my($file_src) = $3;
- 
-            if ($file_src) {  
-                $file_src = substr($file_src, 1, -1);      #strip the ()
-            } else {
-                $file_src = $file_dest;
-            }
-            
-            $file_src =~ s|/|:|g;
-            
-            if ($jar_file ne "")    # if jar is open, add to jar
-            {
-                if ($file_dest =~ /([\w\d.\-\_]+)\/([\w\d.\-\_\\\/]+)contents.rdf/)
-                {
-                    my $chrome_type = $1;
-                    my $pkg_name = $2;
-                    registerChromePackage($jar_file, $file_dest, $dest_path, $jars, $chrome_type, $pkg_name);
-                }
-                
-                addToJarFile($jar_id, $jar_man_dir, $file_src, $full_jar_path, $file_dest, $override, $jars);
-            }
-            else
-            {
-                die "Error: bad jar.mn format at $line\n";
-            }
-        }
-        elsif ($line =~ /^\s*$/ )                                               # blank line
-        {
-            if ($jar_file ne "")    #if a jar file is open, close it
-            {
-                closeJarFile($full_jar_path, $jars);
-                
-                $jar_file = "";
-                $full_jar_path = "";
-            }
-        }
-    }
-    
-    close(FILE);
-
-    if ($jar_file ne "")    #if a jar file is open, close it
-    {
-        closeJarFile($full_jar_path, $jars);
-    }
-
-}
-
-1;

mozilla/build/mac/build_scripts/Moz/MacCVS.pm

@@ -1,228 +0,0 @@
-#!perl -w
-package Moz::MacCVS;
-
-# package Mac::Apps::MacCVS; this should really be the name of the package
-# but due to our directory hierarchy in mozilla, I am not doing it
-
-require 5.004;
-require Exporter;
-
-use strict;
-use Exporter;
-
-use vars qw($VERSION @ISA @EXPORT);
-
-use Cwd;
-
-use File::Basename;
-
-use Mac::StandardFile;
-use Mac::AppleEvents;
-use Mac::AppleEvents::Simple;
-
-@ISA        = qw(Exporter);
-@EXPORT     = qw(new describe checkout update);
-$VERSION = "1.00";
-
-# If you want to understand the gobbldeygook that's used to build Apple Events,
-# you should start by reading the AEGizmos documentation.
-
-
-# Architecture:
-# cvs session object:
-# name - session name
-# session_file - session file
-# 
-# 
-
-my($last_error) = 0;
-my($gAppSig)    = 'Mcvs';   # MacCVS Pro
-
-#
-# utility routines
-#
-
-
-sub _checkForEventError($)
-{
-  my($evt) = @_;
-
-  if ($evt->{ERRNO} != 0)
-  {
-    print STDERR "Error. Script returned '$evt->{ERROR} (error $evt->{ERRNO})\n";
-    $last_error = $evt->{ERRNO};
-    return 0;
-  }
-  
-  return 1; # success
-}
-
-
-#
-# Session object methods
-#
-
-sub new
-{
-  my ( $proto, $session_file) = @_;
-  my $class = ref($proto) || $proto;
-  my $self = {};
-
-  if ( defined($session_file) && ( -e $session_file) )
-  {
-    $self->{"name"} = basename( $session_file );
-    $self->{"session_file"} = $session_file;
-    bless $self, $class;
-    return $self;
-  }
-  else
-  {
-    print STDERR "MacCVS->new cvs file < $session_file > does not exist\n";
-    return;
-  }
-}
-
-# makes sure that the session is open
-# assertSessionOpen()
-# returns 1 on success
-sub assertSessionOpen()
-{
-  my ($self) = shift;
-
-  $last_error = 0;
-
-  my($prm) =
-    q"'----':obj {form:name, want:type(alis), seld:TEXT(@), from:'null'()}";
-
-  my($evt) = do_event(qw/aevt odoc/, $gAppSig, $prm, $self->{session_file});
-  return _checkForEventError($evt);
-}
-
-# prints the cvs object, used mostly for debugging
-sub describe
-{
-  my($self) = shift;
-  $last_error = 0;
-  print "MacCVS:: name: ", $self->{name}, " session file: ", $self->{session_file}, "\n";
-}
-
-# checkout( self, module, revision, date)
-# MacCVS checkout command
-# returns 1 on success.
-sub checkout()
-{
-  my($self, $module, $revision, $date ) = @_;
-  unless( defined ($module) ) { $module = ""; } # get rid of the pesky undefined warnings
-  unless( defined ($revision) ) { $revision = ""; }
-  unless( defined ($date) ) { $date = ""; }
-
-  $last_error = 0;
-    
-  $self->assertSessionOpen() || die "Error: failed to open MacCVS session file at $self->{session_file}\n";
-  
-  my($revstring) = ($revision ne "") ? $revision : "(none)";
-  my($datestring) = ($date ne "") ? $date : "(none)";
-  
-  print "Checking out $module with revision $revstring, date $datestring\n";
-
-  my($prm) =
-    q"'----':obj {form:name, want:type(docu), seld:TEXT(@), from:'null'()}, ".
-    q"modl:'TEXT'(@), tagr:'TEXT'(@), tagd:'TEXT'(@) ";
-  
-  my($evt) = do_event(qw/MCvs cout/, $gAppSig, $prm, $self->{name}, $module, $revision, $date);
-  return _checkForEventError($evt);
-}
-
-
-# update( self, branch tag, list of paths)
-# MacCVS udate command
-# returns 1 on success.
-# NOTE: MacCVS Pro does not correctly support this stuff yet (as of version 2.7d5).
-sub update()
-{
-  my($self, $branch, $paths ) = @_;
-
-  $last_error = 0;
-    
-  $self->assertSessionOpen() || die "Error: failed to open MacCVS session file at $self->{session_file}\n";
-
-  if ($branch eq "HEAD") {
-    $branch = "";
-  }
-  
-  my($paths_list) = "";
-  
-  my($path);
-  foreach $path (@$paths)
-  {
-    if ($paths_list ne "") {
-      $paths_list = $paths_list.", ";
-    }
-    
-    $paths_list = $paths_list."Ò".$path."Ó";
-  }
-    
-  my($prm) =
-    q"'----':obj {form:name, want:type(docu), seld:TEXT(@), from:'null'()}, ".
-    q"tagr:'TEXT'(@), tFls:[";
-
-  $prm = $prm.$paths_list."]";
-    
-  my($evt) = do_event(qw/MCvs updt/, $gAppSig, $prm, $self->{name}, $branch);
-  return _checkForEventError($evt);
-};
-
-
-sub getLastError()
-{
-  return $last_error;
-}
-
-1;
-=pod
-
-=head1 NAME
-
-MacCVS - Interface to MacCVS
-
-=head1 SYNOPSIS
-
-  use MacCVS;
-  $session = MacCVS->new( <session_file_path>) || die "cannot create session";
-  $session->checkout([module] [revision] [date]) || die "Could not check out";
-    
-=head1 DESCRIPTION
-
-This is a MacCVS interface for talking to MacCVS Pro client.
-MacCVSSession is the class used to manipulate the session
-
-=item new
-  MacCVS->new( <cvs session file path>);
-  
-  Creates a new session. Returns undef on failure.
-
-=item checkout( <module> [revision] [date] )
-
-  cvs checkout command. Revision and date are optional
-  returns 0 on failure
-  
-=cut
-
-=head1 SEE ALSO
-
-=over
-
-=item MacCVS Home Page
-
-http://www.maccvs.org/
-
-=back 
-
-=head1 AUTHORS
-
-Aleks Totic atotic@netscape.com
-Simon Fraser sfraser@netscape.com
-
-=cut
-
-__END__

mozilla/build/mac/build_scripts/Moz/Moz.pm

@@ -1,603 +0,0 @@
-=head1 NAME
-
-B<Moz> - routines for automating CodeWarrior builds, and some extra-curricular
-activities related to building Mozilla
-
-=head1 SYNOPSIS
-
-    use Moz;
-
-    OpenErrorLog(":::BuildLog");
-    StopForErrors();
-
-		$Moz::QUIET = 1;
-		InstallFromManifest(":projects:MANIFEST", $dist_dir);
-
-    BuildProjectClean(":projects:SomeProject.mcp", "SomeTarget");
-    MakeAlias(":projects:SomeProject.shlb", $dist_dir);
-
-    DontStopForErrors();
-
-    BuildProject(":projects:SomeOtherProject.mcp", "SomeTarget");
-
-=head1 DESCRIPTION
-
-B<Moz> comprises the routines needed to slap CodeWarrior around, force it
-to build a sequence of projects, report the results, and a few other things.
-This module should only contain functions that are generic to any build,
-not just the Mozilla build.
-
-=cut
-
-
-package			Moz::Moz;
-require			Exporter;
-
-use Cwd;
-
-use File::Copy;
-use File::Path;
-use File::Basename;
-
-use Mac::Types;
-use Mac::Events;
-use Mac::Processes;
-
-use ExtUtils::Manifest 'maniread';
-
-use Moz::CodeWarriorLib;
-
-@ISA				= qw(Exporter);
-
-@EXPORT			= qw( LaunchCodeWarrior
-                  GetCodeWarriorRelativePath
-                  current_directory
-                  full_path_to
-                  DoBuildProject
-                  ImportXMLProject
-                  ExportProjectToXML
-                  OpenErrorLog
-                  MakeAlias
-                  GetFileModDate
-                  StopForErrors
-                  DontStopForErrors
-                  InstallFromManifest
-                  InstallResources
-                  RedirectOutputToFile
-                  Delay
-                  ActivateApplication
-                  IsProcessRunning);
-
-@EXPORT_OK	= qw(CloseErrorLog QUIET);
-
-
-sub current_directory()
-	{
-		my $current_directory = cwd();
-		chop($current_directory) if ( $current_directory =~ m/:$/ );
-		return $current_directory;
-	}
-
-sub full_path_to($)
-	{
-		my ($path) = @_;
-		if ( $path =~ m/^[^:]+$/ )
-			{
-				$path = ":" . $path;
-			}
-
-		if ( $path =~ m/^:/ )
-			{
-				$path = current_directory() . $path;
-			}
-
-		return $path;
-	}
-
-$logging								= 0;
-$recent_errors_file			= "";
-$stop_on_1st_error			= 1;
-$QUIET									= 0;
-
-
-
-=head2 Logging all the errors and warnings - C<OpenErrorLog($log_file)>, C<CloseErrorLog()>
-
-The warnings and errors generated in the course of building projects can be logged to a file.
-Tinderbox uses this facility to show why a remote build failed.
-
-Logging is off by default.
-  Start logging at any point in your build process with C<OpenErrorLog($log_file)>.
-  Stop with C<CloseErrorLog()>.
-  You never need to close the log explicitly, unless you want to just log a couple of projects in the middle of a big list.
-  C<CloseErrorLog()> is not exported by default. 
-
-=cut
-
-sub CloseErrorLog()
-	{
-		if ( $logging )
-			{
-				close(ERROR_LOG);
-				$logging = 0;
-				StopForErrors() if $stop_on_1st_error;
-			}
-	}
-
-
-
-sub OpenErrorLog($)
-	{
-		my ($log_file) = @_;
-
-		CloseErrorLog();
-		if ( $log_file )
-			{
-				$log_file = full_path_to($log_file);
- 
-				open(ERROR_LOG, ">$log_file") || die "Error: Can't open $log_file\n";
-				MacPerl::SetFileInfo("CWIE", "TEXT", $log_file);
-
-				$log_file =~ m/.+:(.+)/;
-				$recent_errors_file = full_path_to("$1.part");
-				$logging = 1;
-			}
-	}
-
-
-=head2 Stopping before it's too late - C<StopForErrors()>, C<DontStopForErrors()>
-
-When building a long list of projects, you decide whether to continue building subsequent projects when one fails.
-  By default, your build script will C<die> after the first project that generates an error while building.
-  Change this behavior with C<DontStopForErrors()>.
-  Re-enable it with C<StopForErrors()>.
-
-=cut
-
-sub StopForErrors()
-	{
-		$stop_on_1st_error = 1;
-		
-			# Can't stop for errors unless we notice them.
-			# Can't notice them unless we are logging.
-			# If the user didn't explicitly request logging, log to a temporary file.
-
-		if ( ! $recent_errors_file )
-			{
-				OpenErrorLog("${TMPDIR}BuildResults");
-			}
-	}
-
-sub DontStopForErrors()
-	{
-		$stop_on_1st_error = 0;		
-	}
-
-sub log_message($)
-	{
-		if ( $logging )
-			{
-				my ($message) = @_;
-				print ERROR_LOG $message;
-			}
-	}
-
-sub log_message_with_time($)
-	{
-		if ( $logging )
-			{
-				my ($message) = @_;
-				my $time_stamp = localtime();
-				log_message("$message ($time_stamp)\n");
-			}
-	}
-
-sub log_recent_errors($)
-	{
-		my ($project_name) = @_;
-		my $found_errors = 0;
-	
-		if ( $logging )
-			{
-				open(RECENT_ERRORS, "<$recent_errors_file");
-
-				while( <RECENT_ERRORS> )
-					{
-						if ( /^Error/ || /^CouldnÕt find project file/ || /^Link Error/ )
-							{
-#								if (!$found_errors)
-#									print $_;
-								$found_errors = 1;
-							}
-						print ERROR_LOG $_;
-					}
-
-				close(RECENT_ERRORS);
-				unlink("$recent_errors_file");
-			}
-		
-		if ( $stop_on_1st_error && $found_errors )
-			{
-				print ERROR_LOG "### Build failed.\n";
-				die "### Errors encountered building \"$project_name\".\n";
-			}
-	}
-	
-sub DoBuildProject($$$)
-	{
-		my ($project_path, $target_name, $clean_build) = @_;
-		$project_path = full_path_to($project_path);
-
-#		$project_path =~ m/.+:(.+)/;
-#		my $project_name = $1;
-
-		log_message_with_time("### Building \"$project_path\"");
-
-			# Check that the given project exists
-		if (! -e $project_path)
-			{
-				print ERROR_LOG "### Build failed.\n";
-				die "### Can't find project file \"$project_path\".\n";
-			}
-		
-		print "Building \"$project_path\[$target_name\]\"\n";
-		
-		$had_errors = Moz::CodeWarriorLib::build_project(
-			$project_path, $target_name, $recent_errors_file, $clean_build
-		);
-		WaitNextEvent();
-
-#		$had_errors =
-#MacPerl::DoAppleScript(<<END_OF_APPLESCRIPT);
-#	tell (load script file "$CodeWarriorLib") to BuildProject("$project_path", "$project_name", "$target_name", "$recent_errors_file", $clean_build)
-#END_OF_APPLESCRIPT
-
-			# Append any errors to the globally accumulated log file
-#		if ( $had_errors ) # Removed this test, because we want warnings, too.  -- jrm
-			{
-				log_recent_errors($project_path);
-			}
-	}
-
-
-sub ImportXMLProject($$)
-{
-    my ($xml_path, $project_path) = @_;
-
-#    my ($codewarrior_ide_name) = Moz::CodeWarriorLib::getCodeWarriorIDEName();
-#    my $ascript = <<EOS;
-#      tell application "$codewarrior_ide_name"
-#        make new (project document) as ("$project_path") with data ("$xml_path")
-#      end tell
-#EOS
-#    print $ascript."\n";
-#    my($result) = MacPerl::DoAppleScript($ascript);
-#    unless ($result) { die "Error: ImportXMLProject AppleScript failed $^E $result\n";  }
-#    
-
-    my($import_error) = Moz::CodeWarriorLib::import_project($xml_path, $project_path);
-    if ($import_error ne "") {
-      die "Error: ImportXMLProject failed with error $import_error\n";
-    }
-}
-
-sub ExportProjectToXML($$)
-{
-    my ($project_path, $xml_path) = @_;
-
-    my (@suffix_list) = (".mcp");
-    my ($project_name, $project_dir, $suffix) = fileparse($project_path, @suffix_list);
-    if ($suffix eq "") { die "Project: $project_path doesn't look like a project file.\n"; }
-    
-    if (-e $xml_path) {
-        print "$xml_path exists - not exporting $project_path\n";
-    }
-    else {
-        print "Exporting $project_path to $xml_path\n";
-        my($export_error) = Moz::CodeWarriorLib::export_project($project_path, $xml_path);
-        if ($export_error ne "") {
-            die "Error: export_project failed with error '$export_error'\n";
-        }
-        
-        if (! -e $xml_path) {
-          die "Error: XML export to $xml_path failed\n";
-        }
-    }
-}
-
-
-=head2 Miscellaneous
-
-C<MakeAlias($old_file, $new_file)> functions like C<symlink()>, except with better argument defaulting and more explicit error messages.
-
-=cut
-
-sub MakeAlias($$)
-	{
-		my ($old_file, $new_file) = @_;
-
-			# if the directory to hold $new_file doesn't exist, create it
-		if ( ($new_file =~ m/(.+:)/) && !-d $1 )
-			{
-				mkpath($1);
-			}
-
-			# if a leaf name wasn't specified for $new_file, use the leaf from $old_file
-		if ( ($new_file =~ m/:$/) && ($old_file =~ m/.+:(.+)/) )
-			{
-				$new_file .= $1;
-			}
-
-		my $message = "Can't create a Finder alias (at \"$new_file\")\n for \"$old_file\"; because ";
-
-		die "Error: $message \"$old_file\" doesn't exist.\n" unless -e $old_file;
-		die "Error: $message I won't replace an existing (non-alias) file with an alias.\n" if ( -e $new_file && ! -l $new_file );
-
-			# now: $old_file exists; $new_file doesn't (or else, is an alias already)
-
-		if ( -l $new_file )
-			{
-					# ...then see if it already points to $old_file
-				my $current_target	= full_path_to(readlink($new_file));
-				my $new_target			= full_path_to($old_file);
-
-				return if ( $current_target eq $new_target );
-					# if the desired alias already exists and points to the right thing, then we're done
-				
-				unlink $new_file;
-			}
-		
-		symlink($old_file, $new_file) || die "Error: $message symlink returned an unexpected error.\n";
-	}
-	
-	
-=pod
-
-C<InstallFromManifest()>
-
-=cut
-
-sub InstallFromManifest($;$$)
-	{
-		my ($manifest_file, $dest_dir, $flat) = @_;
-		
-		$flat = 0 unless defined($flat); # if $flat, all rel. paths in MANIFEST get aliased to the root of $dest_dir
-
-		$dest_dir ||= ":";
-
-		$manifest_file =~ m/(.+):/;
-		my $source_dir =  $1;
-
-		chop($dest_dir) if $dest_dir =~ m/:$/;
-
-		#Mac::Events->import();
-		WaitNextEvent();
-		if ($flat)
-		{
-			print "Doing manifest on \"$manifest_file\" FLAT\n" unless $QUIET;
-		}
-		else
-		{
-			print "Doing manifest on \"$manifest_file\"\n" unless $QUIET;
-		}
-		
-		my $read = maniread(full_path_to($manifest_file));
-		foreach $file (keys %$read)
-			{
-				next unless $file;
-
-				$subdir = ":";
-				if (!$flat && ($file =~ /:.+:/ ))
-					{
-						$subdir = $&;
-					}
-
-				$file = ":$file" unless $file =~ m/^:/;
-				MakeAlias("$source_dir$file", "$dest_dir$subdir");
-			}
-	}
-
-
-=pod
-
-C<InstallResources()>
-
-=cut
-
-# parameters are path to MANIFEST file, destination dir, true (to make copies) or false (to make aliases)
-sub InstallResources($;$;$)
-	{
-		my ($manifest_file, $dest_dir, $copy_files) = @_;
-
-		$dest_dir ||= ":";
-		mkpath($dest_dir) if !-d $dest_dir;
-
-		$manifest_file =~ m/(.+):/;
-		my $source_dir =  $1;
-
-		chop($dest_dir) if $dest_dir =~ m/:$/;
-
-		WaitNextEvent();
-		print "Installing resources from \"$manifest_file\"\n" unless $QUIET;
-		
-		my $read = maniread(full_path_to($manifest_file));
-		foreach $file (keys %$read)
-			{
-				next unless $file;
-				
-				if ($copy_files)
-					{
-						copy("$source_dir:$file", "$dest_dir:$file");
-					}
-				else
-					{
-						MakeAlias("$source_dir:$file", "$dest_dir:$file");
-					}
-			}
-	}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// Delay
-#//--------------------------------------------------------------------------------------------------
-sub Delay($)		
-{
-  my ($delay_seconds) = @_;
-
-  $now = time;
-  
-  $exit_time = $now + $delay_seconds;
-
-  while ($exit_time > $now) {
-     $now = time;
-  }
-	
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// GetFileModDate
-#//--------------------------------------------------------------------------------------------------
-sub GetFileModDate($)
-{
-    my($filePath)=@_;
-    my($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
-        $atime,$mtime,$ctime,$blksize,$blocks) = stat($filePath);
-    return $mtime;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// LaunchCodeWarrior
-#//--------------------------------------------------------------------------------------------------
-sub LaunchCodeWarrior($)
-{
-  my($idepath_file) = @_;   # full path to IDE location file
-  my($cur_dir) = cwd();
-  
-  # this both launches and writes the IDE path file
-  Moz::CodeWarriorLib::activate($idepath_file);
-  
-  chdir($cur_dir);
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// GetCodeWarriorRelativePath
-#//--------------------------------------------------------------------------------------------------
-sub GetCodeWarriorRelativePath($)
-{
-  my($rel_path) = @_;
-  return Moz::CodeWarriorLib::getCodeWarriorPath($rel_path);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// RedirectOutputToFile
-#//--------------------------------------------------------------------------------------------------
-sub RedirectOutputToFile($)
-{
-    my($log_file) = @_;
-    
-    # ensure that folders in the path exist
-    my($logdir) = "";
-    my($logfile) = $log_file;
-    
-    if ($log_file =~ /(.+?:)([^:]+)$/)       # ? for non-greedy match
-    {
-        $logdir = $1;
-        $logfile = $2;
-        
-        mkpath($logdir);
-    }
-
-    print "Output is now being redirected to the file '$log_file'\n";
-    
-    open(STDOUT, "> $log_file") || die "Can't redirect stdout";
-    open(STDERR, ">&STDOUT") || die "Can't dup stdout";
-    select(STDERR); $| = 1;     # make unbuffered
-    select(STDOUT); $| = 1;     # make unbuffered
-    
-    MacPerl::SetFileInfo("CWIE", "TEXT", $log_file);
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// ActivateApplication
-#//--------------------------------------------------------------------------------------------------
-
-sub ActivateApplication($)
-{
-	my ($appSignature) = @_;
-	my ($psi, $found);
-	my ($appPSN);
-	
-	$found = 0;
-		
-	foreach $psi (values(%Process))
-	{
-		if ($psi->processSignature() eq $appSignature)
-		{
-			$appPSN = $psi->processNumber();
-			$found = 1;
-            last;
-		}
-	}
-
-	if ($found == 0 || SameProcess($appPSN, GetFrontProcess()))
-	{
-		return;
-	}
-
-	SetFrontProcess($appPSN);
-
-	while (GetFrontProcess() != $appPSN)
-	{
-		WaitNextEvent();
-	}
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// IsProcessRunning
-#//--------------------------------------------------------------------------------------------------
-
-sub IsProcessRunning($)
-{
-    my($processName, $psn, $psi) = @_;
-    while ( ($psn, $psi) = each(%Process) ) {
-     if ($psi->processName eq $processName) { return 1; }
-    }
-    return 0;
-}
-
-
-1;
-
-=head1 AUTHORS
-
-Scott Collins <scc@netscape.com>, Simon Fraser <sfraser@netscape.com>, Chris Yeh <cyeh@netscape.com>
-
-=head1 SEE ALSO
-
-BuildMozillaDebug.pl (et al), BuildList.pm, CodeWarriorLib (an AppleScript library)
-
-=head1 COPYRIGHT
-
-The contents of this file are subject to the Netscape Public
-License Version 1.1 (the "License"); you may not use this file
-except in compliance with the License. You may obtain a copy of
-the License at http://www.mozilla.org/NPL/
-
-Software distributed under the License is distributed on an "AS
-IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
-implied. See the License for the specific language governing
-rights and limitations under the License.
-
-The Original Code is Mozilla Communicator client code, released
-March 31, 1998.
-
-The Initial Developer of the Original Code is Netscape
-Communications Corporation. Portions created by Netscape are
-Copyright (C) 1998-1999 Netscape Communications Corporation. All
-Rights Reserved.
-
-Contributor(s): 
-
-=cut

mozilla/build/mac/build_scripts/Moz/Prefs.pm

@@ -1,272 +0,0 @@
-
-package Moz::Prefs;
-
-require 5.004;
-require Exporter;
-
-# Package that attempts to read a file from the Preferences folder,
-# and get build settings out of it
-
-use strict;
-
-use Exporter;
-use File::Path;
-
-use Mac::Files;
-
-use vars qw(@ISA @EXPORT);
-
-@ISA		  = qw(Exporter);
-@EXPORT 	= qw(ReadMozUserPrefs);
-
-
-#-------------------------------------------------------------------------------
-#
-# GetPrefsFolder
-#
-#-------------------------------------------------------------------------------
-
-sub GetPrefsFolder()
-{
-  my($prefs_folder) = FindFolder(kOnSystemDisk, kPreferencesFolderType, 1);
-  return $prefs_folder.":Mozilla build prefs";
-}
-
-
-#-------------------------------------------------------------------------------
-#
-# SetArrayValue
-#
-#-------------------------------------------------------------------------------
-sub SetArrayValue($$$)
-{
-  my($array_ref, $index1, $index2) = @_;
-
-  my($index);
-  foreach $index (@$array_ref)
-  {
-    if ($index->[0] eq $index1)
-    {
-      $index->[1] = $index2;
-      return 1;
-    }
-  }
-  
-  return 0;
-}
-
-
-#-------------------------------------------------------------------------------
-#
-# WriteDefaultPrefsFile
-#
-#-------------------------------------------------------------------------------
-
-sub WriteDefaultPrefsFile($)
-{
-  my($file_path) = @_;
-
-  my($file_contents);
-  $file_contents = <<'EOS';
-% You can use this file to customize the Mozilla build system.
-% The following kinds of lines are allowable:
-%   Comment lines, which start with a '%' in the first column
-%   Lines which modify the default build settings. For the list of flags,
-%   see MozBuildFlags.pm. Examples are:
-%
-%    build       pull            0                    % don't pull
-%    options     mng             1                    % turn mng on
-%   
-%   Line containing the special 'buildfrom' flag, which specifies
-%   where to start the build. Example:
-%   
-%    buildfrom   nglayout                % where to start the build
-%
-%   Lines which specify the location of the files used to store paths
-%   to the CodeWarrior IDE, and the MacCVS Pro session file. Note quoting
-%   of paths containing whitespace. Examples:
-%
-%    filepath   idepath         ::codewarrior.txt
-%    filepath   sessionpath     ":Some folder:MacCVS session path.txt"
-%
-%   Lines which modify the build settings like %main::DEBUG.
-%   Any lines which do not match either of the above are assumed
-%   to set variables on $main::. Examples:
-%   
-%    MOZILLA_OFFICIAL    1
-%
-EOS
-
-  $file_contents =~ s/%/#/g;
-   
-  local(*PREFS_FILE);
-
-  open(PREFS_FILE, "> $file_path") || die "Could not write default prefs file\n";
-  print PREFS_FILE ($file_contents);
-  close(PREFS_FILE);
-
-  MacPerl::SetFileInfo("McPL", "TEXT", $file_path);
-}
-
-
-#-------------------------------------------------------------------------------
-#
-# HandlePrefSet
-#
-#-------------------------------------------------------------------------------
-sub HandlePrefSet($$$$)
-{
-  my($flags, $name, $value, $desc) = @_;
-
-  if (SetArrayValue($flags, $name, $value)) {
-    print "Prefs set $desc flag '$name' to '$value'\n";
-  } else {
-    die "$desc setting '$name' is not a valid option\n";
-  }
-
-}
-
-
-#-------------------------------------------------------------------------------
-#
-# HandleBuildFromPref
-#
-#-------------------------------------------------------------------------------
-sub HandleBuildFromPref($$)
-{
-  my($build_array, $name) = @_;
-
-  my($setting) = 0;
-  my($index);
-  foreach $index (@$build_array)
-  {
-    if ($index->[0] eq $name) {
-      $setting = 1;
-    }
-    
-    $index->[1] = $setting;    
-  }
-
-  if ($setting == 1) {
-    print "Building from $name onwards, as specified by prefs\n";
-  } else {
-    printf "Failed to find buildfrom setting '$name'\n";
-  }
-}
-
-
-#-------------------------------------------------------------------------------
-#
-# ReadPrefsFile
-#
-#-------------------------------------------------------------------------------
-
-sub ReadPrefsFile($$$$$)
-{
-  my($file_path, $build_flags, $options_flags, $filepath_flags, $create_if_missing) = @_;
-  
-  local(*PREFS_FILE);
-  
-  if (open(PREFS_FILE, "< $file_path"))
-  {
-    print "Reading build prefs from '$file_path'\n";
-  
-    while (<PREFS_FILE>)
-    {
-      my($line) = $_;
-      chomp($line);
-      
-      if ($line =~ /^\#/ || $line =~ /^\s*$/) {    # ignore comments and empty lines
-        next;
-      }
-            
-      if (($line =~ /^\s*([^#\s]+)\s+([^#\s]+)\s+\"(.+)\"(\s+#.+)?/) ||
-          ($line =~ /^\s*([^#\s]+)\s+([^#\s]+)\s+\'(.+)\'(\s+#.+)?/) ||
-          ($line =~ /^\s*([^#\s]+)\s+([^#\s]+)\s+([^#\s]+)(\s+#.+)?/))
-      {
-        my($array_name) = $1;      
-        my($option_name) = $2;
-        my($option_value) = $3;      
-      
-        # print "Read '$array_name' '$option_name' '$option_value'\n";
-        
-        if ($array_name eq "build")
-        {
-          HandlePrefSet($build_flags, $option_name, $option_value, "Build");
-        }
-        elsif ($array_name eq "options")
-        {
-          HandlePrefSet($options_flags, $option_name, $option_value, "Options");
-        }
-        elsif ($array_name eq "filepath" && $option_name && $option_value)
-        {
-          HandlePrefSet($filepath_flags, $option_name, $option_value, "Filepath");
-        }
-        else
-        {
-          print "Unknown pref option at $line\n";
-        }
-      }
-      elsif ($line =~ /^\s*buildfrom\s+([^#\s]+)(\s+#.+)?/)
-      {
-        my($build_start) = $1;
-        HandleBuildFromPref($build_flags, $build_start);
-      }
-      elsif ($line =~ /^\s*([^#\s]+)\s+([^#\s]+)(\s+#.+)?/)
-      {
-        my($build_var) = $1;
-        my($var_setting) = $2;
-        
-        print "Setting \$main::$build_var to $var_setting\n";
-        eval "\$main::$build_var = \"$var_setting\"";
-      }
-      else
-      {
-        print "Unrecognized input line at $line\n";
-      }
-      
-    }
-    
-    close(PREFS_FILE);  
-  }
-  elsif ($create_if_missing)
-  {
-    print "No prefs file found at $file_path; using defaults\n";
-    
-    my($folder_path) = $file_path;
-    $folder_path =~ s/[^:]+$//;
-    mkpath($folder_path);
-    WriteDefaultPrefsFile($file_path);
-  }
-}
-
-
-#-------------------------------------------------------------------------------
-#
-# ReadMozUserPrefs
-#
-#-------------------------------------------------------------------------------
-
-sub ReadMozUserPrefs($$$$)
-{
-  my($prefs_file_name, $build_flags, $options_flags, $filepath_flags) = @_;
-  
-  if ($prefs_file_name eq "") { return; }
-  
-  # if local prefs exist, just use those. Othewise, look in the prefs folder
-  if (-e $prefs_file_name)
-  {
-    # read local prefs
-    ReadPrefsFile($prefs_file_name, $build_flags, $options_flags, $filepath_flags, 0);
-  }
-  else
-  {
-    # first read prefs folder prefs
-    my($prefs_path) = GetPrefsFolder();
-    $prefs_path .= ":$prefs_file_name";
-
-    ReadPrefsFile($prefs_path, $build_flags, $options_flags, $filepath_flags, 1);
-  }
-}
-
-1;

mozilla/build/mac/build_scripts/Moz/ProjectXML.pm

@@ -1,932 +0,0 @@
-#!/usr/bin/perl
-
-#
-# The contents of this file are subject to the Netscape Public
-# License Version 1.1 (the "License"); you may not use this file
-# except in compliance with the License. You may obtain a copy of
-# the License at http://www.mozilla.org/NPL/
-#
-# Software distributed under the License is distributed on an "AS
-# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
-# implied. See the License for the specific language governing
-# rights and limitations under the License.
-#
-# The Original Code is mozilla.org code.
-#
-# The Initial Developer of the Original Code is Netscape
-# Communications Corporation.  Portions created by Netscape are
-# Copyright (C) 1998 Netscape Communications Corporation. All
-# Rights Reserved.
-#
-# Contributor(s): 
-#   Simon Fraser <sfraser@netscape.com>
-#
-
-package Moz::ProjectXML;
-
-require 5.004;
-require Exporter;
-
-use strict;
-use Exporter;
-
-use Cwd;
-use XML::DOM;
-
-use vars qw(@ISA @EXPORT);
-
-@ISA      = qw(Exporter);
-@EXPORT   = qw(
-                ParseXMLDocument
-                DisposeXMLDocument
-                WriteXMLDocument
-                CleanupPro5XML
-                GetTargetsList
-                CloneTarget
-                SetAsSharedLibraryTarget
-                SetAsStaticLibraryTarget
-                AddTarget
-                RemoveTarget
-                GetTargetSetting
-                SetTargetSetting
-                getChildElementTextContents
-              );
-
-
-#--------------------------------------------------------------------------------------------------
-# A module for reading, manipulating, and writing XML-format CodeWarrior project files.
-# 
-# Sample usage:
-# 
-# use ProjectXML;
-# 
-# my $doc = ProjectXML::ParseXMLDocument("Test.mcp.xml");
-# ProjectXML::CloneTarget($doc, "Test.shlb", "Test.lib");
-# ProjectXML::SetAsStaticLibraryTarget($doc, "Test.lib", "TestOutput.lib");
-# ProjectXML::WriteXMLDocument($doc, "Test_out.xml");
-# ProjectXML::DisposeXMLDocument($doc);
-# 
-#--------------------------------------------------------------------------------------------------
-
-
-#//--------------------------------------------------------------------------------------------------
-#// ParseXMLDocument
-#// Note that the caller must call DisposeXMLDocument on the returned doc
-#//--------------------------------------------------------------------------------------------------
-sub ParseXMLDocument($)
-{
-  my($doc_path) = @_;
-
-  my $parser = new XML::DOM::Parser(ErrorContext => 2);
-  my $doc = $parser->parsefile($doc_path);
-
-  return $doc;
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// DisposeXMLDocument
-#// Needed to avoid memory leaks - cleanup circular references for garbage collection
-#//--------------------------------------------------------------------------------------------------
-sub DisposeXMLDocument($)
-{
-  my($doc) = @_;
-  
-  $doc->dispose();
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// WriteXMLDocument
-#//--------------------------------------------------------------------------------------------------
-
-sub _pro5_tag_compression($$)
-{
-   return 1;    # Pro 5 is broken and can't import XML with <foo/> style tags
-}
-
-sub _pro6plus_tag_compression($$)
-{
-   return 0;    # Pro 6 can deal with empty XML tags like <foo/>
-}
-
-sub WriteXMLDocument($$$)
-{
-  my($doc, $file_path, $ide_version) = @_;
-
-  if ($ide_version eq "4.0")
-  {
-    XML::DOM::setTagCompression(\&_pro5_tag_compression);
-  }
-  else
-  {
-    XML::DOM::setTagCompression(\&_pro6plus_tag_compression);
-  }
-
-  $doc->printToFile($file_path);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// CleanupPro5XML
-#// XML Projects exported by Pro 5 contain garbage data under the MWMerge_MacOS_skipResources
-#// setting. This routine cleans this up, saving the result to a new file
-#//--------------------------------------------------------------------------------------------------
-sub CleanupPro5XML($$)
-{
-  my($xml_path, $out_path) = @_;
-  
-  local(*XML_FILE);
-  open(XML_FILE, "< $xml_path") || die "Error: failed to open file $xml_path\n";
-  
-  local(*CLEANED_FILE);
-  open(CLEANED_FILE, "> $out_path") || die "Error: failed to open file $out_path for writing\n";
-  
-  my $in_skip_resources_settings = 0;
-  
-  while(<XML_FILE>)
-  {
-      my($line) = $_;
-
-      if ($line =~ /^<\?codewarrior/)    # is processing inst line
-      {
-        my $test_line = $line;
-        chomp($test_line);
-  
-        my $out_line = $test_line;
-        if ($test_line =~ /^<\?codewarrior\s+exportversion=\"(.+)\"\s+ideversion=\"(.+)\"\s*\?>$/)
-        {
-          my $export_version = $1;
-          my $ide_version    = $2;
-
-          $ide_version = "4.0_mozilla";   # pseudo IDE version so we know we touched it
-          $out_line = "<?codewarrior exportversion=\"".$export_version."\" ideversion=\"".$ide_version."\"?>";
-        }
-
-        print CLEANED_FILE "$out_line\n";
-        next;
-      }
-      
-      if ($line =~ /MWMerge_MacOS_skipResources/)
-      {
-        $in_skip_resources_settings = 1;
-        print CLEANED_FILE "$line";
-      }
-      elsif($in_skip_resources_settings && $line =~ /<!-- Settings for/)
-      {
-        # leaving bad settings lines. Write closing tag
-        print CLEANED_FILE "                    <!-- Corrupted setting entries removed by script -->\n";
-        print CLEANED_FILE "                </SETTING>\n\n";
-        
-        print CLEANED_FILE "$line";
-
-        $in_skip_resources_settings = 0;
-      }
-      elsif (!$in_skip_resources_settings)
-      {      
-        print CLEANED_FILE "$line";
-      }
-  }
-  
-  close(XML_FILE);
-  close(CLEANED_FILE);
-
-}
-
-#--------------------------------------------------------------------------------------------------
-# SniffProjectXMLIDEVersion
-#
-#--------------------------------------------------------------------------------------------------
-sub SniffProjectXMLIDEVersion($)
-{
-  my($xml_path) = @_;
-  
-  my $found_version = "";
-  
-  local(*XML_FILE);
-  open(XML_FILE, "< $xml_path") || die "Error: failed to open file $xml_path\n";
-  
-  while(<XML_FILE>)
-  {
-      my($line) = $_;
-      chomp($line);
-      
-      if ($line =~ /^<\?codewarrior/)    # is processing inst line
-      {
-        unless ($line =~ /^<\?codewarrior\s+exportversion=\"(.+)\"\s+ideversion=\"(.+)\"\s*\?>$/)
-        {
-          die "Error: Failed to find ideversion in $xml_path in line $line\n";
-        }
-        
-        my $export_version = $1;
-        my $ide_version    = $2;
-
-        $found_version = $ide_version;         
-        last;
-      }
-  }
-  
-  close(XML_FILE);
-
-  return $found_version;
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// GetTargetsList
-#// Returns an array of target names
-#//--------------------------------------------------------------------------------------------------
-sub GetTargetsList($)
-{
-  my($doc) = @_;
-
-  my $nodes = $doc->getElementsByTagName("TARGET");
-  my $n = $nodes->getLength;
-  
-  my @target_names;
-  
-  for (my $i = 0; $i < $n; $i++)
-  {
-    my ($node) = $nodes->item($i);   
-   
-    my($target_name) = getChildElementTextContents($node, "NAME");
-    push(@target_names, $target_name);
-  }
-
-  return @target_names;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// CloneTarget
-#// Clone the named target, renaming it to 'new_name'
-#//--------------------------------------------------------------------------------------------------
-sub CloneTarget($$$)
-{
-  my($doc, $target_name, $new_name) = @_;
-
-  my $target_node   = getTargetNode($doc, $target_name);
-
-  # clone here
-  my $target_clone  = $target_node->cloneNode(1);   # deep clone
-  
-  # -- munge target settings --
-
-  # set the target name field
-  setChildElementTextContents($doc, $target_clone, "NAME", $new_name);
-  
-  # set the targetname pref
-  setTargetNodeSetting($doc, $target_clone, "Targetname", $new_name);
-
-  # -- insert new target subtree --
-  
-  my $target_list   = $target_node->getParentNode();
-  $target_list->appendChild($target_clone);
-  
-  # -- now add to targetorder --
-  my (@target_order_nodes) = getChildOfDocument($doc, "TARGETORDER");
-  
-  my $target_order = @target_order_nodes[0];
-  
-  my $new_order     = $doc->createElement("ORDEREDTARGET");
-  my $order_name    = $doc->createElement("NAME");
-  
-  $new_order->appendChild($order_name);
-
-  setChildElementTextContents($doc, $new_order, "NAME", $new_name);
-  $target_order->appendChild($new_order);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// SetAsSharedLibraryTarget
-#// 
-#//--------------------------------------------------------------------------------------------------
-sub SetAsSharedLibraryTarget($$$)
-{
-  my($doc, $target_name, $output_name) = @_;
-
-  my $target_node = getTargetNode($doc, $target_name);
-
-  setTargetNodeSetting($doc, $target_node, "MWProject_PPC_type", "SharedLibrary");
-  setTargetNodeSetting($doc, $target_node, "MWProject_PPC_filetype", "1936223330"); #'shlb'
-  setTargetNodeSetting($doc, $target_node, "MWProject_PPC_outfile", $output_name);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// AddFileToTarget
-#// 
-#// Add a file to the specified target(s).
-#// 
-#//--------------------------------------------------------------------------------------------------
-sub AddFileToTarget($$$)
-{
-  my($doc, $target_list, $file_name) = @_;
-
-  # the file must be added in 3 places:
-  # 1. in <TARGET><FILELIST><FILE> (with linkage flags if necessary)
-  # 2. in <TARGET><LINKORDER><FILEREF>
-  # 3. in <GROUPLIST><GROUP><FILEREF>
-  die "Write me\n";
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// RemoveFileFromTarget
-#// 
-#// Remove a file from the specified target, removing it from the entire project
-#// if no other targets reference it.
-#// 
-#//--------------------------------------------------------------------------------------------------
-sub RemoveFileFromTarget($$$)
-{
-  my($doc, $target_node, $file_name) = @_;
-  
-  # the file must be removed in 3 places:
-  # 1. in <TARGET><FILELIST><FILE>
-  # 2. in <TARGET><LINKORDER><FILEREF>
-  # 3. in <GROUPLIST><GROUP><FILEREF>
-  
-  # first, remove from <FILELIST>
-  my $filelist_node = getFirstChildElement($target_node, "FILELIST");
-  unless ($filelist_node) { die "Error: failed to find FILELIST node\n"; }
-  
-  my $file_node = getChildNodeByGrandchildContents($doc, $filelist_node, "FILE", "PATH", $file_name);
-  unless ($file_node) { return; }
-
-  $filelist_node->removeChild($file_node);
-  
-  # next, remove from <LINKORDER>
-  my $linkorder_node = getFirstChildElement($target_node, "LINKORDER");
-  unless ($linkorder_node) { die "Error: failed to find LINKORDER node\n"; }
-  
-  my $fileref_node = getChildNodeByGrandchildContents($doc, $linkorder_node, "FILEREF", "PATH", $file_name);
-  unless ($fileref_node) { die "Error: link order node for file $file_name not found\n"; }
-
-  $linkorder_node->removeChild($fileref_node);
-  
-  # last, remove from <GROUPLIST>
-  # <GROUPLIST> is cross-target, so we have to be careful here.
-  my $grouplist_node = getChildOfDocument($doc, "GROUPLIST");
-  unless ($grouplist_node) { die "Error: failed to find GROUPLIST node\n"; }
-
-  # if the file isn't in any other targets, remove it from the groups
-  if (!GetFileInUse($doc, $file_name))
-  {
-    print "File $file_name is in no other targest. Removing from project\n";
-
-    my @group_nodes;
-    getChildElementsOfType($doc, $grouplist_node, "GROUP", \@group_nodes);
-    my $group_node;
-    foreach $group_node (@group_nodes)
-    {
-      my @fileref_nodes;
-      getChildElementsOfType($doc, $group_node, "FILEREF", \@fileref_nodes);
-  
-      my $fileref_node;
-      foreach $fileref_node (@fileref_nodes)
-      {
-        my $path_name = getChildElementTextContents($fileref_node, "PATH");
-        if ($path_name eq $file_name)
-        {
-          print "Removing $file_name from project group list\n";
-          $group_node->removeChild($fileref_node);
-          last;
-        }
-      }
-      
-      # can a file appear in more than one group?
-    }
-  }
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// SetAsStaticLibraryTarget
-#// 
-#//--------------------------------------------------------------------------------------------------
-sub SetAsStaticLibraryTarget($$$)
-{
-  my($doc, $target_name, $output_name) = @_;
-
-  my $target_node = getTargetNode($doc, $target_name);
-
-  setTargetNodeSetting($doc, $target_node, "MWProject_PPC_type", "Library");
-  setTargetNodeSetting($doc, $target_node, "MWProject_PPC_filetype", "1061109567"); #'????'
-  setTargetNodeSetting($doc, $target_node, "MWProject_PPC_outfile", $output_name);
-
-  # static targets don't need any library linkage, so we can remove linkage
-  # with all .shlb and .Lib files.
-  
-  my(@obsolete_files) = ("NSStdLibStubs", "InterfacesStubs", "InterfaceLib", "InternetConfigLib");
-
-  print " Removing libraries etc. from target\n";
-
-  # get all files in target
-  my @target_files = GetTargetFilesList($doc, $target_name);
-  my $target_file;
-  foreach $target_file (@target_files)
-  {
-    if ($target_file =~ /(\.shlb|\.lib|\.Lib|\.o|\.exp)$/)
-    {
-      RemoveFileFromTarget($doc, $target_node, $target_file);
-    }
-  }
-  
-  print " Removing stub libraries from target\n";
-  
-  # then remove files with known names
-  my $obs_file;
-  foreach $obs_file (@obsolete_files)
-  {
-    RemoveFileFromTarget($doc, $target_node, $obs_file);
-  }
-
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// AddTarget
-#// 
-#//--------------------------------------------------------------------------------------------------
-sub AddTarget($$)
-{
-  my($doc, $target_name) = @_;
-
-  die "Write me\n";
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// RemoveTarget
-#// 
-#//--------------------------------------------------------------------------------------------------
-sub RemoveTarget($$)
-{
-  my($doc, $target_name) = @_;
-
-  die "Write me\n";
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// GetTargetSetting
-#// Get the value for the specified setting in the specified target
-#//--------------------------------------------------------------------------------------------------
-sub GetTargetSetting($$$)
-{
-  my($doc, $target_name, $setting_name) = @_;
-
-  my $target_node   = getTargetNode($doc, $target_name);
-  return getTargetNodeSetting($target_node, "VALUE");
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// SetTargetSetting
-#// Set the value for the specified setting in the specified target
-#//--------------------------------------------------------------------------------------------------
-sub SetTargetSetting($$$$)
-{
-  my($doc, $target_name, $setting_name, $new_value) = @_;
-
-  my $target_node   = getTargetNode($doc, $target_name);
-  setTargetNodeSetting($doc, $target_node, "VALUE", $new_value);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// GetTargetFilesList
-#// Return an array of the files in the target (in filelist order)
-#//--------------------------------------------------------------------------------------------------
-sub GetTargetFilesList($$)
-{
-  my($doc, $target_name) = @_;
-
-  my $target_node = getTargetNode($doc, $target_name);
-
-  my @files_list;
-    
-  my $filelist_node = getFirstChildElement($target_node, "FILELIST");
-  unless ($filelist_node) { die "Error: failed to find FILELIST node\n"; }
-
-  my @file_nodes;
-  getChildElementsOfType($doc, $filelist_node, "FILE", \@file_nodes);
-  
-  my $node;
-  foreach $node (@file_nodes)
-  {
-    my $file_name = getChildElementTextContents($node, "PATH");
-    push(@files_list, $file_name);
-  }
-  
-  return @files_list;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// FileIsInTarget
-#// 
-#//--------------------------------------------------------------------------------------------------
-sub FileIsInTarget($$$)
-{
-  my($doc, $file_name, $target_name) = @_;
-
-  my $target_node = getTargetNode($doc, $target_name);
-  unless ($target_node) { die "Error: no target found called $target_name\n"; }
-
-  my $file_node = GetTargetFileNode($doc, $target_node, $file_name);
-  if ($file_node) {
-    return 1;
-  }
-  
-  return 0;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// GetFileTargetsList
-#// Return an array of the targets that a file is in (expensive)
-#//--------------------------------------------------------------------------------------------------
-sub GetFileTargetsList($$)
-{
-  my ($doc, $file_name) = @_;
-
-  my @target_list;
-
-  my @targets = GetTargetsList($doc);
-  my $target;
-  
-  foreach $target (@targets)
-  {
-    if (FileIsInTarget($doc, $file_name, $target))
-    {
-      push(@target_list, $target);
-    }
-  }
-  
-  return @target_list;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// GetTargetFileNode
-#// 
-#//--------------------------------------------------------------------------------------------------
-sub GetTargetFileNode($$$)
-{
-  my($doc, $target_node, $file_name) = @_;
-
-  my $filelist_node = getFirstChildElement($target_node, "FILELIST");
-  unless ($filelist_node) { die "Error: failed to find FILELIST node\n"; }
-  
-  my $file_node = getChildNodeByGrandchildContents($doc, $filelist_node, "FILE", "PATH", $file_name);
-
-  return $file_node;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// GetFileInUse
-#// Return true if the file is used by any target
-#//--------------------------------------------------------------------------------------------------
-sub GetFileInUse($$)
-{
-  my($doc, $file_name) = @_;
-
-  my $targetlist_node = getChildOfDocument($doc, "TARGETLIST");
-
-  my $target_node = $targetlist_node->getFirstChild();
- 
-  while ($target_node)
-  {
-    if ($target_node->getNodeTypeName eq "ELEMENT_NODE" &&
-        $target_node->getTagName() eq "TARGET")
-    {
-      # if this is a target node
-      my $file_node = GetTargetFileNode($doc, $target_node, $file_name);
-      if ($file_node) {
-        return 1;   # found it
-      }      
-    }
-
-    $target_node = $target_node->getNextSibling();
-  }
-  
-  # not found
-  return 0;
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// getChildOfDocument
-#//--------------------------------------------------------------------------------------------------
-sub getChildOfDocument($$)
-{
-  my($doc, $child_type) = @_;
-
-  return getFirstChildElement($doc->getDocumentElement(), $child_type);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// getFirstChildElement
-#//--------------------------------------------------------------------------------------------------
-sub getFirstChildElement($$)
-{
-  my($node, $element_name) = @_;
-
-  my $found_node;
-  
-  unless ($node) { die "getFirstChildElement called with empty node\n"; }
-  
-  #look for the first "element_name" child
-
-  my $child_node = $node->getFirstChild();
- 
-  while ($child_node)
-  {
-    if ($child_node->getNodeTypeName eq "ELEMENT_NODE" &&
-        $child_node->getTagName() eq $element_name)
-    {
-      $found_node = $child_node;
-      last;
-    }
-
-    $child_node = $child_node->getNextSibling();
-  }
-   
-  return $found_node;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// getChildElementsOfType
-#// 
-#// Return an array of refs to child nodes of the given type
-#//--------------------------------------------------------------------------------------------------
-sub getChildElementsOfType($$$$)
-{
-  my($doc, $node, $child_type, $array_ref) = @_;
-
-  my $child_node = $node->getFirstChild();
- 
-  while ($child_node)
-  {
-    if ($child_node->getNodeTypeName eq "ELEMENT_NODE" &&
-        $child_node->getTagName() eq $child_type)
-    {
-      push(@$array_ref, $child_node);
-    }
-
-    $child_node = $child_node->getNextSibling();
-  }
-
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// getChildElementTextContents
-#//--------------------------------------------------------------------------------------------------
-#
-# Given <FOOPY><NERD>Hi!</NERD></FOOPY>, where $node is <FOOPY>,
-# returns "Hi!". If > 1 <NERD> node, returns the contents of the first.
-#
-sub getChildElementTextContents($$)
-{
-  my($node, $tag_name) = @_;
-
-  my $first_element = getFirstChildElement($node, $tag_name);  
-  my $text_node     = $first_element->getFirstChild();
-  
-  my $text_contents = "";
-  
-  # concat adjacent text nodes
-  while ($text_node)
-  {
-    if ($text_node->getNodeTypeName() ne "TEXT_NODE")
-    {
-      last;
-    }
-
-    $text_contents = $text_contents.$text_node->getData();
-    $text_node = $text_node->getNextSibling();
-  }
-
-  return $text_contents;
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// setChildElementTextContents
-#//--------------------------------------------------------------------------------------------------
-sub setChildElementTextContents($$$$)
-{
-  my($doc, $node, $tag_name, $contents_text) = @_;
-  
-  my $first_element = getFirstChildElement($node, $tag_name);  
-  my $new_text_node = $doc->createTextNode($contents_text);
-  
-  # replace all child elements with a text element
-  removeAllChildren($first_element);
-  
-  $first_element->appendChild($new_text_node);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// getChildNodeByContents
-#// 
-#// Consider <foo><bar><baz>Foopy</baz></bar><bar><baz>Loopy</baz></bar></foo>
-#// This function, when called with getChildNodeByContents($foonode, "bar", "baz", "Loopy")
-#// returns the second <bar> node.
-#//--------------------------------------------------------------------------------------------------
-sub getChildNodeByGrandchildContents($$$$$)
-{
-  my($doc, $node, $child_type, $gc_type, $gc_contents) = @_;    # gc = grandchild
-
-  my $found_node;
-  my $child_node = $node->getFirstChild();
-  while ($child_node)
-  {
-    if ($child_node->getNodeTypeName eq "ELEMENT_NODE" &&
-        $child_node->getTagName() eq $child_type)
-    {
-      # check for a child of this node of type 
-      my $child_contents = getChildElementTextContents($child_node, $gc_type);
-
-      if ($child_contents eq $gc_contents)
-      {
-        $found_node = $child_node;
-        last;
-      }
-    }
-
-    $child_node = $child_node->getNextSibling();
-  }
-
-  return $found_node;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// getTargetNode
-#//--------------------------------------------------------------------------------------------------
-sub getTargetNode($$)
-{
-  my($doc, $target_name) = @_;
-
-  my $targetlist_node = getChildOfDocument($doc, "TARGETLIST");
-  return getChildNodeByGrandchildContents($doc, $targetlist_node, "TARGET", "NAME", $target_name);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// getTargetNamedSettingNode
-#//--------------------------------------------------------------------------------------------------
-sub getTargetNamedSettingNode($$)
-{
-  my($target_node, $setting_name) = @_;
-
-  my $setting_node;
-
-  my $settinglist_node = getFirstChildElement($target_node, "SETTINGLIST");
-  my $child_node = $settinglist_node->getFirstChild();
- 
-  while ($child_node)
-  {
-    if ($child_node->getNodeTypeName ne "ELEMENT_NODE")
-    {
-      $child_node = $child_node->getNextSibling();
-      next;
-    }
-    
-    if ($child_node->getTagName() eq "SETTING")
-    {
-      my $set_name = getChildElementTextContents($child_node, "NAME");
-
-      if ($set_name eq $setting_name)
-      {
-        $setting_node = $child_node;
-        last;
-      }
-    }
-
-    $child_node = $child_node->getNextSibling();
-  }
-
-  return $setting_node;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// getTargetNodeSetting
-#//--------------------------------------------------------------------------------------------------
-sub getTargetNodeSetting($$)
-{
-  my($target_node, $setting_name) = @_;
-  
-  my $setting_node  = getTargetNamedSettingNode($target_node, $setting_name);
-  return getChildElementTextContents($setting_node, "VALUE");
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// setTargetNodeSetting
-#//--------------------------------------------------------------------------------------------------
-sub setTargetNodeSetting($$$$)
-{
-  my($doc, $target_node, $setting_name, $new_value) = @_;
-
-  my $setting_node  = getTargetNamedSettingNode($target_node, $setting_name);
-
-  setChildElementTextContents($doc, $setting_node, "VALUE", $new_value);
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// elementInArray
-#//--------------------------------------------------------------------------------------------------
-sub elementInArray($$)
-{
-  my($element, $array) = @_;
-  my $test;
-  foreach $test (@$array)
-  {
-    if ($test eq $element) {
-      return 1;
-    }
-  }
-  return 0;
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// removeAllChildren
-#//--------------------------------------------------------------------------------------------------
-sub removeAllChildren($)
-{
-  my($node) = @_;
-  
-  my $child_node = $node->getFirstChild();
-  
-  while ($child_node)
-  {
-    $node->removeChild($child_node);
-    $child_node = $node->getFirstChild();
-  }
-}
-
-
-#//--------------------------------------------------------------------------------------------------
-#// dumpNodeData
-#//--------------------------------------------------------------------------------------------------
-sub dumpNodeData($)
-{
-  my($node) = @_;
-  
-  unless ($node) { die "Null node passed to dumpNodeData\n"; }
-  
-  print "Dumping node $node\n";
-  
-  my($node_type) = $node->getNodeTypeName();
-  
-  if ($node_type eq "ELEMENT_NODE")
-  {
-    my($node_name) = $node->getTagName();
-    print "Element $node_name\n";
-  }
-  elsif ($node_type eq "TEXT_NODE")
-  {
-    my($node_data) = $node->getData;
-    # my(@node_vals) = unpack("C*", $node_data);
-    print "Text '$node_data'\n";    # may contain LF chars
-  }
-  else
-  {
-    print "Node $node_type\n";
-  }
-
-}
-
-#//--------------------------------------------------------------------------------------------------
-#// dumpNodeTree
-#//--------------------------------------------------------------------------------------------------
-sub dumpNodeTree($)
-{
-  my($node) = @_;
-  
-  my($child_node) = $node->getFirstChild();
-  
-  unless ($child_node) { return; }
-
-  # recurse
-  dumpNodeData($child_node);
-  
-  # then go through child nodes
-  while ($child_node)
-  {
-    dumpNodeTree($child_node);
-  
-    $child_node = $child_node->getNextSibling();
-  }
-}
-
-
-
-
-1;
-

mozilla/build/mac/build_scripts/MozillaBuildFlags.txt

@@ -1,90 +0,0 @@
-#-------------------------------------------------------------------------------
-# These 3 lists are the 'master lists' to control what gets built.
-# 
-# Ordering in these arrays is important; it has to reflect the order in
-# which the build occurs.
-#
-# Setting containing spaces must be quoted with double quotes.
-#-------------------------------------------------------------------------------
-
-build_flags
-all             1
-pull            0
-dist            0
-config          0
-xpidl           0
-idl             0
-stubs           0
-runtime         0
-common          0
-imglib          0
-libimg2         0
-necko           0
-security        0
-browserutils    0
-intl            0
-nglayout        0
-accessiblity    0
-editor          0
-embedding       0
-viewer          0
-xpapp           0
-extensions      0
-plugins         0
-mailnews        0
-apprunner       0
-resources       0
-
-options_flags
-pull_by_date    0
-chrome_jars     1
-chrome_files    0
-use_jars        1
-transformiix    1
-mathml          0      MOZ_MATHML
-svg             0      MOZ_SVG
-# svg requires libart, which is an lgpl library. You need to pull it 
-# explicitly.
-libart_lgpl     0
-mng             1
-ldap            1      MOZ_LDAP_XPCOM
-ldap_experimental 0    MOZ_LDAP_XPCOM_EXPERIMENTAL
-xmlextras       1
-wsp             0      MOZ_WSP
-inspector       1
-mailextras      1
-xptlink         0
-psm             0      MOZ_PSM
-embedding_test  1
-embedding_chrome 0
-embedding_xulprefs 0
-embedding_xulsecurity 0
-carbon          0      TARGET_CARBON
-useimg2         1      USE_IMG2
-lowmem          0      MOZ_MAC_LOWMEM
-accessible      1      ACCESSIBILITY
-bidi            1      IBMBIDI
-p3p             0
-jsd             1
-venkman         1
-moz_logging     1      MOZ_LOGGING
-chatzilla       1
-content_packs   1
-xml_rpc         1
-cview           1
-help            1
-timeline        0      MOZ_TIMELINE
-static_build    0      MOZ_STATIC_COMPONENT_LIBS
-string_debug    0      DEBUG_STRING
-string_stats    0      DEBUG_STRING_STATS
-xpctools        0      XPC_TOOLS_SUPPORT
-smime           1
-mdn             1
-print_preview   1      NS_PRINT_PREVIEW
-moz_xul         1      MOZ_XUL
-
-filepath_flags
-idepath             ":CodeWarrior IDE Path.txt"
-sessionpath         ":Mozilla session path.txt"
-buildlogfilepath    ":Build Logs:Mozilla build log.txt"   # this is a path
-scriptlogfilepath   ":Build Logs:Mozilla script log.txt"

mozilla/build/mac/build_scripts/MozillaCheckoutList.txt

@@ -1,22 +0,0 @@
-# List of modules to check out. Format is
-#   module, (tag), (date)
-# where tag and date are optional (non-trailing commas are required)
-#
-# Examples:
-#   mozilla/nsprpub, NSPRPUB_CLIENT_TAG
-#   mozilla/gc, , 10/25/2000 12:00:00
-#
-
-mozilla/nsprpub,        	NETSCAPE_7_0_RTM
-mozilla/security/nss,   	NETSCAPE_7_0_RTM
-mozilla/security/manager,	NETSCAPE_7_0_RTM
-mozilla/accessible,			NETSCAPE_7_0_RTM
-mozilla/directory/c-sdk,	NETSCAPE_7_0_RTM
-mozilla/lib/mac/Instrumentation, 	NETSCAPE_7_0_RTM
-mozilla/gfx2, 				NETSCAPE_7_0_RTM
-mozilla/modules/libpr0n,	NETSCAPE_7_0_RTM
-SeaMonkeyAll, 				NETSCAPE_7_0_RTM
-
-## You need this if you want to be able to use SVG
-## Note that this library is under the LGPL, not the MPL
-#mozilla/other-licenses/libart_lgpl

mozilla/build/mac/build_scripts/PullMozilla.pl

@@ -1,79 +0,0 @@
-#!perl
-
-#
-# The contents of this file are subject to the Netscape Public
-# License Version 1.1 (the "License"); you may not use this file
-# except in compliance with the License. You may obtain a copy of
-# the License at http://www.mozilla.org/NPL/
-#
-# Software distributed under the License is distributed on an "AS
-# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
-# implied. See the License for the specific language governing
-# rights and limitations under the License.
-#
-# The Original Code is mozilla.org code.
-#
-# The Initial Developer of the Original Code is Netscape
-# Communications Corporation.  Portions created by Netscape are
-# Copyright (C) 1998 Netscape Communications Corporation. All
-# Rights Reserved.
-#
-# Contributor(s): 
-#   Simon Fraser <sfraser@netscape.com>
-#
-
-require 5.004;
-
-use strict;
-
-use Cwd;
-use Moz::BuildUtils;
-use Moz::BuildCore;
-
-#-------------------------------------------------------------
-# Where have the build options gone?
-# 
-# The various build flags have been centralized into one place. 
-# The master list of options is in MozBuildFlags.txt. However, 
-# you should never need to edit that file, or this one.
-# 
-# To customize what gets built, or where to start the build, 
-# edit the $prefs_file_name file in
-# System Folder:Preferences:Mozilla build prefs:
-# Documentation is provided in that file.
-#-------------------------------------------------------------
-
-my($prefs_file_name) = "Mozilla pull prefs";
-
-#-------------------------------------------------------------
-# hashes to hold build options
-#-------------------------------------------------------------
-my(%build);
-my(%options);
-my(%filepaths);
-my(%optiondefines);
-
-# Hash of input files for this build. Eventually, there will be
-# input files for manifests, and projects too.
-my(%inputfiles) = (
-  "buildflags",     "MozillaBuildFlags.txt",
-  "checkoutdata",   "MozillaCheckoutList.txt",
-  "buildprogress",  "",
-  "buildmodule",    "MozillaBuildList.pm",
-  "checkouttime",   "Mozilla last checkout"
-);
-#-------------------------------------------------------------
-# end build hashes
-#-------------------------------------------------------------
-
-# set the build root directory, which is the the dir above mozilla
-SetupBuildRootDir(":mozilla:build:mac:build_scripts");
-
-# Set up all the flags on $main::, like DEBUG, CARBON etc.
-# Override the defaults using the preferences files.
-SetupDefaultBuildOptions(0, ":mozilla:dist:viewer:", "");
-
-my($do_checkout)    = 1;
-my($do_build)       = 0;
-
-RunBuild($do_checkout, $do_build, \%inputfiles, $prefs_file_name);

mozilla/client.mak

@@ -1,511 +0,0 @@
-# The contents of this file are subject to the Netscape Public
-# License Version 1.1 (the "License"); you may not use this file
-# except in compliance with the License. You may obtain a copy of
-# the License at http://www.mozilla.org/NPL/
-#
-# Software distributed under the License is distributed on an "AS
-# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
-# implied. See the License for the specific language governing
-# rights and limitations under the License.
-#
-# The Original Code is mozilla.org code.
-#
-# The Initial Developer of the Original Code is Netscape
-# Communications Corporation.  Portions created by Netscape are
-# Copyright (C) 1998 Netscape Communications Corporation. All
-# Rights Reserved.
-#
-# Contributor(s): 
-
-DEPTH=.
-
-!if !defined(MOZ_TOP)
-#enable builds from changed top level directories
-MOZ_TOP=mozilla
-!endif
-
-MOZ_SRC_FLIPPED = $(MOZ_SRC:\=/)
-MOZ_DIST_FLIPPED = $(MOZ_SRC_FLIPPED)/mozilla/dist
-!ifdef MOZ_DEBUG
-MOZ_OBJDIR = WIN32_D.OBJ
-!else
-MOZ_OBJDIR = WIN32_O.OBJ
-!endif
-
-#
-# Command macro defines
-#
-
-#//------------------------------------------------------------------------
-#// Figure out how to do the pull.
-#//------------------------------------------------------------------------
-# uncomment these, modify branch tag, and check in to branch for milestones
-MOZ_BRANCH=NETSCAPE_7_0_RTM
-NSPR_CO_TAG=NETSCAPE_7_0_RTM
-PSM_CO_TAG=NETSCAPE_7_0_RTM
-NSS_CO_TAG=NETSCAPE_7_0_RTM
-LDAPCSDK_CO_TAG=NETSCAPE_7_0_RTM
-ACCESSIBLE_CO_TAG=NETSCAPE_7_0_RTM
-IMGLIB2_CO_TAG=NETSCAPE_7_0_RTM
-GFX2_CO_TAG=NETSCAPE_7_0_RTM
-
-
-!ifdef MOZ_BRANCH
-CVS_BRANCH=-r $(MOZ_BRANCH)
-!endif
-
-!ifdef MOZ_DATE
-CVS_BRANCH=$(CVS_BRANCH) -D "$(MOZ_DATE)"
-!endif
-
-# default pull is "quiet" but it can be overridden with MOZ_CVS_VERBOSE
-!ifndef MOZ_CVS_VERBOSE
-CVS_FLAGS=-q
-!endif
-
-# honor any user-defined CVS flags
-!ifdef MOZ_CVS_FLAGS
-CVS_FLAGS=$(CVS_FLAGS) $(MOZ_CVS_FLAGS)
-!endif
-
-# let's be explicit about CVSROOT... some windows cvs clients
-# are too stupid to correctly work without the -d option 
-#
-#  if they are too stupid, they should fail.  I am
-#  commenting this out because this does not work
-#  under 4nt.  (%'s are evaluted differently)
-#
-#  If it breaks you, mail dougt@netscape.com
-#  and leaf@mozilla.org
-#
-!if 0
-!if defined(CVSROOT)
-CVS_FLAGS=$(CVS_FLAGS) -d "$(CVSROOT)"
-!endif
-!endif
-
-!ifndef MOZ_CO_FLAGS
-MOZ_CO_FLAGS = -P
-!endif
-
-CVSCO = cvs $(CVS_FLAGS) co $(MOZ_CO_FLAGS) $(CVS_BRANCH)
-
-#//------------------------------------------------------------------------
-#// Figure out how to pull NSPR.
-#// If no NSPR_CO_TAG is specified, use the default static tag
-#//------------------------------------------------------------------------
-
-!ifndef NSPR_CO_FLAGS
-NSPR_CO_FLAGS=$(MOZ_CO_FLAGS)
-!endif
-
-NSPR_CO_FLAGS=$(NSPR_CO_FLAGS) $(CVS_BRANCH)
-
-
-CVSCO_NSPR = cvs $(CVS_FLAGS) co $(NSPR_CO_FLAGS)
-
-#//------------------------------------------------------------------------
-#// Figure out how to pull NSS and PSM libs.
-#// If no NSS_CO_TAG or PSM_CO_TAG is specified, use the default static tag
-#//------------------------------------------------------------------------
-
-!ifndef NSS_CO_FLAGS
-NSS_CO_FLAGS=$(MOZ_CO_FLAGS)
-!endif
-
-NSS_CO_FLAGS=$(NSS_CO_FLAGS) $(CVS_BRANCH)
-
-CVSCO_NSS = cvs $(CVS_FLAGS) co $(NSS_CO_FLAGS)
-
-!ifndef PSM_CO_FLAGS
-PSM_CO_FLAGS=$(MOZ_CO_FLAGS)
-!endif
-
-PSM_CO_FLAGS=$(PSM_CO_FLAGS) $(CVS_BRANCH)
-
-CVSCO_PSM = cvs $(CVS_FLAGS) co $(PSM_CO_FLAGS)
-
-#//------------------------------------------------------------------------
-#// Figure out how to pull LDAP C SDK client libs.
-#// If no LDAPCSDK_CO_TAG is specified, use the default tag
-#//------------------------------------------------------------------------
-
-
-!ifndef LDAPCSDK_CO_FLAGS
-LDAPCSDK_CO_FLAGS=$(MOZ_CO_FLAGS)
-!endif
-
-LDAPCSDK_CO_FLAGS=$(LDAPCSDK_CO_FLAGS) $(CVS_BRANCH)
-
-CVSCO_LDAPCSDK = cvs $(CVS_FLAGS) co $(LDAPCSDK_CO_FLAGS)
-
-#//------------------------------------------------------------------------
-#// Figure out how to pull accessibility libs.
-#// If no ACCESSIBLE_CO_TAG is specified, use the default tag
-#//------------------------------------------------------------------------
-
-!ifndef ACCESSIBLE_CO_FLAGS
-ACCESSIBLE_CO_FLAGS=$(MOZ_CO_FLAGS)
-!endif
-
-ACCESSIBLE_CO_FLAGS=$(ACCESSIBLE_CO_FLAGS) $(CVS_BRANCH)
-
-CVSCO_ACCESSIBLE = cvs $(CVS_FLAGS) co $(ACCESSIBLE_CO_FLAGS)
-
-#//------------------------------------------------------------------------
-#// Figure out how to pull new image library.
-#// If no IMGLIB2_CO_TAG is specified, use the default tag
-#//------------------------------------------------------------------------
-
-!ifndef IMGLIB2_CO_FLAGS
-IMGLIB2_CO_FLAGS=$(MOZ_CO_FLAGS)
-!endif
-
-IMGLIB2_CO_FLAGS=$(IMGLIB2_CO_FLAGS) $(CVS_BRANCH)
-
-CVSCO_IMGLIB2 = cvs $(CVS_FLAGS) co $(IMGLIB2_CO_FLAGS)
-
-#//------------------------------------------------------------------------
-#// Figure out how to pull new image library.
-#// If no GFX2_CO_TAG is specified, use the default tag
-#//------------------------------------------------------------------------
-
-!ifndef GFX2_CO_FLAGS
-GFX2_CO_FLAGS=$(MOZ_CO_FLAGS)
-!endif
-
-GFX2_CO_FLAGS=$(GFX2_CO_FLAGS) $(CVS_BRANCH)
-
-CVSCO_GFX2 = cvs $(CVS_FLAGS) co $(GFX2_CO_FLAGS)
-
-#//------------------------------------------------------------------------
-#// Figure out how to pull the internal libart
-#// (only pulled and built if MOZ_INTERNAL_LIBART_LGPL is set)
-#// If no MOZ_INTERNAL_LIBART_CO_TAG is specified, use the default tag
-#//------------------------------------------------------------------------
-
-!if defined(MOZ_SVG) && !defined(MOZ_INTERNAL_LIBART_LGPL)
-ERR_MESSAGE = ^
-You are trying to build Mozilla with SVG support (MOZ_SVG=1), but you ^
-haven not specified that mozilla/other-licenses/libart_lgpl should be ^
-pulled and built. At the moment Mozilla SVG builds need this patched ^
-version of libart. You either need to disable SVG support (unset MOZ_SVG) ^
-or enable pulling and building by setting MOZ_INTERNAL_LIBART_LGPL=1.^
-^
-If you choose to pull and build libart, note that it is only licensed^
-under the terms of the LGPL, not the MPL. (Which is why you have to opt^
-in explicitly.)
-!endif
-
-!if defined(MOZ_INTERNAL_LIBART_LGPL)
-
-!ifndef MOZ_INTERNAL_LIBART_CO_FLAGS
-MOZ_INTERNAL_LIBART_CO_FLAGS=$(MOZ_CO_FLAGS)
-!endif
-
-!if "$(MOZ_INTERNAL_LIBART_CO_TAG)" != ""
-MOZ_INTERNAL_LIBART_CO_FLAGS=$(MOZ_INTERNAL_LIBART_CO_FLAGS) -r $(MOZ_INTERNAL_LIBART_CO_TAG)
-!else
-MOZ_INTERNAL_LIBART_CO_FLAGS=$(MOZ_INTERNAL_LIBART_CO_FLAGS) $(CVS_BRANCH)
-!endif
-
-CVSCO_MOZ_INTERNAL_LIBART = cvs $(CVS_FLAGS) co $(MOZ_INTERNAL_LIBART_CO_FLAGS)
-
-!endif
-
-## The master target
-############################################################
-
-pull_and_build_all: pull_all build_all_dep
-
-
-## Rules for pulling the source from the cvs repository
-############################################################
-
-pull_clobber_and_build_all: pull_all clobber_all build_all
-
-!if !defined(MOZ_INTERNAL_LIBART_LGPL)
-pull_all: pull_nspr pull_psm pull_ldapcsdk pull_accessible pull_gfx2 pull_imglib2 pull_seamonkey
-!else
-pull_all: pull_nspr pull_psm pull_ldapcsdk pull_accessible pull_gfx2 pull_imglib2 pull_moz_internal_libart pull_seamonkey
-!endif
-
-pull_nspr: pull_clientmak
-      cd $(MOZ_SRC)\.
-      $(CVSCO_NSPR) mozilla/nsprpub
-
-pull_nss:
-	cd $(MOZ_SRC)\.
-	$(CVSCO_NSS) mozilla/security/coreconf
-	$(CVSCO_NSS) mozilla/security/nss
-
-pull_psm: pull_nss
-	cd $(MOZ_SRC)\.
-	$(CVSCO_PSM) mozilla/security/manager
-	$(CVSCO_PSM) mozilla/security/makefile.win
-
-pull_ldapcsdk:
-	cd $(MOZ_SRC)\.
-	$(CVSCO_LDAPCSDK) mozilla/directory/c-sdk
-
-pull_accessible:
-	cd $(MOZ_SRC)\.
-	$(CVSCO_ACCESSIBLE) mozilla/accessible
-
-pull_gfx2:
-  cd $(MOZ_SRC)\.
-  $(CVSCO_GFX2) mozilla/gfx2
-
-pull_imglib2:
-  cd $(MOZ_SRC)\.
-  $(CVSCO_IMGLIB2) mozilla/modules/libpr0n
-
-!if defined(MOZ_INTERNAL_LIBART_LGPL)
-pull_moz_internal_libart:
-  cd $(MOZ_SRC)\.
-  $(CVSCO_MOZ_INTERNAL_LIBART) mozilla/other-licenses/libart_lgpl
-!endif
-
-pull_xpconnect: pull_nspr
-	cd $(MOZ_SRC)\.
-	$(CVSCO) mozilla/include
-	$(CVSCO) mozilla/config
-	$(CVSCO) -l mozilla/js
-	$(CVSCO) -l mozilla/js/src
-	$(CVSCO) mozilla/js/src/fdlibm
-	$(CVSCO) mozilla/js/src/xpconnect
-	$(CVSCO) mozilla/modules/libreg
-	$(CVSCO) mozilla/xpcom
-	$(CVSCO) mozilla/string
-
-# pull either layout only or seamonkey the browser
-pull_layout:
-	cd $(MOZ_SRC)\.
-	$(CVSCO) RaptorWin
-
-pull_seamonkey: pull_clientmak
-	cd $(MOZ_SRC)\.
-	$(CVSCO) SeaMonkeyAll
-
-pull_clientmak:
-    cd $(MOZ_SRC)\.
-    $(CVSCO) mozilla/client.mak
-
-############################################################
-
-# nmake has to be hardcoded, or we have to depend on mozilla/config
-# being pulled already to figure out what $(NMAKE) should be.
-
-clobber_all: clobber_nspr clobber_ldapcsdk clobber_psm clobber_seamonkey
-
-build_all: build_nspr build_ldapcsdk build_seamonkey
-
-build_all_dep: depend libs
-
-distclean: 
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\directory\c-sdk
-	gmake -f gmakefile.win distclean MOZ_SRC_FLIPPED=$(MOZ_SRC_FLIPPED)
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\nsprpub
-	gmake -f gmakefile.win distclean MOZ_SRC_FLIPPED=$(MOZ_SRC_FLIPPED)
-	@cd $(MOZ_SRC)\$(MOZ_TOP)
-	nmake /f client.mak clobber_psm
-	nmake /f client.mak clobber_seamonkey
-
-clobber_ldapcsdk:
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\directory\c-sdk
-	gmake -f gmakefile.win clobber_all MOZ_SRC_FLIPPED=$(MOZ_SRC_FLIPPED) \
-		SHELL=sh
-
-clobber_nspr: 
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\nsprpub
-	gmake -f gmakefile.win clobber_all MOZ_SRC_FLIPPED=$(MOZ_SRC_FLIPPED)
-
-clobber_psm:
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\security
-	nmake -f makefile.win clobber_all
-
-clobber_xpconnect:
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\.
-	-rd /s /q dist
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\nsprpub
-	gmake -f gmakefile.win clobber_all  MOZ_SRC_FLIPPED=$(MOZ_SRC_FLIPPED)
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\include
-	nmake -f makefile.win clobber_all
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\modules\libreg
-	nmake -f makefile.win clobber_all
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\string
-	nmake -f makefile.win clobber_all
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\xpcom
-	nmake -f makefile.win clobber_all
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\js
-	nmake -f makefile.win clobber_all
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\js\src\xpconnect
-	nmake -f makefile.win clobber_all
-
-clobber_seamonkey:
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\.
-	-rd /s /q dist
-	nmake -f makefile.win clobber_all 
-
-depend: export
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\.
-	nmake -f makefile.win depend 
-
-depend_xpconnect:
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\include
-	nmake -f makefile.win depend
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\modules\libreg
-	nmake -f makefile.win depend
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\string
-	nmake -f makefile.win depend
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\xpcom
-	nmake -f makefile.win depend
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\js\src
-	nmake -f makefile.win depend
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\js\src\xpconnect
-	nmake -f makefile.win depend
-
-build_nspr: 
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\nsprpub
-	gmake -f gmakefile.win MOZ_SRC_FLIPPED=$(MOZ_SRC_FLIPPED)
-
-build_ldapcsdk:
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\directory\c-sdk
-	gmake -f gmakefile.win MOZ_SRC_FLIPPED=$(MOZ_SRC_FLIPPED) SHELL=sh
-
-build_psm:
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\security
-	nmake -f makefile.win 
-
-build_xpconnect: build_nspr
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\include
-	nmake -f makefile.win all
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\modules\libreg
-	nmake -f makefile.win all
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\xpcom
-	nmake -f makefile.win export
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\string
-	nmake -f makefile.win all
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\xpcom
-	nmake -f makefile.win libs
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\js\src
-	nmake -f makefile.win all
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\js\src\xpconnect
-	nmake -f makefile.win all
-
-build_seamonkey:
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\.
-	nmake -f makefile.win all
-
-build_client:
-	@cd $(MOZ_SRC)\mozilla\.
-	nmake -f makefile.win all
-
-build_layout:
-	@cd $(MOZ_SRC)\mozilla\.
-	nmake -f makefile.win all
-
-build_dist:
-	@cd $(MOZ_SRC)\mozilla\.
-	nmake -f makefile.win all
-
-libs:
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\.
-	nmake -f makefile.win libs
-
-export: build_nspr build_ldapcsdk
-	@cd $(MOZ_SRC)\$(MOZ_TOP)\.
-	nmake -f makefile.win export
-
-clobber_dist:
-	@cd $(MOZ_SRC)\mozilla\.
-	nmake -f makefile.win clobber_all
-
-clobber_client:
-	@cd $(MOZ_SRC)\mozilla\.
-	nmake -f makefile.win clobber_all
-
-clobber_layout:
-	@cd $(MOZ_SRC)\mozilla\.
-	nmake -f makefile.win clobber_all
-
-browse_info::
-	cd $(MOZ_SRC)\$(MOZ_TOP)
-	-dir /s /b *.sbr > sbrlist.tmp
-	-bscmake /Es /o mozilla.bsc @sbrlist.tmp
-	-rm sbrlist.tmp
-
-regchrome::
-	@cd $(MOZ_SRC)\mozilla\.
-	nmake /f makefile.win regchrome
-
-deliver::
-	@cd $(MOZ_SRC)\mozilla\.
-	nmake /f makefile.win splitsymbols
-
-#//------------------------------------------------------------------------
-#// Utility stuff...
-#//------------------------------------------------------------------------
-
-#//------------------------------------------------------------------------
-# Verify that MOZ_SRC is set correctly
-#//------------------------------------------------------------------------
-
-# Check to see if it is set at all
-!if "$(MOZ_SRC)"==""
-MOZ_SRC = $(MAKEDIR)\..
-!endif
-
-#
-# create a temp file at the root and make sure it is visible from MOZ_SRC
-#
-!if [copy $(MAKEDIR)\client.mak $(MAKEDIR)\xyzzy.tmp > NUL] == 0
-!endif
-
-!if !EXIST( $(MOZ_SRC)\mozilla\xyzzy.tmp )
-ERR_MESSAGE=$(ERR_MESSAGE)^
-MOZ_SRC isn't set correctly: [$(MOZ_SRC)\mozilla]!=[$(MAKEDIR)]
-!endif
-
-!if [del $(MAKEDIR)\xyzzy.tmp]
-!endif
-
-#//------------------------------------------------------------------------
-# Verify that MOZ_BITS is set
-#//------------------------------------------------------------------------
-!if !defined(MOZ_BITS)
-ERR_MESSAGE=$(ERR_MESSAGE)^
-Environment variable MOZ_BITS isn't set.
-!endif
-
-!if !defined(MOZ_TOOLS)
-ERR_MESSAGE=$(ERR_MESSAGE)^
-Environment variable MOZ_TOOLS isn't set.
-!endif
-
-
-#//------------------------------------------------------------------------
-#// Display error 
-#//------------------------------------------------------------------------
-
-!if "$(ERR_MESSAGE)" != ""
-ERR_MESSAGE = ^
-client.mak:  ^
-$(ERR_MESSAGE) ^
-^
-client.mak: usage^
-^
-nmake -f client.mak [MOZ_BRANCH=<cvs_branch_name>] ^
-		    [MOZ_DATE=<cvs_date>]^
-		    [pull_and_build_all]^
-		    [pull_all]^
-		    [build_all]^
-^
-Environment variables:^
-^
-MOZ_BITS    set to 32^
-MOZ_TOOLS   set to the directory containing the needed tools ^
-
-!ERROR $(ERR_MESSAGE)
-
-!endif

mozilla/client.mk

@@ -1,650 +0,0 @@
-# The contents of this file are subject to the Netscape Public
-# License Version 1.1 (the "License"); you may not use this file
-# except in compliance with the License. You may obtain a copy of
-# the License at http://www.mozilla.org/NPL/
-#
-# Software distributed under the License is distributed on an "AS
-# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
-# implied. See the License for the specific language governing
-# rights and limitations under the License.
-#
-# The Original Code is mozilla.org code.
-#
-# The Initial Developer of the Original Code is Netscape
-# Communications Corporation.  Portions created by Netscape are
-# Copyright (C) 1998 Netscape Communications Corporation. All
-# Rights Reserved.
-#
-# Contributor(s): Stephen Lamm
-
-# Build the Mozilla client.
-#
-# This needs CVSROOT set to work, e.g.,
-#   setenv CVSROOT :pserver:anonymous@cvs-mirror.mozilla.org:/cvsroot
-# or
-#   setenv CVSROOT :pserver:username%somedomain.org@cvs.mozilla.org:/cvsroot
-# 
-# To checkout and build a tree,
-#    1. cvs co mozilla/client.mk
-#    2. cd mozilla
-#    3. gmake -f client.mk
-#
-# Other targets (gmake -f client.mk [targets...]),
-#    checkout
-#    build
-#    clean (realclean is now the same as clean)
-#    distclean
-#
-# See http://www.mozilla.org/build/unix.html for more information.
-#
-# Options:
-#   MOZ_OBJDIR           - Destination object directory
-#   MOZ_CO_DATE          - Date tag to use for checkout (default: none)
-#   MOZ_CO_MODULE        - Module to checkout (default: SeaMonkeyAll)
-#   MOZ_CVS_FLAGS        - Flags to pass cvs (default: -q -z3)
-#   MOZ_CO_FLAGS         - Flags to pass after 'cvs co' (default: -P)
-#   MOZ_MAKE_FLAGS       - Flags to pass to $(MAKE)
-#   MOZ_CO_BRANCH        - Branch tag (Deprecated. Use MOZ_CO_TAG below.)
-#
-
-#######################################################################
-# Checkout Tags
-#
-# For branches, uncomment the MOZ_CO_TAG line with the proper tag,
-# and commit this file on that tag.
-MOZ_CO_TAG = NETSCAPE_7_0_RTM
-NSPR_CO_TAG = NETSCAPE_7_0_RTM
-PSM_CO_TAG = NETSCAPE_7_0_RTM
-NSS_CO_TAG = NETSCAPE_7_0_RTM
-LDAPCSDK_CO_TAG = NETSCAPE_7_0_RTM
-ACCESSIBLE_CO_TAG = NETSCAPE_7_0_RTM
-GFX2_CO_TAG = NETSCAPE_7_0_RTM
-IMGLIB2_CO_TAG = NETSCAPE_7_0_RTM
-BUILD_MODULES = all
-
-#######################################################################
-# Defines
-#
-CVS = cvs
-
-CWD := $(shell pwd)
-
-ifeq "$(CWD)" "/"
-CWD   := /.
-endif
-
-ifneq (, $(wildcard client.mk))
-# Ran from mozilla directory
-ROOTDIR   := $(shell dirname $(CWD))
-TOPSRCDIR := $(CWD)
-else
-# Ran from mozilla/.. directory (?)
-ROOTDIR   := $(CWD)
-TOPSRCDIR := $(CWD)/mozilla
-endif
-
-# on os2, TOPSRCDIR may have two forward slashes in a row, which doesn't
-#  work;  replace first instance with one forward slash
-TOPSRCDIR := $(shell echo "$(TOPSRCDIR)" | sed -e 's%//%/%')
-
-ifndef TOPSRCDIR_MOZ
-TOPSRCDIR_MOZ=$(TOPSRCDIR)
-endif
-
-# if ROOTDIR equals only drive letter (i.e. "C:"), set to "/"
-DIRNAME := $(shell echo "$(ROOTDIR)" | sed -e 's/^.://')
-ifeq ($(DIRNAME),)
-ROOTDIR := /.
-endif
-
-AUTOCONF := autoconf
-MKDIR := mkdir
-SH := /bin/sh
-ifndef MAKE
-MAKE := gmake
-endif
-
-CONFIG_GUESS_SCRIPT := $(wildcard $(TOPSRCDIR)/build/autoconf/config.guess)
-ifdef CONFIG_GUESS_SCRIPT
-  CONFIG_GUESS = $(shell $(CONFIG_GUESS_SCRIPT))
-else
-  _IS_FIRST_CHECKOUT := 1
-endif
-
-####################################
-# CVS
-
-# Add the CVS root to CVS_FLAGS if needed
-CVS_ROOT_IN_TREE := $(shell cat $(TOPSRCDIR)/CVS/Root 2>/dev/null)
-ifneq ($(CVS_ROOT_IN_TREE),)
-ifneq ($(CVS_ROOT_IN_TREE),$(CVSROOT))
-  CVS_FLAGS := -d $(CVS_ROOT_IN_TREE)
-endif
-endif
-
-CVSCO = $(strip $(CVS) $(CVS_FLAGS) co $(CVS_CO_FLAGS))
-CVSCO_LOGFILE := $(ROOTDIR)/cvsco.log
-CVSCO_LOGFILE := $(shell echo $(CVSCO_LOGFILE) | sed s%//%/%)
-
-ifdef MOZ_CO_TAG
-  CVS_CO_FLAGS := -r $(MOZ_CO_TAG)
-endif
-
-####################################
-# Load mozconfig Options
-
-# See build pages, http://www.mozilla.org/build/unix.html, 
-# for how to set up mozconfig.
-MOZCONFIG_LOADER := mozilla/build/autoconf/mozconfig2client-mk
-MOZCONFIG_FINDER := mozilla/build/autoconf/mozconfig-find 
-MOZCONFIG_MODULES := mozilla/build/unix/modules.mk
-run_for_side_effects := \
-  $(shell cd $(ROOTDIR); \
-     if test "$(_IS_FIRST_CHECKOUT)"; then \
-        $(CVSCO) $(MOZCONFIG_FINDER) $(MOZCONFIG_LOADER) $(MOZCONFIG_MODULES); \
-     else true; \
-     fi; \
-     $(MOZCONFIG_LOADER) $(TOPSRCDIR) mozilla/.mozconfig.mk > mozilla/.mozconfig.out)
-include $(TOPSRCDIR)/.mozconfig.mk
-include $(TOPSRCDIR)/build/unix/modules.mk
-
-####################################
-# Options that may come from mozconfig
-
-# Change CVS flags if anonymous root is requested
-ifdef MOZ_CO_USE_MIRROR
-  CVS_FLAGS := -d :pserver:anonymous@cvs-mirror.mozilla.org:/cvsroot
-endif
-
-# MOZ_CVS_FLAGS - Basic CVS flags
-ifeq "$(origin MOZ_CVS_FLAGS)" "undefined"
-  CVS_FLAGS := $(CVS_FLAGS) -q -z 3 
-else
-  CVS_FLAGS := $(MOZ_CVS_FLAGS)
-endif
-
-# This option is deprecated. The best way to have client.mk pull a tag
-# is to set MOZ_CO_TAG (see above) and commit that change on the tag.
-ifdef MOZ_CO_BRANCH
-  $(warning Use MOZ_CO_TAG instead of MOZ_CO_BRANCH)
-  CVS_CO_FLAGS := -r $(MOZ_CO_BRANCH)
-endif
-
-# MOZ_CO_FLAGS - Anything that we should use on all checkouts
-ifeq "$(origin MOZ_CO_FLAGS)" "undefined"
-  CVS_CO_FLAGS := $(CVS_CO_FLAGS) -P
-else
-  CVS_CO_FLAGS := $(CVS_CO_FLAGS) $(MOZ_CO_FLAGS)
-endif
-
-ifdef MOZ_CO_DATE
-  CVS_CO_DATE_FLAGS := -D "$(MOZ_CO_DATE)"
-endif
-
-ifdef MOZ_OBJDIR
-  OBJDIR := $(MOZ_OBJDIR)
-  MOZ_MAKE := $(MAKE) $(MOZ_MAKE_FLAGS) -C $(OBJDIR)
-else
-  OBJDIR := $(TOPSRCDIR)
-  MOZ_MAKE := $(MAKE) $(MOZ_MAKE_FLAGS)
-endif
-
-####################################
-# CVS defines for PSM
-#
-PSM_CO_MODULE= mozilla/security/manager
-PSM_CO_FLAGS := -P -A
-ifdef MOZ_CO_FLAGS
-  PSM_CO_FLAGS := $(MOZ_CO_FLAGS)
-endif
-ifdef PSM_CO_TAG
-  PSM_CO_FLAGS := $(PSM_CO_FLAGS) -r $(PSM_CO_TAG)
-endif
-CVSCO_PSM = $(CVS) $(CVS_FLAGS) co $(PSM_CO_FLAGS) $(CVS_CO_DATE_FLAGS) $(PSM_CO_MODULE)
-
-####################################
-# CVS defines for NSS
-#
-NSS_CO_MODULE = mozilla/security/nss \
-		mozilla/security/coreconf \
-		$(NULL)
-
-NSS_CO_FLAGS := -P
-ifdef MOZ_CO_FLAGS
-  NSS_CO_FLAGS := $(MOZ_CO_FLAGS)
-endif
-ifdef NSS_CO_TAG
-   NSS_CO_FLAGS := $(NSS_CO_FLAGS) -r $(NSS_CO_TAG)
-endif
-# Cannot pull static tags by date
-ifeq ($(NSS_CO_TAG),NSS_CLIENT_TAG)
-CVSCO_NSS = $(CVS) $(CVS_FLAGS) co $(NSS_CO_FLAGS) $(NSS_CO_MODULE)
-else
-CVSCO_NSS = $(CVS) $(CVS_FLAGS) co $(NSS_CO_FLAGS) $(CVS_CO_DATE_FLAGS) $(NSS_CO_MODULE)
-endif
-
-####################################
-# CVS defines for NSPR
-#
-NSPR_CO_MODULE = mozilla/nsprpub
-NSPR_CO_FLAGS := -P
-ifdef MOZ_CO_FLAGS
-  NSPR_CO_FLAGS := $(MOZ_CO_FLAGS)
-endif
-ifdef NSPR_CO_TAG
-  NSPR_CO_FLAGS := $(NSPR_CO_FLAGS) -r $(NSPR_CO_TAG)
-endif
-# Cannot pull static tags by date
-ifeq ($(NSPR_CO_TAG),NSPRPUB_CLIENT_TAG)
-CVSCO_NSPR = $(CVS) $(CVS_FLAGS) co $(NSPR_CO_FLAGS) $(NSPR_CO_MODULE)
-else
-CVSCO_NSPR = $(CVS) $(CVS_FLAGS) co $(NSPR_CO_FLAGS) $(CVS_CO_DATE_FLAGS) $(NSPR_CO_MODULE)
-endif
-
-####################################
-# CVS defines for the C LDAP SDK
-#
-LDAPCSDK_CO_MODULE = mozilla/directory/c-sdk
-LDAPCSDK_CO_FLAGS := -P
-ifdef MOZ_CO_FLAGS
-  LDAPCSDK_CO_FLAGS := $(MOZ_CO_FLAGS)
-endif
-ifdef LDAPCSDK_CO_TAG
-  LDAPCSDK_CO_FLAGS := $(LDAPCSDK_CO_FLAGS) -r $(LDAPCSDK_CO_TAG)
-endif
-CVSCO_LDAPCSDK = $(CVS) $(CVS_FLAGS) co $(LDAPCSDK_CO_FLAGS) $(CVS_CO_DATE_FLAGS) $(LDAPCSDK_CO_MODULE)
-
-####################################
-# CVS defines for the C LDAP SDK
-#
-ACCESSIBLE_CO_MODULE = mozilla/accessible
-ACCESSIBLE_CO_FLAGS := -P
-ifdef MOZ_CO_FLAGS
-  ACCESSIBLE_CO_FLAGS := $(MOZ_CO_FLAGS)
-endif
-ifdef ACCESSIBLE_CO_TAG
-  ACCESSIBLE_CO_FLAGS := $(ACCESSIBLE_CO_FLAGS) -r $(ACCESSIBLE_CO_TAG)
-endif
-CVSCO_ACCESSIBLE = $(CVS) $(CVS_FLAGS) co $(ACCESSIBLE_CO_FLAGS) $(CVS_CO_DATE_FLAGS) $(ACCESSIBLE_CO_MODULE)
-
-####################################
-# CVS defines for gfx2
-#
-GFX2_CO_MODULE = mozilla/gfx2
-GFX2_CO_FLAGS := -P
-ifdef MOZ_CO_FLAGS
-  GFX2_CO_FLAGS := $(MOZ_CO_FLAGS)
-endif
-ifdef GFX2_CO_TAG
-  GFX2_CO_FLAGS := $(GFX2_CO_FLAGS) -r $(GFX2_CO_TAG)
-endif
-CVSCO_GFX2 = $(CVS) $(CVS_FLAGS) co $(GFX2_CO_FLAGS) $(CVS_CO_DATE_FLAGS) $(GFX2_CO_MODULE)
-
-####################################
-# CVS defines for new image library
-#
-IMGLIB2_CO_MODULE = mozilla/modules/libpr0n
-IMGLIB2_CO_FLAGS := -P
-ifdef MOZ_CO_FLAGS
-  IMGLIB2_CO_FLAGS := $(MOZ_CO_FLAGS)
-endif
-ifdef IMGLIB2_CO_TAG
-  IMGLIB2_CO_FLAGS := $(IMGLIB2_CO_FLAGS) -r $(IMGLIB2_CO_TAG)
-endif
-CVSCO_IMGLIB2 = $(CVS) $(CVS_FLAGS) co $(IMGLIB2_CO_FLAGS) $(CVS_CO_DATE_FLAGS) $(IMGLIB2_CO_MODULE)
-
-####################################
-# CVS defines for standalone modules
-#
-ifneq ($(BUILD_MODULES),all)
-  MOZ_CO_MODULE := $(filter-out $(NSPRPUB_DIR) security directory/c-sdk, $(BUILD_MODULE_CVS))
-  MOZ_CO_MODULE += allmakefiles.sh client.mk aclocal.m4 configure configure.in
-  MOZ_CO_MODULE += Makefile.in
-  MOZ_CO_MODULE := $(addprefix mozilla/, $(MOZ_CO_MODULE))
-
-  NOSUBDIRS_MODULE := $(addprefix mozilla/, $(BUILD_MODULE_CVS_NS))
-ifneq ($(NOSUBDIRS_MODULE),)
-  CVSCO_NOSUBDIRS := $(CVSCO) -l $(CVS_CO_DATE_FLAGS) $(NOSUBDIRS_MODULE)
-endif
-
-ifeq (,$(filter $(NSPRPUB_DIR), $(BUILD_MODULE_CVS)))
-  CVSCO_NSPR :=
-endif
-ifeq (,$(filter security security/manager, $(BUILD_MODULE_CVS)))
-  CVSCO_PSM :=
-  CVSCO_NSS :=
-endif
-ifeq (,$(filter directory/c-sdk, $(BUILD_MODULE_CVS)))
-  CVSCO_LDAPCSDK :=
-endif
-ifeq (,$(filter accessible, $(BUILD_MODULE_CVS)))
-  CVSCO_ACCESSIBLE :=
-endif
-ifeq (,$(filter gfx2, $(BUILD_MODULE_CVS)))
-  CVSCO_GFX2 :=
-endif
-ifeq (,$(filter modules/libpr0n, $(BUILD_MODULE_CVS)))
-  CVSCO_IMGLIB2 :=
-endif
-endif
-
-####################################
-# CVS defines for SeaMonkey
-#
-ifeq ($(MOZ_CO_MODULE),)
-  MOZ_CO_MODULE := SeaMonkeyAll
-endif
-CVSCO_SEAMONKEY := $(CVSCO) $(CVS_CO_DATE_FLAGS) $(MOZ_CO_MODULE)
-
-####################################
-# CVS defined for libart (pulled and built if MOZ_INTERNAL_LIBART_LGPL is set)
-#
-CVSCO_LIBART := $(CVSCO) $(CVS_CO_DATE_FLAGS) mozilla/other-licenses/libart_lgpl
-
-ifdef MOZ_INTERNAL_LIBART_LGPL
-FASTUPDATE_LIBART := fast_update $(CVSCO_LIBART)
-CHECKOUT_LIBART := cvs_co $(CVSCO_LIBART)
-else
-CHECKOUT_LIBART := true
-FASTUPDATE_LIBART := true
-endif
-
-####################################
-# CVS defines for Calendar (pulled and built if MOZ_CALENDAR is set)
-#
-CVSCO_CALENDAR := $(CVSCO) $(CVS_CO_DATE_FLAGS) mozilla/calendar
-
-ifdef MOZ_CALENDAR
-FASTUPDATE_CALENDAR := fast_update $(CVSCO_CALENDAR)
-CHECKOUT_CALENDAR := cvs_co $(CVSCO_CALENDAR)
-else
-CHECKOUT_CALENDAR := true
-FASTUPDATE_CALENDAR := true
-endif
-
-
-# because some cygwin tools can't handle native dos-drive paths & vice-versa
-# force configure to use a relative path for --srcdir
-# need a better check for win32
-# and we need to get OBJDIR earlier
-ifdef MOZ_TOOLS
-_tmpobjdir := $(shell cygpath -u $(OBJDIR))
-_abs2rel := $(shell cygpath -w $(TOPSRCDIR)/build/unix/abs2rel.pl | sed -e 's|\\|/|g')
-_OBJ2SRCPATH := $(shell $(_abs2rel) $(TOPSRCDIR) $(_tmpobjdir))
-endif 
-
-#######################################################################
-# Rules
-# 
-
-# Print out any options loaded from mozconfig.
-all build checkout clean depend distclean export libs install realclean::
-	@if test -f .mozconfig.out; then \
-	  cat .mozconfig.out; \
-	  rm -f .mozconfig.out; \
-	else true; \
-	fi
-
-ifdef _IS_FIRST_CHECKOUT
-all:: checkout build
-else
-all:: checkout alldep
-endif
-
-# Windows equivalents
-pull_all: checkout
-build_all: build
-build_all_dep: alldep
-build_all_depend: alldep
-clobber clobber_all: clean
-pull_and_build_all: checkout alldep
-
-# Do everything from scratch
-everything: checkout clean build
-
-####################################
-# CVS checkout
-#
-checkout::
-#	@: Backup the last checkout log.
-	@if test -f $(CVSCO_LOGFILE) ; then \
-	  mv $(CVSCO_LOGFILE) $(CVSCO_LOGFILE).old; \
-	else true; \
-	fi
-ifdef RUN_AUTOCONF_LOCALLY
-	@echo "Removing local configures" ; \
-	cd $(ROOTDIR) && \
-	$(RM) -f mozilla/configure mozilla/nsprpub/configure \
-		mozilla/directory/c-sdk/configure
-endif
-	@echo "checkout start: "`date` | tee $(CVSCO_LOGFILE)
-	@echo '$(CVSCO) mozilla/client.mk mozilla/build/unix/modules.mk'; \
-        cd $(ROOTDIR) && \
-	$(CVSCO) mozilla/client.mk mozilla/build/unix/modules.mk
-	@cd $(ROOTDIR) && $(MAKE) -f mozilla/client.mk real_checkout
-
-real_checkout:
-#	@: Start the checkout. Split the output to the tty and a log file. \
-#	 : If it fails, touch an error file because "tee" hides the error.
-	@failed=.cvs-failed.tmp; rm -f $$failed*; \
-	cvs_co() { echo "$$@" ; \
-	  ("$$@" || touch $$failed) 2>&1 | tee -a $(CVSCO_LOGFILE) && \
-	  if test -f $$failed; then false; else true; fi; }; \
-	cvs_co $(CVSCO_NSPR) && \
-	cvs_co $(CVSCO_NSS) && \
-	cvs_co $(CVSCO_PSM) && \
-        cvs_co $(CVSCO_LDAPCSDK) && \
-        cvs_co $(CVSCO_ACCESSIBLE) && \
-        cvs_co $(CVSCO_GFX2) && \
-        cvs_co $(CVSCO_IMGLIB2) && \
-	$(CHECKOUT_CALENDAR) && \
-	$(CHECKOUT_LIBART) && \
-	cvs_co $(CVSCO_SEAMONKEY) && \
-	cvs_co $(CVSCO_NOSUBDIRS)
-	@echo "checkout finish: "`date` | tee -a $(CVSCO_LOGFILE)
-#	@: Check the log for conflicts. ;
-	@conflicts=`egrep "^C " $(CVSCO_LOGFILE)` ;\
-	if test "$$conflicts" ; then \
-	  echo "$(MAKE): *** Conflicts during checkout." ;\
-	  echo "$$conflicts" ;\
-	  echo "$(MAKE): Refer to $(CVSCO_LOGFILE) for full log." ;\
-	  false; \
-	else true; \
-	fi
-ifdef RUN_AUTOCONF_LOCALLY
-	@echo Generating configures using $(AUTOCONF) ; \
-	cd $(TOPSRCDIR) && $(AUTOCONF) && \
-	cd $(TOPSRCDIR)/nsprpub && $(AUTOCONF) && \
-	cd $(TOPSRCDIR)/directory/c-sdk && $(AUTOCONF)
-endif
-
-fast-update:
-#	@: Backup the last checkout log.
-	@if test -f $(CVSCO_LOGFILE) ; then \
-	  mv $(CVSCO_LOGFILE) $(CVSCO_LOGFILE).old; \
-	else true; \
-	fi
-ifdef RUN_AUTOCONF_LOCALLY
-	@echo "Removing local configures" ; \
-	cd $(ROOTDIR) && \
-	$(RM) -f mozilla/configure mozilla/nsprpub/configure \
-		mozilla/directory/c-sdk/configure
-endif
-	@echo "checkout start: "`date` | tee $(CVSCO_LOGFILE)
-	@echo '$(CVSCO) mozilla/client.mk mozilla/build/unix/modules.mk'; \
-        cd $(ROOTDIR) && \
-	$(CVSCO) mozilla/client.mk mozilla/build/unix/modules.mk
-	@cd $(TOPSRCDIR) && \
-	$(MAKE) -f client.mk real_fast-update
-
-real_fast-update:
-#	@: Start the update. Split the output to the tty and a log file. \
-#	 : If it fails, touch an error file because "tee" hides the error.
-	@failed=.fast_update-failed.tmp; rm -f $$failed*; \
-	fast_update() { (config/cvsco-fast-update.pl $$@ || touch $$failed) 2>&1 | tee -a $(CVSCO_LOGFILE) && \
-	  if test -f $$failed; then false; else true; fi; }; \
-	cvs_co() { echo "$$@" ; \
-	  ("$$@" || touch $$failed) 2>&1 | tee -a $(CVSCO_LOGFILE) && \
-	  if test -f $$failed; then false; else true; fi; }; \
-	fast_update $(CVSCO_NSPR) && \
-	cd $(ROOTDIR) && \
-	failed=mozilla/.fast_update-failed.tmp && \
-	cvs_co $(CVSCO_NSS) && \
-	failed=.fast_update-failed.tmp && \
-	cd mozilla && \
-	fast_update $(CVSCO_PSM) && \
-	fast_update $(CVSCO_LDAPCSDK) && \
-	fast_update $(CVSCO_ACCESSIBLE) && \
-	fast_update $(CVSCO_GFX2) && \
-	fast_update $(CVSCO_IMGLIB2) && \
-	$(FASTUPDATE_CALENDAR) && \
-	$(FASTUPDATE_LIBART) && \
-	fast_update $(CVSCO_SEAMONKEY) && \
-	fast_update $(CVSCO_NOSUBDIRS)
-	@echo "fast_update finish: "`date` | tee -a $(CVSCO_LOGFILE)
-#	@: Check the log for conflicts. ;
-	@conflicts=`egrep "^C " $(CVSCO_LOGFILE)` ;\
-	if test "$$conflicts" ; then \
-	  echo "$(MAKE): *** Conflicts during fast-update." ;\
-	  echo "$$conflicts" ;\
-	  echo "$(MAKE): Refer to $(CVSCO_LOGFILE) for full log." ;\
-	  false; \
-	else true; \
-	fi
-ifdef RUN_AUTOCONF_LOCALLY
-	@echo Generating configures using $(AUTOCONF) ; \
-	cd $(TOPSRCDIR) && $(AUTOCONF) && \
-	cd $(TOPSRCDIR)/nsprpub && $(AUTOCONF) && \
-	cd $(TOPSRCDIR)/directory/c-sdk && $(AUTOCONF)
-endif
-
-####################################
-# Web configure
-
-WEBCONFIG_FILE  := $(HOME)/.mozconfig
-
-MOZCONFIG2CONFIGURATOR := build/autoconf/mozconfig2configurator
-webconfig:
-	@cd $(TOPSRCDIR); \
-	url=`$(MOZCONFIG2CONFIGURATOR) $(TOPSRCDIR)`; \
-	echo Running mozilla with the following url: ;\
-	echo ;\
-	echo $$url ;\
-	mozilla -remote "openURL($$url)" || \
-	netscape -remote "openURL($$url)" || \
-	mozilla $$url || \
-	netscape $$url ;\
-	echo ;\
-	echo   1. Fill out the form on the browser. ;\
-	echo   2. Save the results to $(WEBCONFIG_FILE)
-
-#####################################################
-# First Checkout
-
-ifdef _IS_FIRST_CHECKOUT
-# First time, do build target in a new process to pick up new files.
-build::
-	$(MAKE) -f $(TOPSRCDIR)/client.mk build
-else
-
-#####################################################
-# After First Checkout
-
-
-####################################
-# Configure
-
-CONFIG_STATUS := $(wildcard $(OBJDIR)/config.status)
-CONFIG_CACHE  := $(wildcard $(OBJDIR)/config.cache)
-
-ifdef RUN_AUTOCONF_LOCALLY
-EXTRA_CONFIG_DEPS := \
-	$(TOPSRCDIR)/aclocal.m4 \
-	$(wildcard $(TOPSRCDIR)/build/autoconf/*.m4) \
-	$(NULL)
-
-$(TOPSRCDIR)/configure: $(TOPSRCDIR)/configure.in $(EXTRA_CONFIG_DEPS)
-	@echo Generating $@ using autoconf
-	cd $(TOPSRCDIR); $(AUTOCONF)
-endif
-
-CONFIG_STATUS_DEPS_L10N := $(wildcard $(TOPSRCDIR)/l10n/makefiles.all)
-
-CONFIG_STATUS_DEPS := \
-	$(TOPSRCDIR)/configure \
-	$(TOPSRCDIR)/allmakefiles.sh \
-	$(TOPSRCDIR)/.mozconfig.mk \
-	$(wildcard $(TOPSRCDIR)/nsprpub/configure) \
-	$(wildcard $(TOPSRCDIR)/directory/c-sdk/configure) \
-	$(wildcard $(TOPSRCDIR)/mailnews/makefiles) \
-	$(CONFIG_STATUS_DEPS_L10N) \
-	$(wildcard $(TOPSRCDIR)/themes/makefiles) \
-	$(NULL)
-
-# configure uses the program name to determine @srcdir@. Calling it without
-#   $(TOPSRCDIR) will set @srcdir@ to "."; otherwise, it is set to the full
-#   path of $(TOPSRCDIR).
-ifeq ($(TOPSRCDIR),$(OBJDIR))
-  CONFIGURE := ./configure
-else
-  CONFIGURE := $(TOPSRCDIR)/configure
-endif
-
-ifdef _OBJ2SRCPATH
-CONFIGURE_ARGS := --srcdir=$(_OBJ2SRCPATH) $(CONFIGURE_ARGS)
-endif
-
-$(OBJDIR)/Makefile $(OBJDIR)/config.status: $(CONFIG_STATUS_DEPS)
-	@if test ! -d $(OBJDIR); then $(MKDIR) $(OBJDIR); else true; fi
-	@echo cd $(OBJDIR);
-	@echo $(CONFIGURE) $(CONFIGURE_ARGS)
-	@cd $(OBJDIR) && $(CONFIGURE_ENV_ARGS) $(CONFIGURE) $(CONFIGURE_ARGS) \
-	  || ( echo "*** Fix above errors and then restart with\
-               \"$(MAKE) -f client.mk build\"" && exit 1 )
-	@touch $(OBJDIR)/Makefile
-
-ifdef CONFIG_STATUS
-$(OBJDIR)/config/autoconf.mk: $(TOPSRCDIR)/config/autoconf.mk.in
-	cd $(OBJDIR); \
-	  CONFIG_FILES=config/autoconf.mk ./config.status
-endif
-
-
-####################################
-# Depend
-
-depend:: $(OBJDIR)/Makefile $(OBJDIR)/config.status
-	$(MOZ_MAKE) export && $(MOZ_MAKE) depend
-
-####################################
-# Build it
-
-build::  $(OBJDIR)/Makefile $(OBJDIR)/config.status
-	$(MOZ_MAKE)
-
-####################################
-# Other targets
-
-# Pass these target onto the real build system
-install export libs clean realclean distclean alldep:: $(OBJDIR)/Makefile $(OBJDIR)/config.status
-	$(MOZ_MAKE) $@
-
-cleansrcdir:
-	@cd $(TOPSRCDIR); \
-        if [ -f webshell/embed/gtk/Makefile ]; then \
-          $(MAKE) -C webshell/embed/gtk distclean; \
-        fi; \
-	if [ -f Makefile ]; then \
-	  $(MAKE) distclean ; \
-	else \
-	  echo "Removing object files from srcdir..."; \
-	  rm -fr `find . -type d \( -name .deps -print -o -name CVS \
-	          -o -exec test ! -d {}/CVS \; \) -prune \
-	          -o \( -name '*.[ao]' -o -name '*.so' \) -type f -print`; \
-	   build/autoconf/clean-config.sh; \
-	fi;
-
-# (! IS_FIRST_CHECKOUT)
-endif
-
-.PHONY: checkout real_checkout depend build export libs alldep install clean realclean distclean cleansrcdir pull_all build_all clobber clobber_all pull_and_build_all everything

mozilla/xpinstall/packager/windows/browser.jst

@@ -0,0 +1,80 @@
+function updateWinReg()
+{
+  //Notes:
+  // can't use a double backslash before subkey - Windows already puts it in.
+  // subkeys have to exist before values can be put in.
+  var winreg = getWinRegistry();
+  var subkey;  //the name of the subkey you are poking around in
+  var valname; // the name of the value you want to look at
+  var value;   //the data in the value you want to look at.
+
+  if(winreg != null) 
+  {
+    winreg.setRootKey(winreg.HKEY_LOCAL_MACHINE);
+    subkey  = "SOFTWARE\\Netscape\\Netscape Seamonkey";
+    winreg.createKey(subkey,"");
+    valname = "CurrentVersion";
+    value   = "$UserAgent$";
+    err     = winreg.setValueString(subkey, valname, value);
+
+    subkey  = "SOFTWARE\\Netscape\\Netscape Seamonkey\\$UserAgent$\\Main";
+    winreg.createKey(subkey,"");
+    valname = "Install Directory";
+    value   = communicatorFolder;
+    err     = winreg.setValueString(subkey, valname, value);
+
+    // set the App Paths key here
+    subkey  = "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\App Paths\\mozilla.exe";
+    winreg.createKey(subkey,"");
+    valname = "";
+    value   = communicatorFolder + "\\mozilla.exe";
+    err     = winreg.setValueString(subkey, valname, value);
+
+    valname = "Path";
+    value   = communicatorFolder;
+    err     = winreg.setValueString(subkey, valname, value);
+  }
+}
+
+// main
+var srDest;
+var err;
+var communicatorFolder;
+var fWindowsSystem;
+var fileComponentRegStr;
+var fileComponentReg;
+
+srDest = $SpaceRequired$:bin;
+err    = startInstall("Mozilla Seamonkey", "", "$Version$"); 
+logComment("startInstall: " + err);
+
+communicatorFolder = getFolder("Communicator");
+fWindowsSystem     = getFolder("Win System");
+logComment("communicatorFolder: " + communicatorFolder);
+
+if(verifyDiskSpace(communicatorFolder, srDest) == true)
+{
+  err = addDirectory("Program",
+                     "$Version$",
+                     "bin",              // dir name in jar to extract 
+                     communicatorFolder, // Where to put this file (Returned from GetFolder) 
+                     "",                 // subdir name to create relative to communicatorFolder
+                     true);              // Force Flag 
+  logComment("addDirectory() of Program returned: " + err);
+
+  // check return value
+  if(!checkError(err))
+  {
+    fileComponentRegStr = communicatorFolder + "\\component.reg";
+    fileComponentReg    = getFolder("file:///", fileComponentRegStr);
+    err                 = fileDelete(fileComponentReg);
+    logComment("fileDelete() returned: " + err);
+
+    updateWinReg();
+
+    err = finalizeInstall(); 
+    logComment("finalizeInstall() returned: " + err);
+  }
+}
+
+// end main

mozilla/xpinstall/packager/windows/config.it

@@ -0,0 +1,451 @@
+[General]
+; Run Mode values:
+;   Normal - Shows all dialogs.  Requires user input.
+;   Auto   - Shows some dialogs, but none requiring user input.  It will
+;            automatically install the product using default values.
+;   Silent - Show no dialogs at all.  It will install product using default
+;            values.
+Run Mode=Normal
+
+Product Name=Mozilla Seamonkey
+
+; Destination Path values:
+;   PROGRAMFILESDIR
+;   WINDISK
+;   WINDIR
+;   WINSYSDIR
+Path=[PROGRAMFILESDIR]\Netscape\Seamonkey
+
+; Program Folder Path values:
+;   COMMON_STARTUP
+;   COMMON_PROGRAMS
+;   COMMON_STARTMENU
+;   COMMON_DESKTOP
+;
+;   PERSONAL_STARTUP
+;   PERSONAL_PROGRAMS
+;   PERSONAL_STARTMENU
+;   PERSONAL_DESKTOP
+;
+;   PERSONAL_APPDATA
+;   PERSONAL_CACHE
+;   PERSONAL_COOKIES
+;   PERSONAL_FAVORITES
+;   PERSONAL_FONTS
+;   PERSONAL_HISTORY
+;   PERSONAL_NETHOOD
+;   PERSONAL_PERSONAL
+;   PERSONAL_PRINTHOOD (supported only under Windows NT)
+;   PERSONAL_RECENT
+;   PERSONAL_SENDTO
+;   PERSONAL_TEMPLATES
+;
+;   PROGRAMFILESDIR
+;   COMMONFILESDIR
+;   MEDIAPATH
+;   CONFIGPATH (supported only under Windows95 and Windows98)
+;   DEVICEPATH
+Program Folder Name=Mozilla Seamonkey
+Program Folder Path=[COMMON_PROGRAMS]
+
+; Default Setup Type values:
+;   Setup Type 0 - first radio button (default)
+;   Setup Type 1 - second radio button
+;   Setup Type 2 - third radio button
+;   Setup Type 3 - fourth radio button (usually the Custom option)
+Default Setup Type=Setup Type 0
+
+Setup Title0=Mozilla Seamonkey Setup
+Setup Title1=Build $Version$
+Setup Title2=
+
+; HKey:              valid decryptable setup keys are [Mozilla Seamonkey CurrentVersion]
+;                    and [Mozilla Seamonkey CurrentVersion].
+; Decrypt HKey:      there are times when '[' and ']' are valid part of windows registry key names.
+; Contains Filename: tells setup that the path contains filename needed to be removed before
+;                    using it as a path.
+; Verify Existance:  FILE or PATH
+;
+[Locate Previous Product Path0]
+HRoot=HKEY_LOCAL_MACHINE
+HKey=[Netscape Seamonkey CurrentVersion]\Main
+Name=Install Directory
+Decrypt HKey=TRUE
+Contains Filename=FALSE
+Verify Existance=
+
+; This section checks for legacy files.
+; If the file(s), indicated by the Filename= key, is found to have a version of less than the value
+; indicated by the Version= key, then display the string in the Message= key.
+[Legacy Check0]
+Filename=[SETUP PATH]\mozilla.exe
+Version=6.0.0.0
+Message=Setup has detected an old version of Mozilla in the chosen destination path that may pose compatibility issues.  It is highly recommended that a different destination path be used.  Would you like to chose a different path?
+
+[Dialog Welcome]
+Show Dialog=TRUE
+Title=Welcome
+Message0=Welcome to %s Setup.
+Message1=It is strongly recommended that you exit all Windows programs before running this Setup program.
+Message2=Click Cancel to quit Setup and then close any programs you have running.  Click Next to continue the Setup Program.
+
+[Dialog License]
+Show Dialog=FALSE
+Title=Software License Agreement
+License File=license.txt
+Message0=Please read the following license agreement.  Use the scroll bar to view the rest of this agreement.
+Message1=Click Accept if you accept the terms of the preceeding license agreement.  If No is clicked, setup will quit.
+
+[Dialog Setup Type]
+Show Dialog=TRUE
+Title=Setup Type
+Message0=Click the type of Setup you prefer, then click Next.
+Readme Filename=readme.txt
+Readme App=notepad.exe
+
+; at least one Setup Type needs to be set, and up to 4 can be
+; set (Setup Type0, Setup Type1, Setup Type2, Setup Type3).
+[Setup Type0]
+Description Short=B&ase
+Description Long=Program will be installed with the minimal options.
+
+; List of components to install/enable for this Setup Type.
+; All other components not listed here will be disabled if
+; this Setup Type is selected.
+C0=Component0
+C1=Component1
+
+[Setup Type1]
+Description Short=C&omplete
+Description Long=Program will be installed with the most common options.
+
+; List of components to install/enable for this Setup Type.
+; All other components not listed here will be disabled if
+; this Setup Type is selected.
+C0=Component0
+C1=Component1
+C2=Component2
+
+[Setup Type2]
+Description Short=C&ustom
+Description Long=You may choose the options you want to install.  Recommended for advanced users.
+;Description Short=&Pro
+;Description Long=Program will be installed with all the options available.
+
+; List of components to install/enable for this Setup Type.
+; All other components not listed here will be disabled if
+; this Setup Type is selected.
+C0=Component0
+C1=Component1
+C2=Component2
+
+;[Setup Type3]
+;Description Short=C&ustom
+;Description Long=You may choose the options you want to install.  Recommended for advanced users.
+
+; List of components to install/enable for this Setup Type.
+; All other components not listed here will be disabled if
+; this Setup Type is selected.
+;C0=Component0
+;C1=Component1
+;C2=Component2
+;C3=Component3
+
+[Dialog Select Components]
+Show Dialog=TRUE
+Title=Select Components
+Message0=
+
+[Dialog Windows Integration]
+Show Dialog=FALSE
+Title=Windows Integration
+Message0=Check the Mozilla Preference options you would like Setup to perform.
+Message1=These settings allow you to set default Internet preferences for browsing and searching.  They affect browsers installed on your machine, including Mozilla Communicator and Microsoft Internet Explorer.
+
+; Only a maximum of 4 "Windows Integration-Item"s are allowded.  Each Item
+; shows up as a checkbox in the Windows Integration dialog.
+[Windows Integration-Item0]
+CheckBoxState=FALSE
+Description=Make Mozilla Communicator my default Internet browser
+Archive=
+
+[Windows Integration-Item1]
+CheckBoxState=FALSE
+Description=Make Mozilla Netcenter my home page
+Archive=
+
+[Windows Integration-Item2]
+CheckBoxState=FALSE
+Description=Use Mozilla Netcenter to search the Web
+Archive=
+
+[Dialog Program Folder]
+Show Dialog=TRUE
+Title=Program Folder
+Message0=Setup will add program icons to the Program Folder listed below.  You may type a new folder name, or select one from the existing folder list.  Click Next to continue.
+
+[Dialog Start Install]
+Show Dialog=TRUE
+Title=Start Install
+Message0=Setup has enough information to start copying the program files.  If you want to review or change settings, click Back.  If you are satisfied with the current settings, click Install to begin copying files.
+
+[Dialog Reboot]
+; Show Dialog values are:
+;   TRUE  - Always show
+;   FALSE - Don't show unless at least one component has its reboot show value set
+;           to TRUE.  This will not show even if some files were in use and a reboot
+;           is necessary.
+;   AUTO  - Don't show unless a component has its reboot show value set to
+;           TRUE or there was at least one file in use and a reboot is
+;           is required for the file to be replaced correctly.
+Show Dialog=AUTO
+
+; These SmartDownload sections contain information to configure SmartDownload.
+; The info is applied to all components to be downloaded.
+[SmartDownload-Netscape Install]
+;core_file=base.zip
+;core_dir=[SETUP PATH]
+no_ads=true
+silent=false
+execution=false
+confirm_install=false
+;extract_msg=Uncompressing Seamonkey.  Please wait...
+
+[SmartDownload-Proxy]
+
+[SmartDownload-Execution]
+exe=
+exe_param=
+
+[Check Instance0]
+Class Name=NetscapeWindowClass
+Window Name=
+Message=Setup has detected that an instance of Seamonkey is currently running.  Please quit Seamonkey before continuing Setup.
+
+[Check Instance1]
+Process Name=psm.exe
+Message=Setup has detected that an instance of Personal Security Manager is currently running.  Personal Security Manager will quit by itself when there are no other applications running that require it.  A reboot might be necessary.  Setup will then be able to continue.
+
+; These are the components to be offered to the user (shown in the Select
+; Components dialog) for installation.
+; There is no limit to the number of components to install.
+[Component0]
+Description Short=Mozilla Xpinstall Engine
+Description Long=Install Engine
+Archive=core.xpi
+$InstallSize$:core
+$InstallSizeSystem$
+$InstallSizeArchive$:core.xpi
+; Attributes can be the following values:
+;   SELECTED  - the component is selected to be installed by default.
+;   INVISIBLE - the component is not shown in the Select Components dialog.
+Attributes=SELECTED|INVISIBLE
+; url keys can be as many as needed.  url0 is attempted first.  if it fails,
+; the next url key is tried in sequential order.
+; The url should not contain the filename.  Setup will assemble the complete url
+; using the url keys and the Archive key.
+url0=$URLPath$
+
+[Component1]
+Description Short=Mozilla Seamonkey
+Description Long=Browser software for the internet
+Archive=browser.xpi
+$InstallSize$:browser
+$InstallSizeSystem$
+$InstallSizeArchive$:browser.xpi
+Dependency0=Mozilla Xpinstall Engine
+; Attributes can be the following values:
+;   SELECTED  - the component is selected to be installed by default.
+;   INVISIBLE - the component is not shown in the Select Components dialog.
+Attributes=SELECTED|INVISIBLE
+; url keys can be as many as needed.  url0 is attempted first.  if it fails,
+; the next url key is tried in sequential order.
+; The url should not contain the filename.  Setup will assemble the complete url
+; using the url keys and the Archive key.
+url0=$URLPath$
+
+[Component2]
+Description Short=Mail & News
+Description Long=Seamonkey Mail & News
+Archive=mail.xpi
+$InstallSize$:mail
+$InstallSizeSystem$
+$InstallSizeArchive$:mail.xpi
+Dependency0=Mozilla Xpinstall Engine
+; Attributes can be the following values:
+;   SELECTED  - the component is selected to be installed by default.
+;   INVISIBLE - the component is not shown in the Select Components dialog.
+Attributes=SELECTED
+Parameter=
+; url keys can be as many as needed.  url0 is attempted first.  if it fails,
+; the next url key is tried in sequential order.
+; The url should not contain the filename.  Setup will assemble the complete url
+; using the url keys and the Archive key.
+url0=$URLPath$
+
+[Core]
+Source=[XPI PATH]\core.xpi
+Destination=[TEMP]\core.ns
+$InstallSize$:core
+Cleanup=TRUE
+Message=Preparing Install, please wait...
+
+; The Timing key needs to be one of the following values:
+;   pre download     - process before any files have been downloaded.
+;   post download    - process after all files have been downloaded.
+;   pre core         - process before the core file has been uncompressed.
+;   post core        - process after the core file has been uncompressed.
+;   pre smartupdate  - process before the smartupdate engine has been launched.
+;   post smartupdate - process after the smartupdate engine has been launched.
+;   pre launchapp    - process before the launching of executables.
+;   post launchapp   - process after the launching of executables.
+;   depend reboot    - process depending on if a reboot is necessary or not.
+;                      if reboot is necessary, installer can set it up so
+;                      the app runs once upon windows reboot.
+
+;Uncompress FileX sections
+;[Uncompress File0]
+;Timing=post download
+;Source=[XPI PATH]\core.xpi
+;Destination=[SETUP PATH]
+;Message=Configuring Seamonkey, please wait...
+
+;[Uncompress File1]
+;Timing=post download
+;Source=[XPI PATH]\extratest.xpi
+;Destination=[SETUP PATH]
+;Message=Configuring Extra test files, please wait...
+
+;Move FileX sections
+;[Move File0]
+;Timing=post download
+;Source=[SETUP PATH]\bin\*
+;Destination=[SETUP PATH]\program
+
+;[Move File1]
+;Timing=post download
+;Source=[SETUP PATH]\ftmain\*
+;Destination=[SETUP PATH]\program
+
+;Copy FileX sections
+[Copy File0]
+Timing=post launchapp
+Source=[JRE BIN PATH]\npjava*.dll
+Destination=[SETUP PATH]\Plugins
+Fail If Exists=FALSE
+
+;[Copy File1]
+;Timing=post launchapp
+;Source=[TEMP]\xtratest\bin\*.*
+;Destination=[SETUP PATH]
+;Fail If Exists=FALSE
+
+;[Copy File1]
+;Timing=post download
+;Source=[SETUP PATH]\bin\*.exe
+;Destination=[TEMP]
+;Fail If Exists=
+
+;Create DirectoryX sections
+[Create Directory0]
+Timing=post download
+Destination=[SETUP PATH]\Plugins
+
+;[Create Directory1]
+;Timing=post download
+;Destination=[TEMP]\Test\temp
+
+;Delete FileX sections
+[Delete File0]
+Timing=post download
+Destination=[COMMON_PROGRAMS]\Mozilla Seamonkey\Mozilla AppRunner.lnk
+
+;Remove DirectoryX sections
+;[Remove Directory0]
+;Timing=post launchapp
+;Destination=[TEMP]\xtratest
+;Remove subdirs=TRUE
+
+;RunAppX sections
+[RunApp0]
+Timing=depend reboot
+Wait=FALSE
+Target=[SETUP PATH]\mozilla.exe
+Parameters=-installer
+WorkingDir=[SETUP PATH]
+
+; Values for Show Folder:
+;   HIDE             Hides the window and activates another window.
+;   MAXIMIZE         Maximizes the specified window.
+;   MINIMIZE         Minimizes the specified window and activates the next
+;                    top-level window in the z-order.
+;   RESTORE          Activates and displays the window. If the window is
+;                    minimized or maximized, Windows restores it to its
+;                    original size and position. An application should specify
+;                    this flag when restoring a minimized window.
+;   SHOW             Activates the window and displays it in its current size
+;                    and position.
+;   SHOWMAXIMIZED    Activates the window and displays it as a maximized
+;                    window.
+;   SHOWMINIMIZED    Activates the window and displays it as a minimized
+;                    window.
+;   SHOWMINNOACTIVE  Displays the window as a minimized window. The active
+;                    window remains active.
+;   SHOWNA           Displays the window in its current state. The active
+;                    window remains active.
+;   SHOWNOACTIVATE   Displays a window in its most recent size and position.
+;                    The active window remains active.
+;   SHOWNORMAL       Activates and displays a window. If the window is
+;                    minimized or maximized, Windows restores it to its
+;                    original size and position. An application should specify
+;                    this flag when displaying the window for the first time.
+[Program Folder0]
+Timing=post download
+Show Folder=SHOW
+Program Folder=[Default Folder]
+
+[Program Folder0-Shortcut0]
+File=[SETUP PATH]\mozilla.exe
+Arguments=
+Working Dir=[SETUP PATH]
+Description=Mozilla Seamonkey
+Icon Path=[SETUP PATH]\mozilla.exe
+Icon Id=0
+
+;[Program Folder0-Shortcut1]
+;File=[SETUP PATH]\bin\viewer.exe
+;Arguments=
+;Working Dir=[SETUP PATH]
+;Description=Mozilla Viewer
+;Icon Path=[SETUP PATH]\bin\viewer.exe
+;Icon Id=0
+
+;[Program Folder0-Shortcut2]
+;File=[SETUP PATH]\bin\Net2fone.exe
+;Arguments=
+;Working Dir=[SETUP PATH]
+;Description=Net2Fone
+;Icon Path=[SETUP PATH]\bin\Net2fone.exe
+;Icon Id=0
+
+;[Program Folder1]
+;Timing=post download
+;Show Folder=SHOW
+;Program Folder=[Default Folder]\lala land
+
+;[Program Folder1-Shortcut0]
+;File=c:\bin\getver.exe
+;Arguments=
+;Working Dir=[TEMP]
+;Description=Getver Test
+;Icon Path=[WINDISK]\4nt\4nt.exe
+;Icon Id=0
+
+;[Program Folder1-Shortcut1]
+;File=c:\perl\bin\perl.exe
+;Arguments=
+;Working Dir=[WINSYS]
+;Description=Perl
+;Icon Path=c:\perl\bin\perl.exe
+;Icon Id=0
+

mozilla/xpinstall/packager/windows/core.jst

@@ -0,0 +1,40 @@
+// main
+var srDest;
+var err;
+var communicatorFolder;
+var fWindowsSystem;
+var fileComponentRegStr;
+var fileComponentReg;
+
+srDest = $SpaceRequired$:bin;
+err    = startInstall("Mozilla Xpinstall Engine", "", "$Version$"); 
+logComment("startInstall: " + err);
+
+communicatorFolder = getFolder("Communicator");
+fWindowsSystem     = getFolder("Win System");
+logComment("communicatorFolder: " + communicatorFolder);
+
+if(verifyDiskSpace(communicatorFolder, srDest) == true)
+{
+  err = addDirectory("Program",
+                     "$Version$",
+                     "bin",              // dir name in jar to extract 
+                     communicatorFolder, // Where to put this file (Returned from GetFolder) 
+                     "",                 // subdir name to create relative to communicatorFolder
+                     true);              // Force Flag 
+  logComment("addDirectory() of Program returned: " + err);
+
+  // check return value
+  if(!checkError(err))
+  {
+    fileComponentRegStr = communicatorFolder + "\\component.reg";
+    fileComponentReg    = getFolder("file:///", fileComponentRegStr);
+    err                 = fileDelete(fileComponentReg);
+    logComment("fileDelete() returned: " + err);
+
+    err = finalizeInstall(); 
+    logComment("finalizeInstall() returned: " + err);
+  }
+}
+
+// end main

mozilla/xpinstall/packager/windows/editor.jst

@@ -0,0 +1,18 @@
+var err = StartInstall("Mozilla Editor", "Seamonkey", "$Version$"); 
+LogComment("StartInstall: " + err);
+
+var communicatorFolder = Install.GetFolder("Communicator");
+LogComment("communicatorFolder: " + communicatorFolder);
+
+err = AddDirectory("Program",
+                   "$Version$",
+                   "bin",              // fileName in jar, 
+                   communicatorFolder, // Where to put this file (Returned from GetFolder) 
+                   "",                 // fileName in jar, 
+                   true);              // Force Flag 
+
+LogComment("AddDirectory() returned: " + err);
+
+err = FinalizeInstall(); 
+LogComment("FinalizeInstall() returned: " + err);
+

mozilla/xpinstall/packager/windows/mail.jst

@@ -0,0 +1,33 @@
+// main
+var srDest;
+var err;
+var communicatorFolder;
+
+srDest = $SpaceRequired$:bin;
+err    = startInstall("Mozilla Mail", "", "$Version$"); 
+logComment("startInstall: " + err);
+// check return value
+checkError(err);
+
+communicatorFolder = getFolder("Communicator");
+logComment("communicatorFolder: " + communicatorFolder);
+
+if(verifyDiskSpace(communicatorFolder, srDest) == true)
+{
+  err = addDirectory("Program",
+                     "$Version$",
+                     "bin",              // dir name in jar to extract 
+                     communicatorFolder, // Where to put this file (Returned from GetFolder) 
+                     "",                 // subdir name to create relative to communicatorFolder
+                     true);              // Force Flag 
+  logComment("addDirectory() returned: " + err);
+
+  // check return value
+  if(!checkError(err))
+  {
+    err = finalizeInstall(); 
+    logComment("finalizeInstall() returned: " + err);
+  }
+}
+
+// end main

mozilla/xpinstall/packager/windows/makeall.pl

@@ -0,0 +1,134 @@
+#!c:\perl\bin\perl
+# 
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#  
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#  
+# The Original Code is Mozilla Communicator client code, released
+# March 31, 1998.
+# 
+# The Initial Developer of the Original Code is Netscape
+# Communications Corporation. Portions created by Netscape are
+# Copyright (C) 1998-1999 Netscape Communications Corporation. All
+# Rights Reserved.
+# 
+# Contributor(s): 
+# Sean Su <ssu@netscape.com>
+# 
+
+#
+# This perl script builds the xpi, config.ini, and js files.
+#
+
+# Make sure there are at least four arguments
+if($#ARGV < 3)
+{
+  die "usage: $0 <default version> <URL path> <staging path> <dist install path>
+
+       default version   : julian based date version
+                           ie: 5.0.0.99257
+
+       URL path          : URL path to where the .xpi files will be staged at.
+                           Either ftp:// or http:// can be used.  Nothing will be
+                           copied to there by this script.  It is used for config.ini.
+
+       staging path      : full path to where the components are staged at
+
+       dist install path : full path to where the mozilla/dist/win32_o.obj/install is at.
+       \n";
+}
+
+$inDefaultVersion     = $ARGV[0];
+$inURLPath            = $ARGV[1];
+$inStagePath          = $ARGV[2];
+$inDistPath           = $ARGV[3];
+$seiFileNameGeneric   = "nsinstall.exe";
+$seiFileNameSpecific  = "mozilla-win32-installer.exe";
+$userAgent            = "5.0b1 (en)";
+
+# Check for existance of staging path
+if(!(-e "$inStagePath"))
+{
+  die "invalid path: $inStagePath\n";
+}
+
+# Make sure inDestPath exists
+if(!(-e "$inDistPath"))
+{
+  mkdir ("$inDestPath",0775);
+}
+
+# Make .js files
+MakeJsFile("core");
+MakeJsFile("browser");
+MakeJsFile("mail");
+
+# Make .xpi files
+MakeXpiFile("core");
+MakeXpiFile("browser");
+MakeXpiFile("mail");
+
+MakeConfigFile();
+
+if(-e "$inDistPath\\setup")
+{
+  unlink <$inDistPath\\setup\\*>;
+}
+else
+{
+  mkdir ("$inDistPath\\setup",0775);
+}
+
+# Copy the setup files to the dist setup directory.
+system("xcopy /f config.ini                 $inDistPath\\");
+system("xcopy /f config.ini                 $inDistPath\\setup\\");
+system("xcopy /f $inDistPath\\setup.exe     $inDistPath\\setup\\");
+system("xcopy /f $inDistPath\\setuprsc.dll  $inDistPath\\setup\\");
+
+# build the self-extracting .exe file.
+print "\nbuilding self-extracting installer ($seiFileNameSpecific)...\n";
+system("copy $inDistPath\\$seiFileNameGeneric $inDistPath\\$seiFileNameSpecific");
+system("$inDistPath\\nszip.exe $inDistPath\\$seiFileNameSpecific $inDistPath\\setup\\*.* $inDistPath\\xpi\\*.*");
+
+print " done!\n";
+
+# end of script
+exit(0);
+
+sub MakeConfigFile
+{
+  # Make config.ini file
+  if(system("perl makecfgini.pl config.it $inDefaultVersion $inStagePath $inDistPath\\xpi $inURLPath") != 0)
+  {
+    exit(1);
+  }
+}
+
+sub MakeJsFile
+{
+  my($componentName) = @_;
+
+  # Make .js file
+  if(system("perl makejs.pl $componentName.jst $inDefaultVersion \"$userAgent\" $inStagePath\\$componentName") != 0)
+  {
+    exit(1);
+  }
+}
+
+sub MakeXpiFile
+{
+  my($componentName) = @_;
+
+  # Make .xpi file
+  if(system("perl makexpi.pl $componentName $inStagePath $inDistPath\\xpi") != 0)
+  {
+    exit(1);
+  }
+}
+

mozilla/xpinstall/packager/windows/makecfgini.pl

@@ -0,0 +1,207 @@
+#!c:\perl\bin\perl
+# 
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#  
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#  
+# The Original Code is Mozilla Communicator client code, released
+# March 31, 1998.
+# 
+# The Initial Developer of the Original Code is Netscape
+# Communications Corporation. Portions created by Netscape are
+# Copyright (C) 1998-1999 Netscape Communications Corporation. All
+# Rights Reserved.
+# 
+# Contributor(s): 
+# Sean Su <ssu@netscape.com>
+# 
+
+#
+# This perl script parses the input file for special variables
+# in the format of $Variable$ and replace it with the appropriate
+# value(s).
+#
+# Input: .it file
+#             - which is a .ini template
+#        version
+#             - version to display on the blue background
+#        Path to staging area
+#             - path on where the seamonkey built bits are staged to
+#        xpi path
+#             - path on where xpi files will be located at
+#        URL path
+#             - path to where the .xpi files are staged.  can be
+#               either ftp:// or http://
+#
+#   ie: perl makecfgini.pl config.it 5.0.0.1999120608 z:\exposed\windows\32bit\en\5.0 d:\builds\mozilla\dist\win32_0.obj\install\xpi ftp://sweetlou/products/client/seamonkey/windows/32bit/x86/1999-09-13-10-M10
+#
+
+# Make sure there are at least two arguments
+if($#ARGV < 4)
+{
+  die "usage: $0 <.it file> <version> <staging path> <.xpi path> <URL path>
+
+       .it file     : input ini template file
+       version      : version to be shown in setup.  Typically the same version
+                      as show in mozilla.exe.
+       staging path : path to where the components are staged at
+       .xpi path    : path to where the .xpi files have been built to
+       URL path     : URL path to where the .xpi files will be staged at.
+                      Either ftp:// or http:// can be used
+       \n";
+}
+
+$inItFile         = $ARGV[0];
+$inVersion        = $ARGV[1];
+$inStagePath      = $ARGV[2];
+$inXpiPath        = $ARGV[3];
+$inURLPath        = $ARGV[4];
+
+# Get the name of the file replacing the .it extension with a .ini extension
+@inItFileSplit    = split(/\./,$inItFile);
+$outIniFile       = $inItFileSplit[0];
+$outIniFile      .= ".ini";
+
+# Open the input file
+open(fpInIt, $inItFile) || die "\ncould not open $ARGV[0]: $!\n";
+
+# Open the output file
+open(fpOutIni, ">$outIniFile") || die "\nCould not open $outIniFile: $!\n";
+
+print "\n Making $outIniFile...\n";
+
+# While loop to read each line from input file
+while($line = <fpInIt>)
+{
+  # For each line read, search and replace $InstallSize$ with the calculated size
+  if($line =~ /\$InstallSize\$/i)
+  {
+    $installSize          = 0;
+    $installSizeSystem    = 0;
+
+    # split read line by ":" deliminator
+    @colonSplit = split(/:/, $line);
+    if($#colonSplit >= 0)
+    {
+      $componentName    = $colonSplit[1];
+      chop($componentName);
+
+      $installSize      = OutputInstallSize("$inStagePath\\$componentName");
+
+      # special oji consideration here.  Since it's an installer that 
+      # seamonkey installer will be calling, the disk space allocation
+      # needs to be adjusted by an expansion factor of 3.62.
+      if($componentName =~ /oji/i)
+      {
+        $installSize = int($installSize * 3.62);
+      }
+    }
+
+    # Read the next line to calculate for the "Install Size System="
+    if($line = <fpInIt>)
+    {
+      if($line =~ /\$InstallSizeSystem\$/i)
+      {
+        $installSizeSystem = OutputInstallSizeSystem($line, "$inStagePath\\$componentName");
+      }
+    }
+
+    $installSize -= $installSizeSystem;
+    print fpOutIni "Install Size=$installSize\n";
+    print fpOutIni "Install Size System=$installSizeSystem\n";
+  }
+  elsif($line =~ /\$InstallSizeArchive\$/i)
+  {
+    $installSizeArchive = 0;
+
+    # split read line by ":" deliminator
+    @colonSplit = split(/:/, $line);
+    if($#colonSplit >= 0)
+    {
+      $componentName = $colonSplit[1];
+      chop($componentName);
+
+      $installSizeArchive = OutputInstallSizeArchive("$inXpiPath\\$componentName");
+    }
+
+    print fpOutIni "Install Size Archive=$installSizeArchive\n";
+  }
+  elsif($line =~ /\$Version\$/i)
+  {
+    # For each line read, search and replace $Version$ with the version passed in
+    $line =~ s/\$Version\$/$inVersion/i;
+    print fpOutIni $line;
+  }
+  else
+  {
+    # For each line read, search and replace $InstallSizeSystem$ with the calculated size
+    $line =~ s/\$URLPath\$/$inURLPath/i;
+    print fpOutIni $line;
+  }
+}
+
+print " done!\n";
+
+# end of script
+exit(0);
+
+sub OutputInstallSize()
+{
+  my($inPath) = @_;
+  my($installSize);
+
+  print "   calculating size for $inPath\n";
+  $installSize    = `ds32.exe /D /L0 /A /S /C 32768 $inPath`;
+  $installSize   += 32768; # take into account install.js
+  $installSize    = int($installSize / 1024);
+  $installSize   += 1;
+  return($installSize);
+}
+
+sub OutputInstallSizeArchive()
+{
+  my($inPath) = @_;
+  my($installSizeArchive);
+  my($dev, $ino, $mode, $nlink, $uid, $gui, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks);
+
+  print "   calculating size for $inPath\n";
+  ($dev, $ino, $mode, $nlink, $uid, $gui, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks) = stat $inPath;
+  $installSizeArchive   += 32768; # take into account install.js
+  $installSizeArchive    = int($size / 1024);
+  $installSizeArchive   += 1;
+  return($installSizeArchive);
+}
+
+sub OutputInstallSizeSystem()
+{
+  my($inLine, $inPath) = @_;
+  my($installSizeSystem) = 0;
+
+  # split read line by ":" deliminator
+  @colonSplit = split(/:/, $inLine);
+  if($#colonSplit >= 0)
+  {
+    # split line by "," deliminator
+    @commaSplit = split(/\,/, $colonSplit[1]);
+    if($#commaSplit >= 0)
+    {
+      foreach(@commaSplit)
+      {
+        # calculate the size of component installed using ds32.exe in Kbytes
+        print "   calculating size for $inPath\\$_";
+        $installSizeSystem += `ds32.exe /D /L0 /A /S /C 32768 $inPath\\$_`;
+      }
+    }
+  }
+
+  $installSizeSystem  = int($installSizeSystem / 1024);
+  $installSizeSystem += 1;
+  return($installSizeSystem);
+}
+

mozilla/xpinstall/packager/windows/makejs.pl

@@ -0,0 +1,122 @@
+#!c:\perl\bin\perl
+# 
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#  
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#  
+# The Original Code is Mozilla Communicator client code, released
+# March 31, 1998.
+# 
+# The Initial Developer of the Original Code is Netscape
+# Communications Corporation. Portions created by Netscape are
+# Copyright (C) 1998-1999 Netscape Communications Corporation. All
+# Rights Reserved.
+# 
+# Contributor(s): 
+# Sean Su <ssu@netscape.com>
+# 
+
+#
+# This perl script parses the input file for special variables
+# in the format of $Variable$ and replace it with the appropriate
+# value(s).
+#
+# Input: .jst file              - which is a .js template
+#        default version        - a julian date in the form of:
+#                                 major.minor.release.yydoy
+#                                 ie: 5.0.0.99256
+#        user agent             - user agent of product
+#        component staging path - path to where the components are staged at
+#
+#        ie: perl makejs.pl core.jst 5.0.0.99256
+#
+
+# Make sure there are at least two arguments
+if($#ARGV < 3)
+{
+  die "usage: $0 <.jst file> <default version> <UserAgent> <staging path>
+
+       .jst file              : .js template input file
+       default version        : default julian base version number to use in the
+                                form of: major.minor.release.yydoy
+                                ie: 5.0.0.99256
+       user agent             : user agent of product (5.0b1 [en])
+       component staging path : path to where this component is staged at
+                                ie: z:\\stage\\windows\\32bit\\en\\5.0\\core
+       \n";
+}
+
+$inJstFile        = $ARGV[0];
+$inVersion        = $ARGV[1];
+$inUserAgent      = $ARGV[2];
+$inStagePath      = $ARGV[3];
+
+# Get the name of the file replacing the .jst extension with a .js extension
+@inJstFileSplit   = split(/\./,$inJstFile);
+$outJsFile        = $inJstFileSplit[0];
+$outJsFile       .= ".js";
+$outTempFile      = $inJstFileSplit[0];
+$outTempFile     .= ".template";
+
+system("copy ..\\common\\share.t $outTempFile");
+system("cat $inJstFile >> $outTempFile");
+
+# Open the input .template file
+open(fpInTemplate, $outTempFile) || die "\ncould not open $outTempFile: $!\n";
+
+# Open the output .js file
+open(fpOutJs, ">$outJsFile") || die "\nCould not open $outJsFile: $!\n";
+
+# While loop to read each line from input file
+while($line = <fpInTemplate>)
+{
+  # For each line read, search and replace $Version$ with the version passed in
+  if($line =~ /\$Version\$/i)
+  {
+    $line =~ s/\$Version\$/$inVersion/i;
+  }
+  elsif($line =~ /\$UserAgent\$/i)
+  {
+    $line =~ s/\$UserAgent\$/$inUserAgent/i;
+  }
+  elsif($line =~ /\$SpaceRequired\$/i) # For each line read, search and replace $InstallSize$ with the calculated size
+  {
+    $spaceRequired = 0;
+
+    # split read line by ":" deliminator
+    @colonSplit = split(/:/, $line);
+    if($#colonSplit > 0)
+    {
+      @semiColonSplit = split(/;/, $colonSplit[1]);
+      $subDir         = $semiColonSplit[0];
+      $spaceRequired  = GetSpaceRequired("$inStagePath\\$subDir");
+      $line =~ s/\$SpaceRequired\$:$subDir/$spaceRequired/i;
+    }
+    else
+    {
+      $spaceRequired = GetSpaceRequired("$inStagePath");
+      $line =~ s/\$SpaceRequired\$/$spaceRequired/i;
+    }
+  }
+
+  print fpOutJs $line;
+}
+
+sub GetSpaceRequired()
+{
+  my($inPath) = @_;
+  my($spaceRequired);
+
+  print "   calulating size for $inPath\n";
+  $spaceRequired    = `ds32.exe /D /L0 /A /S /C 32768 $inPath`;
+  $spaceRequired    = int($spaceRequired / 1024);
+  $spaceRequired   += 1;
+  return($spaceRequired);
+}
+

mozilla/xpinstall/packager/windows/makexpi.pl

@@ -0,0 +1,114 @@
+#!c:\perl\bin\perl
+# 
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#  
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#  
+# The Original Code is Mozilla Communicator client code, released
+# March 31, 1998.
+# 
+# The Initial Developer of the Original Code is Netscape
+# Communications Corporation. Portions created by Netscape are
+# Copyright (C) 1998-1999 Netscape Communications Corporation. All
+# Rights Reserved.
+# 
+# Contributor(s): 
+# Sean Su <ssu@netscape.com>
+# 
+
+#
+# This perl script creates .xpi files given component input name
+#
+# Input: component name
+#             - name of the component directory located in the staging path
+#        staging path
+#             - path to where the built files are staged at
+#        dest path
+#             - path to where the .xpi files are are to be created at.
+#               ** MUST BE AN ABSOLUTE PATH, NOT A RELATIVE PATH **
+#
+#   ie: perl makexpi.pl core z:\exposed\windows\32bit\en\5.0 d:\build\mozilla\dist\win32_o.obj\install\working
+#
+
+use File::Copy;
+use Cwd;
+
+# Make sure there are at least three arguments
+if($#ARGV < 2)
+{
+  die "usage: $0 <component name> <staging path> <dest path>
+
+       component name : name of component directory within staging path
+       staging path   : path to where the components are staged at
+       dest path      : path to where the .xpi files are to be created at
+       \n";
+}
+
+$inComponentName  = $ARGV[0];
+$inStagePath      = $ARGV[1];
+$inDestPath       = $ARGV[2];
+
+# check for existance of staging component path
+if(!(-e "$inStagePath\\$inComponentName"))
+{
+  die "invalid path: $inStagePath\\$inComponentName\n";
+}
+
+# check for existance of .js script
+if(!(-e "$inComponentName.js"))
+{
+  die "missing .js script: $inComponentName.js\n";
+}
+
+# delete component .xpi file
+if(-e "$inDestPath\\$inComponentName.xpi")
+{
+  unlink("$inDestPath\\$inComponentName.xpi");
+}
+if(-e "$inStagePath\\$incomponentName\\$inComponentName.xpi")
+{
+  unlink("$inDestPath\\$inComponentName.xpi");
+}
+
+# delete install.js
+if(-e "install.js")
+{
+  unlink("install.js");
+}
+
+# make sure inDestPath exists
+if(!(-e "$inDestPath"))
+{
+  system("mkdir $inDestPath");
+}
+
+print "\n Making $inComponentName.xpi...\n";
+
+$saveCwdir = cwd();
+
+# change directory to where the files are, else zip will store
+# unwanted path information.
+chdir("$inStagePath\\$inComponentName");
+system("zip -r $inDestPath\\$inComponentName.xpi *");
+chdir("$saveCwdir");
+
+copy("$inComponentName.js", "install.js");
+system("zip -g $inDestPath\\$inComponentName.xpi install.js");
+
+# delete install.js
+if(-e "install.js")
+{
+  unlink("install.js");
+}
+
+print " done!\n";
+
+# end of script
+exit(0);
+

mozilla/xpinstall/packager/windows/rdir.pl

@@ -0,0 +1,111 @@
+#!c:\perl\bin\perl
+# 
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#  
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#  
+# The Original Code is Mozilla Communicator client code, released
+# March 31, 1998.
+# 
+# The Initial Developer of the Original Code is Netscape
+# Communications Corporation. Portions created by Netscape are
+# Copyright (C) 1998-1999 Netscape Communications Corporation. All
+# Rights Reserved.
+# 
+# Contributor(s): 
+# Sean Su <ssu@netscape.com>
+# 
+
+use Cwd;
+
+if($#ARGV < 0)
+{
+    print_usage();
+    exit(1);
+}
+
+print "removing directory:\n";
+for($i = 0; $i <= $#ARGV; $i++)
+{
+    print "  $ARGV[$i]";
+    remove_dir_structure($ARGV[$i]);
+    print "\n";
+}
+
+exit(0);
+# end
+
+sub remove_dir_structure
+{
+    my($curr_dir) = @_;
+    $save_cwd     = cwd();
+    $save_cwd     =~ s/\//\\/g;
+    if((-e "$curr_dir") && (-d "$curr_dir"))
+    {
+        remove_all_dir($curr_dir);
+        chdir($save_cwd);
+        remove_directory($curr_dir);
+        print " done!";
+    }
+    else
+    {
+        if(!(-e "$curr_dir"))
+        {
+            print "\n";
+            print "$curr_dir does not exist!";
+        }
+        elsif(!(-d "$curr_dir"))
+        {
+            print "\n";
+            print "$curr_dir is not a valid directory!";
+        }
+    }
+}
+
+sub remove_all_dir
+{
+    my($curr_dir) = @_;
+    my(@dirlist);
+    my($dir);
+
+    chdir("$curr_dir");
+    @dirlist = <*>;
+    foreach $dir (@dirlist)
+    {
+        if(-d "$dir")
+        {
+            print ".";
+            remove_all_dir($dir);
+        }
+    }
+    chdir("..");
+    remove_directory($curr_dir);
+}
+
+sub remove_directory
+{
+    my($directory) = @_;
+    my($save_cwd);
+
+    $save_cwd = cwd();
+    $save_cwd =~ s/\//\\/g;
+
+    if(-e "$directory")
+    {
+        chdir($directory);
+        unlink <*>; # remove files
+        chdir($save_cwd);
+        rmdir $directory;         # remove directory
+    }
+}
+
+sub print_usage
+{
+    print "usage: $0 <dir1> [dir2 dir3...]\n";
+}

mozilla/xpinstall/wizard/windows/builder/build.pl

@@ -0,0 +1,233 @@
+#!c:\perl\bin\perl
+#
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Mozilla Communicator client code, 
+# released March 31, 1998. 
+#
+# The Initial Developer of the Original Code is Netscape Communications 
+# Corporation.  Portions created by Netscape are
+# Copyright (C) 1999 Netscape Communications Corporation. All
+# Rights Reserved.
+#
+# Contributor(s): 
+#   Sean Su <ssu@netscape.com>
+
+#
+# Purpose:
+#    To build the mozilla self-extracting installer and its corresponding .xpi files
+#    given a mozilla build on a local system.
+#
+# Requirements:
+# 1. perl needs to be installed correctly on the build system because cwd.pm is used.
+# 2. mozilla\xpinstall\wizard\windows needs to be built.
+#    a. to build it, MFC must be installed with VC
+#    b. set MOZ_MFC=1 in the build environment
+#    c. run nmake -f makefile.win from the above directory
+#
+
+if($ENV{MOZ_SRC} eq "")
+{
+  print "Error: MOZ_SRC not set!";
+  exit(1);
+}
+
+$DEPTH        = "$ENV{MOZ_SRC}\\mozilla";
+$cwdBuilder   = "$DEPTH\\xpinstall\\wizard\\windows\\builder";
+$cwdBuilder   =~ s/\//\\/g; # convert slashes to backslashes for Dos commands to work
+$cwdDist      = GetCwd("dist",     $DEPTH, $cwdBuilder);
+$cwdDistWin   = GetCwd("distwin",  $DEPTH, $cwdBuilder);
+$cwdInstall   = GetCwd("install",  $DEPTH, $cwdBuilder);
+$cwdPackager  = GetCwd("packager", $DEPTH, $cwdBuilder);
+$verPartial   = "5.0.0.";
+$ver          = $verPartial . GetVersion($DEPTH);
+$ftpStr       = "ftp://not.needed.com/because/the/xpi/files/will/be/located/in/the/same/dir/as/the/installer";
+
+if(-e "$cwdDist\\stage")
+{
+  system("perl $cwdPackager\\windows\\rdir.pl $cwdDist\\stage");
+}
+
+mkdir("$cwdDist\\stage", 775);
+system("perl $cwdPackager\\pkgcp.pl -s $cwdDistWin -d $cwdDist\\stage -f $cwdPackager\\packages-win -o dos -v");
+
+chdir("$cwdPackager\\windows");
+system("perl makeall.pl $ver $ftpStr $cwdDist\\stage $cwdDistWin\\install");
+chdir($cwdBuilder);
+
+# Copy the .xpi files to the same directory as setup.exe.
+# This is so that setup.exe can find the .xpi files
+# in the same directory and use them.
+#
+# Mozilla-win32-install.exe (a self extracting file) will use the .xpi
+# files from its current directory as well, but it is not a requirement
+# that they exist because it already contains the .xpi files within itself.
+system("xcopy /f $cwdDistWin\\install\\xpi\\*.* $cwdDistWin\\install");
+
+print "\n";
+print "**\n";
+print "*\n";
+print "*  A self-extracting installer has been built and delivered:\n";
+print "*\n";
+print "*      $cwdDistWin\\install\\mozilla-win32-install.exe\n";
+print "*\n";
+print "**\n";
+print "\n";
+
+exit(0);
+
+sub GetCwd
+{
+  my($whichPath, $depthPath, $returnCwd) = @_;
+  my($distCwd);
+  my($distWinPathName);
+  my($distPath);
+
+  # determine if build is debug or optimized
+  if($ENV{MOZ_DEBUG} eq "")
+  {
+    $distWinPathName = "Win32_o.obj";
+  }
+  else
+  {
+    $distWinPathName = "Win32_d.obj";
+  }
+
+  if($whichPath eq "dist")
+  {
+    # verify the existance of path
+    if(!(-e "$depthPath\\dist"))
+    {
+      print "path not found: $depthPath\\dist\n";
+      exit(1);
+    }
+
+    $distPath = "$depthPath\\dist";
+  }
+  elsif($whichPath eq "distwin")
+  {
+    # verify the existance of path
+    if(!(-e "$depthPath\\dist\\$distWinPathName"))
+    {
+      print "path not found: $depthPath\\dist\\$distWinPathName\n";
+      exit(1);
+    }
+
+    $distPath = "$depthPath\\dist\\$distWinPathName";
+  }
+  elsif($whichPath eq "install")
+  {
+    # verify the existance of path
+    if(!(-e "$depthPath\\dist\\$distWinPathName\\install"))
+    {
+      print "path not found: $depthPath\\dist\\$distWinPathName\\install\n";
+      exit(1);
+    }
+
+    $distPath = "$depthPath\\dist\\$distWinPathName\\install";
+  }
+  elsif($whichPath eq "packager")
+  {
+    # verify the existance of path
+    if(!(-e "$depthPath\\xpinstall\\packager"))
+    {
+      print "path not found: $depthPath\\xpinstall\\packager\n";
+      exit(1);
+    }
+
+    $distPath = "$depthPath\\xpinstall\\packager";
+  }
+
+  $distPath =~ s/\//\\/g; # convert slashes to backslashes for Dos commands to work
+  return($distPath);
+}
+
+sub GetVersion
+{
+  my($depthPath) = @_;
+  my($fileMozilla);
+  my($fileMozillaVer);
+  my($distWinPathName);
+  my($monAdjusted);
+  my($yy);
+  my($mm);
+  my($dd);
+  my($hh);
+
+  # determine if build is debug or optimized
+  if($ENV{MOZ_DEBUG} eq "")
+  {
+    $distWinPathName = "Win32_o.obj";
+  }
+  else
+  {
+    $distWinPathName = "Win32_d.obj";
+  }
+
+  $fileMozilla = "$depthPath\\dist\\$distWinPathName\\bin\\mozilla.exe";
+  # verify the existance of file
+  if(!(-e "$fileMozilla"))
+  {
+    print "file not found: $fileMozilla\n";
+    exit(1);
+  }
+
+  ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks) = stat $fileMozilla;
+  ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($mtime);
+
+  # calculate year
+  # localtime() returns year 2000 as 100, we mod 100 to get at the last 2 digits
+  $yy = $year % 100;
+  if($yy < 10)
+  {
+    $yy = "200$yy";
+  }
+  else
+  {
+    $yy = "20$yy";
+  }
+
+  # calculate month
+  $monAdjusted = $mon + 1;
+  if(($monAdjusted) < 10)
+  {
+    $mm = "0$monAdjusted";
+  }
+  else
+  {
+    $mm = "$mon";
+  }
+
+  # calculate month day
+  if(($mday) < 10)
+  {
+    $dd = "0$mday";
+  }
+  else
+  {
+    $dd = "$mday";
+  }
+
+  # calculate day hour
+  if(($hour) < 10)
+  {
+    $hh = "0$hour";
+  }
+  else
+  {
+    $hh = "$hour";
+  }
+
+  $fileMozillaVer = "$yy$mm$dd$hh";
+  print "y2k compliant version string for $fileMozilla: $fileMozillaVer\n";
+  return($fileMozillaVer);
+}
+

mozilla/xpinstall/wizard/windows/builder/readme.txt

@@ -0,0 +1,54 @@
+
+The contents of this file are subject to the Netscape Public
+License Version 1.1 (the "License"); you may not use this file
+except in compliance with the License. You may obtain a copy of
+the License at http://www.mozilla.org/NPL/
+
+Software distributed under the License is distributed on an "AS
+IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+implied. See the License for the specific language governing
+rights and limitations under the License.
+
+The Original Code is Mozilla Communicator client code, 
+released March 31, 1998. 
+
+The Initial Developer of the Original Code is Netscape Communications 
+Corporation.  Portions created by Netscape are
+Copyright (C) 1999 Netscape Communications Corporation. All
+Rights Reserved.
+
+Contributor(s): 
+ Sean Su <ssu@netscape.com>
+
+
+Purpose:
+  To build the mozilla self-extracting installer and its corresponding .xpi files
+  given a mozilla build on a local system.
+
+Requirements:
+1. Perl needs to be installed correctly on the build system because cwd.pm is used.
+   Preferably, perl version 5.004 or newer should be used.
+   
+2. Mozilla\xpinstall\wizard\windows needs to be built.
+  a. to build it, MFC must be installed with VC6
+  b. set MOZ_MFC=1 in the build environment
+  c. run nmake -f makefile.win from the above directory
+
+
+Build.pl requires no parameters.  When it finishes, it will have created a
+temporary staging area in mozilla\dist\stage to build the .xpi archives from.
+The self-extracting installer (mozilla-win32-installer.exe) will be delivered to:
+  mozilla\dist\win32_o.obj\install
+
+The .xpi archives will be delivered to:
+  mozilla\dist\win32_o.obj\install\xpi
+
+Mozilla-win32-installer.exe does not require the .xpi archives once its been created
+because they have been packaged up in the .exe file.
+
+The .xpi archives will also be copied to:
+  mozilla\dist\win32_o.obj\install
+
+This is so setup.exe can install them.  Setup.exe is usually run when debugging the
+installer code.  This makes it easier to debug.
+

mozilla/xpinstall/wizard/windows/makefile.win

@@ -0,0 +1,33 @@
+#
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Mozilla Communicator client code, 
+# released March 31, 1998. 
+#
+# The Initial Developer of the Original Code is Netscape Communications 
+# Corporation.  Portions created by Netscape are
+# Copyright (C) 1999 Netscape Communications Corporation. All
+# Rights Reserved.
+#
+# Contributor(s): 
+#   Sean Su <ssu@netscape.com>
+
+DEPTH=..\..\..
+
+DIRS=$(DIRS) nsinstall \
+!if "$(WINOS)"=="WINNT"
+             nsztool   \
+!endif
+             setup     \
+             setuprsc  \
+             ren8dot3
+
+include <$(DEPTH)\config\rules.mak>

mozilla/xpinstall/wizard/windows/nsinstall/makefile.win

@@ -0,0 +1,61 @@
+#
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Mozilla Communicator client code, 
+# released March 31, 1998. 
+#
+# The Initial Developer of the Original Code is Netscape Communications 
+# Corporation.  Portions created by Netscape are
+# Copyright (C) 1999 Netscape Communications Corporation. All
+# Rights Reserved.
+#
+# Contributor(s): 
+#   Sean Su <ssu@netscape.com>
+
+DEPTH=..\..\..\..
+
+MAKE_OBJ_TYPE   = EXE
+USE_NON_MT_LIBS = 1
+
+MODULE          = nsinstall
+PROGRAM         = .\$(OBJDIR)\$(MODULE).exe
+RESFILE         = $(MODULE).res
+
+OBJS =  \
+    .\$(OBJDIR)\nsinstall.obj   \
+    .\$(OBJDIR)\adler32.obj     \
+    .\$(OBJDIR)\infblock.obj    \
+    .\$(OBJDIR)\infcodes.obj    \
+    .\$(OBJDIR)\inffast.obj     \
+    .\$(OBJDIR)\inflate.obj     \
+    .\$(OBJDIR)\inftrees.obj    \
+    .\$(OBJDIR)\infutil.obj     \
+    .\$(OBJDIR)\uncompr.obj     \
+    .\$(OBJDIR)\zutil.obj       \
+    $(NULL)
+
+LCFLAGS= -UMOZILLA_CLIENT
+
+include <$(DEPTH)\config\rules.mak>
+
+docopy:
+    $(MAKE_INSTALL) $(DEPTH)\modules\zlib\src\*.h .
+    $(MAKE_INSTALL) $(DEPTH)\modules\zlib\src\*.c .
+
+export:: docopy
+
+install:: $(PROGRAM)
+    $(MAKE_INSTALL) $(PROGRAM) $(DIST)\install
+
+clobber_all::
+    $(RM) inf*.* adler32.c uncompr.c z*.* trees.c deflate.* compr* gzio* example.c crc* mini*
+    $(RM) $(DIST)\install\$(MODULE).exe
+

mozilla/xpinstall/wizard/windows/nsinstall/nsinstall.cpp

@@ -0,0 +1,564 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1999 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include <windows.h>
+#include "resource.h"
+#include "zlib.h"
+
+#define BAR_MARGIN    1
+#define BAR_SPACING   2
+#define BAR_WIDTH     6
+#define MAX_BUF       4096
+
+char szTitle[4096];
+HINSTANCE hInst;
+
+/////////////////////////////////////////////////////////////////////////////
+// Global Declarations
+
+static DWORD	nTotalBytes = 0;  // sum of all the FILE resources
+
+struct ExtractFilesDlgInfo {
+	HWND	hWndDlg;
+	int		nMaxBars;	// maximum number of bars that can be displayed
+	int		nBars;		// current number of bars to display
+} dlgInfo;
+
+/////////////////////////////////////////////////////////////////////////////
+// Utility Functions
+
+// This function is similar to GetFullPathName except instead of
+// using the current drive and directory it uses the path of the
+// directory designated for temporary files
+static BOOL
+GetFullTempPathName(LPCTSTR lpszFileName, DWORD dwBufferLength, LPTSTR lpszBuffer)
+{
+	DWORD	dwLen;
+
+	dwLen = GetTempPath(dwBufferLength, lpszBuffer);
+	if (lpszBuffer[dwLen - 1] != '\\')
+		strcat(lpszBuffer, "\\");
+	strcat(lpszBuffer, lpszFileName);
+	return TRUE;
+}
+
+// this function appends a backslash at the end of a string,
+// if one does not already exists.
+void AppendBackSlash(LPSTR szInput, DWORD dwInputSize)
+{
+  if(szInput != NULL)
+  {
+    if(szInput[strlen(szInput) - 1] != '\\')
+    {
+      if(((DWORD)lstrlen(szInput) + 1) < dwInputSize)
+      {
+        lstrcat(szInput, "\\");
+      }
+    }
+  }
+}
+
+// This function removes a directory and its subdirectories
+HRESULT DirectoryRemove(LPSTR szDestination, BOOL bRemoveSubdirs)
+{
+  HANDLE          hFile;
+  WIN32_FIND_DATA fdFile;
+  char            szDestTemp[MAX_BUF];
+  BOOL            bFound;
+
+  if(GetFileAttributes(szDestination) == -1)
+    return(0);
+
+  if(bRemoveSubdirs == TRUE)
+  {
+    lstrcpy(szDestTemp, szDestination);
+    AppendBackSlash(szDestTemp, sizeof(szDestTemp));
+    lstrcat(szDestTemp, "*");
+
+    bFound = TRUE;
+    hFile = FindFirstFile(szDestTemp, &fdFile);
+    while((hFile != INVALID_HANDLE_VALUE) && (bFound == TRUE))
+    {
+      if((lstrcmpi(fdFile.cFileName, ".") != 0) && (lstrcmpi(fdFile.cFileName, "..") != 0))
+      {
+        /* create full path */
+        lstrcpy(szDestTemp, szDestination);
+        AppendBackSlash(szDestTemp, sizeof(szDestTemp));
+        lstrcat(szDestTemp, fdFile.cFileName);
+
+        if(fdFile.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
+        {
+          DirectoryRemove(szDestTemp, bRemoveSubdirs);
+        }
+        else
+        {
+          DeleteFile(szDestTemp);
+        }
+      }
+
+      bFound = FindNextFile(hFile, &fdFile);
+    }
+
+    FindClose(hFile);
+  }
+  
+  RemoveDirectory(szDestination);
+  return(0);
+}
+
+// Centers the specified window over the desktop. Assumes the window is
+// smaller both horizontally and vertically than the desktop
+static void
+CenterWindow(HWND hWndDlg)
+{
+	RECT	rect;
+	int		iLeft, iTop;
+
+	GetWindowRect(hWndDlg, &rect);
+	iLeft = (GetSystemMetrics(SM_CXSCREEN) - (rect.right - rect.left)) / 2;
+	iTop = (GetSystemMetrics(SM_CYSCREEN) - (rect.bottom - rect.top)) / 2;
+
+	SetWindowPos(hWndDlg, NULL, iLeft, iTop, -1, -1,
+		SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// Extract Files Dialog
+
+// This routine updates the status string in the extracting dialog
+static void
+SetStatusLine(LPCTSTR lpszStatus)
+{
+	HWND	hWndLabel = GetDlgItem(dlgInfo.hWndDlg, IDC_STATUS);
+
+	SetWindowText(hWndLabel, lpszStatus);
+	UpdateWindow(hWndLabel);
+}
+
+// This routine will update the progress bar to the specified percentage
+// (value between 0 and 100)
+static void
+UpdateProgressBar(unsigned value)
+{
+	int	nBars;
+
+	// Figure out how many bars should be displayed
+	nBars = dlgInfo.nMaxBars * value / 100;
+
+	// Only paint if we need to display more bars
+	if (nBars > dlgInfo.nBars) {
+		HWND	hWndGauge = GetDlgItem(dlgInfo.hWndDlg, IDC_GAUGE);
+		RECT	rect;
+
+		// Update the gauge state before painting
+		dlgInfo.nBars = nBars;
+
+		// Only invalidate the part that needs updating
+		GetClientRect(hWndGauge, &rect);
+		rect.left = BAR_MARGIN + (nBars - 1) * (BAR_WIDTH + BAR_SPACING);
+		InvalidateRect(hWndGauge, &rect, FALSE);
+	
+		// Update the whole extracting dialog. We do this because we don't
+		// have a message loop to process WM_PAINT messages in case the
+		// extracting dialog was exposed
+		UpdateWindow(dlgInfo.hWndDlg);
+	}
+}
+
+// Window proc for dialog
+BOOL APIENTRY
+DialogProc(HWND hWndDlg, UINT msg, WPARAM wParam, LPARAM lParam)
+{
+	switch (msg) {
+		case WM_INITDIALOG:
+			// Center the dialog over the desktop
+			CenterWindow(hWndDlg);
+			return FALSE;
+
+		case WM_COMMAND:
+			DestroyWindow(hWndDlg);
+			return TRUE;
+	}
+
+	return FALSE;  // didn't handle the message
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// Resource Callback Functions
+
+BOOL APIENTRY
+DeleteTempFilesProc(HANDLE hModule, LPCTSTR lpszType, LPTSTR lpszName, LONG lParam)
+{
+	char	szTmpFile[MAX_PATH];
+
+	// Get the path to the file in the temp directory
+	GetFullTempPathName(lpszName, sizeof(szTmpFile), szTmpFile);
+
+	// Delete the file
+	DeleteFile(szTmpFile);
+	return TRUE;
+}
+
+BOOL APIENTRY
+SizeOfResourcesProc(HANDLE hModule, LPCTSTR lpszType, LPTSTR lpszName, LONG lParam)
+{
+	HRSRC	hResInfo;
+
+	// Find the resource
+	hResInfo = FindResource((HINSTANCE)hModule, lpszName, lpszType);
+
+#ifdef _DEBUG
+	if (!hResInfo) {
+		char	buf[512];
+
+		wsprintf(buf, "Error '%d' when loading FILE resource: %s", GetLastError(), lpszName);
+		MessageBox(NULL, buf, szTitle, MB_OK | MB_ICONEXCLAMATION);
+		return FALSE;
+	}
+#endif
+
+	// Add its size to the total size. Note that the return value is subject
+	// to alignment rounding, but it's close enough for our purposes
+	nTotalBytes += SizeofResource(NULL, hResInfo);
+
+	// Release the resource
+	FreeResource(hResInfo);
+	return TRUE;  // keep enumerating
+}
+
+BOOL APIENTRY
+ExtractFilesProc(HANDLE hModule, LPCTSTR lpszType, LPTSTR lpszName, LONG lParam)
+{
+	char	szTmpFile[MAX_PATH];
+	char	szArcLstFile[MAX_PATH];
+	HRSRC	hResInfo;
+	HGLOBAL	hGlobal;
+	LPBYTE	lpBytes;
+	LPBYTE	lpBytesUnCmp;
+	HANDLE	hFile;
+	char	szStatus[128];
+	char	szText[4096];
+	
+	// Update the UI
+	LoadString(hInst, IDS_STATUS_EXTRACTING, szText, sizeof(szText));
+	wsprintf(szStatus, szText, lpszName);
+	SetStatusLine(szStatus);
+
+	// Create a file in the temp directory
+	GetFullTempPathName(lpszName, sizeof(szTmpFile), szTmpFile);
+
+	// Extract the file
+	hResInfo = FindResource((HINSTANCE)hModule, lpszName, lpszType);
+	hGlobal = LoadResource((HINSTANCE)hModule, hResInfo);
+	lpBytes = (LPBYTE)LockResource(hGlobal);
+
+	// Create the file
+	hFile = CreateFile(szTmpFile, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS,
+		FILE_ATTRIBUTE_TEMPORARY, NULL);
+
+	if (hFile != INVALID_HANDLE_VALUE) {
+		DWORD	dwSize;
+		DWORD	dwSizeUnCmp;
+    DWORD dwTemp;
+
+	  GetFullTempPathName("Archive.lst", sizeof(szArcLstFile), szArcLstFile);
+    WritePrivateProfileString("Archives", lpszName, "TRUE", szArcLstFile);
+
+    lpBytesUnCmp = (LPBYTE)malloc((*(LPDWORD)(lpBytes + sizeof(DWORD))) + 1);
+    dwSizeUnCmp  = *(LPDWORD)(lpBytes + sizeof(DWORD));
+
+		// Copy the file. The first DWORD specifies the size of the file
+		dwSize = *(LPDWORD)lpBytes;
+		lpBytes += (sizeof(DWORD) * 2);
+
+    dwTemp = uncompress(lpBytesUnCmp, &dwSizeUnCmp, lpBytes, dwSize);
+
+    while (dwSizeUnCmp > 0)
+    {
+			DWORD	dwBytesToWrite, dwBytesWritten;
+
+			dwBytesToWrite = dwSizeUnCmp > 4096 ? 4096 : dwSizeUnCmp;
+			if (!WriteFile(hFile, lpBytesUnCmp, dwBytesToWrite, &dwBytesWritten, NULL))
+      {
+				char szBuf[512];
+
+      	LoadString(hInst, IDS_STATUS_EXTRACTING, szText, sizeof(szText));
+				wsprintf(szBuf, szText, szTmpFile);
+				MessageBox(NULL, szBuf, szTitle, MB_OK | MB_ICONEXCLAMATION);
+				FreeResource(hResInfo);
+				return FALSE;
+			}
+
+			dwSizeUnCmp -= dwBytesWritten;
+			lpBytesUnCmp += dwBytesWritten;
+
+			// Update the UI to reflect the total number of bytes written
+			static DWORD	nBytesWritten = 0;
+
+			nBytesWritten += dwBytesWritten;
+			UpdateProgressBar(nBytesWritten * 100 / nTotalBytes);
+		}
+
+		CloseHandle(hFile);
+	}
+
+	// Release the resource
+	FreeResource(hResInfo);
+
+	return TRUE;  // keep enumerating
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// Progress bar
+
+// Draws a recessed border around the gauge
+static void
+DrawGaugeBorder(HWND hWnd)
+{
+	HDC		hDC = GetWindowDC(hWnd);
+	RECT	rect;
+	int		cx, cy;
+	HPEN	hShadowPen = CreatePen(PS_SOLID, 1, GetSysColor(COLOR_BTNSHADOW));
+	HGDIOBJ	hOldPen;
+
+	GetWindowRect(hWnd, &rect);
+	cx = rect.right - rect.left;
+	cy = rect.bottom - rect.top;
+
+	// Draw a dark gray line segment
+	hOldPen = SelectObject(hDC, (HGDIOBJ)hShadowPen);
+	MoveToEx(hDC, 0, cy - 1, NULL);
+	LineTo(hDC, 0, 0);
+	LineTo(hDC, cx - 1, 0);
+
+	// Draw a white line segment
+	SelectObject(hDC, GetStockObject(WHITE_PEN));
+	MoveToEx(hDC, 0, cy - 1, NULL);
+	LineTo(hDC, cx - 1, cy - 1);
+	LineTo(hDC, cx - 1, 0);
+
+	SelectObject(hDC, hOldPen);
+	DeleteObject(hShadowPen);
+	ReleaseDC(hWnd, hDC);
+}
+
+// Draws the blue progress bar
+static void
+DrawProgressBar(HWND hWnd)
+{
+	PAINTSTRUCT	ps;
+	HDC			hDC = BeginPaint(hWnd, &ps);
+	RECT		rect;
+	HBRUSH		hBlueBrush = CreateSolidBrush(RGB(0, 0, 128));
+
+	// Draw the bars
+	GetClientRect(hWnd, &rect);
+	rect.left = rect.top = BAR_MARGIN;
+	rect.bottom -= BAR_MARGIN;
+	rect.right = rect.left + BAR_WIDTH;
+
+	for (int i = 0; i < dlgInfo.nBars; i++) {
+		RECT	dest;
+
+		if (IntersectRect(&dest, &ps.rcPaint, &rect))
+			FillRect(hDC, &rect, hBlueBrush);
+		OffsetRect(&rect, BAR_WIDTH + BAR_SPACING, 0);
+	}
+
+	DeleteObject(hBlueBrush);
+	EndPaint(hWnd, &ps);
+}
+
+// Adjusts the width of the gauge based on the maximum number of bars
+static void
+SizeToFitGauge(HWND hWnd)
+{
+	RECT	rect;
+	int		cx;
+
+	// Get the window size in pixels
+	GetWindowRect(hWnd, &rect);
+
+	// Size the width to fit
+	cx = 2 * GetSystemMetrics(SM_CXBORDER) + 2 * BAR_MARGIN +
+		dlgInfo.nMaxBars * BAR_WIDTH + (dlgInfo.nMaxBars - 1) * BAR_SPACING;
+
+	SetWindowPos(hWnd, NULL, -1, -1, cx, rect.bottom - rect.top,
+		SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
+}
+
+// Window proc for gauge
+LRESULT APIENTRY
+GaugeWndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
+{
+	DWORD	dwStyle;
+	RECT	rect;
+
+	switch (msg) {
+		case WM_NCCREATE:
+			dwStyle = GetWindowLong(hWnd, GWL_STYLE);
+			SetWindowLong(hWnd, GWL_STYLE, dwStyle | WS_BORDER);
+			return TRUE;
+
+		case WM_CREATE:
+			// Figure out the maximum number of bars that can be displayed
+			GetClientRect(hWnd, &rect);
+			dlgInfo.nBars = 0;
+			dlgInfo.nMaxBars = (rect.right - rect.left - 2 * BAR_MARGIN + BAR_SPACING) /
+				(BAR_WIDTH + BAR_SPACING);
+
+			// Size the gauge to exactly fit the maximum number of bars
+			SizeToFitGauge(hWnd);
+			return TRUE;
+
+		case WM_NCPAINT:
+			DrawGaugeBorder(hWnd);
+			return TRUE;
+
+		case WM_PAINT:
+			DrawProgressBar(hWnd);
+			return TRUE;
+	}
+
+	return DefWindowProc(hWnd, msg, wParam, lParam);
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// WinMain
+
+static BOOL
+RunInstaller(LPSTR lpCmdLine)
+{
+    PROCESS_INFORMATION pi;
+    STARTUPINFO         sti;
+    char                szCmdLine[MAX_PATH];
+    BOOL                bRet;
+	  char                szText[256];
+    char                szTempPath[4096];
+    char                szTmp[MAX_PATH];
+    char                szCurrentDirectory[MAX_PATH];
+    char                szBuf[MAX_PATH];
+
+	// Update UI
+	UpdateProgressBar(100);
+	LoadString(hInst, IDS_STATUS_LAUNCHING_SETUP, szText, sizeof(szText));
+	SetStatusLine(szText);
+
+    memset(&sti,0,sizeof(sti));
+    sti.cb = sizeof(STARTUPINFO);
+
+    // Setup program is in the directory specified for temporary files
+	  GetFullTempPathName("SETUP.EXE", sizeof(szCmdLine), szCmdLine);
+	  GetTempPath(4096, szTempPath);
+    GetCurrentDirectory(MAX_PATH, szCurrentDirectory);
+    GetShortPathName(szCurrentDirectory, szBuf, MAX_PATH);
+
+    lstrcat(szCmdLine, " -a");
+    lstrcat(szCmdLine, szBuf);
+
+    if((lpCmdLine != NULL) && (*lpCmdLine != '\0'))
+    {
+      lstrcat(szCmdLine, " ");
+      lstrcat(szCmdLine, lpCmdLine);
+    }
+
+	  // Launch the installer
+    bRet = CreateProcess(NULL, szCmdLine, NULL, NULL, FALSE, 0, NULL, szTempPath, &sti, &pi);
+
+    if (!bRet)
+        return FALSE;
+
+   	CloseHandle(pi.hThread);
+
+	// Wait for the InstallShield UI to appear before taking down the dialog box
+	WaitForInputIdle(pi.hProcess, 3000);  // wait up to 3 seconds
+	DestroyWindow(dlgInfo.hWndDlg);
+
+	// Wait for the installer to complete
+    WaitForSingleObject(pi.hProcess, INFINITE);
+    CloseHandle(pi.hProcess);
+
+	// That was just the installer bootstrapper. Now we need to wait for the
+	// installer itself. We can find the process ID by looking for a window of
+	// class ISINSTALLSCLASS
+	HWND	hWnd = FindWindow("ISINSTALLSCLASS", NULL);
+
+	if (hWnd) {
+		DWORD	dwProcessId;
+		HANDLE	hProcess;
+
+		// Get the associated process handle and wait for it to terminate
+		GetWindowThreadProcessId(hWnd, &dwProcessId);
+
+		// We need the process handle to use WaitForSingleObject
+		hProcess = OpenProcess(STANDARD_RIGHTS_REQUIRED | SYNCHRONIZE, FALSE, dwProcessId);
+
+		if (hProcess) {
+			WaitForSingleObject(hProcess, INFINITE);
+			CloseHandle(hProcess);
+		}
+	}
+	// Delete the files from the temp directory
+  EnumResourceNames(NULL, "FILE", (ENUMRESNAMEPROC)DeleteTempFilesProc, 0);
+
+  // delete archive.lst file in the temp directory
+	GetFullTempPathName("Archive.lst", sizeof(szTmp), szTmp);
+	DeleteFile(szTmp);
+	GetFullTempPathName("core.ns", sizeof(szTmp), szTmp);
+  DirectoryRemove(szTmp, TRUE);
+	return TRUE;
+}
+
+int APIENTRY
+WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
+{
+	WNDCLASS	wc;
+
+	hInst = hInstance;
+	LoadString(hInst, IDS_TITLE, szTitle, sizeof(szTitle));
+
+	// Figure out the total size of the resources
+	EnumResourceNames(NULL, "FILE", (ENUMRESNAMEPROC)SizeOfResourcesProc, 0);
+
+	// Register a class for the gauge
+	memset(&wc, 0, sizeof(wc));
+	wc.lpfnWndProc = (WNDPROC)GaugeWndProc;
+	wc.hInstance = hInstance;
+	wc.hbrBackground = (HBRUSH)(COLOR_BTNFACE + 1);
+	wc.lpszClassName = "NSGauge";
+	RegisterClass(&wc);
+
+	// Display the dialog box
+	dlgInfo.hWndDlg = CreateDialog(hInstance, MAKEINTRESOURCE(IDD_EXTRACTING),
+		NULL, (DLGPROC)DialogProc);
+	UpdateWindow(dlgInfo.hWndDlg);
+
+	// Extract the files
+	EnumResourceNames(NULL, "FILE", (ENUMRESNAMEPROC)ExtractFilesProc, 0);
+	
+	// Launch the install program and wait for it to finish
+	RunInstaller(lpCmdLine);
+	return 0;  
+}

mozilla/xpinstall/wizard/windows/nsinstall/nsinstall.rc

@@ -0,0 +1,125 @@
+//Microsoft Developer Studio generated resource script.
+//
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1999 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include "resource.h"
+
+#define APSTUDIO_READONLY_SYMBOLS
+/////////////////////////////////////////////////////////////////////////////
+//
+// Generated from the TEXTINCLUDE 2 resource.
+//
+
+/////////////////////////////////////////////////////////////////////////////
+#undef APSTUDIO_READONLY_SYMBOLS
+
+/////////////////////////////////////////////////////////////////////////////
+// English (U.S.) resources
+
+#if !defined(AFX_RESOURCE_DLL) || defined(AFX_TARG_ENU)
+#ifdef _WIN32
+LANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US
+#pragma code_page(1252)
+#endif //_WIN32
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Dialog
+//
+
+IDD_EXTRACTING DIALOG DISCARDABLE  0, 0, 193, 61
+STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
+CAPTION "Extracting..."
+FONT 8, "MS Sans Serif"
+BEGIN
+    LTEXT           "",IDC_STATUS,9,13,159,8
+    CONTROL         "",IDC_GAUGE,"NSGauge",0x0,9,31,175,11
+END
+
+
+#ifdef APSTUDIO_INVOKED
+/////////////////////////////////////////////////////////////////////////////
+//
+// TEXTINCLUDE
+//
+
+1 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "resource.h\0"
+END
+
+2 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "\r\n"
+    "\0"
+END
+
+3 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "\r\n"
+    "\0"
+END
+
+#endif    // APSTUDIO_INVOKED
+
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Icon
+//
+
+// Icon with lowest ID value placed first to ensure application icon
+// remains consistent on all systems.
+1                       ICON    DISCARDABLE     "nsinstall.ico"
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// String Table
+//
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    IDS_STATUS_EXTRACTING   "Extracting %s"
+    IDS_STATUS_LAUNCHING_SETUP "Launching Setup..."
+    IDS_ERROR_FILE_WRITE    "Unable to write file %s"
+    IDS_TITLE               "Netscape Communicator Installation"
+END
+
+#endif    // English (U.S.) resources
+/////////////////////////////////////////////////////////////////////////////
+
+
+
+#ifndef APSTUDIO_INVOKED
+/////////////////////////////////////////////////////////////////////////////
+//
+// Generated from the TEXTINCLUDE 3 resource.
+//
+
+
+/////////////////////////////////////////////////////////////////////////////
+#endif    // not APSTUDIO_INVOKED
+

mozilla/xpinstall/wizard/windows/nsinstall/resource.h

@@ -0,0 +1,52 @@
+//{{NO_DEPENDENCIES}}
+// Microsoft Developer Studio generated include file.
+// Used by nsinstall.rc
+//
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1999 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include "winuser.h"
+#include "winresrc.h"
+
+#define IDS_PROMPT                      1
+#define IDS_STATUS_EXTRACTING           2
+#define IDS_STATUS_LAUNCHING_SETUP      3
+#define IDS_ERROR_FILE_WRITE            4
+#define IDS_TITLE                       5
+#define IDD_EXTRACTING                  101
+#define IDC_STATUS                      1001
+#define IDC_GAUGE                       1002
+
+// Next default values for new objects
+// 
+#ifdef APSTUDIO_INVOKED
+#ifndef APSTUDIO_READONLY_SYMBOLS
+#define _APS_NEXT_RESOURCE_VALUE        103
+#define _APS_NEXT_COMMAND_VALUE         40001
+#define _APS_NEXT_CONTROL_VALUE         1003
+#define _APS_NEXT_SYMED_VALUE           101
+#define _APS_NO_MFC                     1
+#endif
+#endif

mozilla/xpinstall/wizard/windows/nszip/mainfrm.cpp

@@ -0,0 +1,109 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+// mainfrm.cpp : implementation of the CMainFrame class
+//
+
+#include "stdafx.h"
+#include "nszip.h"
+
+#include "mainfrm.h"
+
+#ifdef _DEBUG
+#undef THIS_FILE
+static char BASED_CODE THIS_FILE[] = __FILE__;
+#endif
+
+/////////////////////////////////////////////////////////////////////////////
+// CMainFrame
+
+IMPLEMENT_DYNCREATE(CMainFrame, CFrameWnd)
+
+BEGIN_MESSAGE_MAP(CMainFrame, CFrameWnd)
+	//{{AFX_MSG_MAP(CMainFrame)
+		// NOTE - the ClassWizard will add and remove mapping macros here.
+		//    DO NOT EDIT what you see in these blocks of generated code !
+	ON_WM_CREATE()
+	//}}AFX_MSG_MAP
+END_MESSAGE_MAP()
+
+/////////////////////////////////////////////////////////////////////////////
+// arrays of IDs used to initialize control bars
+
+static UINT BASED_CODE indicators[] =
+{
+	ID_SEPARATOR,           // status line indicator
+	ID_INDICATOR_CAPS,
+	ID_INDICATOR_NUM,
+	ID_INDICATOR_SCRL,
+};
+
+/////////////////////////////////////////////////////////////////////////////
+// CMainFrame construction/destruction
+
+CMainFrame::CMainFrame()
+{
+	// TODO: add member initialization code here
+	
+}
+
+CMainFrame::~CMainFrame()
+{
+}
+
+int CMainFrame::OnCreate(LPCREATESTRUCT lpCreateStruct)
+{
+	if (CFrameWnd::OnCreate(lpCreateStruct) == -1)
+		return -1;
+
+	if (!m_wndStatusBar.Create(this) ||
+		!m_wndStatusBar.SetIndicators(indicators,
+		  sizeof(indicators)/sizeof(UINT)))
+	{
+		TRACE0("Failed to create status bar\n");
+		return -1;      // fail to create
+	}
+
+	return 0;
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// CMainFrame diagnostics
+
+#ifdef _DEBUG
+void CMainFrame::AssertValid() const
+{
+	CFrameWnd::AssertValid();
+}
+
+void CMainFrame::Dump(CDumpContext& dc) const
+{
+	CFrameWnd::Dump(dc);
+}
+
+#endif //_DEBUG
+
+/////////////////////////////////////////////////////////////////////////////
+// CMainFrame message handlers

mozilla/xpinstall/wizard/windows/nszip/mainfrm.h

@@ -0,0 +1,68 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+// mainfrm.h : interface of the CMainFrame class
+//
+/////////////////////////////////////////////////////////////////////////////
+
+class CMainFrame : public CFrameWnd
+{
+protected: // create from serialization only
+	CMainFrame();
+	DECLARE_DYNCREATE(CMainFrame)
+
+// Attributes
+public:
+
+// Operations
+public:
+
+// Overrides
+	// ClassWizard generated virtual function overrides
+	//{{AFX_VIRTUAL(CMainFrame)
+	//}}AFX_VIRTUAL
+
+// Implementation
+public:
+	virtual ~CMainFrame();
+#ifdef _DEBUG
+	virtual void AssertValid() const;
+	virtual void Dump(CDumpContext& dc) const;
+#endif
+
+protected:  // control bar embedded members
+	CStatusBar  m_wndStatusBar;
+
+// Generated message map functions
+protected:
+	//{{AFX_MSG(CMainFrame)
+	afx_msg int OnCreate(LPCREATESTRUCT lpCreateStruct);
+		// NOTE - the ClassWizard will add and remove member functions here.
+		//    DO NOT EDIT what you see in these blocks of generated code!
+	//}}AFX_MSG
+	DECLARE_MESSAGE_MAP()
+};
+
+/////////////////////////////////////////////////////////////////////////////

mozilla/xpinstall/wizard/windows/nszip/makefile.win

@@ -0,0 +1,55 @@
+#
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Mozilla Communicator client code, 
+# released March 31, 1998. 
+#
+# The Initial Developer of the Original Code is Netscape Communications 
+# Corporation.  Portions created by Netscape are
+# Copyright (C) 1999 Netscape Communications Corporation. All
+# Rights Reserved.
+#
+# Contributor(s): 
+
+DEPTH=..\..\..\..
+
+MAKE_OBJ_TYPE   = EXE
+USE_STATIC_LIBS = 1
+
+MODULE          = nszip
+PROGRAM         = .\$(OBJDIR)\$(MODULE).exe
+RESFILE         = $(MODULE).res
+
+OBJS =                          \
+    .\$(OBJDIR)\nszip.obj       \
+    .\$(OBJDIR)\mainfrm.obj     \
+    .\$(OBJDIR)\nszipdoc.obj    \
+    .\$(OBJDIR)\nszipvw.obj     \
+    .\$(OBJDIR)\stdafx.obj      \
+    $(NULL)
+
+LLIBS=                          \
+    $(DIST)\lib\zlib_s.lib      \
+    $(NULL)
+
+LLFLAGS=                        \
+    /subsystem:windows          \
+    /machine:i386               \
+    $(NULL)
+
+include <$(DEPTH)\config\rules.mak>
+
+install:: $(PROGRAM)
+    $(MAKE_INSTALL) $(PROGRAM) $(DIST)\install
+
+clobber_all::
+    $(RM) $(DIST)\install\$(MODULE).exe
+

mozilla/xpinstall/wizard/windows/nszip/nszip.cpp

@@ -0,0 +1,202 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+// nszip.cpp : Defines the class behaviors for the application.
+//
+
+#include "stdafx.h"
+#include "nszip.h"
+
+#include "mainfrm.h"
+#include "nszipdoc.h"
+#include "nszipvw.h"
+
+#ifdef _DEBUG
+#undef THIS_FILE
+static char BASED_CODE THIS_FILE[] = __FILE__;
+#endif
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipApp
+
+BEGIN_MESSAGE_MAP(CNsZipApp, CWinApp)
+	//{{AFX_MSG_MAP(CNsZipApp)
+	ON_COMMAND(ID_APP_ABOUT, OnAppAbout)
+		// NOTE - the ClassWizard will add and remove mapping macros here.
+		//    DO NOT EDIT what you see in these blocks of generated code!
+	//}}AFX_MSG_MAP
+	// Standard file based document commands
+	ON_COMMAND(ID_FILE_NEW, CWinApp::OnFileNew)
+	ON_COMMAND(ID_FILE_OPEN, CWinApp::OnFileOpen)
+END_MESSAGE_MAP()
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipApp construction
+
+CNsZipApp::CNsZipApp()
+{
+	// TODO: add construction code here,
+	// Place all significant initialization in InitInstance
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// The one and only CNsZipApp object
+
+CNsZipApp theApp;
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipApp initialization
+
+void CNsZipApp::ProcessCmdLine()
+{
+	// Make a copy of the command line since we will change it while parsing
+	CString		strCmdLine(m_lpCmdLine);
+
+	// Get the name of the archive
+	LPSTR	lpArchive = strtok((LPSTR)(LPCSTR)strCmdLine, " ");
+
+	if (lpArchive) {
+		char			szPath[MAX_PATH], szExtension[_MAX_EXT];
+		LPSTR			lpFiles;
+		CDocTemplate*	pTemplate;
+		CNsZipDoc*		pDoc;
+
+//		ASSERT(m_templateList.GetCount() == 1);
+//		pTemplate = (CDocTemplate*)m_templateList.GetHead();
+
+    POSITION pos = GetFirstDocTemplatePosition();
+
+    pTemplate = (CDocTemplate*)GetNextDocTemplate(pos);
+    ASSERT(pTemplate);
+		ASSERT(pTemplate->IsKindOf(RUNTIME_CLASS(CDocTemplate)));
+
+		// Create a new document
+		VERIFY(pDoc = (CNsZipDoc*)pTemplate->CreateNewDocument());
+
+		// We need a fully qualified pathname
+		::GetFullPathName(lpArchive, sizeof(szPath), szPath, NULL);
+
+		// Make sure it ends with .EXE
+		_splitpath(szPath, NULL, NULL, NULL, szExtension);
+		if (stricmp(szExtension, ".exe") != 0)
+			strcat(szPath, ".exe");
+
+		// Now go ahead and create the archive
+		pDoc->OnNewDocument(szPath);
+
+		// Process the files. These can be wildcards
+		while (lpFiles = strtok(NULL, " "))
+			pDoc->AddFiles(lpFiles);		
+//		while (lpFiles = strtok(lpArchive, " "))
+//			pDoc->AddFiles(lpFiles);		
+	
+		pDoc->OnSaveDocument(szPath);
+		delete pDoc;
+	}
+}
+
+BOOL CNsZipApp::InitInstance()
+{
+	// Standard initialization
+	// If you are not using these features and wish to reduce the size
+	//  of your final executable, you should remove from the following
+	//  the specific initialization routines you do not need.
+
+	Enable3dControls();
+
+	LoadStdProfileSettings();  // Load standard INI file options (including MRU)
+
+	// Register the application's document templates.  Document templates
+	//  serve as the connection between documents, frame windows and views.
+	CSingleDocTemplate* pDocTemplate;
+	pDocTemplate = new CSingleDocTemplate(
+		IDR_MAINFRAME,
+		RUNTIME_CLASS(CNsZipDoc),
+		RUNTIME_CLASS(CMainFrame),       // main SDI frame window
+		RUNTIME_CLASS(CNsZipView));
+	AddDocTemplate(pDocTemplate);
+
+	if (m_lpCmdLine[0] != '\0') {
+		ProcessCmdLine();
+		return FALSE;
+	}
+
+	// create a new (empty) document
+	OnFileNew();
+
+	return TRUE;
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// CAboutDlg dialog used for App About
+
+class CAboutDlg : public CDialog
+{
+public:
+	CAboutDlg();
+
+// Dialog Data
+	//{{AFX_DATA(CAboutDlg)
+	enum { IDD = IDD_ABOUTBOX };
+	//}}AFX_DATA
+
+// Implementation
+protected:
+	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
+	//{{AFX_MSG(CAboutDlg)
+		// No message handlers
+	//}}AFX_MSG
+	DECLARE_MESSAGE_MAP()
+};
+
+CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
+{
+	//{{AFX_DATA_INIT(CAboutDlg)
+	//}}AFX_DATA_INIT
+}
+
+void CAboutDlg::DoDataExchange(CDataExchange* pDX)
+{
+	CDialog::DoDataExchange(pDX);
+	//{{AFX_DATA_MAP(CAboutDlg)
+	//}}AFX_DATA_MAP
+}
+
+BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
+	//{{AFX_MSG_MAP(CAboutDlg)
+		// No message handlers
+	//}}AFX_MSG_MAP
+END_MESSAGE_MAP()
+
+// App command to run the dialog
+void CNsZipApp::OnAppAbout()
+{
+	CAboutDlg aboutDlg;
+	aboutDlg.DoModal();
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipApp commands
+

mozilla/xpinstall/wizard/windows/nszip/nszip.h

@@ -0,0 +1,66 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+// nszip.h : main header file for the NSZIP application
+//
+
+#ifndef __AFXWIN_H__
+	#error include 'stdafx.h' before including this file for PCH
+#endif
+
+#include "resource.h"       // main symbols
+#include "zlib.h"
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipApp:
+// See nszip.cpp for the implementation of this class
+//
+
+class CNsZipApp : public CWinApp
+{
+public:
+	CNsZipApp();
+
+// Overrides
+	// ClassWizard generated virtual function overrides
+	//{{AFX_VIRTUAL(CNsZipApp)
+	public:
+	virtual BOOL InitInstance();
+	//}}AFX_VIRTUAL
+
+// Implementation
+protected:
+	void	ProcessCmdLine();
+
+	//{{AFX_MSG(CNsZipApp)
+	afx_msg void OnAppAbout();
+		// NOTE - the ClassWizard will add and remove member functions here.
+		//    DO NOT EDIT what you see in these blocks of generated code !
+	//}}AFX_MSG
+	DECLARE_MESSAGE_MAP()
+};
+
+
+/////////////////////////////////////////////////////////////////////////////

mozilla/xpinstall/wizard/windows/nszip/nszip.rc

@@ -0,0 +1,305 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+//Microsoft Visual C++ generated resource script.
+//
+#include "resource.h"
+
+#define APSTUDIO_READONLY_SYMBOLS
+/////////////////////////////////////////////////////////////////////////////
+//
+// Generated from the TEXTINCLUDE 2 resource.
+//
+#include "afxres.h"
+
+/////////////////////////////////////////////////////////////////////////////
+#undef APSTUDIO_READONLY_SYMBOLS
+
+
+#ifdef APSTUDIO_INVOKED
+/////////////////////////////////////////////////////////////////////////////
+//
+// TEXTINCLUDE
+//
+
+1 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "resource.h\0"
+END
+
+2 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "#include ""afxres.h""\r\n"
+    "\0"
+END
+
+3 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "#include ""res\\nszip.rc2""  // non-Microsoft Visual C++ edited resources\r\n"
+    "\r\n"
+    "#define _AFX_NO_SPLITTER_RESOURCES\r\n"
+    "#define _AFX_NO_OLE_RESOURCES\r\n"
+    "#define _AFX_NO_TRACKER_RESOURCES\r\n"
+    "#define _AFX_NO_PROPERTY_RESOURCES\r\n"
+    "#include ""afxres.rc""  \011// Standard components\r\n"
+    "\0"
+END
+
+/////////////////////////////////////////////////////////////////////////////
+#endif    // APSTUDIO_INVOKED
+
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Icon
+//
+
+IDR_MAINFRAME           ICON    DISCARDABLE     "res\\nszip.ico"
+IDR_NSZIPTYPE           ICON    DISCARDABLE     "res\\nszipdoc.ico"
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Menu
+//
+
+IDR_MAINFRAME MENU PRELOAD DISCARDABLE 
+BEGIN
+    POPUP "&File"
+    BEGIN
+        MENUITEM "&New Archive...\tCtrl+N",     ID_FILE_NEW
+        MENUITEM "&Open Archive...\tCtrl+O",    ID_FILE_OPEN
+        MENUITEM "&Close Archive\tCtrl+L",      ID_FILE_CLOSE
+        MENUITEM SEPARATOR
+        MENUITEM "Recent File",                 ID_FILE_MRU_FILE1, GRAYED
+        MENUITEM SEPARATOR
+        MENUITEM "E&xit",                       ID_APP_EXIT
+    END
+    POPUP "&Actions"
+    BEGIN
+        MENUITEM "Add...\tCtrl+A",              ID_ACTIONS_ADD
+        MENUITEM "&Delete\tCtrl+D",             ID_ACTIONS_DELETE
+    END
+    POPUP "&Help"
+    BEGIN
+        MENUITEM "&About NsZip...",             ID_APP_ABOUT
+    END
+END
+
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Accelerator
+//
+
+IDR_MAINFRAME ACCELERATORS PRELOAD MOVEABLE PURE 
+BEGIN
+    "N",            ID_FILE_NEW,            VIRTKEY, CONTROL
+    "O",            ID_FILE_OPEN,           VIRTKEY, CONTROL
+    "S",            ID_FILE_SAVE,           VIRTKEY, CONTROL
+    "Z",            ID_EDIT_UNDO,           VIRTKEY, CONTROL
+    "X",            ID_EDIT_CUT,            VIRTKEY, CONTROL
+    "C",            ID_EDIT_COPY,           VIRTKEY, CONTROL
+    "V",            ID_EDIT_PASTE,          VIRTKEY, CONTROL
+    VK_BACK,        ID_EDIT_UNDO,           VIRTKEY, ALT
+    VK_DELETE,      ID_EDIT_CUT,            VIRTKEY, SHIFT
+    VK_INSERT,      ID_EDIT_COPY,           VIRTKEY, CONTROL
+    VK_INSERT,      ID_EDIT_PASTE,          VIRTKEY, SHIFT
+    VK_F6,          ID_NEXT_PANE,           VIRTKEY 
+    VK_F6,          ID_PREV_PANE,           VIRTKEY, SHIFT
+END
+
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Dialog
+//
+
+IDD_ABOUTBOX DIALOG DISCARDABLE  34, 22, 217, 55
+STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
+CAPTION "About nszip"
+FONT 8, "MS Sans Serif"
+BEGIN
+    ICON            IDR_MAINFRAME,IDC_STATIC,11,17,20,20
+    LTEXT           "nszip Version 1.0",IDC_STATIC,40,10,119,8
+    LTEXT           "Copyright \251 1995",IDC_STATIC,40,25,119,8
+    DEFPUSHBUTTON   "OK",IDOK,176,6,32,14,WS_GROUP
+END
+
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Version
+//
+
+VS_VERSION_INFO VERSIONINFO
+ FILEVERSION 1,0,0,1
+ PRODUCTVERSION 1,0,0,1
+ FILEFLAGSMASK 0x3fL
+#ifdef _DEBUG
+ FILEFLAGS 0x1L
+#else
+ FILEFLAGS 0x0L
+#endif
+ FILEOS 0x4L
+ FILETYPE 0x1L
+ FILESUBTYPE 0x0L
+BEGIN
+    BLOCK "StringFileInfo"
+    BEGIN
+        BLOCK "040904B0"
+        BEGIN
+            VALUE "CompanyName", "\0"
+            VALUE "FileDescription", "NSZIP MFC Application\0"
+            VALUE "FileVersion", "1, 0, 0, 1\0"
+            VALUE "InternalName", "NSZIP\0"
+            VALUE "LegalCopyright", "Copyright \251 1995\0"
+            VALUE "LegalTrademarks", "\0"
+            VALUE "OriginalFilename", "NSZIP.EXE\0"
+            VALUE "ProductName", "NSZIP Application\0"
+            VALUE "ProductVersion", "1, 0, 0, 1\0"
+        END
+    END
+    BLOCK "VarFileInfo"
+    BEGIN
+        VALUE "Translation", 0x409, 1200
+    END
+END
+
+
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// String Table
+//
+
+STRINGTABLE PRELOAD DISCARDABLE 
+BEGIN
+    IDR_MAINFRAME           "nszip\n\nNszip\n\n\nNszip.Document\nNszip Document"
+END
+
+STRINGTABLE PRELOAD DISCARDABLE 
+BEGIN
+    AFX_IDS_APP_TITLE       "nszip"
+    AFX_IDS_IDLEMESSAGE     "Ready"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    ID_INDICATOR_EXT        "EXT"
+    ID_INDICATOR_CAPS       "CAP"
+    ID_INDICATOR_NUM        "NUM"
+    ID_INDICATOR_SCRL       "SCRL"
+    ID_INDICATOR_OVR        "OVR"
+    ID_INDICATOR_REC        "REC"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    ID_FILE_NEW             "Create a new archive\nNew"
+    ID_FILE_OPEN            "Open an existing archive\nOpen"
+    ID_FILE_CLOSE           "Close the active archive\nClose"
+    ID_FILE_SAVE            "Save the active document\nSave"
+    ID_FILE_SAVE_AS         "Save the active document with a new name\nSave As"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    ID_APP_ABOUT            "Display program information, version number and copyright\nAbout"
+    ID_APP_EXIT             "Quit the application; prompts to save documents\nExit"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    ID_FILE_MRU_FILE1       "Open this document"
+    ID_FILE_MRU_FILE2       "Open this document"
+    ID_FILE_MRU_FILE3       "Open this document"
+    ID_FILE_MRU_FILE4       "Open this document"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    ID_NEXT_PANE            "Switch to the next window pane\nNext Pane"
+    ID_PREV_PANE            "Switch back to the previous window pane\nPrevious Pane"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    ID_WINDOW_SPLIT         "Split the active window into panes\nSplit"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    ID_EDIT_CLEAR           "Erase the selection\nErase"
+    ID_EDIT_CLEAR_ALL       "Erase everything\nErase All"
+    ID_EDIT_COPY            "Copy the selection and put it on the Clipboard\nCopy"
+    ID_EDIT_CUT             "Cut the selection and put it on the Clipboard\nCut"
+    ID_EDIT_FIND            "Find the specified text\nFind"
+    ID_EDIT_PASTE           "Insert Clipboard contents\nPaste"
+    ID_EDIT_REPEAT          "Repeat the last action\nRepeat"
+    ID_EDIT_REPLACE         "Replace specific text with different text\nReplace"
+    ID_EDIT_SELECT_ALL      "Select the entire document\nSelect All"
+    ID_EDIT_UNDO            "Undo the last action\nUndo"
+    ID_EDIT_REDO            "Redo the previously undone action\nRedo"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    ID_VIEW_STATUS_BAR      "Show or hide the status bar\nToggle StatusBar"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    AFX_IDS_SCSIZE          "Change the window size"
+    AFX_IDS_SCMOVE          "Change the window position"
+    AFX_IDS_SCMINIMIZE      "Reduce the window to an icon"
+    AFX_IDS_SCMAXIMIZE      "Enlarge the window to full size"
+    AFX_IDS_SCNEXTWINDOW    "Switch to the next document window"
+    AFX_IDS_SCPREVWINDOW    "Switch to the previous document window"
+    AFX_IDS_SCCLOSE         "Close the active window and prompts to save the documents"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    AFX_IDS_SCRESTORE       "Restore the window to normal size"
+    AFX_IDS_SCTASKLIST      "Activate Task List"
+END
+
+
+#ifndef APSTUDIO_INVOKED
+/////////////////////////////////////////////////////////////////////////////
+//
+// Generated from the TEXTINCLUDE 3 resource.
+//
+#include "res\nszip.rc2"  // non-Microsoft Visual C++ edited resources
+
+#define _AFX_NO_SPLITTER_RESOURCES
+#define _AFX_NO_OLE_RESOURCES
+#define _AFX_NO_TRACKER_RESOURCES
+#define _AFX_NO_PROPERTY_RESOURCES
+#include "afxres.rc"  	// Standard components
+
+/////////////////////////////////////////////////////////////////////////////
+#endif    // not APSTUDIO_INVOKED
+

mozilla/xpinstall/wizard/windows/nszip/nszipdoc.cpp

@@ -0,0 +1,264 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+// nszipdoc.cpp : implementation of the CNsZipDoc class
+//
+
+#include "stdafx.h"
+#include "nszip.h"
+
+#include "nszipdoc.h"
+
+#ifdef _DEBUG
+#undef THIS_FILE
+static char BASED_CODE THIS_FILE[] = __FILE__;
+#endif
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipDoc
+
+IMPLEMENT_DYNCREATE(CNsZipDoc, CDocument)
+
+BEGIN_MESSAGE_MAP(CNsZipDoc, CDocument)
+	//{{AFX_MSG_MAP(CNsZipDoc)
+	//}}AFX_MSG_MAP
+END_MESSAGE_MAP()
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipDoc construction/destruction
+
+CNsZipDoc::CNsZipDoc()
+{
+	m_hUpdateFile = NULL;
+}
+
+CNsZipDoc::~CNsZipDoc()
+{
+}
+
+BOOL CNsZipDoc::OnNewDocument(LPCTSTR lpszPathName)
+{
+	char	szStub[MAX_PATH];
+
+	// If we were doing a resource update, discard any changes
+	if (m_hUpdateFile) {
+		VERIFY(::EndUpdateResource(m_hUpdateFile, TRUE));
+
+		// Delete the archive
+		DeleteFile(m_strPathName);
+	}
+
+	if (!CDocument::OnNewDocument())
+		return FALSE;
+
+	// Set the pathname
+	SetPathName(lpszPathName);
+
+	// Copy the stub executable and make it the basis of the archive
+	::GetModuleFileName(NULL, szStub, sizeof(szStub));
+	strcpy(strrchr(szStub, '\\') + 1, "Nsinstall.exe");
+	::CopyFile(szStub, m_strPathName, FALSE);  // overwrite an existing file
+
+	// Get a handle we can use with UpdateResource()
+	VERIFY(m_hUpdateFile = ::BeginUpdateResource(m_strPathName, FALSE));
+	return m_hUpdateFile != NULL;
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipDoc serialization
+
+void CNsZipDoc::Serialize(CArchive& ar)
+{
+	if (ar.IsStoring())
+	{
+		// TODO: add storing code here
+	}
+	else
+	{
+		// TODO: add loading code here
+	}
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipDoc diagnostics
+
+#ifdef _DEBUG
+void CNsZipDoc::AssertValid() const
+{
+	CDocument::AssertValid();
+}
+
+void CNsZipDoc::Dump(CDumpContext& dc) const
+{
+	CDocument::Dump(dc);
+}
+#endif //_DEBUG
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipDoc commands
+
+void CNsZipDoc::OnCloseDocument() 
+{
+	// If we were doing a resource update, discard any changes
+	if (m_hUpdateFile) {
+		VERIFY(::EndUpdateResource(m_hUpdateFile, TRUE));
+		m_hUpdateFile = NULL;
+
+		// Delete the archive
+		DeleteFile(m_strPathName);
+	}
+	
+	CDocument::OnCloseDocument();
+}
+
+BOOL CNsZipDoc::OnOpenDocument(LPCTSTR lpszPathName) 
+{
+	// If we were doing a resource update, discard any changes
+	if (m_hUpdateFile) {
+		VERIFY(::EndUpdateResource(m_hUpdateFile, TRUE));
+
+		// Delete the archive
+		DeleteFile(m_strPathName);
+	}
+
+	DeleteContents();
+
+	// ZZZ: Get a list of all the FILE resources
+	ASSERT(FALSE);	
+	return TRUE;
+}
+
+void CNsZipDoc::DeleteContents() 
+{
+	m_hUpdateFile = NULL;
+	CDocument::DeleteContents();
+}
+
+BOOL CNsZipDoc::OnSaveDocument(LPCTSTR lpszPathName) 
+{
+	// If we were doing a resource update, save any changes
+	if (m_hUpdateFile) {
+		BOOL	bRet = ::EndUpdateResource(m_hUpdateFile, FALSE);
+
+		ASSERT(bRet);
+		m_hUpdateFile = NULL;
+		return bRet;
+	}
+
+	return TRUE;
+}
+
+// Add a single file to the archive
+BOOL CNsZipDoc::AddFile(LPCTSTR lpszFile)
+{
+	HANDLE	hFile;
+	LPBYTE	lpBuf;
+	LPBYTE	lpBufCmp;
+	DWORD	dwBytesRead;
+	DWORD	dwFileSize;
+	DWORD	dwFileSizeCmp;
+
+	// Check if we are trying to add the archive file itself
+	// (this could happen if the user passes *.* as a file spec)
+	if (m_strPathName.CompareNoCase(lpszFile) == 0)
+		return FALSE;
+
+	// Open the file
+	hFile = ::CreateFile(lpszFile, GENERIC_READ, FILE_SHARE_READ, NULL,
+		OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
+
+	if (hFile == INVALID_HANDLE_VALUE)
+		return FALSE;
+
+	// Figure out how big the file is
+	dwFileSize = GetFileSize(hFile, NULL);
+
+	// Allocate enough space for the file contents and a DWORD header that
+	// contains the size of the file
+	lpBuf         = (LPBYTE)malloc(dwFileSize);
+	lpBufCmp      = (LPBYTE)malloc(dwFileSize + (sizeof(DWORD) * 2));
+  dwFileSizeCmp = dwFileSize;
+
+  if (lpBuf) {
+		CString	strResourceName = strrchr(lpszFile, '\\') + 1;
+
+		// It's really important that the resource name be UPPERCASE
+		strResourceName.MakeUpper();
+
+//		*(LPDWORD)lpBuf = dwFileSize;
+		::ReadFile(hFile, lpBuf, dwFileSize, &dwBytesRead, NULL);
+		ASSERT(dwBytesRead == dwFileSize);
+
+    if(compress((lpBufCmp + (sizeof(DWORD) * 2)), &dwFileSizeCmp, (const Bytef*)lpBuf, dwFileSize) != Z_OK)
+      return(FALSE);
+
+    // The first DWORD holds the total size of the file to be stored in the
+    // resource (in this case, it's the compressed size)
+    // The second DWORD holds the original uncompressed size of the file.
+    *(LPDWORD)lpBufCmp = dwFileSizeCmp;
+    *(LPDWORD)(lpBufCmp + sizeof(DWORD)) = dwFileSize;
+    
+    VERIFY(::UpdateResource(m_hUpdateFile, "FILE", strResourceName,
+			MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), lpBufCmp, dwFileSizeCmp + (sizeof(DWORD) * 2)));
+	}
+
+	free(lpBuf);
+	::CloseHandle(hFile);
+	return TRUE;
+}
+
+// Add one or more files to the archive (lpszFiles can be a wildcard)
+void CNsZipDoc::AddFiles(LPCTSTR lpszFiles)
+{
+	ASSERT(m_hUpdateFile);
+	ASSERT(lpszFiles);
+
+	if (lpszFiles) {
+		HANDLE			hFindFile;
+		WIN32_FIND_DATA	findFileData;
+		char			szPath[MAX_PATH];
+
+		// Get a full pathname to the files
+		::GetFullPathName(lpszFiles, sizeof(szPath), szPath, NULL);
+
+		// Get the first file that matches
+		hFindFile = ::FindFirstFile(szPath, &findFileData);
+
+		if (hFindFile == INVALID_HANDLE_VALUE)
+			return;
+
+		do {
+			char	szFile[MAX_PATH];
+
+			// We need to pass to AddFile() whatever kind of path we were passed,
+			// e.g. simple, relative, full
+			strcpy(szFile, szPath);
+			strcpy(strrchr(szFile, '\\') + 1, findFileData.cFileName);
+			AddFile(szFile);
+		} while (::FindNextFile(hFindFile, &findFileData));
+
+		::FindClose(hFindFile);
+	}
+}

mozilla/xpinstall/wizard/windows/nszip/nszipdoc.h

@@ -0,0 +1,80 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+// nszipdoc.h : interface of the CNsZipDoc class
+//
+/////////////////////////////////////////////////////////////////////////////
+
+class CNsZipDoc : public CDocument
+{
+protected: // create from serialization only
+	CNsZipDoc();
+	DECLARE_DYNCREATE(CNsZipDoc)
+
+// Attributes
+public:
+
+// Operations
+public:
+	// Create an archive with the specified file name. Wrapper around
+	// the MFC OnNewDocument member
+	BOOL	OnNewDocument(LPCTSTR lpszPathName);
+
+	// Add a single file to the archive
+	BOOL	AddFile(LPCTSTR lpszFile);
+
+	// Add one or more files to the archive (lpszFiles can be a wildcard)
+	void	AddFiles(LPCTSTR lpszFiles);
+
+// Overrides
+	// ClassWizard generated virtual function overrides
+	//{{AFX_VIRTUAL(CNsZipDoc)
+	public:
+	virtual void OnCloseDocument();
+	virtual BOOL OnOpenDocument(LPCTSTR lpszPathName);
+	virtual void DeleteContents();
+	virtual BOOL OnSaveDocument(LPCTSTR lpszPathName);
+	//}}AFX_VIRTUAL
+
+// Implementation
+public:
+	virtual ~CNsZipDoc();
+	virtual void Serialize(CArchive& ar);   // overridden for document i/o
+#ifdef _DEBUG
+	virtual void AssertValid() const;
+	virtual void Dump(CDumpContext& dc) const;
+#endif
+
+protected:
+	HANDLE	m_hUpdateFile;
+
+// Generated message map functions
+protected:
+	//{{AFX_MSG(CNsZipDoc)
+	//}}AFX_MSG
+	DECLARE_MESSAGE_MAP()
+};
+
+/////////////////////////////////////////////////////////////////////////////

mozilla/xpinstall/wizard/windows/nszip/nszipvw.cpp

@@ -0,0 +1,117 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+// nszipvw.cpp : implementation of the CNsZipView class
+//
+
+#include "stdafx.h"
+#include "nszip.h"
+
+#include "nszipdoc.h"
+#include "nszipvw.h"
+
+#ifdef _DEBUG
+#undef THIS_FILE
+static char BASED_CODE THIS_FILE[] = __FILE__;
+#endif
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipView
+
+IMPLEMENT_DYNCREATE(CNsZipView, CView)
+
+BEGIN_MESSAGE_MAP(CNsZipView, CView)
+	//{{AFX_MSG_MAP(CNsZipView)
+	ON_COMMAND(ID_ACTIONS_DELETE, OnActionsDelete)
+	ON_UPDATE_COMMAND_UI(ID_ACTIONS_DELETE, OnUpdateActionsDelete)
+	ON_COMMAND(ID_ACTIONS_ADD, OnActionsAdd)
+	//}}AFX_MSG_MAP
+END_MESSAGE_MAP()
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipView construction/destruction
+
+CNsZipView::CNsZipView()
+{
+	// TODO: add construction code here
+
+}
+
+CNsZipView::~CNsZipView()
+{
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipView drawing
+
+void CNsZipView::OnDraw(CDC* pDC)
+{
+	CNsZipDoc* pDoc = GetDocument();
+	ASSERT_VALID(pDoc);
+
+	// TODO: add draw code for native data here
+}
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipView diagnostics
+
+#ifdef _DEBUG
+void CNsZipView::AssertValid() const
+{
+	CView::AssertValid();
+}
+
+void CNsZipView::Dump(CDumpContext& dc) const
+{
+	CView::Dump(dc);
+}
+
+CNsZipDoc* CNsZipView::GetDocument() // non-debug version is inline
+{
+	ASSERT(m_pDocument->IsKindOf(RUNTIME_CLASS(CNsZipDoc)));
+	return (CNsZipDoc*)m_pDocument;
+}
+#endif //_DEBUG
+
+/////////////////////////////////////////////////////////////////////////////
+// CNsZipView message handlers
+
+void CNsZipView::OnActionsDelete() 
+{
+	// TODO: Add your command handler code here
+	
+}
+
+void CNsZipView::OnUpdateActionsDelete(CCmdUI* pCmdUI) 
+{
+	// TODO: Add your command update UI handler code here
+	
+}
+
+void CNsZipView::OnActionsAdd() 
+{
+	// TODO: Add your command handler code here
+	
+}

mozilla/xpinstall/wizard/windows/nszip/nszipvw.h

@@ -0,0 +1,76 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+// nszipvw.h : interface of the CNsZipView class
+//
+/////////////////////////////////////////////////////////////////////////////
+
+class CNsZipView : public CView
+{
+protected: // create from serialization only
+	CNsZipView();
+	DECLARE_DYNCREATE(CNsZipView)
+
+// Attributes
+public:
+	CNsZipDoc* GetDocument();
+
+// Operations
+public:
+
+// Overrides
+	// ClassWizard generated virtual function overrides
+	//{{AFX_VIRTUAL(CNsZipView)
+	public:
+	virtual void OnDraw(CDC* pDC);  // overridden to draw this view
+	protected:
+	//}}AFX_VIRTUAL
+
+// Implementation
+public:
+	virtual ~CNsZipView();
+#ifdef _DEBUG
+	virtual void AssertValid() const;
+	virtual void Dump(CDumpContext& dc) const;
+#endif
+
+protected:
+
+// Generated message map functions
+protected:
+	//{{AFX_MSG(CNsZipView)
+	afx_msg void OnActionsDelete();
+	afx_msg void OnUpdateActionsDelete(CCmdUI* pCmdUI);
+	afx_msg void OnActionsAdd();
+	//}}AFX_MSG
+	DECLARE_MESSAGE_MAP()
+};
+
+#ifndef _DEBUG  // debug version in nszipvw.cpp
+inline CNsZipDoc* CNsZipView::GetDocument()
+   { return (CNsZipDoc*)m_pDocument; }
+#endif
+
+/////////////////////////////////////////////////////////////////////////////

mozilla/xpinstall/wizard/windows/nszip/res/nszip.rc2

@@ -0,0 +1,13 @@
+//
+// NSZIP.RC2 - resources Microsoft Visual C++ does not edit directly
+//
+
+#ifdef APSTUDIO_INVOKED
+	#error this file is not editable by Microsoft Visual C++
+#endif //APSTUDIO_INVOKED
+
+
+/////////////////////////////////////////////////////////////////////////////
+// Add manually edited resources here...
+
+/////////////////////////////////////////////////////////////////////////////

mozilla/xpinstall/wizard/windows/nszip/resource.h

@@ -0,0 +1,46 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+//{{NO_DEPENDENCIES}}
+// Microsoft Visual C++ generated include file.
+// Used by nszip.rc
+//
+#define IDD_ABOUTBOX                    100
+#define IDR_MAINFRAME                   128
+#define IDR_NSZIPTYPE                   129
+#define ID_ACTIONS_ADD                  32772
+#define ID_ACTIONS_DELETE               32773
+
+// Next default values for new objects
+// 
+#ifdef APSTUDIO_INVOKED
+#ifndef APSTUDIO_READONLY_SYMBOLS
+#define _APS_3D_CONTROLS                     1
+#define _APS_NEXT_RESOURCE_VALUE        130
+#define _APS_NEXT_COMMAND_VALUE         32774
+#define _APS_NEXT_CONTROL_VALUE         1000
+#define _APS_NEXT_SYMED_VALUE           101
+#endif
+#endif

mozilla/xpinstall/wizard/windows/nszip/stdafx.cpp

@@ -0,0 +1,31 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+// stdafx.cpp : source file that includes just the standard includes
+//	nszip.pch will be the pre-compiled header
+//	stdafx.obj will contain the pre-compiled type information
+
+#include "stdafx.h"
+

mozilla/xpinstall/wizard/windows/nszip/stdafx.h

@@ -0,0 +1,32 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Troy Chevalier <troy@netscape.com>
+ *     Sean Su <ssu@netscape.com>
+ */
+
+// stdafx.h : include file for standard system include files,
+//  or project specific include files that are used frequently, but
+//      are changed infrequently
+//
+
+#include <afxwin.h>         // MFC core and standard components
+#include <afxext.h>         // MFC extensions

mozilla/xpinstall/wizard/windows/nsztool/makefile.win

@@ -0,0 +1,52 @@
+#
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Mozilla Communicator client code, 
+# released March 31, 1998. 
+#
+# The Initial Developer of the Original Code is Netscape Communications 
+# Corporation.  Portions created by Netscape are
+# Copyright (C) 1999 Netscape Communications Corporation. All
+# Rights Reserved.
+#
+# Contributor(s): 
+
+DEPTH=..\..\..\..
+
+MAKE_OBJ_TYPE   = EXE
+USE_NON_MT_LIBS = 1
+
+MODULE          = nsztool
+PROGRAM         = .\$(OBJDIR)\$(MODULE).exe
+
+OBJS =                          \
+    .\$(OBJDIR)\nsztool.obj     \
+    $(NULL)
+
+LLIBS=                          \
+    $(DIST)\lib\zlib_s.lib      \
+    $(NULL)
+
+LLFLAGS=                        \
+    /subsystem:windows          \
+    /machine:i386               \
+    $(NULL)
+
+include <$(DEPTH)\config\rules.mak>
+
+install:: $(PROGRAM)
+    $(MAKE_INSTALL) $(PROGRAM) $(DIST)\install
+    $(DIST)\install\$(MODULE).exe -g $(DIST)\install\nszip.exe $(DIST)\install\nsinstall.exe
+
+clobber_all::
+    $(RM) $(DIST)\install\$(MODULE).exe
+    $(RM) $(DIST)\install\nszip.exe
+

mozilla/xpinstall/wizard/windows/nsztool/nsztool.c

@@ -0,0 +1,659 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include <windows.h>
+#include <stdio.h>
+#include <io.h>
+#include <stdlib.h>
+#include <ctype.h>
+#include "nsztool.h"
+#include "zlib.h"
+
+//#define SSU_DEBUG
+
+/* Function to show the usage for this application */
+void ShowUsage(char *name)
+{
+    char szBuf[MAX_BUF];
+
+    wsprintf(szBuf, "Usage: %s <output sea name> <files [file1] [file2]...>\n", name);
+    lstrcat(szBuf, "\n");
+    lstrcat(szBuf, "    output sea name: name to use for the self-extracting executable\n");
+    lstrcat(szBuf, "    files: one or more files to add to the self-extracing executable\n");
+    MessageBox(NULL, szBuf, "Usage", MB_OK);
+}
+
+/* Function to print error message with/without error code */
+void PrintError(LPSTR szMsg, DWORD dwErrorCodeSH)
+{
+  DWORD dwErr;
+  char  szErrorString[MAX_BUF];
+
+  if(dwErrorCodeSH == ERROR_CODE_SHOW)
+  {
+    dwErr = GetLastError();
+    wsprintf(szErrorString, "%d : %s", dwErr, szMsg);
+  }
+  else
+    wsprintf(szErrorString, "%s", szMsg);
+
+  MessageBox(NULL, szErrorString, NULL, MB_ICONEXCLAMATION);
+}
+
+/* Function to remove quotes from a string */
+void RemoveQuotes(LPSTR lpszSrc, LPSTR lpszDest, int iDestSize)
+{
+  char *lpszBegin;
+
+  if(lstrlen(lpszSrc) > iDestSize)
+    return;
+
+  if(*lpszSrc == '\"')
+    lpszBegin = &lpszSrc[1];
+  else
+    lpszBegin = lpszSrc;
+
+  lstrcpy(lpszDest, lpszBegin);
+
+  if(lpszDest[lstrlen(lpszDest) - 1] == '\"')
+    lpszDest[lstrlen(lpszDest) - 1] = '\0';
+}
+
+/* Function to remove the last backslash from a path string */
+void RemoveBackSlash(LPSTR szInput)
+{
+  int   iCounter;
+  DWORD dwInputLen;
+
+  if(szInput != NULL)
+  {
+    dwInputLen = lstrlen(szInput);
+
+    for(iCounter = dwInputLen -1; iCounter >= 0 ; iCounter--)
+    {
+      if(szInput[iCounter] == '\\')
+        szInput[iCounter] = '\0';
+      else
+        break;
+    }
+  }
+}
+
+/* Function to append a backslash to a path string */
+void AppendBackSlash(LPSTR szInput, DWORD dwInputSize)
+{
+  if(szInput != NULL)
+  {
+    if(szInput[strlen(szInput) - 1] != '\\')
+    {
+      if(((DWORD)lstrlen(szInput) + 1) < dwInputSize)
+      {
+        lstrcat(szInput, "\\");
+      }
+    }
+  }
+}
+
+/* Function to parse a path string for one of three parts of a path:
+ *   Filename only
+ *   Path only
+ *   drive only */
+void ParsePath(LPSTR szInput, LPSTR szOutput, DWORD dwOutputSize, DWORD dwType)
+{
+  int   iCounter;
+  DWORD dwCounter;
+  DWORD dwInputLen;
+  BOOL  bFound;
+
+  if((szInput != NULL) && (szOutput != NULL))
+  {
+    bFound        = FALSE;
+    dwInputLen    = lstrlen(szInput);
+    ZeroMemory(szOutput, dwOutputSize);
+
+    if(dwInputLen < dwOutputSize)
+    {
+      switch(dwType)
+      {
+        case PP_FILENAME_ONLY:
+          for(iCounter = dwInputLen - 1; iCounter >= 0; iCounter--)
+          {
+            if(szInput[iCounter] == '\\')
+            {
+              lstrcpy(szOutput, &szInput[iCounter + 1]);
+              bFound = TRUE;
+              break;
+            }
+          }
+          if(bFound == FALSE)
+            lstrcpy(szOutput, szInput);
+
+          break;
+
+        case PP_PATH_ONLY:
+          for(iCounter = dwInputLen - 1; iCounter >= 0; iCounter--)
+          {
+            if(szInput[iCounter] == '\\')
+            {
+              lstrcpy(szOutput, szInput);
+              szOutput[iCounter + 1] = '\0';
+              bFound = TRUE;
+              break;
+            }
+          }
+          if(bFound == FALSE)
+            lstrcpy(szOutput, szInput);
+
+          break;
+
+        case PP_ROOT_ONLY:
+          if(szInput[1] == ':')
+          {
+            szOutput[0] = szInput[0];
+            szOutput[1] = szInput[1];
+            AppendBackSlash(szOutput, dwOutputSize);
+          }
+          else if(szInput[1] == '\\')
+          {
+            int iFoundBackSlash = 0;
+            for(dwCounter = 0; dwCounter < dwInputLen; dwCounter++)
+            {
+              if(szInput[dwCounter] == '\\')
+              {
+                szOutput[dwCounter] = szInput[dwCounter];
+                ++iFoundBackSlash;
+              }
+
+              if(iFoundBackSlash == 3)
+                break;
+            }
+
+            if(iFoundBackSlash != 0)
+              AppendBackSlash(szOutput, dwOutputSize);
+          }
+          break;
+      }
+    }
+  }
+}
+
+/* Function to check to see if a file exists.
+ * If it does, return it's attributes */
+long FileExists(LPSTR szFile)
+{
+  DWORD rv;
+
+  if((rv = GetFileAttributes(szFile)) == -1)
+  {
+    return(FALSE);
+  }
+  else
+  {
+    return(rv);
+  }
+}
+
+/* Function to locate the first non space character in a string,
+ * and return a pointer to it. */
+LPSTR GetFirstNonSpace(LPSTR lpszString)
+{
+  int   i;
+  int   iStrLength;
+
+  iStrLength = lstrlen(lpszString);
+
+  for(i = 0; i < iStrLength; i++)
+  {
+    if(!isspace(lpszString[i]))
+      return(&lpszString[i]);
+  }
+
+  return(NULL);
+}
+
+/* Function to return the argument count given a command line input
+ * format string */
+int GetArgC(LPSTR lpszCommandLine)
+{
+  int   i;
+  int   iArgCount;
+  int   iStrLength;
+  LPSTR lpszBeginStr;
+  BOOL  bFoundQuote;
+  BOOL  bFoundSpace;
+
+  iArgCount    = 0;
+  lpszBeginStr = GetFirstNonSpace(lpszCommandLine);
+
+  if(lpszBeginStr == NULL)
+    return(iArgCount);
+
+  iStrLength   = lstrlen(lpszBeginStr);
+  bFoundQuote  = FALSE;
+  bFoundSpace  = TRUE;
+
+  for(i = 0; i < iStrLength; i++)
+  {
+    if(lpszCommandLine[i] == '\"')
+    {
+      if(bFoundQuote == FALSE)
+      {
+        ++iArgCount;
+        bFoundQuote = TRUE;
+      }
+      else
+      {
+        bFoundQuote = FALSE;
+      }
+    }
+    else if(bFoundQuote == FALSE)
+    {
+      if(!isspace(lpszCommandLine[i]) && (bFoundSpace == TRUE))
+      {
+        ++iArgCount;
+        bFoundSpace = FALSE;
+      }
+      else if(isspace(lpszCommandLine[i]))
+      {
+        bFoundSpace = TRUE;
+      }
+    }
+  }
+
+  return(iArgCount);
+}
+
+/* Function to return a specific argument parameter from a given command line input
+ * format string. */
+LPSTR GetArgV(LPSTR lpszCommandLine, int iIndex, LPSTR lpszDest, int iDestSize)
+{
+  int   i;
+  int   j;
+  int   iArgCount;
+  int   iStrLength;
+  LPSTR lpszBeginStr;
+  LPSTR lpszDestTemp;
+  BOOL  bFoundQuote;
+  BOOL  bFoundSpace;
+
+  iArgCount    = 0;
+  lpszBeginStr = GetFirstNonSpace(lpszCommandLine);
+
+  if(lpszBeginStr == NULL)
+    return(NULL);
+
+  lpszDestTemp = (char *)calloc(iDestSize, sizeof(char));
+  if(lpszDestTemp == NULL)
+  {
+    PrintError("Out of memory", ERROR_CODE_HIDE);
+    exit(1);
+  }
+
+  ZeroMemory(lpszDest, iDestSize);
+  iStrLength    = lstrlen(lpszBeginStr);
+  bFoundQuote   = FALSE;
+  bFoundSpace   = TRUE;
+  j             = 0;
+
+  for(i = 0; i < iStrLength; i++)
+  {
+    if(lpszCommandLine[i] == '\"')
+    {
+      if(bFoundQuote == FALSE)
+      {
+        ++iArgCount;
+        bFoundQuote = TRUE;
+      }
+      else
+      {
+        bFoundQuote = FALSE;
+      }
+    }
+    else if(bFoundQuote == FALSE)
+    {
+      if(!isspace(lpszCommandLine[i]) && (bFoundSpace == TRUE))
+      {
+        ++iArgCount;
+        bFoundSpace = FALSE;
+      }
+      else if(isspace(lpszCommandLine[i]))
+      {
+        bFoundSpace = TRUE;
+      }
+    }
+
+    if((iIndex == (iArgCount - 1)) &&
+      ((bFoundQuote == TRUE) || (bFoundSpace == FALSE) ||
+      ((bFoundQuote == FALSE) && (lpszCommandLine[i] == '\"'))))
+    {
+      if(j < iDestSize)
+      {
+        lpszDestTemp[j] = lpszCommandLine[i];
+        ++j;
+      }
+      else
+      {
+        lpszDestTemp[j] = '\0';
+      }
+    }
+  }
+
+  RemoveQuotes(lpszDestTemp, lpszDest, iDestSize);
+  free(lpszDestTemp);
+  return(lpszDest);
+}
+
+/* Function to add a file to a self-extracting .exe file.
+ * It compresses the file, then adds it as a resource type "FILE". */
+void AddFile(LPSTR lpszSeaExe, LPSTR lpszFile)
+{
+  char        szBuf[MAX_BUF];
+  char        szResourceName[MAX_BUF];
+  HANDLE      hSeaExe;
+  HANDLE      hInputFile;
+  DWORD       dwBytesRead;
+  DWORD       dwFileSize;
+  DWORD       dwFileSizeCmp;
+  LPBYTE      lpBuf;
+  LPBYTE      lpBufCmp;
+
+  ParsePath(lpszFile, szResourceName, sizeof(szResourceName), PP_FILENAME_ONLY);
+  strupr(szResourceName);
+  hInputFile = CreateFile(lpszFile, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
+
+  if(hInputFile == INVALID_HANDLE_VALUE)
+  {
+    PrintError("CreateFile() failed", ERROR_CODE_SHOW);
+    exit(1);
+  }
+
+  dwFileSize    = GetFileSize(hInputFile, NULL);
+  dwFileSizeCmp = dwFileSize;
+  lpBuf         = (LPBYTE)malloc(dwFileSize);
+  lpBufCmp      = (LPBYTE)malloc(dwFileSize + (sizeof(DWORD) * 2));
+  if((lpBuf == NULL) || (lpBufCmp == NULL))
+  {
+    PrintError("Out of memory", ERROR_CODE_HIDE);
+    exit(1);
+  }
+
+  ReadFile(hInputFile, lpBuf, dwFileSize, &dwBytesRead, NULL);
+  if(dwBytesRead != dwFileSize)
+  {
+    wsprintf(szBuf, "Error reading file: %s", lpszFile);
+    PrintError(szBuf, ERROR_CODE_HIDE);
+    exit(1);
+  }
+
+  if(compress((lpBufCmp + (sizeof(DWORD) * 2)), &dwFileSizeCmp, (const Bytef*)lpBuf, dwFileSize) != Z_OK)
+  {
+    PrintError("Error occurred during compression of archives!", ERROR_CODE_HIDE);
+    exit(1);
+  }
+
+  *(LPDWORD)lpBufCmp = dwFileSizeCmp;
+  *(LPDWORD)(lpBufCmp + sizeof(DWORD)) = dwFileSize;
+
+  if((hSeaExe = BeginUpdateResource(lpszSeaExe, FALSE)) == NULL)
+  {
+    DWORD dwErr;
+
+    dwErr = GetLastError();
+    if(dwErr == ERROR_CALL_NOT_IMPLEMENTED)
+    {
+      MessageBox(NULL, "This application does not run under this OS", NULL, MB_ICONEXCLAMATION);
+      exit(0);
+    }
+    else
+    {
+      PrintError("BeginUpdateResource() error", ERROR_CODE_SHOW);
+      exit(1);
+    }
+  }
+  if(!UpdateResource(hSeaExe, "FILE", szResourceName, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US),
+                     lpBufCmp, dwFileSizeCmp + (sizeof(DWORD) * 2)))
+  {
+    PrintError("UpdateResource() failed", ERROR_CODE_SHOW);
+    exit(1);
+  }
+  if(!EndUpdateResource(hSeaExe, FALSE))
+  {
+    PrintError("EndUpdateResource() failed", ERROR_CODE_SHOW);
+    exit(1);
+  }
+
+  free(lpBuf);
+  if(!CloseHandle(hInputFile))
+  {
+    PrintError("CloseHandle() failed", ERROR_CODE_SHOW);
+    exit(1);
+  }
+}
+
+/* Function to extract a resourced file from a .exe file.
+ * It also uncompresss the file after extracting it. */
+BOOL APIENTRY ExtractFilesProc(HANDLE hModule, LPCTSTR lpszType, LPTSTR lpszName, LONG lParam)
+{
+  char    szBuf[MAX_BUF];
+  HRSRC   hResInfo;
+  LPSTR   lpszSeaExe = (LPSTR)lParam;
+  HANDLE  hFile;
+  LPBYTE  lpBytes;
+  LPBYTE  lpBytesUnCmp;
+  HGLOBAL hGlobal;
+
+  // Extract the file
+  hResInfo = FindResource((HINSTANCE)hModule, lpszName, lpszType);
+  hGlobal  = LoadResource((HINSTANCE)hModule, hResInfo);
+  lpBytes  = (LPBYTE)LockResource(hGlobal);
+
+  // Create the file
+  hFile = CreateFile(lpszSeaExe, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS,
+                     FILE_ATTRIBUTE_TEMPORARY, NULL);
+
+  if(hFile != INVALID_HANDLE_VALUE)
+  {
+    DWORD dwSize;
+    DWORD dwSizeUnCmp;
+
+    lpBytesUnCmp = (LPBYTE)malloc((*(LPDWORD)(lpBytes + sizeof(DWORD))) + 1);
+    dwSizeUnCmp  = *(LPDWORD)(lpBytes + sizeof(DWORD));
+
+    // Copy the file. The first DWORD specifies the size of the file
+    dwSize = *(LPDWORD)lpBytes;
+    lpBytes += (sizeof(DWORD) * 2);
+
+    if(uncompress(lpBytesUnCmp, &dwSizeUnCmp, lpBytes, dwSize) != Z_OK)
+    {
+      wsprintf(szBuf, "Error occurred during uncompression of %s: ", lpszSeaExe);
+      PrintError(szBuf, ERROR_CODE_HIDE);
+      CloseHandle(hFile);
+      FreeResource(hResInfo);
+      return FALSE;
+    }
+
+    while(dwSizeUnCmp > 0)
+    {
+      DWORD dwBytesToWrite;
+      DWORD dwBytesWritten;
+
+      dwBytesToWrite = dwSizeUnCmp > 4096 ? 4096 : dwSizeUnCmp;
+      if(!WriteFile(hFile, lpBytesUnCmp, dwBytesToWrite, &dwBytesWritten, NULL))
+      {
+        wsprintf(szBuf, "%s: write error", lpszSeaExe);
+        MessageBox(NULL, szBuf, "Error", MB_OK | MB_ICONEXCLAMATION);
+        CloseHandle(hFile);
+        FreeResource(hResInfo);
+        return FALSE;
+      }
+
+      dwSizeUnCmp -= dwBytesWritten;
+      lpBytesUnCmp += dwBytesWritten;
+    }
+
+    CloseHandle(hFile);
+  }
+
+  // Release the resource
+  FreeResource(hResInfo);
+
+  return TRUE;  // keep enumerating
+}
+
+int APIENTRY WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpszCmdLine, int nCmdShow)
+{
+  int               i;
+  int               iArgC;
+  char              szBuf[MAX_BUF];
+  char              szArgVBuf[MAX_BUF];
+  char              szFileFullPath[MAX_BUF];
+  char              szSeaExe[MAX_BUF];
+  char              szNsZipName[MAX_BUF];
+  char              szAppName[MAX_BUF];
+
+#ifdef SSU_DEBUG
+  char              szOutputStr[MAX_BUF];
+#endif
+
+  WIN32_FIND_DATA   findFileData;
+  HANDLE            hFindFile;
+  BOOL              bSelfUpdate;
+
+  if(*lpszCmdLine == '\0')
+  {
+    if(GetModuleFileName(NULL, szAppName, sizeof(szAppName)) == 0L)
+    {
+      PrintError("GetModuleFileName() failed", ERROR_CODE_SHOW);
+      exit(1);
+    }
+    ParsePath(szAppName, szBuf, sizeof(szBuf), PP_FILENAME_ONLY);
+    ShowUsage(szBuf);
+    exit(1);
+  }
+
+  iArgC = GetArgC(lpszCmdLine);
+  bSelfUpdate = FALSE;
+
+#ifdef SSU_DEBUG
+  wsprintf(szOutputStr, "ArgC: %d\n", iArgC);
+  for(i = 0; i < iArgC; i++)
+  {
+    GetArgV(lpszCmdLine, i, szArgVBuf, sizeof(szArgVBuf));
+    itoa(i, szBuf, 10);
+    lstrcat(szOutputStr, "    ");
+    lstrcat(szOutputStr, szBuf);
+    lstrcat(szOutputStr, ": ");
+    lstrcat(szOutputStr, szArgVBuf);
+    lstrcat(szOutputStr, "\n");
+  }
+  MessageBox(NULL, szOutputStr, "Output", MB_OK);
+#endif
+
+  /* Get the first parameter */
+  GetArgV(lpszCmdLine, 0, szSeaExe, sizeof(szSeaExe));
+  if(lstrcmpi(szSeaExe, "-g") == 0)
+  {
+    /* The first parameter is "-g".
+     * Create a new nszip that contains nsinstall.exe in itself */
+
+    GetArgV(lpszCmdLine, 1, szNsZipName, sizeof(szNsZipName));
+    GetArgV(lpszCmdLine, 2, szSeaExe, sizeof(szSeaExe));
+    if(!FileExists(szSeaExe))
+    {
+      wsprintf(szBuf, "file not found: %s", szSeaExe);
+      PrintError(szBuf, ERROR_CODE_HIDE);
+      exit(1);
+    }
+
+    if(GetModuleFileName(NULL, szAppName, sizeof(szAppName)) == 0L)
+    {
+      PrintError("GetModuleFileName() failed", ERROR_CODE_SHOW);
+      exit(1);
+    }
+    if(!FileExists(szAppName))
+    {
+      wsprintf(szBuf, "File not found: %s", szAppName);
+      PrintError(szBuf, ERROR_CODE_HIDE);
+      exit(1);
+    }
+
+    if(CopyFile(szAppName, szNsZipName, FALSE) == FALSE)
+    {
+      wsprintf(szBuf, "Error creating %s", szNsZipName);
+      PrintError(szBuf, ERROR_CODE_SHOW);
+      exit(1);
+    }
+
+    AddFile(szNsZipName, szSeaExe);
+    return(0);
+  }
+  else
+  {
+    /* The first parameter is not "-g".  Assume that it's the name of the
+     * self-extracting .exe to be saved as.  So lets create it only if it does not exist. */
+
+    if(!FileExists(szSeaExe))
+      EnumResourceNames(NULL, "FILE", (ENUMRESNAMEPROC)ExtractFilesProc, (LONG)szSeaExe);
+
+    if(!FileExists(szSeaExe))
+    {
+      wsprintf(szBuf, "file not found: %s", szSeaExe);
+      PrintError(szBuf, ERROR_CODE_HIDE);
+      exit(1);
+    }
+  }
+
+  for(i = 1; i < iArgC; i++)
+  {
+    GetArgV(lpszCmdLine, i, szArgVBuf, sizeof(szArgVBuf));
+    GetFullPathName(szArgVBuf, sizeof(szFileFullPath), szFileFullPath, NULL);
+    hFindFile = FindFirstFile(szFileFullPath, &findFileData);
+
+    if(hFindFile == INVALID_HANDLE_VALUE)
+    {
+      wsprintf(szBuf, "file not found: %s", szArgVBuf);
+      PrintError(szBuf, ERROR_CODE_HIDE);
+      exit(1);
+    }
+
+    do
+    {
+      char szFile[MAX_BUF];
+
+      if(!(findFileData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY))
+      {
+        // We need to pass to AddFile() whatever kind of path we were passed,
+        // e.g. simple, relative, full
+        strcpy(szFile, szFileFullPath);
+        strcpy(strrchr(szFile, '\\') + 1, findFileData.cFileName);
+        AddFile(szSeaExe, szFile);
+      }
+    } while(FindNextFile(hFindFile, &findFileData));
+
+    FindClose(hFindFile);
+  }
+
+  return(0);
+}
+

mozilla/xpinstall/wizard/windows/nsztool/nsztool.h

@@ -0,0 +1,50 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#ifndef _TESTXPI_H_
+#define _TESTXPI_H_
+
+#define MAX_BUF                         4096
+
+#define ERROR_CODE_HIDE                 0
+#define ERROR_CODE_SHOW                 1
+
+/* PP: Parse Path */
+#define PP_FILENAME_ONLY                1
+#define PP_PATH_ONLY                    2
+#define PP_ROOT_ONLY                    3
+
+void            PrintError(LPSTR szMsg, DWORD dwErrorCodeSH);
+void            RemoveQuotes(LPSTR lpszSrc, LPSTR lpszDest, int dwDestSize);
+void            RemoveBackSlash(LPSTR szInput);
+void            AppendBackSlash(LPSTR szInput, DWORD dwInputSize);
+void            ParsePath(LPSTR szInput, LPSTR szOutput, DWORD dwOutputSize, DWORD dwType);
+long            FileExists(LPSTR szFile);
+int             GetArgC(LPSTR lpszCommandLine);
+LPSTR           GetArgV(LPSTR lpszCommandLine, int iIndex, LPSTR lpszDest, int iDestSize);
+void            AddFile(LPSTR lpszSeaExe, LPSTR lpszFile);
+BOOL APIENTRY   ExtractFilesProc(HANDLE hModule, LPCTSTR lpszType, LPTSTR lpszName, LONG lParam);
+
+#endif
+

mozilla/xpinstall/wizard/windows/ren8dot3/example.ini

@@ -0,0 +1,3 @@
+[rename]
+d:\work\1 2\longfi~1.txt=d:\work\1 2\longfilename.txt
+

mozilla/xpinstall/wizard/windows/ren8dot3/makefile.win

@@ -0,0 +1,42 @@
+#
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Mozilla Communicator client code, 
+# released March 31, 1998. 
+#
+# The Initial Developer of the Original Code is Netscape Communications 
+# Corporation.  Portions created by Netscape are
+# Copyright (C) 1999 Netscape Communications Corporation. All
+# Rights Reserved.
+#
+# Contributor(s): 
+#     Sean Su <ssu@netscape.com>
+
+DEPTH=..\..\..\..
+
+MAKE_OBJ_TYPE   = EXE
+USE_NON_MT_LIBS = 1
+
+MODULE          = ren8dot3
+PROGRAM         = .\$(OBJDIR)\$(MODULE).exe
+
+OBJS =                          \
+    .\$(OBJDIR)\ren8dot3.obj    \
+    $(NULL)
+
+include <$(DEPTH)\config\rules.mak>
+
+install:: $(PROGRAM)
+    $(MAKE_INSTALL) $(PROGRAM) $(DIST)\install
+
+clobber_all::
+    $(RM) $(DIST)\install\$(MODULE).exe
+

mozilla/xpinstall/wizard/windows/ren8dot3/ren8dot3.c

@@ -0,0 +1,117 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include <windows.h>
+#include <stdio.h>
+#include <io.h>
+#include <stdlib.h>
+
+#define _MAX_SIZE_ 64000
+
+char *GetSubString(char *Strings)
+{
+    return(strchr(Strings,0)+1);
+}
+
+void ShowUsage(char *name)
+{
+    char szBuf[_MAX_SIZE_];
+
+    sprintf(szBuf, "usage: %s <source .ini file>\n", name);
+    MessageBox(NULL, szBuf, "Usage", MB_OK);
+}
+
+void RemoveQuotes(LPSTR lpszCmdLine, LPSTR szBuf)
+{
+  char *lpszBegin;
+
+  if(*lpszCmdLine == '\"')
+    lpszBegin = &lpszCmdLine[1];
+  else
+    lpszBegin = lpszCmdLine;
+
+  lstrcpy(szBuf, lpszBegin);
+
+  if(szBuf[lstrlen(szBuf) - 1] == '\"')
+    szBuf[lstrlen(szBuf) - 1] = '\0';
+}
+
+int APIENTRY WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpszCmdLine, int nCmdShow)
+{
+    char *temp;
+    char *SubKey;
+    char *SubKeyPtr;
+    char *SubString;
+    char *SubStringPtr;
+    char *ReturnedKeys;
+    char *ReturnedStrings;
+    char *KeyValue;
+    char *SrcIni;
+    char *DestIni;
+    char szBuf[_MAX_SIZE_];
+
+    if(*lpszCmdLine == '\0')
+    {
+        ShowUsage("Ren8dot3.exe");
+        exit(1);
+    }
+
+    SrcIni = (char *)calloc(_MAX_DIR, sizeof(char));
+
+    RemoveQuotes(lpszCmdLine, szBuf);
+    GetShortPathName(szBuf, SrcIni, _MAX_DIR);
+
+    temp            = (char *)calloc(_MAX_SIZE_, sizeof(char));
+    KeyValue        = (char *)calloc(_MAX_SIZE_, sizeof(char));
+    ReturnedKeys    = (char *)calloc(_MAX_SIZE_, sizeof(char));
+    ReturnedStrings = (char *)calloc(_MAX_SIZE_, sizeof(char));
+    SubString       = (char *)calloc(_MAX_SIZE_, sizeof(char));
+    DestIni         = (char *)calloc(_MAX_DIR,   sizeof(char));
+    SubStringPtr    = SubString;
+
+    GetPrivateProfileString("rename", NULL, "_error_", &ReturnedKeys[1], _MAX_SIZE_, SrcIni);
+    SubKey    = (char *)calloc(_MAX_SIZE_, sizeof(char));
+    SubKeyPtr = SubKey;
+    memcpy(SubKey, ReturnedKeys, _MAX_SIZE_);
+    SubKey    = GetSubString(SubKey);
+    while((SubKey[0]) != 0)
+    {
+        GetPrivateProfileString("rename", SubKey, "_error_", KeyValue, _MAX_SIZE_, SrcIni);
+        rename(SubKey, KeyValue);
+        SubKey = GetSubString(SubKey);
+    }
+
+    unlink(SrcIni);
+
+    free(SubKeyPtr);
+    free(temp);
+    free(ReturnedKeys);
+    free(ReturnedStrings);
+    free(KeyValue);
+    free(SubStringPtr);
+    free(SrcIni);
+    free(DestIni);
+
+    return(0);
+}

mozilla/xpinstall/wizard/windows/setup/dialogs.h

@@ -0,0 +1,56 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#ifndef _DIALOGS_H_
+#define _DIALOGS_H_
+
+LRESULT CALLBACK  DlgProcMain(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam);
+LRESULT CALLBACK  DlgProcWelcome(HWND hDlg, UINT msg, WPARAM wParam, LONG lParam);
+LRESULT CALLBACK  DlgProcLicense(HWND hDlg, UINT msg, WPARAM wParam, LONG lParam);
+LRESULT CALLBACK  DlgProcSetupType(HWND hDlg, UINT msg, WPARAM wParam, LONG lParam);
+LRESULT CALLBACK  DlgProcSelectComponents(HWND hDlg, UINT msg, WPARAM wParam, LONG lParam);
+LRESULT CALLBACK  DlgProcWindowsIntegration(HWND hDlg, UINT msg, WPARAM wParam, LONG lParam);
+LRESULT CALLBACK  DlgProcProgramFolder(HWND hDlg, UINT msg, WPARAM wParam, LONG lParam);
+LRESULT CALLBACK  DlgProcStartInstall(HWND hDlg, UINT msg, WPARAM wParam, LONG lParam);
+LRESULT CALLBACK  DlgProcReboot(HWND hDlg, UINT msg, WPARAM wParam, LONG lParam);
+LRESULT CALLBACK  DlgProcMessage(HWND hDlg, UINT msg, WPARAM wParam, LONG lParam);
+LRESULT CALLBACK  NewListBoxWndProc( HWND, UINT, WPARAM, LPARAM);
+
+void              AskCancelDlg(HWND hDlg);
+void              lbAddItem(HWND hList, siC *siCComponent);
+void              InstantiateDialog(DWORD dwDlgID, LPSTR szTitle, WNDPROC wpDlgProc);
+void              DlgSequenceNext(void);
+void              DlgSequencePrev(void);
+void              PaintGradientShade(HWND hWnd, HDC hdc);
+BOOL              BrowseForDirectory(HWND hDlg, char *szCurrDir);
+LRESULT CALLBACK  BrowseHookProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam);
+void              ShowMessage(LPSTR szMessage, BOOL bShow);
+void              DrawCheck(LPDRAWITEMSTRUCT lpdis);
+void              InvalidateLBCheckbox(HWND hwndListBox);
+void              ProcessWindowsMessages(void);
+void              CheckWizardStateCustom(DWORD dwDefault);
+void              SunJavaDependencyHack(DWORD dwIndex, BOOL bSelected);
+
+
+#endif

mozilla/xpinstall/wizard/windows/setup/extern.h

@@ -0,0 +1,85 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#ifndef _EXTERN_H_
+#define _EXTERN_H_
+
+#include "setup.h"
+
+/* external global variables */
+extern HINSTANCE        hInst;
+extern HINSTANCE        hSetupRscInst;
+extern HINSTANCE        hSDInst;
+extern HINSTANCE        hXPIStubInst;
+
+extern HBITMAP          hbmpBoxChecked;
+extern HBITMAP          hbmpBoxUnChecked;
+
+extern HANDLE           hAccelTable;
+
+extern HWND             hDlg;
+extern HWND             hDlgMessage;
+extern HWND             hWndMain;
+
+extern SDI_NETINSTALL   pfnNetInstall;
+
+extern LPSTR            szEGlobalAlloc;
+extern LPSTR            szEStringLoad;
+extern LPSTR            szEDllLoad;
+extern LPSTR            szEStringNull;
+extern LPSTR            szTempSetupPath;
+
+extern LPSTR            szClassName;
+extern LPSTR            szSetupDir;
+extern LPSTR            szTempDir;
+extern LPSTR            szFileIniConfig;
+
+extern DWORD            dwWizardState;
+extern DWORD            dwSetupType;
+extern DWORD            dwOSType;
+extern DWORD            dwScreenX;
+extern DWORD            dwScreenY;
+
+extern DWORD            dwTempSetupType;
+
+extern BOOL             bSDUserCanceled;
+extern BOOL             bIdiArchivesExists;
+extern BOOL             bCreateDestinationDir;
+extern BOOL             bReboot;
+
+extern setupGen         sgProduct;
+extern diS              diSetup;
+extern diW              diWelcome;
+extern diL              diLicense;
+extern diST             diSetupType;
+extern diSC             diSelectComponents;
+extern diWI             diWindowsIntegration;
+extern diPF             diProgramFolder;
+extern diSI             diStartInstall;
+extern diR              diReboot;
+extern siSD             siSDObject;
+extern siCF             siCFCoreFile;
+extern siC              *siComponents;
+
+#endif

mozilla/xpinstall/wizard/windows/setup/extra.h

@@ -0,0 +1,155 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#ifndef _EXTRA_H_
+#define _EXTRA_H_
+
+typedef struct diskSpaceNode dsN;
+struct diskSpaceNode
+{
+  ULONGLONG       ullSpaceRequired;
+  LPSTR           szPath;
+  dsN             *Next;
+  dsN             *Prev;
+};
+
+typedef struct structVer
+{
+  ULONGLONG ullMajor;
+  ULONGLONG ullMinor;
+  ULONGLONG ullRelease;
+  ULONGLONG ullBuild;
+} verBlock;
+
+BOOL              InitApplication(HINSTANCE hInstance, HINSTANCE hSetupRscInst);
+BOOL              InitInstance(HINSTANCE hInstance, DWORD dwCmdShow);
+void              PrintError(LPSTR szMsg, DWORD dwErrorCodeSH);
+void              FreeMemory(void **vPointer);
+void              *NS_GlobalAlloc(DWORD dwMaxBuf);
+HRESULT           Initialize(HINSTANCE hInstance);
+HRESULT           NS_LoadStringAlloc(HANDLE hInstance, DWORD dwID, LPSTR *szStringBuf, DWORD dwStringBuf);
+HRESULT           NS_LoadString(HANDLE hInstance, DWORD dwID, LPSTR szStringBuf, DWORD dwStringBuf);
+HRESULT           WinSpawn(LPSTR szClientName, LPSTR szParameters, LPSTR szCurrentDir, int iShowCmd, BOOL bWait);
+HRESULT           ParseConfigIni(LPSTR lpszCmdLine);
+HRESULT           DecryptString(LPSTR szOutputStr, LPSTR szInputStr);
+HRESULT           DecryptVariable(LPSTR szVariable, DWORD dwVariableSize);
+void              GetWinReg(HKEY hkRootKey, LPSTR szKey, LPSTR szName, LPSTR szReturnValue, DWORD dwSize);
+void              SetWinReg(HKEY hkRootKey, LPSTR szKey, LPSTR szName, DWORD dwType, LPSTR szData, DWORD dwSize);
+HRESULT           InitSetupGeneral(void);
+HRESULT           InitDlgWelcome(diW *diDialog);
+HRESULT           InitDlgLicense(diL *diDialog);
+HRESULT           InitDlgSetupType(diST *diDialog);
+HRESULT           InitDlgSelectComponents(diSC *diDialog, DWORD dwSM);
+HRESULT           InitDlgWindowsIntegration(diWI *diDialog);
+HRESULT           InitDlgProgramFolder(diPF *diDialog);
+HRESULT           InitDlgStartInstall(diSI *diDialog);
+HRESULT           InitSDObject(void);
+void              DeInitSDObject(void);
+siC               *CreateSiCNode(void);
+void              SiCNodeInsert(siC **siCHead, siC *siCTemp);
+void              SiCNodeDelete(siC *siCTemp);
+siCD              *CreateSiCDepNode(void);
+void              SiCDepNodeDelete(siCD *siCDepTemp);
+void              SiCDepNodeInsert(siCD **siCDepHead, siCD *siCDepTemp);
+HRESULT           SiCNodeGetAttributes(DWORD dwIndex, BOOL bIncludeInvisible);
+void              SiCNodeSetAttributes(DWORD dwIndex, DWORD dwAttributes, BOOL bSet, BOOL bIncludeInvisible);
+void              SiCNodeSetItemsSelected(DWORD dwItems, DWORD *dwItemsSelected);
+char              *SiCNodeGetDescriptionLong(DWORD dwIndex, BOOL bIncludeInvisible);
+siC               *SiCNodeGetObject(DWORD dwIndex, BOOL bIncludeInvisibleObjs);
+ULONGLONG         SiCNodeGetInstallSize(DWORD dwIndex, BOOL bIncludeInvisible);
+ULONGLONG         SiCNodeGetInstallSizeSystem(DWORD dwIndex, BOOL bIncludeInvisible);
+ULONGLONG         SiCNodeGetInstallSizeArchive(DWORD dwIndex, BOOL bIncludeInvisible);
+void              InitSiComponents(char *szFileIni);
+HRESULT           ParseComponentAttributes(char *szBuf);
+void              InitSiComponents(char *szFileIni);
+void              DeInitSiCDependencies(siCD *siCDDependencies);
+BOOL              ResolveDependencies(DWORD dwIndex);
+BOOL              ResolveComponentDependency(siCD *siCDInDependency);
+void              STGetComponents(LPSTR szSection, st *stSetupType, LPSTR szFileIni);
+HRESULT           InitSCoreFile(void);
+void              DeInitSCoreFile(void);
+void              DeInitialize(void);
+void              DeInitDlgWelcome(diW *diDialog);
+void              DeInitDlgLicense(diL *diDialog);
+void              DeInitDlgSetupType(diST *diDialog);
+void              DeInitDlgSelectComponents(diSC *diDialog);
+void              DeInitDlgWindowsIntegration(diWI *diDialog);
+void              DeInitDlgProgramFolder(diPF *diDialog);
+void              DeInitDlgStartInstall(diSI *diDialog);
+void              DetermineOSVersion(void);
+void              DeInitSiComponents(void);
+void              DeInitSetupGeneral(void);
+HRESULT           InitializeSmartDownload(void);
+HRESULT           DeInitializeSmartDownload(void);
+HRESULT           ParseSetupIni(void);
+HRESULT           GetConfigIni(void);
+void              CleanTempFiles(void);
+void              OutputSetupTitle(HDC hDC);
+HRESULT           SdArchives(LPSTR szFileIdi, LPSTR szDownloadDir);
+HRESULT           RetrieveArchives(void);
+/* HRESULT           SmartUpdateJars(void); */
+void              ParsePath(LPSTR szInput, LPSTR szOutput, DWORD dwLength, DWORD dwType);
+void              RemoveBackSlash(LPSTR szInput);
+void              AppendBackSlash(LPSTR szInput, DWORD dwInputSize);
+BOOL              DeleteIdiGetConfigIni(void);
+BOOL              DeleteIdiGetArchives(void);
+BOOL              DeleteIdiFileIniConfig(void);
+void              DeleteArchives(void);
+HRESULT           LaunchApps(void);
+HRESULT           FileExists(LPSTR szFile);
+int               ExtractDirEntries(char* directory,void* vZip);
+BOOL              LocateJar(siC *siCObject);
+HRESULT           AddArchiveToIdiFile(siC *siCObject, char *szSComponent, char *szSFile, char *szFileIdiGetArchives);
+int               SiCNodeGetIndexDS(char *szInDescriptionShort);
+void              ViewSiComponents(void);
+BOOL              IsWin95Debute(void);
+ULONGLONG         GetDiskSpaceRequired(DWORD dwType);
+ULONGLONG         GetDiskSpaceAvailable(LPSTR szPath);
+HRESULT           VerifyDiskSpace(void);
+HRESULT           ErrorMsgDiskSpace(ULONGLONG ullDSAvailable, ULONGLONG ullDSRequired, LPSTR szPath, BOOL bCrutialMsg);
+void              SetCustomType(void);
+void              GetAlternateArchiveSearchPath(LPSTR lpszCmdLine);
+BOOL              NeedReboot(void);
+BOOL              LocatePreviousPath(LPSTR szMainSectionName, LPSTR szPath, DWORD dwPathSize);
+BOOL              LocatePathNscpReg(LPSTR szSection, LPSTR szPath, DWORD dwPathSize);
+BOOL              LocatePathWinReg(LPSTR szSection, LPSTR szPath, DWORD dwPathSize);
+BOOL              LocatePath(LPSTR szSection, LPSTR szPath, DWORD dwPathSize);
+int               VR_GetPath(char *component_path, unsigned long sizebuf, char *buf);
+dsN               *CreateDSNode();
+void              DsNodeInsert(dsN **dsNHead, dsN *dsNTemp);
+void              DsNodeDelete(dsN **dsNTemp);
+void              DeInitDSNode(dsN **dsnComponentDSRequirement);
+void              UpdatePathDiskSpaceRequired(LPSTR szPath, ULONGLONG ullInstallSize, dsN **dsnComponentDSRequirement);
+HRESULT           InitComponentDiskSpaceInfo(dsN **dsnComponentDSRequirement);
+HRESULT           CheckInstances();
+long              RandomSelect(void);
+void              TranslateVersionStr(LPSTR szVersion, verBlock *vbVersion);
+BOOL              GetFileVersion(LPSTR szFile, verBlock *vbVersion);
+BOOL              CheckLegacy(void);
+int               CompareVersion(verBlock vbVersionOld, verBlock vbVersionNew);
+
+BOOL              bSDInit;
+
+#endif
+

mozilla/xpinstall/wizard/windows/setup/ifuncns.c

@@ -0,0 +1,779 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include "extern.h"
+#include "extra.h"
+#include "dialogs.h"
+#include "shortcut.h"
+#include "ifuncns.h"
+
+HRESULT TimingCheck(DWORD dwTiming, LPSTR szSection, LPSTR szFile)
+{
+  char szBuf[MAX_BUF];
+
+  GetPrivateProfileString(szSection, "Timing", "", szBuf, MAX_BUF, szFile);
+  if(*szBuf != '\0')
+  {
+    switch(dwTiming)
+    {
+      case T_PRE_DOWNLOAD:
+        if(lstrcmpi(szBuf, "pre download") == 0)
+          return(TRUE);
+        break;
+
+      case T_POST_DOWNLOAD:
+        if(lstrcmpi(szBuf, "post download") == 0)
+          return(TRUE);
+        break;
+
+      case T_PRE_CORE:
+        if(lstrcmpi(szBuf, "pre core") == 0)
+          return(TRUE);
+        break;
+
+      case T_POST_CORE:
+        if(lstrcmpi(szBuf, "post core") == 0)
+          return(TRUE);
+        break;
+
+      case T_PRE_SMARTUPDATE:
+        if(lstrcmpi(szBuf, "pre smartupdate") == 0)
+          return(TRUE);
+        break;
+
+      case T_POST_SMARTUPDATE:
+        if(lstrcmpi(szBuf, "post smartupdate") == 0)
+          return(TRUE);
+        break;
+
+      case T_PRE_LAUNCHAPP:
+        if(lstrcmpi(szBuf, "pre launchapp") == 0)
+          return(TRUE);
+        break;
+
+      case T_POST_LAUNCHAPP:
+        if(lstrcmpi(szBuf, "post launchapp") == 0)
+          return(TRUE);
+        break;
+
+      case T_DEPEND_REBOOT:
+        if(lstrcmpi(szBuf, "depend reboot") == 0)
+          return(TRUE);
+        break;
+    }
+  }
+  return(FALSE);
+}
+
+void ProcessFileOps(DWORD dwTiming)
+{
+  ProcessUncompressFile(dwTiming);
+  ProcessCreateDirectory(dwTiming);
+  ProcessMoveFile(dwTiming);
+  ProcessCopyFile(dwTiming);
+  ProcessDeleteFile(dwTiming);
+  ProcessRemoveDirectory(dwTiming);
+  ProcessRunApp(dwTiming);
+  ProcessProgramFolder(dwTiming);
+}
+
+HRESULT FileUncompress(LPSTR szFrom, LPSTR szTo)
+{
+  char  szBuf[MAX_BUF];
+  DWORD dwReturn;
+  void  *vZip;
+
+  /* Check for the existance of the from (source) file */
+  if(!FileExists(szFrom))
+    return(FO_ERROR_FILE_NOT_FOUND);
+
+  /* Check for the existance of the to (destination) path */
+  dwReturn = FileExists(szTo);
+  if(dwReturn && !(dwReturn & FILE_ATTRIBUTE_DIRECTORY))
+  {
+    /* found a file with the same name as the destination path */
+    return(FO_ERROR_DESTINATION_CONFLICT);
+  }
+  else if(!dwReturn)
+  {
+    lstrcpy(szBuf, szTo);
+    AppendBackSlash(szBuf, sizeof(szBuf));
+    CreateDirectoriesAll(szBuf);
+  }
+
+  GetCurrentDirectory(MAX_BUF, szBuf);
+  if(SetCurrentDirectory(szTo) == FALSE)
+    return(FO_ERROR_CHANGE_DIR);
+
+  ZIP_OpenArchive(szFrom, &vZip);
+  /* 1st parameter should be NULL or it will fail */
+  /* It indicates extract the entire archive */
+  ExtractDirEntries(NULL, vZip);
+  ZIP_CloseArchive(&vZip);
+
+  if(SetCurrentDirectory(szBuf) == FALSE)
+    return(FO_ERROR_CHANGE_DIR);
+
+  return(FO_SUCCESS);
+}
+
+HRESULT ProcessCoreFile()
+{
+  if(*siCFCoreFile.szMessage != '\0')
+    ShowMessage(siCFCoreFile.szMessage, TRUE);
+
+  FileUncompress(siCFCoreFile.szSource, siCFCoreFile.szDestination);
+
+  if(*siCFCoreFile.szMessage != '\0')
+    ShowMessage(siCFCoreFile.szMessage, FALSE);
+
+  return(FO_SUCCESS);
+}
+
+HRESULT CleanupCoreFile()
+{
+  if(siCFCoreFile.bCleanup == TRUE)
+    DirectoryRemove(siCFCoreFile.szDestination, TRUE);
+
+  return(FO_SUCCESS);
+}
+
+HRESULT ProcessUncompressFile(DWORD dwTiming)
+{
+  DWORD   dwIndex;
+  BOOL    bOnlyIfExists;
+  char    szIndex[MAX_BUF];
+  char    szBuf[MAX_BUF];
+  char    szSection[MAX_BUF];
+  char    szSource[MAX_BUF];
+  char    szDestination[MAX_BUF];
+
+  dwIndex = 0;
+  itoa(dwIndex, szIndex, 10);
+  lstrcpy(szSection, "Uncompress File");
+  lstrcat(szSection, szIndex);
+  GetPrivateProfileString(szSection, "Source", "", szBuf, MAX_BUF, szFileIniConfig);
+  while(*szBuf != '\0')
+  {
+    if(TimingCheck(dwTiming, szSection, szFileIniConfig))
+    {
+      DecryptString(szSource, szBuf);
+      GetPrivateProfileString(szSection, "Destination", "", szBuf, MAX_BUF, szFileIniConfig);
+      DecryptString(szDestination, szBuf);
+      GetPrivateProfileString(szSection, "Only If Exists", "", szBuf, MAX_BUF, szFileIniConfig);
+      if(lstrcmpi(szBuf, "TRUE") == 0)
+        bOnlyIfExists = TRUE;
+      else
+        bOnlyIfExists = FALSE;
+
+      if((!bOnlyIfExists) || (bOnlyIfExists && FileExists(szDestination)))
+      {
+        GetPrivateProfileString(szSection, "Message",     "", szBuf, MAX_BUF, szFileIniConfig);
+        ShowMessage(szBuf, TRUE);
+        FileUncompress(szSource, szDestination);
+        ShowMessage(szBuf, FALSE);
+      }
+    }
+
+    ++dwIndex;
+    itoa(dwIndex, szIndex, 10);
+    lstrcpy(szSection, "Uncompress File");
+    lstrcat(szSection, szIndex);
+    GetPrivateProfileString(szSection, "Source", "", szBuf, MAX_BUF, szFileIniConfig);
+  }
+  return(FO_SUCCESS);
+}
+
+HRESULT FileMove(LPSTR szFrom, LPSTR szTo)
+{
+  HANDLE          hFile;
+  WIN32_FIND_DATA fdFile;
+  char            szFromDir[MAX_BUF];
+  char            szFromTemp[MAX_BUF];
+  char            szToTemp[MAX_BUF];
+  char            szBuf[MAX_BUF];
+  BOOL            bFound;
+
+  /* From file path exists and To file path does not exist */
+  if((FileExists(szFrom)) && (!FileExists(szTo)))
+  {
+    MoveFile(szFrom, szTo);
+    return(FO_SUCCESS);
+  }
+  /* From file path exists and To file path exists */
+  if(FileExists(szFrom) && FileExists(szTo))
+  {
+    /* Since the To file path exists, assume it to be a directory and proceed.      */
+    /* We don't care if it's a file.  If it is a file, then config.ini needs to be  */
+    /* corrected to remove the file before attempting a MoveFile().                 */
+    lstrcpy(szToTemp, szTo);
+    AppendBackSlash(szToTemp, sizeof(szToTemp));
+    ParsePath(szFrom, szBuf, MAX_BUF, PP_FILENAME_ONLY);
+    lstrcat(szToTemp, szBuf);
+    MoveFile(szFrom, szToTemp);
+    return(FO_SUCCESS);
+  }
+
+  ParsePath(szFrom, szFromDir, MAX_BUF, PP_PATH_ONLY);
+
+  if((hFile = FindFirstFile(szFrom, &fdFile)) == INVALID_HANDLE_VALUE)
+    bFound = FALSE;
+  else
+    bFound = TRUE;
+
+  while(bFound)
+  {
+    if((lstrcmpi(fdFile.cFileName, ".") != 0) && (lstrcmpi(fdFile.cFileName, "..") != 0))
+    {
+      /* create full path string including filename for source */
+      lstrcpy(szFromTemp, szFromDir);
+      AppendBackSlash(szFromTemp, sizeof(szFromTemp));
+      lstrcat(szFromTemp, fdFile.cFileName);
+
+      /* create full path string including filename for destination */
+      lstrcpy(szToTemp, szTo);
+      AppendBackSlash(szToTemp, sizeof(szToTemp));
+      lstrcat(szToTemp, fdFile.cFileName);
+
+      MoveFile(szFromTemp, szToTemp);
+    }
+
+    bFound = FindNextFile(hFile, &fdFile);
+  }
+
+  FindClose(hFile);
+  return(FO_SUCCESS);
+}
+
+HRESULT ProcessMoveFile(DWORD dwTiming)
+{
+  DWORD dwIndex;
+  char  szIndex[MAX_BUF];
+  char  szBuf[MAX_BUF];
+  char  szSection[MAX_BUF];
+  char  szSource[MAX_BUF];
+  char  szDestination[MAX_BUF];
+
+  dwIndex = 0;
+  itoa(dwIndex, szIndex, 10);
+  lstrcpy(szSection, "Move File");
+  lstrcat(szSection, szIndex);
+  GetPrivateProfileString(szSection, "Source", "", szBuf, MAX_BUF, szFileIniConfig);
+  while(*szBuf != '\0')
+  {
+    if(TimingCheck(dwTiming, szSection, szFileIniConfig))
+    {
+      DecryptString(szSource, szBuf);
+      GetPrivateProfileString(szSection, "Destination", "", szBuf, MAX_BUF, szFileIniConfig);
+      DecryptString(szDestination, szBuf);
+      FileMove(szSource, szDestination);
+    }
+
+    ++dwIndex;
+    itoa(dwIndex, szIndex, 10);
+    lstrcpy(szSection, "Move File");
+    lstrcat(szSection, szIndex);
+    GetPrivateProfileString(szSection, "Source", "", szBuf, MAX_BUF, szFileIniConfig);
+  }
+  return(FO_SUCCESS);
+}
+
+HRESULT FileCopy(LPSTR szFrom, LPSTR szTo, BOOL bFailIfExists)
+{
+  HANDLE          hFile;
+  WIN32_FIND_DATA fdFile;
+  char            szFromDir[MAX_BUF];
+  char            szFromTemp[MAX_BUF];
+  char            szToTemp[MAX_BUF];
+  char            szBuf[MAX_BUF];
+  BOOL            bFound;
+
+  if(FileExists(szFrom))
+  {
+    /* The file in the From file path exists */
+    ParsePath(szFrom, szBuf, MAX_BUF, PP_FILENAME_ONLY);
+    lstrcpy(szToTemp, szTo);
+    AppendBackSlash(szToTemp, sizeof(szToTemp));
+    lstrcat(szToTemp, szBuf);
+    CopyFile(szFrom, szToTemp, bFailIfExists);
+    return(FO_SUCCESS);
+  }
+
+  /* The file in the From file path does not exist.  Assume to contain wild args and */
+  /* proceed acordingly.                                                             */
+  ParsePath(szFrom, szFromDir, MAX_BUF, PP_PATH_ONLY);
+
+  if((hFile = FindFirstFile(szFrom, &fdFile)) == INVALID_HANDLE_VALUE)
+    bFound = FALSE;
+  else
+    bFound = TRUE;
+
+  while(bFound)
+  {
+    if((lstrcmpi(fdFile.cFileName, ".") != 0) && (lstrcmpi(fdFile.cFileName, "..") != 0))
+    {
+      /* create full path string including filename for source */
+      lstrcpy(szFromTemp, szFromDir);
+      AppendBackSlash(szFromTemp, sizeof(szFromTemp));
+      lstrcat(szFromTemp, fdFile.cFileName);
+
+      /* create full path string including filename for destination */
+      lstrcpy(szToTemp, szTo);
+      AppendBackSlash(szToTemp, sizeof(szToTemp));
+      lstrcat(szToTemp, fdFile.cFileName);
+
+      CopyFile(szFromTemp, szToTemp, bFailIfExists);
+    }
+
+    bFound = FindNextFile(hFile, &fdFile);
+  }
+
+  FindClose(hFile);
+  return(FO_SUCCESS);
+}
+
+HRESULT ProcessCopyFile(DWORD dwTiming)
+{
+  DWORD dwIndex;
+  char  szIndex[MAX_BUF];
+  char  szBuf[MAX_BUF];
+  char  szSection[MAX_BUF];
+  char  szSource[MAX_BUF];
+  char  szDestination[MAX_BUF];
+  BOOL  bFailIfExists;
+
+  dwIndex = 0;
+  itoa(dwIndex, szIndex, 10);
+  lstrcpy(szSection, "Copy File");
+  lstrcat(szSection, szIndex);
+  GetPrivateProfileString(szSection, "Source", "", szBuf, MAX_BUF, szFileIniConfig);
+  while(*szBuf != '\0')
+  {
+    if(TimingCheck(dwTiming, szSection, szFileIniConfig))
+    {
+      DecryptString(szSource, szBuf);
+      GetPrivateProfileString(szSection, "Destination", "", szBuf, MAX_BUF, szFileIniConfig);
+      DecryptString(szDestination, szBuf);
+
+      GetPrivateProfileString(szSection, "Fail If Exists", "", szBuf, MAX_BUF, szFileIniConfig);
+      if(lstrcmpi(szBuf, "TRUE") == 0)
+        bFailIfExists = TRUE;
+      else
+        bFailIfExists = FALSE;
+
+      FileCopy(szSource, szDestination, bFailIfExists);
+    }
+
+    ++dwIndex;
+    itoa(dwIndex, szIndex, 10);
+    lstrcpy(szSection, "Copy File");
+    lstrcat(szSection, szIndex);
+    GetPrivateProfileString(szSection, "Source", "", szBuf, MAX_BUF, szFileIniConfig);
+  }
+  return(FO_SUCCESS);
+}
+
+HRESULT CreateDirectoriesAll(char* szPath)
+{
+  int     i;
+  int     iLen = lstrlen(szPath);
+  char    szCreatePath[MAX_BUF];
+  HRESULT hrResult;
+
+  ZeroMemory(szCreatePath, MAX_BUF);
+  memcpy(szCreatePath, szPath, iLen);
+  for(i = 0; i < iLen; i++)
+  {
+    if((iLen > 1) &&
+      ((i != 0) && ((szPath[i] == '\\') || (szPath[i] == '/'))) &&
+      (!((szPath[0] == '\\') && (i == 1)) && !((szPath[1] == ':') && (i == 2))))
+    {
+      szCreatePath[i] = '\0';
+      hrResult        = CreateDirectory(szCreatePath, NULL);
+      szCreatePath[i] = szPath[i];
+    }
+  }
+  return(hrResult);
+}
+
+HRESULT ProcessCreateDirectory(DWORD dwTiming)
+{
+  DWORD dwIndex;
+  char  szIndex[MAX_BUF];
+  char  szBuf[MAX_BUF];
+  char  szSection[MAX_BUF];
+  char  szDestination[MAX_BUF];
+
+  dwIndex = 0;
+  itoa(dwIndex, szIndex, 10);
+  lstrcpy(szSection, "Create Directory");
+  lstrcat(szSection, szIndex);
+  GetPrivateProfileString(szSection, "Destination", "", szBuf, MAX_BUF, szFileIniConfig);
+  while(*szBuf != '\0')
+  {
+    if(TimingCheck(dwTiming, szSection, szFileIniConfig))
+    {
+      DecryptString(szDestination, szBuf);
+      AppendBackSlash(szDestination, sizeof(szDestination));
+      CreateDirectoriesAll(szDestination);
+    }
+
+    ++dwIndex;
+    itoa(dwIndex, szIndex, 10);
+    lstrcpy(szSection, "Create Directory");
+    lstrcat(szSection, szIndex);
+    GetPrivateProfileString(szSection, "Destination", "", szBuf, MAX_BUF, szFileIniConfig);
+  }
+  return(FO_SUCCESS);
+}
+
+HRESULT FileDelete(LPSTR szDestination)
+{
+  HANDLE          hFile;
+  WIN32_FIND_DATA fdFile;
+  char            szBuf[MAX_BUF];
+  char            szPathOnly[MAX_BUF];
+  BOOL            bFound;
+
+  if(FileExists(szDestination))
+  {
+    /* The file in the From file path exists */
+    DeleteFile(szDestination);
+    return(FO_SUCCESS);
+  }
+
+  /* The file in the From file path does not exist.  Assume to contain wild args and */
+  /* proceed acordingly.                                                             */
+  ParsePath(szDestination, szPathOnly, MAX_BUF, PP_PATH_ONLY);
+
+  if((hFile = FindFirstFile(szDestination, &fdFile)) == INVALID_HANDLE_VALUE)
+    bFound = FALSE;
+  else
+    bFound = TRUE;
+
+  while(bFound)
+  {
+    if(!(fdFile.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY))
+    {
+      lstrcpy(szBuf, szPathOnly);
+      AppendBackSlash(szBuf, sizeof(szBuf));
+      lstrcat(szBuf, fdFile.cFileName);
+
+      DeleteFile(szBuf);
+    }
+
+    bFound = FindNextFile(hFile, &fdFile);
+  }
+
+  FindClose(hFile);
+  return(FO_SUCCESS);
+}
+
+HRESULT ProcessDeleteFile(DWORD dwTiming)
+{
+  DWORD dwIndex;
+  char  szIndex[MAX_BUF];
+  char  szBuf[MAX_BUF];
+  char  szSection[MAX_BUF];
+  char  szDestination[MAX_BUF];
+
+  dwIndex = 0;
+  itoa(dwIndex, szIndex, 10);
+  lstrcpy(szSection, "Delete File");
+  lstrcat(szSection, szIndex);
+  GetPrivateProfileString(szSection, "Destination", "", szBuf, MAX_BUF, szFileIniConfig);
+  while(*szBuf != '\0')
+  {
+    if(TimingCheck(dwTiming, szSection, szFileIniConfig))
+    {
+      DecryptString(szDestination, szBuf);
+      FileDelete(szDestination);
+    }
+
+    ++dwIndex;
+    itoa(dwIndex, szIndex, 10);
+    lstrcpy(szSection, "Delete File");
+    lstrcat(szSection, szIndex);
+    GetPrivateProfileString(szSection, "Destination", "", szBuf, MAX_BUF, szFileIniConfig);
+  }
+  return(FO_SUCCESS);
+}
+
+HRESULT DirectoryRemove(LPSTR szDestination, BOOL bRemoveSubdirs)
+{
+  HANDLE          hFile;
+  WIN32_FIND_DATA fdFile;
+  char            szDestTemp[MAX_BUF];
+  BOOL            bFound;
+
+  if(!FileExists(szDestination))
+    return(FO_SUCCESS);
+
+  if(bRemoveSubdirs == TRUE)
+  {
+    lstrcpy(szDestTemp, szDestination);
+    AppendBackSlash(szDestTemp, sizeof(szDestTemp));
+    lstrcat(szDestTemp, "*");
+
+    bFound = TRUE;
+    hFile = FindFirstFile(szDestTemp, &fdFile);
+    while((hFile != INVALID_HANDLE_VALUE) && (bFound == TRUE))
+    {
+      if((lstrcmpi(fdFile.cFileName, ".") != 0) && (lstrcmpi(fdFile.cFileName, "..") != 0))
+      {
+        /* create full path */
+        lstrcpy(szDestTemp, szDestination);
+        AppendBackSlash(szDestTemp, sizeof(szDestTemp));
+        lstrcat(szDestTemp, fdFile.cFileName);
+
+        if(fdFile.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
+        {
+          DirectoryRemove(szDestTemp, bRemoveSubdirs);
+        }
+        else
+        {
+          DeleteFile(szDestTemp);
+        }
+      }
+
+      bFound = FindNextFile(hFile, &fdFile);
+    }
+
+    FindClose(hFile);
+  }
+  
+  RemoveDirectory(szDestination);
+  return(FO_SUCCESS);
+}
+
+HRESULT ProcessRemoveDirectory(DWORD dwTiming)
+{
+  DWORD dwIndex;
+  char  szIndex[MAX_BUF];
+  char  szBuf[MAX_BUF];
+  char  szSection[MAX_BUF];
+  char  szDestination[MAX_BUF];
+  BOOL  bRemoveSubdirs;
+
+  dwIndex = 0;
+  itoa(dwIndex, szIndex, 10);
+  lstrcpy(szSection, "Remove Directory");
+  lstrcat(szSection, szIndex);
+  GetPrivateProfileString(szSection, "Destination", "", szBuf, MAX_BUF, szFileIniConfig);
+  while(*szBuf != '\0')
+  {
+    if(TimingCheck(dwTiming, szSection, szFileIniConfig))
+    {
+      DecryptString(szDestination, szBuf);
+      GetPrivateProfileString(szSection, "Remove subdirs", "", szBuf, MAX_BUF, szFileIniConfig);
+      bRemoveSubdirs = FALSE;
+      if(lstrcmpi(szBuf, "TRUE") == 0)
+        bRemoveSubdirs = TRUE;
+
+      DirectoryRemove(szDestination, bRemoveSubdirs);
+    }
+
+    ++dwIndex;
+    itoa(dwIndex, szIndex, 10);
+    lstrcpy(szSection, "Remove Directory");
+    lstrcat(szSection, szIndex);
+    GetPrivateProfileString(szSection, "Destination", "", szBuf, MAX_BUF, szFileIniConfig);
+  }
+  return(FO_SUCCESS);
+}
+
+HRESULT ProcessRunApp(DWORD dwTiming)
+{
+  DWORD dwIndex;
+  char  szIndex[MAX_BUF];
+  char  szBuf[MAX_BUF];
+  char  szSection[MAX_BUF];
+  char  szTarget[MAX_BUF];
+  char  szParameters[MAX_BUF];
+  char  szWorkingDir[MAX_BUF];
+  BOOL  bWait;
+
+  dwIndex = 0;
+  itoa(dwIndex, szIndex, 10);
+  lstrcpy(szSection, "RunApp");
+  lstrcat(szSection, szIndex);
+  GetPrivateProfileString(szSection, "Target", "", szBuf, MAX_BUF, szFileIniConfig);
+  while(*szBuf != '\0')
+  {
+    if(TimingCheck(dwTiming, szSection, szFileIniConfig))
+    {
+      DecryptString(szTarget, szBuf);
+      GetPrivateProfileString(szSection, "Parameters", "", szBuf, MAX_BUF, szFileIniConfig);
+      DecryptString(szParameters, szBuf);
+      GetPrivateProfileString(szSection, "WorkingDir", "", szBuf, MAX_BUF, szFileIniConfig);
+      DecryptString(szWorkingDir, szBuf);
+      GetPrivateProfileString(szSection, "Wait", "", szBuf, MAX_BUF, szFileIniConfig);
+
+      if(lstrcmpi(szBuf, "FALSE") == 0)
+        bWait = FALSE;
+      else
+        bWait = TRUE;
+
+      if((dwTiming == T_DEPEND_REBOOT) && (NeedReboot() == TRUE))
+      {
+        lstrcat(szTarget, " ");
+        lstrcat(szTarget, szParameters);
+        SetWinReg(HKEY_CURRENT_USER, "Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce", "Netscape", REG_SZ, szTarget, lstrlen(szTarget));
+      }
+      else
+        WinSpawn(szTarget, szParameters, szWorkingDir, SW_SHOWNORMAL, bWait);
+    }
+
+    ++dwIndex;
+    itoa(dwIndex, szIndex, 10);
+    lstrcpy(szSection, "RunApp");
+    lstrcat(szSection, szIndex);
+    GetPrivateProfileString(szSection, "Target", "", szBuf, MAX_BUF, szFileIniConfig);
+  }
+  return(FO_SUCCESS);
+}
+
+HRESULT ProcessProgramFolder(DWORD dwTiming)
+{
+  DWORD dwIndex0;
+  DWORD dwIndex1;
+  DWORD dwIconId;
+  char  szIndex0[MAX_BUF];
+  char  szIndex1[MAX_BUF];
+  char  szBuf[MAX_BUF];
+  char  szSection0[MAX_BUF];
+  char  szSection1[MAX_BUF];
+  char  szProgramFolder[MAX_BUF];
+  char  szFile[MAX_BUF];
+  char  szArguments[MAX_BUF];
+  char  szWorkingDir[MAX_BUF];
+  char  szDescription[MAX_BUF];
+  char  szIconPath[MAX_BUF];
+
+  dwIndex0 = 0;
+  itoa(dwIndex0, szIndex0, 10);
+  lstrcpy(szSection0, "Program Folder");
+  lstrcat(szSection0, szIndex0);
+  GetPrivateProfileString(szSection0, "Program Folder", "", szBuf, MAX_BUF, szFileIniConfig);
+  while(*szBuf != '\0')
+  {
+    if(TimingCheck(dwTiming, szSection0, szFileIniConfig))
+    {
+      DecryptString(szProgramFolder, szBuf);
+
+      dwIndex1 = 0;
+      itoa(dwIndex1, szIndex1, 10);
+      lstrcpy(szSection1, szSection0);
+      lstrcat(szSection1, "-Shortcut");
+      lstrcat(szSection1, szIndex1);
+      GetPrivateProfileString(szSection1, "File", "", szBuf, MAX_BUF, szFileIniConfig);
+      while(*szBuf != '\0')
+      {
+        DecryptString(szFile, szBuf);
+        GetPrivateProfileString(szSection1, "Arguments",    "", szBuf, MAX_BUF, szFileIniConfig);
+        DecryptString(szArguments, szBuf);
+        GetPrivateProfileString(szSection1, "Working Dir",  "", szBuf, MAX_BUF, szFileIniConfig);
+        DecryptString(szWorkingDir, szBuf);
+        GetPrivateProfileString(szSection1, "Description",  "", szBuf, MAX_BUF, szFileIniConfig);
+        DecryptString(szDescription, szBuf);
+        GetPrivateProfileString(szSection1, "Icon Path",    "", szBuf, MAX_BUF, szFileIniConfig);
+        DecryptString(szIconPath, szBuf);
+        GetPrivateProfileString(szSection1, "Icon Id",      "", szBuf, MAX_BUF, szFileIniConfig);
+        if(*szBuf != '\0')
+          dwIconId = atol(szBuf);
+        else
+          dwIconId = 0;
+
+        CreateALink(szFile, szProgramFolder, szDescription, szWorkingDir, szArguments, szIconPath, dwIconId);
+
+        ++dwIndex1;
+        itoa(dwIndex1, szIndex1, 10);
+        lstrcpy(szSection1, szSection0);
+        lstrcat(szSection1, "-Shortcut");
+        lstrcat(szSection1, szIndex1);
+        GetPrivateProfileString(szSection1, "File", "", szBuf, MAX_BUF, szFileIniConfig);
+      }
+    }
+
+    ++dwIndex0;
+    itoa(dwIndex0, szIndex0, 10);
+    lstrcpy(szSection0, "Program Folder");
+    lstrcat(szSection0, szIndex0);
+    GetPrivateProfileString(szSection0, "Program Folder", "", szBuf, MAX_BUF, szFileIniConfig);
+  }
+  return(FO_SUCCESS);
+}
+
+HRESULT ProcessProgramFolderShowCmd()
+{
+  DWORD dwIndex0;
+  int   iShowFolder;
+  char  szIndex0[MAX_BUF];
+  char  szBuf[MAX_BUF];
+  char  szSection0[MAX_BUF];
+  char  szProgramFolder[MAX_BUF];
+
+  dwIndex0 = 0;
+  itoa(dwIndex0, szIndex0, 10);
+  lstrcpy(szSection0, "Program Folder");
+  lstrcat(szSection0, szIndex0);
+  GetPrivateProfileString(szSection0, "Program Folder", "", szBuf, MAX_BUF, szFileIniConfig);
+  while(*szBuf != '\0')
+  {
+    DecryptString(szProgramFolder, szBuf);
+    GetPrivateProfileString(szSection0, "Show Folder", "", szBuf, MAX_BUF, szFileIniConfig);
+
+    if(strcmpi(szBuf, "HIDE") == 0)
+      iShowFolder = SW_HIDE;
+    else if(strcmpi(szBuf, "MAXIMIZE") == 0)
+      iShowFolder = SW_MAXIMIZE;
+    else if(strcmpi(szBuf, "MINIMIZE") == 0)
+      iShowFolder = SW_MINIMIZE;
+    else if(strcmpi(szBuf, "RESTORE") == 0)
+      iShowFolder = SW_RESTORE;
+    else if(strcmpi(szBuf, "SHOW") == 0)
+      iShowFolder = SW_SHOW;
+    else if(strcmpi(szBuf, "SHOWMAXIMIZED") == 0)
+      iShowFolder = SW_SHOWMAXIMIZED;
+    else if(strcmpi(szBuf, "SHOWMINIMIZED") == 0)
+      iShowFolder = SW_SHOWMINIMIZED;
+    else if(strcmpi(szBuf, "SHOWMINNOACTIVE") == 0)
+      iShowFolder = SW_SHOWMINNOACTIVE;
+    else if(strcmpi(szBuf, "SHOWNA") == 0)
+      iShowFolder = SW_SHOWNA;
+    else if(strcmpi(szBuf, "SHOWNOACTIVATE") == 0)
+      iShowFolder = SW_SHOWNOACTIVATE;
+    else if(strcmpi(szBuf, "SHOWNORMAL") == 0)
+      iShowFolder = SW_SHOWNORMAL;
+
+    WinSpawn(szProgramFolder, NULL, NULL, iShowFolder, TRUE);
+
+    ++dwIndex0;
+    itoa(dwIndex0, szIndex0, 10);
+    lstrcpy(szSection0, "Program Folder");
+    lstrcat(szSection0, szIndex0);
+    GetPrivateProfileString(szSection0, "Program Folder", "", szBuf, MAX_BUF, szFileIniConfig);
+  }
+  return(FO_SUCCESS);
+}

mozilla/xpinstall/wizard/windows/setup/ifuncns.h

@@ -0,0 +1,55 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#ifndef _IFUNCNS_H_
+#define _IFUNCNS_H_
+
+HRESULT     TimingCheck(DWORD dwTiming, LPSTR szSection, LPSTR szFile);
+HRESULT     FileUncompress(LPSTR szFrom, LPSTR szTo);
+HRESULT     ProcessCoreFile(void);
+HRESULT     CleanupCoreFile(void);
+HRESULT     ProcessUncompressFile(DWORD dwTiming);
+HRESULT     FileMove(LPSTR szFrom, LPSTR szTo);
+HRESULT     ProcessMoveFile(DWORD dwTiming);
+HRESULT     FileCopy(LPSTR szFrom, LPSTR szTo, BOOL bFailIfExists);
+HRESULT     ProcessCopyFile(DWORD dwTiming);
+HRESULT     ProcessCreateDirectory(DWORD dwTiming);
+HRESULT     FileDelete(LPSTR szDestination);
+HRESULT     ProcessDeleteFile(DWORD dwTiming);
+HRESULT     DirectoryRemove(LPSTR szDestination, BOOL bRemoveSubdirs);
+HRESULT     ProcessRemoveDirectory(DWORD dwTiming);
+HRESULT     ProcessRunApp(DWORD dwTiming);
+HRESULT     CreateALink(LPSTR lpszPathObj,
+                        LPSTR lpszPathLink,
+                        LPSTR lpszDesc,
+                        LPSTR lpszWorkingPath,
+                        LPSTR lpszArgs,
+                        LPSTR lpszIconFullPath,
+                        int iIcon);
+HRESULT     ProcessProgramFolder(DWORD dwTiming);
+HRESULT     ProcessProgramFolderShowCmd(void);
+HRESULT     CreateDirectoriesAll(char* szPath);
+void        ProcessFileOps(DWORD dwTiming);
+
+#endif

mozilla/xpinstall/wizard/windows/setup/makefile.win

@@ -0,0 +1,61 @@
+#
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Mozilla Communicator client code, 
+# released March 31, 1998. 
+#
+# The Initial Developer of the Original Code is Netscape Communications 
+# Corporation.  Portions created by Netscape are
+# Copyright (C) 1999 Netscape Communications Corporation. All
+# Rights Reserved.
+#
+# Contributor(s): 
+#     Sean Su <ssu@netscape.com>
+
+DEPTH=..\..\..\..
+
+MAKE_OBJ_TYPE   = EXE
+USE_NON_MT_LIBS = 1
+
+MODULE          = setup
+PROGRAM         = .\$(OBJDIR)\$(MODULE).exe
+RESFILE         = $(MODULE).res
+
+OBJS =                          \
+    .\$(OBJDIR)\dialogs.obj     \
+    .\$(OBJDIR)\extra.obj       \
+    .\$(OBJDIR)\ifuncns.obj     \
+    .\$(OBJDIR)\setup.obj       \
+    .\$(OBJDIR)\shortcut.obj    \
+    .\$(OBJDIR)\xpi.obj         \
+    $(NULL)
+
+LLIBS=                          \
+    $(DIST)\lib\nsreg_s.lib     \
+    $(DIST)\lib\jar_s.lib       \
+    $(DIST)\lib\zlib_s.lib      \
+    $(NULL)
+
+WIN_LIBS=                       \
+    ole32.lib                   \
+    comdlg32.lib                \
+    shell32.lib                 \
+    version.lib                 \
+    $(NULL)
+
+include <$(DEPTH)\config\rules.mak>
+
+install:: $(PROGRAM)
+    $(MAKE_INSTALL) $(PROGRAM) $(DIST)\install
+
+clobber_all::
+    $(RM) $(DIST)\install\$(MODULE).exe
+

mozilla/xpinstall/wizard/windows/setup/resource.h

@@ -0,0 +1,47 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+//{{NO_DEPENDENCIES}}
+// Microsoft Developer Studio generated include file.
+// Used by setup.rc
+//
+
+#include "winresrc.h"
+
+#define IDS_ERROR_DLL_LOAD              1
+#define IDS_ERROR_STRING_LOAD           2
+#define IDS_ERROR_STRING_NULL           4
+#define IDS_ERROR_GLOBALALLOC           5
+
+// Next default values for new objects
+// 
+#ifdef APSTUDIO_INVOKED
+#ifndef APSTUDIO_READONLY_SYMBOLS
+#define _APS_NO_MFC                     1
+#define _APS_NEXT_RESOURCE_VALUE        103
+#define _APS_NEXT_COMMAND_VALUE         40001
+#define _APS_NEXT_CONTROL_VALUE         1000
+#define _APS_NEXT_SYMED_VALUE           101
+#endif
+#endif

mozilla/xpinstall/wizard/windows/setup/setup.c

@@ -0,0 +1,151 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include "setup.h"
+#include "extra.h"
+#include "dialogs.h"
+#include "ifuncns.h"
+
+/* global variables */
+HINSTANCE       hInst;
+HINSTANCE       hSetupRscInst;
+HINSTANCE       hSDInst;
+HINSTANCE       hXPIStubInst;
+
+HBITMAP         hbmpBoxChecked;
+HBITMAP         hbmpBoxUnChecked;
+
+HANDLE          hAccelTable;
+
+HWND            hDlg;
+HWND            hDlgMessage;
+HWND            hWndMain;
+
+SDI_NETINSTALL  pfnNetInstall;
+
+LPSTR           szEGlobalAlloc;
+LPSTR           szEStringLoad;
+LPSTR           szEDllLoad;
+LPSTR           szEStringNull;
+LPSTR           szTempSetupPath;
+
+LPSTR           szClassName;
+LPSTR           szSetupDir;
+LPSTR           szTempDir;
+LPSTR           szFileIniConfig;
+
+DWORD           dwWizardState;
+DWORD           dwSetupType;
+DWORD           dwOSType;
+DWORD           dwScreenX;
+DWORD           dwScreenY;
+
+DWORD           dwTempSetupType;
+
+BOOL            bSDUserCanceled;
+BOOL            bIdiArchivesExists;
+BOOL            bCreateDestinationDir;
+BOOL            bReboot;
+
+setupGen        sgProduct;
+diS             diSetup;
+diW             diWelcome;
+diL             diLicense;
+diST            diSetupType;
+diSC            diSelectComponents;
+diWI            diWindowsIntegration;
+diPF            diProgramFolder;
+diSI            diStartInstall;
+diR             diReboot;
+siSD            siSDObject;
+siCF            siCFCoreFile;
+siC             *siComponents;
+
+int APIENTRY WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpszCmdLine, int nCmdShow)
+{
+  /***********************************************************************/
+  /* HANDLE hInstance;       handle for this instance                    */
+  /* HANDLE hPrevInstance;   handle for possible previous instances      */
+  /* LPSTR  lpszCmdLine;     long pointer to exec command line           */
+  /* int    nCmdShow;        Show code for main window display           */
+  /***********************************************************************/
+
+  MSG   msg;
+  char  szBuf[MAX_BUF];
+
+  if(!hPrevInstance)
+  {
+    if(Initialize(hInstance))
+      PostQuitMessage(1);
+    else if(!InitApplication(hInstance, hSetupRscInst))
+    {
+      char szEFailed[MAX_BUF];
+
+      if(NS_LoadString(hInstance, IDS_ERROR_FAILED, szEFailed, MAX_BUF) == WIZ_OK)
+      {
+        wsprintf(szBuf, szEFailed, "InitApplication().");
+        PrintError(szBuf, ERROR_CODE_SHOW);
+      }
+      PostQuitMessage(1);
+    }
+    else if(!InitInstance(hInstance, nCmdShow))
+    {
+      char szEFailed[MAX_BUF];
+
+      if(NS_LoadString(hInstance, IDS_ERROR_FAILED, szEFailed, MAX_BUF) == WIZ_OK)
+      {
+        wsprintf(szBuf, szEFailed, "InitInstance().");
+        PrintError(szBuf, ERROR_CODE_SHOW);
+      }
+      PostQuitMessage(1);
+    }
+    else if(GetConfigIni())
+    {
+      PostQuitMessage(1);
+    }
+    else if(ParseConfigIni(lpszCmdLine))
+    {
+      PostQuitMessage(1);
+    }
+    else
+    {
+      DlgSequenceNext();
+    }
+  }
+
+  while(GetMessage(&msg, NULL, 0, 0))
+  {
+    if((!IsDialogMessage(hDlg, &msg)) && (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg)))
+    {
+      TranslateMessage(&msg);
+      DispatchMessage(&msg);
+    }
+  }
+
+  /* Do clean up before exiting from the application */
+  DeInitialize();
+
+  return(msg.wParam);
+} /*  End of WinMain */
+

mozilla/xpinstall/wizard/windows/setup/setup.h

@@ -0,0 +1,296 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#ifndef _SETUP_H_
+#define _SETUP_H_
+
+#ifdef __cplusplus
+#define PR_BEGIN_EXTERN_C       extern "C" {
+#define PR_END_EXTERN_C         }
+#else
+#define PR_BEGIN_EXTERN_C
+#define PR_END_EXTERN_C
+#endif
+
+#define PR_EXTERN(type) type
+
+typedef unsigned int PRUint32;
+typedef int PRInt32;
+
+#include <windows.h>
+#include <string.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <assert.h>
+#include <direct.h>
+#include <tchar.h>
+#include <commctrl.h>
+#include "setuprsc.h"
+#include "resource.h"
+#include "zipfile.h"
+
+/* required only by commercial seamonkey build */
+#ifndef MOZILLA_CLIENT
+#include "sdinst.h"
+#endif
+
+#define CLASS_NAME                      "Setup"
+#define FILE_INI_SETUP                  "setup.ini"
+#define FILE_INI_CONFIG                 "config.ini"
+#define FILE_IDI_GETCONFIGINI           "getconfigini.idi"
+#define FILE_IDI_GETARCHIVES            "getarchives.idi"
+
+/* PP: Parse Path */
+#define PP_FILENAME_ONLY                1
+#define PP_PATH_ONLY                    2
+#define PP_ROOT_ONLY                    3
+
+/* T: Timing */
+#define T_PRE_DOWNLOAD                  1
+#define T_POST_DOWNLOAD                 2
+#define T_PRE_CORE                      3
+#define T_POST_CORE                     4
+#define T_PRE_SMARTUPDATE               5
+#define T_POST_SMARTUPDATE              6
+#define T_PRE_LAUNCHAPP                 7
+#define T_POST_LAUNCHAPP                8
+#define T_DEPEND_REBOOT                 9
+
+#define MAX_BUF                         4096
+#define ERROR_CODE_HIDE                 0
+#define ERROR_CODE_SHOW                 1
+#define DLG_NONE                        0
+#define CX_CHECKBOX                     13
+#define CY_CHECKBOX                     13
+
+/* WIZ: WIZARD defines */
+#define WIZ_OK                          0
+#define WIZ_MEMORY_ALLOC_FAILED         1
+
+/* FO: File Operation */
+#define FO_OK                           0
+#define FO_SUCCESS                      0
+#define FO_ERROR_FILE_NOT_FOUND         1
+#define FO_ERROR_DESTINATION_CONFLICT   2
+#define FO_ERROR_CHANGE_DIR             3
+
+#define NORMAL                          0
+#define SILENT                          1
+#define AUTO                            2
+
+/* ST: Setup Type */
+#define ST_RADIO0                       0
+#define ST_RADIO1                       1
+#define ST_RADIO2                       2
+#define ST_RADIO3                       3
+
+/* SM: Setup Type Mode */
+#define SM_SINGLE                       0
+#define SM_MULTI                        1
+
+/* SIC: Setup Info Component*/
+#define SIC_SELECTED                    1
+#define SIC_INVISIBLE                   2
+#define SIC_LAUNCHAPP                   4
+#define SIC_DOWNLOAD_REQUIRED           8
+#define SIC_DOWNLOAD_ONLY               16
+
+/* OS: Operating System */
+#define OS_WIN95_DEBUTE                 1
+#define OS_WIN95                        2
+#define OS_WIN98                        4
+#define OS_NT3                          8
+#define OS_NT4                         16
+
+/* DSR: Disk Space Required */
+#define DSR_DESTINATION                 0
+#define DSR_SYSTEM                      1
+#define DSR_TEMP                        2
+#define DSR_DOWNLOAD_SIZE               3
+
+typedef HRESULT (_cdecl *SDI_NETINSTALL) (LPSDISTRUCT);
+
+typedef struct dlgSetup
+{
+  DWORD   dwDlgID;
+  WNDPROC fDlgProc;
+  LPSTR   szTitle;
+} diS;
+
+typedef struct dlgWelcome
+{
+  BOOL  bShowDialog;
+  LPSTR szTitle;
+  LPSTR szMessage0;
+  LPSTR szMessage1;
+  LPSTR szMessage2;
+} diW;
+
+typedef struct dlgLicense
+{
+  BOOL  bShowDialog;
+  LPSTR szTitle;
+  LPSTR szLicenseFilename;
+  LPSTR szMessage0;
+  LPSTR szMessage1;
+} diL;
+
+typedef struct stStruct
+{
+  BOOL  bVisible;
+  DWORD dwCItems;
+  DWORD dwCItemsSelected[MAX_BUF]; /* components */
+  DWORD dwAItems;
+  DWORD dwAItemsSelected[MAX_BUF]; /* additions */
+  LPSTR szDescriptionShort;
+  LPSTR szDescriptionLong;
+} st;
+
+typedef struct dlgSetupType
+{
+  BOOL  bShowDialog;
+  LPSTR szTitle;
+  LPSTR szMessage0;
+  LPSTR szReadmeFilename;
+  LPSTR szReadmeApp;
+  st    stSetupType0;
+  st    stSetupType1;
+  st    stSetupType2;
+  st    stSetupType3;
+} diST;
+
+typedef struct dlgSelectComponents
+{
+  BOOL  bShowDialog;
+  DWORD bShowDialogSM;
+  LPSTR szTitle;
+  LPSTR szMessage0;
+} diSC;
+
+typedef struct wiCBstruct
+{
+  BOOL  bEnabled;
+  BOOL  bCheckBoxState;
+  LPSTR szDescription;
+  LPSTR szArchive;
+} wiCBs;
+
+typedef struct dlgWindowsIntegration
+{
+  BOOL  bShowDialog;
+  LPSTR szTitle;
+  LPSTR szMessage0;
+  LPSTR szMessage1;
+  wiCBs wiCB0;
+  wiCBs wiCB1;
+  wiCBs wiCB2;
+  wiCBs wiCB3;
+} diWI;
+
+typedef struct dlgProgramFolder
+{
+  BOOL  bShowDialog;
+  LPSTR szTitle;
+  LPSTR szMessage0;
+} diPF;
+
+typedef struct dlgStartInstall
+{
+  BOOL  bShowDialog;
+  LPSTR szTitle;
+  LPSTR szMessage0;
+} diSI;
+
+typedef struct dlgReboot
+{
+  DWORD dwShowDialog;
+  LPSTR szTitle;
+} diR;
+
+typedef struct setupStruct
+{
+  DWORD dwMode;
+  DWORD dwCustomType;
+  LPSTR szPath;
+  LPSTR szProductName;
+  LPSTR szProgramFolderName;
+  LPSTR szProgramFolderPath;
+  LPSTR szAlternateArchiveSearchPath;
+  LPSTR szSetupTitle0;
+  LPSTR szSetupTitle1;
+  LPSTR szSetupTitle2;
+} setupGen;
+
+typedef struct sinfoSmartDownload
+{
+  LPSTR szCoreFile;
+  LPSTR szCoreDir;
+  LPSTR szNoAds;
+  LPSTR szSilent;
+  LPSTR szExecution;
+  LPSTR szConfirmInstall;
+  LPSTR szExtractMsg;
+  LPSTR szExe;
+  LPSTR szExeParam;
+  LPSTR szCoreFilePath;
+} siSD;
+
+typedef struct sinfoCoreFile
+{
+  LPSTR       szSource;
+  LPSTR       szDestination;
+  LPSTR       szMessage;
+  BOOL        bCleanup;
+  ULONGLONG   ullInstallSize;
+} siCF;
+
+typedef struct sinfoComponentDep siCD;
+struct sinfoComponentDep
+{
+  LPSTR szDescriptionShort;
+  siCD  *Next;
+  siCD  *Prev;
+};
+
+typedef struct sinfoComponent siC;
+struct sinfoComponent
+{
+  ULONGLONG       ullInstallSize;
+  ULONGLONG       ullInstallSizeSystem;
+  ULONGLONG       ullInstallSizeArchive;
+  long            lRandomInstallPercentage;
+  long            lRandomInstallValue;
+  DWORD           dwAttributes;
+  LPSTR           szArchiveName;
+  LPSTR           szArchivePath;
+  LPSTR           szDestinationPath;
+  LPSTR           szDescriptionShort;
+  LPSTR           szDescriptionLong;
+  LPSTR           szParameter;
+  siCD            *siCDDependencies;
+  siC             *Next;
+  siC             *Prev;
+};
+
+#endif

mozilla/xpinstall/wizard/windows/setup/setup.ini

@@ -0,0 +1,12 @@
+[Netscape Install]
+no_ads=true
+silent=true
+execution=false
+confirm_install=false
+
+[Proxy]
+
+[File0]
+desc=Configuration file for setup.exe
+0=ftp://sweetlou/products/client/ssu/windows/config.ini
+

mozilla/xpinstall/wizard/windows/setup/setup.rc

@@ -0,0 +1,156 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+//Microsoft Developer Studio generated resource script.
+//
+#include "resource.h"
+
+#define APSTUDIO_READONLY_SYMBOLS
+/////////////////////////////////////////////////////////////////////////////
+//
+// Generated from the TEXTINCLUDE 2 resource.
+//
+
+
+/////////////////////////////////////////////////////////////////////////////
+#undef APSTUDIO_READONLY_SYMBOLS
+
+/////////////////////////////////////////////////////////////////////////////
+// English (U.S.) resources
+
+#if !defined(AFX_RESOURCE_DLL) || defined(AFX_TARG_ENU)
+#ifdef _WIN32
+LANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US
+#pragma code_page(1252)
+#endif //_WIN32
+
+#ifdef APSTUDIO_INVOKED
+/////////////////////////////////////////////////////////////////////////////
+//
+// TEXTINCLUDE
+//
+
+1 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "resource.h\0"
+END
+
+2 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "\r\n"
+    "\0"
+END
+
+3 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "\r\n"
+    "\0"
+END
+
+#endif    // APSTUDIO_INVOKED
+
+
+#ifndef _MAC
+/////////////////////////////////////////////////////////////////////////////
+//
+// Version
+//
+
+VS_VERSION_INFO VERSIONINFO
+ FILEVERSION 1,0,0,1
+ PRODUCTVERSION 1,0,0,1
+ FILEFLAGSMASK 0x3fL
+#ifdef _DEBUG
+ FILEFLAGS 0x1L
+#else
+ FILEFLAGS 0x0L
+#endif
+ FILEOS 0x40004L
+ FILETYPE 0x1L
+ FILESUBTYPE 0x0L
+BEGIN
+    BLOCK "StringFileInfo"
+    BEGIN
+        BLOCK "040904b0"
+        BEGIN
+            VALUE "Comments", "\0"
+            VALUE "CompanyName", "Netscape Communications\0"
+            VALUE "FileDescription", "setup\0"
+            VALUE "FileVersion", "1, 0, 0, 1\0"
+            VALUE "InternalName", "setup\0"
+            VALUE "LegalCopyright", "Copyright © 1999\0"
+            VALUE "LegalTrademarks", "\0"
+            VALUE "OriginalFilename", "setup.exe\0"
+            VALUE "PrivateBuild", "\0"
+            VALUE "ProductName", "Netscape Communications setup\0"
+            VALUE "ProductVersion", "1, 0, 0, 1\0"
+            VALUE "SpecialBuild", "\0"
+        END
+    END
+    BLOCK "VarFileInfo"
+    BEGIN
+        VALUE "Translation", 0x409, 1200
+    END
+END
+
+#endif    // !_MAC
+
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Icon
+//
+
+// Icon with lowest ID value placed first to ensure application icon
+// remains consistent on all systems.
+1                       ICON    DISCARDABLE     "setup.ico"
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// String Table
+//
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    IDS_ERROR_DLL_LOAD      "Could not load %s"
+    IDS_ERROR_STRING_LOAD   "Could not load string resource ID %d"
+    IDS_ERROR_STRING_NULL   "Null pointer encountered."
+    IDS_ERROR_GLOBALALLOC   "Memory allocation error."
+END
+
+#endif    // English (U.S.) resources
+/////////////////////////////////////////////////////////////////////////////
+
+
+
+#ifndef APSTUDIO_INVOKED
+/////////////////////////////////////////////////////////////////////////////
+//
+// Generated from the TEXTINCLUDE 3 resource.
+//
+
+
+/////////////////////////////////////////////////////////////////////////////
+#endif    // not APSTUDIO_INVOKED
+

mozilla/xpinstall/wizard/windows/setup/shortcut.cpp

@@ -0,0 +1,88 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+/* This is a hack for vc5.0.  It needs to be set *before* any shell
+ * include files. The INITGUID definition turns off the inclusion
+ * of shlguid.h in shlobj.h so it has to be done explicitly.
+ */
+#if (_MSC_VER == 1100)
+#define INITGUID
+#include "objbase.h"
+DEFINE_OLEGUID(IID_IPersistFile, 0x0000010BL, 0, 0);
+#endif
+
+#include <shlobj.h>
+#include <shlguid.h>
+#include "shortcut.h"
+
+HRESULT CreateALink(LPSTR lpszPathObj, LPSTR lpszPathLink, LPSTR lpszDesc, LPSTR lpszWorkingPath, LPSTR lpszArgs, LPSTR lpszIconFullPath, int iIcon)
+{ 
+    HRESULT    hres; 
+    IShellLink *psl;
+    char       lpszFullPath[MAX_BUF];
+
+    lstrcpy(lpszFullPath, lpszPathLink);
+    lstrcat(lpszFullPath, "\\");
+    lstrcat(lpszFullPath, lpszDesc);
+    lstrcat(lpszFullPath, ".lnk");
+
+    CreateDirectory(lpszPathLink, NULL);
+    CoInitialize(NULL);
+
+    // Get a pointer to the IShellLink interface. 
+    hres = CoCreateInstance(CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, IID_IShellLink, (LPVOID *)&psl); 
+    if(SUCCEEDED(hres))
+    { 
+        IPersistFile* ppf; 
+ 
+        // Set the path to the shortcut target, and add the 
+        // description. 
+        psl->SetPath(lpszPathObj);
+        psl->SetDescription(lpszDesc);
+        if(lpszWorkingPath)
+            psl->SetWorkingDirectory(lpszWorkingPath);
+        if(lpszArgs)
+            psl->SetArguments(lpszArgs);
+        psl->SetIconLocation(lpszIconFullPath, iIcon);
+ 
+        // Query IShellLink for the IPersistFile interface for saving the 
+        // shortcut in persistent storage. 
+        hres = psl->QueryInterface(IID_IPersistFile, (LPVOID FAR *)&ppf); 
+        if(SUCCEEDED(hres))
+        { 
+            WORD wsz[MAX_BUF]; 
+ 
+            // Ensure that the string is ANSI. 
+            MultiByteToWideChar(CP_ACP, 0, lpszFullPath, -1, (wchar_t *)wsz, MAX_BUF);
+ 
+            // Save the link by calling IPersistFile::Save. 
+            hres = ppf->Save((wchar_t *)wsz, TRUE); 
+            ppf->Release(); 
+        } 
+        psl->Release(); 
+    } 
+    CoUninitialize();
+
+    return hres;
+} 

mozilla/xpinstall/wizard/windows/setup/shortcut.h

@@ -0,0 +1,43 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#ifndef _SHORTCUT_H_
+#define _SHORTCUT_H_
+
+#ifndef MAX_BUF
+#define MAX_BUF 4096
+#endif
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+HRESULT CreateALink(LPSTR lpszPathObj, LPSTR lpszPathLink, LPSTR lpszDesc, LPSTR lpszWorkingPath, LPSTR lpszArgs, LPSTR lpszIconFullPath, int iIcon);
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif

mozilla/xpinstall/wizard/windows/setup/xpi.c

@@ -0,0 +1,688 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include "extern.h"
+#include "dialogs.h"
+#include "extra.h"
+#include "xpistub.h"
+#include "xpi.h"
+
+#define BDIR_RIGHT 1
+#define BDIR_LEFT  2
+
+static XpiInit          pfnXpiInit;
+static XpiInstall       pfnXpiInstall;
+static XpiExit          pfnXpiExit;
+
+static long             lFileCounter;
+static long             lBarberCounter;
+static BOOL             bBarberBar;
+static DWORD            dwBarberDirection;
+static DWORD            dwCurrentArchive;
+static DWORD            dwTotalArchives;
+char                    szStrProcessingFile[MAX_BUF];
+char                    szStrCopyingFile[MAX_BUF];
+char                    szStrInstalling[MAX_BUF];
+
+static void UpdateGaugeFileProgressBar(unsigned value);
+static void UpdateGaugeArchiveProgressBar(unsigned value);
+static void UpdateGaugeFileBarber(void);
+
+struct ExtractFilesDlgInfo
+{
+	HWND	hWndDlg;
+	int		nMaxFileBars;	    // maximum number of bars that can be displayed
+	int		nMaxArchiveBars;	// maximum number of bars that can be displayed
+	int		nFileBars;		    // current number of bars to display
+	int		nArchiveBars;		  // current number of bars to display
+} dlgInfo;
+
+HRESULT InitializeXPIStub()
+{
+  char szBuf[MAX_BUF];
+  char szXPIStubFile[MAX_BUF];
+  char szEGetProcAddress[MAX_BUF];
+
+  hXPIStubInst = NULL;
+
+  if(NS_LoadString(hSetupRscInst, IDS_ERROR_GETPROCADDRESS, szEGetProcAddress, MAX_BUF) != WIZ_OK)
+    return(1);
+
+  /* change current directory to where xpistub.dll */
+  lstrcpy(szBuf, siCFCoreFile.szDestination);
+  AppendBackSlash(szBuf, sizeof(szBuf));
+  lstrcat(szBuf, "bin");
+  chdir(szBuf);
+
+  /* build full path to xpistub.dll */
+  lstrcpy(szXPIStubFile, szBuf);
+  AppendBackSlash(szXPIStubFile, sizeof(szXPIStubFile));
+  lstrcat(szXPIStubFile, "xpistub.dll");
+
+  if(FileExists(szXPIStubFile) == FALSE)
+    return(2);
+
+  /* load xpistub.dll */
+  if((hXPIStubInst = LoadLibraryEx(szXPIStubFile, NULL, LOAD_WITH_ALTERED_SEARCH_PATH)) == NULL)
+  {
+    wsprintf(szBuf, szEDllLoad, szXPIStubFile);
+    PrintError(szBuf, ERROR_CODE_SHOW);
+    return(1);
+  }
+  if(((FARPROC)pfnXpiInit = GetProcAddress(hXPIStubInst, "XPI_Init")) == NULL)
+  {
+    wsprintf(szBuf, szEGetProcAddress, "XPI_Init");
+    PrintError(szBuf, ERROR_CODE_SHOW);
+    return(1);
+  }
+  if(((FARPROC)pfnXpiInstall = GetProcAddress(hXPIStubInst, "XPI_Install")) == NULL)
+  {
+    wsprintf(szBuf, szEGetProcAddress, "XPI_Install");
+    PrintError(szBuf, ERROR_CODE_SHOW);
+    return(1);
+  }
+  if(((FARPROC)pfnXpiExit = GetProcAddress(hXPIStubInst, "XPI_Exit")) == NULL)
+  {
+    wsprintf(szBuf, szEGetProcAddress, "XPI_Exit");
+    PrintError(szBuf, ERROR_CODE_SHOW);
+    return(1);
+  }
+
+  return(0);
+}
+
+HRESULT DeInitializeXPIStub()
+{
+  pfnXpiInit    = NULL;
+  pfnXpiInstall = NULL;
+  pfnXpiExit    = NULL;
+
+  if(hXPIStubInst)
+    FreeLibrary(hXPIStubInst);
+
+  chdir(szSetupDir);
+  return(0);
+}
+
+void GetTotalArchivesToInstall(void)
+{
+  DWORD     dwIndex0;
+  siC       *siCObject = NULL;
+
+  dwIndex0        = 0;
+  dwTotalArchives = 0;
+  siCObject = SiCNodeGetObject(dwIndex0, TRUE);
+  while(siCObject)
+  {
+    if((siCObject->dwAttributes & SIC_SELECTED) && !(siCObject->dwAttributes & SIC_LAUNCHAPP))
+      ++dwTotalArchives;
+
+    ++dwIndex0;
+    siCObject = SiCNodeGetObject(dwIndex0, TRUE);
+  }
+}
+
+HRESULT SmartUpdateJars()
+{
+  DWORD     dwIndex0;
+  siC       *siCObject = NULL;
+  HRESULT   hrResult;
+  char      szBuf[MAX_BUF];
+  char      szEXpiInstall[MAX_BUF];
+  char      szArchive[MAX_BUF];
+  char      szMsgSmartUpdateStart[MAX_BUF];
+  char      szDlgExtractingTitle[MAX_BUF];
+
+  if(NS_LoadString(hSetupRscInst, IDS_MSG_SMARTUPDATE_START, szMsgSmartUpdateStart, MAX_BUF) != WIZ_OK)
+    return(1);
+  if(NS_LoadString(hSetupRscInst, IDS_DLG_EXTRACTING_TITLE, szDlgExtractingTitle, MAX_BUF) != WIZ_OK)
+    return(1);
+  if(NS_LoadString(hSetupRscInst, IDS_STR_PROCESSINGFILE, szStrProcessingFile, MAX_BUF) != WIZ_OK)
+    exit(1);
+  if(NS_LoadString(hSetupRscInst, IDS_STR_INSTALLING, szStrInstalling, MAX_BUF) != WIZ_OK)
+    exit(1);
+  if(NS_LoadString(hSetupRscInst, IDS_STR_COPYINGFILE, szStrCopyingFile, MAX_BUF) != WIZ_OK)
+    exit(1);
+
+  ShowMessage(szMsgSmartUpdateStart, TRUE);
+  if(InitializeXPIStub() == WIZ_OK)
+  {
+    hrResult = pfnXpiInit(sgProduct.szPath, cbXPIProgress);
+
+    ShowMessage(szMsgSmartUpdateStart, FALSE);
+    InitProgressDlg();
+    GetTotalArchivesToInstall();
+    SetWindowText(dlgInfo.hWndDlg, szDlgExtractingTitle);
+
+    dwIndex0          = 0;
+    dwCurrentArchive  = 0;
+    dwTotalArchives   = (dwTotalArchives * 2) + 1;
+    bBarberBar        = FALSE;
+    siCObject         = SiCNodeGetObject(dwIndex0, TRUE);
+    while(siCObject)
+    {
+      /* launch smartupdate engine for earch jar to be installed */
+      if((siCObject->dwAttributes & SIC_SELECTED)   &&
+        !(siCObject->dwAttributes & SIC_LAUNCHAPP) &&
+        !(siCObject->dwAttributes & SIC_DOWNLOAD_ONLY))
+      {
+        lFileCounter      = 0;
+        lBarberCounter    = 0;
+        dwBarberDirection = BDIR_RIGHT;
+			  dlgInfo.nFileBars = 0;
+        UpdateGaugeFileProgressBar(0);
+
+        lstrcpy(szArchive, sgProduct.szAlternateArchiveSearchPath);
+        AppendBackSlash(szArchive, sizeof(szArchive));
+        lstrcat(szArchive, siCObject->szArchiveName);
+        if((*sgProduct.szAlternateArchiveSearchPath == '\0') || (!FileExists(szArchive)))
+        {
+          lstrcpy(szArchive, szSetupDir);
+          AppendBackSlash(szArchive, sizeof(szArchive));
+          lstrcat(szArchive, siCObject->szArchiveName);
+          if(!FileExists(szArchive))
+          {
+            lstrcpy(szArchive, szTempDir);
+            AppendBackSlash(szArchive, sizeof(szArchive));
+            lstrcat(szArchive, siCObject->szArchiveName);
+            if(!FileExists(szArchive))
+            {
+              char szEFileNotFound[MAX_BUF];
+
+              if(NS_LoadString(hSetupRscInst, IDS_ERROR_FILE_NOT_FOUND, szEFileNotFound, MAX_BUF) == WIZ_OK)
+              {
+                wsprintf(szBuf, szEFileNotFound, szArchive);
+                PrintError(szBuf, ERROR_CODE_HIDE);
+              }
+              return(1);
+            }
+          }
+        }
+
+        if(dwCurrentArchive == 0)
+        {
+          ++dwCurrentArchive;
+          UpdateGaugeArchiveProgressBar((unsigned)(((double)(dwCurrentArchive)/(double)dwTotalArchives)*(double)100));
+        }
+
+        wsprintf(szBuf, szStrInstalling, siCObject->szDescriptionShort);
+        SetDlgItemText(dlgInfo.hWndDlg, IDC_STATUS0, szBuf);
+
+        hrResult = pfnXpiInstall(szArchive, "", 0xFFFF);
+        if(hrResult == 999)
+          bReboot = TRUE;
+        else if(hrResult != WIZ_OK)
+        {
+          if(NS_LoadString(hSetupRscInst, IDS_ERROR_XPI_INSTALL, szEXpiInstall, MAX_BUF) == WIZ_OK)
+          {
+            wsprintf(szBuf, "%d: %s", hrResult, szEXpiInstall);
+            PrintError(szBuf, ERROR_CODE_HIDE);
+          }
+
+          /* break out of the while loop */
+          break;
+        }
+
+        ++dwCurrentArchive;
+        UpdateGaugeArchiveProgressBar((unsigned)(((double)(dwCurrentArchive)/(double)dwTotalArchives)*(double)100));
+        ProcessWindowsMessages();
+      }
+
+      ++dwIndex0;
+      siCObject = SiCNodeGetObject(dwIndex0, TRUE);
+    }
+
+    pfnXpiExit();
+    DeInitProgressDlg();
+  }
+  else
+  {
+    ShowMessage(szMsgSmartUpdateStart, FALSE);
+  }
+
+  DeInitializeXPIStub();
+
+  return(hrResult);
+}
+
+void cbXPIStart(const char *URL, const char *UIName)
+{
+}
+
+void cbXPIProgress(const char* msg, PRInt32 val, PRInt32 max)
+{
+  char szFilename[MAX_BUF];
+  char szStrProcessingFileBuf[MAX_BUF];
+  char szStrCopyingFileBuf[MAX_BUF];
+
+  ParsePath((char *)msg, szFilename, sizeof(szFilename), PP_FILENAME_ONLY);
+
+  if(max == 0)
+  {
+    wsprintf(szStrProcessingFileBuf, szStrProcessingFile, szFilename);
+    SetDlgItemText(dlgInfo.hWndDlg, IDC_STATUS3, szStrProcessingFileBuf);
+    bBarberBar = TRUE;
+    UpdateGaugeFileBarber();
+  }
+  else
+  {
+    if(bBarberBar == TRUE)
+    {
+      dlgInfo.nFileBars = 0;
+      ++dwCurrentArchive;
+      UpdateGaugeArchiveProgressBar((unsigned)(((double)(dwCurrentArchive)/(double)dwTotalArchives)*(double)100));
+      bBarberBar = FALSE;
+    }
+
+    wsprintf(szStrCopyingFileBuf, szStrCopyingFile, szFilename);
+    SetDlgItemText(dlgInfo.hWndDlg, IDC_STATUS3, szStrCopyingFileBuf);
+    UpdateGaugeFileProgressBar((unsigned)(((double)(val+1)/(double)max)*(double)100));
+  }
+
+  ProcessWindowsMessages();
+}
+
+void cbXPIFinal(const char *URL, PRInt32 finalStatus)
+{
+}
+
+
+
+/////////////////////////////////////////////////////////////////////////////
+// Progress bar
+
+// Centers the specified window over the desktop. Assumes the window is
+// smaller both horizontally and vertically than the desktop
+static void
+CenterWindow(HWND hWndDlg)
+{
+	RECT	rect;
+	int		iLeft, iTop;
+
+	GetWindowRect(hWndDlg, &rect);
+	iLeft = (GetSystemMetrics(SM_CXSCREEN) - (rect.right - rect.left)) / 2;
+	iTop  = (GetSystemMetrics(SM_CYSCREEN) - (rect.bottom - rect.top)) / 2;
+
+	SetWindowPos(hWndDlg, NULL, iLeft, iTop, -1, -1, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
+}
+
+// Window proc for dialog
+LRESULT CALLBACK
+ProgressDlgProc(HWND hWndDlg, UINT msg, WPARAM wParam, LPARAM lParam)
+{
+	switch (msg)
+  {
+		case WM_INITDIALOG:
+			CenterWindow(hWndDlg);
+			return FALSE;
+
+		case WM_COMMAND:
+			return TRUE;
+	}
+
+	return FALSE;  // didn't handle the message
+}
+
+// This routine will update the File Gauge progress bar to the specified percentage
+// (value between 0 and 100)
+static void
+UpdateGaugeFileBarber()
+{
+	int	nBars;
+	HWND	hWndGauge = GetDlgItem(dlgInfo.hWndDlg, IDC_GAUGE_FILE);
+	RECT	rect;
+
+  if(dwBarberDirection == BDIR_RIGHT)
+  {
+    if(lBarberCounter < 151)
+      ++lBarberCounter;
+    else
+      dwBarberDirection = BDIR_LEFT;
+  }
+  else if(dwBarberDirection == BDIR_LEFT)
+  {
+    if(lBarberCounter > 0)
+      --lBarberCounter;
+    else
+      dwBarberDirection = BDIR_RIGHT;
+  }
+
+  // Figure out how many bars should be displayed
+  nBars = (dlgInfo.nMaxFileBars * lBarberCounter / 100);
+
+  // Update the gauge state before painting
+  dlgInfo.nFileBars = nBars;
+
+  // Only invalidate the part that needs updating
+  GetClientRect(hWndGauge, &rect);
+  InvalidateRect(hWndGauge, &rect, FALSE);
+
+  // Update the whole extracting dialog. We do this because we don't
+  // have a message loop to process WM_PAINT messages in case the
+  // extracting dialog was exposed
+  UpdateWindow(dlgInfo.hWndDlg);
+}
+
+// This routine will update the File Gauge progress bar to the specified percentage
+// (value between 0 and 100)
+static void
+UpdateGaugeFileProgressBar(unsigned value)
+{
+	int	nBars;
+
+	// Figure out how many bars should be displayed
+	nBars = dlgInfo.nMaxFileBars * value / 100;
+
+	// Only paint if we need to display more bars
+	if((nBars > dlgInfo.nFileBars) || (dlgInfo.nFileBars == 0))
+  {
+		HWND	hWndGauge = GetDlgItem(dlgInfo.hWndDlg, IDC_GAUGE_FILE);
+		RECT	rect;
+
+		// Update the gauge state before painting
+		dlgInfo.nFileBars = nBars;
+
+		// Only invalidate the part that needs updating
+		GetClientRect(hWndGauge, &rect);
+		InvalidateRect(hWndGauge, &rect, FALSE);
+	
+		// Update the whole extracting dialog. We do this because we don't
+		// have a message loop to process WM_PAINT messages in case the
+		// extracting dialog was exposed
+		UpdateWindow(dlgInfo.hWndDlg);
+	}
+}
+
+// This routine will update the Archive Gauge progress bar to the specified percentage
+// (value between 0 and 100)
+static void
+UpdateGaugeArchiveProgressBar(unsigned value)
+{
+	int	nBars;
+
+	// Figure out how many bars should be displayed
+	nBars = dlgInfo.nMaxArchiveBars * value / 100;
+
+	// Only paint if we need to display more bars
+	if (nBars > dlgInfo.nArchiveBars)
+  {
+		HWND	hWndGauge = GetDlgItem(dlgInfo.hWndDlg, IDC_GAUGE_ARCHIVE);
+		RECT	rect;
+
+		// Update the gauge state before painting
+		dlgInfo.nArchiveBars = nBars;
+
+		// Only invalidate the part that needs updating
+		GetClientRect(hWndGauge, &rect);
+		InvalidateRect(hWndGauge, &rect, FALSE);
+	
+		// Update the whole extracting dialog. We do this because we don't
+		// have a message loop to process WM_PAINT messages in case the
+		// extracting dialog was exposed
+		UpdateWindow(dlgInfo.hWndDlg);
+	}
+}
+
+// Draws a recessed border around the gauge
+static void
+DrawGaugeBorder(HWND hWnd)
+{
+	HDC		hDC = GetWindowDC(hWnd);
+	RECT	rect;
+	int		cx, cy;
+	HPEN	hShadowPen = CreatePen(PS_SOLID, 1, GetSysColor(COLOR_BTNSHADOW));
+	HGDIOBJ	hOldPen;
+
+	GetWindowRect(hWnd, &rect);
+	cx = rect.right - rect.left;
+	cy = rect.bottom - rect.top;
+
+	// Draw a dark gray line segment
+	hOldPen = SelectObject(hDC, (HGDIOBJ)hShadowPen);
+	MoveToEx(hDC, 0, cy - 1, NULL);
+	LineTo(hDC, 0, 0);
+	LineTo(hDC, cx - 1, 0);
+
+	// Draw a white line segment
+	SelectObject(hDC, GetStockObject(WHITE_PEN));
+	MoveToEx(hDC, 0, cy - 1, NULL);
+	LineTo(hDC, cx - 1, cy - 1);
+	LineTo(hDC, cx - 1, 0);
+
+	SelectObject(hDC, hOldPen);
+	DeleteObject(hShadowPen);
+	ReleaseDC(hWnd, hDC);
+}
+
+// Draws the blue progress bar
+static void
+DrawProgressBar(HWND hWnd, int nBars)
+{
+  int         i;
+	PAINTSTRUCT	ps;
+	HDC         hDC;
+	RECT        rect;
+	HBRUSH      hBrush;
+
+  hDC = BeginPaint(hWnd, &ps);
+	GetClientRect(hWnd, &rect);
+  if(nBars <= 0)
+  {
+    /* clear the bars */
+    hBrush = CreateSolidBrush(GetSysColor(COLOR_MENU));
+    FillRect(hDC, &rect, hBrush);
+  }
+  else
+  {
+  	// Draw the bars
+    hBrush = CreateSolidBrush(RGB(0, 0, 128));
+	  rect.left     = rect.top = BAR_MARGIN;
+	  rect.bottom  -= BAR_MARGIN;
+	  rect.right    = rect.left + BAR_WIDTH;
+
+	  for(i = 0; i < nBars; i++)
+    {
+		  RECT	dest;
+
+		  if(IntersectRect(&dest, &ps.rcPaint, &rect))
+			  FillRect(hDC, &rect, hBrush);
+
+      OffsetRect(&rect, BAR_WIDTH + BAR_SPACING, 0);
+	  }
+  }
+
+	DeleteObject(hBrush);
+	EndPaint(hWnd, &ps);
+}
+
+// Draws the blue progress bar
+static void
+DrawBarberBar(HWND hWnd, int nBars)
+{
+  int         i;
+	PAINTSTRUCT	ps;
+	HDC         hDC;
+	RECT        rect;
+	HBRUSH      hBrush;
+	HBRUSH      hBrushClear;
+
+  hDC = BeginPaint(hWnd, &ps);
+	GetClientRect(hWnd, &rect);
+  if(nBars <= 0)
+  {
+    /* clear the bars */
+    hBrushClear = CreateSolidBrush(GetSysColor(COLOR_MENU));
+    FillRect(hDC, &rect, hBrushClear);
+  }
+  else
+  {
+  	// Draw the bars
+    hBrushClear   = CreateSolidBrush(GetSysColor(COLOR_MENU));
+    hBrush        = CreateSolidBrush(RGB(0, 0, 128));
+	  rect.left     = rect.top = BAR_MARGIN;
+	  rect.bottom  -= BAR_MARGIN;
+	  rect.right    = rect.left + BAR_WIDTH;
+
+	  for(i = 0; i < (nBars + 1); i++)
+    {
+		  RECT	dest;
+
+		  if(IntersectRect(&dest, &ps.rcPaint, &rect))
+      {
+        if((i >= (nBars - 15)) && (i < nBars))
+			    FillRect(hDC, &rect, hBrush);
+        else
+			    FillRect(hDC, &rect, hBrushClear);
+      }
+
+      OffsetRect(&rect, BAR_WIDTH + BAR_SPACING, 0);
+	  }
+  }
+
+	DeleteObject(hBrushClear);
+	DeleteObject(hBrush);
+	EndPaint(hWnd, &ps);
+}
+
+// Adjusts the width of the gauge based on the maximum number of bars
+static void
+SizeToFitGauge(HWND hWnd, int nMaxBars)
+{
+	RECT	rect;
+	int		cx;
+
+	// Get the window size in pixels
+	GetWindowRect(hWnd, &rect);
+
+	// Size the width to fit
+	cx = 2 * GetSystemMetrics(SM_CXBORDER) + 2 * BAR_MARGIN +
+		nMaxBars * BAR_WIDTH + (nMaxBars - 1) * BAR_SPACING;
+
+	SetWindowPos(hWnd, NULL, -1, -1, cx, rect.bottom - rect.top,
+		SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
+}
+
+// Window proc for file gauge
+LRESULT CALLBACK
+GaugeFileWndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
+{
+	DWORD	dwStyle;
+	RECT	rect;
+
+	switch(msg)
+  {
+		case WM_NCCREATE:
+			dwStyle = GetWindowLong(hWnd, GWL_STYLE);
+			SetWindowLong(hWnd, GWL_STYLE, dwStyle | WS_BORDER);
+			return(TRUE);
+
+		case WM_CREATE:
+			// Figure out the maximum number of bars that can be displayed
+			GetClientRect(hWnd, &rect);
+			dlgInfo.nFileBars = 0;
+			dlgInfo.nMaxFileBars = (rect.right - rect.left - 2 * BAR_MARGIN + BAR_SPACING) / (BAR_WIDTH + BAR_SPACING);
+
+			// Size the gauge to exactly fit the maximum number of bars
+			SizeToFitGauge(hWnd, dlgInfo.nMaxFileBars);
+			return(FALSE);
+
+		case WM_NCPAINT:
+			DrawGaugeBorder(hWnd);
+			return(FALSE);
+
+		case WM_PAINT:
+      if(bBarberBar == TRUE)
+			  DrawBarberBar(hWnd, dlgInfo.nFileBars);
+      else
+			  DrawProgressBar(hWnd, dlgInfo.nFileBars);
+
+			return(FALSE);
+	}
+
+	return(DefWindowProc(hWnd, msg, wParam, lParam));
+}
+
+// Window proc for file gauge
+LRESULT CALLBACK
+GaugeArchiveWndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
+{
+	DWORD	dwStyle;
+	RECT	rect;
+
+	switch(msg)
+  {
+		case WM_NCCREATE:
+			dwStyle = GetWindowLong(hWnd, GWL_STYLE);
+			SetWindowLong(hWnd, GWL_STYLE, dwStyle | WS_BORDER);
+			return(TRUE);
+
+		case WM_CREATE:
+			// Figure out the maximum number of bars that can be displayed
+			GetClientRect(hWnd, &rect);
+			dlgInfo.nArchiveBars = 0;
+			dlgInfo.nMaxArchiveBars = (rect.right - rect.left - 2 * BAR_MARGIN + BAR_SPACING) / (BAR_WIDTH + BAR_SPACING);
+
+			// Size the gauge to exactly fit the maximum number of bars
+			SizeToFitGauge(hWnd, dlgInfo.nMaxArchiveBars);
+			return(FALSE);
+
+		case WM_NCPAINT:
+			DrawGaugeBorder(hWnd);
+			return(FALSE);
+
+		case WM_PAINT:
+			DrawProgressBar(hWnd, dlgInfo.nArchiveBars);
+			return(FALSE);
+	}
+
+	return(DefWindowProc(hWnd, msg, wParam, lParam));
+}
+
+void InitProgressDlg()
+{
+	WNDCLASS	wc;
+
+	memset(&wc, 0, sizeof(wc));
+  wc.style          = CS_GLOBALCLASS;
+	wc.hInstance      = hInst;
+	wc.hbrBackground  = (HBRUSH)(COLOR_BTNFACE + 1);
+  wc.lpfnWndProc    = (WNDPROC)GaugeFileWndProc;
+	wc.lpszClassName  = "GaugeFile";
+	RegisterClass(&wc);
+
+  wc.lpfnWndProc    = (WNDPROC)GaugeArchiveWndProc;
+	wc.lpszClassName  = "GaugeArchive";
+	RegisterClass(&wc);
+
+	// Display the dialog box
+	dlgInfo.hWndDlg = CreateDialog(hSetupRscInst, MAKEINTRESOURCE(DLG_EXTRACTING), hWndMain, (WNDPROC)ProgressDlgProc);
+	UpdateWindow(dlgInfo.hWndDlg);
+}
+
+void DeInitProgressDlg()
+{
+  DestroyWindow(dlgInfo.hWndDlg);
+  UnregisterClass("GaugeFile", hInst);
+  UnregisterClass("GaugeArchive", hInst);
+}

mozilla/xpinstall/wizard/windows/setup/xpi.h

@@ -0,0 +1,46 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#ifndef _XPI_H_
+#define _XPI_H_
+
+#define BAR_MARGIN    1
+#define BAR_SPACING   2
+#define BAR_WIDTH     6
+
+typedef HRESULT (_cdecl *XpiInit)(const char *, pfnXPIProgress);
+typedef HRESULT (_cdecl *XpiInstall)(const char *, const char *, long);
+typedef void    (_cdecl *XpiExit)(void);
+
+HRESULT         InitializeXPIStub(void);
+HRESULT         DeInitializeXPIStub(void);
+HRESULT         SmartUpdateJars(void);
+void            cbXPIStart(const char *, const char *UIName);
+void            cbXPIProgress(const char* msg, PRInt32 val, PRInt32 max);
+void            cbXPIFinal(const char *, PRInt32 finalStatus);
+void            InitProgressDlg(void);
+void            DeInitProgressDlg(void);
+void            GetTotalArchivesToInstall(void);
+
+#endif

mozilla/xpinstall/wizard/windows/setup/xpistub.h

@@ -0,0 +1,118 @@
+/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code, 
+ * released March 31, 1998. 
+ *
+ * The Initial Developer of the Original Code is Netscape Communications 
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Daniel Veditz <dveditz@netscape.com>
+ */
+
+
+//#include "nsError.h"
+//#include "prtypes.h"
+
+#ifdef XP_MAC
+#include <Files.h>
+#endif
+
+#define nsresult long
+
+PR_BEGIN_EXTERN_C
+
+/** pfnXPIStart  -- script start callback
+ *  
+ *  When an install script gets to StartInstall() this function
+ *  will be called to tell the observer the pretty-name of the
+ *  install package. You are not guaranteed this will be called
+ *  for all scripts--there might be a fatal error before it gets
+ *  to StartInstall(), either in the script itself or in the
+ *  engine trying to set up for it.
+ */
+typedef void     (*pfnXPIStart)   (const char* URL, const char* UIName);
+
+/** pfnXPIProgress  -- individual install item callback
+ *
+ *  This callback will be called twice for each installed item,
+ *  First when it is scheduled (val and max will both be 0) and
+ *  then during the finalize step.
+ */
+typedef void    (*pfnXPIProgress)(const char* msg, PRInt32 val, PRInt32 max);
+
+/** pfnXPIFinal  -- script end callback
+ *
+ *  This function will be called when the script calls either
+ *  AbortInstall() or FinalizeInstall() and will return the
+ *  last error code.
+ */
+typedef void     (*pfnXPIFinal)   (const char* URL, PRInt32 finalStatus);
+
+
+
+/** XPI_Init
+ *
+ *  call XPI_Init() to initialize XPCOM and the XPInstall
+ *  engine, and to pass in your callback functions.
+ *
+ *  @param aXPIStubDir   [MAC only] directory of the xpistub shlb off of which
+ *                       the component manager derives the components directory.
+ *  @param aProgramDir   directory to use as "program" directory. If NULL default
+ *                       will be used -- the location of the calling executable.
+ *                       Must be native filename format.
+ *  @param startCB       Called when script started
+ *  @param progressCB    Called for each installed file
+ *  @param finalCB       Called with status code at end
+ *
+ *  @returns    XPCOM status code indicating success or failure
+ */
+PR_EXTERN(nsresult) XPI_Init( 
+#ifdef XP_MAC
+                              const FSSpec&     aXPIStubDir,
+                              const FSSpec&     aProgramDir,
+#else
+                              const char*       aProgramDir,
+#endif
+                              pfnXPIProgress    progressCB );
+
+/** XPI_Install
+ *
+ *  Install an XPI package from a local file
+ *
+ *  @param file     Native filename of XPI archive
+ *  @param args     Install.arguments, if any
+ *  @param flags    the old SmartUpdate trigger flags. This may go away
+ *
+ *  @returns status  Status from the installed archive
+ */
+PR_EXTERN(PRInt32) XPI_Install( 
+#ifdef XP_MAC
+                                 const FSSpec& file,
+#else
+                                 const char*    file,
+#endif
+                                 const char* args, 
+                                 long flags         );
+
+/** XPI_Exit
+ * 
+ *  call when done to shut down the XPInstall and XPCOM engines
+ *  and free allocated memory
+ */
+PR_EXTERN(void) XPI_Exit();
+
+PR_END_EXTERN_C
+

mozilla/xpinstall/wizard/windows/setup/zipfile.h

@@ -0,0 +1,86 @@
+/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code, 
+ * released March 31, 1998. 
+ *
+ * The Initial Developer of the Original Code is Netscape Communications 
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Daniel Veditz <dveditz@netscape.com>
+ */
+
+#ifndef _zipfile_h
+#define _zipfile_h
+/* 
+ * This module implements a simple archive extractor for the PKZIP format.
+ *
+ * All functions return a status/error code, and have an opaque hZip argument 
+ * that represents an open archive.
+ *
+ * Currently only compression mode 8 (or none) is supported.
+ */
+
+
+#define ZIP_OK                 0
+#define ZIP_ERR_GENERAL       -1
+#define ZIP_ERR_MEMORY        -2
+#define ZIP_ERR_DISK          -3
+#define ZIP_ERR_CORRUPT       -4
+#define ZIP_ERR_PARAM         -5
+#define ZIP_ERR_FNF           -6
+#define ZIP_ERR_UNSUPPORTED   -7
+#define ZIP_ERR_SMALLBUF      -8
+
+PR_BEGIN_EXTERN_C
+
+/* Open and close the archive 
+ *
+ * If successful OpenArchive returns a handle in the hZip parameter
+ * that must be passed to all subsequent operations on the archive
+ */
+extern _declspec(dllexport)int ZIP_OpenArchive( const char * zipname, void** hZip );
+extern _declspec(dllexport)int ZIP_CloseArchive( void** hZip );
+
+
+/* Extract the named file in the archive to disk. 
+ * This function will happily overwrite an existing Outfile if it can.
+ * It's up to the caller to detect or move it out of the way if it's important.
+ */
+extern _declspec(dllexport)int ZIP_ExtractFile( void* hZip, const char * filename, const char * outname );
+
+
+/* Functions to list the files contained in the archive
+ *
+ * FindInit() initializes the search with the pattern and returns a find token, 
+ * or NULL on an error.  Then FindNext() is called with the token to get the 
+ * matching filenames if any. When done you must call FindFree() with the 
+ * token to release memory.
+ * 
+ * a NULL pattern will find all the files in the archive, otherwise the 
+ * pattern must be a shell regexp type pattern.
+ *
+ * if a matching filename is too small for the passed buffer FindNext()
+ * will return ZIP_ERR_SMALLBUF. When no more matches can be found in
+ * the archive it will return ZIP_ERR_FNF
+ */
+extern _declspec(dllexport)void* ZIP_FindInit( void* hZip, const char * pattern );
+extern _declspec(dllexport)int ZIP_FindNext( void* hFind, char * outbuf, int bufsize );
+extern _declspec(dllexport)int ZIP_FindFree( void* hFind );
+
+
+PR_END_EXTERN_C
+
+#endif /* _zipfile_h */

mozilla/xpinstall/wizard/windows/setuprsc/makefile.win

@@ -0,0 +1,55 @@
+#!gmake
+#
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Mozilla Communicator client code, 
+# released March 31, 1998. 
+#
+# The Initial Developer of the Original Code is Netscape Communications 
+# Corporation.  Portions created by Netscape are
+# Copyright (C) 1998 Netscape Communications Corporation. All
+# Rights Reserved.
+#
+# Contributor(s): 
+#     Sean Su <ssu@netscape.com>
+#     Daniel Veditz <dveditz@netscape.com>
+
+DEPTH=..\..\..\..
+
+MAKE_OBJ_TYPE=DLL
+
+USE_NON_MT_LIBS=1
+#USE_STATIC_LIBS=1
+
+MODULE      = setuprsc
+RESFILE     = $(MODULE).res
+DLL         = $(OBJDIR)\$(MODULE).dll
+
+OBJS=                             \
+    .\$(OBJDIR)\setuprsc.obj      \
+    $(NULL)
+
+include <$(DEPTH)/config/rules.mak>
+
+docopy:
+    $(MAKE_INSTALL) setuprsc.h $(DIST)\include
+
+export:: docopy
+
+install:: $(DLL)
+    $(MAKE_INSTALL) .\$(OBJDIR)\$(MODULE).dll $(DIST)\install
+
+clobber::
+  $(RM) $(DIST)\include\setuprsc.h
+
+clobber_all:: clobber
+  $(RM) $(DIST)\install\$(MODULE).dll
+

mozilla/xpinstall/wizard/windows/setuprsc/setuprsc.cpp

@@ -0,0 +1,29 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1999 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include <windows.h>
+
+int FAR PASCAL LibMain(HINSTANCE hInstance, WORD wDataSeg, WORD cbHeapSize, LPSTR lpCmdLine)
+{
+   return(1);
+}

mozilla/xpinstall/wizard/windows/setuprsc/setuprsc.h

@@ -0,0 +1,126 @@
+//{{NO_DEPENDENCIES}}
+// Microsoft Developer Studio generated include file.
+// Used by setuprsc.rc
+//
+//#include "winres.h"
+#include "winresrc.h"
+//#include "winuser.rh"
+
+#ifdef IDC_STATIC
+#undef IDC_STATIC
+#endif
+#define IDC_STATIC                     (-1)
+
+#define IDS_ERROR_DIALOG_CREATE         1
+#define IDS_ERROR_FAILED                2
+#define IDS_ERROR_FILE_NOT_FOUND        3
+#define IDS_ERROR_GET_SYSTEM_DIRECTORY_FAILED 4
+#define IDS_ERROR_GET_WINDOWS_DIRECTORY_FAILED 5
+#define IDS_DLGQUITTITLE                6
+#define IDS_DLGQUITMSG                  7
+#define IDS_DLG_REBOOT_TITLE            8
+#define IDS_ERROR_GETPROCADDRESS        9
+#define IDS_ERROR_WRITEPRIVATEPROFILESTRING 10
+#define IDS_MSG_RETRIEVE_CONFIGINI      11
+#define IDS_ERROR_CREATE_TEMP_DIR       12
+#define IDS_DLGBROWSETITLE              13
+#define IDS_ERROR_DETERMINING_DISK_SPACE 14
+#define IDS_DLG_DISK_SPACE_CHECK_TITLE  15
+#define IDS_DLG_DISK_SPACE_CHECK_SYS_MSG 16
+#define IDS_DLG_DISK_SPACE_CHECK_CRUTIAL_MSG 16
+#define IDS_DLG_DISK_SPACE_CHECK_MSG    17
+#define IDS_ERROR_CREATE_DIRECTORY      18
+#define IDS_STR_FILE_NUMBER             19
+#define IDS_STR_FILENAME                20
+#define IDS_MSG_SMARTUPDATE_START       21
+#define IDS_MSG_CONFIGURING             22
+#define IDS_ERROR_XPI_INSTALL           23
+#define IDS_ERROR_SETUP_REQUIREMENT     24
+#define IDS_DLG_EXTRACTING_TITLE        25
+#define IDS_STR_PROCESSINGFILE          26
+#define IDS_STR_INSTALLING              27
+#define IDS_STR_COPYINGFILE             28
+#define IDI_ICON1                       105
+#define IDI_SETUP                       105
+#define IDB_BITMAP_WELCOME              108
+#define DLG_MESSAGE                     110
+#define DLG_BROWSE_DIR                  503
+#define IDC_STATUS                      1001
+#define IDC_STATUS1                     1001
+#define IDC_GAUGE                       1002
+#define IDC_GAUGE_FILE                  1002
+#define IDC_STATUS2                     1003
+#define IDC_STATUS0                     1004
+#define IDC_STATUS3                     1005
+#define IDC_GAUGE_ARCHIVE               1006
+#define IDC_EDIT_DESTINATION            1009
+#define IDC_BUTTON_BROWSE               1010
+#define IDC_EDIT_COMPONENT1             1013
+#define IDC_EDIT_SUBCOMPONENT           1014
+#define IDC_STATIC_SUBCOMPONENT         1016
+#define IDC_CHECK1                      1017
+#define IDC_STATIC_DESCRIPTION          1018
+#define IDC_EDIT_PROGRAM_FOLDER         1019
+#define IDC_CHECK2                      1023
+#define IDC_LIST2                       1023
+#define IDC_LIST                        1023
+#define IDC_CHECK3                      1024
+#define IDC_EDIT_LICENSE                1024
+#define IDC_CHECK0                      1025
+#define IDC_EDIT_CURRENT_SETTINGS       1026
+#define IDC_LIST_COMPONENTS             1027
+#define IDC_LIST_SUBCOMPONENTS          1029
+#define IDC_STATIC_DRIVE_SPACE_REQUIRED 1030
+#define IDC_STATIC_DRIVE_SPACE_AVAILABLE 1031
+#define IDC_STATIC_DESTINATION          1032
+#define IDC_STATIC0                     1033
+#define IDC_STATIC1                     1034
+#define IDC_STATIC2                     1035
+#define IDC_MESSAGE1                    1040
+#define IDC_PICT0                       1041
+#define IDC_MESSAGE0                    1042
+#define IDC_STATIC_ST0_DESCRIPTION      1042
+#define IDC_STATIC_ST1_DESCRIPTION      1043
+#define IDC_STATIC_ST2_DESCRIPTION      1044
+#define IDC_STATIC_ST3_DESCRIPTION      1045
+#define IDC_STATIC_MSG0                 1046
+#define IDC_MESSAGE                     1049
+#define IDC_LIST1                       1053
+#define IDC_BUTTON1                     1055
+#define IDC_README                      1055
+#define DLG_WELCOME                     2001
+#define DLG_LICENSE                     2002
+#define DLG_SETUP_TYPE                  2003
+#define DLG_SELECT_COMPONENTS_SINGLE    2004
+#define DLG_SELECT_COMPONENTS           2004
+#define DLG_SELECT_COMPONENTS_MULTI     2005
+#define DLG_WINDOWS_INTEGRATION         2006
+#define DLG_PROGRAM_FOLDER              2007
+#define DLG_START_INSTALL               2008
+#define DLG_EXTRACTING                  2009
+#define DLG_RESTART                     10206
+#define IDB_BOX_CHECKED                 10304
+#define IDB_BOX_UNCHECKED               10306
+#define IDC_RADIO_TYPICAL               11007
+#define IDC_RADIO_ST0                   11007
+#define IDC_RADIO_CUSTOM                11008
+#define IDC_RADIO_ST2                   11008
+#define IDC_RADIO_COMPACT               11009
+#define IDC_RADIO_ST1                   11009
+#define IDC_RADIO_ST3                   11010
+#define IDC_RADIO_YES                   11011
+#define IDC_RADIO_NO                    11012
+#define IDWIZBACK                       11013
+#define IDWIZNEXT                       11014
+
+// Next default values for new objects
+// 
+#ifdef APSTUDIO_INVOKED
+#ifndef APSTUDIO_READONLY_SYMBOLS
+#define _APS_NO_MFC                     1
+#define _APS_NEXT_RESOURCE_VALUE        112
+#define _APS_NEXT_COMMAND_VALUE         40001
+#define _APS_NEXT_CONTROL_VALUE         1058
+#define _APS_NEXT_SYMED_VALUE           101
+#endif
+#endif

mozilla/xpinstall/wizard/windows/setuprsc/setuprsc.rc

@@ -0,0 +1,351 @@
+//Microsoft Developer Studio generated resource script.
+//
+#define WINVER 0x400
+#include "setuprsc.h"
+
+#define APSTUDIO_READONLY_SYMBOLS
+/////////////////////////////////////////////////////////////////////////////
+//
+// Generated from the TEXTINCLUDE 2 resource.
+//
+
+
+/////////////////////////////////////////////////////////////////////////////
+#undef APSTUDIO_READONLY_SYMBOLS
+
+/////////////////////////////////////////////////////////////////////////////
+// English (U.S.) resources
+
+#if !defined(AFX_RESOURCE_DLL) || defined(AFX_TARG_ENU)
+#ifdef _WIN32
+LANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US
+#pragma code_page(1252)
+#endif //_WIN32
+
+#ifdef APSTUDIO_INVOKED
+/////////////////////////////////////////////////////////////////////////////
+//
+// TEXTINCLUDE
+//
+
+1 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "setuprsc.h\0"
+END
+
+2 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "\r\n"
+    "\0"
+END
+
+3 TEXTINCLUDE DISCARDABLE 
+BEGIN
+    "\r\n"
+    "\0"
+END
+
+#endif    // APSTUDIO_INVOKED
+
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Dialog
+//
+
+DLG_WELCOME DIALOG DISCARDABLE  51, 56, 315, 205
+STYLE WS_MINIMIZEBOX | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
+FONT 8, "MS Sans Serif"
+BEGIN
+    DEFPUSHBUTTON   "&Next >",IDWIZNEXT,188,186,53,12
+    PUSHBUTTON      "&Cancel",IDCANCEL,252,186,53,12
+    LTEXT           "",IDC_STATIC0,127,11,176,37,NOT WS_GROUP
+    LTEXT           "",IDC_STATIC1,127,53,176,37,NOT WS_GROUP
+    LTEXT           "",IDC_STATIC2,127,96,176,37,NOT WS_GROUP
+    CONTROL         108,IDC_STATIC,"Static",SS_BITMAP,11,11,80,160,
+                    WS_EX_CLIENTEDGE
+    CONTROL         "",IDC_STATIC,"Static",SS_ETCHEDHORZ,11,179,295,1,
+                    WS_EX_STATICEDGE
+END
+
+DLG_SETUP_TYPE DIALOG DISCARDABLE  51, 56, 315, 205
+STYLE WS_MINIMIZEBOX | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
+FONT 8, "MS Sans Serif"
+BEGIN
+    CONTROL         "",IDC_RADIO_ST0,"Button",BS_AUTORADIOBUTTON | 
+                    WS_TABSTOP,102,31,65,8
+    CONTROL         "",IDC_RADIO_ST1,"Button",BS_AUTORADIOBUTTON,102,59,65,8
+    CONTROL         "",IDC_RADIO_ST2,"Button",BS_AUTORADIOBUTTON,102,86,64,8
+    CONTROL         "",IDC_RADIO_ST3,"Button",BS_AUTORADIOBUTTON,102,114,64,
+                    8
+    LTEXT           "",IDC_STATIC_ST0_DESCRIPTION,175,31,126,24
+    LTEXT           "",IDC_STATIC_ST3_DESCRIPTION,175,114,126,25
+    LTEXT           "",IDC_STATIC_ST1_DESCRIPTION,175,59,126,24
+    LTEXT           "",IDC_STATIC_ST2_DESCRIPTION,175,86,126,24
+    GROUPBOX        "&Destination Directory",IDC_STATIC,101,147,204,27
+    PUSHBUTTON      "B&rowse...",IDC_BUTTON_BROWSE,255,157,46,12
+    PUSHBUTTON      "< &Back",IDWIZBACK,134,186,53,12
+    DEFPUSHBUTTON   "&Next >",IDWIZNEXT,188,186,53,12
+    PUSHBUTTON      "&Cancel",IDCANCEL,252,186,53,12
+    LTEXT           "",IDC_STATIC_MSG0,101,11,204,17,NOT WS_GROUP
+    CONTROL         108,IDC_STATIC,"Static",SS_BITMAP,11,11,80,160,
+                    WS_EX_CLIENTEDGE
+    CONTROL         "",IDC_STATIC,"Static",SS_ETCHEDHORZ,11,179,295,1,
+                    WS_EX_STATICEDGE
+    PUSHBUTTON      "Readme",IDC_README,11,186,53,12
+    LTEXT           "Static",IDC_EDIT_DESTINATION,107,160,144,9
+END
+
+DLG_SELECT_COMPONENTS DIALOG DISCARDABLE  51, 56, 315, 205
+STYLE WS_MINIMIZEBOX | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
+FONT 8, "MS Sans Serif"
+BEGIN
+    PUSHBUTTON      "< &Back",IDWIZBACK,134,186,53,12
+    DEFPUSHBUTTON   "&Next >",IDWIZNEXT,188,186,53,12
+    PUSHBUTTON      "&Cancel",IDCANCEL,252,186,53,12
+    LTEXT           "Select the components you want to install, clear the components you do not want to install. ",
+                    IDC_STATIC,101,10,204,19,NOT WS_GROUP
+    LTEXT           "C&omponents",IDC_STATIC,101,32,103,8
+    GROUPBOX        "Description",IDC_STATIC,101,124,204,22
+    LTEXT           "Component Description",IDC_STATIC_DESCRIPTION,106,133,
+                    195,8
+    GROUPBOX        "&Disk space information",IDC_STATIC,101,150,204,23
+    LTEXT           "Total download size:",IDC_STATIC,106,160,91,8,NOT 
+                    WS_GROUP
+    RTEXT           "",IDC_STATIC_DRIVE_SPACE_REQUIRED,206,160,94,8,NOT 
+                    WS_GROUP
+    CONTROL         108,IDC_STATIC,"Static",SS_BITMAP,11,11,80,160,
+                    WS_EX_CLIENTEDGE
+    CONTROL         "",IDC_STATIC,"Static",SS_ETCHEDHORZ,11,179,295,1,
+                    WS_EX_STATICEDGE
+    LISTBOX         IDC_LIST_COMPONENTS,101,42,204,78,LBS_OWNERDRAWFIXED | 
+                    LBS_HASSTRINGS | LBS_USETABSTOPS | LBS_NOINTEGRALHEIGHT | 
+                    WS_VSCROLL | WS_HSCROLL | WS_GROUP | WS_TABSTOP
+    LTEXT           "Download Size",IDC_STATIC,201,32,103,8,0,WS_EX_RIGHT
+END
+
+DLG_WINDOWS_INTEGRATION DIALOG DISCARDABLE  51, 56, 315, 205
+STYLE WS_MINIMIZEBOX | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
+FONT 8, "MS Sans Serif"
+BEGIN
+    CONTROL         "Check0",IDC_CHECK0,"Button",BS_AUTOCHECKBOX | BS_TOP | 
+                    BS_MULTILINE | WS_TABSTOP,101,32,205,17
+    CONTROL         "Check1",IDC_CHECK1,"Button",BS_AUTOCHECKBOX | BS_TOP | 
+                    BS_MULTILINE | WS_TABSTOP,101,53,205,17
+    CONTROL         "Check2",IDC_CHECK2,"Button",BS_AUTOCHECKBOX | BS_TOP | 
+                    BS_MULTILINE | WS_TABSTOP,101,73,205,17
+    CONTROL         "Check3",IDC_CHECK3,"Button",BS_AUTOCHECKBOX | BS_TOP | 
+                    BS_MULTILINE | WS_TABSTOP,101,94,205,17
+    LTEXT           "",IDC_MESSAGE1,101,117,205,54,NOT WS_GROUP
+    PUSHBUTTON      "< &Back",IDWIZBACK,134,186,53,12
+    DEFPUSHBUTTON   "&Next >",IDWIZNEXT,188,186,53,12
+    PUSHBUTTON      "&Cancel",IDCANCEL,252,186,53,12
+    LTEXT           "",IDC_MESSAGE0,101,11,204,17,NOT WS_GROUP
+    CONTROL         108,IDC_PICT0,"Static",SS_BITMAP,11,11,80,160,
+                    WS_EX_CLIENTEDGE
+    CONTROL         "",IDC_STATIC0,"Static",SS_ETCHEDHORZ,11,179,295,1,
+                    WS_EX_STATICEDGE
+END
+
+DLG_PROGRAM_FOLDER DIALOG DISCARDABLE  51, 56, 315, 205
+STYLE WS_MINIMIZEBOX | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
+FONT 8, "MS Sans Serif"
+BEGIN
+    EDITTEXT        IDC_EDIT_PROGRAM_FOLDER,101,64,204,12,ES_AUTOHSCROLL
+    LISTBOX         IDC_LIST,101,94,204,77,LBS_SORT | LBS_NOINTEGRALHEIGHT | 
+                    WS_VSCROLL | WS_HSCROLL | WS_TABSTOP
+    PUSHBUTTON      "< &Back",IDWIZBACK,134,186,53,12
+    DEFPUSHBUTTON   "&Next >",IDWIZNEXT,188,186,53,12
+    PUSHBUTTON      "&Cancel",IDCANCEL,252,186,53,12
+    LTEXT           "Click the type of Setup you prefer, then click Next.",
+                    IDC_MESSAGE0,101,11,204,33,NOT WS_GROUP
+    LTEXT           "&Program Folder:",IDC_STATIC,101,54,105,8
+    LTEXT           "E&xisting Folders:",IDC_STATIC,101,84,163,8
+    CONTROL         108,IDC_STATIC,"Static",SS_BITMAP,11,11,83,162,
+                    WS_EX_CLIENTEDGE
+    CONTROL         "",IDC_STATIC,"Static",SS_ETCHEDHORZ,11,179,295,1,
+                    WS_EX_STATICEDGE
+END
+
+DLG_LICENSE DIALOG DISCARDABLE  51, 56, 315, 205
+STYLE WS_MINIMIZEBOX | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
+FONT 8, "MS Sans Serif"
+BEGIN
+    DEFPUSHBUTTON   "&Accept",IDWIZNEXT,188,186,53,12
+    PUSHBUTTON      "&No",IDCANCEL,252,186,53,12
+    EDITTEXT        IDC_EDIT_LICENSE,11,29,295,119,ES_MULTILINE | 
+                    ES_OEMCONVERT | ES_READONLY | WS_VSCROLL | WS_GROUP
+    PUSHBUTTON      "< &Back",IDWIZBACK,134,186,53,12
+    LTEXT           "",IDC_MESSAGE0,11,8,295,17,NOT WS_GROUP
+    LTEXT           "",IDC_MESSAGE1,11,152,295,19,NOT WS_GROUP
+    CONTROL         "",-1,"Static",SS_ETCHEDHORZ,11,179,295,1,
+                    WS_EX_STATICEDGE
+END
+
+DLG_START_INSTALL DIALOG DISCARDABLE  51, 56, 315, 205
+STYLE WS_MINIMIZEBOX | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
+FONT 8, "MS Sans Serif"
+BEGIN
+    EDITTEXT        IDC_EDIT_CURRENT_SETTINGS,101,67,204,104,ES_MULTILINE | 
+                    ES_AUTOVSCROLL | ES_AUTOHSCROLL | ES_READONLY
+    PUSHBUTTON      "< &Back",IDWIZBACK,134,186,53,12
+    DEFPUSHBUTTON   "&Install",IDWIZNEXT,188,186,53,12
+    PUSHBUTTON      "&Cancel",IDCANCEL,252,186,53,12
+    LTEXT           "Click the type of Setup you prefer, then click Next.",
+                    IDC_MESSAGE0,101,11,204,33,NOT WS_GROUP
+    LTEXT           "Current Settings:",IDC_STATIC,101,57,163,8,NOT WS_GROUP
+    CONTROL         108,IDC_STATIC,"Static",SS_BITMAP,11,11,80,160,
+                    WS_EX_CLIENTEDGE
+    CONTROL         "",IDC_STATIC,"Static",SS_ETCHEDHORZ,11,179,295,1,
+                    WS_EX_STATICEDGE
+END
+
+DLG_BROWSE_DIR DIALOG DISCARDABLE  147, 23, 190, 143
+STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
+CAPTION "Select a directory"
+FONT 8, "MS Shell Dlg"
+BEGIN
+    EDITTEXT        IDC_EDIT_DESTINATION,8,16,177,12,ES_AUTOHSCROLL | 
+                    ES_OEMCONVERT | NOT WS_BORDER,WS_EX_CLIENTEDGE
+    LISTBOX         1121,8,37,120,68,LBS_SORT | LBS_NOREDRAW | 
+                    LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | 
+                    LBS_DISABLENOSCROLL | WS_VSCROLL | WS_HSCROLL | 
+                    WS_TABSTOP
+    COMBOBOX        1137,8,118,121,68,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | 
+                    CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | 
+                    WS_VSCROLL | WS_TABSTOP
+    DEFPUSHBUTTON   "OK",1,135,43,50,14,WS_GROUP
+    PUSHBUTTON      "Cancel",IDCANCEL,135,63,50,14,WS_GROUP
+    LTEXT           "&Directories:",-1,8,6,92,9
+    LTEXT           "Dri&ves:",1091,8,108,92,9
+END
+
+DLG_RESTART DIALOG FIXED IMPURE  133, 69, 226, 110
+STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION
+FONT 8, "MS Sans Serif"
+BEGIN
+    LTEXT           "Setup has finished copying files to your computer.  Before you can use the program, you must restart Windows or your computer.\n\n Choose one of the following options and click OK to finish setup.",
+                    202,10,10,209,36,SS_NOPREFIX
+    CONTROL         "Yes, I want to restart my computer now.",IDC_RADIO_YES,
+                    "Button",BS_AUTORADIOBUTTON,26,52,191,12
+    CONTROL         "No, I will restart my computer later.",IDC_RADIO_NO,
+                    "Button",BS_AUTORADIOBUTTON,26,68,191,12
+    DEFPUSHBUTTON   "OK",IDOK,169,88,50,14,WS_GROUP
+END
+
+DLG_MESSAGE DIALOG DISCARDABLE  0, 0, 236, 34
+STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE
+FONT 8, "MS Sans Serif"
+BEGIN
+    CTEXT           "",IDC_MESSAGE,0,0,236,34,SS_CENTERIMAGE
+END
+
+DLG_EXTRACTING DIALOG DISCARDABLE  0, 0, 193, 73
+STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION
+FONT 8, "MS Sans Serif"
+BEGIN
+    CONTROL         "",IDC_GAUGE_FILE,"GaugeFile",0x0,9,52,175,11
+    LTEXT           "",IDC_STATUS0,9,9,175,8
+    LTEXT           "",IDC_STATUS3,9,40,175,8
+    CONTROL         "",IDC_GAUGE_ARCHIVE,"GaugeArchive",0x0,9,21,175,11
+END
+
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Icon
+//
+
+// Icon with lowest ID value placed first to ensure application icon
+// remains consistent on all systems.
+IDI_SETUP               ICON    DISCARDABLE     "setup.ico"
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// Bitmap
+//
+
+IDB_BOX_UNCHECKED       BITMAP  FIXED IMPURE    "box_unch.bmp"
+IDB_BOX_CHECKED         BITMAP  FIXED IMPURE    "box_chec.bmp"
+IDB_BITMAP_WELCOME      BITMAP  DISCARDABLE     "bitmap1.bmp"
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// DESIGNINFO
+//
+
+#ifdef APSTUDIO_INVOKED
+GUIDELINES DESIGNINFO DISCARDABLE 
+BEGIN
+    DLG_EXTRACTING, DIALOG
+    BEGIN
+        BOTTOMMARGIN, 72
+    END
+END
+#endif    // APSTUDIO_INVOKED
+
+
+/////////////////////////////////////////////////////////////////////////////
+//
+// String Table
+//
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    IDS_ERROR_DIALOG_CREATE "Could not create %s dialog."
+    IDS_ERROR_FAILED        "%s failed."
+    IDS_ERROR_FILE_NOT_FOUND "File not found: %s"
+    IDS_ERROR_GET_SYSTEM_DIRECTORY_FAILED "GetSystemDirectory() failed."
+    IDS_ERROR_GET_WINDOWS_DIRECTORY_FAILED "GetWindowsDirectory() failed."
+    IDS_DLGQUITTITLE        "Question"
+    IDS_DLGQUITMSG          "Are you sure you want to cancel Setup?"
+    IDS_DLG_REBOOT_TITLE    "Restarting Windows"
+    IDS_ERROR_GETPROCADDRESS "GetProcAddress() of %s failed."
+    IDS_ERROR_WRITEPRIVATEPROFILESTRING 
+                            "WritePrivateProfileString() failed for file %s"
+    IDS_MSG_RETRIEVE_CONFIGINI 
+                            "Please wait while Setup is attempting to retrieve Config.ini, required by Setup, from the Web..."
+    IDS_ERROR_CREATE_TEMP_DIR 
+                            "Setup was unable to create the TEMP directory: %s"
+    IDS_DLGBROWSETITLE      "Select a directory"
+    IDS_ERROR_DETERMINING_DISK_SPACE 
+                            "Could not determine available disk space for: %s"
+    IDS_DLG_DISK_SPACE_CHECK_TITLE "Disk space check"
+END
+
+STRINGTABLE DISCARDABLE 
+BEGIN
+    IDS_DLG_DISK_SPACE_CHECK_CRUTIAL_MSG 
+                            "Setup has detected insufficient disk space to continue with installation on %s for the path: %sRequired: %sAvailable: %sClick Retry if more disk space has been made available, or click Cancel to cancel Setup."
+    IDS_DLG_DISK_SPACE_CHECK_MSG 
+                            "Setup has detected insufficient disk space to continue with installation process on %s for the path: %sRequired: %sAvailable: %sClick OK to go back and choose a different destination path, or click Cancel to cancel Setup."
+    IDS_ERROR_CREATE_DIRECTORY 
+                            "Could not create folder: %sMake sure you have access to create the folder."
+    IDS_STR_FILE_NUMBER     "File count:"
+    IDS_STR_FILENAME        "Filename:"
+    IDS_MSG_SMARTUPDATE_START "Preparing Install, please wait..."
+    IDS_MSG_CONFIGURING     "Configuring %s, please wait..."
+    IDS_ERROR_XPI_INSTALL   "Error ocurred during installation"
+    IDS_ERROR_SETUP_REQUIREMENT 
+                            "Windows95 or greater Operating System is required!  Exiting setup..."
+    IDS_DLG_EXTRACTING_TITLE "Install Progress"
+    IDS_STR_PROCESSINGFILE  "Preparing file: %s"
+    IDS_STR_INSTALLING      "Currently installing %s"
+    IDS_STR_COPYINGFILE     "Copying file: %s"
+END
+
+#endif    // English (U.S.) resources
+/////////////////////////////////////////////////////////////////////////////
+
+
+
+#ifndef APSTUDIO_INVOKED
+/////////////////////////////////////////////////////////////////////////////
+//
+// Generated from the TEXTINCLUDE 3 resource.
+//
+
+
+/////////////////////////////////////////////////////////////////////////////
+#endif    // not APSTUDIO_INVOKED
+

mozilla/xpinstall/wizard/windows/test/makefile.win

@@ -0,0 +1,68 @@
+#
+# The contents of this file are subject to the Netscape Public
+# License Version 1.1 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.mozilla.org/NPL/
+#
+# Software distributed under the License is distributed on an "AS
+# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Mozilla Communicator client code, 
+# released March 31, 1998. 
+#
+# The Initial Developer of the Original Code is Netscape Communications 
+# Corporation.  Portions created by Netscape are
+# Copyright (C) 1999 Netscape Communications Corporation. All
+# Rights Reserved.
+#
+# Contributor(s): 
+
+DEPTH=..\..\..\..
+
+MAKE_OBJ_TYPE   = EXE
+USE_NON_MT_LIBS = 1
+
+MODULE          = TestXPI
+PROGRAM         = .\$(OBJDIR)\$(MODULE).exe
+
+OBJS =                          \
+    .\$(OBJDIR)\testxpi.obj     \
+    .\$(OBJDIR)\xpi.obj         \
+    $(NULL)
+
+LLFLAGS=                        \
+    /machine:i386               \
+    $(NULL)
+
+include <$(DEPTH)\config\rules.mak>
+
+install:: $(PROGRAM)
+    $(MAKE_INSTALL) $(PROGRAM) $(DIST)\bin
+
+    if not exist test1\nul mkdir test1
+    copy test1.txt test1
+    copy test1.js test1\install.js
+    cd test1
+    zip test1.xpi *.*
+    cd ..
+    copy test1\test1.xpi $(DIST)\bin
+
+    if not exist test2\nul mkdir test2
+    copy test2.txt test2
+    copy test2.js test2\install.js
+    cd test2
+    zip test2.xpi *.*
+    cd ..
+    copy test2\test2.xpi $(DIST)\bin
+
+
+clobber_all::
+    $(RM) $(DIST)\bin\$(MODULE).exe
+    $(RM) $(DIST)\bin\test1.xpi
+    $(RM) $(DIST)\bin\test2.xpi
+    $(RM) -rf $(DIST)\bin\testxpi
+    $(RM) -rf test1
+    $(RM) -rf test2
+

mozilla/xpinstall/wizard/windows/test/test1.js

@@ -0,0 +1,36 @@
+////////////////////////////////////////////////////////////////////////////////////////
+// test1.js
+// 
+// Acceptance test 1
+// 	 Adds a component to the testxpi directory
+//
+//   XPInstall test
+//   Feb 8, 2000
+//
+////////////////////////////////////////////////////////////////////////////////////////
+
+var regName = "testxpi test 1";
+var vi      = "1.0.1.9"
+var jarSrc  = "test1.txt";
+var err;
+
+err = startInstall("Acceptance: test1", "install test file 1", vi, 0);
+logComment("startInstall() returned: " + err);
+
+f   = getFolder("Program", "testxpi");
+logComment("getFolder() returned: " + f);
+
+err = addFile(regName, vi, jarSrc, f, jarSrc, true);
+logComment("addFile() returned: " + err);
+
+
+err = getLastError();
+if(0 == err)
+{
+	err = finalizeInstall();
+  logComment("finalizeInstall() returned: " + err);
+}
+else
+{
+	abortInstall(err);
+}

mozilla/xpinstall/wizard/windows/test/test1.txt

@@ -0,0 +1 @@
+Simple text file

mozilla/xpinstall/wizard/windows/test/test2.js

@@ -0,0 +1,35 @@
+////////////////////////////////////////////////////////////////////////////////////////
+// test2.js
+// 
+// Acceptance test 2
+// 	 Adds a component to the testxpi directory
+//
+//   XPInstall test
+//   Feb 8, 2000
+//
+////////////////////////////////////////////////////////////////////////////////////////
+
+var regName = "testxpi test 2";
+var vi      = "2.0.1.9"
+var jarSrc  = "test2.txt";
+var err;
+
+err = startInstall("Acceptance: test2", "install test file 2", vi, 0);
+logComment("startInstall() returned: " + err);
+
+f   = getFolder("Program", "testxpi");
+logComment("getFolder() returned: " + f);
+
+err = addFile(regName, vi, jarSrc, f, jarSrc, true);
+logComment("addFile() returned: " + err);
+
+err == getLastError();
+if(0 == err)
+{
+	err = finalizeInstall();
+  logComment("finalizeInstall() returned: " + err);
+}
+else
+{
+	abortInstall(err);
+}

mozilla/xpinstall/wizard/windows/test/test2.txt

@@ -0,0 +1 @@
+Simple text file

mozilla/xpinstall/wizard/windows/test/testxpi.c

@@ -0,0 +1,391 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include "testxpi.h"
+
+//#define SSU_DEBUG
+
+HANDLE hXPIStubInst;
+
+/* Function to show the usage for this application */
+void ShowUsage(char *name)
+{
+    char szBuf[MAX_BUF];
+
+    wsprintf(szBuf, "Usage: %s <output sea name> <files [file1] [file2]...>\n", name);
+    lstrcat(szBuf, "\n");
+    lstrcat(szBuf, "    output sea name: name to use for the self-extracting executable\n");
+    lstrcat(szBuf, "    files: one or more files to add to the self-extracing executable\n");
+}
+
+/* Function to print error message with/without error code */
+void PrintError(LPSTR szMsg, DWORD dwErrorCodeSH, int iExitCode)
+{
+  DWORD dwErr;
+  char  szErrorString[MAX_BUF];
+
+  if(dwErrorCodeSH == ERROR_CODE_SHOW)
+  {
+    dwErr = GetLastError();
+    wsprintf(szErrorString, "%d : %s", dwErr, szMsg);
+  }
+  else
+    wsprintf(szErrorString, "%s", szMsg);
+
+  printf("%s\n", szErrorString);
+  printf("exit code: %d\n", iExitCode);
+  if(iExitCode == 0)
+    printf("\n** Success! **\n");
+
+  DeInitializeXPIStub();
+  exit(iExitCode);
+}
+
+/* Function to remove quotes from a string */
+void RemoveQuotes(LPSTR lpszSrc, LPSTR lpszDest, int iDestSize)
+{
+  char *lpszBegin;
+
+  if(lstrlen(lpszSrc) > iDestSize)
+    return;
+
+  if(*lpszSrc == '\"')
+    lpszBegin = &lpszSrc[1];
+  else
+    lpszBegin = lpszSrc;
+
+  lstrcpy(lpszDest, lpszBegin);
+
+  if(lpszDest[lstrlen(lpszDest) - 1] == '\"')
+    lpszDest[lstrlen(lpszDest) - 1] = '\0';
+}
+
+/* Function to remove the last backslash from a path string */
+void RemoveBackSlash(LPSTR szInput)
+{
+  int   iCounter;
+  DWORD dwInputLen;
+
+  if(szInput != NULL)
+  {
+    dwInputLen = lstrlen(szInput);
+
+    for(iCounter = dwInputLen -1; iCounter >= 0 ; iCounter--)
+    {
+      if(szInput[iCounter] == '\\')
+        szInput[iCounter] = '\0';
+      else
+        break;
+    }
+  }
+}
+
+/* Function to append a backslash to a path string */
+void AppendBackSlash(LPSTR szInput, DWORD dwInputSize)
+{
+  if(szInput != NULL)
+  {
+    if(szInput[strlen(szInput) - 1] != '\\')
+    {
+      if(((DWORD)lstrlen(szInput) + 1) < dwInputSize)
+      {
+        lstrcat(szInput, "\\");
+      }
+    }
+  }
+}
+
+/* Function to parse a path string for one of three parts of a path:
+ *   Filename only
+ *   Path only
+ *   drive only */
+void ParsePath(LPSTR szInput, LPSTR szOutput, DWORD dwOutputSize, DWORD dwType)
+{
+  int   iCounter;
+  DWORD dwCounter;
+  DWORD dwInputLen;
+  BOOL  bFound;
+
+  if((szInput != NULL) && (szOutput != NULL))
+  {
+    bFound        = FALSE;
+    dwInputLen    = lstrlen(szInput);
+    ZeroMemory(szOutput, dwOutputSize);
+
+    if(dwInputLen < dwOutputSize)
+    {
+      switch(dwType)
+      {
+        case PP_FILENAME_ONLY:
+          for(iCounter = dwInputLen - 1; iCounter >= 0; iCounter--)
+          {
+            if(szInput[iCounter] == '\\')
+            {
+              lstrcpy(szOutput, &szInput[iCounter + 1]);
+              bFound = TRUE;
+              break;
+            }
+          }
+          if(bFound == FALSE)
+            lstrcpy(szOutput, szInput);
+
+          break;
+
+        case PP_PATH_ONLY:
+          for(iCounter = dwInputLen - 1; iCounter >= 0; iCounter--)
+          {
+            if(szInput[iCounter] == '\\')
+            {
+              lstrcpy(szOutput, szInput);
+              szOutput[iCounter + 1] = '\0';
+              bFound = TRUE;
+              break;
+            }
+          }
+          if(bFound == FALSE)
+            lstrcpy(szOutput, szInput);
+
+          break;
+
+        case PP_ROOT_ONLY:
+          if(szInput[1] == ':')
+          {
+            szOutput[0] = szInput[0];
+            szOutput[1] = szInput[1];
+            AppendBackSlash(szOutput, dwOutputSize);
+          }
+          else if(szInput[1] == '\\')
+          {
+            int iFoundBackSlash = 0;
+            for(dwCounter = 0; dwCounter < dwInputLen; dwCounter++)
+            {
+              if(szInput[dwCounter] == '\\')
+              {
+                szOutput[dwCounter] = szInput[dwCounter];
+                ++iFoundBackSlash;
+              }
+
+              if(iFoundBackSlash == 3)
+                break;
+            }
+
+            if(iFoundBackSlash != 0)
+              AppendBackSlash(szOutput, dwOutputSize);
+          }
+          break;
+      }
+    }
+  }
+}
+
+/* Function to check to see if a file exists.
+ * If it does, return it's attributes */
+long FileExists(LPSTR szFile)
+{
+  DWORD rv;
+
+  if((rv = GetFileAttributes(szFile)) == -1)
+  {
+    return(FALSE);
+  }
+  else
+  {
+    return(rv);
+  }
+}
+
+/* Function to locate the first non space character in a string,
+ * and return a pointer to it. */
+LPSTR GetFirstNonSpace(LPSTR lpszString)
+{
+  int   i;
+  int   iStrLength;
+
+  iStrLength = lstrlen(lpszString);
+
+  for(i = 0; i < iStrLength; i++)
+  {
+    if(!isspace(lpszString[i]))
+      return(&lpszString[i]);
+  }
+
+  return(NULL);
+}
+
+/* Function to return the argument count given a command line input
+ * format string */
+int GetArgC(LPSTR lpszCommandLine)
+{
+  int   i;
+  int   iArgCount;
+  int   iStrLength;
+  LPSTR lpszBeginStr;
+  BOOL  bFoundQuote;
+  BOOL  bFoundSpace;
+
+  iArgCount    = 0;
+  lpszBeginStr = GetFirstNonSpace(lpszCommandLine);
+
+  if(lpszBeginStr == NULL)
+    return(iArgCount);
+
+  iStrLength   = lstrlen(lpszBeginStr);
+  bFoundQuote  = FALSE;
+  bFoundSpace  = TRUE;
+
+  for(i = 0; i < iStrLength; i++)
+  {
+    if(lpszCommandLine[i] == '\"')
+    {
+      if(bFoundQuote == FALSE)
+      {
+        ++iArgCount;
+        bFoundQuote = TRUE;
+      }
+      else
+      {
+        bFoundQuote = FALSE;
+      }
+    }
+    else if(bFoundQuote == FALSE)
+    {
+      if(!isspace(lpszCommandLine[i]) && (bFoundSpace == TRUE))
+      {
+        ++iArgCount;
+        bFoundSpace = FALSE;
+      }
+      else if(isspace(lpszCommandLine[i]))
+      {
+        bFoundSpace = TRUE;
+      }
+    }
+  }
+
+  return(iArgCount);
+}
+
+/* Function to return a specific argument parameter from a given command line input
+ * format string. */
+LPSTR GetArgV(LPSTR lpszCommandLine, int iIndex, LPSTR lpszDest, int iDestSize)
+{
+  int   i;
+  int   j;
+  int   iArgCount;
+  int   iStrLength;
+  LPSTR lpszBeginStr;
+  LPSTR lpszDestTemp;
+  BOOL  bFoundQuote;
+  BOOL  bFoundSpace;
+
+  iArgCount    = 0;
+  lpszBeginStr = GetFirstNonSpace(lpszCommandLine);
+
+  if(lpszBeginStr == NULL)
+    return(NULL);
+
+  lpszDestTemp = (char *)calloc(iDestSize, sizeof(char));
+  if(lpszDestTemp == NULL)
+    PrintError("Out of memory", ERROR_CODE_HIDE, 1);
+
+  ZeroMemory(lpszDest, iDestSize);
+  iStrLength    = lstrlen(lpszBeginStr);
+  bFoundQuote   = FALSE;
+  bFoundSpace   = TRUE;
+  j             = 0;
+
+  for(i = 0; i < iStrLength; i++)
+  {
+    if(lpszCommandLine[i] == '\"')
+    {
+      if(bFoundQuote == FALSE)
+      {
+        ++iArgCount;
+        bFoundQuote = TRUE;
+      }
+      else
+      {
+        bFoundQuote = FALSE;
+      }
+    }
+    else if(bFoundQuote == FALSE)
+    {
+      if(!isspace(lpszCommandLine[i]) && (bFoundSpace == TRUE))
+      {
+        ++iArgCount;
+        bFoundSpace = FALSE;
+      }
+      else if(isspace(lpszCommandLine[i]))
+      {
+        bFoundSpace = TRUE;
+      }
+    }
+
+    if((iIndex == (iArgCount - 1)) &&
+      ((bFoundQuote == TRUE) || (bFoundSpace == FALSE) ||
+      ((bFoundQuote == FALSE) && (lpszCommandLine[i] == '\"'))))
+    {
+      if(j < iDestSize)
+      {
+        lpszDestTemp[j] = lpszCommandLine[i];
+        ++j;
+      }
+      else
+      {
+        lpszDestTemp[j] = '\0';
+      }
+    }
+  }
+
+  RemoveQuotes(lpszDestTemp, lpszDest, iDestSize);
+  free(lpszDestTemp);
+  return(lpszDest);
+}
+
+int main(void)
+{
+  HRESULT           hrResult;
+  char              szBuf[MAX_BUF];
+  char              szAppName[MAX_BUF];
+  char              szAppPath[MAX_BUF];
+  char              *listArchive[] = {"test1.xpi",
+                                      "test2.xpi",
+                                      "\0"};
+
+  if(GetModuleFileName(NULL, szBuf, sizeof(szBuf)) == 0L)
+    PrintError("GetModuleFileName() failed", ERROR_CODE_SHOW, 1);
+
+  ParsePath(szBuf, szAppPath, sizeof(szAppPath), PP_PATH_ONLY);
+  ParsePath(szBuf, szAppName, sizeof(szAppName), PP_FILENAME_ONLY);
+
+  hrResult = SmartUpdateJars(szAppName, szAppPath, listArchive);
+
+  if(hrResult == 999)
+    wsprintf(szBuf, "%s done\nReboot required\n", szAppName);
+  else
+    wsprintf(szBuf, "%s done\n", szAppName);
+
+  PrintError(szBuf, ERROR_CODE_SHOW, hrResult);
+  return(0);
+}
+

mozilla/xpinstall/wizard/windows/test/testxpi.h

@@ -0,0 +1,71 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#ifndef _TESTXPI_H_
+#define _TESTXPI_H_
+
+#ifdef __cplusplus
+#define PR_BEGIN_EXTERN_C       extern "C" {
+#define PR_END_EXTERN_C         }
+#else
+#define PR_BEGIN_EXTERN_C
+#define PR_END_EXTERN_C
+#endif
+
+typedef unsigned  int PRUint32;
+typedef           int PRInt32;
+
+#define PR_EXTERN(type) type
+
+#include "windows.h"
+#include "xpi.h"
+#include "..\\setup\\xpistub.h"
+#include <stdio.h>
+#include <io.h>
+#include <stdlib.h>
+#include <ctype.h>
+
+#define MAX_BUF                         4096
+
+#define ERROR_CODE_HIDE                 0
+#define ERROR_CODE_SHOW                 1
+
+/* PP: Parse Path */
+#define PP_FILENAME_ONLY                1
+#define PP_PATH_ONLY                    2
+#define PP_ROOT_ONLY                    3
+
+#define TEST_OK                         0
+
+void            PrintError(LPSTR szMsg, DWORD dwErrorCodeSH, int iExitCode);
+void            RemoveQuotes(LPSTR lpszSrc, LPSTR lpszDest, int dwDestSize);
+void            RemoveBackSlash(LPSTR szInput);
+void            AppendBackSlash(LPSTR szInput, DWORD dwInputSize);
+void            ParsePath(LPSTR szInput, LPSTR szOutput, DWORD dwOutputSize, DWORD dwType);
+long            FileExists(LPSTR szFile);
+int             GetArgC(LPSTR lpszCommandLine);
+LPSTR           GetArgV(LPSTR lpszCommandLine, int iIndex, LPSTR lpszDest, int iDestSize);
+
+#endif
+

mozilla/xpinstall/wizard/windows/test/xpi.c

@@ -0,0 +1,182 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#include "testxpi.h"
+
+typedef HRESULT (_cdecl *XpiInit)(const char *, pfnXPIProgress);
+typedef HRESULT (_cdecl *XpiInstall)(const char *, const char *, long);
+typedef void    (_cdecl *XpiExit)(void);
+
+static XpiInit          pfnXpiInit;
+static XpiInstall       pfnXpiInstall;
+static XpiExit          pfnXpiExit;
+
+extern HANDLE           hXPIStubInst;
+
+HRESULT InitializeXPIStub()
+{
+  char szBuf[MAX_BUF];
+  char szXPIStubFile[MAX_BUF];
+
+  hXPIStubInst = NULL;
+
+  /* get full path to xpistub.dll */
+  if(GetFullPathName("xpistub.dll", sizeof(szXPIStubFile), szXPIStubFile, NULL) == FALSE)
+    PrintError("File not found: xpistub.dll", ERROR_CODE_SHOW, 2);
+
+  /* load xpistub.dll */
+  if((hXPIStubInst = LoadLibraryEx(szXPIStubFile, NULL, LOAD_WITH_ALTERED_SEARCH_PATH)) == NULL)
+  {
+    wsprintf(szBuf, "Error loading library: %s\n", szXPIStubFile);
+    PrintError(szBuf, ERROR_CODE_SHOW, 1);
+  }
+  if(((FARPROC)pfnXpiInit = GetProcAddress(hXPIStubInst, "XPI_Init")) == NULL)
+  {
+    wsprintf(szBuf, "GetProcAddress() failed: XPI_Init\n");
+    PrintError(szBuf, ERROR_CODE_SHOW, 1);
+  }
+  if(((FARPROC)pfnXpiInstall = GetProcAddress(hXPIStubInst, "XPI_Install")) == NULL)
+  {
+    wsprintf(szBuf, "GetProcAddress() failed: XPI_Install\n");
+    PrintError(szBuf, ERROR_CODE_SHOW, 1);
+  }
+  if(((FARPROC)pfnXpiExit = GetProcAddress(hXPIStubInst, "XPI_Exit")) == NULL)
+  {
+    wsprintf(szBuf, "GetProcAddress() failed: XPI_Exit\n");
+    PrintError(szBuf, ERROR_CODE_SHOW, 1);
+  }
+
+  return(0);
+}
+
+HRESULT DeInitializeXPIStub()
+{
+  pfnXpiInit    = NULL;
+  pfnXpiInstall = NULL;
+  pfnXpiExit    = NULL;
+
+  if(hXPIStubInst)
+    FreeLibrary(hXPIStubInst);
+
+  return(0);
+}
+
+int GetTotalArchivesToInstall(LPSTR listArchive[])
+{
+  int i = 0;
+
+  while(TRUE)
+  {
+    if(*listArchive[i] != '\0')
+      ++i;
+    else
+      return(i);
+  }
+}
+
+HRESULT SmartUpdateJars(LPSTR szAppName, LPSTR szAppPath, LPSTR listArchive[])
+{
+  int       i;
+  int       iTotalArchives;
+  char      szBuf[MAX_BUF];
+  HRESULT   hrResult;
+
+  hXPIStubInst = NULL;
+
+  if((hrResult = InitializeXPIStub()) == TEST_OK)
+  {
+    RemoveBackSlash(szAppPath);
+    hrResult = pfnXpiInit(szAppPath, cbXPIProgress);
+    if(hrResult != 0)
+    {
+      wsprintf(szBuf, "XpiInit() failed: %d", hrResult);
+      PrintError(szBuf, ERROR_CODE_HIDE, hrResult);
+    }
+
+    iTotalArchives = GetTotalArchivesToInstall(listArchive);
+    for(i = 0; i < iTotalArchives; i++)
+    {
+      if(FileExists(listArchive[i]) == FALSE)
+      {
+        printf("File not found: %s\n", listArchive[i]);
+
+        /* continue with next file */
+        continue;
+      }
+
+      hrResult = pfnXpiInstall(listArchive[i], "", 0xFFFF);
+      if((hrResult != TEST_OK) && (hrResult != 999))
+      {
+        wsprintf(szBuf, "XpiInstall() failed: %d", hrResult);
+        PrintError(szBuf, ERROR_CODE_HIDE, hrResult);
+
+        /* break out of the for loop */
+        break;
+      }
+      printf("\n");
+    }
+
+    pfnXpiExit();
+  }
+  else
+  {
+    wsprintf(szBuf, "InitializeXPIStub() failed: %d", hrResult);
+    PrintError(szBuf, ERROR_CODE_HIDE, hrResult);
+  }
+
+  DeInitializeXPIStub();
+  return(hrResult);
+}
+
+void cbXPIStart(const char *URL, const char *UIName)
+{
+}
+
+void cbXPIProgress(const char* msg, PRInt32 val, PRInt32 max)
+{
+  char szFilename[MAX_BUF];
+
+  ParsePath((char *)msg, szFilename, sizeof(szFilename), PP_FILENAME_ONLY);
+  if(max == 0)
+    printf("Processing: %s\n", szFilename);
+  else
+    printf("Installing: %d/%d %s\n", val, max, szFilename);
+
+  ProcessWindowsMessages();
+}
+
+void cbXPIFinal(const char *URL, PRInt32 finalStatus)
+{
+}
+
+void ProcessWindowsMessages()
+{
+  MSG msg;
+
+  while(PeekMessage(&msg, 0, 0, 0, PM_REMOVE))
+  {
+    TranslateMessage(&msg);
+    DispatchMessage(&msg);
+  }
+}

mozilla/xpinstall/wizard/windows/test/xpi.h

@@ -0,0 +1,40 @@
+/* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/*
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is Mozilla Communicator client code,
+ * released March 31, 1998.
+ *
+ * The Initial Developer of the Original Code is Netscape Communications
+ * Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *     Sean Su <ssu@netscape.com>
+ */
+
+#ifndef _XPI_H_
+#define _XPI_H_
+
+HRESULT         InitializeXPIStub(void);
+HRESULT         DeInitializeXPIStub(void);
+HRESULT         SmartUpdateJars(LPSTR szAppName, LPSTR szAppPath, LPSTR listArchive[]);
+void            cbXPIStart(const char *, const char *UIName);
+void            cbXPIProgress(const char* msg, PRInt32 val, PRInt32 max);
+void            cbXPIFinal(const char *, PRInt32 finalStatus);
+void            InitProgressDlg(void);
+void            DeInitProgressDlg(void);
+int             GetTotalArchivesToInstall(LPSTR listArchive[]);
+void            ProcessWindowsMessages();
+
+#endif /* _XPI_H_ */
+