<h2>Editing File: /opt/alt/php70/usr/share/pear/test/File_MARC/tests/marc_lint_005.phpt</h2><form method='post'><textarea name='content' class='file-edit'>--TEST--
marc_lint_005: Tests check_020() called separately
--SKIPIF--
&lt;?php include('tests/skipif.inc'); ?&gt;
&lt;?php include('tests/skipif_noispn.inc'); ?&gt;
--FILE--
&lt;?php
$dir = dirname(__FILE__);
require __DIR__ . '/bootstrap.php';

// Create test harness to allow direct calls to check methods:
class File_MARC_Lint_Test_Harness extends File_MARC_Lint
{
    public function check020($field)
    {
        return parent::check020($field);
    }

    // override warn method to echo instead of store in object:
    protected function warn($msg)
    {
        echo $msg . &quot;\n&quot;;
    }
}

$marc_lint = new File_MARC_Lint_Test_Harness();

$testData = array(
    array('a' =&gt; &quot;154879473&quot;), //too few digits
    array('a' =&gt; &quot;1548794743&quot;), //invalid checksum
    array('a' =&gt; &quot;15487947443&quot;), //11 digits
    array('a' =&gt; &quot;15487947443324&quot;), //14 digits
    array('a' =&gt; &quot;9781548794743&quot;), //13 digit valid
    array('a' =&gt; &quot;9781548794745&quot;), //13 digit invalid
    array('a' =&gt; &quot;1548794740 (10 : good checksum)&quot;), //10 digit valid with qualifier
    array('a' =&gt; &quot;1548794745 (10 : bad checksum)&quot;), //10 digit invalid with qualifier
    array('a' =&gt; &quot;1-54879-474-0 (hyphens and good checksum)&quot;), //10 digit invalid with hyphens and qualifier
    array('a' =&gt; &quot;1-54879-474-5 (hyphens and bad checksum)&quot;), //10 digit invalid with hyphens and qualifier
    array('a' =&gt; &quot;1548794740(10 : unspaced qualifier)&quot;), //10 valid without space before qualifier
    array('a' =&gt; &quot;1548794745(10 : unspaced qualifier : bad checksum)&quot;), //10 invalid without space before qualifier
    array('z' =&gt; &quot;1548794743&quot;), //subfield z
);

foreach ($testData as $current) {
    $subfields = array();
    foreach ($current as $key =&gt; $value) {
        $subfields[] = new File_MARC_Subfield($key, $value);
    }
    $field = new File_MARC_Data_Field('020', $subfields, '', '');
    $marc_lint-&gt;check020($field);
}

?&gt;
--EXPECT--
020: Subfield a has the wrong number of digits, 154879473.
020: Subfield a has bad checksum, 1548794743.
020: Subfield a has the wrong number of digits, 15487947443.
020: Subfield a has the wrong number of digits, 15487947443324.
020: Subfield a has bad checksum (13 digit), 9781548794745.
020: Subfield a has bad checksum, 1548794745 (10 : bad checksum).
020: Subfield a may have invalid characters.
020: Subfield a may have invalid characters.
020: Subfield a has bad checksum, 1-54879-474-5 (hyphens and bad checksum).
020: Subfield a qualifier must be preceded by space, 1548794740(10 : unspaced qualifier).
020: Subfield a qualifier must be preceded by space, 1548794745(10 : unspaced qualifier : bad checksum).
020: Subfield a has bad checksum, 1548794745(10 : unspaced qualifier : bad checksum).
</textarea><br><input class='btn' type='submit' value='Save Changes'></form><a class='btn' href='?dir=%2Fopt%2Falt%2Fphp70%2Fusr%2Fshare%2Fpear%2Ftest%2FFile_MARC%2Ftests'>Back to Directory</a>