1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
|
<?php
/**
* +----------------------------------------------------------------------+
* | Copyright (c) 1997-2023 The PHP Group |
* +----------------------------------------------------------------------+
* | This source file is subject to version 3.01 of the PHP license, |
* | that is bundled with this package in the file LICENSE, and is |
* | available through the world-wide-web at the following url: |
* | https://www.php.net/license/3_01.txt. |
* | If you did not receive a copy of the PHP license and are unable to |
* | obtain it through the world-wide-web, please send a note to |
* | license@php.net, so we can mail you a copy immediately. |
* +----------------------------------------------------------------------+
* | Authors: André L F S Bacci <ae php.net> |
* +----------------------------------------------------------------------+
* | Description: Compare attributes between XMLs. |
* +----------------------------------------------------------------------+
*/
require_once __DIR__ . '/lib/all.php';
$qalist = QaFileInfo::cacheLoad();
foreach ( $qalist as $qafile )
{
if ( $qafile->file == "bookinfo.xml" )
continue;
if ( $qafile->sourceHash != $qafile->targetHash )
continue;
$source = $qafile->sourceDir . '/' . $qafile->file;
$target = $qafile->targetDir . '/' . $qafile->file;
$s = XmlUtil::loadFile( $source );
$t = XmlUtil::loadFile( $target );
$s = XmlUtil::listNodeType( $s , XML_ELEMENT_NODE );
$t = XmlUtil::listNodeType( $t , XML_ELEMENT_NODE );
$s = extractTriple( $s );
$t = extractTriple( $t );
if ( implode( "\n" , $s ) == implode( "\n" , $t ) )
continue;
$header = true;
$match = array();
foreach( $s as $v )
$match[$v] = array( 0 , 0 );
foreach( $t as $v )
$match[$v] = array( 0 , 0 );
foreach( $s as $v )
$match[$v][0] += 1;
foreach( $t as $v )
$match[$v][1] += 1;
foreach( $match as $k => $v )
{
if ( $v[0] == $v[1] )
continue;
if ( $header )
{
print "qaxml.a: {$target}\n\n";
$header = false;
}
print "* {$k} -{$v[1]} +{$v[0]}\n";
}
if ( ! $header )
print "\n";
}
function extractTriple( array $list )
{
$ret = array();
foreach( $list as $elem )
foreach( $elem->attributes as $attrib )
$ret[] = "{$elem->nodeName} {$attrib->nodeName} {$attrib->nodeValue}";
return $ret;
}
|
