Kaydet (Commit) 0f7825e7 authored tarafından Stephan Bergmann's avatar Stephan Bergmann

Remove unused officecfg/util/component-*.gen files

...that appear to never have been used for anything that would still be relevant
for LO today at least, and have effectively never been modified since their
introduction with 0ff65e7a "#97750# property
mapping for LDAP DS" (and seem to be about some other LDAP integration than
what is provided by officecfg/registry/schema/oo-*.xcd.sample)

Change-Id: I36f92dbb187ff6966e0b89152f3dd3eeb128662e
Reviewed-on: https://gerrit.libreoffice.org/49248Tested-by: 's avatarJenkins <ci@libreoffice.org>
Reviewed-by: 's avatarStephan Bergmann <sbergman@redhat.com>
üst d525fe37
: # -*- perl -*-
#
# This file is part of the LibreOffice project.
#
# This Source Code Form is subject to the terms of the Mozilla Public
# License, v. 2.0. If a copy of the MPL was not distributed with this
# file, You can obtain one at http://mozilla.org/MPL/2.0/.
#
# This file incorporates work covered by the following license notice:
#
# Licensed to the Apache Software Foundation (ASF) under one or more
# contributor license agreements. See the NOTICE file distributed
# with this work for additional information regarding copyright
# ownership. The ASF licenses this file to you under the Apache
# License, Version 2.0 (the "License"); you may not use this file
# except in compliance with the License. You may obtain a copy of
# the License at http://www.apache.org/licenses/LICENSE-2.0 .
#
# generates of the component schema list an ldap schema in slapd format
eval 'exec perl -wS $0 ${1+"$@"}'
if 0;
#creating the output file
open(OUTFILE, ">$ARGV[0]") or die "can't open >$ARGV[0]";
#open the makefile
open(INFILE, "makefile.mk") or die "can't open makefile.mk";
$inxcs=0;
#search all schemas in the makefile except userprofile and format them as e.g org.openoffice.Inet
while(<INFILE>) {
tr/\r\n//d;
if (/^\s*XCSFILES/) {
$inxcs++;
}
next unless $inxcs;
if ($inxcs) {
$inxcs=0 unless /\\$/;
next if (/^\s*XCSFILES/);
next if (/UserProfile/);
s/^\s+//;
s/\s*\\$//;
s/\.xcs.*$//;
s#\$/#.#g;
push(@comp_names, $_);
}
}
close(INFILE);
# generate the schema in slapd format
foreach (@comp_names) {
s#org.openoffice.#oo-#g;
s#\.#-#g;
$myLdapName=lc $_;
print OUTFILE "attribute $myLdapName-attr $myLdapName-attr-oid cis single\n";
print OUTFILE "objectclass $myLdapName-class\n";
print OUTFILE "\toid\n";
print OUTFILE "\t\t$myLdapName-class-oid\n";
print OUTFILE "\tsuperior top\n";
print OUTFILE "\tallows\n";
print OUTFILE "\t$myLdapName-attr\n";
}
close(OUTFILE);
exit 0;
: # -*- perl -*-
#
# This file is part of the LibreOffice project.
#
# This Source Code Form is subject to the terms of the Mozilla Public
# License, v. 2.0. If a copy of the MPL was not distributed with this
# file, You can obtain one at http://mozilla.org/MPL/2.0/.
#
# This file incorporates work covered by the following license notice:
#
# Licensed to the Apache Software Foundation (ASF) under one or more
# contributor license agreements. See the NOTICE file distributed
# with this work for additional information regarding copyright
# ownership. The ASF licenses this file to you under the Apache
# License, Version 2.0 (the "License"); you may not use this file
# except in compliance with the License. You may obtain a copy of
# the License at http://www.apache.org/licenses/LICENSE-2.0 .
#
# generates of the component schema list an ldap schema in ldif format
eval 'exec perl -wS $0 ${1+"$@"}'
if 0;
#creating the output file
open(OUTFILE, ">$ARGV[0]") or die "can't open >$ARGV[0]";
#open the makefile
open(INFILE, "makefile.mk") or die "can't open makefile.mk";
$inxcs=0;
#search all schemas in the makefile except userprofile and format them as e.g org.openoffice.Inet
while(<INFILE>) {
tr/\r\n//d;
if (/^\s*XCSFILES/) {
$inxcs++;
}
next unless $inxcs;
if ($inxcs) {
$inxcs=0 unless /\\$/;
next if (/^\s*XCSFILES/);
next if (/UserProfile/);
s/^\s+//;
s/\s*\\$//;
s/\.xcs.*$//;
s#\$/#.#g;
push(@comp_names, $_);
}
}
close(INFILE);
# generate the schema in ldif format
foreach (@comp_names) {
s#org.openoffice.#oo-#g;
s#\.#-#g;
$myLdapName=lc $_;
print OUTFILE "dn: cn=schema\n";
print OUTFILE "attributetypes: ($myLdapName-attr-oid NAME '$myLdapName-attr' DESC '$myLdapName attribute' SYNTAX 1.3.6.1.4.1.1466.115.121.1.15 SINGLE_VALUE )\n\n";
print OUTFILE "dn: cn=schema\n";
print OUTFILE "objectclasses: ($myLdapName-class-oid NAME '$myLdapName-class' DESC '$myLdapName objclass' SUP 'top' MAY ($myLdapName-attr \$ ))\n\n";
}
close(OUTFILE);
exit 0;
: # -*- perl -*-
#
# This file is part of the LibreOffice project.
#
# This Source Code Form is subject to the terms of the Mozilla Public
# License, v. 2.0. If a copy of the MPL was not distributed with this
# file, You can obtain one at http://mozilla.org/MPL/2.0/.
#
# This file incorporates work covered by the following license notice:
#
# Licensed to the Apache Software Foundation (ASF) under one or more
# contributor license agreements. See the NOTICE file distributed
# with this work for additional information regarding copyright
# ownership. The ASF licenses this file to you under the Apache
# License, Version 2.0 (the "License"); you may not use this file
# except in compliance with the License. You may obtain a copy of
# the License at http://www.apache.org/licenses/LICENSE-2.0 .
#
# generates of the component schema list mapping file, which
# describes the mapping between OOR and LDAP
eval 'exec perl -wS $0 ${1+"$@"}'
if 0;
#creating the output file
open(OUTFILE, ">$ARGV[0]") or die "can't open >$ARGV[0]";
#open the makefile
open(INFILE, "makefile.mk") or die "can't open makefile.mk";
$inxcs=0;
#search all schemas in the makefile except userprofile and format them as e.g org.openoffice.Inet
while(<INFILE>) {
tr/\r\n//d;
if (/^\s*XCSFILES/) {
$inxcs++;
}
next unless $inxcs;
if ($inxcs) {
$inxcs=0 unless /\\$/;
next if (/^\s*XCSFILES/);
next if (/UserProfile/);
s/^\s+//;
s/\s*\\$//;
s/\.xcs.*$//;
s#\$/#.#g;
push(@comp_names, $_);
}
}
close(INFILE);
# create the properites file
print OUTFILE "# location of the component schema \n";
print OUTFILE "component-schema=schema\n\n";
print OUTFILE "# location of the component data \n";
print OUTFILE "component-data=data\n\n";
$comps=join (';',@comp_names);
print OUTFILE "# installed components \n";
print OUTFILE "components=$comps\n\n";
print OUTFILE "# component mapping \n";
foreach (@comp_names) {
$myCompName=$_;
s#org.openoffice.#oo-#g;
s#\.#-#g;
$myLdapName=lc $_;
print OUTFILE "component/$myCompName/attribute=$myLdapName-attr\n";
print OUTFILE "component/$myCompName/objectclass=$myLdapName-class\n\n";
}
close(OUTFILE);
exit 0;
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment