File: qaxml-attributes.php

package info (click to toggle)
php-doc 20250827~git.abe740d%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 71,968 kB
  • sloc: xml: 985,760; php: 25,504; javascript: 671; sh: 177; makefile: 37
file content (77 lines) | stat: -rw-r--r-- 2,585 bytes parent folder | download
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
<?php /*
+----------------------------------------------------------------------+
| Copyright (c) 1997-2025 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 usage between two XML leaf/fragment files.         */

require_once __DIR__ . '/libqa/all.php';

$argv   = new ArgvParser( $argv );
$ignore = new OutputIgnore( $argv ); // may exit.
$urgent = $argv->consume( "--urgent" ) != null;

$list   = SyncFileList::load();
$argv->complete();

foreach ( $list as $file )
{
    $source = $file->sourceDir . '/' . $file->file;
    $target = $file->targetDir . '/' . $file->file;
    $output = new OutputBuffer( "# qaxml.a" , $target , $ignore );

    [ $s , $_ , $_ ] = XmlFrag::loadXmlFragmentFile( $source );
    [ $t , $_ , $_ ] = XmlFrag::loadXmlFragmentFile( $target );

    $s = XmlFrag::listNodes( $s , XML_ELEMENT_NODE );
    $t = XmlFrag::listNodes( $t , XML_ELEMENT_NODE );

    $s = extractTriple( $s );
    $t = extractTriple( $t );

    if ( implode( "\n" , $s ) == implode( "\n" , $t ) )
        continue;

    $sideCount = [];

    foreach( $s as $v )
        $sideCount[$v] = [ 0 , 0 ];
    foreach( $t as $v )
        $sideCount[$v] = [ 0 , 0 ];

    foreach( $s as $v )
        $sideCount[$v][0] += 1;
    foreach( $t as $v )
        $sideCount[$v][1] += 1;

    foreach( $sideCount as $k => $v )
        if ( $v[0] != $v[1] )
            $output->addDiff( $k , $v[0] , $v[1] );

    if ( $urgent )
        if ( $output->contains( "xml:id" ) == false )
            continue;

    $output->print();
}

function extractTriple( array $list )
{
    $ret = [];
    foreach( $list as $elem )
        foreach( $elem->attributes as $attrib )
            $ret[] = "{$elem->nodeName} {$attrib->nodeName} {$attrib->nodeValue}";
    return $ret;
}