summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: f8bca60)
raw | patch | inline | side by side (parent: f8bca60)
author | rettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8> | |
Fri, 1 Feb 2008 14:31:12 +0000 (14:31 +0000) | ||
committer | rettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8> | |
Fri, 1 Feb 2008 14:31:12 +0000 (14:31 +0000) |
git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@8729 594d385d-05f5-0310-b6e9-bd551577e9d8
gosa-si/server/events/set_activated_for_installation | [new file with mode: 0755] | patch | blob |
diff --git a/gosa-si/server/events/set_activated_for_installation b/gosa-si/server/events/set_activated_for_installation
--- /dev/null
@@ -0,0 +1,39 @@
+#!/usr/bin/perl
+#===============================================================================
+#
+# FILE: set_activated_for_installation.pl
+#
+# USAGE: ./set_activated_for_installation.pl
+#
+# DESCRIPTION:
+#
+# OPTIONS: ---
+# REQUIREMENTS: ---
+# BUGS: ---
+# NOTES: ---
+# AUTHOR: (), <>
+# COMPANY:
+# VERSION: 1.0
+# CREATED: 28.01.2008 17:31:37 CET
+# REVISION: ---
+#===============================================================================
+
+use strict;
+use warnings;
+
+use GOSA::GosaSupportDaemon;
+
+
+# transform msg to hash
+my $hash = &transform_msg2hash($ARGV[0]);
+
+# extract from hash all what you need
+my $header = @{$hash->{header}}[0];
+my $source = @{$hash->{source}}[0];
+my $target = @{$hash->{target}}[0];
+
+#my $out_hash = &create_xml_hash("set_activated_for_installation", $source, $target);
+my $out_hash = &create_xml_hash("set_activated_for_installation", $source, "*");
+&add_content2xml_hash($out_hash, 'target', "GOSA");
+my $out_msg = &create_xml_string($out_hash);
+print $out_msg;