Subversion-Projekte lars-tiefland.php_share

<?php

/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */

/**

 * File::Gettext

 *

 * PHP versions 4 and 5

 *

 * @category   FileFormats

 * @package    File_Gettext

 * @author     Michael Wallner <mike@php.net>

 * @copyright  2004-2005 Michael Wallner

 * @license    BSD, revised

 * @version    CVS: $Id: MO.php,v 1.8 2006/01/07 09:45:25 mike Exp $

 * @link       http://pear.php.net/package/File_Gettext

 */

/**

 * Requires File_Gettext

 */

require_once 'File/Gettext.php';

/**

 * File_Gettext_MO

 *

 * GNU MO file reader and writer.

 *

 * @author      Michael Wallner <mike@php.net>

 * @version     $Revision: 1.8 $

 * @access      public

 */

class File_Gettext_MO extends File_Gettext

{

    /**

     * file handle

     *

     * @access  private

     * @var     resource

     */

    var $_handle = null;

    /**

     * big endianess

     *

     * Whether to write with big endian byte order.

     *

     * @access  public

     * @var     bool

     */

    var $writeBigEndian = false;

    /**

     * Constructor

     *

     * @access  public

     * @return  object      File_Gettext_MO

     * @param   string      $file   path to GNU MO file

     */

    function File_Gettext_MO($file = '')

    {

        $this->file = $file;

    }

    /**

     * _read

     *

     * @access  private

     * @return  mixed

     * @param   int     $bytes

     */

    function _read($bytes = 1)

    {

        if (0 < $bytes = abs($bytes)) {

            return fread($this->_handle, $bytes);

        }

        return null;

    }

    /**

     * _readInt

     *

     * @access  private

     * @return  int

     * @param   bool    $bigendian

     */

    function _readInt($bigendian = false)

    {

        return current($array = unpack($bigendian ? 'N' : 'V', $this->_read(4)));

    }

    /**

     * _writeInt

     *

     * @access  private

     * @return  int

     * @param   int     $int

     */

    function _writeInt($int)

    {

        return $this->_write(pack($this->writeBigEndian ? 'N' : 'V', (int) $int));

    }

    /**

     * _write

     *

     * @access  private

     * @return  int

     * @param   string  $data

     */

    function _write($data)

    {

        return fwrite($this->_handle, $data);

    }

    /**

     * _writeStr

     *

     * @access  private

     * @return  int

     * @param   string  $string

     */

    function _writeStr($string)

    {

        return $this->_write($string . "\0");

    }

    /**

     * _readStr

     *

     * @access  private

     * @return  string

     * @param   array   $params     associative array with offset and length

     *                              of the string

     */

    function _readStr($params)

    {

        fseek($this->_handle, $params['offset']);

        return $this->_read($params['length']);

    }

    /**

     * Load MO file

     *

     * @access   public

     * @return   mixed   Returns true on success or PEAR_Error on failure.

     * @param    string  $file

     */

    function load($file = null)

    {

        $this->strings = array();

        if (!isset($file)) {

            $file = $this->file;

        }

        // open MO file

        if (!is_resource($this->_handle = @fopen($file, 'rb'))) {

            return parent::raiseError($php_errormsg . ' ' . $file);

        }

        // lock MO file shared

        if (!@flock($this->_handle, LOCK_SH)) {

            @fclose($this->_handle);

            return parent::raiseError($php_errormsg . ' ' . $file);

        }

        // read (part of) magic number from MO file header and define endianess

        switch ($magic = current($array = unpack('c', $this->_read(4))))

        {

            case -34:

                $be = false;

            break;

            case -107:

                $be = true;

            break;

            default:

                return parent::raiseError("No GNU mo file: $file (magic: $magic)");

        }

        // check file format revision - we currently only support 0

        if (0 !== ($_rev = $this->_readInt($be))) {

            return parent::raiseError('Invalid file format revision: ' . $_rev);

        }

        // count of strings in this file

        $count = $this->_readInt($be);

        // offset of hashing table of the msgids

        $offset_original = $this->_readInt($be);

        // offset of hashing table of the msgstrs

        $offset_translat = $this->_readInt($be);

        // move to msgid hash table

        fseek($this->_handle, $offset_original);

        // read lengths and offsets of msgids

        $original = array();

        for ($i = 0; $i < $count; $i++) {

            $original[$i] = array(

                'length' => $this->_readInt($be),

                'offset' => $this->_readInt($be)

            );

        }

        // move to msgstr hash table

        fseek($this->_handle, $offset_translat);

        // read lengths and offsets of msgstrs

        $translat = array();

        for ($i = 0; $i < $count; $i++) {

            $translat[$i] = array(

                'length' => $this->_readInt($be),

                'offset' => $this->_readInt($be)

            );

        }

        // read all

        for ($i = 0; $i < $count; $i++) {

            $this->strings[$this->_readStr($original[$i])] =

                $this->_readStr($translat[$i]);

        }

        // done

        @flock($this->_handle, LOCK_UN);

        @fclose($this->_handle);

        $this->_handle = null;

        // check for meta info

        if (isset($this->strings[''])) {

            $this->meta = parent::meta2array($this->strings['']);

            unset($this->strings['']);

        }

        return true;

    }

    /**

     * Save MO file

     *

     * @access  public

     * @return  mixed   Returns true on success or PEAR_Error on failure.

     * @param   string  $file

     */

    function save($file = null)

    {

        if (!isset($file)) {

            $file = $this->file;

        }

        // open MO file

        if (!is_resource($this->_handle = @fopen($file, 'wb'))) {

            return parent::raiseError($php_errormsg . ' ' . $file);

        }

        // lock MO file exclusively

        if (!@flock($this->_handle, LOCK_EX)) {

            @fclose($this->_handle);

            return parent::raiseError($php_errormsg . ' ' . $file);

        }

        // write magic number

        if ($this->writeBigEndian) {

            $this->_write(pack('c*', 0x95, 0x04, 0x12, 0xde));

        } else {

            $this->_write(pack('c*', 0xde, 0x12, 0x04, 0x95));

        }

        // write file format revision

        $this->_writeInt(0);

        $count = count($this->strings) + ($meta = (count($this->meta) ? 1 : 0));

        // write count of strings

        $this->_writeInt($count);

        $offset = 28;

        // write offset of orig. strings hash table

        $this->_writeInt($offset);

        $offset += ($count * 8);

        // write offset transl. strings hash table

        $this->_writeInt($offset);

        // write size of hash table (we currently ommit the hash table)

        $this->_writeInt(0);

        $offset += ($count * 8);

        // write offset of hash table

        $this->_writeInt($offset);

        // unshift meta info

        if ($meta) {

            $meta = '';

            foreach ($this->meta as $key => $val) {

                $meta .= $key . ': ' . $val . "\n";

            }

            $strings = array('' => $meta) + $this->strings;

        } else {

            $strings = $this->strings;

        }

        // write offsets for original strings

        foreach (array_keys($strings) as $o) {

            $len = strlen($o);

            $this->_writeInt($len);

            $this->_writeInt($offset);

            $offset += $len + 1;

        }

        // write offsets for translated strings

        foreach ($strings as $t) {

            $len = strlen($t);

            $this->_writeInt($len);

            $this->_writeInt($offset);

            $offset += $len + 1;

        }

        // write original strings

        foreach (array_keys($strings) as $o) {

            $this->_writeStr($o);

        }

        // write translated strings

        foreach ($strings as $t) {

            $this->_writeStr($t);

        }

        // done

        @flock($this->_handle, LOCK_UN);

        @fclose($this->_handle);

        return true;

    }

}

?>