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 / modules / PackageAI.ycp < prev    next >
Text File  |  2006-11-29  |  2KB  |  86 lines
  1. /**
  2.  * File:    modules/PackageAI.ycp
  3.  * Package:    yast2
  4.  * Summary:    Packages manipulation (autoinstallation)
  5.  * Authors:    Martin Vidner <mvidner@suse.cz>
  6.  *        Michal Svec <msvec@suse.cz>
  7.  * Flags:    Stable
  8.  *
  9.  * $Id: PackageAI.ycp 31242 2006-06-01 12:59:16Z locilka $
  10.  */
  11.  
  12. {
  13.  
  14. module "PackageAI";
  15. textdomain "base";
  16.  
  17. global list<string> toinstall = [];
  18. global list<string> toremove = [];
  19.  
  20. boolean last_op_canceled = false;
  21.  
  22. include "packages/common.ycp";
  23.  
  24. /* default value of settings modified */
  25. global boolean modified = false;
  26.  
  27. /**
  28.  * Function sets internal variable, which indicates, that any
  29.  * settings were modified, to "true"
  30.  */
  31. global define void SetModified () {
  32.     modified = true;
  33. }
  34.  
  35. /**
  36.  * Functions which returns if the settings were modified
  37.  * @return boolean  settings were modified
  38.  */
  39. global define boolean GetModified () {
  40.     return modified;
  41. }
  42.  
  43. global boolean DoInstall(list<string> packages) {
  44.     toinstall = (list<string>) union(toinstall, packages);
  45.     toremove = filter(string p, toremove, {
  46.     return !contains(packages, p);
  47.     });
  48.     modified = true;
  49.     return true;
  50. }
  51.  
  52. global boolean DoRemove(list<string> packages) {
  53.     toremove = (list<string>) union(toremove, packages);
  54.     toinstall = filter(string p, toinstall, {
  55.     return !contains(packages, p);
  56.     });
  57.     modified = true;
  58.     return true;
  59. }
  60.  
  61. global boolean DoInstallAndRemove(list<string> toinst, list<string> torem) {
  62.     DoInstall(toinst);
  63.     DoRemove(torem);
  64.     modified = true;
  65.     return true;
  66. }
  67.  
  68. global boolean Available(string package) {
  69.     return true;
  70. }
  71.  
  72. global boolean Installed(string package) {
  73.     return contains(toinstall, package);
  74. }
  75.  
  76. global boolean InstallKernel (list<string> kernel_modules) {
  77.     // TODO: for 9.2, we always install all packages, but
  78.     // we could only install those really needed (#44394)
  79.  
  80.     // the kernel packages are handled by autoyast on its own
  81.     return true;
  82. }
  83.  
  84. /* EOF */
  85. }
  86.