Code

renamed function
authorrettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8>
Tue, 19 Feb 2008 14:26:21 +0000 (14:26 +0000)
committerrettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8>
Tue, 19 Feb 2008 14:26:21 +0000 (14:26 +0000)
git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@8958 594d385d-05f5-0310-b6e9-bd551577e9d8

gosa-si/debian/gosa-si-server.dirs
gosa-si/modules/GosaPackages.pm
gosa-si/modules/GosaSupportDaemon.pm
gosa-si/modules/SIPackages.pm

index be099ffcf77ced5c1d6082be538905fd60d08238..bae080a08c60884246b38ffa740e1c07d576485f 100644 (file)
@@ -2,3 +2,4 @@ usr/sbin
 usr/lib/gosa-si/modules
 usr/lib/gosa-si/server/events
 etc/gosa-si
+/var/log/fai
index d53227ef60c4467badc27f69601791d618b304ab..bcf8839490353ff2e2c228dbbd0b1d4087565d31 100644 (file)
@@ -316,7 +316,7 @@ sub process_gosa_msg {
         # Forward messages to all known servers as "trigger_wake"
         my $in_hash= &transform_msg2hash($msg);
         my %data = ( 'macAddress'  => \@{$in_hash->{macAddress}} );
-        $out_msg = &send_msg("trigger_wake", $server_address, "KNOWN_SERVER", \%data);
+        $out_msg = &build_msg("trigger_wake", $server_address, "KNOWN_SERVER", \%data);
     } else {
         # msg could not be assigned to core function
         # maybe it is an eventa
index ccdcea1517ec4f27a3cbe1f20292858873d0e0a8..ffe43332fca652adab860c7bc484e8c52180e23b 100644 (file)
@@ -2,8 +2,24 @@ package GOSA::GosaSupportDaemon;
 
 use Exporter;
 @ISA = qw(Exporter);
-@EXPORT = qw(create_xml_hash get_content_from_xml_hash add_content2xml_hash create_xml_string encrypt_msg decrypt_msg create_ciphering transform_msg2hash get_time send_msg get_where_statement get_select_statement get_update_statement get_limit_statement get_orderby_statement); 
-
+my @functions = (
+    "create_xml_hash",
+    "get_content_from_xml_hash",
+    "add_content2xml_hash",
+    "create_xml_string",
+    "encrypt_msg",
+    "decrypt_msg",
+    "create_ciphering",
+    "transform_msg2hash",
+    "get_time",
+    "build_msg",
+    "get_where_statement",
+    "get_select_statement",
+    "get_update_statement",
+    "get_limit_statement",
+    "get_orderby_statement",
+    ); 
+@EXPORT = @functions;
 use strict;
 use warnings;
 use IO::Socket::INET;
@@ -247,7 +263,7 @@ sub get_time {
 
 
 #===  FUNCTION  ================================================================
-#         NAME: send_msg
+#         NAME: build_msg
 #  DESCRIPTION: Send a message to a destination
 #   PARAMETERS: [header] Name of the header
 #               [from]   sender ip
@@ -256,7 +272,7 @@ sub get_time {
 #                        package
 #      RETURNS:  nothing
 #===============================================================================
-sub send_msg ($$$$) {
+sub build_msg ($$$$) {
        my ($header, $from, $to, $data) = @_;
 
        my $out_hash = &create_xml_hash($header, $from, $to);
index a5e2d06b565d7050370c6c8755e9a8522459e7f3..672ad4d627b18a0b5aa3e17a3bea4de010b52607 100644 (file)
@@ -850,7 +850,7 @@ sub new_ldap_config {
        $mesg = $ldap->unbind;
 
        # Send information
-       return send_msg("new_ldap_config", $server_address, $address, \%data);
+       return &build_msg("new_ldap_config", $server_address, $address, \%data);
 }
 
 sub process_detected_hardware {
@@ -1095,7 +1095,7 @@ sub hardware_config {
        &main::daemon_log("Send detect_hardware message to $address", 4);
 
        # Send information
-       return send_msg("detect_hardware", $server_address, $address, \%data);
+       return &build_msg("detect_hardware", $server_address, $address, \%data);
 }
 
 sub server_matches {