Scriptotek\SimpleMarcParser\BibliographicRecord::parseMaterial()

Complexity

Conditions	37
Paths	1516

Size

Total Lines

250

Duplication

Lines	0
Ratio	0 %

Importance

Changes

0

<?php
    protected function parseMaterial(QuiteSimpleXmlElement $data)
    {
        // See http://www.loc.gov/marc/ldr06guide.html

        // The Leader/06 (Type of record) character position contains a one-character
        // alphabetic code that differentiates MARC records created for various types of
        // content and materials.

        // The 008 field contains character positions that provide coded information about
        // the record as a whole and about special bibliographic aspects of the item cataloged.

        // Field 006 (Fixed-length data elements - Additional material characteristics)
        // permits coding for additional aspects of an electronic resource (including any
        // computer file aspects) if the 007 and 008 fields do not adequately describe it.

        // leader[6] : Type of record
        // leader[7] : Bibliographic level
        // Field 008/18-34 Configuration

        // LDR/06
        $recordTypes = array(

$recordTypes is not used, you could remove the assignment.

            'a' => 'Language material',
            'c' => 'Notated music',
            'd' => 'Manuscript notated music',
            'e' => 'Cartographic material',
            'f' => 'Manuscript cartographic material',
            'g' => 'Projected medium',
            'i' => 'Nonmusical sound recording',
            'j' => 'Musical sound recording',
            'k' => 'Two-dimensional nonprojectable graphic',
            'm' => 'Computer file',
            'o' => 'Kit',
            'p' => 'Mixed materials',
            'r' => 'Three-dimensional artifact or naturally occurring object',
            't' => 'Manuscript language material',
        );

        // LDR/07
        $bibliographicLevels = array(

$bibliographicLevels is not used, you could remove the assignment.

            'a' => 'Monographic component part',
            'b' => 'Serial component part',
            'c' => 'Collection',
            'd' => 'Subunit',
            'i' => 'Integrating resource',
            'm' => 'Monograph/Item',
            's' => 'Serial',
        );

        // 007/00 (Category of material)
        $materialCategories = array(

$materialCategories is not used, you could remove the assignment.

            'a' => 'Map',
            'c' => 'Electronic resource',
            'd' => 'Globe',
            'f' => 'Tactile material',
            'g' => 'Projected graphic',
            'h' => 'Microform',
            'k' => 'Nonprojected graphic',
            'm' => 'Motion picture',
            'o' => 'Kit',
            'q' => 'Notated music',
            'r' => 'Remote-sensing image',
            's' => 'Sound recording',
            't' => 'Text',                 // p Trykt materiale
            'v' => 'Videorecording',
            'z' => 'Unspecified',
        );

        // 008/24-27 - Nature of contents (006/07-10)
        $natureOfContents = array(
            'a' => 'Abstract',
            'b' => 'Bibliography',
            'c' => 'Catalog',
            'd' => 'Dictionary',
            'e' => 'Encyclopedia',
            'f' => 'Handbook',
            'g' => 'Legal article',
            'i' => 'Index',
            'j' => 'Patent document',
            'k' => 'Discography',
            'l' => 'Legislation',
            'm' => 'Thesis',
            'n' => 'Surveys of literature in a subject area',
            'o' => 'Review',
            'p' => 'Programmed text',
            'q' => 'Filmography',
            'r' => 'Directory',
            's' => 'Statistics',
            't' => 'Technical report',
            'u' => 'Standards/specification',
            'v' => 'Legal cases and case notes',
            'w' => 'Law reports and digests',
            'y' => 'Yearbook',
            'z' => 'Treaty',
            '2' => 'Offprint',
            '5' => 'Calendar',
            '6' => 'Comics/graphic novel',
        );

        $videoFormats = array(
            'a' => 'Beta (1/2 in., videocassette)',
            'b' => 'VHS (1/2 in., videocassette)',
            'c' => 'U-matic (3/4 in., videocasstte)',
            'd' => 'EIAJ (1/2 in., reel)',
            'e' => 'Type C (1 in., reel)',
            'f' => 'Quadruplex (1 in. or 2 in., reel)',
            'g' => 'Laserdisc',
            'h' => 'CED (Capacitance Electronic Disc) videodisc',
            'i' => 'Betacam (1/2 in., videocassette)',
            'j' => 'Betacam SP (1/2 in., videocassette)',
            'k' => 'Super-VHS (1/2 in., videocassette)',
            'm' => 'M-II (1/2 in., videocassette)',
            'o' => 'D-2 (3/4 in., videocassette)',
            'p' => '8 mm.',
            'q' => 'Hi-8 mm.',
            's' => 'Blu-ray',
            'u' => 'Unknown',
            'v' => 'DVD',
        );

        // If Leader/06 = a and Leader/07 = a, c, d, or m: Books
        // If Leader/06 = a and Leader/07 = b, i, or s: Continuing Resources
        // If Leader/06 = t: Books
        // If Leader/06 = c, d, i, or j: Music
        // If Leader/06 = e, or f: Maps
        // If Leader/06 = g, k, o, or r: Visual Materials
        // If Leader/06 = m: Computer Files
        // If Leader/06 = p: Mixed Materials

        $ldr = str_split($data->text('marc:leader'));
        $f007 = str_split($data->text('marc:controlfield[@tag="007"]'));
        $f008 = str_split($data->text('marc:controlfield[@tag="008"]'));

        $material = 'Unknown';
        $this->material = $material;
        $this->electronic = false;

        $this->debug = array(
            'ldr06' => array_get($ldr, 6),
            'ldr07' => array_get($ldr, 7),
            'f7_01' => array_get($f007, 0) ?: null,
            'f7_02' => array_get($f007, 1),
        );

        if (count($ldr) < 8) {
            return;
        }
        if (count($f007) < 2) {
            return;
        }

        switch ($ldr[6]) {

            case 'a':
                if (in_array($ldr[7], array('a', 'c', 'd', 'm'))) {
                    $material = 'Book';
                }
                if (in_array($ldr[7], array('b', 'i', 's'))) {
                    $material = 'Series';
                }
                break;

            case 't':
                $material = 'Book';
                break;

            case 'c':
            case 'd':
            case 'i':
            case 'j':
                $material = 'Music';
                break;

            case 'e':
            case 'f':
                $material = 'Map';
                break;

            case 'g':
            case 'k':
            case 'o':
            case 'r':
                $material = 'Visual';
                break;

            case 'm':
                $material = 'File';
                // used for computer software, numeric data, not for e-books or e-journals!
                break;

            case 'p':
                $material = 'Mixed';
                break;

        }

        $online = ($f007[0] == 'c' && $f007[1] == 'r');

        if ($material == 'File') {
            $material = $this->getMaterialSubtypeFrom007($f007[0], $f007[1], $material);
        } elseif ($material == 'Visual') {
            $material = $this->getMaterialSubtypeFrom007($f007[0], $f007[1], $material);

            if (isset($f007[4]) && isset($videoFormats[$f007[4]])) {
                $material = $videoFormats[$f007[4]]; // DVD, Blu-ray
            }
        } elseif ($material == 'Music') {
            if ($f007[0] == 't') {
                $material = 'Sheet music';
            } else {
                $material = $this->getMaterialSubtypeFrom007($f007[0], $f007[1], $material);
                if (array_get($ldr, 7) == 'a') {
                    $material .= ' track';
                }
            }
        } elseif ($material == 'Series') {
            switch ($f008[21]) {

                case 'm':
                    $material = 'Series';  // Monographic series (merk: skiller ikke mellom 'flerbindsverk' og 'serieinnførsel')
                    break;

                case 'n':
                    $material = 'Newspaper';
                    if ($f007[0] == 'h') {
                        $material .= ' on microform';
                    }
                    break;

                case 'p':
                    $material = 'Periodical';
                    break;

            }
            if (array_get($ldr, 7) == 'a') {
                $material = 'Article';
            }
        } elseif ($material == 'Book') {
            if (isset($natureOfContents[$f008[24]])) {
                // Slight simplification
                $material = $natureOfContents[$f008[24]];
            }
            if (array_get($ldr, 7) == 'a') {
                $material = 'Article';
                // or Article/Chapter ?
            }
        }

        $this->material = $material;
        $this->electronic = $online;
    }