OTRS Pakete ausgiebig testen und "verifizieren"

Transcript

1. reb@perl-services.de Perl-Entwicklung, OTRS, Training
2. Achtung: WIP
3. OTRS-Pakete testen und verifizieren
4. OTRS
5. HelpDesk-System
7. • Gestartet 2001 • 1,7 Mio. Downloads • ca. 110.000 Installationen • 33 Sprachen • AGPL • http://github.com/OTRS/otrs
8. http://upload.wikimedia.org/wikipedia/commons/thumb/9/92/Penguin_Admin.svg/105px-Penguin_Admin.svg.png
9. Ich brauche eine FAQ http://upload.wikimedia.org/wikipedia/commons/thumb/9/92/Penguin_Admin.svg/105px-Penguin_Admin.svg.png
10. Ich brauche eine FAQ Mehr Attribute für Cis http://upload.wikimedia.org/wikipedia/commons/thumb/9/92/Penguin_Admin.svg/105px-Penguin_Admin.svg.png
11. Ich brauche eine FAQ Mehr Attribute für Cis Tickets besser erkennen http://upload.wikimedia.org/wikipedia/commons/thumb/9/92/Penguin_Admin.svg/105px-Penguin_Admin.svg.png
12. Erweiterungen Für OTRS
13. • FAQ • ITSM – ConfigurationManagement • ITSM – ChangeManagement • ITSM – IncidentProblemManagement • KIX4OTRS • TaggedCustomerUser • … •
14. Paketmanager
15. Screenshot Paketmanager
16. OPAR
17. Screenshots OPAR http://opar.perl-services.de/
18. OTRS Verify
19. Probleme OPAR
20. Vorteil CPAN
21. OPARTester?
22. OTRS-Pakete testen und verifizieren
23. Kriterien
24. • Einhalten von OTRS-Programmierrichtlinien (Perl::Critic und Perl::Tidy) • Unittests sollen fehlerfrei durchlaufen • Stabilität und Performanz von OTRS nicht beeinträchtigen • Keine ungewünschte Kommunikation nach außen • Trennung von Templates/Funktionalität • u.v.m.
25. Probleme
26. Idee
28. Ziel
29. • Automatisiertes Testen von OTRS-Erweiterungen – Statische Analyse – Laufzeittest • Ziele – Sicherheitslücken (nahezu) ausschließen – Getestete Module – Usern mehr Informationen zum Modul liefern – Performancefresser identifizieren
30. Umsetzung
31. Schritt 1: Upload
33. Mojolicious
35. Datenbank
36. Los geht's
37. # init fork manager my $max_processes = $self->config->get( 'fork.max' ); my $fork_manager = Parallel::ForkManager->new( $max_processes ); $logger->trace( 'init fork manager with max ' .$max_processes . ' processes' ); for my $tmpjob ( @job_info ) { # do the fork $fork_manager->start and next; # create job and run it my $job = OTRS::OPR::Daemon::Job->new( %{$tmpjob} ); $job->run if $job; } # exit the forked process $fork_manager->finish; $fork_manager->wait_all_children;
38. Schritt 2: Erste Analyse
39. OPM-Format
40. <?xml version="1.0" encoding="utf-8"?> <otrs_package version="1.0"> <Name>WarnMissingAttachment</Name> <Version>3.3.1</Version> <Framework>3.2.x</Framework> <Framework>3.3.x</Framework> <Vendor>Perl-Services.de</Vendor> <URL>http://www.perl-services.de</URL> <Description Lang="de">xxxxxxxxxx</Description> <PackageRequired Version="1.01">Perl::Module</PackageRequired> <ModuleRequired Version="3.3.1">ITSM</ModuleRequired> <License> GNU AFFERO GENERAL PUBLIC LICENSE Version 3, November 2007 </License> <Filelist> <File Permission="644" Encode="Base64" Location="Kernel/Config/WarnMissingAttachment.xml"> PD94bWwgdmVyc2 </File> </Filelist> <DatabaseInstall> … </DatabaseInstall> </otrs_package>
41. OTRS::OPM::Analyzer
42. use OTRS::OPM::Analyzer::Utils::OPMFile; my $opm_file = '/path/to/package.opm'; my $opm = OTRS::OPM::Analyzer::Utils::OPMFile->new( opm_file => $opm_file, ); my @otrs_versions = $opm->framework;
43. XML::LibXML
44. Schritt 3: VM erstellen
46. JiffyBox
47. Rex
48. use Rex; use Rex::Commands::Cloud; cloud_service 'Jiffybox'; cloud_auth $api_key; for my $otrs ( @otrs_versions ) { my $box = cloud_instance create => { image_id => "ubuntu_12_4", Name => "test-$otrs", plan_id => $plan_id, password => $root_pwd }; cloud_instance start => $box->{id}; }
49. Screenshot Jiffybox adminpanel
50. Schritt 4: Software installieren
51. OTRS + MySQL
52. cpanm, Apache 2, mod_perl, Perl-Module, libxml2-dev, libgd-xpm-dev, libssl-dev, … Software diese Projekts
53. OTRS einrichten
54. Rex Recipe „OTRS“
55. install [qw/ libcrypt-ssleay-perl libgd-gd2-perl libencode-hanextra-perl ... libtext-csv-xs-perl libxml-parser-perl libyaml-perl libdbd-mysql-perl libnet-ldap-perl apache2 /];
56. create_user "otrs", home => "/opt/otrs", groups => ["www-data"], comment => "OTRS User", no_create_home => TRUE; Rex::Database::MySQL::Admin::Schema::create({ name => $param->{schema}->{name}, }); Rex::Database::MySQL::Admin::User::create({ name => $param->{user}->{name}, host => $param->{user}->{host}, password => $param->{user}->{password}, rights => $param->{user}->{rights}, schema => $param->{schema}->{name} . ".*", });
57. Schritt 5: Metainformationen sammeln
58. OTRS::OPM::Analyzer
59. • BasicXMLCheck • Dependencies • Documentation • License • PerlCritic • PerlTidy • SystemCall • TemplateCheck • UnitTests •
60. Perl::Critic::OTRS
61. • • *::ProhibitFetchrowHashref • *::ProhibitDumper • *::ProhibitLocaltime • *::ProhibitLowPrecedenceOps • *::ProhibitOpen • *::ProhibitPushISA • *::ProhibitRequire • *::ProhibitSomeCoreFunctions • *::RequireCamelCase • *::RequireParensWithMethods • *::RequireTrueReturnValueForModules •
62. Schritt 6: Unittests I
63. XML-Ausgabe
64. <?xml version="1.0" encoding="utf-8" ?> <otrs_test> <Summary> <Item Name="Perl">5.14.2</Item> <Item Name="Product">OTRS 3.3.1</Item> <Item Name="TestNotOk">1</Item> <Item Name="TestOk">16</Item> <Item Name="Time">2013-12-30 01:35:01</Item> <Item Name="TimeTaken">3</Item> ... </Summary> <Unit Name="/opt/otrs/scripts/test/JSON.t" Duration="0"> <Test Result="ok" Count="1">JSON - undef test (is 'undef')</Test> <Test Result="ok" Count="2">JSON - empty test (is '""')</Test> <Test Result="ok" Count="3">JSON - simple (is '"Some Text"')</Test> </Unit> <Unit Name="/opt/otrs/scripts/test/Layout.t" Duration="3"> <Test Result="not ok" Count="1">ERROR: Syntax error in /opt/otrs/scripts/test/Layout.t: Can't use an undefined value as a HASH reference at /opt/otrs/Kernel/System/CustomerUser.pm line 87. </Test> </Unit> </otrs_test>
65. OTRS::Unittest::XMLParser
66. Capture::Tiny
67. use Capture::Tiny qw(:all); use OTRS::Unittest::XMLParser; my ($out, $err) = capture { system '/opt/otrs/bin/otrs UnitTest.pl -o XML'; }; my $results = OTRS::Unittest::XMLParser->new( xml => $out, ); for my $test ( @{ $result->tests } ) { say sprintf "%s -> %s", $test->name, $test->duration; }
68. Schritt 7: Pakete installieren
69. bin/otrs.PackageManager.pl -a install \ -p /path/to/SalesforceForOTRS-3.3.1.opm
70. CPAN-Module
71. OTRS AddOns
72. <?xml version="1.0" encoding="utf-8"?> <otrs_package version="1.0"> <Name>WarnMissingAttachment</Name> <Version>3.3.1</Version> <Framework>3.2.x</Framework> <Framework>3.3.x</Framework> <Vendor>Perl-Services.de</Vendor> <URL>http://www.perl-services.de</URL> <Description Lang="de">xxxxxxxxxx</Description> <PackageRequired Version="1.01">Perl::Module</PackageRequired> <ModuleRequired Version="3.3.1">ITSM</ModuleRequired> <License> GNU AFFERO GENERAL PUBLIC LICENSE Version 3, November 2007 </License> <Filelist> <File Permission="644" Encode="Base64" Location="Kernel/Config/WarnMissingAttachment.xml"> PD94bWwgdmVyc2 </File> </Filelist> <DatabaseInstall> … </DatabaseInstall> </otrs_package>
73. OTRS::OPM::Analyzer
74. Schritt 8: Unittests II … ∞
75. Schritt 9: Pakete deinstallieren
76. bin/otrs.PackageManager.pl -a uninstall \ -p /path/to/SalesforceForOTRS-3.3.1.opm
77. Schritt 10: Infos an OPAR
78. Schritt 11: VM löschen
79. VM::JiffyBox
80. Offene Punkte
81. • Viel Code ;-) • … Code-Snippets zusammenführen • … In OPAR einbauen • … „Kommunikation nach außen erkennen“ • • Sonstiges • … Finanzielle Unterstützung finden • … Mehr Freizeit finden