rubyinstaller-build 0.1.0

data/packages/ri-msys/Rakefile

@@ -0,0 +1,72 @@
+$: << File.expand_path("../../../lib", __FILE__)
+
+require "ruby_installer/build"
+
+include RubyInstaller::Build::Utils
+RubyInstaller::Build.enable_msys_apps
+
+class RubyPackage < RubyInstaller::Build::Openstruct
+  def initialize(*args)
+    super
+
+    self.rubyver, self.pkgrel = packagever.split("-", 2)
+    self.packagename = "rubyinstaller-devkit"
+    self.rubyver2 = packagever=='head' ? "2.8" : rubyver[/^\d+\.\d+/]
+
+    self.install_gems = %w[]
+
+    case arch
+    when 'x64'
+      self.pacman_arch = "mingw-w64-x86_64"
+      self.ruby_arch = "x64-mingw32"
+      self.msys_arch = "x86_64"
+      self.msysdir = "msys64"
+      self.mingwdir = "mingw64"
+      self.default_instdir = "C:\\Ruby#{rubyver2.gsub(".","")}-x64"
+    when 'x86'
+      self.pacman_arch = "mingw-w64-i686"
+      self.ruby_arch = "i386-mingw32"
+      self.msys_arch = "i686"
+      self.msysdir = "msys32"
+      self.mingwdir = "mingw32"
+      self.default_instdir = "C:\\Ruby#{rubyver2.gsub(".","")}"
+    else
+      raise "invalid arch #{arch}"
+    end
+
+    self.packagenameverarch = "#{packagename}-#{ packagever=='head' ? 'head' : packagever }-#{arch}"
+    self.pacman_ruby = "#{pacman_arch}-ruby#{ packagever=='head' ? '-head' : "#{rubyver2.gsub(".","")}=#{rubyver}" }"
+  end
+end
+
+ovl_glob('recipes/*/task.rake').each{|f| load(ovl_expand_file(f)) }
+
+ruby_arch_packages = %w[x64 x86].map do |arch|
+  %w[2.4.10-1 2.5.8-1 2.6.6-1 2.7.1-1 head].map do |packagever|
+    RubyPackage.new( packagever: packagever, arch: arch, rootdir: __dir__ ).freeze
+  end
+end
+
+ruby_arch_packages.each do |ruby_packages|
+  # Define MSYS2 installation tasks only once per arch and reuse it for different ruby versions.
+  msys2 = nil
+  namespace "msys2-#{ruby_packages.first.msys_arch}" do
+    msys2 = RubyInstaller::Build::Task.new( thisdir: "recipes/msys2", package: ruby_packages.first )
+  end
+
+  ruby_packages.each do |pack|
+    nsp = "ruby-#{pack.rubyver}-#{pack.arch}"
+    namespace nsp do
+      unpack = RubyInstaller::Build::Task.new( thisdir: "recipes/unpack", package: pack )
+      sandbox = RubyInstaller::Build::Task.new( thisdir: "recipes/sandbox", package: pack, unpack_task: unpack, msys2_task: msys2 )
+      RubyInstaller::Build::Task.new( thisdir: "recipes/installer-inno", package: pack, sandbox_task: sandbox )
+      RubyInstaller::Build::Task.new( thisdir: "recipes/archive-7z", package: pack, sandbox_task: sandbox )
+    end
+
+    desc "Build all for #{nsp}"
+    task nsp => ["#{nsp}:installer-inno", "#{nsp}:archive-7z"]
+
+    desc "Build installers for all rubies"
+    task :default => nsp
+  end
+end

data/packages/ri-msys/recipes/sandbox/70-add-msys2-installation.rake

@@ -0,0 +1,18 @@
+msysdir = File.join(self.sandboxdir, package.msysdir)
+directory File.dirname(msysdir)
+file msysdir => [msys2_task.devtools, File.dirname(msysdir)] do |t|
+  cp_r msys2_task.sandboxdir, t.name
+
+  init_files = File.readlines(msys2_task.after_init_filelist).map(&:chomp) - File.readlines(msys2_task.before_init_filelist).map(&:chomp)
+
+  # Remove files created while MSYS init.
+  # These files are re-created on the target computer.
+  chdir t.name do
+    rm init_files
+
+    # Do not include pacman gnupg directory. These files are unique to each installation
+    # and are created at the first call of `sh -l`.
+    rm_r "etc/pacman.d/gnupg"
+  end
+end
+self.sandboxfiles << msysdir

