Exemple #1
0
 public function save(SplFileObject $file)
 {
     $result = parent::save($file);
     if (isset($this->type)) {
         $result += $file->fwrite(Dictionary::mapName($this->type));
     } else {
         if (count($this->content)) {
             throw new UnexpectedValueException('Populated list needs an explicit type cast.');
         } else {
             $result += $file->fwrite(Dictionary::mapName('TAG_End'));
         }
     }
     $result += $file->fwrite(TAG_Int::store(count($this->content)));
     if (\tool::debug()) {
         \tool::fprint("Storing " . count($this->content) . " values of type {$this->type} @{$file->ftell()} ...");
     }
     $type = $this->type;
     foreach ($this->content as $index => $tag) {
         if (!is_object($tag)) {
             $result += $file->fwrite($type::store($tag));
         } else {
             if ($tag instanceof $this->type) {
                 if (isset($tag->name)) {
                     throw new UnexpectedValueException("List#{$index} is a named tag.");
                 }
                 $result += $tag->save($file);
             } else {
                 throw new UnexpectedValueException("List#{$index} type '" . get_class($tag) . "' doesn't match the list type '{$this->type}'.");
             }
         }
     }
     return $result;
 }
Exemple #2
0
 public static final function convert($format, $value)
 {
     $result = unpack($format, Dictionary::convert($value))[1];
     if (\tool::debug()) {
         \tool::fprint("Converted {$format}'" . bin2hex($value) . "' to {$result}");
     }
     return $result;
 }
 public function save(SplFileObject $file)
 {
     $result = parent::save($file);
     if (\tool::debug()) {
         \tool::fprint("Storing " . count($this->content) . " values @{$file->ftell()} ...");
     }
     $i = 1;
     foreach ($this->content as $tag) {
         if ($tag instanceof TAG_End) {
             break;
         }
         $result += $tag->save($file);
         $i++;
     }
     if (\tool::debug()) {
         if ($i < count($this->content)) {
             # TODO: Check if the tag is TAG_End at insetion times.
             \tool::fprint("Stored {$i} values! Don't stuff TAG_End in the middle of compound tags!");
         }
     }
     return $result + $file->fwrite(Dictionary::mapName("TAG_End"));
 }
Exemple #4
0
 public static final function convert($format, $value)
 {
     return Dictionary::convert(pack($format, $value));
 }
Exemple #5
0
 public function save(SplFileObject $file)
 {
     \tool::fprint("Saving ... " . get_called_class());
     return $file->fwrite(Dictionary::mapName($this->id));
 }
Exemple #6
0
 public function save(SplFileObject $file)
 {
     \tool::fprint("Saving ... " . get_called_class() . (isset($this->name) ? ":{$this->name}" : '') . "@{$file->ftell()}");
     return $file->fwrite(isset($this->name) ? Dictionary::mapName($this->id) . TAG_String::store($this->name) : '');
 }