/* -*- Mode: C++; c-default-style: "k&r"; indent-tabs-mode: nil; tab-width: 2; c-basic-offset: 2 -*- */

/* libmwaw

* Version: MPL 2.0 / LGPLv2+

*

* The contents of this file are subject to the Mozilla Public License Version

* 2.0 (the "License"); you may not use this file except in compliance with

* the License or as specified alternatively below. You may obtain a copy of

* the License at http://www.mozilla.org/MPL/

*

* Software distributed under the License is distributed on an "AS IS" basis,

* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License

* for the specific language governing rights and limitations under the

* License.

*

* Major Contributor(s):

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

* Copyright (C) 2002,2004 Marc Maurer (uwog@uwog.net)

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

* Copyright (C) 2006, 2007 Andrew Ziem

* Copyright (C) 2011, 2012 Alonso Laurent (alonso@loria.fr)

*

*

* All Rights Reserved.

*

* 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 or later (the "LGPLv2+"),

* in which case the provisions of the LGPLv2+ are applicable

* instead of those above.

*/

#include <cmath>

#include <iomanip>

#include <iostream>

#include <limits>

#include <sstream>

#include <librevenge/librevenge.h>

#include "MWAWFontConverter.hxx"

#include "MWAWGraphicListener.hxx"

#include "MWAWGraphicShape.hxx"

#include "MWAWGraphicStyle.hxx"

#include "MWAWHeader.hxx"

#include "MWAWParagraph.hxx"

#include "MWAWPictBitmap.hxx"

#include "MWAWPictData.hxx"

#include "MWAWPrinter.hxx"

#include "MWAWPosition.hxx"

#include "MWAWRSRCParser.hxx"

#include "MWAWSubDocument.hxx"

#include "MacDraft5Parser.hxx"

#include "MacDraft5StyleManager.hxx"

/** Internal: the structures of a MacDraft5StyleManager */

namespace MacDraft5StyleManagerInternal

{

/**  Internal and low level: a class used to read pack/unpack color pixmap of a MacDraf5StyleManager

     \note parse only unpacked pixmap, if packed pixmap can exist, the code of ApplePictParserInternal::Pixmap

     must be used

 */

struct Pixmap {

  Pixmap()

    : m_rowBytes(0)

    , m_rect()

    , m_version(-1)

    , m_packType(0)

    , m_packSize(0)

    , m_pixelType(0)

    , m_pixelSize(0)

    , m_compCount(0)

    , m_compSize(0)

    , m_planeBytes(0)

    , m_colorTable()

    , m_indices()

    , m_colors()

    , m_mode(0)

  {

    for (auto &res : m_resolution) res=0;

  }

  //! operator<< for Pixmap

  friend std::ostream &operator<< (std::ostream &o, Pixmap const &f)

  {

    o << "rDim=" << f.m_rowBytes << ", " << f.m_rect;

    o << ", resol=" << f.m_resolution[0] << "x" << f.m_resolution[1];

    return o;

  }

  //! parses the pixmap data zone

  bool readPixmapData(MWAWInputStream &input)

  {

    int W = m_rect.size().x(), H = m_rect.size().y();

    int const nPlanes = 1;

    int nBytes = 3, rowBytes = m_rowBytes;

    int numValuesByInt = 1;

    auto numColors = static_cast<int>(m_colorTable.size());

    int maxColorsIndex = -1;

    switch (m_pixelSize) {

    case 1:

    case 2:

    case 4:

    case 8: { // indices (associated to a color map)

      nBytes = 1;

      numValuesByInt = 8/m_pixelSize;

      int numValues = (W+numValuesByInt-1)/numValuesByInt;

      if (m_rowBytes < numValues || m_rowBytes > numValues+10) {

        MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::Pixmap::readPixmapData invalid number of rowsize : %d, pixelSize=%d, W=%d\n", m_rowBytes, m_pixelSize, W));

        return false;

      }

      if (numColors == 0) {

        MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::Pixmap::readPixmapData: readPixmapData no color table \n"));

        return false;

      }

      break;

    }

    case 16:

      nBytes = 2;

      break;

    case 32:

      nBytes=4;

      break;

    default:

      MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::Pixmap::readPixmapData: do not known how to read pixelsize=%d \n", m_pixelSize));

      return false;

    }

    if (m_pixelSize <= 8)

      m_indices.resize(size_t(H*W));

    else {

      if (rowBytes != W * nBytes * nPlanes) {

        MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::Pixmap::readPixmapData: find W=%d pixelsize=%d, rowSize=%d\n", W, m_pixelSize, m_rowBytes));

        if (rowBytes < W * nBytes * nPlanes)

          return false;

      }

      m_colors.resize(size_t(H*W));

    }

    long maxValues = m_pixelSize<=8 ? long(1 << m_pixelSize)-1 : 0;

    std::vector<unsigned char> values;

    values.resize(size_t(m_rowBytes+24), static_cast<unsigned char>(0));

    for (int y = 0; y < H; y++) {

      unsigned long numR = 0;

      unsigned char const *data = input.read(size_t(m_rowBytes), numR);

      if (!data || int(numR) != m_rowBytes) {

        MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::Pixmap::readPixmapData: readColors can not read line %d/%d (%d chars)\n", y, H, m_rowBytes));

        return false;

      }

      for (size_t j = 0; j < size_t(m_rowBytes); j++)

        values[j]=data[j];

      //

      // ok, we can add it in the pictures

      //

      int wPos = y*W;

      if (m_pixelSize <= 8) { // indexed

        for (int x = 0, rPos = 0; x < W;) {

          unsigned char val = values[size_t(rPos++)];

          for (int v = numValuesByInt-1; v >=0; v--) {

            int index = int((val>>(v*m_pixelSize))&maxValues);

            if (index > maxColorsIndex) maxColorsIndex = index;

            m_indices[size_t(wPos++)] = index;

            if (++x >= W) break;

          }

        }

      }

      else if (m_pixelSize == 16) {

        for (int x = 0, rPos = 0; x < W; x++) {

          unsigned int val = 256*static_cast<unsigned int>(values[size_t(rPos)])+static_cast<unsigned int>(values[size_t(rPos+1)]);

          rPos+=2;

          m_colors[size_t(wPos++)]=MWAWColor((val>>7)& 0xF8, (val>>2) & 0xF8, static_cast<unsigned char>(val << 3));

        }

      }

      else { // nPlanes=1

        for (int x = 0, rPos = 0; x < W; x++) {

          if (nBytes==4) rPos++;

          m_colors[size_t(wPos++)]=MWAWColor(values[size_t(rPos)], values[size_t(rPos+1)],  values[size_t(rPos+2)]);

          rPos+=3;

        }

      }

    }

    if (maxColorsIndex >= numColors) {

      // can be ok for a pixpat ; in this case:

      // maxColorsIndex -> foregroundColor, numColors -> backGroundColor

      // and intermediate index fills with intermediate colors

      int numUnset = maxColorsIndex-numColors+1;

      int decGray = (numUnset==1) ? 0 : 255/(numUnset-1);

      for (int i = 0; i < numUnset; i++)

        m_colorTable.push_back(MWAWColor(static_cast<unsigned char>(255-i*decGray), static_cast<unsigned char>(255-i*decGray), static_cast<unsigned char>(255-i*decGray)));

      MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::Pixmap::readPixmapData: find index=%d >= numColors=%d\n", maxColorsIndex, numColors));

      return true;

    }

    return true;

  }

  //! returns the pixmap

  bool get(MWAWEmbeddedObject &picture, MWAWVec2i &pictSize, MWAWColor &avColor) const

  {

    pictSize=m_rect.size();

    int W = m_rect.size().x();

    if (W <= 0) return false;

    if (!m_colorTable.empty() && m_indices.size()) {

      int nRows = int(m_indices.size())/W;

      MWAWPictBitmapIndexed pixmap(MWAWVec2i(W,nRows));

      if (!pixmap.valid()) return false;

      pixmap.setColors(m_colorTable);

      size_t numColor=m_colorTable.size();

      std::vector<int> colorByIndices(numColor,0);

      size_t rPos = 0;

      for (int i = 0; i < nRows; i++) {

        for (int x = 0; x < W; x++) {

          int id=m_indices[rPos++];

          if (id<0 || id>=static_cast<int>(numColor)) {

            static bool first=true;

            if (first) {

              MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::Pixmap::get: find some bad index\n"));

              first=false;

            }

            pixmap.set(x, i, 0);

          }

          else {

            ++colorByIndices[size_t(id)];

            pixmap.set(x, i, id);

          }

        }

      }

      float totalCol[3]= {0,0,0};

      long numCols=0;

      for (size_t i=0; i<numColor; ++i) {

        if (!colorByIndices[i]) continue;

        numCols+=colorByIndices[i];

        totalCol[0]+=float(colorByIndices[i])*float(m_colorTable[i].getRed());

        totalCol[1]+=float(colorByIndices[i])*float(m_colorTable[i].getGreen());

        totalCol[2]+=float(colorByIndices[i])*float(m_colorTable[i].getBlue());

      }

      if (numCols==0)

        avColor=MWAWColor::black();

      else

        avColor=MWAWColor(static_cast<unsigned char>(totalCol[0]/float(numCols)),

                          static_cast<unsigned char>(totalCol[1]/float(numCols)),

                          static_cast<unsigned char>(totalCol[2]/float(numCols)));

      return pixmap.getBinary(picture);

    }

    if (m_colors.size()) {

      int nRows = int(m_colors.size())/W;

      MWAWPictBitmapColor pixmap(MWAWVec2i(W,nRows));

      if (!pixmap.valid()) return false;

      size_t rPos = 0;

      long numCols=0;

      float totalCol[3]= {0,0,0};

      for (int i = 0; i < nRows; i++) {

        for (int x = 0; x < W; x++) {

          MWAWColor col=m_colors[rPos++];

          pixmap.set(x, i, col);

          totalCol[0]+=float(col.getRed());

          totalCol[1]+=float(col.getGreen());

          totalCol[2]+=float(col.getBlue());

          ++numCols;

        }

      }

      if (numCols==0)

        avColor=MWAWColor::black();

      else

        avColor=MWAWColor(static_cast<unsigned char>(totalCol[0]/float(numCols)),

                          static_cast<unsigned char>(totalCol[1]/float(numCols)),

                          static_cast<unsigned char>(totalCol[2]/float(numCols)));

      return pixmap.getBinary(picture);

    }

    MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::Pixmap::get: can not find any indices or colors \n"));

    return false;

  }

  //! the num of bytes used to store a row

  int m_rowBytes;

  MWAWBox2i m_rect /** the pixmap rectangle */;

  int m_version /** the pixmap version */;

  int m_packType /** the packing format */;

  long m_packSize /** size of data in the packed state */;

  int m_resolution[2] /** horizontal/vertical definition */;

  int m_pixelType /** format of pixel image */;

  int m_pixelSize /** physical bit by image */;

  int m_compCount /** logical components per pixels */;

  int m_compSize /** logical bits by components */;

  long m_planeBytes /** offset to the next plane */;

  //! the color table

  std::vector<MWAWColor> m_colorTable;

  //! the pixmap indices

  std::vector<int> m_indices;

  //! the colors

  std::vector<MWAWColor> m_colors;

  //! the encoding mode ?

  int m_mode;

};

////////////////////////////////////////

//! Internal: the state of a MacDraft5StyleManager

struct State {

  //! constructor

  State()

    : m_dataEnd(-1)

    , m_rsrcBegin(-1)

    , m_arrowList()

    , m_colorList()

    , m_patternList()

    , m_dashList()

    , m_beginToBitmapEntryMap()

    , m_bitmapIdToPixmapMap()

    , m_pixIdToPixmapMap()

    , m_pixIdToPatternIdMap()

  {

  }

  //! returns an arrow if possible

  bool getArrow(int id, MWAWGraphicStyle::Arrow &arrow)

  {

    if (m_arrowList.empty()) initArrows();

    if (id<=0 || id>int(m_arrowList.size())) {

      MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::getArrow: can not find arrow %d\n", id));

      return false;

    }

    arrow=m_arrowList[size_t(id-1)];

    return true;

  }

  //! returns a color if possible

  bool getColor(int id, MWAWColor &col)

  {

    if (m_colorList.empty()) initColors();

    if (id<=0 || id>int(m_colorList.size())) {

      MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::getColor: can not find color %d\n", id));

      return false;

    }

    col=m_colorList[size_t(id-1)];

    return true;

  }

  //! returns a pattern if possible

  bool getPattern(int id, MWAWGraphicStyle::Pattern &pat)

  {

    if (m_patternList.empty()) initPatterns();

    if (id<=0 || id>int(m_patternList.size())) {

      MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::getPattern: can not find pattern %d\n", id));

      return false;

    }

    pat=m_patternList[size_t(id-1)];

    return true;

  }

  //! returns the dash

  bool getDash(int id, std::vector<float> &dash)

  {

    if (m_dashList.empty()) initDashs();

    if (id<0 || id>=int(m_dashList.size())) {

      MWAW_DEBUG_MSG(("MacDraft5StyleManagerInternal::getDash: can not find dash %d\n", id));

      return false;

    }

    dash=m_dashList[size_t(id)];

    return true;

  }

  //! init the arrow list

  void initArrows();

  //! init the color list

  void initColors();

  //! init the patterns list

  void initPatterns();

  //! init the dashs list

  void initDashs();

  //! the end of the main data zone

  long m_dataEnd;

  //! the begin of the rsrc data

  long m_rsrcBegin;

  //! the arrow list

  std::vector<MWAWGraphicStyle::Arrow> m_arrowList;

  //! the color list

  std::vector<MWAWColor> m_colorList;

  //! the patterns list

  std::vector<MWAWGraphicStyle::Pattern> m_patternList;

  //! the list of dash

  std::vector< std::vector<float> > m_dashList;

  //! a map file position to entry ( used to stored intermediar zones )

  std::map<long, MWAWEntry> m_beginToBitmapEntryMap;

  //! a map bitmapId to pixmap map

  std::map<int, std::shared_ptr<Pixmap> > m_bitmapIdToPixmapMap;

  //! a map pixmapId to pixmap map

  std::map<int, std::shared_ptr<Pixmap> > m_pixIdToPixmapMap;

  //! a map pixmapId to patternId map

  std::map<int, size_t> m_pixIdToPatternIdMap;

};

void State::initArrows()

{

  if (!m_arrowList.empty())

    return;

  // -- triangle

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(5, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(3000,3000)),

                        "M1500 0l1500 3000h-3000zM1500 447l-1176 2353h2353z", false));

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(5, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(20,30)), "m10 0l-10 30h20z", false));

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(7, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(21590,27940)),

                        "M 4568,5865 C 5566,5865 6421,6329 6936,7063 L 4568,2063 2200,7063 C 2716,6329 3570,5865 4568,5865 Z M 4529,6665 C 3041,6665 1768,7358 1000,8451 L 4529,1000 8057,8451 C 7289,7358 6016,6665 4529,6665 Z", false));

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(5, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(1131,1580)),

                        "M1013 1491l118 89-567-1580-564 1580 114-85 136-68 148-46 161-17 161 13 153 46z", false));

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(8, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(3000,3000)),

                        "M1500 0l1500 3000h-3000zM1500 447l-1176 2353h2353z", false));

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(8, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(20,30)), "m10 0l-10 30h20z", false));

  // -- circle/disk

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(5, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(3000,3000)), "M1500 3000c-276 0-511-63-750-201s-411-310-549-549-201-474-201-750 63-511 201-750 310-411 549-549 474-201 750-201 511 63 750 201 411 310 549 549 201 474 201 750-63 511-201 750-310 411-549 549-474 201-750 201zM1500 2800c-239 0-443-55-650-174s-356-269-476-476-174-411-174-650 55-443 174-650 269-356 476-476c207-119 411-174 650-174s443 55 650 174c207 120 356 269 476 476s174 411 174 650-55 443-174 650-269 356-476 476c-207 119-411 174-650 174z", false));

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(5, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(1131,1131)), "M462 1118l-102-29-102-51-93-72-72-93-51-102-29-102-13-105 13-102 29-106 51-102 72-89 93-72 102-50 102-34 106-9 101 9 106 34 98 50 93 72 72 89 51 102 29 106 13 102-13 105-29 102-51 102-72 93-93 72-98 51-106 29-101 13z", false));

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(10, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(3000,3000)), "M1500 3000c-276 0-511-63-750-201s-411-310-549-549-201-474-201-750 63-511 201-750 310-411 549-549 474-201 750-201 511 63 750 201 411 310 549 549 201 474 201 750-63 511-201 750-310 411-549 549-474 201-750 201zM1500 2800c-239 0-443-55-650-174s-356-269-476-476-174-411-174-650 55-443 174-650 269-356 476-476c207-119 411-174 650-174s443 55 650 174c207 120 356 269 476 476s174 411 174 650-55 443-174 650-269 356-476 476c-207 119-411 174-650 174z", false));

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(10, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(1131,1131)), "M462 1118l-102-29-102-51-93-72-72-93-51-102-29-102-13-105 13-102 29-106 51-102 72-89 93-72 102-50 102-34 106-9 101 9 106 34 98 50 93 72 72 89 51 102 29 106 13 102-13 105-29 102-51 102-72 93-93 72-98 51-106 29-101 13z", false));

  // -- line

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(5, MWAWBox2i(MWAWVec2i(1000,1000),MWAWVec2i(8801, 9501)),

                        "M 1000,1000 L 2000,1000 9800,10499 8588,10500 5900,6900 6000,10400 4900,10400 4800,5700 1000,1000 Z", false));

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(10, MWAWBox2i(MWAWVec2i(1000,1000),MWAWVec2i(8801, 9501)),

                        "M 1000,1000 L 2000,1000 9800,10499 8588,10500 5900,6900 6000,10400 4900,10400 4800,5700 1000,1000 Z", false));

  // -- cross

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(10, MWAWBox2i(MWAWVec2i(1000, 900),MWAWVec2i(5001,5201)),

                        "M 6000,5500 L 5600,6100 3900,4500 3900,6000 3000,6000 3000,4500 1400,6100 1000,5500 2900,3551 1000,1500 1600,900 3500,2936 5300,1100 5900,1500 4025,3475 6000,5500 Z", false));

  // -- triangle

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(5, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(3000,3000)),

                        "M1500 0l1500 3000h-3000zM1500 447l-1176 2353h2353z", false));

  m_arrowList.push_back(MWAWGraphicStyle::Arrow(5, MWAWBox2i(MWAWVec2i(0,0),MWAWVec2i(1122,2243)), "M0 2108v17 17l12 42 30 34 38 21 43 4 29-8 30-21 25-26 13-34 343-1532 339 1520 13 42 29 34 39 21 42 4 42-12 34-30 21-42v-39-12l-4 4-440-1998-9-42-25-39-38-25-43-8-42 8-38 25-26 39-8 42z", false));

}

void State::initColors()

{

  if (!m_colorList.empty()) return;

  for (int i=0; i<131; ++i) {

    static uint32_t const colors[131] = {

      0xffffff,0x000000,0x7f7f7f,0xdd0806,0x008011,0x0000d4,0x02abea,0xf20884,

      0xfcf305,0xff1b00,0xff3700,0xff5300,0xff6f00,0xff8b00,0xffa700,0xffc300,

      0xffdf00,0xfffb00,0xe8ff00,0xccff00,0xb0ff00,0x94ff00,0x79ff00,0x5dff00,

      0x41ff00,0x25ff00,0x09ff00,0x00ff12,0x00ff2e,0x00ff4a,0x00ff66,0x00ff82,

      0x00ff9e,0x00ffba,0x00ffd6,0x00fff2,0x00f2ff,0x00d6ff,0x00baff,0x009eff,

      0x0082ff,0x0066ff,0x004aff,0x002eff,0x0012ff,0x0900ff,0x2500ff,0x4100ff,

      0x5d00ff,0x7800ff,0x9400ff,0xb000ff,0xcc00ff,0xe800ff,0xff00fb,0xff00df,

      0xff00c3,0xff00a7,0xff008b,0xff006f,0xff0053,0xff0037,0xff001b,0xff0000,

      0xc31500,0xc32a00,0xc33f00,0xc35500,0xc36a00,0xc37f00,0xc39500,0x3a3a3a,

      0x535353,0x6d6d6d,0x868686,0xa0a0a0,0xb9b9b9,0xd2d2d2,0xeaeaea,0xcccccc,

      0x999999,0x878787,0x00ffff

    };

    m_colorList.push_back(MWAWColor(colors[i]));

  }

}

void State::initPatterns()

{

  if (!m_patternList.empty()) return;

  for (int i=0; i<71; ++i) {

    static uint16_t const patterns[71*4] = {

      0x0,0x0,0x0,0x0,0xffff,0xffff,0xffff,0xffff,0x40,0x400,0x10,0x100,0x8040,0x2010,0x804,0x201,

      0x102,0x408,0x1020,0x4080,0x842,0x90,0x440,0x1001,0xe070,0x381c,0xe07,0x83c1,0x8307,0xe1c,0x3870,0xe0c1,

      0x8000,0x0,0x800,0x0,0x42a,0x4025,0x251,0x2442,0x4422,0x88,0x4422,0x88,0x1122,0x4400,0x1122,0x4400,

      0x8000,0x800,0x8000,0x800,0x4aa4,0x8852,0x843a,0x4411,0x8844,0x2211,0x8844,0x2211,0x1122,0x4488,0x1122,0x4488,

      0x8800,0x2200,0x8800,0x2200,0x4cd2,0x532d,0x9659,0x46b3,0x99cc,0x6633,0x99cc,0x6633,0x3366,0xcc99,0x3366,0xcc99,

      0x8822,0x8822,0x8822,0x8822,0xdbbe,0xedbb,0xfeab,0xbeeb,0xcc00,0x0,0x3300,0x0,0x101,0x1010,0x101,0x1010,

      0xaa55,0xaa55,0xaa55,0xaa55,0xf7bd,0xff6f,0xfbbf,0xeffe,0x2040,0x8000,0x804,0x200,0x40a0,0x0,0x40a,0x0,

      0x77dd,0x77dd,0x77dd,0x77dd,0x8244,0x3944,0x8201,0x101,0xff00,0x0,0xff00,0x0,0x8888,0x8888,0x8888,0x8888,

      0x8142,0x3c18,0x183c,0x4281,0xb130,0x31b,0xb8c0,0xc8d,0x6c92,0x8282,0x4428,0x1000,0xff80,0x8080,0xff80,0x8080,

      0x8142,0x2418,0x1020,0x4080,0xff80,0x8080,0xff08,0x808,0x8080,0x413e,0x808,0x14e3,0xff88,0x8888,0xff88,0x8888,

      0xff80,0x8080,0x8080,0x8080,0xbf00,0xbfbf,0xb0b0,0xb0b0,0xaa00,0x8000,0x8800,0x8000,0xaa44,0xaa11,0xaa44,0xaa11,

      0x8244,0x2810,0x2844,0x8201,0x8,0x142a,0x552a,0x1408,0x1038,0x7cfe,0x7c38,0x1000,0x1020,0x54aa,0xff02,0x408,

      0x8080,0x8080,0x8094,0xaa55,0x804,0x2a55,0xff40,0x2010,0x7789,0x8f8f,0x7798,0xf8f8,0x8814,0x2241,0x8800,0xaa00,

      0x77eb,0xddbe,0x77ff,0x55ff,0x1022,0x408a,0x4022,0x108a,0xefdd,0xbf75,0xbfdd,0xef75,0x9f90,0x909f,0xf909,0x9f9,

      0xf078,0x2442,0x870f,0x1221,0xfe82,0xfeee,0xef28,0xefee,0xf9fc,0x664f,0x9f3f,0x66f3,0xaf5f,0xaf5f,0xd0b,0xd0b,

      0xa011,0xa1c,0x2844,0x82c1,0xf0f0,0xf0f0,0xf0f,0xf0f,0xc864,0x3219,0x9923,0x468c,0xc000,0x0,0xc,0x1221,

      0x101,0x8040,0x2020,0x4080,0x8844,0x2211,0x1121,0x4284,0xf87c,0x3e1f,0x1121,0x4284,0x1c32,0x71f0,0xf8e4,0xc281,

      0xd86c,0x3613,0xa141,0x8205,0x810,0x1038,0xcf07,0x204,0x8851,0x2254,0x8814,0x2241

    };

    MWAWGraphicStyle::Pattern pat;

    pat.m_dim=MWAWVec2i(8,8);

    pat.m_data.resize(8);

    pat.m_colors[0]=MWAWColor::white();

    pat.m_colors[1]=MWAWColor::black();

    uint16_t const *patPtr=&patterns[4*i];

    for (size_t j=0; j<8; j+=2, ++patPtr) {

      pat.m_data[j]=uint8_t((*patPtr)>>8);

      pat.m_data[j+1]=uint8_t((*patPtr)&0xFF);

    }

    m_patternList.push_back(pat);

  }

}

void State::initDashs()

{

  if (!m_dashList.empty()) return;

  std::vector<float> dash;

  // 0: full

  m_dashList.push_back(dash);

  // 1: 6x2

  dash.push_back(6);

  dash.push_back(2);

  m_dashList.push_back(dash);

  // 2: 12x2

  dash[0]=12;

  m_dashList.push_back(dash);

  // 3: 24x3

  dash[0]=24;

  dash[1]=3;

  m_dashList.push_back(dash);

  // 4: 48x4

  dash[0]=48;

  dash[1]=4;

  m_dashList.push_back(dash);

  // 5: 6,2,1,2

  dash.resize(4);

  dash[0]=6;

  dash[1]=dash[3]=2;

  dash[2]=1;

  m_dashList.push_back(dash);

  // 6: 12,2,1,2

  dash[0]=12;

  m_dashList.push_back(dash);

  // 7: 24,3,2,3

  dash[0]=24;

  dash[1]=dash[3]=3;

  dash[2]=2;

  m_dashList.push_back(dash);

  // 8: 48,4,2,4

  dash[0]=48;

  dash[1]=dash[3]=4;

  dash[2]=2;

  m_dashList.push_back(dash);

  // 9:6,2,1,2,1,2,

  dash.resize(6);

  dash[0]=6;

  dash[1]=dash[3]=dash[5]=2;

  dash[2]=dash[4]=1;

  m_dashList.push_back(dash);

  // 10:12,2,1,2,1,2,

  dash[0]=12;

  m_dashList.push_back(dash);

  // 11:24,3,2,2,2,3

  dash[0]=24;

  dash[2]=dash[3]=dash[4]=2;

  dash[1]=dash[5]=3;

  m_dashList.push_back(dash);

  // 12: 48,4,2,2,2,4

  dash[0]=48;

  dash[1]=dash[5]=4;

  m_dashList.push_back(dash);

  // 13: 12,2,1,2,1,2,1,2

  dash.resize(8);

  dash[0]=6;

  dash[1]=dash[3]=dash[5]=dash[7]=2;

  dash[2]=dash[4]=dash[6]=1;

  m_dashList.push_back(dash);

  // 14: 24,3,2,2,2,2,2,3

  dash[0]=24;

  dash[2]=dash[3]=dash[4]=dash[5]=dash[6]=2;

  dash[1]=dash[7]=3;

  m_dashList.push_back(dash);

  // 15: 48,4,2,3,2,3,2,4

  dash[0]=48;

  dash[1]=dash[7]=4;

  dash[2]=dash[4]=dash[6]=2;

  dash[3]=dash[5]=3;

  m_dashList.push_back(dash);

}

}

////////////////////////////////////////////////////////////

// constructor/destructor, ...

////////////////////////////////////////////////////////////

MacDraft5StyleManager::MacDraft5StyleManager(MacDraft5Parser &parser)

  : m_parser(parser)

  , m_parserState(parser.getParserState())

  , m_state(new MacDraft5StyleManagerInternal::State)

{

}

MacDraft5StyleManager::~MacDraft5StyleManager()

{

}

long MacDraft5StyleManager::getEndDataPosition() const

{

  return m_state->m_dataEnd;

}

bool MacDraft5StyleManager::getColor(int colId, MWAWColor &color) const

{

  return m_state->getColor(colId, color);

}

std::string MacDraft5StyleManager::updateArrows(int startId, int endId, MWAWGraphicStyle &style)

{

  if (style.m_lineWidth<=0) return "";

  libmwaw::DebugStream f;

  if (startId) {

    if (m_state->getArrow(startId, style.m_arrows[0])) {

      style.m_arrows[0].m_width *= std::sqrt(style.m_lineWidth);

      f << "start[arrow]=[" << style.m_arrows[0] << "],";

    }

    else

      f << "##arrow[startId]=" << startId << ",";

  }

  if (endId) {

    if (m_state->getArrow(endId, style.m_arrows[1])) {

      style.m_arrows[1].m_width *= std::sqrt(style.m_lineWidth);

      f << "end[arrow]=[" << style.m_arrows[1] << "],";

    }

    else

      f << "##arrow[endId]=" << endId << ",";

  }

  return f.str();

}

std::string MacDraft5StyleManager::updateLineStyle(int type, int id, int dashId, MWAWGraphicStyle &style)

{

  libmwaw::DebugStream f;

  switch (type) {

  case 0:

    style.m_lineWidth=0;

    f << "no[line],";

    break;

  case 1: { // use color

    MWAWColor color;

    if (id==0) {

      style.m_lineWidth=0;

      f << "no[color],";

    }

    else if (m_state->getColor(id, color)) {

      if (!color.isBlack())

        f << "col[line]=" << color << ",";

      style.m_lineColor=color;

    }

    else

      f << "###colId=" << id << ",";

    break;

  }

  case 2: {

    f << "opacity[line]=" << float(id)/255 << "%,";

    style.m_lineOpacity=float(id)/255.f;

    break;

  }

  case 3: { // use pattern

    MWAWGraphicStyle::Pattern pattern;

    if (id==0) {

      style.m_lineWidth=0;

      f << "no[linePattern],";

    }

    else if (m_state->getPattern(id, pattern)) {

      f << "usePattern[line]=" << id << ",";

      pattern.getAverageColor(style.m_lineColor);

    }

    else

      f << "###patId=" << id << ",";

    break;

  }

  default:

    MWAW_DEBUG_MSG(("MacDraft5StyleManager::updateLineStyle: find unknown line type\n"));

    f << "###line[type]=" << type << ",";

    break;

  }

  if (m_state->getDash(dashId, style.m_lineDashWidth)) {

    if (style.m_lineDashWidth.size()) f << "dash[id]=" << dashId << ",";

  }

  else

    f << "##dash[id]=" << dashId << ",";

  return f.str();

}

std::string MacDraft5StyleManager::updateSurfaceStyle(int type, int id, MWAWGraphicStyle &style)

{

  libmwaw::DebugStream f;

  switch (type) {

  case 0:

    f << "no[surf],";

    break;

  case 1: { // use color

    MWAWColor color;

    if (id==0)

      f << "no[color],";

    else if (m_state->getColor(id, color)) {

      if (!color.isWhite())

        f << "col[surf]=" << color << ",";

      style.setSurfaceColor(color);

    }

    else

      f << "###colId=" << id << ",";

    break;

  }

  case 2: { // use pattern

    MWAWGraphicStyle::Pattern pattern;

    if (id==0)

      f << "no[pattern],";

    else if (m_state->getPattern(id, pattern)) {

      style.setPattern(pattern);

      f << "usePattern[surf]=" << id << ",";

    }

    else

      f << "###patId=" << id << ",";

    break;

  }

  case 3: {

    if (id>=0 && id<255)

      style.m_surfaceOpacity=float(id)/255.f;

    else {

      MWAW_DEBUG_MSG(("MacDraft5StyleManager::updateSurfaceStyle:surface opacity seems bads\n"));

      f << "###";

    }

    f << "opacity=" << int(id)/255 << "%,";

    break;

  }

  default:

    MWAW_DEBUG_MSG(("MacDraft5StyleManager::updateSurfaceStyle: find unknown surf type\n"));

    f << "###surf[type]=" << type << ",";

    break;

  }

  return f.str();

}

bool MacDraft5StyleManager::getBitmap(int bId, MWAWEmbeddedObject &picture) const

{

  MWAWVec2i pictSize;

  MWAWColor avColor;

  if (m_state->m_bitmapIdToPixmapMap.find(bId)==m_state->m_bitmapIdToPixmapMap.end() ||

      !m_state->m_bitmapIdToPixmapMap.find(bId)->second ||

      !m_state->m_bitmapIdToPixmapMap.find(bId)->second->get(picture,pictSize,avColor)) {

    MWAW_DEBUG_MSG(("MWAWMacDraft5StyleManager::getBitmap: can not find bitmap %d\n", bId));

    return false;

  }

#ifdef DEBUG_WITH_FILES

  if (!picture.m_dataList.empty()) {

    std::stringstream s;

    s << "Bitmap" << bId << ".ppm";

    libmwaw::Debug::dumpFile(picture.m_dataList[0], s.str().c_str());

  }

#endif

  return true;

}

