home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / boot / i386 / root / usr / share / YaST2 / include / dirinstall / ui.ycp
Text File  |  2006-11-29  |  2KB  |  66 lines

  1. /**
  2.  * File:    packager/inst_dir/instintodir.ycp
  3.  * Module:    System installation
  4.  * Summary:    Installation into  a directory
  5.  * Authors:    Anas Nashif <nashif@suse.de>
  6.  *
  7.  */
  8.  
  9. {
  10.     textdomain "packager";
  11.  
  12.     import "Mode";
  13.     Mode::SetMode ("autoinst_config");    // FIXME, messy
  14.     import "Product";
  15.     Mode::SetMode ("normal");        // FIXME, messy
  16.     import "DirInstall";
  17.     import "ProductControl";
  18.  
  19.     import "Installation";
  20.  
  21.     import "Wizard";
  22.     import "Label";
  23.     import "Popup";
  24.     import "Report";
  25.     import "GetInstArgs";
  26.  
  27. define symbol Run () {
  28.     y2milestone("current mode: %1", Mode::mode());
  29.     DirInstall::InitProductControl ();
  30.     DirInstall::installing_into_dir = true;
  31.  
  32.     Wizard::OpenNextBackStepsDialog();
  33.  
  34.     // check the package manager target
  35.     Pkg::TargetFinish ();
  36.     string tmpdir = (string)SCR::Read (.target.tmpdir);
  37.     tmpdir = tmpdir + "/target";
  38.     SCR::Execute (.target.mkdir, tmpdir);
  39.     Pkg::TargetInit (tmpdir, true);
  40.  
  41.     string wizard_mode = Mode::test () ? "installation" : Mode::mode ();
  42.  
  43.     list<map> stage_mode = [$["stage": "normal",  "mode": wizard_mode ]];
  44.     ProductControl::AddWizardSteps(stage_mode);
  45.  
  46.     // Do log Report messages by default (bug 180862)
  47.     Report::LogMessages(true);
  48.     Report::LogErrors(true);
  49.     Report::LogWarnings(true);
  50.  
  51.     // calling inst_proposal
  52.  
  53.     Installation::destdir = DirInstall::target;
  54.     y2debug("target dir: %1", Installation::destdir);
  55.     symbol ret = ProductControl::Run();
  56.     Pkg::SourceFinishAll ();
  57.     Pkg::TargetFinish();
  58.     Installation::destdir = "/";
  59.     Wizard::CloseDialog ();
  60.  
  61.     return ret;
  62. }
  63.  
  64.  
  65. } // EOF
  66.