init III

2024-10-14 00:08:40 +02:00
parent dbfba56f66
commit 1462d52e13
4572 changed files with 2658864 additions and 0 deletions
--- a/OTRS/Kernel/Modules/AdminCloudServiceSupportDataCollector.pm
+++ b/OTRS/Kernel/Modules/AdminCloudServiceSupportDataCollector.pm
@@ -0,0 +1,127 @@
+# --
+# Copyright (C) 2001-2019 OTRS AG, https://otrs.com/
+# --
+# This software comes with ABSOLUTELY NO WARRANTY. For details, see
+# the enclosed file COPYING for license information (GPL). If you
+# did not receive this file, see https://www.gnu.org/licenses/gpl-3.0.txt.
+# --
+
+package Kernel::Modules::AdminCloudServiceSupportDataCollector;
+
+use strict;
+use warnings;
+
+our $ObjectManagerDisabled = 1;
+
+sub new {
+    my ( $Type, %Param ) = @_;
+
+    # allocate new hash for object
+    my $Self = {%Param};
+    bless( $Self, $Type );
+
+    return $Self;
+}
+
+sub Run {
+    my ( $Self, %Param ) = @_;
+
+    # get layout object
+    my $LayoutObject     = $Kernel::OM->Get('Kernel::Output::HTML::Layout');
+    my $SystemDataObject = $Kernel::OM->Get('Kernel::System::SystemData');
+
+    # ------------------------------------------------------------ #
+    # edit action
+    # ------------------------------------------------------------ #
+    if ( $Self->{Subaction} eq 'EditAction' ) {
+
+        # challenge token check for write action
+        $LayoutObject->ChallengeTokenCheck();
+
+        # get needed objects
+        my $ParamObject        = $Kernel::OM->Get('Kernel::System::Web::Request');
+        my $RegistrationObject = $Kernel::OM->Get('Kernel::System::Registration');
+
+        my $RegistrationType = $SystemDataObject->SystemDataGet(
+            Key => 'Registration::Type',
+        ) || '';
+        my $Description = $SystemDataObject->SystemDataGet(
+            Key => 'Registration::Description',
+        ) || '';
+        my $SupportDataSending = $ParamObject->GetParam( Param => 'SupportDataSending' ) || 'No';
+
+        my %Result = $RegistrationObject->RegistrationUpdateSend(
+            Type               => $RegistrationType,
+            Description        => $Description,
+            SupportDataSending => $SupportDataSending,
+        );
+
+        # log change
+        if ( $Result{Success} ) {
+            $Kernel::OM->Get('Kernel::System::Log')->Log(
+                Priority => 'notice',
+                Message =>
+                    "System Registration: User $Self->{UserID} changed Support Data Sending to: $SupportDataSending!",
+            );
+
+        }
+
+        return $LayoutObject->Redirect(
+            OP => 'Action=AdminCloudServiceSupportDataCollector',
+        );
+    }
+
+    # ------------------------------------------------------------ #
+    # edit action
+    # ------------------------------------------------------------ #
+    else {
+
+        my $RegistrationState = $SystemDataObject->SystemDataGet(
+            Key => 'Registration::State',
+        ) || '';
+        my $SupportDataSending = $SystemDataObject->SystemDataGet(
+            Key => 'Registration::SupportDataSending',
+        ) || 'No';
+
+        if ( $RegistrationState ne 'registered' ) {
+
+            $LayoutObject->Block(
+                Name => 'NotRegistered',
+            );
+        }
+        else {
+            # check SupportDataSending if it is enable
+            $Param{SupportDataSendingChecked} = '';
+
+            if ( $SupportDataSending ne 'Yes' ) {
+
+                $LayoutObject->Block(
+                    Name => 'RegisteredNotSending',
+                );
+            }
+            else {
+                $Param{SupportDataSendingChecked} = 'checked="checked"';
+            }
+
+            $LayoutObject->Block(
+                Name => 'SendingEdit',
+                Data => {
+                    %Param,
+                }
+            );
+
+        }
+    }
+
+    my $Output = $LayoutObject->Header();
+    $Output .= $LayoutObject->NavigationBar();
+    $Output .= $LayoutObject->Output(
+        TemplateFile => 'AdminCloudServiceSupportDataCollector',
+        Data         => \%Param,
+    );
+    $Output .= $LayoutObject->Footer();
+
+    return $Output;
+}
+
+1;