Subversion Repositories oidplus

Rev

Rev 699 | Rev 724 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
635 daniel-mar 1 
<?php
2 
 
3 
/*
4 
 * OIDplus 2.0
5 
 * Copyright 2019 - 2021 Daniel Marschall, ViaThinkSoft
6 
 *
7 
 * Licensed under the Apache License, Version 2.0 (the "License");
8 
 * you may not use this file except in compliance with the License.
9 
 * You may obtain a copy of the License at
10 
 *
11 
 *     http://www.apache.org/licenses/LICENSE-2.0
12 
 *
13 
 * Unless required by applicable law or agreed to in writing, software
14 
 * distributed under the License is distributed on an "AS IS" BASIS,
15 
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
16 
 * See the License for the specific language governing permissions and
17 
 * limitations under the License.
18 
 */
19 
 
20 
if (!defined('INSIDE_OIDPLUS')) die();
21 
 
22 
class OIDplusPageAdminOIDInfoExport extends OIDplusPagePluginAdmin {
23 
 
24 
        /*private*/ const QUERY_LIST_OIDINFO_OIDS_V1 = '1.3.6.1.4.1.37476.2.5.2.1.5.1';
25 
        /*private*/ const QUERY_GET_OIDINFO_DATA_V1  = '1.3.6.1.4.1.37476.2.5.2.1.6.1';
26 
 
27 
        public function action($actionID, $params) {
28 
 
29 
                if ($actionID == 'import_xml_file') {
30 
                        if (!OIDplus::authUtils()->isAdminLoggedIn()) {
31 
                                throw new OIDplusException(_L('You need to <a %1>log in</a> as administrator.',OIDplus::gui()->link('oidplus:login$admin')));
32 
                        }
33 
 
34 
                        if (!isset($_FILES['userfile'])) {
35 
                                throw new OIDplusException(_L('Please choose a file.'));
36 
                        }
37 
 
38 
                        $xml_contents = file_get_contents($_FILES['userfile']['tmp_name']);
39 
 
40 
                        $errors = array();
41 
                        list($count_imported_oids, $count_already_existing, $count_errors, $count_warnings) = $this->oidinfoImportXML($xml_contents, $errors, $replaceExistingOIDs=false, $orphan_mode=self::ORPHAN_AUTO_DEORPHAN);
42 
                        if (count($errors) > 0) {
43 
                                // Note: These "errors" can also be warnings (partial success)
44 
                                // TODO: since the output can be very long, should we really show it in a JavaScript alert() ?!
45 
                                return array(
46 
                                        "status" => -1,
47 
                                        "count_imported_oids" => $count_imported_oids,
48 
                                        "count_already_existing" => $count_already_existing,
49 
                                        "count_errors" => $count_errors,
50 
                                        "count_warnings" => $count_warnings,
51 
                                        "error" => implode("\n",$errors)
52 
                                );
53 
                        } else {
54 
                                return array(
55 
                                        "status" => 0,
56 
                                        "count_imported_oids" => $count_imported_oids,
57 
                                        "count_already_existing" => $count_already_existing,
58 
                                        "count_errors" => $count_errors,
59 
                                        "count_warnings" => $count_warnings
60 
                                );
61 
                        }
62 
                } else if ($actionID == 'import_oidinfo_oid') {
63 
                        if (!OIDplus::authUtils()->isAdminLoggedIn()) {
64 
                                throw new OIDplusException(_L('You need to <a %1>log in</a> as administrator.',OIDplus::gui()->link('oidplus:login$admin')));
65 
                        }
66 
 
67 
                        _CheckParamExists($params, 'oid');
68 
 
69 
                        $oid = $params['oid'];
70 
 
71 
                        $query = self::QUERY_GET_OIDINFO_DATA_V1;
72 
 
73 
                        $payload = array(
74 
                                "query" => $query, // we must repeat the query because we want to sign it
75 
                                "system_id" => OIDplus::getSystemId(false),
76 
                                "oid" => $oid
77 
                        );
78 
 
79 
                        $signature = '';
80 
                        if (!OIDplus::getPkiStatus() || !@openssl_sign(json_encode($payload), $signature, OIDplus::config()->getValue('oidplus_private_key'))) {
81 
                                if (!OIDplus::getPkiStatus()) {
82 
                                        throw new OIDplusException(_L('Error: Your system could not generate a private/public key pair. (OpenSSL is probably missing on your system). Therefore, you cannot register/unregister your OIDplus instance.'));
83 
                                } else {
84 
                                        throw new OIDplusException(_L('Signature failed'));
85 
                                }
86 
                        }
87 
 
88 
                        $data = array(
89 
                                "payload" => $payload,
90 
                                "signature" => base64_encode($signature)
91 
                        );
92 
 
93 
                        if (!function_exists('curl_init')) {
94 
                                throw new OIDplusException(_L('The "%1" PHP extension is not installed at your system. Please enable the PHP extension <code>%2</code>.','CURL','php_curl'));
95 
                        }
96 
 
699 daniel-mar 97 
                        if (OIDplus::getEditionInfo()['vendor'] != 'ViaThinkSoft') {
98 
                                // The oid-info.com import functionality is a confidential API between ViaThinkSoft and oid-info.com and cannot be used in forks of OIDplus
99 
                                throw new OIDplusException(_L('This feature is only available in the ViaThinkSoft edition of OIDplus'));
100 
                        }
101 
 
635 daniel-mar 102 
                        $ch = curl_init();
103 
                        if (ini_get('curl.cainfo') == '') curl_setopt($ch, CURLOPT_CAINFO, OIDplus::localpath() . 'vendor/cacert.pem');
104 
                        curl_setopt($ch, CURLOPT_URL, 'https://oidplus.viathinksoft.com/reg2/query.php');
715 daniel-mar 105 
                        curl_setopt($ch, CURLOPT_USERAGENT, 'ViaThinkSoft-OIDplus/2.0');
635 daniel-mar 106 
                        curl_setopt($ch, CURLOPT_POST, 1);
107 
                        if (function_exists('gzdeflate')) {
108 
                                $compressed = "1";
109 
                                $data2 = gzdeflate(json_encode($data));
110 
                        } else {
111 
                                $compressed = "0";
112 
                                $data2 = json_encode($data);
113 
                        }
114 
                        curl_setopt($ch, CURLOPT_POSTFIELDS, "query=".urlencode($query)."&compressed=$compressed&data=".urlencode(base64_encode($data2)));
115 
                        curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
116 
                        curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
117 
                        curl_setopt($ch, CURLOPT_AUTOREFERER, true);
118 
                        if (!($res = @curl_exec($ch))) {
119 
                                throw new OIDplusException(_L('Communication with ViaThinkSoft server failed: %1',curl_error($ch)));
120 
                        }
121 
                        curl_close($ch);
122 
 
123 
                        $json = @json_decode($res, true);
124 
 
125 
                        if (!$json) {
126 
                                return array(
127 
                                        "status" => -1,
128 
                                        "error" => _L('JSON reply from ViaThinkSoft decoding error: %1',$res)
129 
                                );
130 
                        }
131 
 
132 
                        if (isset($json['error']) || ($json['status'] < 0)) {
133 
                                return array(
134 
                                        "status" => -1,
135 
                                        "error" => isset($json['error']) ? $json['error'] : _L('Received error status code: %1',$json['status'])
136 
                                );
137 
                        }
138 
 
139 
                        $errors = array();
140 
                        list($count_imported_oids, $count_already_existing, $count_errors, $count_warnings) = $this->oidinfoImportXML('<oid-database>'.$json['xml'].'</oid-database>', $errors, $replaceExistingOIDs=false, $orphan_mode=self::ORPHAN_DISALLOW_ORPHANS);
141 
                        if (count($errors) > 0) {
142 
                                return array("status" => -1, "error" => implode("\n",$errors));
143 
                        } else if ($count_imported_oids <> 1) {
144 
                                return array("status" => -1, "error" => _L('Imported %1, but expected to import 1',$count_imported_oids));
145 
                        } else {
146 
                                return array("status" => 0);
147 
                        }
148 
                } else {
149 
                        throw new OIDplusException(_L('Unknown action ID'));
150 
                }
151 
        }
152 
 
153 
        public function init($html=true) {
154 
                // Nothing
155 
        }
156 
 
157 
        public function gui($id, &$out, &$handled) {
158 
                $ary = explode('$', $id);
159 
                if (isset($ary[1])) {
160 
                        $id = $ary[0];
161 
                        $tab = $ary[1];
162 
                } else {
163 
                        $tab = 'export';
164 
                }
165 
                if ($id === 'oidplus:oidinfo_compare_export') {
166 
                        $handled = true;
167 
                        $out['title'] = _L('List OIDs in your system which are missing at oid-info.com');
168 
                        $out['icon'] = file_exists(__DIR__.'/icon_big.png') ? OIDplus::webpath(__DIR__).'icon_big.png' : '';
169 
 
170 
                        if (!OIDplus::authUtils()->isAdminLoggedIn()) {
171 
                                $out['icon'] = 'img/error_big.png';
172 
                                $out['text'] = '<p>'._L('You need to <a %1>log in</a> as administrator.',OIDplus::gui()->link('oidplus:login$admin')).'</p>';
173 
                                return;
174 
                        }
175 
 
176 
                        $query = self::QUERY_LIST_OIDINFO_OIDS_V1;
177 
 
178 
                        $payload = array(
179 
                                "query" => $query, // we must repeat the query because we want to sign it
180 
                                "system_id" => OIDplus::getSystemId(false),
181 
                                "show_all" => 1 // this is required so that the VTS OIDRA gets no false notifications for adding the systems in the directory 1.3.6.1.4.1.37476.30.9
182 
                        );
183 
 
184 
                        $signature = '';
185 
                        if (!OIDplus::getPkiStatus() || !@openssl_sign(json_encode($payload), $signature, OIDplus::config()->getValue('oidplus_private_key'))) {
186 
                                if (!OIDplus::getPkiStatus()) {
187 
                                        throw new OIDplusException(_L('Error: Your system could not generate a private/public key pair. (OpenSSL is probably missing on your system). Therefore, you cannot register/unregister your OIDplus instance.'));
188 
                                } else {
189 
                                        throw new OIDplusException(_L('Signature failed'));
190 
                                }
191 
                        }
192 
 
193 
                        $data = array(
194 
                                "payload" => $payload,
195 
                                "signature" => base64_encode($signature)
196 
                        );
197 
 
198 
                        if (!function_exists('curl_init')) {
199 
                                throw new OIDplusException(_L('The "%1" PHP extension is not installed at your system. Please enable the PHP extension <code>%2</code>.','CURL','php_curl'));
200 
                        }
201 
 
699 daniel-mar 202 
                        if (OIDplus::getEditionInfo()['vendor'] != 'ViaThinkSoft') {
203 
                                // The oid-info.com import functionality is a confidential API between ViaThinkSoft and oid-info.com and cannot be used in forks of OIDplus
204 
                                throw new OIDplusException(_L('This feature is only available in the ViaThinkSoft edition of OIDplus'));
205 
                        }
206 
 
635 daniel-mar 207 
                        $ch = curl_init();
208 
                        if (ini_get('curl.cainfo') == '') curl_setopt($ch, CURLOPT_CAINFO, OIDplus::localpath() . 'vendor/cacert.pem');
209 
                        curl_setopt($ch, CURLOPT_URL, 'https://oidplus.viathinksoft.com/reg2/query.php');
715 daniel-mar 210 
                        curl_setopt($ch, CURLOPT_USERAGENT, 'ViaThinkSoft-OIDplus/2.0');
635 daniel-mar 211 
                        curl_setopt($ch, CURLOPT_POST, 1);
212 
                        if (function_exists('gzdeflate')) {
213 
                                $compressed = "1";
214 
                                $data2 = gzdeflate(json_encode($data));
215 
                        } else {
216 
                                $compressed = "0";
217 
                                $data2 = json_encode($data);
218 
                        }
219 
                        curl_setopt($ch, CURLOPT_POSTFIELDS, "query=".urlencode($query)."&compressed=$compressed&data=".urlencode(base64_encode($data2)));
220 
                        curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
221 
                        curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
222 
                        curl_setopt($ch, CURLOPT_AUTOREFERER, true);
223 
                        if (!($res = @curl_exec($ch))) {
224 
                                throw new OIDplusException(_L('Communication with ViaThinkSoft server failed: %1',curl_error($ch)));
225 
                        }
226 
                        curl_close($ch);
227 
 
228 
                        $out['text'] = '<p><a '.OIDplus::gui()->link('oidplus:datatransfer$export').'><img src="img/arrow_back.png" width="16" alt="'._L('Go back').'"> '._L('Go back to data transfer main page').'</a></p>';
229 
 
230 
                        $json = @json_decode($res, true);
231 
 
232 
                        if (!$json) {
233 
                                $out['icon'] = 'img/error_big.png';
234 
                                $out['text'] .= _L('JSON reply from ViaThinkSoft decoding error: %1',$res);
235 
                                return;
236 
                        }
237 
 
238 
                        if (isset($json['error']) || ($json['status'] < 0)) {
239 
                                $out['icon'] = 'img/error_big.png';
240 
                                if (isset($json['error'])) {
241 
                                        $out['text'] .= _L('Received error: %1',$json['error']);
242 
                                } else {
243 
                                        $out['text'] .= _L('Received error status code: %1',$json['status']);
244 
                                }
245 
                                return;
246 
                        }
247 
 
248 
                        if (isset($json['error']) || ($json['status'] < 0)) {
249 
                                $out['text'] .= '<p>'._L('Error: %1',htmlentities($json['error'])).'</p>';
250 
                        } else {
251 
                                // TODO: If roots were created or deleted recently, we must do a re-query of the registration, so that the "roots" information at the directory service gets refreshed
252 
                                if (count($json['roots']) == 0) $out['text'] .= '<p>'._L('In order to use this feature, you need to have at least one (root) OID added in your system, and the system needs to report the newly added root to the directory service (the reporting interval is 1 hour).').'</p>';
253 
                                foreach ($json['roots'] as $root) {
254 
                                        $oid = $root['oid'];
255 
                                        $out['text'] .= '<h2>'._L('Root OID %1',$oid).'</h2>';
256 
                                        if ($root['verified']) {
257 
                                                $count = 0;
258 
                                                $out['text'] .= '<div class="container box"><div id="suboid_table" class="table-responsive">';
259 
                                                $out['text'] .= '<table class="table table-bordered table-striped">';
260 
                                                $out['text'] .= '<tr><th colspan="3">'._L('Actions').'</th><th>'._L('OID').'</th></tr>';
261 
 
262 
                                                $lookup_nonoid = array();
263 
                                                $row_lookup = array();
264 
 
265 
                                                $all_local_oids_of_root = array();
266 
                                                $res = OIDplus::db()->query("select * from ###objects where confidential <> 1");
267 
                                                while ($row = $res->fetch_object()) {
268 
                                                        $obj = OIDplusObject::parse($row->id);
269 
                                                        if (!$obj) continue; // can happen when object type is not enabled
270 
                                                        if ($obj->isConfidential()) continue; // This will also exclude OIDs which are descendants of confidential OIDs
271 
                                                        if (strpos($row->id, 'oid:') === 0) {
272 
                                                                $oid = substr($row->id,strlen('oid:'));
273 
                                                                if (strpos($oid.'.', $root['oid']) === 0) {
274 
                                                                        $row_lookup[$oid] = $row;
275 
                                                                        $all_local_oids_of_root[] = $oid;
276 
                                                                }
277 
                                                        } else {
278 
                                                                $aids = $obj->getAltIds();
279 
                                                                foreach ($aids as $aid) {
280 
                                                                        if ($aid->getNamespace() == 'oid') {
281 
                                                                                $oid = $aid->getId();
282 
                                                                                if (strpos($oid.'.', $root['oid']) === 0) {
283 
                                                                                        $row_lookup[$oid] = $row;
284 
                                                                                        $all_local_oids_of_root[] = $oid;
285 
                                                                                        $lookup_nonoid[$oid] = $row->id;
286 
                                                                                }
287 
                                                                        }
288 
                                                                }
289 
                                                        }
290 
                                                }
291 
 
292 
                                                natsort($all_local_oids_of_root);
293 
                                                foreach ($all_local_oids_of_root as $local_oid) {
294 
                                                        if (!in_array($local_oid, $root['children'])) {
295 
                                                                $count++;
296 
 
297 
                                                                // Start: Build oid-info.com create URL
298 
 
299 
                                                                $row = $row_lookup[$local_oid];
300 
 
301 
                                                                $url = "http://www.oid-info.com/cgi-bin/manage?f=".oid_up($local_oid)."&a=create";
302 
 
303 
                                                                $tmp = explode('.',$local_oid);
304 
                                                                $url .= "&nb=".urlencode(array_pop($tmp));
305 
 
306 
                                                                $asn1_ids = array();
307 
                                                                $res2 = OIDplus::db()->query("select * from ###asn1id where oid = ?", array($row->id));
308 
                                                                while ($row2 = $res2->fetch_object()) {
309 
                                                                        $asn1_ids[] = $row2->name; // 'unicode-label' is currently not in the standard format (oid.xsd)
310 
                                                                }
311 
                                                                $url .= "&id=".array_shift($asn1_ids); // urlencode() is already done (see above)
312 
                                                                $url .= "&syn_id=".implode('%0A', $asn1_ids); // urlencode() is already done (see above)
313 
 
314 
                                                                $iri_ids = array();
315 
                                                                $res2 = OIDplus::db()->query("select * from ###iri where oid = ?", array($row->id));
316 
                                                                while ($row2 = $res2->fetch_object()) {
317 
                                                                        $iri_ids[] = $row2->name;
318 
                                                                }
319 
                                                                $url .= "&unicode_label_list=".implode('%0A', $iri_ids); // urlencode() is already done (see above)
320 
 
321 
                                                                if (!empty($row->title)) {
322 
                                                                        $tmp_description = $row->title;
323 
                                                                        $tmp_information = $row->description;/** @phpstan-ignore-line */
324 
                                                                        if (trim($row->title) == trim(strip_tags($row->description))) {/** @phpstan-ignore-line */
325 
                                                                                $tmp_information = '';
326 
                                                                        }
327 
                                                                } else if (isset($asn1_ids[0])) {
328 
                                                                        $tmp_description = '"'.$asn1_ids[0].'"';
329 
                                                                        $tmp_information = $row->description;
330 
                                                                } else if (isset($iri_ids[0])) {
331 
                                                                        $tmp_description = '"'.$iri_ids[0].'"';
332 
                                                                        $tmp_information = $row->description;
333 
                                                                } else if (!empty($row->description)) {
334 
                                                                        $tmp_description = $row->description;
335 
                                                                        $tmp_information = '';
336 
                                                                } else if (!empty($row->comment)) {
337 
                                                                        $tmp_description = $row->comment;
338 
                                                                        $tmp_information = '';
339 
                                                                } else {
340 
                                                                        $tmp_description = '<i>No description available</i>'; // do not translate
341 
                                                                        $tmp_information = '';
342 
                                                                }
343 
 
344 
                                                                if ($tmp_information != '') {
345 
                                                                        $tmp_information .= '<br/><br/>';
346 
                                                                }
347 
 
348 
                                                                $tmp_information .= 'See <a href="'.OIDplus::webpath(null,false).'?goto='.urlencode($id).'">more information</a>.'; // do not translate
349 
 
350 
                                                                if (explode(':',$id,2)[0] != 'oid') {
351 
                                                                        $tmp_information = "Object: $id\n\n" . $tmp_information; // do not translate
352 
                                                                }
353 
 
354 
                                                                $url .= "&description=".urlencode(self::repair_relative_links($tmp_description));
355 
                                                                $url .= "&info=".urlencode(self::repair_relative_links($tmp_information));
356 
 
357 
                                                                $url .= "&current_registrant_email=".urlencode($row->ra_email);
358 
 
359 
                                                                $res2 = OIDplus::db()->query("select * from ###ra where email = ?", array($row->ra_email));
360 
                                                                if ($res2->num_rows() > 0) {
361 
                                                                        $row2 = $res2->fetch_object();
362 
 
363 
                                                                        $tmp = array();
364 
                                                                        if (!empty($row2->personal_name)) {
365 
                                                                                $name_ary = split_firstname_lastname($row2->personal_name);
366 
                                                                                $tmp_first_name = $name_ary[0];
367 
                                                                                $tmp_last_name  = $name_ary[1];
368 
                                                                                if (!empty($row2->ra_name)       ) $tmp[] = $row2->ra_name;
369 
                                                                                if (!empty($row2->office)        ) $tmp[] = $row2->office;
370 
                                                                                if (!empty($row2->organization)  ) $tmp[] = $row2->organization;
371 
                                                                        } else {
372 
                                                                                $tmp_first_name = $row2->ra_name;
373 
                                                                                $tmp_last_name  = '';
374 
                                                                                if (!empty($row2->personal_name) ) $tmp[] = $row2->personal_name;
375 
                                                                                if (!empty($row2->office)        ) $tmp[] = $row2->office;
376 
                                                                                if (!empty($row2->organization)  ) $tmp[] = $row2->organization;
377 
                                                                        }
378 
 
379 
                                                                        if (empty($tmp_first_name) || empty($tmp_last_name)) {
380 
                                                                                $name = self::split_name($tmp_first_name.' '.$tmp_last_name);
381 
                                                                                $tmp_first_name = $name[0];
382 
                                                                                $tmp_last_name = $name[1];
383 
                                                                        }
384 
                                                                        $url .= "&current_registrant_first_name=".urlencode($tmp_first_name);
385 
                                                                        $url .= "&current_registrant_last_name=".urlencode($tmp_last_name);
386 
 
387 
                                                                        if ((count($tmp) > 0) && ($tmp[0] == $row2->ra_name)) array_shift($tmp);
388 
                                                                        $tmp = array_unique($tmp);
389 
 
390 
                                                                        if (!$row2->privacy) {
391 
                                                                                if (!empty($row2->street))   $tmp[] = $row2->street;
392 
                                                                                if (!empty($row2->zip_town)) $tmp[] = $row2->zip_town;
393 
                                                                                if (!empty($row2->country))  $tmp[] = $row2->country;
394 
                                                                                $url .= "&current_registrant_tel=".urlencode(!empty($row2->phone) ? $row2->phone : $row2->mobile);
395 
                                                                                $url .= "&current_registrant_fax=".urlencode($row2->fax);
396 
                                                                        }
397 
                                                                        if (empty($row2->zip_town) && empty($row2->country)) {
398 
                                                                                // The address is useless if we do neither know city nor country
399 
                                                                                // Ignore it
400 
                                                                        } else {
401 
                                                                                $tmp = self::split_address_country(implode("<br/>", $tmp));
402 
                                                                                $url .= "&current_registrant_address=".urlencode($tmp[0]);
403 
                                                                                $url .= "&current_registrant_country=".urlencode($tmp[1]);
404 
                                                                        }
405 
                                                                }
406 
                                                                if (!empty($row->updated)) {
407 
                                                                        $tmp = explode('-', self::_formatdate($row->updated));
408 
                                                                        $url .= "&modification_year=".urlencode($tmp[0]);
409 
                                                                        $url .= "&modification_month=".urlencode($tmp[1]);
410 
                                                                        $url .= "&modification_day=".urlencode($tmp[2]);
411 
                                                                }
412 
 
413 
                                                                //$url .= "&submitter_last_name=".urlencode($xml->{'submitter'}->{'last-name'});
414 
                                                                //$url .= "&submitter_first_name=".urlencode($xml->{'submitter'}->{'first-name'});
415 
                                                                //$url .= "&submitter_email=".urlencode($xml->{'submitter'}->{'email'});
416 
 
417 
                                                                // End: Build oid-info.com create URL
418 
 
419 
                                                                // Note: "Actions" is at the left, because it has a fixed width, so the user can continue clicking without the links moving if the OID length changes between lines
420 
                                                                $out['text'] .= '<tr id="missing_oid_'.str_replace('.','_',$local_oid).'">'.
421 
                                                                '<td><a '.OIDplus::gui()->link(isset($lookup_nonoid[$local_oid]) ? $lookup_nonoid[$local_oid] : 'oid:'.$local_oid, true).'>'._L('View local OID').'</a></td>'.
422 
                                                                '<td><a href="javascript:OIDplusPageAdminOIDInfoExport.removeMissingOid(\''.$local_oid.'\');">'._L('Ignore for now').'</a></td>'.
423 
                                                                '<td><a target="_blank" href="'.$url.'">'._L('Add to oid-info.com manually').'</a></td>'.
424 
                                                                '<td>'.$local_oid.'</td>'.
425 
                                                                '</tr>';
426 
                                                        }
427 
                                                }
428 
                                                if ($count == 0) {
429 
                                                        $out['text'] .= '<tr><td colspan="4">'._L('No missing OIDs found').'</td></tr>';
430 
                                                }
431 
                                                $out['text'] .= '</table></div></div>';
432 
                                        } else {
433 
                                                $out['text'] .= '<p>'._L('This root is not validated. Please send an email to %1 in order to request ownership verification of this root OID.',$json['vts_verification_email']).'</p>';
434 
                                        }
435 
                                }
436 
                        }
437 
                }
438 
 
439 
                if ($id === 'oidplus:oidinfo_compare_import') {
440 
                        $handled = true;
441 
                        $out['title'] = _L('List OIDs at oid-info.com which are missing in your system');
442 
                        $out['icon'] = file_exists(__DIR__.'/icon_big.png') ? OIDplus::webpath(__DIR__).'icon_big.png' : '';
443 
 
444 
                        if (!OIDplus::authUtils()->isAdminLoggedIn()) {
445 
                                $out['icon'] = 'img/error_big.png';
446 
                                $out['text'] = '<p>'._L('You need to <a %1>log in</a> as administrator.',OIDplus::gui()->link('oidplus:login$admin')).'</p>';
447 
                                return;
448 
                        }
449 
 
450 
                        $query = self::QUERY_LIST_OIDINFO_OIDS_V1;
451 
 
452 
                        $payload = array(
453 
                                "query" => $query, // we must repeat the query because we want to sign it
454 
                                "system_id" => OIDplus::getSystemId(false),
455 
                                "show_all" => 0
456 
                        );
457 
 
458 
                        $signature = '';
459 
                        if (!OIDplus::getPkiStatus() || !@openssl_sign(json_encode($payload), $signature, OIDplus::config()->getValue('oidplus_private_key'))) {
460 
                                if (!OIDplus::getPkiStatus()) {
461 
                                        throw new OIDplusException(_L('Error: Your system could not generate a private/public key pair. (OpenSSL is probably missing on your system). Therefore, you cannot register/unregister your OIDplus instance.'));
462 
                                } else {
463 
                                        throw new OIDplusException(_L('Signature failed'));
464 
                                }
465 
                        }
466 
 
467 
                        $data = array(
468 
                                "payload" => $payload,
469 
                                "signature" => base64_encode($signature)
470 
                        );
471 
 
472 
                        if (!function_exists('curl_init')) {
473 
                                throw new OIDplusException(_L('The "%1" PHP extension is not installed at your system. Please enable the PHP extension <code>%2</code>.','CURL','php_curl'));
474 
                        }
475 
 
699 daniel-mar 476 
                        if (OIDplus::getEditionInfo()['vendor'] != 'ViaThinkSoft') {
477 
                                // The oid-info.com import functionality is a confidential API between ViaThinkSoft and oid-info.com and cannot be used in forks of OIDplus
478 
                                throw new OIDplusException(_L('This feature is only available in the ViaThinkSoft edition of OIDplus'));
479 
                        }
480 
 
635 daniel-mar 481 
                        $ch = curl_init();
482 
                        if (ini_get('curl.cainfo') == '') curl_setopt($ch, CURLOPT_CAINFO, OIDplus::localpath() . 'vendor/cacert.pem');
483 
                        curl_setopt($ch, CURLOPT_URL, 'https://oidplus.viathinksoft.com/reg2/query.php');
715 daniel-mar 484 
                        curl_setopt($ch, CURLOPT_USERAGENT, 'ViaThinkSoft-OIDplus/2.0');
635 daniel-mar 485 
                        curl_setopt($ch, CURLOPT_POST, 1);
486 
                        if (function_exists('gzdeflate')) {
487 
                                $compressed = "1";
488 
                                $data2 = gzdeflate(json_encode($data));
489 
                        } else {
490 
                                $compressed = "0";
491 
                                $data2 = json_encode($data);
492 
                        }
493 
                        curl_setopt($ch, CURLOPT_POSTFIELDS, "query=".urlencode($query)."&compressed=$compressed&data=".urlencode(base64_encode($data2)));
494 
                        curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
495 
                        curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
496 
                        curl_setopt($ch, CURLOPT_AUTOREFERER, true);
497 
                        if (!($res = @curl_exec($ch))) {
498 
                                throw new OIDplusException(_L('Communication with ViaThinkSoft server failed: %1',curl_error($ch)));
499 
                        }
500 
                        curl_close($ch);
501 
 
502 
                        $out['text'] = '<p><a '.OIDplus::gui()->link('oidplus:datatransfer$import').'><img src="img/arrow_back.png" width="16" alt="'._L('Go back').'"> '._L('Go back to data transfer main page').'</a></p>';
503 
 
504 
                        $json = @json_decode($res, true);
505 
 
506 
                        if (!$json) {
507 
                                $out['icon'] = 'img/error_big.png';
508 
                                $out['text'] .= _L('JSON reply from ViaThinkSoft decoding error: %1',$res);
509 
                                return;
510 
                        }
511 
 
512 
                        if (isset($json['error']) || ($json['status'] < 0)) {
513 
                                $out['icon'] = 'img/error_big.png';
514 
                                if (isset($json['error'])) {
515 
                                        $out['text'] .= _L('Received error: %1',$json['error']);
516 
                                } else {
517 
                                        $out['text'] .= _L('Received error status code: %1',$json['status']);
518 
                                }
519 
                                return;
520 
                        }
521 
 
522 
                        $all_local_oids = array();
523 
                        $res = OIDplus::db()->query("select id from ###objects");
524 
                        while ($row = $res->fetch_array()) {
525 
                                if (strpos($row['id'], 'oid:') === 0) {
526 
                                        $all_local_oids[] = substr($row['id'],strlen('oid:'));
527 
                                } else {
528 
                                        $obj = OIDplusObject::parse($row['id']);
529 
                                        if (!$obj) continue; // can happen when object type is not enabled
530 
                                        $aids = $obj->getAltIds();
531 
                                        foreach ($aids as $aid) {
532 
                                                if ($aid->getNamespace() == 'oid') {
533 
                                                        $all_local_oids[] = $aid->getId();
534 
                                                }
535 
                                        }
536 
                                }
537 
                        }
538 
 
539 
                        if (isset($json['error']) || ($json['status'] < 0)) {
540 
                                $out['text'] .= '<p>'._L('Error: %1',htmlentities($json['error'])).'</p>';
541 
                        } else {
542 
                                // TODO: If roots were created or deleted recently, we must do a re-query of the registration, so that the "roots" information at the directory service gets refreshed
543 
                                if (count($json['roots']) == 0) $out['text'] .= '<p>'._L('In order to use this feature, you need to have at least one (root) OID added in your system, and the system needs to report the newly added root to the directory service (the reporting interval is 1 hour).').'</p>';
544 
                                foreach ($json['roots'] as $root) {
545 
                                        $oid = $root['oid'];
546 
                                        $out['text'] .= '<h2>'._L('Root OID %1',$oid).'</h2>';
547 
                                        // TODO: "Import all" button
548 
                                        if ($root['verified']) {
549 
                                                $count = 0;
550 
                                                $out['text'] .= '<div class="container box"><div id="suboid_table" class="table-responsive">';
551 
                                                $out['text'] .= '<table class="table table-bordered table-striped">';
552 
                                                $out['text'] .= '<tr><th colspan="4">'._L('Actions').'</th><th>'._L('OID').'</th></tr>';
553 
                                                natsort($root['children']);
554 
                                                foreach ($root['children'] as $child_oid) {
555 
                                                        if (!in_array($child_oid, $all_local_oids)) {
556 
                                                                $count++;
557 
                                                                // Note: "Actions" is at the left, because it has a fixed width, so the user can continue clicking without the links moving if the OID length changes between lines
558 
                                                                $out['text'] .= '<tr id="missing_oid_'.str_replace('.','_',$child_oid).'">'.
559 
                                                                '<td><a target="_blank" href="http://www.oid-info.com/get/'.$child_oid.'">'._L('View OID at oid-info.com').'</a></td>'.
560 
                                                                '<td><a href="javascript:OIDplusPageAdminOIDInfoExport.removeMissingOid(\''.$child_oid.'\');">'._L('Ignore for now').'</a></td>'.
561 
                                                                '<td><a href="mailto:admin@oid-info.com">'._L('Report illegal OID').'</a></td>'.
562 
                                                                (strpos($child_oid,'1.3.6.1.4.1.37476.30.9.') === 0 ? '<td>&nbsp;</td>' : '<td><a href="javascript:OIDplusPageAdminOIDInfoExport.importMissingOid(\''.$child_oid.'\');">'._L('Import OID').'</a></td>').
563 
                                                                '<td>'.$child_oid.'</td>'.
564 
                                                                '</tr>';
565 
                                                        }
566 
                                                }
567 
                                                if ($count == 0) {
568 
                                                        $out['text'] .= '<tr><td colspan="5">'._L('No extra OIDs found').'</td></tr>';
569 
                                                }
570 
                                                $out['text'] .= '</table></div></div>';
571 
                                        } else {
572 
                                                $out['text'] .= '<p>'._L('This root is not validated. Please send an email to %1 in order to request ownership verification of this root OID.',$json['vts_verification_email']).'</p>';
573 
                                        }
574 
                                }
575 
                        }
576 
                }
577 
 
578 
                if ($id === 'oidplus:datatransfer') {
579 
                        $handled = true;
580 
                        $out['title'] = _L('Data Transfer');
581 
                        $out['icon'] = file_exists(__DIR__.'/icon_big.png') ? OIDplus::webpath(__DIR__).'icon_big.png' : '';
582 
 
583 
                        if (!OIDplus::authUtils()->isAdminLoggedIn()) {
584 
                                $out['icon'] = 'img/error_big.png';
585 
                                $out['text'] = '<p>'._L('You need to <a %1>log in</a> as administrator.',OIDplus::gui()->link('oidplus:login$admin')).'</p>';
586 
                                return;
587 
                        }
588 
 
589 
                        $out['text'] = '<br><div id="dataTransferArea" style="visibility: hidden"><div id="dataTransferTab" class="container" style="width:100%;">';
590 
 
591 
                        // ---------------- Tab control
592 
                        $out['text'] .= OIDplus::gui()->tabBarStart();
593 
                        $out['text'] .= OIDplus::gui()->tabBarElement('export', _L('Export'), $tab === 'export');
594 
                        $out['text'] .= OIDplus::gui()->tabBarElement('import', _L('Import'), $tab === 'import');
595 
                        $out['text'] .= OIDplus::gui()->tabBarEnd();
596 
                        $out['text'] .= OIDplus::gui()->tabContentStart();
597 
                        // ---------------- "Export" tab
598 
                        $tabcont  = '<h2>'._L('Generate XML file containing all OIDs').'</h2>';
599 
                        $tabcont .= '<p>'._L('These XML files are following the <a %1>XML schema</a> of <b>oid-info.com</b>. They can be used for various purposes though.','href="http://www.oid-info.com/oid.xsd" target="_blank"').'</p>';
600 
                        $tabcont .= '<p><input type="button" onclick="window.open(\''.OIDplus::webpath(__DIR__).'oidinfo_export.php\',\'_blank\')" value="'._L('Generate XML (all OIDs)').'"></p>';
601 
                        $tabcont .= '<p><input type="button" onclick="window.open(\''.OIDplus::webpath(__DIR__).'oidinfo_export.php?online=1\',\'_blank\')" value="'._L('Generate XML (only OIDs which do not exist at oid-info.com)').'"></p>';
602 
                        $tabcont .= '<p><a href="http://www.oid-info.com/submit.htm" target="_blank">'._L('Upload XML files manually to oid-info.com').'</a></p>';
603 
                        $tabcont .= '<br><p>'._L('Attention: Do not use this XML Export/Import to exchange, backup or restore data between OIDplus systems!<br>It will cause various loss of information, e.g. because Non-OIDs like GUIDs are converted in OIDs and can\'t be converted back.').'</p>';
604 
                        $tabcont .= '<h2>'._L('Automatic export to oid-info.com').'</h2>';
605 
                        $privacy_level = OIDplus::config()->getValue('reg_privacy');
606 
                        if ($privacy_level == 0) {
607 
                                $tabcont .= '<p>'._L('All your OIDs will automatically submitted to oid-info.com through the remote directory service in regular intervals.').' (<a '.OIDplus::gui()->link('oidplus:srv_registration').'>'._L('Change preference').'</a>)</p>';
608 
                        } else {
609 
                                $tabcont .= '<p>'._L('If you set the privacy option to "0" (your system is registered), then all your OIDs will be automatically exported to oid-info.com.').' (<a '.OIDplus::gui()->link('oidplus:srv_registration').'>'._L('Change preference').'</a>)</p>';
610 
                        }
611 
                        $tabcont .= '<h2>'._L('Comparison with oid-info.com').'</h2>';
612 
                        $tabcont .= '<p><a '.OIDplus::gui()->link('oidplus:oidinfo_compare_export').'>'._L('List OIDs in your system which are missing at oid-info.com').'</a></p>';
613 
                        $out['text'] .= OIDplus::gui()->tabContentPage('export', $tabcont, $tab === 'export');
614 
                        // ---------------- "Import" tab
615 
                        $tabcont  = '<h2>'._L('Import XML file').'</h2>';
616 
                        $tabcont .= '<p>'._L('These XML files are following the <a %1>XML schema</a> of <b>oid-info.com</b>.','href="http://www.oid-info.com/oid.xsd" target="_blank"').'</p>';
617 
                        // TODO: we need a waiting animation!
618 
                        $tabcont .= '<form action="javascript:void(0);" onsubmit="return OIDplusPageAdminOIDInfoExport.uploadXmlFileOnSubmit(this);" enctype="multipart/form-data" id="uploadXmlFileForm">';
619 
                        $tabcont .= '<div>'._L('Choose XML file here').':<input type="file" name="userfile" value="" id="userfile">';
620 
                        $tabcont .= '<br><input type="submit" value="'._L('Import XML').'"></div>';
621 
                        $tabcont .= '</form>';
622 
                        $tabcont .= '<br><p>'._L('Attention: Do not use this XML Export/Import to exchange, backup or restore data between OIDplus systems!<br>It will cause various loss of information, e.g. because Non-OIDs like GUIDs are converted in OIDs and can\'t be converted back.').'</p>';
623 
                        $tabcont .= '<h2>'._L('Comparison with oid-info.com').'</h2>';
624 
                        $tabcont .= '<p><a '.OIDplus::gui()->link('oidplus:oidinfo_compare_import').'>'._L('List OIDs at oid-info.com which are missing in your system').'</a></p>';
625 
                        $out['text'] .= OIDplus::gui()->tabContentPage('import', $tabcont, $tab === 'import');
626 
                        $out['text'] .= OIDplus::gui()->tabContentEnd();
627 
                        // ---------------- Tab control END
628 
 
629 
                        $out['text'] .= '</div></div><script>$("#dataTransferArea")[0].style.visibility = "visible";</script>';
630 
                }
631 
        }
632 
 
633 
        public function tree(&$json, $ra_email=null, $nonjs=false, $req_goto='') {
634 
                if (!OIDplus::authUtils()->isAdminLoggedIn()) return false;
635 
 
636 
                if (file_exists(__DIR__.'/treeicon.png')) {
637 
                        $tree_icon = OIDplus::webpath(__DIR__).'treeicon.png';
638 
                } else {
639 
                        $tree_icon = null; // default icon (folder)
640 
                }
641 
 
642 
                $json[] = array(
643 
                        'id' => 'oidplus:datatransfer',
644 
                        'icon' => $tree_icon,
645 
                        'text' => _L('Data Transfer')
646 
                );
647 
 
648 
                return true;
649 
        }
650 
 
651 
        public function tree_search($request) {
652 
                return false;
653 
        }
654 
 
655 
        public static function outputXML($only_non_existing) {
656 
                // This file contains class OIDInfoAPI.
657 
                // We cannot include this in init(), because the init
658 
                // of the registration plugin (OIDplusPageAdminRegistration) uses
659 
                // OIDplusPageAdminOIDInfoExport::outputXML() before
660 
                // OIDplusPageAdminOIDInfoExport::init() ,
661 
                // because OIDplusPageAdminRegistration::init() comes first sometimes.
662 
                require_once __DIR__ . '/oidinfo_api.inc.php';
663 
 
664 
                $oa = new OIDInfoAPI();
665 
                $oa->addSimplePingProvider('viathinksoft.de:49500');
666 
 
667 
                $email = OIDplus::config()->getValue('admin_email');
668 
                if (empty($email)) $email = 'unknown@example.com';
669 
 
670 
                echo $oa->xmlAddHeader(OIDplus::config()->getValue('system_title'), isset($_SERVER['SERVER_NAME']) ? $_SERVER['SERVER_NAME'] : 'Export interface', $email); // do not translate
671 
 
672 
                $params['allow_html'] = true;
673 
                $params['allow_illegal_email'] = true; // It should be enabled, because the creator could have used some kind of human-readable anti-spam technique
674 
                $params['soft_correct_behavior'] = OIDInfoAPI::SOFT_CORRECT_BEHAVIOR_NONE;
675 
                $params['do_online_check'] = false; // Flag to disable this online check, because it generates a lot of traffic and runtime.
676 
                $params['do_illegality_check'] = true;
677 
                $params['do_simpleping_check'] = $only_non_existing;
678 
                $params['auto_extract_name'] = '';
679 
                $params['auto_extract_url'] = '';
680 
                $params['always_output_comment'] = false;
681 
                $params['creation_allowed_check'] = $only_non_existing;
682 
                $params['tolerant_htmlentities'] = true;
683 
                $params['ignore_xhtml_light'] = false;
684 
 
685 
                $nonConfidential = OIDplusObject::getAllNonConfidential();
686 
                natsort($nonConfidential);
687 
 
688 
                foreach ($nonConfidential as $id) {
689 
                        $res = OIDplus::db()->query("select * from ###objects where id = ?", array($id));
690 
                        if ($row = $res->fetch_object()) {
691 
                                $elements['identifier'] = array();
692 
                                $res2 = OIDplus::db()->query("select * from ###asn1id where oid = ?", array($row->id));
693 
                                while ($row2 = $res2->fetch_object()) {
694 
                                        $elements['identifier'][] = $row2->name; // 'unicode-label' is currently not in the standard format (oid.xsd)
695 
                                }
696 
 
697 
                                $elements['unicode-label'] = array();
698 
                                $res2 = OIDplus::db()->query("select * from ###iri where oid = ?", array($row->id));
699 
                                while ($row2 = $res2->fetch_object()) {
700 
                                        $elements['unicode-label'][] = $row2->name;
701 
                                }
702 
 
703 
                                if (!empty($row->title)) {
704 
                                        $elements['description'] = $row->title;
705 
                                        $elements['information'] = $row->description;/** @phpstan-ignore-line */
706 
                                        if (trim($row->title) == trim(strip_tags($row->description))) {/** @phpstan-ignore-line */
707 
                                                $elements['information'] = '';
708 
                                        }
709 
                                } else if (isset($elements['identifier'][0])) {
710 
                                        $elements['description'] = '"'.$elements['identifier'][0].'"';
711 
                                        $elements['information'] = $row->description;
712 
                                } else if (isset($elements['unicode-label'][0])) {
713 
                                        $elements['description'] = '"'.$elements['unicode-label'][0].'"';
714 
                                        $elements['information'] = $row->description;
715 
                                } else if (!empty($row->description)) {
716 
                                        $elements['description'] = $row->description;
717 
                                        $elements['information'] = '';
718 
                                } else if (!empty($row->comment)) {
719 
                                        $elements['description'] = $row->comment;
720 
                                        $elements['information'] = '';
721 
                                } else {
722 
                                        $elements['description'] = '<i>No description available</i>'; // do not translate
723 
                                        $elements['information'] = '';
724 
                                }
725 
 
726 
                                if ($elements['information'] != '') {
727 
                                        $elements['information'] .= '<br/><br/>';
728 
                                }
729 
 
730 
                                $elements['information'] .= 'See <a href="'.OIDplus::webpath(null,false).'?goto='.urlencode($id).'">more information</a>.'; // do not translate
731 
 
732 
                                if (explode(':',$id,2)[0] != 'oid') {
733 
                                        $elements['information'] = "Object: $id\n\n" . $elements['information']; // do not translate
734 
                                }
735 
 
736 
                                $elements['description'] = self::repair_relative_links($elements['description']);
737 
                                $elements['information'] = self::repair_relative_links($elements['information']);
738 
 
739 
                                $elements['first-registrant']['first-name'] = '';
740 
                                $elements['first-registrant']['last-name'] = '';
741 
                                $elements['first-registrant']['address'] = '';
742 
                                $elements['first-registrant']['email'] = '';
743 
                                $elements['first-registrant']['phone'] = '';
744 
                                $elements['first-registrant']['fax'] = '';
745 
                                $elements['first-registrant']['creation-date'] = self::_formatdate($row->created);
746 
 
747 
                                $elements['current-registrant']['first-name'] = '';
748 
                                $elements['current-registrant']['last-name'] = '';
749 
                                $elements['current-registrant']['email'] = $row->ra_email;
750 
                                $elements['current-registrant']['phone'] = '';
751 
                                $elements['current-registrant']['fax'] = '';
752 
                                $elements['current-registrant']['address'] = '';
753 
 
754 
                                $res2 = OIDplus::db()->query("select * from ###ra where email = ?", array($row->ra_email));
755 
                                if ($res2->num_rows() > 0) {
756 
                                        $row2 = $res2->fetch_object();
757 
 
758 
                                        $tmp = array();
759 
                                        if (!empty($row2->personal_name)) {
760 
                                                $name_ary = split_firstname_lastname($row2->personal_name);
761 
                                                $elements['current-registrant']['first-name'] = $name_ary[0];
762 
                                                $elements['current-registrant']['last-name']  = $name_ary[1];
763 
                                                if (!empty($row2->ra_name)       ) $tmp[] = $row2->ra_name;
764 
                                                if (!empty($row2->office)        ) $tmp[] = $row2->office;
765 
                                                if (!empty($row2->organization)  ) $tmp[] = $row2->organization;
766 
                                        } else {
767 
                                                $elements['current-registrant']['first-name'] = $row2->ra_name;
768 
                                                $elements['current-registrant']['last-name']  = '';
769 
                                                if (!empty($row2->personal_name) ) $tmp[] = $row2->personal_name;
770 
                                                if (!empty($row2->office)        ) $tmp[] = $row2->office;
771 
                                                if (!empty($row2->organization)  ) $tmp[] = $row2->organization;
772 
                                        }
773 
 
774 
                                        if ((count($tmp) > 0) && ($tmp[0] == $row2->ra_name)) array_shift($tmp);
775 
                                        $tmp = array_unique($tmp);
776 
 
777 
                                        if (!$row2->privacy) {
778 
                                                if (!empty($row2->street))   $tmp[] = $row2->street;
779 
                                                if (!empty($row2->zip_town)) $tmp[] = $row2->zip_town;
780 
                                                if (!empty($row2->country))  $tmp[] = $row2->country;
781 
                                                $elements['current-registrant']['phone'] = !empty($row2->phone) ? $row2->phone : $row2->mobile;
782 
                                                $elements['current-registrant']['fax'] = $row2->fax;
783 
                                        }
784 
                                        if (empty($row2->zip_town) && empty($row2->country)) {
785 
                                                // The address is useless if we do neither know city nor country
786 
                                                // Ignore it
787 
                                                $elements['current-registrant']['address'] = '';
788 
                                        } else {
789 
                                                $elements['current-registrant']['address'] = implode("<br/>", $tmp);
790 
                                        }
791 
                                }
792 
                                $elements['current-registrant']['modification-date'] = self::_formatdate($row->updated);
793 
 
794 
                                // Request from O.D. 20 May 2019: First registrant should not be empty (especially for cases where Creation and Modify Dates are the same)
795 
                                // Actually, this is a problem because we don't know the first registrant.
796 
                                // However, since oidinfo gets their XML very fast (if using registration), it is likely that the reported RA is still the same...
797 
                                // ... and changes at the RA are not reported to oid-info.com anyways - the XML is only for creation
798 
 
799 
                                $elements['first-registrant']['first-name'] = $elements['current-registrant']['first-name'];
800 
                                $elements['first-registrant']['last-name']  = $elements['current-registrant']['last-name'];
801 
                                $elements['first-registrant']['address']    = $elements['current-registrant']['address'];
802 
                                $elements['first-registrant']['email']      = $elements['current-registrant']['email'];
803 
                                $elements['first-registrant']['phone']      = $elements['current-registrant']['phone'];
804 
                                $elements['first-registrant']['fax']        = $elements['current-registrant']['fax'];
805 
 
806 
                                $elements['current-registrant']['first-name'] = '';
807 
                                $elements['current-registrant']['last-name'] = '';
808 
                                $elements['current-registrant']['address'] = '';
809 
                                $elements['current-registrant']['email'] = '';
810 
                                $elements['current-registrant']['phone'] = '';
811 
                                $elements['current-registrant']['fax'] = '';
812 
                                $elements['current-registrant']['modification-date'] = '';
813 
 
814 
                                // End request O.D. 20 May 2019
815 
 
816 
                                $obj = OIDplusObject::parse($row->id);
817 
 
818 
                                list($ns,$id) = explode(':',$obj->nodeId());
819 
                                if ($ns == 'oid') {
820 
                                        echo $oa->createXMLEntry($id, $elements, $params, $comment=$obj->nodeId());
821 
                                } else {
822 
                                        $alt_ids = $obj->getAltIds(); // TODO: slow!
823 
                                        foreach ($alt_ids as $alt_id) {
824 
                                                $ns = $alt_id->getNamespace();
825 
                                                $id = $alt_id->getId();
826 
                                                $desc = $alt_id->getDescription();
827 
                                                if ($ns == 'oid') {
828 
                                                        if (strpos($id, '2.25.') === 0) continue; // don't spam the uuid arc with GUID objects
829 
                                                        echo $oa->createXMLEntry($id, $elements, $params, $comment=$obj->nodeId());
830 
                                                }
831 
                                        }
832 
                                }
833 
                        }
834 
                }
835 
 
836 
                echo $oa->xmlAddFooter();
837 
        }
838 
 
839 
        private static function _formatdate($str) {
840 
                $str = explode(' ',$str)[0];
841 
                if ($str == '0000-00-00') $str = '';
842 
                return $str;
843 
        }
844 
 
845 
        private static function repair_relative_links($str) {
846 
                $str = preg_replace_callback('@(href\s*=\s*([\'"]))(.+)(\\2)@ismU', function($treffer) {
847 
                        $url = $treffer[3];
848 
                        if ((stripos($url,'http:') !== 0) && (stripos($url,'https:') !== 0) && (stripos($url,'ftp:') !== 0)) {
849 
                                if (stripos($url,'www.') === 0) {
850 
                                        $url .= 'http://' . $url;
851 
                                } else {
852 
                                        $url = OIDplus::webpath() . $url;
853 
                                }
854 
                        }
855 
                        return $treffer[1].$url.$treffer[4];
856 
                }, $str);
857 
                return $str;
858 
        }
859 
 
860 
        private static function split_address_country($address) {
861 
                global $oidinfo_countries;
862 
                $ary = explode("\n", $address);
863 
                $last_line = array_pop($ary);
864 
                $rest = implode("\n", $ary);
865 
                if (isset($oidinfo_countries[$last_line])) {
866 
                        return array($rest, $oidinfo_countries[$last_line]);
867 
                } else {
868 
                        return array($rest."\n".$last_line, '');
869 
                }
870 
        }
871 
 
872 
        private static function split_name($name) {
873 
                // uses regex that accepts any word character or hyphen in last name
874 
                // https://stackoverflow.com/questions/13637145/split-text-string-into-first-and-last-name-in-php
875 
                $name = trim($name);
876 
                $last_name = (strpos($name, ' ') === false) ? '' : preg_replace('#.*\s([\w-]*)$#', '$1', $name);
877 
                $first_name = trim( preg_replace('#'.preg_quote($last_name,'#').'#', '', $name ) );
878 
                return array($first_name, $last_name);
879 
        }
880 
 
881 
        /*protected*/ const ORPHAN_IGNORE = 0;
882 
        /*protected*/ const ORPHAN_AUTO_DEORPHAN = 1;
883 
        /*protected*/ const ORPHAN_DISALLOW_ORPHANS = 2;
884 
 
885 
        protected function oidinfoImportXML($xml_contents, &$errors, $replaceExistingOIDs=false, $orphan_mode=self::ORPHAN_AUTO_DEORPHAN) {
886 
                // TODO: Implement RA import (let the user decide)
887 
                // TODO: Let the user decide about $replaceExistingOIDs
888 
                // TODO: Let the user decide if "created=now" should be set (this is good when the XML files is created by the user itself to do bulk-inserts)
889 
 
890 
                $xml_contents = str_replace('<description>', '<description><![CDATA[', $xml_contents);
891 
                $xml_contents = str_replace('</description>', ']]></description>', $xml_contents);
892 
 
893 
                $xml_contents = str_replace('<information>', '<information><![CDATA[', $xml_contents);
894 
                $xml_contents = str_replace('</information>', ']]></information>', $xml_contents);
895 
 
896 
                $xml = @simplexml_load_string($xml_contents);
897 
 
898 
                $count_already_existing = 0;
899 
                $count_errors = 0;
900 
                $count_warnings = 0;
901 
 
902 
                if (!$xml) {
903 
                        $errors[] = _L('Cannot read XML data. The XML file is probably invalid.');
904 
                        $count_errors++;
905 
                        return array(0, 0, 1, 0);
906 
                }
907 
 
908 
                $ok_oids = array();
909 
 
910 
                foreach ($xml->oid as $xoid) {
911 
 
912 
                        if (isset($xoid->{'dot-notation'})) {
913 
                                $dot_notation = $xoid->{'dot-notation'}->__toString();
914 
                        } else if (isset($xoid->{'asn1-notation'})) {
915 
                                $dot_notation = asn1_to_dot($xoid->{'asn1-notation'}->__toString());
916 
                        } else {
917 
                                $errors[] = _L('Cannot find dot notation because fields asn1-notation and dot-notation are both not existing');
918 
                                $count_errors++;
919 
                                continue;
920 
                        }
921 
 
922 
                        $id = "oid:$dot_notation";
923 
                        $title = isset($xoid->{'description'}) ? $xoid->{'description'}->__toString() : '';
924 
                        $info = isset($xoid->{'description'}) ? $xoid->{'information'}->__toString() : '';
925 
 
926 
                        if (isset($xoid->{'current-registrant'}->email)) {
927 
                                $ra = $xoid->{'current-registrant'}->email->__toString();
928 
                        } else if (isset($xoid->{'first-registrant'}->email)) {
929 
                                $ra = $xoid->{'first-registrant'}->email->__toString();
930 
                        } else {
931 
                                $ra = '';
932 
                        }
933 
 
934 
                        if (!oid_valid_dotnotation($dot_notation, false, false)) {
935 
                                $errors[] = _L('Ignored OID %1 because its dot notation is illegal or was not found',$dot_notation);
936 
                                $count_errors++;
937 
                                continue;
938 
                        }
939 
 
940 
                        $parent = 'oid:'.oid_up($dot_notation);
941 
 
942 
                        if ($orphan_mode === self::ORPHAN_DISALLOW_ORPHANS) {
943 
                                $res = OIDplus::db()->query("select * from ###objects where id = ?", array($parent));
944 
                                if ($res->num_rows() === 0) {
945 
                                        $errors[] = _L('Cannot import %1, because its parent is not in the database.',$dot_notation);
946 
                                        $count_errors++;
947 
                                        continue;
948 
                                }
949 
                        }
950 
 
951 
                        $res = OIDplus::db()->query("select * from ###objects where id = ?", array($id));
952 
                        if ($res->num_rows() > 0) {
953 
                                if ($replaceExistingOIDs) {
954 
                                        // TODO: better do this (and the following insert) as transaction
955 
                                        OIDplus::db()->query("delete from ###asn1id where oid = ?", array($id));
956 
                                        OIDplus::db()->query("delete from ###iri where oid = ?", array($id));
957 
                                        OIDplus::db()->query("delete from ###objects where id = ?", array($id));
958 
                                } else {
959 
                                        //$errors[] = "Ignore OID '$dot_notation' because it already exists";
960 
                                        //$count_errors++;
961 
                                        $count_already_existing++;
962 
                                        continue;
963 
                                }
964 
                        }
965 
 
966 
                        OIDplus::db()->query("insert into ###objects (id, parent, title, description, confidential, ra_email) values (?, ?, ?, ?, ?, ?)", array($id, $parent, $title, $info, 0, $ra));
967 
 
968 
                        $this_oid_has_warnings = false;
969 
 
970 
                        // ---------------------------------------------------------------------
971 
 
972 
                        $asn1ids = array();
973 
                        if (isset($xoid->{'identifier'})) {
974 
                                $asn1ids[] = $xoid->{'identifier'}->__toString();
975 
                        }
976 
                        if (isset($xoid->{'asn1-notation'})) {
977 
                                $last_id = asn1_last_identifier($xoid->{'asn1-notation'}->__toString());
978 
                                if ($last_id) {
979 
                                        $asn1ids[] = $last_id;
980 
                                }
981 
                        }
982 
                        if (isset($xoid->{'synonymous-identifier'})) {
983 
                                foreach ($xoid->{'synonymous-identifier'} as $synid) {
984 
                                        $asn1ids[] = $synid->__toString();
985 
                                }
986 
                        }
987 
                        $asn1ids = array_unique($asn1ids);
988 
                        foreach ($asn1ids as $asn1id) {
989 
                                if (!oid_id_is_valid($asn1id)) {
990 
                                        $errors[] = _L('Warning').' ['._L('OID %1',$dot_notation).']: '._L('Ignored alphanumeric identifier %1, because it is invalid',$asn1id);
991 
                                        $this_oid_has_warnings = true;
992 
                                } else {
993 
                                        OIDplus::db()->query("delete from ###asn1id where oid = ? and name = ?", array($id, $asn1id));
994 
                                        OIDplus::db()->query("insert into ###asn1id (oid, name) values (?, ?)", array($id, $asn1id));
995 
                                }
996 
                        }
997 
 
998 
                        // ---------------------------------------------------------------------
999 
 
1000 
                        if (isset($xoid->{'unicode-label'})) {
1001 
                                $iris = array();
1002 
                                foreach ($xoid->{'unicode-label'} as $iri) {
1003 
                                        $iris[] = $iri->__toString();
1004 
                                }
1005 
                                $iris = array_unique($iris);
1006 
                                foreach ($iris as $iri) {
1007 
                                        if (!iri_arc_valid($iri, false)) {
1008 
                                                $errors[] = _L('Warning').' ['._L('OID %1',$dot_notation).']: '._L('Ignored Unicode label %1, because it is invalid',$iri);
1009 
                                                $this_oid_has_warnings = true;
1010 
                                        } else {
1011 
                                                OIDplus::db()->query("delete from ###iri where oid = ? and name = ?", array($id, $iri));
1012 
                                                OIDplus::db()->query("insert into ###iri (oid, name) values (?, ?)", array($id, $iri));
1013 
                                        }
1014 
                                }
1015 
                        }
1016 
 
1017 
                        if ($this_oid_has_warnings) $count_warnings++;
1018 
                        $ok_oids[] = $id;
1019 
                }
1020 
 
1021 
                // De-orphanize
1022 
                //if ($orphan_mode === self::ORPHAN_AUTO_DEORPHAN) OIDplus::db()->query("update ###objects set parent = 'oid:' where parent like 'oid:%' and parent not in (select id from ###objects)");
1023 
                foreach ($ok_oids as $id) {
1024 
                        // De-orphanize if neccessary
1025 
                        if ($orphan_mode === self::ORPHAN_AUTO_DEORPHAN) {
1026 
                                $res = OIDplus::db()->query("select * from ###objects where id = ? and parent not in (select id from ###objects)", array($id));
1027 
                                if ($res->num_rows() > 0) {
1028 
                                        $errors[] = _L("%1 was de-orphaned (placed as root OID) because its parent is not existing.",$id);
1029 
                                        $count_warnings++;
1030 
                                        OIDplus::db()->query("update ###objects set parent = 'oid:' where id = ? and parent not in (select id from ###objects)", array($id));
1031 
                                }
1032 
                        }
1033 
 
1034 
                        // We do the logging at the end, otherwise SUPOIDRA() might not work correctly if the OIDs were not imported in order or if there were orphans
1035 
                        OIDplus::logger()->log("[INFO]OID($id)+[INFO]SUPOID($id)+[INFO]SUPOIDRA($id)!/[INFO]A!", "Object '$id' was automatically created by the XML import tool");
1036 
                }
1037 
 
1038 
                $count_imported_oids = count($ok_oids);
1039 
 
1040 
                return array($count_imported_oids, $count_already_existing, $count_errors, $count_warnings);
1041 
 
1042 
        }
1043 
 
1044 
}