/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: t; c-basic-offset: 4 -*- */

/* libwpd

 * Version: MPL 2.0 / LGPLv2.1+

 *

 * This Source Code Form is subject to the terms of the Mozilla Public

 * License, v. 2.0. If a copy of the MPL was not distributed with this

 * file, You can obtain one at http://mozilla.org/MPL/2.0/.

 *

 * Major Contributor(s):

 * Copyright (C) 2003 William Lachance (wrlach@gmail.com)

 * Copyright (C) 2003 Marc Maurer (uwog@uwog.net)

 * Copyright (C) 2006 Fridrich Strba (fridrich.strba@bluewin.ch)

 *

 * For minor contributions see the git repository.

 *

 * Alternatively, the contents of this file may be used under the terms

 * of the GNU Lesser General Public License Version 2.1 or later

 * (LGPLv2.1+), in which case the provisions of the LGPLv2.1+ are

 * applicable instead of those above.

 *

 * For further information visit http://libwpd.sourceforge.net

 */

/* "This product is not manufactured, approved, or supported by

 * Corel Corporation or Corel Corporation Limited."

 */

#include "WP1Parser.h"

#include <memory>

#include "WP1Part.h"

#include "libwpd_internal.h"

#include "WP1FileStructure.h"

#include "WP1StylesListener.h"

#include "WP1ContentListener.h"

WP1Parser::WP1Parser(librevenge::RVNGInputStream *input, WPXEncryption *encryption) :

  WPXParser(input, nullptr, encryption)

{

}

WP1Parser::~WP1Parser()

{

}

void WP1Parser::parse(librevenge::RVNGInputStream *input, WPXEncryption *encryption, WP1Listener *listener)

{

  listener->startDocument();

  if (encryption)

    input->seek(6, librevenge::RVNG_SEEK_SET);

  else

    input->seek(0, librevenge::RVNG_SEEK_SET);

  WPD_DEBUG_MSG(("WordPerfect: Starting document body parse (position = %ld)\n",(long)input->tell()));

  parseDocument(input, encryption, listener);

  listener->endDocument();

}

// parseDocument: parses a document body (may call itself recursively, on other streams, or itself)

void WP1Parser::parseDocument(librevenge::RVNGInputStream *input, WPXEncryption *encryption, WP1Listener *listener)