data/packages/ri/Rakefile

@@ -0,0 +1,60 @@
+$: << File.expand_path("../../../lib", __FILE__)
+
+require "ruby_installer/build"
+
+include RubyInstaller::Build::Utils
+RubyInstaller::Build.enable_msys_apps
+
+class RubyPackage < RubyInstaller::Build::Openstruct
+  def initialize(*args)
+    super
+
+    self.rubyver, self.pkgrel = packagever.split("-", 2)
+    self.packagename = "rubyinstaller"
+    self.rubyver2 = packagever=='head' ? "2.8" : rubyver[/^\d+\.\d+/]
+
+    self.install_gems = %w[]
+
+    case arch
+    when 'x64'
+      self.pacman_arch = "mingw-w64-x86_64"
+      self.ruby_arch = "x64-mingw32"
+      self.mingwdir = "mingw64"
+      self.default_instdir = "C:\\Ruby#{rubyver2.gsub(".","")}-x64"
+    when 'x86'
+      self.pacman_arch = "mingw-w64-i686"
+      self.ruby_arch = "i386-mingw32"
+      self.mingwdir = "mingw32"
+      self.default_instdir = "C:\\Ruby#{rubyver2.gsub(".","")}"
+    else
+      raise "invalid arch #{arch}"
+    end
+
+    self.packagenameverarch = "#{packagename}-#{ packagever=='head' ? 'head' : packagever }-#{arch}"
+    self.pacman_ruby = "#{pacman_arch}-ruby#{ packagever=='head' ? '-head' : "#{rubyver2.gsub(".","")}=#{rubyver}" }"
+  end
+end
+
+ovl_glob('recipes/*/task.rake').each{|f| load(ovl_expand_file(f)) }
+
+ruby_arch_packages = %w[x64 x86].map do |arch|
+  %w[2.4.10-1 2.5.8-1 2.6.6-1 2.7.1-1 head].map do |packagever|
+    RubyPackage.new( packagever: packagever, arch: arch, rootdir: __dir__ ).freeze
+  end
+end
+
+ruby_arch_packages.flatten.each do |pack|
+  nsp = "ruby-#{pack.rubyver}-#{pack.arch}"
+  namespace nsp do
+    unpack = RubyInstaller::Build::Task.new( thisdir: "recipes/unpack", package: pack )
+    sandbox = RubyInstaller::Build::Task.new( thisdir: "recipes/sandbox", package: pack, unpack_task: unpack )
+    RubyInstaller::Build::Task.new( thisdir: "recipes/installer-inno", package: pack, sandbox_task: sandbox )
+    RubyInstaller::Build::Task.new( thisdir: "recipes/archive-7z", package: pack, sandbox_task: sandbox )
+  end
+
+  desc "Build all for #{nsp}"
+  task nsp => ["#{nsp}:installer-inno", "#{nsp}:archive-7z"]
+
+  desc "Build installers for all rubies"
+  task :default => nsp
+end

data/recipes/archive-7z/10-define-variables.rake

@@ -0,0 +1,2 @@
+self.sandboxdir = sandbox_task.sandboxdir
+self.archivefile = "recipes/archive-7z/#{package.packagenameverarch}.7z"

data/recipes/archive-7z/70-create-archive.rake

@@ -0,0 +1,10 @@
+file archivefile => sandbox_task.sandboxfiles do
+  rm_f archivefile
+  msys_sh <<-EOT
+    pacman -S --needed --noconfirm p7zip
+  EOT
+
+  chdir "recipes/sandbox" do
+    sh "sh 7z a -bd ../../#{archivefile} #{sandboxdir.sub("recipes/sandbox/", "")} | ruby -ne \"STDERR.print '.'\""
+  end
+end

data/recipes/archive-7z/90-define-main-task.rake

@@ -0,0 +1,2 @@
+desc "7z archive for ruby-#{package.rubyver}-#{package.arch}"
+task "archive-7z" => ["sandbox", archivefile]

data/recipes/installer-inno/10-define-variables.rake

@@ -0,0 +1,2 @@
+self.sandboxdir = sandbox_task.sandboxdir
+self.installer_exe = "#{thisdir}/#{package.packagenameverarch}.exe"

data/recipes/installer-inno/50-generate-filelist.rake

@@ -0,0 +1,28 @@
+self.filelist_iss = "#{thisdir}/filelist-ruby-#{package.rubyver}-#{package.ruby_arch}.iss"
+directory File.dirname(filelist_iss)
+file filelist_iss => [__FILE__, ovl_expand_file(sandbox_task.sandboxfile_listfile), ovl_expand_file(sandbox_task.sandboxfile_arch_listfile), File.dirname(filelist_iss)] do
+  puts "generate #{filelist_iss}"
+  out = sandbox_task.sandboxfiles.map do |path|
+    reltosandbox_path = path.gsub(sandboxdir+"/", "")
+
+    if package.respond_to?(:msysdir) && reltosandbox_path.start_with?(package.msysdir)
+      components = "msys2"
+      flags = "uninsneveruninstall"
+    elsif File.fnmatch("share/{ri,doc}/*", reltosandbox_path, File::FNM_EXTGLOB)
+      components = "rdoc"
+    else
+      components = "ruby"
+    end
+    args = if File.directory?(path)
+      flags = "recursesubdirs createallsubdirs #{flags}"
+      source = "../../#{path}/*"
+      dest = "{app}/#{reltosandbox_path}"
+    else
+      source = "../../#{path}"
+      dest = "{app}/#{File.dirname(reltosandbox_path)}"
+    end
+
+    "Source: #{source}; DestDir: #{dest}; Flags: #{flags}; Components: #{components}"
+  end.join("\n")
+  File.write(filelist_iss, out)
+end

data/recipes/installer-inno/60-generate-iss-file.rake

@@ -0,0 +1,8 @@
+iss_files = ovl_glob("#{thisdir}/*.iss*").map{|f| ovl_expand_file(f) }
+
+# Compile the iss file from ERB template
+self.iss_compiler = RubyInstaller::Build::ErbCompiler.new(File.join(thisdir, "rubyinstaller.iss.erb"), File.join(thisdir, "#{package.packagenameverarch}.iss"))
+file iss_compiler.result_filename => [iss_compiler.erb_filename_abs] + iss_files - [iss_compiler.result_filename] do |t|
+  puts "erb #{t.name}"
+  iss_compiler.write_result(self)
+end

data/recipes/installer-inno/70-run-iscc.rake

@@ -0,0 +1,19 @@
+file installer_exe => (sandbox_task.sandboxfiles + [iss_compiler.result_filename, filelist_iss]) do
+  tries = 10
+  loop do
+    ok, res = sh "cmd", "/c", "iscc", iss_compiler.result_filename, "/Q", "/O#{File.dirname(installer_exe)}", "/F#{File.basename(installer_exe, ".exe")}" do |ok_, res_|
+      [ok_, res_]
+    end
+    if !ok
+      if (tries-=1) > 0 && res.exitstatus == 2
+        # Handle "Out of memory" which happens in docker, when several "docker run" are running
+        $stderr.puts "Retry iscc due to failure #{res.inspect}"
+        sleep 5
+      else
+        raise "iscc failed #{res.inspect}"
+      end
+    else
+      break
+    end
+  end
+end

data/recipes/installer-inno/90-define-main-task.rake

@@ -0,0 +1,2 @@
+desc "installer for ruby-#{package.rubyver}-#{package.arch}"
+task "installer-inno" => ["sandbox", installer_exe]

data/recipes/installer-inno/events.iss

