From acb4ea12d09e06dc0486d83096b0ae83c9ccc18a Mon Sep 17 00:00:00 2001
From: cajus <cajus@594d385d-05f5-0310-b6e9-bd551577e9d8>
Date: Thu, 21 Feb 2008 14:18:31 +0000
Subject: [PATCH] Added gen_smb_hash

git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@9022 594d385d-05f5-0310-b6e9-bd551577e9d8
---
 gosa-si/debian/control                 |  2 +-
 gosa-si/server/events/gosaTriggered.pm | 20 +++++++++++++++++++-
 gosa-si/tests/client.php               |  5 ++++-
 3 files changed, 24 insertions(+), 3 deletions(-)

diff --git a/gosa-si/debian/control b/gosa-si/debian/control
index 562e14678..b80c2aea2 100644
--- a/gosa-si/debian/control
+++ b/gosa-si/debian/control
@@ -18,7 +18,7 @@ Description: GOsa support infrastructure
 
 Package: gosa-si-server
 Architecture: any
-Depends: gosa-si-common
+Depends: gosa-si-common, libcrypt-smbhash-perl
 Suggests: gosa
 Description: GOsa support infrastructure server
  This package provides everything you need in order to deploy a simple
diff --git a/gosa-si/server/events/gosaTriggered.pm b/gosa-si/server/events/gosaTriggered.pm
index 23dae9f51..a041a7229 100644
--- a/gosa-si/server/events/gosaTriggered.pm
+++ b/gosa-si/server/events/gosaTriggered.pm
@@ -3,6 +3,7 @@ use Exporter;
 @ISA = qw(Exporter);
 my @events = (
     "get_events", 
+    "gen_smb_hash",
     "ping",
     "network_completition",
     "set_activated_for_installation",
@@ -24,6 +25,7 @@ my @events = (
 use strict;
 use warnings;
 use GOSA::GosaSupportDaemon;
+use Crypt::SmbHash;
 use Net::ARP;
 use Net::Ping;
 use Socket;
@@ -41,6 +43,7 @@ sub get_events {
     return \@events;
 }
 
+
 sub ping {
      my ($msg, $msg_hash, $session_id) = @_ ;
      my $source = @{$msg_hash->{source}}[0];
@@ -53,6 +56,18 @@ sub ping {
      return @out_msg_l;
 }
 
+
+sub gen_smb_hash {
+     my ($msg, $msg_hash, $session_id) = @_ ;
+     my $source = @{$msg_hash->{source}}[0];
+     my $target = @{$msg_hash->{target}}[0];
+     my $password = @{$msg_hash->{password}}[0];
+
+     my %data= ('hash' => join(q[:], ntlmgen $password));
+     my $out_msg = &build_msg("gen_smb_hash", $target, 'GOSA', \%data );
+}
+
+
 sub network_completition {
      my ($msg, $msg_hash, $session_id) = @_ ;
      my $source = @{$msg_hash->{source}}[0];
@@ -79,6 +94,7 @@ sub network_completition {
      return ( $out_msg );
 }
 
+
 sub detect_hardware {
     my ($msg, $msg_hash) = @_ ;
     # just forward msg to client, but dont forget to split off 'gosa_' in header
@@ -109,6 +125,7 @@ sub set_activated_for_installation {
     return @out_msg_l;
 }
 
+
 sub trigger_action_localboot {
     my ($msg, $msg_hash) = @_;
     $msg =~ s/<header>gosa_trigger_action_localboot<\/header>/<header>trigger_action_localboot<\/header>/;
@@ -116,6 +133,7 @@ sub trigger_action_localboot {
     return @out_msg_l;
 }
 
+
 sub trigger_action_halt {
     my ($msg, $msg_hash) = @_;
     $msg =~ s/<header>gosa_trigger_action_halt<\/header>/<header>trigger_action_halt<\/header>/;
@@ -172,7 +190,6 @@ sub trigger_action_sysinfo {
 }
 
 
-
 sub new_key_for_client {
     my ($msg, $msg_hash) = @_;
     $msg =~ s/<header>gosa_new_key_for_client<\/header>/<header>new_key<\/header>/;
@@ -180,6 +197,7 @@ sub new_key_for_client {
     return @out_msg_l;
 }
 
+
 sub trigger_action_rescan {
     my ($msg, $msg_hash) = @_;
     $msg =~ s/<header>gosa_trigger_action_rescan<\/header>/<header>trigger_action_rescan<\/header>/;
diff --git a/gosa-si/tests/client.php b/gosa-si/tests/client.php
index 42d1f7a63..2c31f9cbb 100755
--- a/gosa-si/tests/client.php
+++ b/gosa-si/tests/client.php
@@ -23,8 +23,11 @@ if($sock->connected()){
 # delete
 #$data = "<xml> <header>gosa_delete_jobdb_entry</header><where><clause><phrase><id>3</id></phrase></clause></where></xml>";
 
+# smbhash
+$data = "<xml> <header>gosa_gen_smb_hash</header> <source>GOSA</source><target>GOSA</target><password>tester</password></xml>";
+
 # update  
-$data = "<xml> <header>gosa_update_status_jobdb_entry</header> <source>GOSA</source><target>GOSA</target><where><clause><phrase> <status>waiting</status></phrase></clause> </where> <update><status>processing</status> <result>update</result></update></xml>";
+#$data = "<xml> <header>gosa_update_status_jobdb_entry</header> <source>GOSA</source><target>GOSA</target><where><clause><phrase> <status>waiting</status></phrase></clause> </where> <update><status>processing</status> <result>update</result></update></xml>";
 
 # query
 #$data = "<xml><header>gosa_query_jobdb</header><where><clause><connector>and</connector><phrase><operator>gt</operator><ROWID>0</ROWID></phrase><phrase><operator>le</operator><ROWID>5</ROWID></phrase></clause></where></xml>";
-- 
2.30.2