mambax7 / extcal

    */

        // ----- Look for no more block

        if ('' === $v_binary_data) {

            $v_header['filename'] = '';

            $v_header['status']   = 'empty';

            // ----- Return

            TrFctEnd(__FILE__, __LINE__, $v_result, 'End of archive found');

            return $v_result;

        }

        // ----- Look for invalid block size

        if (512 != strlen($v_binary_data)) {

            $v_header['status']   = 'invalid_header';

            // ----- Look for last block (empty block)

            if ((256 == $v_checksum) && (0 == $v_header['checksum'])) {

                $v_header['status'] = 'empty';

                // ----- Return

                TrFctEnd(__FILE__, __LINE__, $v_result, 'End of archive found');

                return $v_result;

            }

            // ----- Error log

            PclErrorLog(-13, "Invalid checksum : $v_checksum calculated, " . $v_header['checksum'] . ' expected');