@@ -0,0 +1,88 @@
+procedure InitializeWizard;
+begin
+  InitializeGUI;
+end;
+
+procedure CurStepChanged(const CurStep: TSetupStep);
+begin
+
+  // Run preparing steps before install of files
+  if CurStep = ssInstall then
+  begin
+    if UsingWinNT then
+    begin
+      UnInstallOldVersion();
+
+      Log(Format('Selected Tasks - Path: %d, Associate: %d', [PathChkBox.State, PathExtChkBox.State]));
+
+      if IsModifyPath then
+        ModifyPath([ExpandConstant('{app}') + '\bin']);
+
+      if IsAssociated then
+        ModifyFileExts(['.rb', '.rbw']);
+
+      if IsUtf8 then
+        ModifyRubyopt(['-Eutf-8']);
+
+      if IsComponentSelected('msys2') then
+        DeleteRubyMsys2Directory();
+
+    end else
+      MsgBox('Looks like you''ve got on older, unsupported Windows version.' #13 +
+             'Proceeding with a reduced feature set installation.',
+             mbInformation, MB_OK);
+  end;
+
+  // Final steps before installer closes
+  if CurStep = ssDone then
+  begin
+    Log(Format('Selected Tasks - DevkitInstall %d', [DevkitChkBox.State]));
+    if IsDevkitInstall then
+      RunDevkitInstall();
+  end;
+end;
+
+procedure CurPageChanged(CurPageID: Integer);
+begin
+  if CurPageID = wpSelectDir then
+    WizardForm.NextButton.Caption := SetupMessage(msgButtonInstall);
+
+  {* Disable MSYS2 component install, when it is already present in the install directory,
+     but take component selection as set per /COMPONENTS param when in slient install. *}
+  if (CurPageID = wpSelectComponents) and (not WizardSilent) then
+  begin
+    EnableMsys2Component(Msys2AlreadyInstalled() = '');
+    ComplistClickCheck(TObject.Create);
+  end;
+end;
+
+procedure RegisterPreviousData(PreviousDataKey: Integer);
+begin
+  {* store install choices so we can use during uninstall *}
+  if IsModifyPath then
+    SetPreviousData(PreviousDataKey, 'PathModified', 'yes');
+  if IsAssociated then
+    SetPreviousData(PreviousDataKey, 'FilesAssociated', 'yes');
+  if IsUtf8 then
+    SetPreviousData(PreviousDataKey, 'Utf8', 'yes');
+
+  SetPreviousData(PreviousDataKey, 'RubyInstallerId', ExpandConstant('{#PackageBaseId}\{#RubyVersion}'));
+end;
+
+procedure CurUninstallStepChanged(const CurUninstallStep: TUninstallStep);
+begin
+  if CurUninstallStep = usUninstall then
+  begin
+    if UsingWinNT then
+    begin
+      if GetPreviousData('PathModified', 'no') = 'yes' then
+        ModifyPath([ExpandConstant('{app}') + '\bin']);
+
+      if GetPreviousData('FilesAssociated', 'no') = 'yes' then
+        ModifyFileExts(['.rb', '.rbw']);
+
+      if GetPreviousData('Utf8', 'no') = 'yes' then
+        ModifyRubyopt(['-Eutf-8']);
+    end;
+  end;
+end;

data/recipes/installer-inno/ri_gui.iss

@@ -0,0 +1,286 @@
+// RubyInstaller Inno Setup GUI Customizations
+//
+// Copyright (c) 2009-2012 Jon Maken
+// Copyright (c) 2012 Yusuke Endoh
+// Revision: 2012-05-28 13:58:04 -0600
+// License: Modified BSD License
+
+const
+  ChkBoxBaseY = 95;
+  ChkBoxBaseHeight = 17;
+  ChkBoxBaseLeft = 18;
+
+var
+  PathChkBox, PathExtChkBox, Utf8ChkBox, DevkitChkBox: TCheckBox;
+  CompLabel: TLabel;
+  ComplistPrevClickCheck: TNotifyEvent;
+
+function IsAssociated(): Boolean;
+begin
+  Result := PathExtChkBox.Checked;
+end;
+
+function IsModifyPath(): Boolean;
+begin
+  Result := PathChkBox.Checked;
+end;
+
+function IsDevkitInstall(): Boolean;
+begin
+  Result := DevkitChkBox.Checked;
+end;
+
+function IsUtf8(): Boolean;
+begin
+  Result := Utf8ChkBox.Checked;
+end;
+
+
+procedure ParseSilentTasks();
+var
+  I, N: Integer;
+  Param: String;
+  Tasks: TStringList;
+begin
+  {* parse command line args for silent install tasks *}
+  for I := 0 to ParamCount do
+  begin
+    Param := AnsiUppercase(ParamStr(I));
+    if Pos('/TASKS', Param) <> 0 then
+    begin
+      Param := Trim(Copy(Param, Pos('=', Param) + 1, Length(Param)));
+      try
+        // TODO check for too many tasks to prevent overflow??
+        Tasks := StrToList(Param, ',');
+        for N := 0 to Tasks.Count - 1 do
+          case Trim(Tasks.Strings[N]) of
+            'MODPATH': PathChkBox.State := cbChecked;
+            'NOMODPATH': PathChkBox.State := cbUnchecked;
+            'ASSOCFILES': PathExtChkBox.State := cbChecked;
+            'NOASSOCFILES': PathExtChkBox.State := cbUnchecked;
+            'RIDKINSTALL': DevkitChkBox.State := cbChecked;
+            'NORIDKINSTALL': DevkitChkBox.State := cbUnchecked;
+            'DEFAULTUTF8': Utf8ChkBox.State := cbChecked;
+            'NODEFAULTUTF8': Utf8ChkBox.State := cbUnchecked;
+          end;
+      finally
+        Tasks.Free;
+      end;
+    end;
+  end;
+end;
+
+procedure URLText_OnClick(Sender: TObject);
+var
+  ErrorCode: Integer;
+begin
+  if Sender is TNewStaticText then
+    ShellExec('open', TNewStaticText(Sender).Caption, '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
+end;
+
+procedure RunDevkitInstall();
+var
+  ErrorCode: Integer;
+  ridkpath: String;
+begin
+  ridkpath := ExpandConstant('{app}') + '\bin\ridk.cmd';
+  ShellExec('open', ridkpath, 'install', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
+end;
+
+procedure ComplistClickCheck(Sender: TObject);
+var
+  msysdir: String;
+  update: Boolean;
+begin
+  update := GetUninstallString() <> '';
+  msysdir := Msys2AlreadyInstalled();
+
+  if update then
+    if msysdir <> '' then
+      if IsComponentSelected('msys2') then
+        CompLabel.Caption := 'ATTENTION: MSYS2 is already present in ' + msysdir + '. It will be deleted now and then re-installed. Additional installed pacman packages will be removed. Some gems might not work afterwards and must be re-installed.'
+      else
+        CompLabel.Caption := 'Ruby in ' + ExpandConstant('{app}') + ' will be updated. MSYS2 seems to be already present in ' + msysdir + ' . It will kept untouched and will be reused for this Ruby installation. Optionally it can be updated per `ridk install` on the last page of the installer.'
+    else
+      if IsComponentSelected('msys2') then
+        CompLabel.Caption := 'Ruby in ' + ExpandConstant('{app}') + ' will be updated and MSYS2 will be installed into ' + ExpandConstant('{app}\{#MsysDir}') + '. Please run `ridk install` on the last installer page to initialize it. It can be updated later per `ridk install` as well.'
+      else
+        CompLabel.Caption := 'Ruby in ' + ExpandConstant('{app}') + ' will be updated. It''s possible to install MSYS2 at the last page of the installer or to reuse an existing MSYS2 installation.'
+  else
+    if msysdir <> '' then
+      if IsComponentSelected('msys2') then
+        CompLabel.Caption := 'ATTENTION: MSYS2 is already present in ' + msysdir + '. It will be deleted now and then re-installed. Additional installed pacman packages will be removed. Some gems might not work afterwards and must be re-installed.'
+      else
+        CompLabel.Caption := 'Ruby will be installed into ' + ExpandConstant('{app}') + '. MSYS2 seems to be already present in ' + msysdir + ' . It will kept untouched and will be re-used for this Ruby installation. Optionally it can be updated per `ridk install` on the last page of the installer.'
+    else
+      if IsComponentSelected('msys2') then
+        CompLabel.Caption := 'Ruby will be installed into ' + ExpandConstant('{app}') + ' and MSYS2 will be installed into ' + ExpandConstant('{app}\{#MsysDir}') + '. Please run `ridk install` on the last installer page to initialize it. It can be updated later per `ridk install` as well.'
+      else
+        CompLabel.Caption := 'Ruby will be installed into ' + ExpandConstant('{app}') + ' without MSYS2. It''s possible to install MSYS2 at the last page of the installer or to reuse an existing MSYS2 installation.';
+
+  ComplistPrevClickCheck(Sender);
+end;
+
+procedure EnableMsys2Component(enable: Boolean);
+begin
+  {* InnoSetup doesn't provide corresponding setter for IsComponentSelected, so that we alter the ComponentsList directly. *}
+  if WizardForm.ComponentsList.Items.Count > 1 then
+    WizardForm.ComponentsList.Checked[1] := enable;
+end;
+
+procedure InitializeGUI;
+var
+  ChkBoxCurrentY: Integer;
+  Page: TWizardPage;
+  HostPage: TNewNotebookPage;
+  URLText, TmpLabel: TNewStaticText;
+begin
+
+  {* Add label to components list *}
+
+  CompLabel := TLabel.Create(WizardForm);
+  CompLabel.Parent := WizardForm.SelectComponentsPage;
+  CompLabel.Left := WizardForm.ComponentsList.Left;
+  CompLabel.Width := WizardForm.ComponentsList.Width;
+  CompLabel.Height := ScaleY(40);
+  CompLabel.Top :=
+    WizardForm.ComponentsList.Top + WizardForm.ComponentsList.Height - CompLabel.Height;
+  CompLabel.AutoSize := False;
+  CompLabel.WordWrap := True;
+
+  WizardForm.ComponentsList.Height :=
+    WizardForm.ComponentsList.Height - CompLabel.Height - ScaleY(8);
+
+  {* Bypass click event on ComponentsList *}
+  ComplistPrevClickCheck := WizardForm.ComponentsList.OnClickCheck;
+  WizardForm.ComponentsList.OnClickCheck := @ComplistClickCheck;
+
+  {* Path, and file association task check boxes *}
+
+  Page := PageFromID(wpSelectDir);
+  ChkBoxCurrentY := ChkBoxBaseY;
+
+  PathChkBox := TCheckBox.Create(Page);
+  PathChkBox.Parent := Page.Surface;
+  PathChkBox.State := cbChecked;
+  PathChkBox.Caption := CustomMessage('AddPath');
+  PathChkBox.Hint := CustomMessage('AddPathHint');
+  PathChkBox.ShowHint := True;
+  PathChkBox.Alignment := taRightJustify;
+  PathChkBox.Top := ScaleY(ChkBoxCurrentY);
+  PathChkBox.Left := ScaleX(ChkBoxBaseLeft);
+  PathChkBox.Width := Page.SurfaceWidth;
+  PathChkBox.Height := ScaleY(ChkBoxBaseHeight);
+  ChkBoxCurrentY := ChkBoxCurrentY + ChkBoxBaseHeight;
+
+  PathExtChkBox := TCheckBox.Create(Page);
+  PathExtChkBox.Parent := Page.Surface;
+  PathExtChkBox.State := cbChecked;
+  PathExtChkBox.Caption := CustomMessage('AssociateExt');
+  PathExtChkBox.Hint := CustomMessage('AssociateExtHint');
+  PathExtChkBox.ShowHint := True;
+  PathExtChkBox.Alignment := taRightJustify;
+  PathExtChkBox.Top := ScaleY(ChkBoxCurrentY);
+  PathExtChkBox.Left := ScaleX(ChkBoxBaseLeft);
+  PathExtChkBox.Width := Page.SurfaceWidth;
+  PathExtChkBox.Height := ScaleY(ChkBoxBaseHeight);
+  ChkBoxCurrentY := ChkBoxCurrentY + ChkBoxBaseHeight;
+
+  Utf8ChkBox := TCheckBox.Create(Page);
+  Utf8ChkBox.Parent := Page.Surface;
+  Utf8ChkBox.State := cbChecked;
+  Utf8ChkBox.Caption := CustomMessage('DefaultUtf8');
+  Utf8ChkBox.Hint := CustomMessage('DefaultUtf8Hint');
+  Utf8ChkBox.ShowHint := True;
+  Utf8ChkBox.Alignment := taRightJustify;
+  Utf8ChkBox.Top := ScaleY(ChkBoxCurrentY);
+  Utf8ChkBox.Left := ScaleX(ChkBoxBaseLeft);
+  Utf8ChkBox.Width := Page.SurfaceWidth;
+  Utf8ChkBox.Height := ScaleY(ChkBoxBaseHeight);
+
+  {* Single Ruby installation tip message *}
+
+  TmpLabel := TNewStaticText.Create(Page);
+  TmpLabel.Parent := Page.Surface;
+  TmpLabel.Top := ScaleY(ChkBoxCurrentY + 30);
+  TmpLabel.Left := ScaleX(6);
+  TmpLabel.Width := Page.SurfaceWidth;
+  TmpLabel.WordWrap := True;
+  TmpLabel.Caption := CustomMessage('MouseoverHint');
+
+  {* Labels and links back to RubyInstaller project pages *}
+
+  HostPage := WizardForm.FinishedPage;
+
+  DevkitChkBox := TCheckBox.Create(HostPage);
+  DevkitChkBox.Parent := HostPage;
+  if WizardSilent then DevkitChkBox.State := cbUnchecked
+  else DevkitChkBox.State := cbChecked;
+  DevkitChkBox.Caption := CustomMessage('DevkitInstall');
+  DevkitChkBox.Hint := CustomMessage('DevkitInstallHint');
+  DevkitChkBox.ShowHint := True;
+  DevkitChkBox.Alignment := taRightJustify;
+  DevkitChkBox.Top := ScaleY(160);
+  DevkitChkBox.Left := ScaleX(176);
+  DevkitChkBox.Width := HostPage.Width;
+
+  TmpLabel := TNewStaticText.Create(HostPage);
+  TmpLabel.Parent := HostPage;
+  TmpLabel.Top := DevkitChkBox.Top + 20;
+  TmpLabel.Left := DevkitChkBox.Left + 17;
+  TmpLabel.AutoSize := True;
+  TmpLabel.Caption := CustomMessage('DevkitInstall2');
+
+  TmpLabel := TNewStaticText.Create(HostPage);
+  TmpLabel.Parent := HostPage;
+  TmpLabel.Top := ScaleY(240);
+  TmpLabel.Left := ScaleX(176);
+  TmpLabel.AutoSize := True;
+  TmpLabel.Caption := CustomMessage('WebSiteLabel');
+
+  URLText := TNewStaticText.Create(HostPage);
+  URLText.Parent := HostPage;
+  URLText.Top := TmpLabel.Top;
+  URLText.Left := TmpLabel.Left + TmpLabel.Width + ScaleX(4);
+  URLText.AutoSize := True;
+  URLText.Caption := 'http://rubyinstaller.org';
+  URLText.Cursor := crHand;
+  URLText.Font.Color := clBlue;
+  URLText.OnClick := @URLText_OnClick;
+
+  TmpLabel := TNewStaticText.Create(HostPage);
+  TmpLabel.Parent := HostPage;
+  TmpLabel.Top := ScaleY(256);
+  TmpLabel.Left := ScaleX(176);
+  TmpLabel.AutoSize := True;
+  TmpLabel.Caption := CustomMessage('SupportGroupLabel');
+
+  URLText := TNewStaticText.Create(HostPage);
+  URLText.Parent := HostPage;
+  URLText.Top := TmpLabel.Top;
+  URLText.Left := TmpLabel.Left + TmpLabel.Width + ScaleX(4);
+  URLText.AutoSize := True;
+  URLText.Caption := 'http://groups.google.com/group/rubyinstaller';
+  URLText.Cursor := crHand;
+  URLText.Font.Color := clBlue;
+  URLText.OnClick := @URLText_OnClick;
+
+  TmpLabel := TNewStaticText.Create(HostPage);
+  TmpLabel.Parent := HostPage;
+  TmpLabel.Top := ScaleY(272);
+  TmpLabel.Left := ScaleX(176);
+  TmpLabel.AutoSize := True;
+  TmpLabel.Caption := CustomMessage('WikiLabel');
+
+  URLText := TNewStaticText.Create(HostPage);
+  URLText.Parent := HostPage;
+  URLText.Top := TmpLabel.Top;
+  URLText.Left := TmpLabel.Left + TmpLabel.Width + ScaleX(4);
+  URLText.AutoSize := True;
+  URLText.Caption := 'https://wiki.github.com/larskanis/rubyinstaller2';
+  URLText.Cursor := crHand;
+  URLText.Font.Color := clBlue;
+  URLText.OnClick := @URLText_OnClick;
+
+  ParseSilentTasks;
+end;