bool MacDraft5StyleManager::getPixmap(int pId, MWAWEmbeddedObject &picture, MWAWVec2i &pictSize, MWAWColor &avColor) const

{

  if (m_state->m_pixIdToPixmapMap.find(pId)==m_state->m_pixIdToPixmapMap.end() ||

      !m_state->m_pixIdToPixmapMap.find(pId)->second ||

      !m_state->m_pixIdToPixmapMap.find(pId)->second->get(picture,pictSize,avColor)) {

    MWAW_DEBUG_MSG(("MWAWMacDraft5StyleManager::getPixmap: can not find pixmap %d\n", pId));

    return false;

  }

#ifdef DEBUG_WITH_FILES

  if (!picture.m_dataList.empty()) {

    std::stringstream s;

    s << "PixPat" << pId << ".ppm";

    libmwaw::Debug::dumpFile(picture.m_dataList[0], s.str().c_str());

  }

#endif

  return true;

}

void MacDraft5StyleManager::updatePatterns()

{

  for (auto const &it : m_state->m_pixIdToPatternIdMap) {

    MWAWEmbeddedObject picture;

    MWAWVec2i bitmapSize;

    MWAWColor averageColor;

    if (!getPixmap(it.first, picture, bitmapSize, averageColor)) continue;

    if (it.second>=m_state->m_patternList.size()) {

      MWAW_DEBUG_MSG(("MWAWMacDraft5StyleManager::updatePatterns: oops patterns id seems bad for %d\n", it.first));

      continue;

    }

    auto pixmap=m_state->m_pixIdToPixmapMap.find(it.first)->second;

    m_state->m_patternList[it.second]=MWAWGraphicStyle::Pattern(bitmapSize, picture, averageColor);

  }

  // check for unused pixmap

  for (auto const &it : m_state->m_pixIdToPixmapMap) {

    if (m_state->m_pixIdToPatternIdMap.find(it.first)!=m_state->m_pixIdToPatternIdMap.end() || !it.second)

      continue;

    static bool first=true;

    if (first) {

      MWAW_DEBUG_MSG(("MWAWMacDraft5StyleManager::updatePatterns: find unread pixmap %d\n", it.first));

      first=false;

    }

    MWAWEmbeddedObject picture;

    MWAWVec2i bitmapSize;

    MWAWColor averageColor;

    getPixmap(it.first, picture, bitmapSize, averageColor);

  }

}

////////////////////////////////////////////////////////////

//

// Intermediate level

//

////////////////////////////////////////////////////////////

bool MacDraft5StyleManager::readBitmapZones()

{

  if (m_state->m_beginToBitmapEntryMap.empty()) {

    m_state->m_dataEnd=m_state->m_rsrcBegin;

    return true;

  }

  MWAWInputStreamPtr input = m_parserState->m_input;

  libmwaw::DebugFile &ascFile = m_parserState->m_asciiFile;

  if (m_state->m_rsrcBegin>0)

    input->pushLimit(m_state->m_rsrcBegin);

  auto it=m_state->m_beginToBitmapEntryMap.begin();

  m_state->m_dataEnd=it->first;

  long lastPos=it->first;

  while (it!=m_state->m_beginToBitmapEntryMap.end()) {

    if (it->first!=lastPos) {

      MWAW_DEBUG_MSG(("MacDraft5StyleManager::readBitmapZones: find some unknown zone\n"));

      ascFile.addPos(lastPos);

      ascFile.addNote("Entries(UnknZone):");

    }

    MWAWEntry const &entry=it++->second;

    lastPos=entry.end();

    if (entry.type()=="bitmap" && readBitmap(entry))

      continue;

    ascFile.addPos(entry.begin());

    ascFile.addNote("Entries(BITData):");

  }

  if (m_state->m_rsrcBegin>0)

    input->popLimit();

  return true;

}

////////////////////////////////////////////////////////////

// resource fork

////////////////////////////////////////////////////////////

bool MacDraft5StyleManager::readResources()

