Skip to content
Snippets Groups Projects
Commit 4b2d6ba2 authored by Jens Steidl's avatar Jens Steidl :baby_chick:
Browse files

- refactor: renamed hash

parent 173caca5
No related branches found
No related tags found
No related merge requests found
......@@ -26,7 +26,7 @@ my $passwd = shift;
my $institution = shift;
my $ui_port = shift;
my $protocol = 'https';
my %exiftool2dnx = (
my %mediainfo2dnx = (
"ICC-header:ColorSpaceData" => "icc.colorspacedata",
"ICC-header:DeviceModel" => "icc.devicemodel",
"ICC-header:PrimaryPlatform" => "icc.primaryplatform",
......@@ -156,7 +156,7 @@ sub join_dnx_property_to_classification_group($) {
sub extractors_add_mapping($$) {
my $dnx_property = shift;
my $exiftool_property = shift;
my $mediainfo_property = shift;
say "try to add extractor mapping";
$driver->get("$protocol://$host:${ui_port}//mng/action/pageAction.page_xml.page_extractors_list.xml.do?pageBean.deploymentMode=BUNDLED&pageViewMode=Edit&pageBean.currentUserMode=LOCAL&RenewBean=true&menuKey=com.exlibris.dps.wrk.general.menu.Preservation.AdvancedPreservationActivities.mngLibraryLOCAL.mngLibraryHeader.Extractors.InnerMenu&menuKey=com.exlibris.dps.wrk.general.menu.Preservation.AdvancedPreservationActivities.mngLibraryLOCAL.mngLibraryHeader.Extractors.InnerMenu&backUrl=");
$driver->pause();
......@@ -169,7 +169,7 @@ sub extractors_add_mapping($$) {
$driver->find_element("pageBeancurrentMappingextractorProperty_input", "id")->clear;
$driver->find_element("pageBeancurrentMappingextractorProperty_button", "id")->click;
$driver->pause();
$driver->find_element("//li[\@title='$exiftool_property']", "xpath")->click;
$driver->find_element("//li[\@title='$mediainfo_property']", "xpath")->click;
$driver->pause();
$driver->find_element("pageBeancurrentMappingclassificationProperty_input", "id")->clear;
$driver->find_element("pageBeancurrentMappingclassificationProperty_button", "id")->click;
......@@ -194,23 +194,23 @@ change_to_global_format_library();
# add dnx property
printf colored("Step 3 of 7: add dnx property \n", 'bold green');
foreach my $exiftool_property (sort keys %exiftool2dnx) {
my $dnx_property = $exiftool2dnx{ $exiftool_property };
add_dnx_property($dnx_property, "$dnx_property <- Exiftool '$exiftool_property'");
foreach my $mediainfo_property (sort keys %mediainfo2dnx) {
my $dnx_property = $mediainfo2dnx{ $mediainfo_property };
add_dnx_property($dnx_property, "$dnx_property <- Exiftool '$mediainfo_property'");
}
# include dnx property to classification group (Image(MIX))
printf colored("Step 4 of 7: join dnx property to classification group \n", 'bold green');
foreach my $exiftool_property (sort keys %exiftool2dnx) {
my $dnx_property = $exiftool2dnx{ $exiftool_property };
foreach my $mediainfo_property (sort keys %mediainfo2dnx) {
my $dnx_property = $mediainfo2dnx{ $mediainfo_property };
join_dnx_property_to_classification_group($dnx_property);
}
# add mapping
printf colored("Step 5 of 7: extractors add mapping \n", 'bold green');
foreach my $exiftool_property (sort keys %exiftool2dnx) {
my $dnx_property = $exiftool2dnx{ $exiftool_property };
extractors_add_mapping($dnx_property, $exiftool_property);
foreach my $mediainfo_property (sort keys %mediainfo2dnx) {
my $dnx_property = $mediainfo2dnx{ $mediainfo_property };
extractors_add_mapping($dnx_property, $mediainfo_property);
}
# change to local format library
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment