Subversion Repositories oidplus

Rev

Rev 790 | Rev 801 | 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');
800 daniel-mar 168
                        $out['icon'] = file_exists(__DIR__.'/img/main_icon.png') ? OIDplus::webpath(__DIR__,true).'img/main_icon.png' : '';
635 daniel-mar 169
 
170
                        if (!OIDplus::authUtils()->isAdminLoggedIn()) {
800 daniel-mar 171
                                $out['icon'] = 'img/error.png';
635 daniel-mar 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) {
800 daniel-mar 233
                                $out['icon'] = 'img/error.png';
635 daniel-mar 234
                                $out['text'] .= _L('JSON reply from ViaThinkSoft decoding error: %1',$res);
235
                                return;
236
                        }
237
 
238
                        if (isset($json['error']) || ($json['status'] < 0)) {
800 daniel-mar 239
                                $out['icon'] = 'img/error.png';
635 daniel-mar 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));
790 daniel-mar 360
                                                                if ($res2->any()) {
635 daniel-mar 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');
800 daniel-mar 442
                        $out['icon'] = file_exists(__DIR__.'/img/main_icon.png') ? OIDplus::webpath(__DIR__,true).'img/main_icon.png' : '';
635 daniel-mar 443
 
444
                        if (!OIDplus::authUtils()->isAdminLoggedIn()) {
800 daniel-mar 445
                                $out['icon'] = 'img/error.png';
635 daniel-mar 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) {
800 daniel-mar 507
                                $out['icon'] = 'img/error.png';
635 daniel-mar 508
                                $out['text'] .= _L('JSON reply from ViaThinkSoft decoding error: %1',$res);
509
                                return;
510
                        }
511
 
512
                        if (isset($json['error']) || ($json['status'] < 0)) {
800 daniel-mar 513
                                $out['icon'] = 'img/error.png';
635 daniel-mar 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');
800 daniel-mar 581
                        $out['icon'] = file_exists(__DIR__.'/img/main_icon.png') ? OIDplus::webpath(__DIR__,true).'img/main_icon.png' : '';
635 daniel-mar 582
 
583
                        if (!OIDplus::authUtils()->isAdminLoggedIn()) {
800 daniel-mar 584
                                $out['icon'] = 'img/error.png';
635 daniel-mar 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>';
800 daniel-mar 600
                        $tabcont .= '<p><input type="button" onclick="window.open(\''.OIDplus::webpath(__DIR__,true).'oidinfo_export.php\',\'_blank\')" value="'._L('Generate XML (all OIDs)').'"></p>';
601
                        $tabcont .= '<p><input type="button" onclick="window.open(\''.OIDplus::webpath(__DIR__,true).'oidinfo_export.php?online=1\',\'_blank\')" value="'._L('Generate XML (only OIDs which do not exist at oid-info.com)').'"></p>';
635 daniel-mar 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
 
800 daniel-mar 636
                if (file_exists(__DIR__.'/img/main_icon16.png')) {
637
                        $tree_icon = OIDplus::webpath(__DIR__,true).'img/main_icon16.png';
635 daniel-mar 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();
724 daniel-mar 665
                if ($only_non_existing) {
666
                        if (!function_exists('socket_create')) {
667
                                throw new OIDplusException(_L('You must install the PHP "sockets" in order to check for non-existing OIDs.'));
668
                        }
669
                        $oa->addSimplePingProvider('viathinksoft.de:49500');
670
                }
635 daniel-mar 671
 
724 daniel-mar 672
                @header('Content-Type:text/xml');
673
 
635 daniel-mar 674
                $email = OIDplus::config()->getValue('admin_email');
675
                if (empty($email)) $email = 'unknown@example.com';
676
 
724 daniel-mar 677
                $sys_title = OIDplus::config()->getValue('system_title');
678
                $name1 = !empty($sys_title) ? $sys_title : 'OIDplus 2.0';
679
                $name2 = isset($_SERVER['SERVER_NAME']) ? $_SERVER['SERVER_NAME'] : 'Export interface';
680
                echo $oa->xmlAddHeader($name1, $name2, $email); // do not translate
635 daniel-mar 681
 
682
                $params['allow_html'] = true;
683
                $params['allow_illegal_email'] = true; // It should be enabled, because the creator could have used some kind of human-readable anti-spam technique
684
                $params['soft_correct_behavior'] = OIDInfoAPI::SOFT_CORRECT_BEHAVIOR_NONE;
685
                $params['do_online_check'] = false; // Flag to disable this online check, because it generates a lot of traffic and runtime.
686
                $params['do_illegality_check'] = true;
687
                $params['do_simpleping_check'] = $only_non_existing;
688
                $params['auto_extract_name'] = '';
689
                $params['auto_extract_url'] = '';
690
                $params['always_output_comment'] = false;
691
                $params['creation_allowed_check'] = $only_non_existing;
692
                $params['tolerant_htmlentities'] = true;
693
                $params['ignore_xhtml_light'] = false;
694
 
695
                $nonConfidential = OIDplusObject::getAllNonConfidential();
696
                natsort($nonConfidential);
697
 
698
                foreach ($nonConfidential as $id) {
699
                        $res = OIDplus::db()->query("select * from ###objects where id = ?", array($id));
700
                        if ($row = $res->fetch_object()) {
701
                                $elements['identifier'] = array();
702
                                $res2 = OIDplus::db()->query("select * from ###asn1id where oid = ?", array($row->id));
703
                                while ($row2 = $res2->fetch_object()) {
704
                                        $elements['identifier'][] = $row2->name; // 'unicode-label' is currently not in the standard format (oid.xsd)
705
                                }
706
 
707
                                $elements['unicode-label'] = array();
708
                                $res2 = OIDplus::db()->query("select * from ###iri where oid = ?", array($row->id));
709
                                while ($row2 = $res2->fetch_object()) {
710
                                        $elements['unicode-label'][] = $row2->name;
711
                                }
712
 
713
                                if (!empty($row->title)) {
714
                                        $elements['description'] = $row->title;
715
                                        $elements['information'] = $row->description;/** @phpstan-ignore-line */
716
                                        if (trim($row->title) == trim(strip_tags($row->description))) {/** @phpstan-ignore-line */
717
                                                $elements['information'] = '';
718
                                        }
719
                                } else if (isset($elements['identifier'][0])) {
720
                                        $elements['description'] = '"'.$elements['identifier'][0].'"';
721
                                        $elements['information'] = $row->description;
722
                                } else if (isset($elements['unicode-label'][0])) {
723
                                        $elements['description'] = '"'.$elements['unicode-label'][0].'"';
724
                                        $elements['information'] = $row->description;
725
                                } else if (!empty($row->description)) {
726
                                        $elements['description'] = $row->description;
727
                                        $elements['information'] = '';
728
                                } else if (!empty($row->comment)) {
729
                                        $elements['description'] = $row->comment;
730
                                        $elements['information'] = '';
731
                                } else {
732
                                        $elements['description'] = '<i>No description available</i>'; // do not translate
733
                                        $elements['information'] = '';
734
                                }
735
 
736
                                if ($elements['information'] != '') {
737
                                        $elements['information'] .= '<br/><br/>';
738
                                }
739
 
740
                                $elements['information'] .= 'See <a href="'.OIDplus::webpath(null,false).'?goto='.urlencode($id).'">more information</a>.'; // do not translate
741
 
742
                                if (explode(':',$id,2)[0] != 'oid') {
743
                                        $elements['information'] = "Object: $id\n\n" . $elements['information']; // do not translate
744
                                }
745
 
746
                                $elements['description'] = self::repair_relative_links($elements['description']);
747
                                $elements['information'] = self::repair_relative_links($elements['information']);
748
 
749
                                $elements['first-registrant']['first-name'] = '';
750
                                $elements['first-registrant']['last-name'] = '';
751
                                $elements['first-registrant']['address'] = '';
752
                                $elements['first-registrant']['email'] = '';
753
                                $elements['first-registrant']['phone'] = '';
754
                                $elements['first-registrant']['fax'] = '';
755
                                $elements['first-registrant']['creation-date'] = self::_formatdate($row->created);
756
 
757
                                $elements['current-registrant']['first-name'] = '';
758
                                $elements['current-registrant']['last-name'] = '';
759
                                $elements['current-registrant']['email'] = $row->ra_email;
760
                                $elements['current-registrant']['phone'] = '';
761
                                $elements['current-registrant']['fax'] = '';
762
                                $elements['current-registrant']['address'] = '';
763
 
764
                                $res2 = OIDplus::db()->query("select * from ###ra where email = ?", array($row->ra_email));
790 daniel-mar 765
                                if ($res2->any()) {
635 daniel-mar 766
                                        $row2 = $res2->fetch_object();
767
 
768
                                        $tmp = array();
769
                                        if (!empty($row2->personal_name)) {
770
                                                $name_ary = split_firstname_lastname($row2->personal_name);
771
                                                $elements['current-registrant']['first-name'] = $name_ary[0];
772
                                                $elements['current-registrant']['last-name']  = $name_ary[1];
773
                                                if (!empty($row2->ra_name)       ) $tmp[] = $row2->ra_name;
774
                                                if (!empty($row2->office)        ) $tmp[] = $row2->office;
775
                                                if (!empty($row2->organization)  ) $tmp[] = $row2->organization;
776
                                        } else {
777
                                                $elements['current-registrant']['first-name'] = $row2->ra_name;
778
                                                $elements['current-registrant']['last-name']  = '';
779
                                                if (!empty($row2->personal_name) ) $tmp[] = $row2->personal_name;
780
                                                if (!empty($row2->office)        ) $tmp[] = $row2->office;
781
                                                if (!empty($row2->organization)  ) $tmp[] = $row2->organization;
782
                                        }
783
 
784
                                        if ((count($tmp) > 0) && ($tmp[0] == $row2->ra_name)) array_shift($tmp);
785
                                        $tmp = array_unique($tmp);
786
 
787
                                        if (!$row2->privacy) {
788
                                                if (!empty($row2->street))   $tmp[] = $row2->street;
789
                                                if (!empty($row2->zip_town)) $tmp[] = $row2->zip_town;
790
                                                if (!empty($row2->country))  $tmp[] = $row2->country;
791
                                                $elements['current-registrant']['phone'] = !empty($row2->phone) ? $row2->phone : $row2->mobile;
792
                                                $elements['current-registrant']['fax'] = $row2->fax;
793
                                        }
794
                                        if (empty($row2->zip_town) && empty($row2->country)) {
795
                                                // The address is useless if we do neither know city nor country
796
                                                // Ignore it
797
                                                $elements['current-registrant']['address'] = '';
798
                                        } else {
799
                                                $elements['current-registrant']['address'] = implode("<br/>", $tmp);
800
                                        }
801
                                }
802
                                $elements['current-registrant']['modification-date'] = self::_formatdate($row->updated);
803
 
804
                                // Request from O.D. 20 May 2019: First registrant should not be empty (especially for cases where Creation and Modify Dates are the same)
805
                                // Actually, this is a problem because we don't know the first registrant.
806
                                // However, since oidinfo gets their XML very fast (if using registration), it is likely that the reported RA is still the same...
807
                                // ... and changes at the RA are not reported to oid-info.com anyways - the XML is only for creation
808
 
809
                                $elements['first-registrant']['first-name'] = $elements['current-registrant']['first-name'];
810
                                $elements['first-registrant']['last-name']  = $elements['current-registrant']['last-name'];
811
                                $elements['first-registrant']['address']    = $elements['current-registrant']['address'];
812
                                $elements['first-registrant']['email']      = $elements['current-registrant']['email'];
813
                                $elements['first-registrant']['phone']      = $elements['current-registrant']['phone'];
814
                                $elements['first-registrant']['fax']        = $elements['current-registrant']['fax'];
815
 
816
                                $elements['current-registrant']['first-name'] = '';
817
                                $elements['current-registrant']['last-name'] = '';
818
                                $elements['current-registrant']['address'] = '';
819
                                $elements['current-registrant']['email'] = '';
820
                                $elements['current-registrant']['phone'] = '';
821
                                $elements['current-registrant']['fax'] = '';
822
                                $elements['current-registrant']['modification-date'] = '';
823
 
824
                                // End request O.D. 20 May 2019
825
 
826
                                $obj = OIDplusObject::parse($row->id);
827
 
828
                                list($ns,$id) = explode(':',$obj->nodeId());
829
                                if ($ns == 'oid') {
830
                                        echo $oa->createXMLEntry($id, $elements, $params, $comment=$obj->nodeId());
831
                                } else {
832
                                        $alt_ids = $obj->getAltIds(); // TODO: slow!
833
                                        foreach ($alt_ids as $alt_id) {
834
                                                $ns = $alt_id->getNamespace();
835
                                                $id = $alt_id->getId();
836
                                                $desc = $alt_id->getDescription();
837
                                                if ($ns == 'oid') {
838
                                                        if (strpos($id, '2.25.') === 0) continue; // don't spam the uuid arc with GUID objects
839
                                                        echo $oa->createXMLEntry($id, $elements, $params, $comment=$obj->nodeId());
840
                                                }
841
                                        }
842
                                }
843
                        }
844
                }
845
 
846
                echo $oa->xmlAddFooter();
847
        }
848
 
849
        private static function _formatdate($str) {
850
                $str = explode(' ',$str)[0];
851
                if ($str == '0000-00-00') $str = '';
852
                return $str;
853
        }
854
 
855
        private static function repair_relative_links($str) {
856
                $str = preg_replace_callback('@(href\s*=\s*([\'"]))(.+)(\\2)@ismU', function($treffer) {
857
                        $url = $treffer[3];
858
                        if ((stripos($url,'http:') !== 0) && (stripos($url,'https:') !== 0) && (stripos($url,'ftp:') !== 0)) {
859
                                if (stripos($url,'www.') === 0) {
860
                                        $url .= 'http://' . $url;
861
                                } else {
862
                                        $url = OIDplus::webpath() . $url;
863
                                }
864
                        }
865
                        return $treffer[1].$url.$treffer[4];
866
                }, $str);
867
                return $str;
868
        }
869
 
870
        private static function split_address_country($address) {
871
                global $oidinfo_countries;
872
                $ary = explode("\n", $address);
873
                $last_line = array_pop($ary);
874
                $rest = implode("\n", $ary);
875
                if (isset($oidinfo_countries[$last_line])) {
876
                        return array($rest, $oidinfo_countries[$last_line]);
877
                } else {
878
                        return array($rest."\n".$last_line, '');
879
                }
880
        }
881
 
882
        private static function split_name($name) {
883
                // uses regex that accepts any word character or hyphen in last name
884
                // https://stackoverflow.com/questions/13637145/split-text-string-into-first-and-last-name-in-php
885
                $name = trim($name);
886
                $last_name = (strpos($name, ' ') === false) ? '' : preg_replace('#.*\s([\w-]*)$#', '$1', $name);
887
                $first_name = trim( preg_replace('#'.preg_quote($last_name,'#').'#', '', $name ) );
888
                return array($first_name, $last_name);
889
        }
890
 
891
        /*protected*/ const ORPHAN_IGNORE = 0;
892
        /*protected*/ const ORPHAN_AUTO_DEORPHAN = 1;
893
        /*protected*/ const ORPHAN_DISALLOW_ORPHANS = 2;
894
 
895
        protected function oidinfoImportXML($xml_contents, &$errors, $replaceExistingOIDs=false, $orphan_mode=self::ORPHAN_AUTO_DEORPHAN) {
896
                // TODO: Implement RA import (let the user decide)
897
                // TODO: Let the user decide about $replaceExistingOIDs
898
                // 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)
899
 
900
                $xml_contents = str_replace('<description>', '<description><![CDATA[', $xml_contents);
901
                $xml_contents = str_replace('</description>', ']]></description>', $xml_contents);
902
 
903
                $xml_contents = str_replace('<information>', '<information><![CDATA[', $xml_contents);
904
                $xml_contents = str_replace('</information>', ']]></information>', $xml_contents);
905
 
906
                $xml = @simplexml_load_string($xml_contents);
907
 
908
                $count_already_existing = 0;
909
                $count_errors = 0;
910
                $count_warnings = 0;
911
 
912
                if (!$xml) {
913
                        $errors[] = _L('Cannot read XML data. The XML file is probably invalid.');
914
                        $count_errors++;
915
                        return array(0, 0, 1, 0);
916
                }
917
 
918
                $ok_oids = array();
919
 
920
                foreach ($xml->oid as $xoid) {
921
 
922
                        if (isset($xoid->{'dot-notation'})) {
923
                                $dot_notation = $xoid->{'dot-notation'}->__toString();
924
                        } else if (isset($xoid->{'asn1-notation'})) {
925
                                $dot_notation = asn1_to_dot($xoid->{'asn1-notation'}->__toString());
926
                        } else {
927
                                $errors[] = _L('Cannot find dot notation because fields asn1-notation and dot-notation are both not existing');
928
                                $count_errors++;
929
                                continue;
930
                        }
931
 
932
                        $id = "oid:$dot_notation";
933
                        $title = isset($xoid->{'description'}) ? $xoid->{'description'}->__toString() : '';
934
                        $info = isset($xoid->{'description'}) ? $xoid->{'information'}->__toString() : '';
935
 
936
                        if (isset($xoid->{'current-registrant'}->email)) {
937
                                $ra = $xoid->{'current-registrant'}->email->__toString();
938
                        } else if (isset($xoid->{'first-registrant'}->email)) {
939
                                $ra = $xoid->{'first-registrant'}->email->__toString();
940
                        } else {
941
                                $ra = '';
942
                        }
943
 
944
                        if (!oid_valid_dotnotation($dot_notation, false, false)) {
945
                                $errors[] = _L('Ignored OID %1 because its dot notation is illegal or was not found',$dot_notation);
946
                                $count_errors++;
947
                                continue;
948
                        }
949
 
950
                        $parent = 'oid:'.oid_up($dot_notation);
951
 
952
                        if ($orphan_mode === self::ORPHAN_DISALLOW_ORPHANS) {
953
                                $res = OIDplus::db()->query("select * from ###objects where id = ?", array($parent));
790 daniel-mar 954
                                if (!$res->any()) {
635 daniel-mar 955
                                        $errors[] = _L('Cannot import %1, because its parent is not in the database.',$dot_notation);
956
                                        $count_errors++;
957
                                        continue;
958
                                }
959
                        }
960
 
961
                        $res = OIDplus::db()->query("select * from ###objects where id = ?", array($id));
790 daniel-mar 962
                        if ($res->any()) {
635 daniel-mar 963
                                if ($replaceExistingOIDs) {
964
                                        // TODO: better do this (and the following insert) as transaction
965
                                        OIDplus::db()->query("delete from ###asn1id where oid = ?", array($id));
966
                                        OIDplus::db()->query("delete from ###iri where oid = ?", array($id));
967
                                        OIDplus::db()->query("delete from ###objects where id = ?", array($id));
968
                                } else {
969
                                        //$errors[] = "Ignore OID '$dot_notation' because it already exists";
970
                                        //$count_errors++;
971
                                        $count_already_existing++;
972
                                        continue;
973
                                }
974
                        }
975
 
976
                        OIDplus::db()->query("insert into ###objects (id, parent, title, description, confidential, ra_email) values (?, ?, ?, ?, ?, ?)", array($id, $parent, $title, $info, 0, $ra));
977
 
978
                        $this_oid_has_warnings = false;
979
 
980
                        // ---------------------------------------------------------------------
981
 
982
                        $asn1ids = array();
983
                        if (isset($xoid->{'identifier'})) {
984
                                $asn1ids[] = $xoid->{'identifier'}->__toString();
985
                        }
986
                        if (isset($xoid->{'asn1-notation'})) {
987
                                $last_id = asn1_last_identifier($xoid->{'asn1-notation'}->__toString());
988
                                if ($last_id) {
989
                                        $asn1ids[] = $last_id;
990
                                }
991
                        }
992
                        if (isset($xoid->{'synonymous-identifier'})) {
993
                                foreach ($xoid->{'synonymous-identifier'} as $synid) {
994
                                        $asn1ids[] = $synid->__toString();
995
                                }
996
                        }
997
                        $asn1ids = array_unique($asn1ids);
998
                        foreach ($asn1ids as $asn1id) {
999
                                if (!oid_id_is_valid($asn1id)) {
1000
                                        $errors[] = _L('Warning').' ['._L('OID %1',$dot_notation).']: '._L('Ignored alphanumeric identifier %1, because it is invalid',$asn1id);
1001
                                        $this_oid_has_warnings = true;
1002
                                } else {
1003
                                        OIDplus::db()->query("delete from ###asn1id where oid = ? and name = ?", array($id, $asn1id));
1004
                                        OIDplus::db()->query("insert into ###asn1id (oid, name) values (?, ?)", array($id, $asn1id));
1005
                                }
1006
                        }
1007
 
1008
                        // ---------------------------------------------------------------------
1009
 
1010
                        if (isset($xoid->{'unicode-label'})) {
1011
                                $iris = array();
1012
                                foreach ($xoid->{'unicode-label'} as $iri) {
1013
                                        $iris[] = $iri->__toString();
1014
                                }
1015
                                $iris = array_unique($iris);
1016
                                foreach ($iris as $iri) {
1017
                                        if (!iri_arc_valid($iri, false)) {
1018
                                                $errors[] = _L('Warning').' ['._L('OID %1',$dot_notation).']: '._L('Ignored Unicode label %1, because it is invalid',$iri);
1019
                                                $this_oid_has_warnings = true;
1020
                                        } else {
1021
                                                OIDplus::db()->query("delete from ###iri where oid = ? and name = ?", array($id, $iri));
1022
                                                OIDplus::db()->query("insert into ###iri (oid, name) values (?, ?)", array($id, $iri));
1023
                                        }
1024
                                }
1025
                        }
1026
 
1027
                        if ($this_oid_has_warnings) $count_warnings++;
1028
                        $ok_oids[] = $id;
1029
                }
1030
 
1031
                // De-orphanize
1032
                //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)");
1033
                foreach ($ok_oids as $id) {
1034
                        // De-orphanize if neccessary
1035
                        if ($orphan_mode === self::ORPHAN_AUTO_DEORPHAN) {
1036
                                $res = OIDplus::db()->query("select * from ###objects where id = ? and parent not in (select id from ###objects)", array($id));
790 daniel-mar 1037
                                if ($res->any()) {
635 daniel-mar 1038
                                        $errors[] = _L("%1 was de-orphaned (placed as root OID) because its parent is not existing.",$id);
1039
                                        $count_warnings++;
1040
                                        OIDplus::db()->query("update ###objects set parent = 'oid:' where id = ? and parent not in (select id from ###objects)", array($id));
1041
                                }
1042
                        }
1043
 
1044
                        // 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
1045
                        OIDplus::logger()->log("[INFO]OID($id)+[INFO]SUPOID($id)+[INFO]SUPOIDRA($id)!/[INFO]A!", "Object '$id' was automatically created by the XML import tool");
1046
                }
1047
 
1048
                $count_imported_oids = count($ok_oids);
1049
 
1050
                return array($count_imported_oids, $count_already_existing, $count_errors, $count_warnings);
1051
 
1052
        }
1053
 
1054
}