{

  // first look the resource manager

  MWAWRSRCParserPtr rsrcParser = m_parserState->m_rsrcParser;

  if (rsrcParser) {

    auto &entryMap = rsrcParser->getEntriesMap();

    for (auto &it : entryMap)

      readResource(it.second, true);

  }

  MWAWInputStreamPtr input = m_parserState->m_input;

  long endPos=input->size();

  if (endPos<=28) {

    MWAW_DEBUG_MSG(("MacDraft5StyleManager::readResources: the file seems too short\n"));

    return false;

  }

  input->seek(-10, librevenge::RVNG_SEEK_END);

  auto dSz=static_cast<int>(input->readULong(2));

  if (dSz<28 || dSz>=endPos)

    return false;

  std::string name("");

  for (int i=0; i<8; ++i) name+=char(input->readULong(1));

  if (name!="RBALRPH ") return false;

  input->seek(-dSz, librevenge::RVNG_SEEK_END);

  long pos=input->tell();

  libmwaw::DebugFile &ascFile=m_parserState->m_asciiFile;

  libmwaw::DebugStream f;

  f << "Entries(RSRCMap):";

  auto depl=long(input->readULong(4));

  long debRSRCPos=endPos-depl;

  if (depl>endPos || debRSRCPos>pos) {

    MWAW_DEBUG_MSG(("MacDraft5StyleManager::readResources: the depl0 is bad\n"));

    return false;

  }

  f << "debPos=" << std::hex << debRSRCPos << std::dec << ",";

  depl=long(input->readULong(4));

  if (pos-depl!=debRSRCPos) {

    MWAW_DEBUG_MSG(("MacDraft5StyleManager::readResources: the depl1 is bad\n"));

    f << "###";

    ascFile.addPos(pos);

    ascFile.addNote(f.str().c_str());

    return false;

  }

  name="";

  for (int i=0; i<4; ++i) name +=char(input->readULong(1));

  if (name!="RSRC") {

    MWAW_DEBUG_MSG(("MacDraft5StyleManager::readResources: can not find the resource name\n"));

    f << "###";

    ascFile.addPos(pos);

    ascFile.addNote(f.str().c_str());

    return false;

  }

  int N=(dSz-22)/2;

  for (int i=0; i<N; ++i) { // f0=1

    auto val=static_cast<int>(input->readLong(2));

    if (val) f << "f" << i << "=" << val << ",";

  }

  ascFile.addPos(pos);

  ascFile.addNote(f.str().c_str());

  input->pushLimit(pos);

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

  while (!input->isEnd()) {

    pos=input->tell();

    auto fSz=long(input->readULong(4));

    if (fSz==0) {

      ascFile.addPos(pos);

      ascFile.addNote("_");

      continue;

    }

    endPos=pos+fSz;

    if (!input->checkPosition(endPos)) {

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

      ascFile.addPos(pos);

      ascFile.addNote("Entries(rsrcBAD):");

      MWAW_DEBUG_MSG(("MacDraft5StyleManager::readResources: find some bad resource\n"));

      break;

    }

    if (fSz<16) {

      ascFile.addPos(pos);

      ascFile.addNote("Entries(rsrcBAD):");

      MWAW_DEBUG_MSG(("MacDraft5StyleManager::readResources: find unknown resource\n"));

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

      continue;

    }

    MWAWEntry entry;

    entry.setBegin(pos+16);

    entry.setLength(long(input->readULong(4)));

    name="";

    for (int i=0; i<4; ++i) name+=char(input->readULong(1));

    entry.setType(name);

    entry.setId(static_cast<int>(input->readLong(2)));

    if (entry.end()<pos+16 || entry.end()>endPos || name.empty()) {

      ascFile.addPos(pos);

      ascFile.addNote("Entries(rsrcBAD):###");

      MWAW_DEBUG_MSG(("MacDraft5StyleManager::readResources: problem reading rsrc data\n"));

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

      continue;

    }

    if (readResource(entry, false)) {

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

      continue;

    }

    f.str("");

    f << "Entries(rsrc" << name << ")[" << entry.id() << "]:###";

    ascFile.addPos(pos);

    ascFile.addNote(f.str().c_str());

    if (fSz>120)

      ascFile.skipZone(pos+100, endPos-1);

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

  }

  input->popLimit();

  m_state->m_rsrcBegin=debRSRCPos;

  updatePatterns();

  return true;

}

bool MacDraft5StyleManager::readResource(MWAWEntry &entry, bool inRsrc)

{

  if (inRsrc && !m_parserState->m_rsrcParser) {

    MWAW_DEBUG_MSG(("MWAWMacDraft5StyleManager::readResource: can not find the resource parser\n"));

    return false;

  }

  if (entry.type()=="PICT") {

    librevenge::RVNGBinaryData data;

    if (inRsrc)

      return m_parserState->m_rsrcParser->parsePICT(entry,data);

    else

      return m_parser.readPICT(entry, data);

  }

  if (entry.type()=="ppat")

    return readPixPat(entry, inRsrc);

  if (entry.type()=="vers") {

    if (inRsrc) {

      MWAWRSRCParser::Version vers;

      return m_parserState->m_rsrcParser->parseVers(entry,vers);

    }

    else

      return readVersion(entry);

  }

  // 0 resources

  if (entry.type()=="BITL")

    return readBitmapList(entry, inRsrc);

  if (entry.type()=="LAYI")

    return m_parser.readLayoutDefinitions(entry, inRsrc);

  if (entry.type()=="pnot")

    return m_parser.readPICTList(entry, inRsrc);

  // 1 resources

  if (entry.type()=="VIEW")

    return m_parser.readViews(entry, inRsrc);

  if (entry.type()=="FNUS")

    return readFonts(entry, inRsrc);

  // 1-2-3 resources

  if (entry.type()=="OPST") {

    if (inRsrc && !m_parserState->m_rsrcParser) return false;

    MWAWInputStreamPtr input = inRsrc ? m_parserState->m_rsrcParser->getInput() : m_parserState->m_input;

    libmwaw::DebugStream f;

    f << "Entries(OPST)[" << entry.id() << "]:";

    entry.setParsed(true);

    if (!input || !entry.valid() || entry.length()!=2) {

      MWAW_DEBUG_MSG(("MacDraft5StyleManager::readResource: unexpected OPST length\n"));

      f << "###";

    }

    else {

      input->seek(entry.begin(), librevenge::RVNG_SEEK_SET);

      auto val=static_cast<int>(input->readLong(2));

      if (val!=100) // always 100?

        f << "f0=" << val << ",";

    }

    if (input && entry.valid()) {

      libmwaw::DebugFile &ascFile = inRsrc ? m_parserState->m_rsrcParser->ascii() : m_parserState->m_asciiFile;

      ascFile.addPos(entry.begin()-(inRsrc ? 4 : 16));

      ascFile.addNote(f.str().c_str());

      input->seek(entry.end(), librevenge::RVNG_SEEK_SET);

    }

    return true;

  }