Add getClassifications to Record

Author: danmichaelo

src/BibliographicRecord.php

@@ -3,6 +3,7 @@
 namespace Scriptotek\Marc;
 
 use Scriptotek\Marc\Exceptions\UnknownRecordType;
+use Scriptotek\Marc\Fields\Classification;
 use Scriptotek\Marc\Fields\Isbn;
 use Scriptotek\Marc\Fields\Person;
 use Scriptotek\Marc\Fields\Subject;
@@ -14,7 +15,7 @@ class BibliographicRecord extends Record
     /**
      * @var array List of properties to be included when serializing the record using the `toArray()` method.
      */
-    public $properties = ['id', 'isbns', 'title', 'subjects', 'creators'];
+    public $properties = ['id', 'isbns', 'title', 'creators', 'subjects', 'classifications'];
 
     /**
      * Get the descriptive cataloging form value from LDR/18. Returns any of
@@ -80,6 +81,22 @@ public function getSubjects($vocabulary = null, $tag = null)
         }));
     }
 
+    /**
+     * Get an array of the 080, 082, 083, 084 fields as `Classification` objects, optionally
+     * filtered by scheme and/or tag.
+     *
+     * @param string $scheme
+     * @return Classification[]
+     */
+    public function getClassifications($scheme = null)
+    {
+        return array_values(array_filter(Classification::get($this), function ($classifications) use ($scheme) {
+            $a = is_null($scheme) || $scheme == $classifications->getScheme();
+
+            return $a;
+        }));
+    }
+
     /**
      * Get an array of the 100 and 700 fields as `Person` objects, optionally
      * filtered by tag.

src/Fields/Classification.php

@@ -0,0 +1,73 @@
+<?php
+
+namespace Scriptotek\Marc\Fields;
+
+use Scriptotek\Marc\Record;
+
+class Classification extends Subfield implements \JsonSerializable
+{
+    use SerializableField;
+
+    /**
+     * @var array List of properties to be included when serializing the record using the `toArray()` method.
+     */
+
+    public $properties = ['scheme', 'number', 'heading', 'edition', 'assigning_agency', 'id'];
+
+    public static function get(Record $record)
+    {
+        $out = [];
+        foreach ($record->getFields('08[0234]', true) as $field) {
+            foreach ($field->getSubfields('a') as $sfa) {
+                $out[] = new Classification($field, $sfa);
+            }
+        }
+        return $out;
+    }
+
+    public function getScheme()
+    {
+        $typeMap = [
+            '080' => 'udc',
+            '082' => 'ddc',
+            '083' => 'ddc',
+        ];
+
+        $tag = $this->field->getTag();
+
+        if ($tag == '084') {
+            return $this->field->sf('2');
+        }
+
+        return $typeMap[$tag];
+    }
+
+    public function getEdition()
+    {
+        if (in_array($this->field->getTag(), ['080', '082', '083'])) {
+            return $this->field->sf('2');
+        }
+    }
+
+    public function getNumber()
+    {
+        return $this->subfield->getData();
+    }
+
+    public function getAssigningVocabulary()
+    {
+        return $this->field->sf('q');
+    }
+
+    public function getId()
+    {
+        // NOTE: Both $a and $0 are repeatable, but there's no examples of how that would look like.
+        //       I'm guessing that they would alternate: $a ... $0 ... $a ... $0 ... , but not sure.
+        return $this->field->sf('0');
+    }
+
+    public function __toString()
+    {
+        return $this->getNumber();
+    }
+}

src/Fields/Field.php

@@ -6,6 +6,8 @@
 
 class Field implements \JsonSerializable
 {
+    use SerializableField;
+
     /**
      * @var array List of properties to be included when serializing the record using the `toArray()` method.
      */

src/Fields/SerializableField.php

@@ -0,0 +1,25 @@
+<?php
+
+namespace Scriptotek\Marc\Fields;
+
+use Scriptotek\Marc\Record;
+
+trait SerializableField
+{
+    public function jsonSerialize()
+    {
+        if (count($this->properties)) {
+            $o = [];
+            foreach ($this->properties as $prop) {
+                $value = $this->$prop;
+                if (is_object($value)) {
+                    $o[$prop] = $value->jsonSerialize();
+                } elseif ($value) {
+                    $o[$prop] = $value;
+                }
+            }
+            return $o;
+        }
+        return (string) $this;
+    }
+}

src/Fields/Subfield.php

@@ -4,10 +4,10 @@
 
 abstract class Subfield implements \JsonSerializable
 {
-    protected $subfield;
     protected $field;
+    protected $subfield;
 
-    public function __construct(\File_MARC_Data_Field $field, \File_MARC_Subfield $subfield)
+    public function __construct(Field $field, \File_MARC_Subfield $subfield)
     {
         $this->field = $field;
         $this->subfield = $subfield;

src/Fields/Subject.php

@@ -48,7 +48,7 @@ public static function get(Record $record)
         foreach (parent::makeFieldObjects($record, '6..', true) as $subject) {
             if ($subject->getTag() == '653') {
                 foreach ($subject->getSubfields('a') as $sfa) {
-                    $subjects[] = new UncontrolledSubject($subject->getField(), $sfa);
+                    $subjects[] = new UncontrolledSubject($subject, $sfa);
                 }
             } else {
                 $subjects[] = $subject;

src/Fields/UncontrolledSubject.php

@@ -44,5 +44,4 @@ public function jsonSerialize()
             'term' => $this->getTerm(),
         ];
     }
-
 }

tests/ExamplesTest.php

@@ -17,7 +17,7 @@ public function testExample($filename) {
         $record = Record::fromFile($filename);
         $jsonFilename = substr($filename, 0, strrpos($filename, ".")) . '.json';
         if (!file_exists($jsonFilename)) {
-            file_put_contents($jsonFilename, json_encode($record, JSON_UNESCAPED_UNICODE | JSON_PRETTY_PRINT));
+            file_put_contents($jsonFilename, json_encode($record, JSON_UNESCAPED_UNICODE | JSON_UNESCAPED_SLASHES | JSON_PRETTY_PRINT));
         } else {
             $jsonData = file_get_contents($jsonFilename);
             $this->assertJsonStringEqualsJsonString($jsonData, json_encode($record));

tests/data/examples/bibliographic.json

@@ -25,5 +25,11 @@
             "vocabulary": "lcsh",
             "term": "Nuclear reactions : Addresses, essays, lectures"
         }
+    ],
+    "classifications": [
+        {
+            "scheme": "msc",
+            "number": "81"
+        }
     ]
 }

tests/data/examples/bibliographic2.json

@@ -60,5 +60,31 @@
             "type": "653",
             "term": "komponenter"
         }
+    ],
+    "classifications": [
+        {
+            "scheme": "udc",
+            "number": "535"
+        },
+        {
+            "scheme": "udc",
+            "number": "681.7"
+        },
+        {
+            "scheme": "udc",
+            "number": "534"
+        },
+        {
+            "scheme": "inspec",
+            "number": "b4170"
+        },
+        {
+            "scheme": "inspec",
+            "number": "a7820h"
+        },
+        {
+            "scheme": "inspec",
+            "number": "a4280"
+        }
     ]
-}
+}