/*

 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

 *

 * This code is free software; you can redistribute it and/or modify it

 * under the terms of the GNU General Public License version 2 only, as

 * published by the Free Software Foundation.  Oracle designates this

 * particular file as subject to the "Classpath" exception as provided

 * by Oracle in the LICENSE file that accompanied this code.

 *

 * This code is distributed in the hope that it will be useful, but WITHOUT

 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

 * version 2 for more details (a copy is included in the LICENSE file that

 * accompanied this code).

 *

 * You should have received a copy of the GNU General Public License version

 * 2 along with this work; if not, write to the Free Software Foundation,

 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

 *

 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

 * or visit www.oracle.com if you need additional information or have any

 * questions.

 *

 */

/*

 *

 * (C) Copyright IBM Corp.  and others 1998-2013 - All Rights Reserved

 *

 */

#include "LETypes.h"

#include "MorphTables.h"

#include "StateTables.h"

#include "MorphStateTables.h"

#include "SubtableProcessor2.h"

#include "StateTableProcessor2.h"

#include "LEGlyphStorage.h"

#include "LESwaps.h"

#include "LookupTables.h"

U_NAMESPACE_BEGIN

StateTableProcessor2::StateTableProcessor2()

{

}

{

}

StateTableProcessor2::~StateTableProcessor2()

{

}

{

    // Start at state 0

    // XXX: How do we know when to start at state 1?

    le_uint16 currentState = 0;

    le_int32 glyphCount = glyphStorage.getGlyphCount();

    LE_STATE_PATIENCE_INIT();

    le_int32 currGlyph = 0;

    if ((coverage & scfReverse2) != 0) {  // process glyphs in descending order

        currGlyph = glyphCount - 1;

        dir = -1;

    } else {

        dir = 1;

    }

    beginStateTable();

    switch (format) {

        case ltfSimpleArray: {

#ifdef TEST_FORMAT

            while ((dir == 1 && currGlyph <= glyphCount) || (dir == -1 && currGlyph >= -1)) {

                  LE_DEBUG_BAD_FONT("patience exceeded - state table not moving")

                  break; // patience exceeded.

                }

                LookupValue classCode = classCodeOOB;

                if (currGlyph == glyphCount || currGlyph == -1) {

                    // XXX: How do we handle EOT vs. EOL?

                    classCode = classCodeEOT;

                } else {

                    LEGlyphID gid = glyphStorage[currGlyph];

                    TTGlyphID glyphCode = (TTGlyphID) LE_GET_GLYPH(gid);

                    if (glyphCode == 0xFFFF) {

                        classCode = classCodeDEL;

                    } else {

                        classCode = SWAPW(lookupTable0->valueArray[gid]);

                    }

                }

                LE_STATE_PATIENCE_CURR(le_int32, currGlyph);

                currentState = processStateEntry(glyphStorage, currGlyph, entryTableIndex); // return a zero-based index instead of a byte offset

                LE_STATE_PATIENCE_INCR(currGlyph);

            }

#endif

            break;

        }

        case ltfSegmentSingle: {

            while ((dir == 1 && currGlyph <= glyphCount) || (dir == -1 && currGlyph >= -1)) {

                  break; // patience exceeded.

                }

                LookupValue classCode = classCodeOOB;

                if (currGlyph == glyphCount || currGlyph == -1) {

                    // XXX: How do we handle EOT vs. EOL?

                    classCode = classCodeEOT;

                } else {

                    LEGlyphID gid = glyphStorage[currGlyph];

                    TTGlyphID glyphCode = (TTGlyphID) LE_GET_GLYPH(gid);

                    if (glyphCode == 0xFFFF) {

                        classCode = classCodeDEL;

                    } else {

                            classCode = SWAPW(segment->value);

                        }

                    }

                }

                LE_STATE_PATIENCE_CURR(le_int32, currGlyph);

                LE_STATE_PATIENCE_INCR(currGlyph);

            }

            break;

        }

        case ltfSegmentArray: {

          //printf("Lookup Table Format4: specific interpretation needed!\n");

            break;

        }

        case ltfSingleTable: {

            while ((dir == 1 && currGlyph <= glyphCount) || (dir == -1 && currGlyph >= -1)) {

                  LE_DEBUG_BAD_FONT("patience exceeded - state table not moving")

                  break; // patience exceeded.

                }

                LookupValue classCode = classCodeOOB;

                if (currGlyph == glyphCount || currGlyph == -1) {

                    // XXX: How do we handle EOT vs. EOL?

                    classCode = classCodeEOT;

                } else if(currGlyph > glyphCount) {

                  // note if > glyphCount, we've run off the end (bad font)

                  currGlyph = glyphCount;

                  classCode = classCodeEOT;

                } else {

                    LEGlyphID gid = glyphStorage[currGlyph];

                    TTGlyphID glyphCode = (TTGlyphID) LE_GET_GLYPH(gid);

                    if (glyphCode == 0xFFFF) {

                        classCode = classCodeDEL;

                    } else {

                        if (segment != NULL) {

                            classCode = SWAPW(segment->value);

                        }

                    }

                }

                LE_STATE_PATIENCE_CURR(le_int32, currGlyph);

                LE_STATE_PATIENCE_INCR(currGlyph);

            }

            break;

        }

        case ltfTrimmedArray: {

            TTGlyphID firstGlyph = SWAPW(lookupTable8->firstGlyph);

            TTGlyphID lastGlyph  = firstGlyph + SWAPW(lookupTable8->glyphCount);

            while ((dir == 1 && currGlyph <= glyphCount) || (dir == -1 && currGlyph >= -1)) {

                if(LE_STATE_PATIENCE_DECR()) {

                  LE_DEBUG_BAD_FONT("patience exceeded - state table not moving")

                  break; // patience exceeded.

                }

                LookupValue classCode = classCodeOOB;

                if (currGlyph == glyphCount || currGlyph == -1) {

                    // XXX: How do we handle EOT vs. EOL?

                    classCode = classCodeEOT;

                } else {

                    TTGlyphID glyphCode = (TTGlyphID) LE_GET_GLYPH(glyphStorage[currGlyph]);

                    if (glyphCode == 0xFFFF) {

                        classCode = classCodeDEL;

                    } else if ((glyphCode >= firstGlyph) && (glyphCode < lastGlyph)) {

                        classCode = SWAPW(lookupTable8->valueArray[glyphCode - firstGlyph]);

                    }

                }

                LE_STATE_PATIENCE_CURR(le_int32, currGlyph);

                LE_STATE_PATIENCE_INCR(currGlyph);

            }

            break;

        }

        default:

            break;

    }

    endStateTable();

}

U_NAMESPACE_END