[yast-commit] r57881 - in /branches/SuSE-Code-11-Branch/isns: ./ agents/ doc/ doc/autodocs/ package/ src/ testsuite/ testsuite/tests/

Author: mzugec Date: Tue Jul 7 10:20:30 2009 New Revision: 57881 URL: http://svn.opensuse.org/viewcvs/yast?rev=57881&view=rev Log: yast2-isns module added into svn (for code11) Added: branches/SuSE-Code-11-Branch/isns/ branches/SuSE-Code-11-Branch/isns/MAINTAINER branches/SuSE-Code-11-Branch/isns/Makefile.cvs branches/SuSE-Code-11-Branch/isns/RPMNAME branches/SuSE-Code-11-Branch/isns/VERSION branches/SuSE-Code-11-Branch/isns/agents/ branches/SuSE-Code-11-Branch/isns/agents/Makefile.am branches/SuSE-Code-11-Branch/isns/agents/_cvsignore branches/SuSE-Code-11-Branch/isns/agents/isnsd.scr branches/SuSE-Code-11-Branch/isns/configure.in.in branches/SuSE-Code-11-Branch/isns/doc/ branches/SuSE-Code-11-Branch/isns/doc/Makefile.am branches/SuSE-Code-11-Branch/isns/doc/_cvsignore branches/SuSE-Code-11-Branch/isns/doc/autodocs/ branches/SuSE-Code-11-Branch/isns/doc/autodocs/Makefile.am branches/SuSE-Code-11-Branch/isns/doc/autodocs/_cvsignore branches/SuSE-Code-11-Branch/isns/package/ branches/SuSE-Code-11-Branch/isns/package/_cvsignore branches/SuSE-Code-11-Branch/isns/package/yast2-isns.changes branches/SuSE-Code-11-Branch/isns/src/ branches/SuSE-Code-11-Branch/isns/src/IsnsServer.ycp branches/SuSE-Code-11-Branch/isns/src/Makefile.am branches/SuSE-Code-11-Branch/isns/src/_cvsignore branches/SuSE-Code-11-Branch/isns/src/complex.ycp branches/SuSE-Code-11-Branch/isns/src/dialogs.ycp branches/SuSE-Code-11-Branch/isns/src/helps.ycp branches/SuSE-Code-11-Branch/isns/src/inst_isns.ycp branches/SuSE-Code-11-Branch/isns/src/isns.desktop branches/SuSE-Code-11-Branch/isns/src/isns.ycp branches/SuSE-Code-11-Branch/isns/src/isns_auto.ycp branches/SuSE-Code-11-Branch/isns/src/isns_finish.ycp branches/SuSE-Code-11-Branch/isns/src/isns_proposal.ycp branches/SuSE-Code-11-Branch/isns/src/widgets.ycp branches/SuSE-Code-11-Branch/isns/src/wizards.ycp branches/SuSE-Code-11-Branch/isns/testsuite/ branches/SuSE-Code-11-Branch/isns/testsuite/Makefile.am branches/SuSE-Code-11-Branch/isns/testsuite/_cvsignore branches/SuSE-Code-11-Branch/isns/testsuite/tests/ branches/SuSE-Code-11-Branch/isns/testsuite/tests/_cvsignore branches/SuSE-Code-11-Branch/isns/yast2-isns.spec.in Added: branches/SuSE-Code-11-Branch/isns/MAINTAINER URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/MAINTAINER?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/MAINTAINER (added) +++ branches/SuSE-Code-11-Branch/isns/MAINTAINER Tue Jul 7 10:20:30 2009 @@ -0,0 +1 @@ +Michal Zugec Added: branches/SuSE-Code-11-Branch/isns/Makefile.cvs URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/Makefile.cvs?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/Makefile.cvs (added) +++ branches/SuSE-Code-11-Branch/isns/Makefile.cvs Tue Jul 7 10:20:30 2009 @@ -0,0 +1,22 @@ +# +# Makefile.cvs +# +PREFIX = /usr + +LIB = $(shell y2tool get-lib) + +configure: all + ./configure --prefix=$(PREFIX) --libdir=$(PREFIX)/$(LIB) + +all: + y2tool y2autoconf + y2tool y2automake + autoreconf --force --install + +install: configure + make + make install + +reconf: all + ./config.status --recheck + ./config.status Added: branches/SuSE-Code-11-Branch/isns/RPMNAME URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/RPMNAME?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/RPMNAME (added) +++ branches/SuSE-Code-11-Branch/isns/RPMNAME Tue Jul 7 10:20:30 2009 @@ -0,0 +1 @@ +yast2-isns Added: branches/SuSE-Code-11-Branch/isns/VERSION URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/VERSION?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/VERSION (added) +++ branches/SuSE-Code-11-Branch/isns/VERSION Tue Jul 7 10:20:30 2009 @@ -0,0 +1 @@ +2.17.0 Added: branches/SuSE-Code-11-Branch/isns/agents/Makefile.am URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/agents/Makefile.am?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/agents/Makefile.am (added) +++ branches/SuSE-Code-11-Branch/isns/agents/Makefile.am Tue Jul 7 10:20:30 2009 @@ -0,0 +1,7 @@ +# Makefile.am for isns/agents + +agent_SCRIPTS = + +scrconf_DATA = isnsd.scr + +EXTRA_DIST = $(agent_SCRIPTS) $(scrconf_DATA) Added: branches/SuSE-Code-11-Branch/isns/agents/_cvsignore URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/agents/_cvsignore?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/agents/_cvsignore (added) +++ branches/SuSE-Code-11-Branch/isns/agents/_cvsignore Tue Jul 7 10:20:30 2009 @@ -0,0 +1,2 @@ +Makefile +Makefile.in Added: branches/SuSE-Code-11-Branch/isns/agents/isnsd.scr URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/agents/isnsd.scr?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/agents/isnsd.scr (added) +++ branches/SuSE-Code-11-Branch/isns/agents/isnsd.scr Tue Jul 7 10:20:30 2009 @@ -0,0 +1,48 @@ +/* + * Read(.ietd.Compression) + * (["yes"]) + * + * Write(.ietd.Compression, "no") + * (true) + * + * Fore more information about possible keys and values + * consult with the slp_config man pages `man slp_config`. + */ + +.etc.iscsid + +`ag_ini( + `IniAgent( "/etc/isns/isns.conf", + $[ + "options" : [ "global_values", "comments_last", "line_can_continue", "join_multiline", "repeat_names" ], + "comments": [ + "^[ \t]*$", // empty line + "^[ \t]+[;#].*$", // comment char is not first char + "^[#][ \t]*$", // only comment chars + "^[#][ \t]*\\[[^]]*$", // comment chars followed by '[' without matching ']' + "^[#][^ \t[]", // comment char followed by non-blank nor '[' + "^[#][ \t]+[^[a-z \t].*$", // comment chars followed by non a-z char nor '[' nor blank + "^[#][ \t]+[a-z ]*[a-z][ \t]*$", // comment chars followed by a-z or blank chars + "^[#][ \t]+[a-z ]*[a-z][ \t]*[^a-z \t=].*$", // like above, but followed by non a-z nor blank nor '=' chars + ], + "sections" : [ + $[ + "begin" : [ "^[ \t]*\\[[ \t]*(.*[^ \t])[ \t]*\\][ \t]*", "[%s]" ], + ], $[ + // this is a special type for commenting out the values + "begin" : [ "^[#;][ \t]*\\[[ \t]*(.*[^ \t])[ \t]*\\][ \t]*", "# [%s]" ], + ] + ], + + // we need to exclude ; because of the second matching rule + "params" : [ + // Options with one value ('yes' / 'no') +// $[ "match" : [ "^[#;][ \t]*([^ \t]+)[ \t]+([^ \t]+)[ \t]+$", "%s %s" ]], + $[ "match" : [ "^[#;][ \t]*([^ \t\=]+)[ \t\=]?(.+)[ \t]*$", "; %s %s" ]], + // Options with more possible values + $[ "match" : [ "^[ \t]*([^ \t\=]+)[ \t\=]+[ ]*(.+)[ \t]*$", "%s = %s" ]], + ], + ] + ) +) + Added: branches/SuSE-Code-11-Branch/isns/configure.in.in URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/configure.in.in?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/configure.in.in (added) +++ branches/SuSE-Code-11-Branch/isns/configure.in.in Tue Jul 7 10:20:30 2009 @@ -0,0 +1,12 @@ +## YCP module configure.in.in + +## Initialize +@YAST2-INIT-COMMON@ +@YAST2-INIT-YCP@ + +## some common checks +@YAST2-CHECKS-COMMON@ +@YAST2-CHECKS-YCP@ + +## and generate the output... +@YAST2-OUTPUT@ Added: branches/SuSE-Code-11-Branch/isns/doc/Makefile.am URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/doc/Makefile.am?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/doc/Makefile.am (added) +++ branches/SuSE-Code-11-Branch/isns/doc/Makefile.am Tue Jul 7 10:20:30 2009 @@ -0,0 +1,10 @@ +# Makefile.am for isns/doc + +SUBDIRS = autodocs + +htmldir = $(docdir) + +doc_DATA = +html_DATA = + +EXTRA_DIST = $(doc_DATA) $(html_DATA) Added: branches/SuSE-Code-11-Branch/isns/doc/_cvsignore URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/doc/_cvsignore?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/doc/_cvsignore (added) +++ branches/SuSE-Code-11-Branch/isns/doc/_cvsignore Tue Jul 7 10:20:30 2009 @@ -0,0 +1,2 @@ +Makefile +Makefile.in Added: branches/SuSE-Code-11-Branch/isns/doc/autodocs/Makefile.am URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/doc/autodocs/Makefile.am?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/doc/autodocs/Makefile.am (added) +++ branches/SuSE-Code-11-Branch/isns/doc/autodocs/Makefile.am Tue Jul 7 10:20:30 2009 @@ -0,0 +1,3 @@ +# Makefile.am for isns/doc/autodocs + +include $(top_srcdir)/autodocs-ycp.ami Added: branches/SuSE-Code-11-Branch/isns/doc/autodocs/_cvsignore URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/doc/autodocs/_cvsignore?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/doc/autodocs/_cvsignore (added) +++ branches/SuSE-Code-11-Branch/isns/doc/autodocs/_cvsignore Tue Jul 7 10:20:30 2009 @@ -0,0 +1,3 @@ +Makefile +Makefile.in +*.html Added: branches/SuSE-Code-11-Branch/isns/package/_cvsignore URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/package/_cvsignore?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/package/_cvsignore (added) +++ branches/SuSE-Code-11-Branch/isns/package/_cvsignore Tue Jul 7 10:20:30 2009 @@ -0,0 +1,2 @@ +*.spec +*.bz2 Added: branches/SuSE-Code-11-Branch/isns/package/yast2-isns.changes URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/package/yast2-isns.changes?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/package/yast2-isns.changes (added) +++ branches/SuSE-Code-11-Branch/isns/package/yast2-isns.changes Tue Jul 7 10:20:30 2009 @@ -0,0 +1,40 @@ +------------------------------------------------------------------- +Fri Jul 3 15:14:10 CEST 2009 - mzugec@suse.de + +- button ordering (bnc#440543) +- 2.17.0 + +------------------------------------------------------------------- +Fri Jul 3 13:38:15 CEST 2009 - mzugec@suse.de + +- fixed typo in help text (bnc#439179) + +------------------------------------------------------------------- +Thu Jul 2 15:42:01 CEST 2009 - mzugec@suse.cz + +- submitted into yast svn, fixed some build issues + +------------------------------------------------------------------- +Tue Sep 18 12:00:00 CEST 2007 - wrwhitehead@novell.com +- Fixed Bug #325129 - iSNS server not running feedback and + updated dialogs to display only the non-selected nodes + +------------------------------------------------------------------- +Tue Sep 04 12:00:00 CEST 2007 - wrwhitehead@novell.com +- Updated display pages to be more user friendly. Added help text. + +------------------------------------------------------------------- +Wed Aug 29 12:00:00 CEST 2007 - wrwhitehead@novell.com +- Resized display pages and fixed some typeos in the text labels + +------------------------------------------------------------------- +Fri Apr 13 12:00:00 CEST 2007 - wrwhitehead@novell.com +- Fixed Bug 257976 Note displaying target/initiator types + +------------------------------------------------------------------- +Thu Feb 15 12:00:00 CEST 2007 - WRWhitehead@novell.com +- initial version (FATE #233) + + + + Added: branches/SuSE-Code-11-Branch/isns/src/IsnsServer.ycp URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-Branch/isns/src/IsnsServer.ycp?rev=57881&view=auto ============================================================================== --- branches/SuSE-Code-11-Branch/isns/src/IsnsServer.ycp (added) +++ branches/SuSE-Code-11-Branch/isns/src/IsnsServer.ycp Tue Jul 7 10:20:30 2009 @@ -0,0 +1,615 @@ +/** + * File: modules/IsnsServer.ycp + * Package: Configuration of isns-server + * Summary: IsnsServer settings, input and output functions + * Authors: Michal Zugec + * + * $Id: IsnsServer.ycp 35355 2007-01-15 15:06:49Z mzugec $ + * + * Representation of the configuration of iscsi-server. + * Input and output routines. + */ + +{ + +module "isnsServer"; +textdomain "isns"; + +import "Progress"; +import "Report"; +import "Summary"; +import "Message"; +import "Service"; +import "Package"; +import "Popup"; +import "SuSEFirewall"; +import "Confirm"; +import "Mode"; +import "String"; +import "Map"; + +boolean serviceStatus = false; +boolean statusOnStart = false; + +/** + * Prototypes + */ +global boolean Modified(); + +/** + * Data was modified? + */ +global boolean modified = false; +global boolean configured = false; + +/** + */ +global boolean proposal_valid = false; + +/** + * Write only, used during autoinstallation. + * Don't run services and SuSEconfig, it's all done at one place. + */ +global boolean write_only = false; + +/** + * Abort function + * return boolean return true if abort + */ +global boolean() AbortFunction = Modified; + +/** + * Abort function + * @return boolean return true if abort + */ +global define boolean Abort() ``{ + if(AbortFunction != nil) + { + return AbortFunction () == true; + } + return false; +} + +/** + * Data was modified? + * @return true if modified + */ +global boolean Modified() { + y2debug("modified=%1",modified); + return modified; +} + +// read configuration file /etc/ietd.conf +global boolean readConfig(){ + map read_values = (map)SCR::Read(.etc.isns.all); +// IsnsServerFunctions::parseConfig( read_values ); + y2milestone("isns readConfig"); + return true; +} + +// write configuration file /etc/ietd.conf +boolean writeConfig(){ +// prepare map, because perl->ycp lost information about data types (integers in this case) +// map config_file = IsnsServerFunctions::writeConfig(); +// config_file["type"]=tointeger(config_file["type"]:"1"); +// config_file["file"]=tointeger(config_file["file"]:"1"); +// list > value = []; +// foreach(map row, config_file["value"]:[], { +// row["type"]=tointeger(row["type"]:"1"); +// row["file"]=tointeger(row["file"]:"1"); +// value = add(value, row); +// }); +// +// config_file["value"] = value; +// y2milestone("config_file to write %1", config_file); +// // write it +// SCR::Write(.etc.ietd.all, config_file); +// SCR::Write(.etc.ietd, nil); + return true; +} + + + +// test if required package ("isns") is installed +boolean installed_packages(){ + boolean ret = false; + y2milestone("Check if isns is installed"); + if( !Package::InstallMsg( "isns", + _("<p>To configure the isns service, the <b>%1</b> package must be installed.</p>") + + _("<p>Install it now?</p>")) ) + { + Popup::Error( Message::CannotContinueWithoutPackagesInstalled() ); + } else ret = true; + + return ret; +} + +// check status of isns service +// if not enabled, start it manually +boolean getServiceStatus(){ + boolean ret = true; + if (Service::Status("isns") == 0) { + statusOnStart=true; + serviceStatus=true; + } +y2milestone("Service status = %1", statusOnStart); + if (!statusOnStart) Service::Start("isns"); + return ret; +} + +// set service status +boolean setServiceStatus(){ + boolean start=true; + if (!serviceStatus) start = statusOnStart; + + if (!start) { + y2milestone("Stop isns service"); + Service::Stop("isns"); + } else { + y2milestone("Start isns service"); + serviceStatus=true; + Service::Start("isns"); + } + return true; +} + +global string testISNSAccess(string address) { + string value = "OK"; + map temp = $[]; + + string command = sformat("isnsadm -a %1 -t -q iscsi",address); + map result= (map) SCR::Execute(.target.bash_output, command, $[]); + foreach(string row, splitstring(result["stdout"]:"","\n"), { + + if (row == "TCP error on connection") + { + y2milestone("TCP error: %1 ",row); + value = "ERROR"; + } + + if (row == "Error Sending TCP request.") + { + y2milestone("Failed to resolve host error: %1 ",row); + value = "ERROR"; + } + + }); + +return value; +} +global list