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 / clients / vm_hardware_proposal.ycp < prev    next >
Text File  |  2006-11-29  |  1KB  |  60 lines
  1. /**
  2.  * Module:    vm_hardware_proposal.ycp
  3.  *
  4.  * Authors:    Ladislav Slezak <lslezak@suse.cz>
  5.  *        Michael G. Fritch <mgfritch@novell.com>
  6.  *
  7.  * Purpose:     Proposal for virtual machine hardware
  8.  *
  9.  * $Id: vm_options_proposal.ycp 27936 2006-02-13 20:01:14Z olh $
  10.  *
  11.  */
  12. {
  13.     textdomain "vm";
  14.  
  15.     import "VM";
  16.  
  17.     string func = (string) WFM::Args (0);
  18.     map param = (map) WFM::Args (1);
  19.     map ret = $[];
  20.  
  21.     if ( func == "MakeProposal" )
  22.     {
  23.     boolean force_reset      = param["force_reset"     ]:false;
  24.     boolean language_changed = param["language_changed"]:false;
  25.  
  26.     if (force_reset)
  27.     {
  28.         VM::ResetMemorySize();
  29.         VM::ResetNumberOfCpus();
  30.         VM::ResetStdVga();
  31.         VM::ResetSdl();
  32.         VM::ResetLocaltime();
  33.     }
  34.  
  35.     return VM::getHardwareProposal();
  36.     }
  37.     else if ( func == "AskUser" )
  38.     {
  39.     boolean has_next = param["has_next"]:false;
  40.  
  41.     symbol result = (symbol) WFM::CallFunction ("inst_vm_hardware",
  42.                             [true, has_next]);
  43.  
  44.     ret = $[ "workflow_sequence" : result ];
  45.     }
  46.     else if ( func == "Description" )
  47.     {
  48.     ret =
  49.         $[
  50.           // this is a heading
  51.           "rich_text_title"    :    _("Hardware"),
  52.           // this is a menu entry
  53.           "menu_title"    :    _("&Hardware"),
  54.           "id"        :    "vm_hardware_stuff"
  55.         ];
  56.     }
  57.  
  58.     return ret;
  59. }
  60.