{

  while (!input->isEnd())

  {

    unsigned char readVal;

    readVal = readU8(input, encryption);

    if (readVal < (unsigned char)0x20)

    {

      WPD_DEBUG_MSG(("Offset: %i, Handling Control Character 0x%2x\n", (unsigned int)input->tell(), readVal));

      switch (readVal)

      {

      case 0x09: // tab

        listener->insertTab();

        break;

      case 0x0A: // hard new line

        listener->insertEOL();

        break;

      case 0x0B: // soft new page

        listener->insertBreak(WPX_SOFT_PAGE_BREAK);

        break;

      case 0x0C: // hard new page

        listener->insertBreak(WPX_PAGE_BREAK);

        break;

      case 0x0D: // soft new line

        listener->insertCharacter(' ');

        break;

      default:

        // unsupported or undocumented token, ignore

        break;

      }

    }

    else if (readVal >= (unsigned char)0x20 && readVal <= (unsigned char)0x7F)

    {

      // normal ASCII characters

      listener->insertCharacter(readVal);

    }

    else if (readVal >= (unsigned char)0x80 && readVal <= (unsigned char)0xBF)

    {

      WPD_DEBUG_MSG(("Offset: %i, Handling Single Character Function 0x%2x\n", (unsigned int)input->tell(), readVal));

      // single character function codes

      switch (readVal)

      {

      case 0x90:

        listener->attributeChange(true, WP1_ATTRIBUTE_REDLINE);

        break;

      case 0x91:

        listener->attributeChange(false, WP1_ATTRIBUTE_REDLINE);

        break;

      case 0x92:

        listener->attributeChange(true, WP1_ATTRIBUTE_STRIKE_OUT);

        break;

      case 0x93:

        listener->attributeChange(false, WP1_ATTRIBUTE_STRIKE_OUT);

        break;

      case 0x94:

        listener->attributeChange(true, WP1_ATTRIBUTE_UNDERLINE);

        break;

      case 0x95:

        listener->attributeChange(false, WP1_ATTRIBUTE_UNDERLINE);

        break;

      case 0x9C:

        listener->attributeChange(false, WP1_ATTRIBUTE_BOLD);

        break;

      case 0x9D:

        listener->attributeChange(true, WP1_ATTRIBUTE_BOLD);

        break;

      case 0xB2:

        listener->attributeChange(true, WP1_ATTRIBUTE_ITALICS);

        break;

      case 0xB3:

        listener->attributeChange(false, WP1_ATTRIBUTE_ITALICS);

        break;

      case 0xB4:

        listener->attributeChange(true, WP1_ATTRIBUTE_SHADOW);

        break;

      case 0xB5:

        listener->attributeChange(false, WP1_ATTRIBUTE_SHADOW);

        break;

      case 0xB6:

        listener->attributeChange(true, WP1_ATTRIBUTE_OUTLINE);

        break;

      case 0xB7:

        listener->attributeChange(false, WP1_ATTRIBUTE_OUTLINE);

        break;

      case 0xBC:

        listener->attributeChange(true, WP1_ATTRIBUTE_SUPERSCRIPT);

        break;

      case 0xB9:

        listener->attributeChange(false, WP1_ATTRIBUTE_SUPERSCRIPT);

        break;

      case 0xBD:

        listener->attributeChange(true, WP1_ATTRIBUTE_SUBSCRIPT);

        break;

      case 0xB8:

        listener->attributeChange(false, WP1_ATTRIBUTE_SUBSCRIPT);

        break;

      default:

        // unsupported or undocumented token, ignore

        break;

      }

    }

    else if (readVal >= (unsigned char)0xC0 && readVal <= (unsigned char)0xFE)

    {

      std::unique_ptr<WP1Part> part(WP1Part::constructPart(input, encryption, readVal));

      if (part)

        part->parse(listener);

    }

    // ignore the rest since they are not documented and at least 0xFF is a special character that

    // marks end of variable length part in variable length multi-byte functions

  }

}

void WP1Parser::parse(librevenge::RVNGTextInterface *documentInterface)

{

  librevenge::RVNGInputStream *input = getInput();

  WPXEncryption *encryption = getEncryption();

  std::list<WPXPageSpan> pageList;

  try

  {

    // do a "first-pass" parse of the document

    // gather table border information, page properties (per-page)

    WP1StylesListener stylesListener(pageList);

    parse(input, encryption, &stylesListener);

    // postprocess the pageList == remove duplicate page spans due to the page breaks

    auto previousPage = pageList.begin();

    for (auto Iter=pageList.begin(); Iter != pageList.end();)

    {

      if ((Iter != previousPage) && ((*previousPage)==(*Iter)))

      {

        (*previousPage).setPageSpan((*previousPage).getPageSpan() + (*Iter).getPageSpan());

        Iter = pageList.erase(Iter);

      }

      else

      {

        previousPage = Iter;

        ++Iter;

      }

    }

    // second pass: here is where we actually send the messages to the target app

    // that are necessary to emit the body of the target document

    WP1ContentListener listener(pageList, documentInterface);

    parse(input, encryption, &listener);

  }

  catch (FileException)

  {

    WPD_DEBUG_MSG(("WordPerfect: File Exception. Parse terminated prematurely."));

    throw FileException();

  }

}

void WP1Parser::parseSubDocument(librevenge::RVNGTextInterface *documentInterface)

{

  std::list<WPXPageSpan> pageList;

  librevenge::RVNGInputStream *input = getInput();

  try

  {

    WP1StylesListener stylesListener(pageList);

    stylesListener.startSubDocument();

    parseDocument(input, nullptr, &stylesListener);

    stylesListener.endSubDocument();

    input->seek(0, librevenge::RVNG_SEEK_SET);

    WP1ContentListener listener(pageList, documentInterface);

    listener.startSubDocument();

    parseDocument(input, nullptr, &listener);

    listener.endSubDocument();

  }

  catch (FileException)

  {

    WPD_DEBUG_MSG(("WordPerfect: File Exception. Parse terminated prematurely."));

    throw FileException();

  }

}

/* vim:set shiftwidth=4 softtabstop=4 noexpandtab: */