--- a/tools/relic/make-id-list
+++ b/tools/relic/make-id-list
@@ -1,16 +1,21 @@
#!/usr/bin/perl -w
#
# This is a script to take a long list of Initial Developers on stdin and
# output a de-duped, munged list suitable for putting into about:licence or
# other similar place in order to comply with the MPL section 3.3
# Equivalence mappings; having these is easier than updating hundreds of files
# to make them all use the same variant of each name.
+#
+# Procedure:
+# relic -I -f * > names.txt
+# make-id-list < names.txt > final.txt
+
my %equivalents = (
"ActiveState Tool Corporation" => "ActiveState Tool Corp",
"Activestate Tool Corp" => "ActiveState Tool Corp",
"ActiveState Tool Corp." => "ActiveState Tool Corp",
"Crocodile Clips Ltd." => "Crocodile Clips Ltd",
"Hewlett-Packard Company. Portions created by Hewlett-Packard Company are Copyright" => "Hewlett-Packard Company",
@@ -39,16 +44,17 @@ my %equivalents = (
"Netscape Corp" => "Netscape Communications Corporation",
"Netscape Communications" => "Netscape Communications Corporation",
"Netscape Communications, Inc" => "Netscape Communications Corporation",
"Netscape Communications Corp" => "Netscape Communications Corporation",
"Netscape Communications Corp." => "Netscape Communications Corporation",
"Netscape Commmunications Corp" => "Netscape Communications Corporation",
"Netscape Communications Corp, Inc" => "Netscape Communications Corporation",
"Netscape Communication Corporation" => "Netscape Communications Corporation",
+ "Netscape Communications Corporation." => "Netscape Communications Corporation",
"Novell" => "Novell Inc",
"Novell, Inc" => "Novell Inc",
"Novell Corporation" => "Novell Inc",
"Red Hat Software" => "Red Hat Inc",
"Red Hat" => "Red Hat Inc",
"Red Hat, Inc" => "Red Hat Inc",
@@ -67,28 +73,43 @@ my %equivalents = (
"Digital Creations 2" => "Digital Creations 2 Inc",
"Douglas F. Turner II" => "Doug Turner",
"Kenneth Herron" => "Ken Herron",
"sqlite3", "Sqlite Project",
"University Of Queensland" => "University of Queensland",
"OEOne Corporation" => "OEone Corporation",
"Paul Kocher of Cryptography Research" => "Paul Kocher",
"QUALCOMM incorporated" => "Qualcomm Inc",
+ "QUALCOMM Incorporated" => "Qualcomm Inc",
"Simdesk Technologies" => "Simdesk Technologies Inc",
"Google" => "Google Inc",
"Telephone Corporation)" => "NTT",
-
+ "Disruptive Innovations" => "Disruptive Innovations SARL",
+ "Florian QUEZE" => "Florian Queze",
+ "Nelson B Bolyard" => "Nelson B. Bolyard",
+ "Richard L Walsh" => "Richard L. Walsh",
+ "timeless" => "Josh Soref",
+ "Olivier Parniere BT Global Services / Etat francais Ministere de la Defense" => "Olivier Parniere",
+
"Frank Schoenheit" => "Frank Schönheit",
"Frank Schönheit" => "Frank Schönheit",
"HÃ¥kan Waara" => "Håkan Waara",
"Håkan Waara" => "Håkan Waara",
"Karsten Düsterloh" => "Karsten Düsterloh",
"Simon Bünzli" => "Simon Bünzli",
"Vincent Béron" => "Vincent Béron",
- "Tomas Mšller" => "Tomas Müller",
+ "Tomas Mšller" => "Tomas Müller",
+ "Dão Gottwald" => "Dão Gottwald",
+ "László Németh" => "László N&eacutre;meth",
+ "Björn Jacke" => "Björn Jacke",
+
+ "example Inc" => "Mozilla Foundation",
+ "SeaMonkey team" => "Mozilla Foundation",
+ "person recorded in the version control logs" => "Mozilla Foundation",
+ "None" => "Mozilla Foundation"
);
# 'indevs' == "Initial Developers"
my %indevs;
while (<>)
{
chomp;