From 00d53449e3cb02cce52ab420c5c703179bbe3773 Mon Sep 17 00:00:00 2001 From: rettenbe Date: Fri, 1 Feb 2008 14:31:12 +0000 Subject: [PATCH] new event for gosa-si-server git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@8729 594d385d-05f5-0310-b6e9-bd551577e9d8 --- .../events/set_activated_for_installation | 39 +++++++++++++++++++ 1 file changed, 39 insertions(+) create mode 100755 gosa-si/server/events/set_activated_for_installation diff --git a/gosa-si/server/events/set_activated_for_installation b/gosa-si/server/events/set_activated_for_installation new file mode 100755 index 000000000..4f402d55d --- /dev/null +++ b/gosa-si/server/events/set_activated_for_installation @@ -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; -- 2.30.2