update: server event module krb5.pm is no longer needed

git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@12110 594d385d-05f5-0310-b6e9-bd551577e9d8

diff --git a/gosa-si/debian/gosa-si-server.install b/gosa-si/debian/gosa-si-server.install
index 4fca2831a520a0ff0edb7a544203e649653aeb11..fbe8231b67e1fd15e40805eefc89e93c2d7718e6 100644 (file)
--- a/gosa-si/debian/gosa-si-server.install
+++ b/gosa-si/debian/gosa-si-server.install
@@ -10,7 +10,6 @@ server/events/siTriggered.pm                  usr/lib/gosa-si/server/ClientPackages
 server/events/clMessages.pm                    usr/lib/gosa-si/server/ClientPackages
 server/events/databases.pm                     usr/lib/gosa-si/server/GosaPackages
 server/events/databases.pm                     usr/lib/gosa-si/server/ServerPackages
-server/events/krb5.pm                          usr/lib/gosa-si/server/GosaPackages
 server/events/logHandling.pm                   usr/lib/gosa-si/server/GosaPackages
 server/events/logHandling.pm                   usr/lib/gosa-si/server/ServerPackages
 server/events/server_server_com.pm     usr/lib/gosa-si/server/ServerPackages

diff --git a/gosa-si/gosa-si-server b/gosa-si/gosa-si-server
index 831ca6f550d44c6b7f220b3f832785c9ffeeea97..aaf2b5e006c121506ae52000699a9035d02e482a 100755 (executable)
--- a/gosa-si/gosa-si-server
+++ b/gosa-si/gosa-si-server
@@ -1160,6 +1160,7 @@ sub msg_to_decrypt {
                     if(exists $heap->{'client'}) {
                         $msg = &encrypt_msg($msg, $GosaPackages_key);
                         $heap->{'client'}->put($msg);
+                        &daemon_log("$session_id INFO: incoming '$header' message forwarded to GOsa", 5); 
                     }
                     $done = 1;
                     #print STDERR "target is own address with forward_to_gosa-tag pointing at myself -> forward to gosa\n";

diff --git a/gosa-si/server/events/krb5.pm b/gosa-si/server/events/krb5.pm
deleted file mode 100644 (file)
index a348475..0000000
--- a/gosa-si/server/events/krb5.pm
+++ /dev/null
@@ -1,188 +0,0 @@
-package krb5;
-use Exporter;
-@ISA = qw(Exporter);
-my @events = (
-    "get_events",
-    "krb5_list_principals",
-    "krb5_list_policies",
-    "krb5_get_principal",
-    "krb5_create_principal",
-    "krb5_modify_principal",
-    "krb5_set_password",
-    "krb5_del_principal",
-    "krb5_get_policy",
-    "krb5_create_policy",
-    "krb5_modify_policy",
-    "krb5_del_policy",
-    "answer_krb5_list_principals",
-    "answer_krb5_list_policies",
-    "answer_krb5_get_principal",
-    "answer_krb5_create_principal",
-    "answer_krb5_modify_principal",
-    "answer_krb5_del_principal",
-    "answer_krb5_get_policy",
-    "answer_krb5_create_policy",
-    "answer_krb5_modify_policy",
-    "answer_krb5_del_policy",
-    "answer_krb5_set_password",
-   );
-@EXPORT = @events;
-
-use strict;
-use warnings;
-use GOSA::GosaSupportDaemon;
-
-
-BEGIN {}
-
-END {}
-
-### Start ######################################################################
-
-sub get_events {
-    return \@events;
-}
-
-    
-sub krb5_list_principals {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-sub krb5_set_password {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-
-sub krb5_create_principal {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-
-sub krb5_modify_principal {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-
-sub krb5_get_principal {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-
-sub krb5_del_principal {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-
-sub krb5_list_policies {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-
-sub krb5_get_policy {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-
-sub krb5_create_policy {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-
-sub krb5_modify_policy {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-
-sub krb5_del_policy {
-        my ($msg, $msg_hash, $session_id) = @_;
-        $msg =~ s/gosa_krb5/krb5/g;
-        return ( $msg );
-}
-
-sub answer_krb5_list_principals {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-sub answer_krb5_get_principal {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-sub answer_krb5_create_principal {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-sub answer_krb5_modify_principal {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-sub answer_krb5_del_principal {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-sub answer_krb5_list_policies {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-sub answer_krb5_get_policy {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-sub answer_krb5_create_policy {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-sub answer_krb5_modify_policy {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-sub answer_krb5_del_policy {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-sub answer_krb5_set_password {
-    my ($msg, $msg_hash, $session_id) = @_ ;
-    $msg =~ s/<target>\S+<\/target>/<target>GOSA<\/target>/g;
-    return ($msg);
-}
-
-1;