text: /*
   * Copyright (c) 2013-14 Mikko Mononen memon@inside.org
   *
   * This software is provided 'as-is', without any express or implied
   * warranty.  In no event will the authors be held liable for any damages
   * arising from the use of this software.
   *
   * Permission is granted to anyone to use this software for any purpose,
   * including commercial applications, and to alter it and redistribute it
   * freely, subject to the following restrictions:
   *
   * 1. The origin of this software must not be misrepresented; you must not
   * claim that you wrote the original software. If you use this software
   * in a product, an acknowledgment in the product documentation would be
   * appreciated but is not required.
   * 2. Altered source versions must be plainly marked as such, and must not be
   * misrepresented as being the original software.
   * 3. This notice may not be removed or altered from any source distribution.
   *
   * The SVG parser is based on Anti-Grain Geometry 2.4 SVG example
   * Copyright (C) 2002-2004 Maxim Shemanarev (McSeem) (http://www.antigrain.com/)
   *
   * Arc calculation code based on canvg (https://code.google.com/p/canvg/)
   *
   * Bounding box calculation based on http://blog.hackers-cafe.net/2009/06/how-to-calculate-bezier-curves-bounding.html
   *
   */
  
  
  // NanoSVG is a simple stupid single-header-file SVG parse. The output of the parser is a list of cubic bezier shapes.
  //
  // The library suits well for anything from rendering scalable icons in your editor application to prototyping a game.
  //
  // NanoSVG supports a wide range of SVG features, but something may be missing, feel free to create a pull request!
  //
  
  
  #include "nanosvg.h"
  #include "FloatLib.h"
  
  //#define DEBUG_SVG -1
  
  #ifndef DEBUG_SVG
  #ifndef DEBUG_ALL
  #define DEBUG_SVG -1
  #else
  #define DEBUG_SVG DEBUG_ALL
  #endif
  #endif
  
  #define DBG(...) DebugLog(DEBUG_SVG, __VA_ARGS__)
  
  typedef UINTN size_t;
  extern VOID *fontsDB;
  
  #define NSVG_PI (3.14159265358979323846264338327f)
  #define NSVG_PI_DEG (0.01745329251994f)
  #define NSVG_KAPPA90 (0.5522847493f)  // Length proportional to radius of a cubic bezier handle for 90deg arcs.
  #define pow(x,n) PowF(x,n)
  #define sqrt(x) SqrtF(x)
  #define sqrtf(x) SqrtF(x)
  #define sinf(x) SinF(x)
  #define cosf(x) CosF(x)
  #define tanf(x) TanF(x)
  #define ceilf(x) CeilF(x)
  #define floorf(x) FloorF(x)
  #define acosf(x) AcosF(x)
  #define atan2f(x,y) Atan2F(x,y)
  #define fabsf(x) FabsF(x)
  
  
  //#define sscanf(s,f,x) AsciiStrToFloat(s, NULL, x)
  
  #define fabs(x) ((x > 0.0)?x:(-x))
  //#define fabsf(x) ((x > 0.0f)?x:(-x))
  
  #define NSVG_ALIGN_MIN 0
  #define NSVG_ALIGN_MID 1
  #define NSVG_ALIGN_MAX 2
  #define NSVG_ALIGN_NONE 0
  #define NSVG_ALIGN_MEET 1
  #define NSVG_ALIGN_SLICE 2
  
  #define NSVG_NOTUSED(v) do { (void)(1 ? (void)0 : ( (void)(v) ) ); } while(0)
  #define NSVG_RGB(r, g, b) (((unsigned int)b) | ((unsigned int)g << 8) | ((unsigned int)r << 16))
  
  #ifdef _MSC_VER
  #pragma warning (disable: 4996) // Switch off security warnings
  #pragma warning (disable: 4100) // Switch off unreferenced formal parameter warnings
  #ifdef __cplusplus
  #define NSVG_INLINE inline
  #else
  #define NSVG_INLINE
  #endif
  #else
  #define NSVG_INLINE inline
  #endif
  
  UINTN NumFrames;
  UINTN FrameTime;
  int nsvg__shapesBound(NSVGshape *shapes, float* bounds);
  void takeXformBounds(NSVGshape *shape, float *xform, float *bounds);
  void nsvg__deleteShapes(NSVGshape* shape);
  
  extern BOOLEAN DayLight;
  
  void DumpFloat2 (char* s, float* t, int N)
  {
  #if DEBUG_SVG >= 0
    int i;
    DBG("%a: ", s);
    for(i=0; i<N;i++)
    {
      float a = t[i];
      int b = (int)a;
      int sign = (a < 0.f);
      DBG("%c%d.%06d ", ((b == 0) && sign)?'-':' ', b, (int)(fabsf((a-(float)b)*1.0e6f)));
    }
    DBG("\n");
  #endif
  }
  
  static int getIntegerDict(const char* s)
  {
    if ((s[1] == 'x') || (s[1] == 'X')) {
      return (int)AsciiStrHexToUintn (s);
    } else if (IS_DIGIT(s[0])) {
      return (int)AsciiStrDecimalToUintn(s);
    }
    return 0xFFFF;
  }
  
  float nsvg__sqr(float x) { return x*x; }
  float nsvg__vmag(float x, float y) { return sqrtf(x*x + y*y); }
  
  static float nsvg__vecrat(float ux, float uy, float vx, float vy)
  {
    return (ux*vx + uy*vy) / (nsvg__vmag(ux,uy) * nsvg__vmag(vx,vy));
  }
  
  static float nsvg__vecang(float ux, float uy, float vx, float vy)
  {
    float r = nsvg__vecrat(ux,uy, vx,vy);
    if (r < -1.0f) r = -1.0f;
    if (r > 1.0f) r = 1.0f;
    return ((ux*vy < uy*vx) ? -1.0f : 1.0f) * acosf(r);
  }
  
  
  static char *nsvg__strndup(const char *s, size_t n);
  
  // Calculate number of characters.
  static int nsvg__strchr(const char *s, char c)
  {
    int n = 0;
    while (*s != 0) {
      if (*s++ == c) {
        n++;
      }
    }
    return n;
  }
  
  static int nsvg__isspace(char c)
  {
    return nsvg__strchr(" \t\n\v\f\r", c) != 0;
  }
  
  static int nsvg__isdigit(char c)
  {
    return c >= '0' && c <= '9';
  }
  
  static int nsvg__isnum(char c)
  {
    return nsvg__strchr("0123456789+-.eE", c) != 0;  //SIC!
  }
  
  static NSVG_INLINE float nsvg__minf(float a, float b) { return a < b ? a : b; }
  static NSVG_INLINE float nsvg__maxf(float a, float b) { return a > b ? a : b; }
  
  
  // Simple XML parser
  
  #define NSVG_XML_TAG 1
  #define NSVG_XML_CONTENT 2
  #define NSVG_XML_MAX_ATTRIBS 256
  
  static void nsvg__parseContent(char* s,
                                 void (*contentCb)(void* ud, char* s),
                                 void* ud)
  {
    // Trim start white spaces
    while (*s && nsvg__isspace(*s)) s++;
    if (!*s) return;
  
    if (contentCb)
      (*contentCb)(ud, s);
  }
  
  static void nsvg__parseElement(char* s,
                                 void (*startelCb)(void* ud, const char* el, const char** attr),
                                 void (*endelCb)(void* ud, const char* el),
                                 void* ud)
  {
    const char* attr[NSVG_XML_MAX_ATTRIBS];
    int nattr = 0;
    char* tagname;
    int start = 0;
    int end = 0;
    char quote;
  
    // Skip white space after the '<'
    while (*s && nsvg__isspace(*s)) s++;
  
    // Check if the tag is end tag
    if (*s == '/') {
      s++;
      end = 1;
    } else {
      start = 1;
    }
  
    // Skip comments, data and preprocessor stuff.
    if (!*s || *s == '?' || *s == '!')
      return;
  
    // Get tag name
    tagname = s;
    while (*s && !nsvg__isspace(*s)) s++;
    if (*s) { *s++ = '\0'; }
  
    // Get attribs
    while (!end && *s && nattr < NSVG_XML_MAX_ATTRIBS-3) {
      char* name = NULL;
      char* value = NULL;
  
      // Skip white space before the attrib name
      while (*s && nsvg__isspace(*s)) s++;
      if (!*s) break;
      if (*s == '/') {
        end = 1;
        break;
      }
      name = s;
      // Find end of the attrib name.
      while (*s && !nsvg__isspace(*s) && *s != '=') s++;
      if (*s) {
        *s++ = '\0';
        //      DBG("attrib name %a\n", name);
      }
      // Skip until the beginning of the value.
      while (*s && *s != '\"' && *s != '\'') s++;
      if (!*s) break;
      quote = *s;
      s++;
      // Store value and find the end of it.
      value = s;
      while (*s && *s != quote) s++;
      if (*s) {
        *s++ = '\0';
        //      DBG("value:%a\n", value);
      }
  
      // Store only well formed attributes
      if (name && value) {
        attr[nattr++] = name;  //class
        attr[nattr++] = value;  //Master_Slide
        //         DBG("attrib %d: name %a value %a\n", nattr, name, value);
      }
    }
  
    // List terminator
    attr[nattr++] = 0;
    attr[nattr++] = 0;
  
    // Call callbacks.
    if (start && startelCb) {
      (*startelCb)(ud, tagname, attr);  //nsvg__startElement
    }
    if (end && endelCb) {
      (*endelCb)(ud, tagname);  //nsvg__endElement
    }
    //  DBG("parseElement %a ended\n", tagname);
  }
  
  void nsvg__parseXML(char* input,
                      void (*startelCb)(void* ud, const char* el, const char** attr),
                      void (*endelCb)(void* ud, const char* el),
                      void (*contentCb)(void* ud, char* s),
                      void* ud)
  {
    char* s = input;
    char* mark = s;
    int state = NSVG_XML_CONTENT;
    while (*s) {
      if (*s == '<' && state == NSVG_XML_CONTENT) {
        // skip cdata
        if (strncmp(s, "<![CDATA[", 9) == 0) {
          s += 9;
          char* rv = strstr(s, "]]>");
          if (rv) s = rv + 3;
          continue;
        }
        // Start of a tag
        *s++ = '\0';
        nsvg__parseContent(mark, contentCb, ud);
  //           DBG("tag content %a parsed\n", mark);
        mark = s;
        state = NSVG_XML_TAG;
      } else if (*s == '>' && state == NSVG_XML_TAG) {
        // Start of a content or new tag.
        *s++ = '\0';
        //    nsvg__parseContent(mark, contentCb, ud);
  //          DBG("nsvg__parseElement %a\n", mark);
        nsvg__parseElement(mark, startelCb, endelCb, ud);
  //          DBG(" element %a parsed\n", mark);
        mark = s;
        state = NSVG_XML_CONTENT;
      } else {
        s++;
      }
    }
  
    return;
  }
  
  
  /* Simple SVG parser. */
  
  void nsvg__xformIdentity(float* t)
  {
    t[0] = 1.0f; t[1] = 0.0f;
    t[2] = 0.0f; t[3] = 1.0f;
    t[4] = 0.0f; t[5] = 0.0f;
  }
  
  static void nsvg__xformSetTranslation(float* t, float tx, float ty)
  {
    t[0] = 1.0f; t[1] = 0.0f;
    t[2] = 0.0f; t[3] = 1.0f;
    t[4] = tx; t[5] = ty;
  }
  
  void nsvg__xformSetScale(float* t, float sx, float sy)
  {
    t[0] = sx; t[1] = 0.0f;
    t[2] = 0.0f; t[3] = sy;
    t[4] = 0.0f; t[5] = 0.0f;
  }
  
  static void nsvg__xformSetSkewX(float* t, float a)
  {
    t[0] = 1.0f; t[1] = 0.0f;
    t[2] = tanf(a); t[3] = 1.0f;
    t[4] = 0.0f; t[5] = 0.0f;
  }
  
  static void nsvg__xformSetSkewY(float* t, float a)
  {
    t[0] = 1.0f; t[1] = tanf(a);
    t[2] = 0.0f; t[3] = 1.0f;
    t[4] = 0.0f; t[5] = 0.0f;
  }
  
  static void nsvg__xformSetRotation(float* t, float a)
  {
    float cs = cosf(a), sn = sinf(a);
    t[0] = cs; t[1] = sn;
    t[2] = -sn; t[3] = cs;
    t[4] = 0.0f; t[5] = 0.0f;
  }
  
  void nsvg__xformMultiply(float* t, float* s)
  {
    float t0 = t[0] * s[0] + t[1] * s[2];
    float t2 = t[2] * s[0] + t[3] * s[2];
    float t4 = t[4] * s[0] + t[5] * s[2] + s[4];
    t[1] = t[0] * s[1] + t[1] * s[3];
    t[3] = t[2] * s[1] + t[3] * s[3];
    t[5] = t[4] * s[1] + t[5] * s[3] + s[5];
    t[0] = t0;
    t[2] = t2;
    t[4] = t4;
  }
  
  void nsvg__xformInverse(float* inv, float* t)
  {
    double invdet, det = (double)t[0] * t[3] - (double)t[2] * t[1];
    if (det > -1e-6 && det < 1e-6) {
      nsvg__xformIdentity(inv);
      return;
    }
    invdet = 1.0 / det;
    inv[0] = (float)(t[3] * invdet);
    inv[2] = (float)(-t[2] * invdet);
    inv[4] = (float)(((double)t[2] * t[5] - (double)t[3] * t[4]) * invdet);
    inv[1] = (float)(-t[1] * invdet);
    inv[3] = (float)(t[0] * invdet);
    inv[5] = (float)(((double)t[1] * t[4] - (double)t[0] * t[5]) * invdet);
  }
  
  void nsvg__xformPremultiply(float* t, float* s)
  {
    float s2[6];
    memcpy(s2, s, sizeof(float)*6);
    nsvg__xformMultiply(s2, t);
    memcpy(t, s2, sizeof(float)*6);
  }
  
  static void nsvg__xformPoint(float* dx, float* dy, float x, float y, float* t)
  {
    *dx = x*t[0] + y*t[2] + t[4];
    *dy = x*t[1] + y*t[3] + t[5];
  }
  
  static void nsvg__xformVec(float* dx, float* dy, float x, float y, float* t)
  {
    *dx = x*t[0] + y*t[2];
    *dy = x*t[1] + y*t[3];
  }
  
  #define NSVG_EPSILON (1e-12)
  
  static int nsvg__ptInBounds(float* pt, float* bounds)
  {
    return pt[0] >= bounds[0] && pt[0] <= bounds[2] && pt[1] >= bounds[1] && pt[1] <= bounds[3];
  }
  
  
  static double nsvg__evalBezier(double t, double p0, double p1, double p2, double p3)
  {
    double it = 1.0-t;
    return it*it*it*p0 + 3.0*it*it*t*p1 + 3.0*it*t*t*p2 + t*t*t*p3;
  }
  
  static void nsvg__curveBounds(float* bounds, float* curve)
  {
    int i, j, count;
    double roots[2], a, b, c, b2ac, t, v;
    float* v0 = &curve[0];
    float* v1 = &curve[2];
    float* v2 = &curve[4];
    float* v3 = &curve[6];
  
    // Start the bounding box by end points
    bounds[0] = nsvg__minf(v0[0], v3[0]);
    bounds[1] = nsvg__minf(v0[1], v3[1]);
    bounds[2] = nsvg__maxf(v0[0], v3[0]);
    bounds[3] = nsvg__maxf(v0[1], v3[1]);
  
    // Bezier curve fits inside the convex hull of it's control points.
    // If control points are inside the bounds, we're done.
    if (nsvg__ptInBounds(v1, bounds) && nsvg__ptInBounds(v2, bounds))
      return;
  
    // Add bezier curve inflection points in X and Y.
    for (i = 0; i < 2; i++) {
      a = -3.0f * v0[i] + 9.0f * v1[i] - 9.0f * v2[i] + 3.0f * v3[i];
      b = 6.0f * v0[i] - 12.0f * v1[i] + 6.0f * v2[i];
      c = 3.0f * v1[i] - 3.0f * v0[i];
      count = 0;
      if (fabs(a) < NSVG_EPSILON) {
        if (fabs(b) > NSVG_EPSILON) {
          t = -c / b;
          if (t > NSVG_EPSILON && t < 1.0f-NSVG_EPSILON)
            roots[count++] = t;
        }
      } else {
        b2ac = b*b - 4.0f*c*a;
        if (b2ac > NSVG_EPSILON) {
          t = (-b + (double)sqrtf((float)b2ac)) / (2.0 * a);
          if (t > NSVG_EPSILON && t < 1.0-NSVG_EPSILON)          roots[count++] = t;
          t = (-b - (double)sqrtf((float)b2ac)) / (2.0 * a);
          if (t > NSVG_EPSILON && t < 1.0-NSVG_EPSILON)          roots[count++] = t;
        }
      }
      for (j = 0; j < count; j++) {
        v = nsvg__evalBezier(roots[j], v0[i], v1[i], v2[i], v3[i]);
        bounds[0+i] = nsvg__minf(bounds[0+i], (float)v);
        bounds[2+i] = nsvg__maxf(bounds[2+i], (float)v);
      }
    }
  }
  
  NSVGparser* nsvg__createParser()
  {
    NSVGparser* p;
    p = (NSVGparser*)AllocateZeroPool(sizeof(NSVGparser));
    if (p == NULL) return NULL;
  
    p->image = (NSVGimage*)AllocateZeroPool(sizeof(NSVGimage));
    if (p->image == NULL) {
      FreePool(p);
      return NULL;
    }
    // Init style
    nsvg__xformIdentity(p->attr[0].xform);
    memset(p->attr[0].id, 0, sizeof p->attr[0].id);
    p->attr[0].fillColor = NSVG_RGB(0,0,0);
    p->attr[0].strokeColor = NSVG_RGB(0,0,0);
    p->attr[0].opacity = 1.f;
    p->attr[0].fillOpacity = 1.f;
    p->attr[0].strokeOpacity = 1.f;
    p->attr[0].stopOpacity = 1.f;
    p->attr[0].strokeWidth = 1.f;
    p->attr[0].strokeLineJoin = NSVG_JOIN_MITER;
    p->attr[0].strokeLineCap = NSVG_CAP_BUTT;
    p->attr[0].miterLimit = 4;
    p->attr[0].fillRule = NSVG_FILLRULE_NONZERO;
    p->attr[0].hasFill = 1;
    p->attr[0].visible = NSVG_VIS_DISPLAY | NSVG_VIS_VISIBLE;
    p->isText = FALSE;
  
    return p;
  }
  
  static void nsvg__deleteStyles(NSVGstyles* style)
  {
    while (style) {
      NSVGstyles *next = style->next;
      if (style->name != NULL)
        FreePool(style->name);
      if (style->description != NULL)
        FreePool(style->description);
      FreePool(style);
      style = next;
    }
  }
  
  static void nsvg__deletePaths(NSVGpath* path)
  {
    while (path) {
      NSVGpath *next = path->next;
      if (path->pts != NULL) {
        FreePool(path->pts);
        path->pts = NULL;
      }
      FreePool(path);
      path = next;
    }
  }
  
  void nsvg__deleteFont(NSVGfont* font)
  {
    NSVGglyph *glyphs, *next;
    if (!font) {
      return;
    }
    if (font->missingGlyph) {
      nsvg__deletePaths(font->missingGlyph->path);
      FreePool(font->missingGlyph);
      font->missingGlyph = NULL;
    }
    glyphs = font->glyphs;
    while (glyphs) {
      next = glyphs->next;
      nsvg__deletePaths(glyphs->path);
      FreePool(glyphs);
      glyphs = next;
    }
    FreePool(font);
  }
  
  static void nsvg__deletePaint(NSVGpaint* paint)
  {
    if (!paint || !paint->paint.gradient) {
      return;
    }
    if (paint->type == NSVG_PAINT_LINEAR_GRADIENT ||
        paint->type == NSVG_PAINT_RADIAL_GRADIENT ||
        paint->type == NSVG_PAINT_CONIC_GRADIENT) {
      FreePool(paint->paint.gradient);
      paint->paint.gradient = NULL;
    }
  }
  
  static void nsvg__deleteGradientData(NSVGgradientData* grad)
  {
    NSVGgradientData* next;
    while (grad != NULL) {
      next = grad->next;
      if (grad->nstops > 0) {
        FreePool(grad->stops);
      }
      FreePool(grad);
      grad = next;
    }
  }
  
  
  static void nsvg__deleteSymbols(NSVGsymbol* symbol)
  {
    NSVGsymbol* next;
    while (symbol) {
      next = symbol->next;
      NSVGshape* shape = symbol->shapes;
      nsvg__deleteShapes(shape);
      FreePool(symbol);
      symbol = next;
    }
  }
  
  void nsvg__deleteParser(NSVGparser* p)
  {
    int i;
    if (p != NULL) {
      nsvg__deleteStyles(p->styles);
      nsvg__deleteSymbols(p->symbols);
      nsvg__deletePaths(p->plist);
      nsvg__deleteGradientData(p->gradients);
      // do not delete font here, as we free all fonts later by following fontsdb
      //nsvg__deleteFont(p->font);
      nsvgDelete(p->image);
      if (p->cpts > 0 && p->pts) {
        FreePool(p->pts);
      }
      for (i=0; i<NSVG_MAX_ATTR; i++) {
        NSVGattrib* attr = &(p->attr[i]);
        if (attr && attr->fontFace) {
          FreePool(attr->fontFace);
          attr->fontFace = NULL;
        }
        while (attr->group) {
          NSVGgroup* group = attr->group;
          attr->group = group->next;
          FreePool(group);
        }
      }
      FreePool(p);
    }
  }
  
  static void nsvg__resetPath(NSVGparser* p)
  {
    p->npts = 0;
    if (p->cpts > 0 && p->pts) {
      FreePool(p->pts);
      p->pts = NULL;
      p->cpts = 0;
    }
  }
  
  static void nsvg__addPoint(NSVGparser* p, float x, float y)
  {
    //  DBG("enter addPoint\n");
    if (p->npts*2+7 > p->cpts) {
      //    DBG("npts=%d, cpts=%d\n", p->npts, p->cpts);
      if ((p->cpts == 0) || !p->pts) {
        p->cpts = 8;
        p->pts = (float*)AllocatePool(16 * sizeof(float));
      } else {
        //      DBG("reallocate\n");
        p->cpts *= 2;
        p->pts = (float*)ReallocatePool(p->cpts*sizeof(float), p->cpts*2*sizeof(float), p->pts);
  
      }
      if (!p->pts) return;
    }
    //  DBG("new point\n");
    p->pts[p->npts*2+0] = x;
    p->pts[p->npts*2+1] = y;
    p->npts++;
  }
  
  static void nsvg__moveTo(NSVGparser* p, float x, float y)
  {
    if (p->npts > 0) {
      p->pts[(p->npts-1)*2+0] = x;
      p->pts[(p->npts-1)*2+1] = y;
    } else {
      nsvg__addPoint(p, x, y);
    }
  }
  
  static void nsvg__lineTo(NSVGparser* p, float x, float y)
  {
    float px,py, dx,dy;
    if (p->npts > 0) {
      //    DBG("npts=%d, and cpts=%d\n", p->npts, p->cpts);
      px = p->pts[(p->npts-1)*2+0];
      py = p->pts[(p->npts-1)*2+1];
      dx = x - px;
      dy = y - py;
  
      nsvg__addPoint(p, px + dx/3.0f, py + dy/3.0f);
      nsvg__addPoint(p, x - dx/3.0f, y - dy/3.0f);
      nsvg__addPoint(p, x, y);
    }
  }
  
  static void nsvg__cubicBezTo(NSVGparser* p, float cpx1, float cpy1, float cpx2, float cpy2, float x, float y)
  {
    nsvg__addPoint(p, cpx1, cpy1);
    nsvg__addPoint(p, cpx2, cpy2);
    nsvg__addPoint(p, x, y);
  }
  
  static NSVGattrib* nsvg__getAttr(NSVGparser* p)
  {
    return &p->attr[p->attrHead];
  }
  
  static void nsvg__pushAttr(NSVGparser* p)
  {
    if (p->attrHead < NSVG_MAX_ATTR-1) {
      p->attrHead++;
      memcpy(&p->attr[p->attrHead], &p->attr[p->attrHead-1], sizeof(NSVGattrib));
      memset(&p->attr[p->attrHead].id, 0, sizeof(p->attr[p->attrHead].id));
      //    p->attr[p->attrHead].opacity = 1.0f; //let it be copy
    }
  }
  
  static void nsvg__popAttr(NSVGparser* p)
  {
    if (p->attrHead > 0)
      p->attrHead--;
  }
  
  static float nsvg__actualOrigX(NSVGparser* p)
  {
    return p->viewMinx;
  }
  
  static float nsvg__actualOrigY(NSVGparser* p)
  {
    return p->viewMiny;
  }
  
  static float nsvg__actualWidth(NSVGparser* p)
  {
    return p->viewWidth;
  }
  
  static float nsvg__actualHeight(NSVGparser* p)
  {
    return p->viewHeight;
  }
  
  static float nsvg__actualLength(NSVGparser* p)
  {
    float w = nsvg__actualWidth(p), h = nsvg__actualHeight(p);
    return nsvg__vmag(w, h) * 0.70710678118655f; // 1.0/sqrtf(2.0f);
  }
  
  static float nsvg__convertToPixels(NSVGparser* p, NSVGcoordinate* c, float orig, float length)
  {
    NSVGattrib* attr = nsvg__getAttr(p);
    float fontSize = 10;
    if ((p->dpi <= 0) || (p->dpi > 2400)) {
  //    DBG("wrong dpi=%d\n", (int)p->dpi);
      p->dpi = 72;
    }
    if (attr->fontFace) {
      fontSize = attr->fontFace->fontSize;
    }
    switch (c->units) {
      case NSVG_UNITS_USER:    return c->value;
      case NSVG_UNITS_PX:      return c->value;
      case NSVG_UNITS_PT:      return c->value / 72.0f * p->dpi;
      case NSVG_UNITS_PC:      return c->value / 6.0f * p->dpi;
      case NSVG_UNITS_MM:      return c->value / 25.4f * p->dpi;
      case NSVG_UNITS_CM:      return c->value / 2.54f * p->dpi;
      case NSVG_UNITS_IN:      return c->value * p->dpi;
      case NSVG_UNITS_EM:      return c->value * fontSize;
      case NSVG_UNITS_EX:      return c->value * fontSize * 0.52f; // x-height of Helvetica.
      case NSVG_UNITS_PERCENT:  return orig + c->value * 0.01f * length;
      default:          return c->value;
    }
    //  return c.value;
  }
  
  static float nsvg__convertToPixelsForGradient(NSVGparser* p, char units, NSVGcoordinate* c, float orig, float length)
  {
    //  float temp = 0.0;
    //units can be NSVG_USER_SPACE or NSVG_OBJECT_SPACE
    if (units == NSVG_USER_SPACE || c->units == NSVG_UNITS_PERCENT)
      return nsvg__convertToPixels(p, c, orig, length);
  
    return orig + c->value * length; //orig=x1 length=x2-x1 c->value= 86%
  }
  
  static NSVGgradientData* nsvg__findGradientData(NSVGparser* p, const char* id)
  {
    NSVGgradientData* grad = p->gradients;
    while (grad) {
      if (strcmp(grad->id, id) == 0)
        return grad;
      grad = grad->next;
    }
    return NULL;
  }
  
  static NSVGgradientLink* nsvg__createGradientLink(const char* id)
  {
    NSVGgradientLink* grad = (NSVGgradientLink*)AllocateZeroPool(sizeof(NSVGgradientLink));
    if (grad == NULL) return NULL;
    strncpy(grad->id, id, 63);
    grad->id[63] = '\0';
    return grad;
  }
  
  static void nsvg__getLocalBounds(float* bounds, NSVGshape *shape); //, float* xform);
  
  static NSVGgradient* nsvg__createGradient(NSVGparser* p, NSVGshape* shape, NSVGgradientLink* link, char* paintType)
  {
    //  NSVGattrib* attr = nsvg__getAttr(p);
    NSVGgradientData* data = NULL;
    NSVGgradientData* ref = NULL;
    NSVGgradientStop* stops = NULL;
    NSVGgradient* grad;
    float ox, oy, sw, sh, sl;
    int nstops = 0;
  
    if (!link) {
      *paintType = NSVG_PAINT_NONE;
      return NULL;
    }
    data = nsvg__findGradientData(p, link->id);
    if (data == NULL) return NULL;
    //  DumpFloat2("gradient data xform:", data->xform, 6);
    stops = data->stops;
    nstops = data->nstops;
    ref = nsvg__findGradientData(p, data->ref);
    while (ref != NULL) {
      if (stops == NULL && ref->stops != NULL) { //take stops only once at first occuerence
        stops = ref->stops;
        nstops = ref->nstops;
      }
      //left referenced, right is current,
      // matrix are reversed
      nsvg__xformPremultiply(data->xform, ref->xform);
      ref = nsvg__findGradientData(p, ref->ref); //recursive refs?
    }
    if (stops == NULL) return NULL;
    //  DumpFloat2("gradient final xform:", data->xform, 6);
    grad = (NSVGgradient*)AllocateZeroPool(sizeof(NSVGgradient) + sizeof(NSVGgradientStop)*(nstops-1));
    if (grad == NULL) return NULL;
    // The shape width and height.
    if (data->units == NSVG_OBJECT_SPACE) {
      float localBounds[4];
      nsvg__getLocalBounds(localBounds, shape); //, inv); //before any transform
  
      ox = localBounds[0];
      oy = localBounds[1];
      sw = localBounds[2] - localBounds[0];
      sh = localBounds[3] - localBounds[1];
    } else {
      ox = nsvg__actualOrigX(p);
      oy = nsvg__actualOrigY(p);
      sw = nsvg__actualWidth(p);
      sh = nsvg__actualHeight(p);
    }
  
    float gradForm[6]; //coordinates
    nsvg__xformIdentity(gradForm);
    //  sl = sqrtf(sw*sw + sh*sh) * 0.70710678118655f; // == 1. / sqrtf(2.0f);
    sl = nsvg__vmag(sw, sh) * 0.70710678118655f;
    if (data->type == NSVG_PAINT_LINEAR_GRADIENT) {
      float x1, y1, x2, y2, dx, dy;
  
      x1 = nsvg__convertToPixelsForGradient(p, data->units, &data->direction.linear.x1, ox, sw);
      y1 = nsvg__convertToPixelsForGradient(p, data->units, &data->direction.linear.y1, oy, sh);
      x2 = nsvg__convertToPixelsForGradient(p, data->units, &data->direction.linear.x2, ox, sw);
      y2 = nsvg__convertToPixelsForGradient(p, data->units, &data->direction.linear.y2, oy, sh);
      // Calculate transform aligned to the line
      dx = x2 - x1;
      dy = y2 - y1;
  
      gradForm[0] = dy; gradForm[1] = -dx;
      gradForm[2] = dx; gradForm[3] = dy;
      gradForm[4] = x1; gradForm[5] = y1;
    } else if ((data->type == NSVG_PAINT_RADIAL_GRADIENT) ||
               (data->type == NSVG_PAINT_CONIC_GRADIENT)) {
      float cx, cy, fx, fy, r;
      cx = nsvg__convertToPixelsForGradient(p, data->units, &data->direction.radial.cx, ox, sw);
      cy = nsvg__convertToPixelsForGradient(p, data->units, &data->direction.radial.cy, oy, sh);
      fx = nsvg__convertToPixelsForGradient(p, data->units, &data->direction.radial.fx, ox, sw);
      fy = nsvg__convertToPixelsForGradient(p, data->units, &data->direction.radial.fy, oy, sh);
      r  = nsvg__convertToPixelsForGradient(p, data->units, &data->direction.radial.r, 0, sl);
      // Calculate transform aligned to the circle
      gradForm[0] = r; gradForm[1] = 0;
      gradForm[2] = 0;  gradForm[3] = r;
      gradForm[4] = cx; gradForm[5] = cy;
      grad->fx = fx / r;  //bad idea
      grad->fy = fy / r;
    }
  
    //  nsvg__xformInverse(grad->xform, gradForm);
    //  nsvg__xformMultiply(grad->xform, data->xform); //from GradientData "gradientTransform"
    nsvg__xformMultiply(gradForm, data->xform);
    nsvg__xformInverse(grad->xform, gradForm);
  
    grad->spread = data->spread;
    grad->ditherCoarse = data->ditherCoarse;
    memcpy(grad->stops, stops, nstops*sizeof(NSVGgradientStop));
    grad->nstops = nstops;
  
    *paintType = data->type;
  
    return grad;
  }
  
  static float nsvg__getAverageScale(float* t)
  {
    return (nsvg__vmag(t[0], t[2]) + nsvg__vmag(t[1], t[3])) * 0.5f;
  }
  
  static void nsvg__getLocalBounds(float* bounds, NSVGshape *shape) //, float* atXform)
  {
    NSVGpath* path;
    float curve[8];
    float curveBounds[4];
  
    int i, first = 1;
  
    for (path = shape->paths; path != NULL; path = path->next) {
      curve[0] = path->pts[0];
      curve[1] = path->pts[1];
      for (i = 1; i < path->npts; i += 3) {
     //   curve = &path->pts[i*2];
        memcpy(&curve[2], &path->pts[i*2], 6*sizeof(float));
        nsvg__curveBounds(curveBounds, curve);
        if (first) {
          bounds[0] = curveBounds[0];
          bounds[1] = curveBounds[1];
          bounds[2] = curveBounds[2];
          bounds[3] = curveBounds[3];
          first = 0;
        } else {
          bounds[0] = nsvg__minf(bounds[0], curveBounds[0]);
          bounds[1] = nsvg__minf(bounds[1], curveBounds[1]);
          bounds[2] = nsvg__maxf(bounds[2], curveBounds[2]);
          bounds[3] = nsvg__maxf(bounds[3], curveBounds[3]);
        }
        curve[0] = curve[6];
        curve[1] = curve[7];
      }
    }
  }
  /*
  static void  nsvg__getSymbolBounds(NSVGparser* p)
  {
    NSVGsymbol* symbol = p->symbols;
    NSVGshape* shape = symbol->shapes;
    if (!shape) return;
    symbol->bounds[0] = FLT_MAX;
    symbol->bounds[1] = FLT_MAX;
    symbol->bounds[2] = -FLT_MAX;
    symbol->bounds[3] = -FLT_MAX;
    nsvg__shapesBound(shape, symbol->bounds);
  //  DumpFloat2("Symbol has bounds", symbol->bounds, 4); //nothing
    DumpFloat2("Symbol has viewbox", symbol->viewBox, 4);
  }
  */
  static void nsvg__addShape(NSVGparser* p)
  {
    NSVGattrib* attr = nsvg__getAttr(p);
    float scale;
    NSVGshape* shape;
    int i;
  
    if (p->plist == NULL /*&& !p->isText*/ )
      return;
  
    shape = (NSVGshape*)AllocateZeroPool(sizeof(NSVGshape));
    if (shape == NULL) return;
  
    memcpy(shape->id, attr->id, sizeof shape->id);
    memcpy(shape->title, attr->title, sizeof shape->title);
    //  DBG("shapeID=%a\n", shape->id);
    shape->group = attr->group;
    scale = nsvg__getAverageScale(attr->xform);  //ssss
    shape->strokeWidth = attr->strokeWidth * scale;
    shape->strokeDashOffset = attr->strokeDashOffset * scale;
    shape->strokeDashCount = (char)attr->strokeDashCount;
    for (i = 0; i < attr->strokeDashCount; i++)
      shape->strokeDashArray[i] = attr->strokeDashArray[i] * scale;
    shape->strokeLineJoin = attr->strokeLineJoin;
    shape->strokeLineCap = attr->strokeLineCap;
    shape->miterLimit = attr->miterLimit;
    shape->fillRule = attr->fillRule;
    shape->opacity = attr->opacity;
    memcpy(shape->xform, attr->xform, sizeof(float)*6);
  
    shape->paths = p->plist;
    p->plist = NULL;
  
    shape->clip.count = attr->clipPathCount;
    if (shape->clip.count > 0) {
      shape->clip.index = (NSVGclipPathIndex*)AllocateCopyPool(attr->clipPathCount * sizeof(NSVGclipPathIndex),
                                                               p->clipPathStack);
      if (shape->clip.index == NULL) {
        FreePool(shape);
        return;
      }
    }
  
    nsvg__getLocalBounds(shape->bounds, shape);  //(dest, src)
  
    // Set fill
    shape->fill.type = NSVG_PAINT_NONE;
    if (attr->hasFill == 1) {
      shape->fill.type = NSVG_PAINT_COLOR;
      shape->fill.paint.color = ((unsigned int)(attr->fillOpacity*255) << 24) | attr->fillColor;
    } else if (attr->hasFill == 2) {
      shape->fill.type = NSVG_PAINT_GRADIENT_LINK;
      shape->fill.paint.gradientLink = nsvg__createGradientLink(attr->fillGradient);
      if (shape->fill.paint.gradientLink == NULL) {
        shape->fill.type = NSVG_PAINT_NONE;
        if (shape->clip.index) {
          FreePool(shape->clip.index);
        }
        FreePool(shape);
        return;
      }
    } else if (attr->hasFill == 3) {
      shape->fill.type = NSVG_PAINT_PATTERN;
      const char *id = attr->fillGradient;
      NSVGpattern* pt = p->patterns;
      while (pt) {
        if (strcmp(pt->id, id) == 0) {
          break;
        }
        pt = pt->next;
      }
      shape->fill.paint.gradient = (NSVGgradient*)pt;
    }
  
    // Set stroke
    shape->stroke.type = NSVG_PAINT_NONE;
    if (attr->hasStroke == 1) {
      shape->stroke.type = NSVG_PAINT_COLOR;
      shape->stroke.paint.color = ((unsigned int)(attr->strokeOpacity*255) << 24) | attr->strokeColor;
    } else if (attr->hasStroke == 2) {
      shape->stroke.type = NSVG_PAINT_GRADIENT_LINK;
      shape->stroke.paint.gradientLink = nsvg__createGradientLink(attr->strokeGradient);
      if (shape->stroke.paint.gradientLink == NULL) {
        shape->fill.type = NSVG_PAINT_NONE;
        if (shape->clip.index) {
          FreePool(shape->clip.index);
        }
        FreePool(shape);
        return;
      }
    } else if (attr->hasStroke == 3) {
      shape->stroke.type = NSVG_PAINT_PATTERN;
      const char *id = attr->strokeGradient;
      NSVGpattern* pt = p->patterns;
      while (pt) {
        if (strcmp(pt->id, id) == 0) {
          break;
        }
        pt = pt->next;
      }
      shape->stroke.paint.gradient = (NSVGgradient*)pt;
    }
  
    // Set flags
    //  shape->flags = ((attr->visible & NSVG_VIS_DISPLAY) && (attr->visible & NSVG_VIS_VISIBLE) ? NSVG_VIS_VISIBLE : 0x00);
    shape->flags = attr->visible;
    if (p->defsFlag) {
      shape->flags = 0;
    }
  
    // Add shape
    if (p->clipPath != NULL) {
      shape->next = p->clipPath->shapes;
      p->clipPath->shapes = shape;
    } else if (p->symbolFlag) {
      if (p->symbols->shapes == NULL)
        p->symbols->shapes = shape;
      else
        p->symbols->shapesTail->next = shape;
      p->symbols->shapesTail = shape;
    } else {
      // Add to tail
      if (p->image->shapes == NULL)
        p->image->shapes = shape;
      else
        p->shapesTail->next = shape;
      p->shapesTail = shape;
    }
    return;
  }
  
  static void nsvg__addPath(NSVGparser* p, char closed)
  {
    //  NSVGattrib* attr = nsvg__getAttr(p);
    NSVGpath* path = NULL;
    float bounds[4];
    float* curve;
    int i;
  
    if (p->npts < 4)
      return;
  
    if (closed)
      nsvg__lineTo(p, p->pts[0], p->pts[1]);
  
    path = (NSVGpath*)AllocateZeroPool(sizeof(NSVGpath));
    if (path == NULL) {
      return;
    }
    path->pts = (float*)AllocateZeroPool(p->npts*2*sizeof(float));
    if (path->pts == NULL) {
      FreePool(path);
      return;
    }
    path->closed = closed;
    path->npts = p->npts;
  
    memcpy(path->pts, p->pts, p->npts * 2 * sizeof(float));
  
    // Find bounds
    for (i = 0; i < path->npts-1; i += 3) {
      curve = &path->pts[i*2];
      nsvg__curveBounds(bounds, curve);
      if (i == 0) {
        path->bounds[0] = bounds[0];
        path->bounds[1] = bounds[1];
        path->bounds[2] = bounds[2];
        path->bounds[3] = bounds[3];
      } else {
        path->bounds[0] = nsvg__minf(path->bounds[0], bounds[0]);
        path->bounds[1] = nsvg__minf(path->bounds[1], bounds[1]);
        path->bounds[2] = nsvg__maxf(path->bounds[2], bounds[2]);
        path->bounds[3] = nsvg__maxf(path->bounds[3], bounds[3]);
      }
    }
    path->next = p->plist;
    p->plist = path;
    return;
  }
  
  //Slice - replace by own implementation
  #ifdef USE_ATOF
  // We roll our own string to float because the std library one uses locale and messes things up.
  static double nsvg__atof(const char* s)
  {
    char* cur = (char*)s;
    char* end = NULL;
    double res = 0.0, sign = 1.0;
    long long intPart = 0, fracPart = 0;
    char hasIntPart = 0, hasFracPart = 0;
  
    // Parse optional sign
    if (*cur == '+') {
      cur++;
    } else if (*cur == '-') {
      sign = -1;
      cur++;
    }
  
    // Parse integer part
    if (nsvg__isdigit(*cur)) {
      // Parse digit sequence
      //  intPart = (double)strtoll(cur, &end, 10);
      AsciiStrDecimalToUintnS(cur, &end, &intPart);
      if (cur != end) {
        res = (double)intPart;
        hasIntPart = 1;
        cur = end;
      }
    }
  
    // Parse fractional part.
    if (*cur == '.') {
      cur++; // Skip '.'
      if (nsvg__isdigit(*cur)) {
        // Parse digit sequence
        //    fracPart = strtoll(cur, &end, 10);
        AsciiStrDecimalToUintnS(cur, &end, &fracPart);
        if (cur != end) {
          res += (double)fracPart / pow(10.0, (double)(end - cur));
          hasFracPart = 1;
          cur = end;
        }
      }
    }
  
    // A valid number should have integer or fractional part.
    if (!hasIntPart && !hasFracPart)
      return 0.0;
  
    // Parse optional exponent
    if (*cur == 'e' || *cur == 'E') {
      int expPart = 0;
      cur++; // skip 'E'
      expPart = strtol(cur, &end, 10); // Parse digit sequence with sign
      if (cur != end) {
        res *= pow(10.0, (double)expPart);
      }
    }
  
    return res * sign;
  }
  #else
  static float nsvg__atof(const char* s)
  {
    float Data = 0.0f;
    AsciiStrToFloat(s, NULL, &Data);
    return Data;
  }
  #endif
  
  static const char* nsvg__parseNumber(const char* s, char* it, const int size)
  {
    const int last = size-1;
    int i = 0;
  
    // sign
    if (*s == '-' || *s == '+') {
      if (i < last) it[i++] = *s;
      s++;
    }
    // integer part
    while (*s && nsvg__isdigit(*s)) {
      if (i < last) it[i++] = *s;
      s++;
    }
    if (*s == '.') {
      // decimal point
      if (i < last) it[i++] = *s;
      s++;
      // fraction part
      while (*s && nsvg__isdigit(*s)) {
        if (i < last) it[i++] = *s;
        s++;
      }
    }
    // exponent
    if (*s == 'e' || *s == 'E') {
      if (i < last) it[i++] = *s;
      s++;
      if (*s == '-' || *s == '+') {
        if (i < last) it[i++] = *s;
        s++;
      }
      while (*s && nsvg__isdigit(*s)) {
        if (i < last) it[i++] = *s;
        s++;
      }
    }
    it[i] = '\0';
  
    return s;
  }
  
  static const char* nsvg__getNextPathItem(const char* s, char* it)
  {
    it[0] = '\0';
    // Skip white spaces and commas
    while (*s && (nsvg__isspace(*s) || *s == ',')) s++;
    if (!*s) return s;
    if (*s == '-' || *s == '+' || *s == '.' || nsvg__isdigit(*s)) {
      s = nsvg__parseNumber(s, it, 64);
    } else {
      // Parse command
      it[0] = *s++;
      it[1] = '\0';
      return s;
    }
  
    return s;
  }
  
  //w3.org
  /*
   <circle cx="200" cy="135" r="20" fill="#3b3"/>  //Three digit hex — #rgb
   <circle cx="240" cy="135" r="20" fill="#33bb33"/> //Six digit hex — #rrggbb
   <circle cx="200" cy="175" r="20" fill="rgb(51,187,51)"/> //Integer functional — rgb(rrr, ggg, bbb)
   <circle cx="240" cy="175" r="20" fill="rgb(20%,73.333%,20%)"/> //Float functional — rgb(R%, G%, B%)
   */
  static unsigned int nsvg__parseColorHex(const char* str)
  {
    unsigned int r = 0, g = 0, b = 0;
    UINTN  c = 0;
    int n = 0;
    str++; // skip #
    // Calculate number of characters.
    while(str[n] && IsHexDigit(str[n]))
      n++;
    if (n == 6) {
      n = hex2bin((CHAR8*)str, (UINT8*)&c, 3); //big endian
      b = (c >> 16) & 0xff;
      g = (c >> 8) & 0xff;
      r = c & 0xff;
    } else if (n == 3) {
      c = AsciiStrHexToUintn(str);
      r = ((c&0xf00) >> 8) * 17;
      g = ((c&0xf0) >> 4) * 17;
      b = (c&0xf) * 17;
    }
    return NSVG_RGB(r,g,b);
  }
  
  static unsigned int nsvg__parseColorRGB(const char* str)
  {
    int r = -1, g = -1, b = -1;
    float fr, fg, fb;
    char *s1 = NULL;
    AsciiStrToFloat(str+4, &s1, &fr);
    if (*s1 == '%') {
      r = (int)(fr * 2.55f);
      str = s1 + 2;
    } else if (*s1 == ',') {
      r = (int)fr;
      str = s1 + 1;
    } else {
      //error
      DBG("StrFloat error:%a\n", str);
      return NSVG_RGB(0,0,0);
    }
    AsciiStrToFloat(str, &s1, &fg);
    if (*s1 == '%') {
      g = (int)(fg * 2.55f);
      str = s1 + 2;
    } else if (*s1 == ',') {
      g = (int)fg;
      str = s1 + 1;
    } else {
      //error
      DBG("StrFloat error:%a\n", str);
      return NSVG_RGB(0,0,0);
    }
    AsciiStrToFloat(str, &s1, &fb);
    if (*s1 == '%') {
      b = (int)(fb * 2.55f);
    }  else {
      b = (int)fb;
    }
    return NSVG_RGB(r,g,b);
  }
  
  typedef struct NSVGNamedColor {
    const char* name;
    unsigned int color;
  } NSVGNamedColor;
  
  NSVGNamedColor nsvg__colors[] = {
  
    { "red", NSVG_RGB(255, 0, 0) },
    { "green", NSVG_RGB( 0, 128, 0) },
    { "blue", NSVG_RGB( 0, 0, 255) },
    { "yellow", NSVG_RGB(255, 255, 0) },
    { "cyan", NSVG_RGB( 0, 255, 255) },
    { "magenta", NSVG_RGB(255, 0, 255) },
    { "black", NSVG_RGB( 0, 0, 0) },
    { "grey", NSVG_RGB(128, 128, 128) },
    { "gray", NSVG_RGB(128, 128, 128) },
    { "white", NSVG_RGB(255, 255, 255) },
  
  #ifdef NANOSVG_ALL_COLOR_KEYWORDS
    { "aliceblue", NSVG_RGB(240, 248, 255) },
    { "antiquewhite", NSVG_RGB(250, 235, 215) },
    { "aqua", NSVG_RGB( 0, 255, 255) },
    { "aquamarine", NSVG_RGB(127, 255, 212) },
    { "azure", NSVG_RGB(240, 255, 255) },
    { "beige", NSVG_RGB(245, 245, 220) },
    { "bisque", NSVG_RGB(255, 228, 196) },
    { "blanchedalmond", NSVG_RGB(255, 235, 205) },
    { "blueviolet", NSVG_RGB(138, 43, 226) },
    { "brown", NSVG_RGB(165, 42, 42) },
    { "burlywood", NSVG_RGB(222, 184, 135) },
    { "cadetblue", NSVG_RGB( 95, 158, 160) },
    { "chartreuse", NSVG_RGB(127, 255, 0) },
    { "chocolate", NSVG_RGB(210, 105, 30) },
    { "coral", NSVG_RGB(255, 127, 80) },
    { "cornflowerblue", NSVG_RGB(100, 149, 237) },
    { "cornsilk", NSVG_RGB(255, 248, 220) },
    { "crimson", NSVG_RGB(220, 20, 60) },
    { "darkblue", NSVG_RGB( 0, 0, 139) },
    { "darkcyan", NSVG_RGB( 0, 139, 139) },
    { "darkgoldenrod", NSVG_RGB(184, 134, 11) },
    { "darkgray", NSVG_RGB(169, 169, 169) },
    { "darkgreen", NSVG_RGB( 0, 100, 0) },
    { "darkgrey", NSVG_RGB(169, 169, 169) },
    { "darkkhaki", NSVG_RGB(189, 183, 107) },
    { "darkmagenta", NSVG_RGB(139, 0, 139) },
    { "darkolivegreen", NSVG_RGB( 85, 107, 47) },
    { "darkorange", NSVG_RGB(255, 140, 0) },
    { "darkorchid", NSVG_RGB(153, 50, 204) },
    { "darkred", NSVG_RGB(139, 0, 0) },
    { "darksalmon", NSVG_RGB(233, 150, 122) },
    { "darkseagreen", NSVG_RGB(143, 188, 143) },
    { "darkslateblue", NSVG_RGB( 72, 61, 139) },
    { "darkslategray", NSVG_RGB( 47, 79, 79) },
    { "darkslategrey", NSVG_RGB( 47, 79, 79) },
    { "darkturquoise", NSVG_RGB( 0, 206, 209) },
    { "darkviolet", NSVG_RGB(148, 0, 211) },
    { "deeppink", NSVG_RGB(255, 20, 147) },
    { "deepskyblue", NSVG_RGB( 0, 191, 255) },
    { "dimgray", NSVG_RGB(105, 105, 105) },
    { "dimgrey", NSVG_RGB(105, 105, 105) },
    { "dodgerblue", NSVG_RGB( 30, 144, 255) },
    { "firebrick", NSVG_RGB(178, 34, 34) },
    { "floralwhite", NSVG_RGB(255, 250, 240) },
    { "forestgreen", NSVG_RGB( 34, 139, 34) },
    { "fuchsia", NSVG_RGB(255, 0, 255) },
    { "gainsboro", NSVG_RGB(220, 220, 220) },
    { "ghostwhite", NSVG_RGB(248, 248, 255) },
    { "gold", NSVG_RGB(255, 215, 0) },
    { "goldenrod", NSVG_RGB(218, 165, 32) },
    { "greenyellow", NSVG_RGB(173, 255, 47) },
    { "honeydew", NSVG_RGB(240, 255, 240) },
    { "hotpink", NSVG_RGB(255, 105, 180) },
    { "indianred", NSVG_RGB(205, 92, 92) },
    { "indigo", NSVG_RGB( 75, 0, 130) },
    { "ivory", NSVG_RGB(255, 255, 240) },
    { "khaki", NSVG_RGB(240, 230, 140) },
    { "lavender", NSVG_RGB(230, 230, 250) },
    { "lavenderblush", NSVG_RGB(255, 240, 245) },
    { "lawngreen", NSVG_RGB(124, 252, 0) },
    { "lemonchiffon", NSVG_RGB(255, 250, 205) },
    { "lightblue", NSVG_RGB(173, 216, 230) },
    { "lightcoral", NSVG_RGB(240, 128, 128) },
    { "lightcyan", NSVG_RGB(224, 255, 255) },
    { "lightgoldenrodyellow", NSVG_RGB(250, 250, 210) },
    { "lightgray", NSVG_RGB(211, 211, 211) },
    { "lightgreen", NSVG_RGB(144, 238, 144) },
    { "lightgrey", NSVG_RGB(211, 211, 211) },
    { "lightpink", NSVG_RGB(255, 182, 193) },
    { "lightsalmon", NSVG_RGB(255, 160, 122) },
    { "lightseagreen", NSVG_RGB( 32, 178, 170) },
    { "lightskyblue", NSVG_RGB(135, 206, 250) },
    { "lightslategray", NSVG_RGB(119, 136, 153) },
    { "lightslategrey", NSVG_RGB(119, 136, 153) },
    { "lightsteelblue", NSVG_RGB(176, 196, 222) },
    { "lightyellow", NSVG_RGB(255, 255, 224) },
    { "lime", NSVG_RGB( 0, 255, 0) },
    { "limegreen", NSVG_RGB( 50, 205, 50) },
    { "linen", NSVG_RGB(250, 240, 230) },
    { "maroon", NSVG_RGB(128, 0, 0) },
    { "mediumaquamarine", NSVG_RGB(102, 205, 170) },
    { "mediumblue", NSVG_RGB( 0, 0, 205) },
    { "mediumorchid", NSVG_RGB(186, 85, 211) },
    { "mediumpurple", NSVG_RGB(147, 112, 219) },
    { "mediumseagreen", NSVG_RGB( 60, 179, 113) },
    { "mediumslateblue", NSVG_RGB(123, 104, 238) },
    { "mediumspringgreen", NSVG_RGB( 0, 250, 154) },
    { "mediumturquoise", NSVG_RGB( 72, 209, 204) },
    { "mediumvioletred", NSVG_RGB(199, 21, 133) },
    { "midnightblue", NSVG_RGB( 25, 25, 112) },
    { "mintcream", NSVG_RGB(245, 255, 250) },
    { "mistyrose", NSVG_RGB(255, 228, 225) },
    { "moccasin", NSVG_RGB(255, 228, 181) },
    { "navajowhite", NSVG_RGB(255, 222, 173) },
    { "navy", NSVG_RGB( 0, 0, 128) },
    { "oldlace", NSVG_RGB(253, 245, 230) },
    { "olive", NSVG_RGB(128, 128, 0) },
    { "olivedrab", NSVG_RGB(107, 142, 35) },
    { "orange", NSVG_RGB(255, 165, 0) },
    { "orangered", NSVG_RGB(255, 69, 0) },
    { "orchid", NSVG_RGB(218, 112, 214) },
    { "palegoldenrod", NSVG_RGB(238, 232, 170) },
    { "palegreen", NSVG_RGB(152, 251, 152) },
    { "paleturquoise", NSVG_RGB(175, 238, 238) },
    { "palevioletred", NSVG_RGB(219, 112, 147) },
    { "papayawhip", NSVG_RGB(255, 239, 213) },
    { "peachpuff", NSVG_RGB(255, 218, 185) },
    { "peru", NSVG_RGB(205, 133, 63) },
    { "pink", NSVG_RGB(255, 192, 203) },
    { "plum", NSVG_RGB(221, 160, 221) },
    { "powderblue", NSVG_RGB(176, 224, 230) },
    { "purple", NSVG_RGB(128, 0, 128) },
    { "rosybrown", NSVG_RGB(188, 143, 143) },
    { "royalblue", NSVG_RGB( 65, 105, 225) },
    { "saddlebrown", NSVG_RGB(139, 69, 19) },
    { "salmon", NSVG_RGB(250, 128, 114) },
    { "sandybrown", NSVG_RGB(244, 164, 96) },
    { "seagreen", NSVG_RGB( 46, 139, 87) },
    { "seashell", NSVG_RGB(255, 245, 238) },
    { "sienna", NSVG_RGB(160, 82, 45) },
    { "silver", NSVG_RGB(192, 192, 192) },
    { "skyblue", NSVG_RGB(135, 206, 235) },
    { "slateblue", NSVG_RGB(106, 90, 205) },
    { "slategray", NSVG_RGB(112, 128, 144) },
    { "slategrey", NSVG_RGB(112, 128, 144) },
    { "snow", NSVG_RGB(255, 250, 250) },
    { "springgreen", NSVG_RGB( 0, 255, 127) },
    { "steelblue", NSVG_RGB( 70, 130, 180) },
    { "tan", NSVG_RGB(210, 180, 140) },
    { "teal", NSVG_RGB( 0, 128, 128) },
    { "thistle", NSVG_RGB(216, 191, 216) },
    { "tomato", NSVG_RGB(255, 99, 71) },
    { "turquoise", NSVG_RGB( 64, 224, 208) },
    { "violet", NSVG_RGB(238, 130, 238) },
    { "wheat", NSVG_RGB(245, 222, 179) },
    { "whitesmoke", NSVG_RGB(245, 245, 245) },
    { "yellowgreen", NSVG_RGB(154, 205, 50) },
  #endif
  };
  
  static unsigned int nsvg__parseColorName(const char* str)
  {
    int i, ncolors = sizeof(nsvg__colors) / sizeof(NSVGNamedColor);
    //  DBG("namedcolor=%d\n", sizeof(NSVGNamedColor));
  #if 0
    for (i = 0; i < ncolors; i++) {
      if (strcmp(nsvg__colors[i].name, str) == 0) {
        return nsvg__colors[i].color;
      }
    }
  #else
    int low, high, med;
    INTN res;
    low = 10;
    high = ncolors - 1;
    for (i = 0; i < 10; i++) {
      if (strcmp(nsvg__colors[i].name, str) == 0) {
        return nsvg__colors[i].color;
      }
    }
  
    while (low <= high)
    {
      med = (low + high) / 2;
      res = strcmp(nsvg__colors[med].name, str);
      if(res < 0)
        low = med + 1;
      else if (res > 0)
        high = med - 1;
      else
        return nsvg__colors[med].color;
    }
  #endif
  
    return NSVG_RGB(128, 128, 128); //if not found then Grey50%
  }
  
  static unsigned int nsvg__parseColor(const char* str)
  {
    size_t len = 0;
    while(*str == ' ') ++str;
    len = strlen(str);
    if (len >= 1 && *str == '#')
      return nsvg__parseColorHex(str);
    else if (len >= 4 && str[0] == 'r' && str[1] == 'g' && str[2] == 'b' && str[3] == '(')
      return nsvg__parseColorRGB(str);
    return nsvg__parseColorName(str);
  }
  
  static float nsvg__parseOpacity(const char* str)
  {
    float val = 0;
    //  sscanf(str, "%f", &val);
    AsciiStrToFloat(str, NULL, &val);
    if (val < 0.0f) val = 0.0f;
    if (val > 1.0f) val = 1.0f;
    return val;
  }
  
  static float nsvg__parseMiterLimit(const char* str)
  {
    float val = 0;
    //  sscanf(str, "%f", &val);
    AsciiStrToFloat(str, NULL, &val);
    if (val < 0.0f) val = 0.0f;
    return val;
  }
  
  static int nsvg__parseUnits(const char* units)
  {
    if (!units || units[0] == '\0') {
      return NSVG_UNITS_USER;
    }
    if (units[0] == 'p' && units[1] == 'x')
      return NSVG_UNITS_PX;
    else if (units[0] == 'p' && units[1] == 't')
      return NSVG_UNITS_PT;
    else if (units[0] == 'p' && units[1] == 'c')
      return NSVG_UNITS_PC;
    else if (units[0] == 'm' && units[1] == 'm')
      return NSVG_UNITS_MM;
    else if (units[0] == 'c' && units[1] == 'm')
      return NSVG_UNITS_CM;
    else if (units[0] == 'i' && units[1] == 'n')
      return NSVG_UNITS_IN;
    else if (units[0] == '%')
      return NSVG_UNITS_PERCENT;
    else if (units[0] == 'e' && units[1] == 'm')
      return NSVG_UNITS_EM;
    else if (units[0] == 'e' && units[1] == 'x')
      return NSVG_UNITS_EX;
    return NSVG_UNITS_USER;
  }
  
  static NSVGcoordinate nsvg__parseCoordinateRaw(const char* str)
  {
    NSVGcoordinate coord = {0, NSVG_UNITS_USER};
    //  char units[32]="";
    char* UnitsStr = NULL;
    //  sscanf(str, "%f%31s", &coord.value, units);
    AsciiStrToFloat(str, &UnitsStr, &coord.value);
  
    //  coord.units = nsvg__parseUnits(units);
    coord.units = nsvg__parseUnits((const char*)UnitsStr);
    return coord;
  }
  
  static NSVGcoordinate nsvg__coord(float v, int units)
  {
    NSVGcoordinate coord;
    coord.value = v;
    coord.units = units;
    return coord;
  }
  
  static float nsvg__parseCoordinate(NSVGparser* p, const char* str, float orig, float length)
  {
    NSVGcoordinate coord = nsvg__parseCoordinateRaw(str);
    float v = nsvg__convertToPixels(p, &coord, orig, length);
    return v;
  }
  
  static int nsvg__parseTransformArgs(const char* str, float* args, int maxNa, int* na)
  {
    const char* end;
    const char* ptr;
    char it[64];
  
    *na = 0;
    ptr = str;
    while (*ptr && *ptr != '(') ++ptr;
    if (*ptr == 0)
      return 1;
    end = ptr;
    while (*end && *end != ')') ++end;
    if (*end == 0)
      return 1;
  
    while (ptr < end) {
      if (*ptr == '-' || *ptr == '+' || *ptr == '.' || nsvg__isdigit(*ptr)) {
        if (*na >= maxNa) return 0;
        ptr = nsvg__parseNumber(ptr, it, 64);
        args[(*na)++] = (float)nsvg__atof(it);
      } else {
        ++ptr;
      }
    }
    return (int)(end - str);
  }
  
  
  static int nsvg__parseMatrix(float* xform, const char* str)
  {
    float t[6];
    int na = 0;
    int len = nsvg__parseTransformArgs(str, t, 6, &na);
    if (na != 6) return len;
    memcpy(xform, t, sizeof(float)*6);
    return len;
  }
  
  static int nsvg__parseTranslate(float* xform, const char* str)
  {
    float args[2];
    float t[6];
    int na = 0;
    int len = nsvg__parseTransformArgs(str, args, 2, &na);
    if (na == 1) args[1] = 0.0;
  
    nsvg__xformSetTranslation(t, args[0], args[1]);
    memcpy(xform, t, sizeof(float)*6);
    return len;
  }
  
  static int nsvg__parseScale(float* xform, const char* str)
  {
    float args[2];
    int na = 0;
    float t[6];
    int len = nsvg__parseTransformArgs(str, args, 2, &na);
    if (na == 1) args[1] = args[0];
    nsvg__xformSetScale(t, args[0], args[1]);
    memcpy(xform, t, sizeof(float)*6);
    return len;
  }
  
  static int nsvg__parseSkewX(float* xform, const char* str)
  {
    float args[1];
    int na = 0;
    float t[6];
    int len = nsvg__parseTransformArgs(str, args, 1, &na);
    nsvg__xformSetSkewX(t, args[0] * NSVG_PI_DEG);
    memcpy(xform, t, sizeof(float)*6);
    return len;
  }
  
  static int nsvg__parseSkewY(float* xform, const char* str)
  {
    float args[1];
    int na = 0;
    float t[6];
    int len = nsvg__parseTransformArgs(str, args, 1, &na);
    nsvg__xformSetSkewY(t, args[0] * NSVG_PI_DEG);
    memcpy(xform, t, sizeof(float)*6);
    return len;
  }
  
  static int nsvg__parseRotate(float* xform, const char* str)
  {
    float args[3];
    int na = 0;
    float m[6];
    float t[6];
    int len = nsvg__parseTransformArgs(str, args, 3, &na);
    if (na == 1)
      args[1] = args[2] = 0.0f;
    nsvg__xformIdentity(m);
  
    if (na > 1) {
      nsvg__xformSetTranslation(t, -args[1], -args[2]);
      nsvg__xformMultiply(m, t);
    }
  
    nsvg__xformSetRotation(t, args[0] * NSVG_PI_DEG);
    nsvg__xformMultiply(m, t);
  
    if (na > 1) {
      nsvg__xformSetTranslation(t, args[1], args[2]);
      nsvg__xformMultiply(m, t);
    }
  
    memcpy(xform, m, sizeof(float)*6);
  
    return len;
  }
  
  static void nsvg__parseTransform(float* xform, const char* str)
  {
    float t[6];
    //  INT64 i, j;
    //  float v;
    nsvg__xformIdentity(xform);
  
    while (*str)
    {
      if (strncmp(str, "matrix", 6) == 0)
        str += nsvg__parseMatrix(t, str);
      else if (strncmp(str, "translate", 9) == 0)
        str += nsvg__parseTranslate(t, str);
      else if (strncmp(str, "scale", 5) == 0)
        str += nsvg__parseScale(t, str);
      else if (strncmp(str, "rotate", 6) == 0)
        str += nsvg__parseRotate(t, str);
      else if (strncmp(str, "skewX", 5) == 0)
        str += nsvg__parseSkewX(t, str);
      else if (strncmp(str, "skewY", 5) == 0)
        str += nsvg__parseSkewY(t, str);
      else{
        ++str;
        continue;
      }
      nsvg__xformPremultiply(xform, t);
    }
  }
  
  static void nsvg__parseUrl(char* id, const char* str)
  {
    int i = 0;
    str += 4; // "url(";
    if (*str == '#')
      str++;
    while (i < 63 && *str != ')') {
      id[i] = *str++;
      i++;
    }
    id[i] = '\0';
  }
  
  static char nsvg__parseLineCap(const char* str)
  {
    if (strcmp(str, "butt") == 0)
      return NSVG_CAP_BUTT;
    else if (strcmp(str, "round") == 0)
      return NSVG_CAP_ROUND;
    else if (strcmp(str, "square") == 0)
      return NSVG_CAP_SQUARE;
    // TODO: handle inherit.
    return NSVG_CAP_BUTT;
  }
  
  static char nsvg__parseLineJoin(const char* str)
  {
    if (strcmp(str, "miter") == 0)
      return NSVG_JOIN_MITER;
    else if (strcmp(str, "round") == 0)
      return NSVG_JOIN_ROUND;
    else if (strcmp(str, "bevel") == 0)
      return NSVG_JOIN_BEVEL;
    // TODO: handle inherit.
    return NSVG_CAP_BUTT;
  }
  
  static char nsvg__parseFillRule(const char* str)
  {
    if (strcmp(str, "nonzero") == 0)
      return NSVG_FILLRULE_NONZERO;
    else if (strcmp(str, "evenodd") == 0)
      return NSVG_FILLRULE_EVENODD;
    // TODO: handle inherit.
    return NSVG_FILLRULE_NONZERO;
  }
  
  static const char* nsvg__getNextDashItem(const char* s, char* it)
  {
    int n = 0;
    it[0] = '\0';
    // Skip white spaces and commas
    while (*s && (nsvg__isspace(*s) || *s == ',')) s++;
    // Advance until whitespace, comma or end.
    while (*s && (!nsvg__isspace(*s) && *s != ',')) {
      if (n < 63)
        it[n++] = *s;
      s++;
    }
    it[n++] = '\0';
    return s;
  }
  
  static int nsvg__parseStrokeDashArray(NSVGparser* p, const char* str, float* strokeDashArray)
  {
    char item[64];
    int count = 0, i;
    float sum = 0.0f;
  
    // Handle "none"
    if (str[0] == 'n')
      return 0;
  
    // Parse dashes
    while (*str) {
      str = nsvg__getNextDashItem(str, item);
      if (!*item) break;
      if (count < NSVG_MAX_DASHES)
        strokeDashArray[count++] = fabsf(nsvg__parseCoordinate(p, item, 0.0f, nsvg__actualLength(p)));
    }
  
    for (i = 0; i < count; i++)
      sum += strokeDashArray[i];
    if (sum <= 1e-6f)
      count = 0;
  
    return count;
  }
  
  static NSVGclipPath* nsvg__createClipPath(const char* name, int index)
  {
    NSVGclipPath* clipPath = (NSVGclipPath*)AllocateZeroPool(sizeof(NSVGclipPath));
    if (clipPath == NULL) return NULL;
  
    strncpy(clipPath->id, name, 63);
    clipPath->id[63] = '\0';
    clipPath->index = (NSVGclipPathIndex)index;
    return clipPath;
  }
  
  static NSVGclipPath* nsvg__findClipPath(NSVGparser* p, const char* name)
  {
    int i = 0;
    NSVGclipPath** link;
    NSVGattrib* attr = nsvg__getAttr(p);
  
    link = &p->image->clipPaths;
    while (*link != NULL) {
      if (strcmp((*link)->id, name) == 0) {
        break;
      }
      link = &(*link)->next;
      i++;
    }
    if (*link == NULL) {
      *link = nsvg__createClipPath(name, i);
      (*link)->group = attr->group;
    }
    return *link;
  }
  
  static int substr(const char* class, char* style)
  {
    const char *p;
  
    while (*class) {
      char *s = style;
      p = class++;
      while (*p++ == *s++) {
        if (*s == '\0') {
          if ((*p == '\0') || (*p == ' ')) {
            return 1;
          } else break;
        }
      }
    }
    return 0;
  }
  
  static void nsvg__parseStyle(NSVGparser* p, const char* str);
  
  static int nsvg__parseAttr(NSVGparser* p, const char* name, const char* value)
  {
    float xform[6];
    //  DBG("parse Name:%a Value:%a\n", name, value);
    NSVGattrib* attr = nsvg__getAttr(p);
    if (!attr) return 0;
    if (strcmp(name, "style") == 0) {
      nsvg__parseStyle(p, value);
    } else if (strcmp(name, "display") == 0) {
      if (strcmp(value, "none") == 0) {
        attr->visible &= ~NSVG_VIS_DISPLAY;
      }
      // Don't reset ->visible on display:inline, one display:none hides the whole subtree
    } else if (strcmp(name, "visibility") == 0) {
      if (strcmp(value, "hidden") == 0) {
        attr->visible &= ~NSVG_VIS_VISIBLE;
      } else if (strcmp(value, "visible") == 0) {
        attr->visible |= NSVG_VIS_VISIBLE;
      }
    } else if (strcmp(name, "fill") == 0) {
      if (strcmp(value, "none") == 0) {
        attr->hasFill = 0;
      } else if (strncmp(value, "url(", 4) == 0) {
        if (strstr(value, "pattern")) {
          attr->hasFill = 3;
        } else {
          attr->hasFill = 2;
        }
        nsvg__parseUrl(attr->fillGradient, value);
  
      } else {
        attr->hasFill = 1;
        attr->fillColor = nsvg__parseColor(value);
      }
    } else if (strcmp(name, "opacity") == 0) {
      float opacity = nsvg__parseOpacity(value);
      attr->opacity *= opacity;
      if (attr->opacity == 0.0f) {
        attr->opacity = p->opacity;  //some trick for seal an image on preview
      }
    } else if (strcmp(name, "fill-opacity") == 0) {
      attr->fillOpacity = nsvg__parseOpacity(value);
    } else if (strcmp(name, "stroke") == 0) {
      if (strcmp(value, "none") == 0) {
        attr->hasStroke = 0;
      } else if (strncmp(value, "url(", 4) == 0) {
        if (strstr(value, "pattern")) {
          attr->hasStroke = 3;
        } else {
          attr->hasStroke = 2;
        }
        nsvg__parseUrl(attr->strokeGradient, value);
      } else {
        attr->hasStroke = 1;
        attr->strokeColor = nsvg__parseColor(value);
      }
    } else if (strcmp(name, "stroke-width") == 0) {
      attr->strokeWidth = nsvg__parseCoordinate(p, value, 0.0f, nsvg__actualLength(p));
    } else if (strcmp(name, "stroke-dasharray") == 0) {
      attr->strokeDashCount = nsvg__parseStrokeDashArray(p, value, attr->strokeDashArray);
    } else if (strcmp(name, "stroke-dashoffset") == 0) {
      attr->strokeDashOffset = nsvg__parseCoordinate(p, value, 0.0f, nsvg__actualLength(p));
    } else if (strcmp(name, "stroke-opacity") == 0) {
      attr->strokeOpacity = nsvg__parseOpacity(value);
    } else if (strcmp(name, "stroke-linecap") == 0) {
      attr->strokeLineCap = nsvg__parseLineCap(value);
    } else if (strcmp(name, "stroke-linejoin") == 0) {
      attr->strokeLineJoin = nsvg__parseLineJoin(value);
    } else if (strcmp(name, "stroke-miterlimit") == 0) {
      attr->miterLimit = nsvg__parseMiterLimit(value);
    } else if (strcmp(name, "fill-rule") == 0) {
      attr->fillRule = nsvg__parseFillRule(value);
    } else if (strcmp(name, "font-size") == 0) {
      if (!attr->fontFace) {
        //      DBG("font face=%d\n", sizeof(NSVGfont));
        attr->fontFace = (NSVGfont*)AllocateZeroPool(sizeof(NSVGfont));
      }
      attr->fontFace->fontSize = nsvg__parseCoordinate(p, value, 0.0f, nsvg__actualLength(p));
    } else if (strcmp(name, "clip-path") == 0) {
      if (strncmp(value, "url(", 4) == 0 && attr->clipPathCount < NSVG_MAX_CLIP_PATHS) {
        char clipName[64];
        nsvg__parseUrl(clipName, value);
        NSVGclipPath *clipPath = nsvg__findClipPath(p, clipName);
        p->clipPathStack[attr->clipPathCount++] = clipPath->index;
      }
    } else if (strcmp(name, "stop-color") == 0) {
      attr->stopColor = nsvg__parseColor(value);
    } else if (strcmp(name, "stop-opacity") == 0) {
      attr->stopOpacity = nsvg__parseOpacity(value);
    } else if (strcmp(name, "offset") == 0) {
      attr->stopOffset = nsvg__parseCoordinate(p, value, 0.0f, 1.0f);
    } else if (strcmp(name, "font-family") == 0) {
      if (!attr->fontFace) {
        //     DBG("font face=%d\n", sizeof(NSVGfont));
        attr->fontFace = (NSVGfont*)AllocateZeroPool(sizeof(NSVGfont));
      }
      if (attr->fontFace) {
        if (value[0] == 0x27) {  //'
          CHAR8* apo = strstr(++value, "'");
          if (apo) apo[0] = '\0';
        }
   //     DBG("reduced font-family:%a\n", value);
        strncpy(attr->fontFace->fontFamily, value, 63);
        attr->fontFace->fontFamily[63] = '\0';
      }
    } else if (strcmp(name, "font-weight") == 0) {
      if (!attr->fontFace) {
        attr->fontFace = (NSVGfont*)AllocateZeroPool(sizeof(NSVGfont));
      }
      if (attr->fontFace) {
        //      char* Next = 0;
        float fontWeight = 0.0f;
        AsciiStrToFloat(value, NULL /*&Next*/, &fontWeight);
        attr->fontFace->fontWeight = fontWeight;
      }
    } else if (strcmp(name, "font-style") == 0)  {
      DBG("attr=%a value=%a\n", name, value);
      if (!attr->fontFace) {
        attr->fontFace = (NSVGfont*)AllocateZeroPool(sizeof(NSVGfont));
      }
      if (strstr(value, "italic") != NULL)  {
        DBG("it is italic\n");
        attr->fontFace->fontStyle = 'i';
      } else if (strstr(value, "bold") != NULL)  {
        DBG("it is bold\n");
        attr->fontFace->fontStyle = 'b';
      } else {
        DBG("it is other\n");
        attr->fontFace->fontStyle = 'n';
      }
    } else if (strcmp(name, "id") == 0) {
      strncpy(attr->id, value, 63);
      attr->id[63] = '\0';
    } else if (strcmp(name, "x") == 0) {
      nsvg__xformSetTranslation(xform, (float)nsvg__atof(value), 0);
      nsvg__xformPremultiply(attr->xform, xform);
    } else if (strcmp(name, "y") == 0) {
      nsvg__xformSetTranslation(xform, 0, (float)nsvg__atof(value));
      nsvg__xformPremultiply(attr->xform, xform);
    } else if (strcmp(name, "transform") == 0) {
      nsvg__parseTransform(xform, value);
      nsvg__xformPremultiply(attr->xform, xform);
    }
    else if (strcmp(name, "class") == 0) {
      NSVGstyles* style = p->styles;
      while (style) {
        if (substr(value, style->name) != 0) {
          nsvg__parseStyle(p, style->description);
        }
        style = style->next;
      }
    }
    else {
      return 0;
    }
    return 1;
  }
  
  static int nsvg__parseNameValue(NSVGparser* p, const char* start, const char* end)
  {
    const char* str;
    const char* val;
    char name[512];
    char value[512];
    int n;
  
    str = start;
    while (str < end && *str != ':') ++str;
  
    val = str;
  
    // Right Trim
    while (str > start &&  (*str == ':' || nsvg__isspace(*str))) --str;
    ++str;
  
    n = (int)(str - start);
    if (n > 511) n = 511;
    if (n) memcpy(name, start, n);
    name[n] = 0;
  
    while (val < end && (*val == ':' || nsvg__isspace(*val))) ++val;
  
    n = (int)(end - val);
    if (n > 511) n = 511;
    if (n) memcpy(value, val, n);
    value[n] = 0;
  
    n = nsvg__parseAttr(p, name, value);
    return n;
  }
  
  static void nsvg__parseStyle(NSVGparser* p, const char* str)
  {
    const char* start;
    const char* end;
  
    if (str == NULL) return;
  
    while (*str) {
      // Left Trim
      while(*str && nsvg__isspace(*str)) ++str;
      start = str;
      while(*str && *str != ';') ++str;
      end = str;
  
      // Right Trim
      while (end > start &&  (*end == ';' || nsvg__isspace(*end))) --end;
      ++end;
      nsvg__parseNameValue(p, start, end);
      if (*str) ++str;
    }
  }
  /*
  static void nsvg__parseAttribs(NSVGparser* p, const char** dict)
  {
    int i;
    for (i = 0; dict[i]; i += 2)
    {
      if (strcmp(dict[i], "style") == 0)
        nsvg__parseStyle(p, dict[i + 1]);
      else {
        nsvg__parseAttr(p, dict[i], dict[i + 1]);
      }
    }
  }
   */
  static int nsvg__getArgsPerElement(char cmd)
  {
    switch (cmd) {
      case 'v':
      case 'V':
      case 'h':
      case 'H':
        return 1;
      case 'm':
      case 'M':
      case 'l':
      case 'L':
      case 't':
      case 'T':
        return 2;
      case 'q':
      case 'Q':
      case 's':
      case 'S':
        return 4;
      case 'c':
      case 'C':
        return 6;
      case 'a':
      case 'A':
        return 7;
    }
    return 0;
  }
  
  static void nsvg__pathMoveTo(NSVGparser* p, float* cpx, float* cpy, float* args, int rel)
  {
    if (rel) {
      *cpx += args[0];
      *cpy += args[1];
    } else {
      *cpx = args[0];
      *cpy = args[1];
    }
    nsvg__moveTo(p, *cpx, *cpy);
  }
  
  static void nsvg__pathLineTo(NSVGparser* p, float* cpx, float* cpy, float* args, int rel)
  {
    if (rel) {
      *cpx += args[0];
      *cpy += args[1];
    } else {
      *cpx = args[0];
      *cpy = args[1];
    }
    nsvg__lineTo(p, *cpx, *cpy);
  }
  
  static void nsvg__pathHLineTo(NSVGparser* p, float* cpx, float* cpy, float* args, int rel)
  {
    if (rel)
      *cpx += args[0];
    else
      *cpx = args[0];
    nsvg__lineTo(p, *cpx, *cpy);
  }
  
  static void nsvg__pathVLineTo(NSVGparser* p, float* cpx, float* cpy, float* args, int rel)
  {
    if (rel)
      *cpy += args[0];
    else
      *cpy = args[0];
    nsvg__lineTo(p, *cpx, *cpy);
  }
  
  static void nsvg__pathCubicBezTo(NSVGparser* p, float* cpx, float* cpy,
                                   float* cpx2, float* cpy2, float* args, int rel)
  {
    float x2, y2, cx1, cy1, cx2, cy2;
  
    if (rel) {
      cx1 = *cpx + args[0];
      cy1 = *cpy + args[1];
      cx2 = *cpx + args[2];
      cy2 = *cpy + args[3];
      x2 = *cpx + args[4];
      y2 = *cpy + args[5];
    } else {
      cx1 = args[0];
      cy1 = args[1];
      cx2 = args[2];
      cy2 = args[3];
      x2 = args[4];
      y2 = args[5];
    }
  
    nsvg__cubicBezTo(p, cx1,cy1, cx2,cy2, x2,y2);
  
    *cpx2 = cx2;
    *cpy2 = cy2;
    *cpx = x2;
    *cpy = y2;
  }
  
  static void nsvg__pathCubicBezShortTo(NSVGparser* p, float* cpx, float* cpy,
                                        float* cpx2, float* cpy2, float* args, int rel)
  {
    float x1, y1, x2, y2, cx1, cy1, cx2, cy2;
  
    x1 = *cpx;
    y1 = *cpy;
    if (rel) {
      cx2 = *cpx + args[0];
      cy2 = *cpy + args[1];
      x2 = *cpx + args[2];
      y2 = *cpy + args[3];
    } else {
      cx2 = args[0];
      cy2 = args[1];
      x2 = args[2];
      y2 = args[3];
    }
  
    cx1 = 2*x1 - *cpx2;
    cy1 = 2*y1 - *cpy2;
  
    nsvg__cubicBezTo(p, cx1,cy1, cx2,cy2, x2,y2);
  
    *cpx2 = cx2;
    *cpy2 = cy2;
    *cpx = x2;
    *cpy = y2;
  }
  
  static void nsvg__pathQuadBezTo(NSVGparser* p, float* cpx, float* cpy,
                                  float* cpx2, float* cpy2, float* args, int rel)
  {
    float x1, y1, x2, y2, cx, cy;
    float cx1, cy1, cx2, cy2;
  
    x1 = *cpx;
    y1 = *cpy;
    if (rel) {
      cx = *cpx + args[0];
      cy = *cpy + args[1];
      x2 = *cpx + args[2];
      y2 = *cpy + args[3];
    } else {
      cx = args[0];
      cy = args[1];
      x2 = args[2];
      y2 = args[3];
    }
  
    // Convert to cubic bezier
    cx1 = x1 + 2.0f/3.0f*(cx - x1);
    cy1 = y1 + 2.0f/3.0f*(cy - y1);
    cx2 = x2 + 2.0f/3.0f*(cx - x2);
    cy2 = y2 + 2.0f/3.0f*(cy - y2);
  
    nsvg__cubicBezTo(p, cx1,cy1, cx2,cy2, x2,y2);
  
    *cpx2 = cx;
    *cpy2 = cy;
    *cpx = x2;
    *cpy = y2;
  }
  
  static void nsvg__pathQuadBezShortTo(NSVGparser* p, float* cpx, float* cpy,
                                       float* cpx2, float* cpy2, float* args, int rel)
  {
    float x1, y1, x2, y2, cx, cy;
    float cx1, cy1, cx2, cy2;
  
    x1 = *cpx;
    y1 = *cpy;
    if (rel) {
      x2 = *cpx + args[0];
      y2 = *cpy + args[1];
    } else {
      x2 = args[0];
      y2 = args[1];
    }
  
    cx = 2*x1 - *cpx2;
    cy = 2*y1 - *cpy2;
  
    // Convert to cubix bezier
    cx1 = x1 + 2.0f/3.0f*(cx - x1);
    cy1 = y1 + 2.0f/3.0f*(cy - y1);
    cx2 = x2 + 2.0f/3.0f*(cx - x2);
    cy2 = y2 + 2.0f/3.0f*(cy - y2);
  
    nsvg__cubicBezTo(p, cx1,cy1, cx2,cy2, x2,y2);
  
    *cpx2 = cx;
    *cpy2 = cy;
    *cpx = x2;
    *cpy = y2;
  }
  
  static void nsvg__pathArcTo(NSVGparser* p, float* cpx, float* cpy, float* args, int rel)
  {
    // Ported from canvg (https://code.google.com/p/canvg/)
    float rx, ry, rotx;
    float x1, y1, x2, y2, cx, cy, dx, dy, d;
    float x1p, y1p, cxp, cyp, s, sa, sb;
    float ux, uy, vx, vy, a1, da;
    float x, y, tanx, tany, a, px = 0, py = 0, ptanx = 0, ptany = 0, t[6];
    float sinrx, cosrx;
    int fa, fs;
    int i, ndivs;
    float hda, kappa;
  
    rx = fabsf(args[0]);        // y radius
    ry = fabsf(args[1]);        // x radius
    rotx = args[2] * NSVG_PI_DEG;    // x rotation angle
    fa = fabsf(args[3]) > 1e-6 ? 1 : 0;  // Large arc
    fs = fabsf(args[4]) > 1e-6 ? 1 : 0;  // Sweep direction
    x1 = *cpx;              // start point
    y1 = *cpy;
    if (rel) {              // end point
      x2 = *cpx + args[5];
      y2 = *cpy + args[6];
    } else {
      x2 = args[5];
      y2 = args[6];
    }
    dx = x1 - x2;
    dy = y1 - y2;
  //  d = sqrtf(dx*dx + dy*dy);
    d = nsvg__vmag(dx, dy);
    if (d < 1e-6f || rx < 1e-6f || ry < 1e-6f) {
      // The arc degenerates to a line
      nsvg__lineTo(p, x2, y2);
      *cpx = x2;
      *cpy = y2;
      return;
    }
  
    sinrx = sinf(rotx);
    cosrx = cosf(rotx);
  
    // Convert to center point parameterization.
    // http://www.w3.org/TR/SVG11/implnote.html#ArcImplementationNotes
    // 1) Compute x1', y1'
    x1p = cosrx * dx / 2.0f + sinrx * dy / 2.0f;
    y1p = -sinrx * dx / 2.0f + cosrx * dy / 2.0f;
    d = nsvg__sqr(x1p)/nsvg__sqr(rx) + nsvg__sqr(y1p)/nsvg__sqr(ry);
    if (d > 1) {
      d = sqrtf(d);
      rx *= d;
      ry *= d;
    }
    // 2) Compute cx', cy'
    s = 0.0f;
    sa = nsvg__sqr(rx)*nsvg__sqr(ry) - nsvg__sqr(rx)*nsvg__sqr(y1p) - nsvg__sqr(ry)*nsvg__sqr(x1p);
    sb = nsvg__sqr(rx)*nsvg__sqr(y1p) + nsvg__sqr(ry)*nsvg__sqr(x1p);
    if (sa < 0.0f) sa = 0.0f;
    if (sb > 0.0f)
      s = sqrtf(sa / sb);
    if (fa == fs)
      s = -s;
    cxp = s * rx * y1p / ry;
    cyp = s * -ry * x1p / rx;
  
    // 3) Compute cx,cy from cx',cy'
    cx = (x1 + x2)/2.0f + cosrx*cxp - sinrx*cyp;
    cy = (y1 + y2)/2.0f + sinrx*cxp + cosrx*cyp;
  
    // 4) Calculate theta1, and delta theta.
    ux = (x1p - cxp) / rx;
    uy = (y1p - cyp) / ry;
    vx = (-x1p - cxp) / rx;
    vy = (-y1p - cyp) / ry;
    a1 = nsvg__vecang(1.0f,0.0f, ux,uy);  // Initial angle
    da = nsvg__vecang(ux,uy, vx,vy);    // Delta angle
  
    //  if (vecrat(ux,uy,vx,vy) <= -1.0f) da = NSVG_PI;
    //  if (vecrat(ux,uy,vx,vy) >= 1.0f) da = 0;
  
    if (fs == 0 && da > 0)
      da -= 2 * NSVG_PI;
    else if (fs == 1 && da < 0)
      da += 2 * NSVG_PI;
  
    // Approximate the arc using cubic spline segments.
    t[0] = cosrx; t[1] = sinrx;
    t[2] = -sinrx; t[3] = cosrx;
    t[4] = cx; t[5] = cy;
  
    // Split arc into max 90 degree segments.
    // The loop assumes an iteration per end point (including start and end), this +1.
    ndivs = (int)(fabsf(da) / (NSVG_PI * 0.5f) + 1.0f);
    if (ndivs > 6) ndivs = 6;
    hda = (da / (float)ndivs) * 0.5f;
    if ((hda < 1e-3f) && (hda > -1e-3f)) hda *= 0.5f;
    else hda = (1.0f - cosf(hda)) / sinf(hda);
    kappa = fabsf(4.0f / 3.0f * hda);
    if (da < 0.0f)
      kappa = -kappa;
  
    for (i = 0; i <= ndivs; i++) {
      a = a1 + da * ((float)i/(float)ndivs);
      dx = cosf(a);
      dy = sinf(a);
      nsvg__xformPoint(&x, &y, dx*rx, dy*ry, t); // position
      nsvg__xformVec(&tanx, &tany, -dy*rx * kappa, dx*ry * kappa, t); // tangent
      if (i > 0)
        nsvg__cubicBezTo(p, px+ptanx,py+ptany, x-tanx, y-tany, x, y);
      px = x;
      py = y;
      ptanx = tanx;
      ptany = tany;
    }
  
    *cpx = x2;
    *cpy = y2;
  }
  
  static void nsvg__parsePath(NSVGparser* p, const char** attr)
  {
    const char* s = NULL;
    char cmd = '\0';
    float args[30];
    int nargs;
    int rargs = 0;
    float cpx, cpy, cpx2, cpy2;
    //  const char* tmp[4];
    char closedFlag;
    int i;
    char item[kMaxIDLength];
  
    for (i = 0; attr[i]; i += 2) {
      if (strcmp(attr[i], "d") == 0) {
        s = attr[i + 1];
      } else {
        nsvg__parseAttr(p, attr[i], attr[i + 1]);
      }
    }
  
    if (s) {
      nsvg__resetPath(p);
      cpx = 0; cpy = 0;
      cpx2 = 0; cpy2 = 0;
      closedFlag = 0;
      nargs = 0;
      while (*s) {
        s = nsvg__getNextPathItem(s, item);
        if (!*item) break;
        if (nsvg__isnum(item[0])) {
          if (nargs < 30) {
            float x = (float)nsvg__atof(item);
            args[nargs++] = x;
          }
          if (nargs >= rargs) {
            switch (cmd) {
              case 'm':
              case 'M':
                nsvg__pathMoveTo(p, &cpx, &cpy, args, cmd == 'm' ? 1 : 0);
                // Moveto can be followed by multiple coordinate pairs,
                // which should be treated as linetos.
                cmd = (cmd == 'm') ? 'l' : 'L';
                rargs = nsvg__getArgsPerElement(cmd);
                cpx2 = cpx; cpy2 = cpy;
                break;
              case 'l':
              case 'L':
                nsvg__pathLineTo(p, &cpx, &cpy, args, cmd == 'l' ? 1 : 0);
                cpx2 = cpx; cpy2 = cpy;
                break;
              case 'H':
              case 'h':
                nsvg__pathHLineTo(p, &cpx, &cpy, args, cmd == 'h' ? 1 : 0);
                cpx2 = cpx; cpy2 = cpy;
                break;
              case 'V':
              case 'v':
                nsvg__pathVLineTo(p, &cpx, &cpy, args, cmd == 'v' ? 1 : 0);
                cpx2 = cpx; cpy2 = cpy;
                break;
              case 'C':
              case 'c':
                nsvg__pathCubicBezTo(p, &cpx, &cpy, &cpx2, &cpy2, args, cmd == 'c' ? 1 : 0);
                break;
              case 'S':
              case 's':
                nsvg__pathCubicBezShortTo(p, &cpx, &cpy, &cpx2, &cpy2, args, cmd == 's' ? 1 : 0);
                break;
              case 'Q':
              case 'q':
                nsvg__pathQuadBezTo(p, &cpx, &cpy, &cpx2, &cpy2, args, cmd == 'q' ? 1 : 0);
                break;
              case 'T':
              case 't':
                nsvg__pathQuadBezShortTo(p, &cpx, &cpy, &cpx2, &cpy2, args, cmd == 't' ? 1 : 0);
                break;
              case 'A':
              case 'a':
                nsvg__pathArcTo(p, &cpx, &cpy, args, cmd == 'a' ? 1 : 0);
                cpx2 = cpx; cpy2 = cpy;
                break;
              default:
                if (nargs >= 2) {
                  cpx = args[nargs-2];
                  cpy = args[nargs-1];
                  cpx2 = cpx; cpy2 = cpy;
                }
                break;
            }
            nargs = 0;
          }
        } else {
  
          cmd = item[0];
          rargs = nsvg__getArgsPerElement(cmd);
          if (cmd == 'M' || cmd == 'm') {
            if (p->npts > 0)
              nsvg__addPath(p, closedFlag);
            // Start new subpath.
            nsvg__resetPath(p);
            closedFlag = 0;
            nargs = 0;
          } else if (cmd == 'Z' || cmd == 'z') {
            closedFlag = 1;
            // Commit path.
            //    DBG("commit path, npts=%d\n", p->npts);
            if (p->npts > 0) {
              // Move current point to first point
              cpx = p->pts[0];
              cpy = p->pts[1];
              cpx2 = cpx; cpy2 = cpy;
              nsvg__addPath(p, closedFlag);
            }
            // Start new subpath.
            nsvg__resetPath(p);
            nsvg__moveTo(p, cpx, cpy);
            closedFlag = 0;
            nargs = 0;
          }
        }
      }
      // Commit path.
      if (p->npts)
        nsvg__addPath(p, closedFlag);
    }
  }
  
  static void nsvg__parseRect(NSVGparser* p, const char** attr)
  {
    float x = 0.0f;
    float y = 0.0f;
    float w = 0.0f;
    float h = 0.0f;
    float rx = -1.0f; // marks not set
    float ry = -1.0f;
    int i;
  
    for (i = 0; attr[i]; i += 2) {
      if (strcmp(attr[i], "x") == 0) x = nsvg__parseCoordinate(p, attr[i+1], nsvg__actualOrigX(p), nsvg__actualWidth(p));
      else if (strcmp(attr[i], "y") == 0) y = nsvg__parseCoordinate(p, attr[i+1], nsvg__actualOrigY(p), nsvg__actualHeight(p));
      else if (strcmp(attr[i], "width") == 0) w = nsvg__parseCoordinate(p, attr[i+1], 0.0f, nsvg__actualWidth(p));
      else if (strcmp(attr[i], "height") == 0) h = nsvg__parseCoordinate(p, attr[i+1], 0.0f, nsvg__actualHeight(p));
      else if (strcmp(attr[i], "rx") == 0) rx = fabsf(nsvg__parseCoordinate(p, attr[i+1], 0.0f, nsvg__actualWidth(p)));
      else if (strcmp(attr[i], "ry") == 0) ry = fabsf(nsvg__parseCoordinate(p, attr[i+1], 0.0f, nsvg__actualHeight(p)));
      else nsvg__parseAttr(p, attr[i], attr[i + 1]);
    }
  
    if (rx < 0.0f && ry > 0.0f) rx = ry;
    if (ry < 0.0f && rx > 0.0f) ry = rx;
    if (rx < 0.0f) rx = 0.0f;
    if (ry < 0.0f) ry = 0.0f;
    if (rx > w/2.0f) rx = w/2.0f;
    if (ry > h/2.0f) ry = h/2.0f;
  
    if (w != 0.0f && h != 0.0f) {
      nsvg__resetPath(p);
  
      if (rx < 0.00001f || ry < 0.0001f) {
        nsvg__moveTo(p, x, y);
        nsvg__lineTo(p, x+w, y);
        nsvg__lineTo(p, x+w, y+h);
        nsvg__lineTo(p, x, y+h);
      } else {
        // Rounded rectangle
        nsvg__moveTo(p, x+rx, y);
        nsvg__lineTo(p, x+w-rx, y);
        nsvg__cubicBezTo(p, x+w-rx*(1-NSVG_KAPPA90), y, x+w, y+ry*(1-NSVG_KAPPA90), x+w, y+ry);
        nsvg__lineTo(p, x+w, y+h-ry);
        nsvg__cubicBezTo(p, x+w, y+h-ry*(1-NSVG_KAPPA90), x+w-rx*(1-NSVG_KAPPA90), y+h, x+w-rx, y+h);
        nsvg__lineTo(p, x+rx, y+h);
        nsvg__cubicBezTo(p, x+rx*(1-NSVG_KAPPA90), y+h, x, y+h-ry*(1-NSVG_KAPPA90), x, y+h-ry);
        nsvg__lineTo(p, x, y+ry);
        nsvg__cubicBezTo(p, x, y+ry*(1-NSVG_KAPPA90), x+rx*(1-NSVG_KAPPA90), y, x+rx, y);
      }
      nsvg__addPath(p, 1);
      nsvg__addShape(p);
    }
  }
  
  static void nsvg__parseUse(NSVGparser* p, const char** dict)
  {
    NSVGattrib* attr = nsvg__getAttr(p);
    NSVGshape* shape = NULL;
    NSVGshape* ref = NULL;
    NSVGsymbol* refSym = NULL;
    int i;
  
    float x = 0.0f;
    float y = 0.0f;
    float xform[6];
  
    for (i = 0; dict[i]; i += 2) {
      if (strcmp(dict[i], "x") == 0) {
        x = nsvg__parseCoordinate(p, dict[i+1], nsvg__actualOrigX(p), nsvg__actualWidth(p));
      } else if (strcmp(dict[i], "y") == 0) {
        y = nsvg__parseCoordinate(p, dict[i+1], nsvg__actualOrigY(p), nsvg__actualHeight(p));
      } else if (strcmp(dict[i], "xlink:href") == 0) {
        const char *href = dict[i+1];
        refSym = p->symbols;
        while (refSym) {
          if (strcmp(refSym->id, href+1) == 0)
            break;
          refSym = refSym->next;
        }
        if (!refSym) {
          ref = p->image->shapes;
          while (ref) {
            if (strcmp(ref->id, href+1) == 0)
              break;
            ref = ref->next;
          }
        }
        if (!ref && !refSym) {
          return; // use without ref
        }
      } else {
        nsvg__parseAttr(p, dict[i], dict[i + 1]);
      }
    }
  
    if (refSym) {
      x -= refSym->viewBox[0];
      y -= refSym->viewBox[1];
    } else if (ref) {
      x -= ref->bounds[0];
      y -= ref->bounds[1];
    }
  
    nsvg__xformSetTranslation(&xform[0], x, y);
    nsvg__xformMultiply(&xform[0], attr->xform); //translate before rotate
  //  DumpFloat2("use xform", xform, 6);
  
    if (ref) {
      shape = (NSVGshape*)AllocateCopyPool(sizeof(NSVGshape), ref);
      if (!shape) return;
      memcpy(shape->xform, &xform[0], sizeof(float)*6);
      shape->isSymbol = FALSE;
      shape->link = ref;
      shape->group = attr->group;
      AsciiStrCatS(shape->id, 64, "_lnk");
      shape->bounds[0] = FLT_MAX;
      shape->bounds[1] = FLT_MAX;
      shape->bounds[2] = -FLT_MAX;
      shape->bounds[3] = -FLT_MAX;
      takeXformBounds(ref, &xform[0], shape->bounds);
  //    DumpFloat2("used shape has bounds", shape->bounds, 4);
    } else if (refSym) {
      shape = (NSVGshape*)AllocateZeroPool(sizeof(NSVGshape));
      if (!shape) return;
      memcpy(shape->xform, xform, sizeof(float)*6);
  //    nsvg__xformMultiply(shape->xform, &xform[0]);
      shape->isSymbol = TRUE;
      shape->link = refSym->shapes;
      shape->group = attr->group;
      AsciiStrCpyS(shape->id, 64, attr->id);
      shape->bounds[0] = FLT_MAX;
      shape->bounds[1] = FLT_MAX;
      shape->bounds[2] = -FLT_MAX;
      shape->bounds[3] = -FLT_MAX;
      NSVGshape* shapeInt = refSym->shapes;
      float xform2[6];
      while (shapeInt) {
        memcpy(&xform2[0], shape->xform, sizeof(float)*6);
        nsvg__xformPremultiply(&xform2[0], shapeInt->xform);
        takeXformBounds(shapeInt, &xform2[0], shape->bounds);
        shapeInt = shapeInt->next;
      }
  //    DumpFloat2("used symbol has bounds", shape->bounds, 4);
    }
  
    /* //there can't be own gradient
     //  DBG("paint type=%d\n", shape->fill.type);
     if (shape->fill.type == NSVG_PAINT_GRADIENT_LINK) {
     shape->fill.gradientLink = nsvg__createGradientLink(ref->fill.gradientLink->id);
     }
  
     if (shape->stroke.type == NSVG_PAINT_GRADIENT_LINK) {
     shape->stroke.gradientLink = nsvg__createGradientLink(ref->stroke.gradientLink->id);
     }
     */
  
    shape->next = NULL;
    shape->flags = NSVG_VIS_DISPLAY | NSVG_VIS_VISIBLE; //use always visible
  
    // Add to tail
    if (p->image->shapes == NULL)
      p->image->shapes = shape;
    else
      p->shapesTail->next = shape;
    p->shapesTail = shape;
  
  }
  
  
  static void nsvg__parseTextSpan(NSVGparser* p, const char** dict)
  {
    NSVGattrib* attr = nsvg__getAttr(p);
    NSVGtext* text = p->text;
    float x = 0.f, y = 0.f, r = 0.f;
    int i;
      DBG("parse textSpan\n");
    //there should be text->next with own attribs
    for (i = 0; dict[i]; i += 2) {
      if (strcmp(dict[i], "x") == 0) {
        x = nsvg__parseCoordinate(p, dict[i+1], nsvg__actualOrigX(p), nsvg__actualWidth(p));
        text->x = x;
  //            DBG("span posX=%s\n", PoolPrintFloat(x));
      } else if (strcmp(dict[i], "y") == 0) {
        y = nsvg__parseCoordinate(p, dict[i+1], nsvg__actualOrigY(p), nsvg__actualHeight(p));
        text->y = y;
  //            DBG("span posY=%s\n", PoolPrintFloat(y));
      } else if (strcmp(dict[i], "font-size") == 0)  {
        r = nsvg__parseCoordinate(p, dict[i+1], 0.0f, nsvg__actualHeight(p));
        text->fontSize = r;
  //            DBG("span fontSize=%s from=%a\n", PoolPrintFloat(r), dict[i+1]);
      } else if (strcmp(dict[i], "font-style") == 0)  {
  //      DBG("span: attr=%a value=%a\n", dict[i], dict[i+1]);
        if (strstr(dict[i+1], "italic") != NULL)  {
          text->fontStyle = 'i';
        } else if (strstr(dict[i+1], "bold") != NULL)  {
          text->fontStyle = 'b';
        } else {
          text->fontStyle = 'n';
        }
      } else {
        nsvg__parseAttr(p, dict[i], dict[i + 1]);
      }
    }
    if (attr->fontFace) {
      text->fontFace = attr->fontFace;
    }
    if (attr->hasFill == 1) {
      text->fontColor = attr->fillColor | ((int)(attr->fillOpacity * 255.f) << 24);
    }
    if (attr->hasStroke == 1) {
      text->strokeColor = attr->strokeColor | ((int)(attr->strokeOpacity * 255.f) << 24);
      text->strokeWidth = attr->strokeWidth;
    }
    if (text->fontStyle < 0x30) {
      text->fontStyle = 'n';
    }
  }
  
  //static int once = 0;
  //static int once2 = 0;
  
  static void nsvg__parseText(NSVGparser* p, const char** dict)
  {
    float x = 0.0f;
    float y = 0.0f;
    //float r = 0.0f;
    //  float xform[6];
  
    NSVGattrib* attr = nsvg__getAttr(p);
  
    int i;
    //  DBG("text found\n");
    NSVGtext* text = (NSVGtext*)AllocateZeroPool(sizeof(NSVGtext));
    if (!text) {
      return;
    }
    text->group = attr->group;
  
    for (i = 0; dict[i]; i += 2) {
      if (strcmp(dict[i], "x") == 0) {
        x = nsvg__parseCoordinate(p, dict[i+1], nsvg__actualOrigX(p), nsvg__actualWidth(p));
      } else if (strcmp(dict[i], "y") == 0) {
        y = nsvg__parseCoordinate(p, dict[i+1], nsvg__actualOrigY(p), nsvg__actualHeight(p));
      } else {
  //      DBG("%d: attr=%a value=%a\n", i, dict[i], dict[i+1]);
        nsvg__parseAttr(p, dict[i], dict[i + 1]);
      }
    }
  //  DBG("text: x=%s y=%s attr:Style=%x, size=%s, id=%a\n", PoolPrintFloat(x), PoolPrintFloat(y), attr->fontFace->fontStyle, PoolPrintFloat(attr->fontFace->fontSize), attr->id);
    text->x = x;
    text->y = y;
    text->fontSize = attr->fontFace->fontSize;
    text->fontStyle = attr->fontFace->fontStyle;
    memcpy(text->id, attr->id, 64);
    text->fontFace = attr->fontFace;
    if (attr->hasFill == 1) {
      text->fontColor = attr->fillColor | ((int)(attr->fillOpacity * 255.f) << 24);
    }
    if (attr->hasStroke == 1) {
      text->strokeColor = attr->strokeColor | ((int)(attr->strokeOpacity * 255.f) << 24);
      text->strokeWidth = attr->strokeWidth;
    }
  
    memcpy(text->xform, attr->xform, 6*sizeof(float));
    if (text->fontStyle < 0x30) {
      text->fontStyle = 'n';
    }
   // DBG("required font %a  required style=%c\n", text->fontFace->fontFamily, text->fontStyle);
    //if the font is not registered then we have to load new one
    NSVGfont        *fontSVG = fontsDB;
    while (fontSVG) {
  //        DBG("probe fontFamily=%a fontStyle=%c\n", fontSVG->fontFamily, fontSVG->fontStyle);
      if ((strcmp(fontSVG->fontFamily, text->fontFace->fontFamily) == 0)  &&
          (fontSVG->fontStyle == text->fontStyle)) {
  //            DBG("font %a found\n", fontSVG->fontFamily);
        break;
      }
      fontSVG = fontSVG->next;
    }
    if (!fontSVG) {  // font not found
      //then load it
      UINT8           *FileData = NULL;
      UINTN           FileDataLength = 0;
      NSVGparser      *p1 = NULL;
      EFI_STATUS      Status;
  //    DBG("required font %a not found, try to load external\n", text->fontFace->fontFamily);
      Status = egLoadFile(ThemeDir, PoolPrint(L"%a.svg", text->fontFace->fontFamily), &FileData, &FileDataLength);
  //    DBG("font %a loaded status=%r\n", text->fontFace->fontFamily, Status);
      if (!EFI_ERROR(Status)) {
        p1 = nsvgParse((CHAR8*)FileData, 72, 1.0f);
        if (!p1) {
          DBG("font %a not parsed\n", text->fontFace->fontFamily);
        } else {
          fontSVG = AllocateCopyPool(sizeof(NSVGfont), p1->font);
    //                DBG("font family %a parsed\n", fontSVG->fontFamily);
          fontSVG->next = fontsDB;
          fontsDB = fontSVG;
          text->font = fontSVG;
        }
        FreePool(FileData);
        FileData = NULL;
      } else {
        text->font = p->font; //else embedded if present
      }
    } else {
  //        DBG("set font for text %a\n", fontSVG->id);
      text->font = fontSVG;
    }
  
    //instead of embedded
    if (fontSVG && fontSVG->glyphs) {
      NSVGgroup* group = attr->group;
      while (group) {
        if (strcmp(group->id, "MessageRow") == 0) {
          if (!textFace[1].valid) {
            //here we want to set text->font as p->font if text->groupID == MessageRow
            p->font = fontSVG;
            p->fontSize = text->fontSize;
            p->fontColor = text->fontColor;
            textFace[1].font = fontSVG;
            textFace[1].size = (INTN)text->fontSize;
            textFace[1].color = text->fontColor;
            textFace[1].valid = TRUE;
    //        DBG("set message->font=%a color=%x size=%s as in MessageRow\n", fontSVG->fontFamily, text->fontColor, PoolPrintFloat(text->fontSize));
          }
          break;
        } else if (!DayLight && strcmp(group->id, "MessageRow_night") == 0) {
            //replace daylight settings
            p->font = fontSVG;
            p->fontSize = text->fontSize;
            p->fontColor = text->fontColor;
            textFace[1].font = fontSVG;
            textFace[1].size = (INTN)text->fontSize;
            textFace[1].color = text->fontColor;
            textFace[1].valid = TRUE;
     //              DBG("set message->font=%a color=%x size=%s as in MessageRow\n", fontSVG->fontFamily, text->fontColor, PoolPrintFloat(text->fontSize));
            break;
        } else if (strcmp(group->id, "MenuRows") == 0) {
          if (!textFace[2].valid) {
            textFace[2].font = fontSVG;
            textFace[2].size = (INTN)text->fontSize;
            textFace[2].color = text->fontColor;
            textFace[2].valid = TRUE;
    //        DBG("set menu->font=%a color=%x size=%s as in MenuRows\n", fontSVG->fontFamily, text->fontColor, PoolPrintFloat(text->fontSize));
          }
          break;
        } else if (!DayLight && strcmp(group->id, "MenuRows_night") == 0) {
            textFace[2].font = fontSVG;
            textFace[2].size = (INTN)text->fontSize;
            textFace[2].color = text->fontColor;
            textFace[2].valid = TRUE;
          break;
        } else if (strcmp(group->id, "HelpRows") == 0) {
          if (!textFace[0].valid) {
            textFace[0].font = fontSVG;
            textFace[0].size = (INTN)text->fontSize;
            textFace[0].color = text->fontColor;
            textFace[0].valid = TRUE;
   //         DBG("set help->font=%a color=%x size=%s as in HelpRows\n", fontSVG->fontFamily, text->fontColor, PoolPrintFloat(text->fontSize));
          }
          break;
        } else if (!DayLight && strstr(group->id, "HelpRows_night") != NULL) {
            textFace[0].font = fontSVG;
            textFace[0].size = (INTN)text->fontSize;
            textFace[0].color = text->fontColor;
            textFace[0].valid = TRUE;
       //               DBG("set help->font=%a color=%x size=%s as in HelpRows\n", fontSVG->fontFamily, text->fontColor, PoolPrintFloat(text->fontSize));
            break;
        }
        group = group->next;
      }
    }
    if (!text->font || !text->font->glyphs) {
      text->font = fontsDB;
    }
  
    //add to head
    text->next = p->text;
    p->text = text;
    p->isText = TRUE;
  }
  
  static void nsvg__parseCircle(NSVGparser* p, const char** attr)
  {
    float cx = 0.0f;
    float cy = 0.0f;
    float r = 0.0f;
    int i;
  
    for (i = 0; attr[i]; i += 2) {
      if (!nsvg__parseAttr(p, attr[i], attr[i + 1])) {
        if (strcmp(attr[i], "cx") == 0) cx = nsvg__parseCoordinate(p, attr[i+1], nsvg__actualOrigX(p), nsvg__actualWidth(p));
        else if (strcmp(attr[i], "cy") == 0) cy = nsvg__parseCoordinate(p, attr[i+1], nsvg__actualOrigY(p), nsvg__actualHeight(p));
        else if (strcmp(attr[i], "r") == 0) r = fabsf(nsvg__parseCoordinate(p, attr[i+1], 0.0f, nsvg__actualLength(p)));
      }
    }
  
    if (r > 0.0f) {
      nsvg__resetPath(p);
      nsvg__moveTo(p, cx+r, cy);
      nsvg__cubicBezTo(p, cx+r, cy+r*NSVG_KAPPA90, cx+r*NSVG_KAPPA90, cy+r, cx, cy+r);
      nsvg__cubicBezTo(p, cx-r*NSVG_KAPPA90, cy+r, cx-r, cy+r*NSVG_KAPPA90, cx-r, cy);
      nsvg__cubicBezTo(p, cx-r, cy-r*NSVG_KAPPA90, cx-r*NSVG_KAPPA90, cy-r, cx, cy-r);
      nsvg__cubicBezTo(p, cx+r*NSVG_KAPPA90, cy-r, cx+r, cy-r*NSVG_KAPPA90, cx+r, cy);
      nsvg__addPath(p, 1);
      nsvg__addShape(p);
    }
  }
  
  static void nsvg__parseEllipse(NSVGparser* p, const char** attr)
  {
    float cx = 0.0f;
    float cy = 0.0f;
    float rx = 0.0f;
    float ry = 0.0f;
    int i;
  
    for (i = 0; attr[i]; i += 2) {
      if (!nsvg__parseAttr(p, attr[i], attr[i + 1])) {
        if (strcmp(attr[i], "cx") == 0) cx = nsvg__parseCoordinate(p, attr[i+1], nsvg__actualOrigX(p), nsvg__actualWidth(p));
        else if (strcmp(attr[i], "cy") == 0) cy = nsvg__parseCoordinate(p, attr[i+1], nsvg__actualOrigY(p), nsvg__actualHeight(p));
        else if (strcmp(attr[i], "rx") == 0) rx = fabsf(nsvg__parseCoordinate(p, attr[i+1], 0.0f, nsvg__actualWidth(p)));
        else if (strcmp(attr[i], "ry") == 0) ry = fabsf(nsvg__parseCoordinate(p, attr[i+1], 0.0f, nsvg__actualHeight(p)));
      }
    }
  
    if (rx > 0.0f && ry > 0.0f) {
      nsvg__resetPath(p);
      nsvg__moveTo(p, cx+rx, cy);
      nsvg__cubicBezTo(p, cx+rx, cy+ry*NSVG_KAPPA90, cx+rx*NSVG_KAPPA90, cy+ry, cx, cy+ry);
      nsvg__cubicBezTo(p, cx-rx*NSVG_KAPPA90, cy+ry, cx-rx, cy+ry*NSVG_KAPPA90, cx-rx, cy);
      nsvg__cubicBezTo(p, cx-rx, cy-ry*NSVG_KAPPA90, cx-rx*NSVG_KAPPA90, cy-ry, cx, cy-ry);
      nsvg__cubicBezTo(p, cx+rx*NSVG_KAPPA90, cy-ry, cx+rx, cy-ry*NSVG_KAPPA90, cx+rx, cy);
      nsvg__addPath(p, 1);
      nsvg__addShape(p);
    }
  }
  
  static void nsvg__parseLine(NSVGparser* p, const char** attr)
  {
    float x1 = 0.0;
    float y1 = 0.0;
    float x2 = 0.0;
    float y2 = 0.0;
    int i;
  
    for (i = 0; attr[i]; i += 2) {
      if (!nsvg__parseAttr(p, attr[i], attr[i + 1])) {
        if (strcmp(attr[i], "x1") == 0) x1 = nsvg__parseCoordinate(p, attr[i + 1], nsvg__actualOrigX(p), nsvg__actualWidth(p));
        else if (strcmp(attr[i], "y1") == 0) y1 = nsvg__parseCoordinate(p, attr[i + 1], nsvg__actualOrigY(p), nsvg__actualHeight(p));
        else if (strcmp(attr[i], "x2") == 0) x2 = nsvg__parseCoordinate(p, attr[i + 1], nsvg__actualOrigX(p), nsvg__actualWidth(p));
        else if (strcmp(attr[i], "y2") == 0) y2 = nsvg__parseCoordinate(p, attr[i + 1], nsvg__actualOrigY(p), nsvg__actualHeight(p));
      }
    }
    nsvg__resetPath(p);
    nsvg__moveTo(p, x1, y1);
    nsvg__lineTo(p, x2, y2);
    nsvg__addPath(p, 0);
    nsvg__addShape(p);
  }
  
  static void nsvg__parsePoly(NSVGparser* p, const char** attr, int closeFlag)
  {
    int i;
    const char* s;
    float args[2];
    int nargs, npts = 0;
    char item[64];
  
    nsvg__resetPath(p);
  
    for (i = 0; attr[i]; i += 2) {
      if (!nsvg__parseAttr(p, attr[i], attr[i + 1])) {
        if (strcmp(attr[i], "points") == 0) {
          s = attr[i + 1];
          nargs = 0;
          while (*s) {
            s = nsvg__getNextPathItem(s, item);
            args[nargs++] = (float)nsvg__atof(item);
            if (nargs >= 2) {
              if (npts == 0)
                nsvg__moveTo(p, args[0], args[1]);
              else
                nsvg__lineTo(p, args[0], args[1]);
              nargs = 0;
              npts++;
            }
          }
        }
      }
    }
  
    nsvg__addPath(p, (char)closeFlag);
  
    nsvg__addShape(p);
  }
  
  /* Slice - I dont know what it should be
   static void nsvg__parseIMAGE(NSVGparser* p, const char** attr)
   {
   float x = 0.0f;
   float y = 0.0f;
   float w = 0.0f;
   float h = 0.0f;
   int i;
   const char *href = NULL;
  
   for (i = 0; attr[i]; i += 2) {
   if (!nsvg__parseAttr(p, attr[i], attr[i + 1])) {
   if (strcmp(attr[i], "x") == 0) {
   x = nsvg__parseCoordinate(p, attr[i+1], nsvg__actualOrigX(p), nsvg__actualWidth(p));
   } else
   if (strcmp(attr[i], "y") == 0) {
   y = nsvg__parseCoordinate(p, attr[i+1], nsvg__actualOrigY(p), nsvg__actualHeight(p));
   } else
   if (strcmp(attr[i], "width") == 0) {
   w = nsvg__parseCoordinate(p, attr[i+1], 0.0f, nsvg__actualWidth(p));
   } else
   if (strcmp(attr[i], "height") == 0) {
   h = nsvg__parseCoordinate(p, attr[i+1], 0.0f, nsvg__actualHeight(p));
   } else
   if (strcmp(attr[i], "xlink:href") == 0) {
   href = attr[i+1];
   }
   }
   }
  
   if (w != 0.0f && h != 0.0f) {
   nsvg__resetPath(p);
  
   NSVGattrib* attr = nsvg__getAttr(p);
   float scale = 1.0f;
   NSVGshape *shape, *cur, *prev;
  
   if (href == NULL)
   return;
  
   shape = (NSVGshape*)AllocateZeroPool(sizeof(NSVGshape));
   if (shape == NULL) return;
  
   memcpy(shape->id, attr->id, sizeof shape->id);
   memcpy(shape->title, attr->title, sizeof shape->title);
   //    DBG("shapeID=%a\n", shape->id);
   shape->group = attr->group;
   scale = nsvg__getAverageScale(attr->xform);
   shape->opacity = attr->opacity;
   shape->image_href = href;
   p->plist = NULL;
  
   shape->bounds[0] = x;
   shape->bounds[1] = y;
   shape->bounds[2] = x+w;
   shape->bounds[3] = y+h;
  
   nsvg__xformIdentity(shape->xform);
  
   // Set flags
   shape->flags = (attr->visible ? NSVG_VIS_DISPLAY | NSVG_VIS_VISIBLE : 0x00);
  
   // Add to tail
   prev = NULL;
   cur = p->image->shapes;
   while (cur != NULL) {
   prev = cur;
   cur = cur->next;
   }
   if (prev == NULL)
   p->image->shapes = shape;
   else
   prev->next = shape;
  
   return;
   }
   }
   */
  
  //parse embedded PNG image
  static void parseImage(NSVGparser* p, const char** dict)
  {
    //  NSVGattrib* attr = nsvg__getAttr(p);
    NSVGpattern *pt = NULL;
    int i;
    UINTN len = 0;
    //float w,h;
    const char *href = NULL;
    UINT8 *tmpData = NULL;
    EG_IMAGE *NewImage = NULL;
  
    for (i = 0; dict[i]; i += 2) {
      if (strcmp(dict[i], "width") == 0) {
        /*w =*/ nsvg__parseCoordinate(p, dict[i+1], 0.0f, nsvg__actualWidth(p));
      } else if (strcmp(dict[i], "height") == 0) {
        /*h =*/ nsvg__parseCoordinate(p, dict[i+1], 0.0f, nsvg__actualHeight(p));
      } else if (strcmp(dict[i], "xlink:href") == 0) {
        href = dict[i+1];
      } else {
        nsvg__parseAttr(p, dict[i], dict[i + 1]);
      }
    }
    if (!href || (strstr(href, "data:image/png;") == NULL)) {
      return;
    }
    href = strstr(href, "base64,") + 7;
    if (p->patternFlag) {
      pt = p->patterns; //the last one
    }
    tmpData = (UINT8 *)Base64DecodeClover((char*)href, &len);
    if (len == 0) {
      DBG("image not decoded from base64\n");
    }
    NewImage = egDecodePNG(tmpData, len, TRUE);
    pt->image = (void *)NewImage;
    if (tmpData) {
      FreePool(tmpData);
    }
  }
  
  static void parsePattern(NSVGparser* p, const char** dict)
  {
    NSVGattrib* attr = nsvg__getAttr(p);
    int i;
    float w = 0.f, h=0.f;
    NSVGpattern *pt;
  
    for (i = 0; dict[i]; i += 2) {
      if (strcmp(dict[i], "width") == 0) {
        w = nsvg__parseCoordinate(p, dict[i+1], 0.0f, nsvg__actualWidth(p));
      } else if (strcmp(dict[i], "height") == 0) {
        h = nsvg__parseCoordinate(p, dict[i+1], 0.0f, nsvg__actualHeight(p));
      } else {
        nsvg__parseAttr(p, dict[i], dict[i + 1]);
      }
    }
  
    pt = AllocateZeroPool(sizeof(NSVGpattern));
    AsciiStrCpyS(pt->id, 64, attr->id);
    pt->width = w;
    pt->height = h;
    pt->next = p->patterns;
    p->patterns = pt;
  }
  
  static void nsvg__parseSVG(NSVGparser* p, const char** attr)
  {
    int i;
    for (i = 0; attr[i]; i += 2) {
      if (!nsvg__parseAttr(p, attr[i], attr[i + 1])) {
        if (strcmp(attr[i], "width") == 0) {
          p->image->width = nsvg__parseCoordinate(p, attr[i + 1], 0.0f, 0.0f);
        } else if (strcmp(attr[i], "height") == 0) {
          p->image->height = nsvg__parseCoordinate(p, attr[i + 1], 0.0f, 0.0f);
        } else if (strcmp(attr[i], "viewBox") == 0) {
          char* Next = 0;
          AsciiStrToFloat(attr[i + 1], &Next, &p->viewMinx);
          AsciiStrToFloat((const char*)Next, &Next, &p->viewMiny);
          AsciiStrToFloat((const char*)Next, &Next, &p->viewWidth);
          AsciiStrToFloat((const char*)Next, &Next, &p->viewHeight);
        } else if (strcmp(attr[i], "preserveAspectRatio") == 0) {
          if (strstr(attr[i + 1], "none") != 0) {
            // No uniform scaling
            p->alignType = NSVG_ALIGN_NONE;
          } else {
            // Parse X align
            if (strstr(attr[i + 1], "xMin") != 0)
              p->alignX = NSVG_ALIGN_MIN;
            else if (strstr(attr[i + 1], "xMid") != 0)
              p->alignX = NSVG_ALIGN_MID;
            else if (strstr(attr[i + 1], "xMax") != 0)
              p->alignX = NSVG_ALIGN_MAX;
            // Parse X align
            if (strstr(attr[i + 1], "yMin") != 0)
              p->alignY = NSVG_ALIGN_MIN;
            else if (strstr(attr[i + 1], "yMid") != 0)
              p->alignY = NSVG_ALIGN_MID;
            else if (strstr(attr[i + 1], "yMax") != 0)
              p->alignY = NSVG_ALIGN_MAX;
            // Parse meet/slice
            p->alignType = NSVG_ALIGN_MEET;
            if (strstr(attr[i + 1], "slice") != 0)
              p->alignType = NSVG_ALIGN_SLICE;
          }
        }
      }
    }
  }
  
  static void nsvg__parseGradient(NSVGparser* p, const char** attr, char type)
  {
    int i;
    NSVGgradientData* grad = (NSVGgradientData*)AllocateZeroPool(sizeof(NSVGgradientData));
    if (grad == NULL) return;
    //defaults
    grad->units = NSVG_USER_SPACE; //NSVG_OBJECT_SPACE;
    grad->type = type;
    grad->ditherCoarse = 0; //default value
    if (grad->type == NSVG_PAINT_LINEAR_GRADIENT) {
      grad->direction.linear.x1 = nsvg__coord(0.0f, NSVG_UNITS_PERCENT);
      grad->direction.linear.y1 = nsvg__coord(0.0f, NSVG_UNITS_PERCENT);
      grad->direction.linear.x2 = nsvg__coord(100.0f, NSVG_UNITS_PERCENT);
      grad->direction.linear.y2 = nsvg__coord(100.0f, NSVG_UNITS_PERCENT);
    } else if (grad->type == NSVG_PAINT_RADIAL_GRADIENT) {
      grad->direction.radial.cx = nsvg__coord(50.0f, NSVG_UNITS_PERCENT);
      grad->direction.radial.cy = nsvg__coord(50.0f, NSVG_UNITS_PERCENT);
      grad->direction.radial.r = nsvg__coord(50.0f, NSVG_UNITS_PERCENT);
    } else if (grad->type == NSVG_PAINT_CONIC_GRADIENT) {
      grad->direction.radial.cx = nsvg__coord(50.0f, NSVG_UNITS_PERCENT);
      grad->direction.radial.cy = nsvg__coord(50.0f, NSVG_UNITS_PERCENT);
      grad->direction.radial.r = nsvg__coord(50.0f, NSVG_UNITS_PERCENT);
    }
  
    nsvg__xformIdentity(grad->xform);
  
    for (i = 0; attr[i]; i += 2) {
      if (strcmp(attr[i], "xml:id") == 0) {
        //      DBG("xml:id ?\n");
        strncpy(grad->id, attr[i+1], 63);
        grad->id[63] = '\0';
      } else if (strcmp(attr[i], "id") == 0) {
        strncpy(grad->id, attr[i+1], 63);
        grad->id[63] = '\0';
      } else if (!nsvg__parseAttr(p, attr[i], attr[i + 1])) {
        if (strcmp(attr[i], "gradientUnits") == 0) {
          if (strcmp(attr[i+1], "objectBoundingBox") == 0)
            grad->units = NSVG_OBJECT_SPACE;
          else
            grad->units = NSVG_USER_SPACE;
        } else if (strcmp(attr[i], "gradientTransform") == 0) {
          nsvg__parseTransform(grad->xform, attr[i + 1]);
        } else if (strcmp(attr[i], "cx") == 0) {
          grad->direction.radial.cx = nsvg__parseCoordinateRaw(attr[i + 1]);
        } else if (strcmp(attr[i], "cy") == 0) {
          grad->direction.radial.cy = nsvg__parseCoordinateRaw(attr[i + 1]);
        } else if (strcmp(attr[i], "r") == 0) {
          grad->direction.radial.r = nsvg__parseCoordinateRaw(attr[i + 1]);
        } else if (strcmp(attr[i], "fx") == 0) {
          grad->direction.radial.fx = nsvg__parseCoordinateRaw(attr[i + 1]);
        } else if (strcmp(attr[i], "fy") == 0) {
          grad->direction.radial.fy = nsvg__parseCoordinateRaw(attr[i + 1]);
        } else if (strcmp(attr[i], "x1") == 0) {
          grad->direction.linear.x1 = nsvg__parseCoordinateRaw(attr[i + 1]);
        } else if (strcmp(attr[i], "y1") == 0) {
          grad->direction.linear.y1 = nsvg__parseCoordinateRaw(attr[i + 1]);
        } else if (strcmp(attr[i], "x2") == 0) {
          grad->direction.linear.x2 = nsvg__parseCoordinateRaw(attr[i + 1]);
        } else if (strcmp(attr[i], "y2") == 0) {
          grad->direction.linear.y2 = nsvg__parseCoordinateRaw(attr[i + 1]);
        } else if (strcmp(attr[i], "clover:ditherCoarse") == 0) {
          grad->ditherCoarse = getIntegerDict(attr[i + 1]);
        } else if (strcmp(attr[i], "clover:conic") == 0) {
          int conic = getIntegerDict(attr[i + 1]);
          if (conic > 0) {
            grad->type = NSVG_PAINT_CONIC_GRADIENT;
          }
        } else if (strcmp(attr[i], "spreadMethod") == 0) {
          if (strcmp(attr[i+1], "pad") == 0)
            grad->spread = NSVG_SPREAD_PAD;
          else if (strcmp(attr[i+1], "reflect") == 0)
            grad->spread = NSVG_SPREAD_REFLECT;
          else if (strcmp(attr[i+1], "repeat") == 0)
            grad->spread = NSVG_SPREAD_REPEAT;
        } else if (strcmp(attr[i], "xlink:href") == 0) {
          const char *href = attr[i+1];
          strncpy(grad->ref, href+1, 62);
          grad->ref[62] = '\0';
        }
      }
    }
  
    grad->next = p->gradients;
    p->gradients = grad;
  }
  
  static void nsvg__parseGradientStop(NSVGparser* p, const char** dict)
  {
    NSVGattrib* curAttr = nsvg__getAttr(p);
    NSVGgradientData* grad;
    NSVGgradientStop* stop;
    int i, idx = 0, nsize;
  
    curAttr->stopOffset = 0.f;
    curAttr->stopColor = 0;
    curAttr->stopOpacity = 1.0f;
  
    for (i = 0; dict[i]; i += 2) {
      nsvg__parseAttr(p, dict[i], dict[i + 1]);
    }
  
    // Add stop to the last gradient.
    grad = p->gradients;
    if (grad == NULL) return;
  
    nsize = sizeof(NSVGgradientStop) * grad->nstops;
    if (nsize == 0) {
      grad->stops = (NSVGgradientStop*)AllocatePool(sizeof(NSVGgradientStop));
      grad->nstops = 1;
    } else {
      grad->nstops++;
      grad->stops = (NSVGgradientStop*)ReallocatePool(nsize, sizeof(NSVGgradientStop)*grad->nstops, grad->stops);
    }
    if (grad->stops == NULL) return;
  
    // Insert
    idx = grad->nstops-1;
    for (i = 0; i < grad->nstops-1; i++) {
      if (curAttr->stopOffset < grad->stops[i].offset) {
        idx = i;
        break;
      }
    }
    if (idx != grad->nstops-1) {
      for (i = grad->nstops-1; i > idx; i--)
        memcpy(&grad->stops[i], &grad->stops[i-1], sizeof(NSVGgradientStop));
    }
  
    stop = &grad->stops[idx];
    stop->color = ((unsigned int)(curAttr->stopOpacity*255) << 24) | curAttr->stopColor;
    stop->offset = curAttr->stopOffset;
  }
  
  static void nsvg__parseSymbol(NSVGparser* p, const char** dict)
  {
    NSVGsymbol* symbol;
    NSVGattrib* curAttr = nsvg__getAttr(p);
    int i;
    symbol = (NSVGsymbol*)AllocateZeroPool(sizeof(NSVGsymbol));
    for (i = 0; dict[i]; i += 2) {
      if (strcmp(dict[i], "viewBox") == 0) {
        char* Next = 0;
        AsciiStrToFloat(dict[i + 1], &Next, &symbol->viewBox[0]);
        AsciiStrToFloat((const char*)Next, &Next, &symbol->viewBox[1]);
        AsciiStrToFloat((const char*)Next, &Next, &symbol->viewBox[2]);
        AsciiStrToFloat((const char*)Next, &Next, &symbol->viewBox[3]);
      } else nsvg__parseAttr(p, dict[i], dict[i + 1]);
    }
    AsciiStrCpyS(symbol->id, 64, curAttr->id);
  //  memcpy(symbol->xform, curAttr->xform, 6*sizeof(float));
    symbol->next = p->symbols;
    p->symbols = symbol;
  }
  
  static void nsvg__parseGroup(NSVGparser* p, const char** dict)
  {
    NSVGgroup* group;
    NSVGattrib* oldAttr = nsvg__getAttr(p);
    nsvg__pushAttr(p);
    NSVGattrib* curAttr = nsvg__getAttr(p);
    int i;
    int visSet = 0;
    if (!curAttr) {
      return;
    }
    //  DBG("parse group\n");
    group = (NSVGgroup*)AllocateZeroPool(sizeof(NSVGgroup));
  
    //  if (curAttr->id[0] == '\0') //skip anonymous groups
    //    return;
    for (i = 0; dict[i]; i += 2) {
      if (strcmp(dict[i], "visibility") == 0) {
        visSet = 1;
        if (strcmp(dict[i+1], "hidden") == 0) {
          group->visibility &= ~NSVG_VIS_VISIBLE;
        } else if (strcmp(dict[i+1], "visible") == 0) {
          group->visibility |= NSVG_VIS_VISIBLE;
        }
      } else nsvg__parseAttr(p, dict[i], dict[i + 1]);
    }
    AsciiStrCpyS(group->id, 64, curAttr->id);
    //  DBG("parsed groupID=%a\n", group->id);
  
    if (oldAttr != NULL) {
      group->next = oldAttr->group;
    }
    curAttr->group = group;
  
    if (!visSet) {
      if (group->next != NULL) {
        group->visibility = group->next->visibility;
      } else {
        group->visibility = NSVG_VIS_VISIBLE;
      }
    }
  }
  
  //parse Clover settings for theme
  static void parseTheme(NSVGparser* p, const char** dict)
  {
    int i;
    BOOLEAN found = FALSE;
    UINT32 Color = 0x80808080; //default value
    for (i = 0; dict[i]; i += 2) {
      if (strcmp(dict[i], "SelectionOnTop") == 0) {
        GlobalConfig.SelectionOnTop = getIntegerDict(dict[i+1])>0;    } else if (strcmp(dict[i], "BadgeOffsetX") == 0) {
        GlobalConfig.BadgeOffsetX = getIntegerDict(dict[i + 1]);
      } else if (strcmp(dict[i], "BadgeOffsetY") == 0) {
        GlobalConfig.BadgeOffsetY = getIntegerDict(dict[i + 1]);
      } else if (strcmp(dict[i], "NonSelectedGrey") == 0) {
        GlobalConfig.NonSelectedGrey = getIntegerDict(dict[i + 1])>0;    } else if (strcmp(dict[i], "CharWidth") == 0) {
        GlobalConfig.CharWidth = getIntegerDict(dict[i + 1]);
      } else if (strcmp(dict[i], "BackgroundDark") == 0) {
        GlobalConfig.BackgroundDark = getIntegerDict(dict[i + 1])>0;    } else if (strcmp(dict[i], "BackgroundSharp") == 0) {
        GlobalConfig.BackgroundSharp = getIntegerDict(dict[i + 1]);
      } else if (strcmp(dict[i], "BackgroundScale") == 0) {
        GlobalConfig.BackgroundScale = imNone;
        if (strstr(dict[i+1], "scale") != NULL)  {
          GlobalConfig.BackgroundScale = imScale;
        }
        if (strstr(dict[i+1], "crop") != NULL)  {
          GlobalConfig.BackgroundScale = imCrop;
        }
        if (strstr(dict[i+1], "tile") != NULL)  {
          GlobalConfig.BackgroundScale = imTile;
        }
  
      } else if (strcmp(dict[i], "Badges") == 0) {
        GlobalConfig.HideBadges = 0;
        if (strstr(dict[i+1], "show") != NULL)  {
          GlobalConfig.HideBadges |= HDBADGES_SHOW;
        }
        if (strstr(dict[i+1], "swap") != NULL)  {
          GlobalConfig.HideBadges |= HDBADGES_SWAP;
        }
        if (strstr(dict[i+1], "inline") != NULL)  {
          GlobalConfig.HideBadges |= HDBADGES_INLINE;
        }
      } else if (strcmp(dict[i], "BadgeScale") == 0) {
        GlobalConfig.BadgeScale = getIntegerDict(dict[i + 1]);
      } else if (strcmp(dict[i], "SelectionColor") == 0) {
        Color = getIntegerDict(dict[i + 1]);
        if (DayLight) {
          GlobalConfig.SelectionColor = Color;
        }
      } else if (strcmp(dict[i], "SelectionColor_night") == 0) {
        found = TRUE;
        if (!DayLight) {
          GlobalConfig.SelectionColor = getIntegerDict(dict[i + 1]);
        }
      } else if (strcmp(dict[i], "VerticalLayout") == 0) {
        GlobalConfig.VerticalLayout = getIntegerDict(dict[i + 1])>0;
  
      } else if (strcmp(dict[i], "BootCampStyle") == 0) {
        GlobalConfig.BootCampStyle = getIntegerDict(dict[i + 1])>0;
  
      } else if (strcmp(dict[i], "AnimeFrames") == 0) {
        NumFrames = getIntegerDict(dict[i + 1]);
        if (NumFrames == 0xFFFF) {
          NumFrames = 0;
        }
      } else if (strcmp(dict[i], "FrameTime") == 0) {
        FrameTime = getIntegerDict(dict[i + 1]);
  
      } else nsvg__parseAttr(p, dict[i], dict[i + 1]);
    }
    if (!found) {
      GlobalConfig.SelectionColor = Color;
    }
  }
  
  // parse embedded font
  static void nsvg__parseFont(NSVGparser* p, const char** dict)
  {
    int i;
    NSVGfont* font;
    NSVGattrib* curAttr = nsvg__getAttr(p);
    if (!curAttr) {
      return;
    }
  
    font = (NSVGfont*)AllocateZeroPool(sizeof(NSVGfont));
  
    for (i = 0; dict[i]; i += 2) {
      if (strcmp(dict[i], "horiz-adv-x") == 0) {
        font->horizAdvX = (int)AsciiStrDecimalToUintn(dict[i+1]);
      } else
        if (strcmp(dict[i], "font-family") == 0) { //usually absent here
          AsciiStrCpyS(font->fontFamily, 64, dict[i+1]);
        }
        else nsvg__parseAttr(p, dict[i], dict[i + 1]);
    }
  
    AsciiStrCpyS(font->id, 64, curAttr->id);
    if (!font->horizAdvX) {
      font->horizAdvX = 1000;
    }
  //  DBG("found font id=%a\n", font->id);
  
    p->font = font;
    font->next = fontsDB;
    fontsDB = font;
  }
  
  static void nsvg__parseFontFace(NSVGparser* p, const char** dict)
  {
    int i;
    if (!p) {
      DBG("no parser\n");
      return;
    }
    NSVGfont* font = p->font;
  //  DBG("begin parse font face, font->id=%a\n", font->id);
    for (i = 0; dict[i]; i += 2) {
      if (strcmp(dict[i], "font-family") == 0) {
        AsciiStrCpyS(font->fontFamily, 64, dict[i+1]);
        //        DBG("font-family %a\n", font->fontFamily);
      }
      else if (strcmp(dict[i], "font-weight") == 0) {
        float fontWeight = 0.0f;
        AsciiStrToFloat(dict[i+1], NULL /*&Next*/, &fontWeight);
        font->fontWeight = fontWeight;
      }
      else if (strcmp(dict[i], "font-style") == 0) {
        if (strstr(dict[i+1], "italic") != NULL)  {
          font->fontStyle = 'i';
        } else if (strstr(dict[i+1], "bold") != NULL)  {
          font->fontStyle = 'b';
        } else {
          font->fontStyle = 'n';
        }
      }
      else if (strcmp(dict[i], "units-per-em") == 0) {
        float unitsPerEm = 0.0f;
        AsciiStrToFloat(dict[i+1], NULL /*&Next*/, &unitsPerEm);
        font->unitsPerEm = unitsPerEm;
      }
      else if (strcmp(dict[i], "ascent") == 0) {
        font->ascent = (int)AsciiStrDecimalToUintn(dict[i+1]);
      }
      else if (strcmp(dict[i], "descent") == 0) {
        font->descent = (int)AsciiStrDecimalToUintn(dict[i+1]);
      }
      else if (strcmp(dict[i], "x-height") == 0) {
        font->xHeight = (int)AsciiStrDecimalToUintn(dict[i+1]);
      }
      else if (strcmp(dict[i], "cap-height") == 0) {
        font->capHeight = (int)AsciiStrDecimalToUintn(dict[i+1]);
      }
      else if (strcmp(dict[i], "underline-thickness") == 0) {
        font->underlineThickness = (int)AsciiStrDecimalToUintn(dict[i+1]);
      }
      else if (strcmp(dict[i], "underline-position") == 0) {
        font->underlinePosition = (int)AsciiStrDecimalToUintn(dict[i+1]);
      }
      else if (strcmp(dict[i], "slope") == 0) {
        font->slope = (int)AsciiStrDecimalToUintn(dict[i+1]);
      }
      else if (strcmp(dict[i], "bbox") == 0) {
        char* Next = 0;
        AsciiStrToFloat(dict[i + 1], &Next, &font->bbox[0]);
        AsciiStrToFloat((const char*)Next, &Next, &font->bbox[1]);
        AsciiStrToFloat((const char*)Next, &Next, &font->bbox[2]);
        AsciiStrToFloat((const char*)Next, &Next, &font->bbox[3]);
  //      DumpFloat2("font bbox=", font->bbox, 4);
      }
      else if (strcmp(dict[i], "unicode-range") == 0) {
        const char * a = dict[i + 1];
        if (*a == 'U') {
          font->unicodeRange[0] = (int)AsciiStrHexToUintn(a+2);
          font->unicodeRange[1] = (int)AsciiStrHexToUintn(a+7);
        }
      } else nsvg__parseAttr(p, dict[i], dict[i + 1]);
  
    }
    if (font->unitsPerEm < 1.f) {
      font->unitsPerEm = 1000.f;
    }
    if ((font->bbox[3] - font->bbox[1]) < 1.) {
      font->bbox[0] = 0;
      font->bbox[1] = 0;
      font->bbox[2] = font->unitsPerEm;
      font->bbox[3] = font->unitsPerEm;
    }
    if (font->fontWeight < 1.f) {
      font->fontWeight = font->unitsPerEm;
    }
    if (font->fontStyle < 0x30) {
      font->fontStyle = 'n';
    }
  }
  
  CHAR16 nsvg__parseUnicode(const char *s)
  {
    CHAR16 A = L'\0';
    if (*s != '&') {
      if (strlen(s) == 2) {
        A = (*s << 8) + *(s+1);
      } else {
        A = *s;
      }
    } else if (strstr(s, "&#x") !=0 ) {
      s += 3;
      while (IS_HEX(*s) || IS_DIGIT(*s)) {
        A <<= 4;
        if (IS_DIGIT(*s)) {
          A += *s - 0x30;
        } else if (IS_UPPER(*s)) {
          A += *s - 0x41 + 10;
        } else {
          A += *s - 0x61 + 10;
        }
        s++;
      }
    } else if (strstr(s, "&amp;") !=0 ) {
      A = 0x26; //&
    } else if (strstr(s, "&quot;") !=0 ) {
      A = 0x22; //"
    } else if (strstr(s, "&lt;") !=0 ) {
      A = 0x3C; //<
    } else if (strstr(s, "&gt;") !=0 ) {
      A = 0x3E; //>
    } else if (strstr(s, "&nbsp;") !=0 ) {
      A = 0xA0; //>
    } else if (strstr(s, "&copy;") !=0 ) {
      A = 0xA9; //>
    }
    return A;
  }
  
  static void nsvg__parseGlyph(NSVGparser* p, const char** dict, BOOLEAN missing)
  {
    //glyph-name="E_d" unicode="Ed" horiz-adv-x="1289" d="M679 ..."/>
    /*
     typedef struct NSVGglyph {
       char name[16];
       CHAR16 unicode;
       int horizAdvX;
       NSVGpath* path;
       struct NSVGglyph *next;
     } NSVGglyph;
     */
    int i;
    NSVGglyph *glyph;
    if (!p) {
      return;
    }
  
    p->plist = NULL;
  
    glyph = (NSVGglyph*)AllocateZeroPool(sizeof(NSVGglyph));
    if (!glyph) {
      return;
    }
    for (i = 0; dict[i]; i += 2) {
      if (!nsvg__parseAttr(p, dict[i], dict[i + 1])) {
        if (strcmp(dict[i], "unicode") == 0) {
          glyph->unicode = nsvg__parseUnicode(dict[i+1]);
        } else if (strcmp(dict[i], "horiz-adv-x") == 0) {
          glyph->horizAdvX = (int)AsciiStrDecimalToUintn(dict[i+1]);
        } else if (strcmp(dict[i], "glyph-name") == 0) {
          strncpy(glyph->name, dict[i+1], 16);
          glyph->name[15] = '\0';
          if (strcmp(dict[i+1], "nonmarkingreturn") == 0) {
            glyph->unicode = L'\n';
          } else if (strcmp(dict[i+1], ".notdef") == 0) {
            missing = TRUE;
          }
        }
      }
    }
    nsvg__parsePath(p, dict);
  
    glyph->path = p->plist;
    p->plist = 0; //lastPath;
  
    if (p->font) {
      if (missing) {
        p->font->missingGlyph = glyph;
        if (!glyph->horizAdvX && p->font->horizAdvX) {
          p->font->missingGlyph->horizAdvX = p->font->horizAdvX;
        }
      } else {
        if (!glyph->horizAdvX) {
          if (p->font->missingGlyph) {
            glyph->horizAdvX = p->font->missingGlyph->horizAdvX;
          } else if (p->font->horizAdvX) {
            glyph->horizAdvX = p->font->horizAdvX;
          }
        }
        glyph->next = p->font->glyphs;
        p->font->glyphs = glyph;
      }
    }
    //  DBG("glyph %x parsed\n", glyph->unicode);
  }
  
  static void nsvg__startElement(void* ud, const char* el, const char** dict)
  {
    NSVGparser* p = (NSVGparser*)ud;
    if (!p) {
      return;
    }
  
    if (strcmp(el, "linearGradient") == 0) {
      nsvg__parseGradient(p, dict, NSVG_PAINT_LINEAR_GRADIENT);
    } else if (strcmp(el, "radialGradient") == 0) {
      nsvg__parseGradient(p, dict, NSVG_PAINT_RADIAL_GRADIENT);
    } else if (strcmp(el, "conicGradient") == 0) {
      nsvg__parseGradient(p, dict, NSVG_PAINT_CONIC_GRADIENT);
    } else if (strcmp(el, "stop") == 0) {
      nsvg__parseGradientStop(p, dict);
    } else if (strcmp(el, "font") == 0) {
      nsvg__parseFont(p, dict);
    } else if (strcmp(el, "font-face") == 0) {
      nsvg__parseFontFace(p, dict);
    } else if (strcmp(el, "missing-glyph") == 0) {
      nsvg__parseGlyph(p, dict, TRUE);
    } else if (strcmp(el, "glyph") == 0) {
      nsvg__parseGlyph(p, dict, FALSE);
    } else if (strcmp(el, "style") == 0) {
      p->styleFlag = 1;
    } else if (strcmp(el, "g") == 0) {
      //    nsvg__pushAttr(p);
      nsvg__parseGroup(p, dict);
    } else if (strcmp(el, "text") == 0) {
      nsvg__pushAttr(p);
      p->isText = 1;
      nsvg__parseText(p, dict);
    } else if (strcmp(el, "tspan") == 0) {
      nsvg__pushAttr(p);
      nsvg__parseTextSpan(p, dict);
      nsvg__popAttr(p);
    } else if (strcmp(el, "path") == 0) {
      if (p->pathFlag)  {  // Do not allow nested paths.
        return;
      }
      nsvg__pushAttr(p);
      p->pathFlag = 1;
      p->shapeFlag = 1;
      nsvg__parsePath(p, dict);
      nsvg__addShape(p);
      nsvg__popAttr(p);
    } else if (strcmp(el, "rect") == 0) {
      nsvg__pushAttr(p);
      p->shapeFlag = 1;
      nsvg__parseRect(p, dict);
      nsvg__popAttr(p);
    } else if (strcmp(el, "circle") == 0) {
      nsvg__pushAttr(p);
      p->shapeFlag = 1;
      nsvg__parseCircle(p, dict);
      nsvg__popAttr(p);
    } else if (strcmp(el, "ellipse") == 0) {
      nsvg__pushAttr(p);
      p->shapeFlag = 1;
      nsvg__parseEllipse(p, dict);
      nsvg__popAttr(p);
    } else if (strcmp(el, "line") == 0)  {
      nsvg__pushAttr(p);
      p->shapeFlag = 1;
      nsvg__parseLine(p, dict);
      nsvg__popAttr(p);
    } else if (strcmp(el, "polyline") == 0)  {
      nsvg__pushAttr(p);
      p->shapeFlag = 1;
      nsvg__parsePoly(p, dict, 0);
      nsvg__popAttr(p);
    } else if (strcmp(el, "polygon") == 0)  {
      nsvg__pushAttr(p);
      p->shapeFlag = 1;
      nsvg__parsePoly(p, dict, 1);
      nsvg__popAttr(p);
    } else if (strcmp(el, "use") == 0) {
      nsvg__pushAttr(p);
      p->shapeFlag = 1;
      nsvg__parseUse(p, dict);
      nsvg__popAttr(p);
    } else if (strcmp(el, "defs") == 0) {
      p->defsFlag = 1;
    } else if (strcmp(el, "symbol") == 0) {
      nsvg__pushAttr(p);
      p->symbolFlag = 1;
      nsvg__parseSymbol(p, dict);
    } else if (strcmp(el, "svg") == 0) {
      nsvg__pushAttr(p);
      nsvg__parseSVG(p, dict);
    } else if (strcmp(el, "clipPath") == 0) {
      int i;
      nsvg__pushAttr(p);
      for (i = 0; dict[i]; i += 2) {
        if (strcmp(dict[i], "id") == 0) {
          p->clipPath = nsvg__findClipPath(p, dict[i+1]);
          break;
        }
      }
    } else if (strcmp(el, "title") == 0) {
      p->titleFlag = 1;
    } else if (strcmp(el, "image") == 0) {
      //    nsvg__pushAttr(p);
      //    nsvg__parseIMAGE(p, dict);
      parseImage(p, dict);
      //    nsvg__popAttr(p);
    } else if (strcmp(el, "pattern") == 0) {
      parsePattern(p, dict);
      p->patternFlag = 1;
  
    } else if (strcmp(el, "clover:theme") == 0) {
      parseTheme(p, dict);
    } else {
      strncpy(p->unknown, el, 63);
    }
  }
  
  static void nsvg__endElement(void* ud, const char* el)
  {
    NSVGparser* p = (NSVGparser*)ud;
    //  NSVGattrib* curAttr = nsvg__getAttr(p);
  
    if (strcmp(el, "g") == 0) {
      nsvg__popAttr(p);
    } else if (strcmp(el, "path") == 0) {
      p->pathFlag = 0;
    } else if (strcmp(el, "defs") == 0) {
      p->defsFlag = 0;
    } else if (strcmp(el, "pattern") == 0) {
      p->patternFlag = 0;
    } else if (strcmp(el, "symbol") == 0) {
  //    nsvg__getSymbolBounds(p); //no sense
      nsvg__popAttr(p);
      p->symbolFlag = 0;
    } else if (strcmp(el, "svg") == 0) {
      nsvg__popAttr(p);
    } else if (strcmp(el, "clipPath") == 0) {
      if (p->clipPath != NULL) {
        NSVGshape* shape = p->clipPath->shapes;
        while (shape != NULL) {
          shape->fill.type = NSVG_PAINT_COLOR;
          shape->stroke.type = NSVG_PAINT_NONE;
          shape = shape->next;
        }
        p->clipPath = NULL;
      }
      nsvg__popAttr(p);
    } else if (strcmp(el, "text") == 0) {
      nsvg__popAttr(p);
      p->isText = 0;
      //  } else if (strcmp(el, "tspan") == 0) {
      //    nsvg__popAttr(p);
  
    } else if (strcmp(el, "title") == 0) {
      p->titleFlag = 0;
    } else if (strcmp(el, "style") == 0) {
      p->styleFlag = 0;
    } else if (strcmp(el, "rect") == 0 ||
               strcmp(el, "circle") == 0 ||
               strcmp(el, "ellipse") == 0 ||
               strcmp(el, "line") == 0 ||
               strcmp(el, "polyline") == 0 ||
               strcmp(el, "polygon") == 0 ||
               strcmp(el, "use") == 0
               ) {
      p->shapeFlag = 0;
    } else if (strcmp(el, p->unknown) == 0) {
      //    p->defsFlag = 0;
    }
  }
  
  float addLetter(NSVGparser* p, CHAR16 letter, float x, float y, float scale, UINT32 color)
  {
    float x1 = x; //initial position
    //  INTN y = 0;
    NSVGshape *shape;
    NSVGattrib* attr = nsvg__getAttr(p);
    NSVGglyph* g;
    if (!p->text || !p->text->font) {
      DBG("font absent\n");
      return x;
    }
    if (!scale) {
      return x;
    }
  
    shape = (NSVGshape*)AllocateZeroPool(sizeof(NSVGshape));
    if (shape == NULL) return x;
  
    g = p->text->font->glyphs;
    while (g) {
      if (g->unicode == letter) {
        shape->paths = g->path;
        /*
        if (shape->paths) {
          if (letter == L'C') {
            DBG("Found glyph %x, point[0]=(%d,%d) points=%d\n", letter,
                (int)shape->paths->pts[0], (int)shape->paths->pts[1], shape->paths->npts);
            shape->debug = TRUE;
          }
        } */
        break;
      }
      g = g->next;
    }
    if (!g) {
      //missing glyph
      g = p->text->font->missingGlyph;
      shape->paths = g->path;
      //    if (shape->paths) {
      //      DBG("Missing glyph %x, path[0]=%d\n", letter, (int)shape->paths->pts[0]);
      //    }
    }
    if (!shape->paths) {
      if (g) {
        x1 += g->horizAdvX * scale; //user space
      }
      if (shape) {
        FreePool(shape);
      }
      return x1;
    }
    //fill shape
    //  DBG("fill shape\n");   //ssss
    shape->group = p->text->group;
    shape->id[0] = (char)(letter & 0xff);
    shape->id[1] = (char)((letter >> 8) & 0xff);
    shape->strokeWidth = p->text->strokeWidth / scale;
    shape->strokeLineJoin = attr->strokeLineJoin;
    shape->strokeLineCap = attr->strokeLineCap;
    shape->miterLimit = attr->miterLimit;
    shape->fillRule = NSVG_FILLRULE_NONZERO;
    shape->opacity = 1.f;
  
    shape->fill.type = NSVG_PAINT_NONE;
    if (attr->hasFill == 1) {
      shape->fill.type = NSVG_PAINT_COLOR;
      shape->fill.paint.color = color;
    }
    shape->stroke.type = NSVG_PAINT_NONE;
    if (attr->hasStroke == 1) {
      shape->stroke.type = NSVG_PAINT_COLOR;
      shape->stroke.paint.color = p->text->strokeColor;
    }
  
    shape->flags = NSVG_VIS_DISPLAY | NSVG_VIS_VISIBLE;
    shape->isText = TRUE;
    nsvg__xformIdentity(shape->xform);
    //scale convert shape from glyph size to user's font-size
    shape->xform[0] = scale; //1.f;
    shape->xform[3] = -scale; //-1.f; //glyphs are mirrored by Y
    shape->xform[4] = x - p->text->font->bbox[0] * scale;
    shape->xform[5] = y + p->text->font->bbox[3] * scale; // Y3 is a floor for a letter, so Y+x[5]=realY
  // then apply text transform
    nsvg__xformMultiply(shape->xform, p->text->xform);
  
  /*
     if (letter == L'C') {
       DBG("bbox0=%s ", PoolPrintFloat(p->text->font->bbox[0]));
       DBG("bbox3=%s \n", PoolPrintFloat(p->text->font->bbox[3]));
       DumpFloat2("glyph xform:", shape->xform, 6);
       DBG("stroke-color=%x ", shape->stroke.color);
       DBG("stroke-width=%s\n", PoolPrintFloat(shape->strokeWidth));
     }
  */
    //in glyph units
    shape->bounds[0] = p->text->font->bbox[0] + x/scale; //x + p->font->bbox[0] * scale;
    shape->bounds[1] = p->text->font->bbox[1] + y/scale; //y + p->font->bbox[1] * scale;
    shape->bounds[2] = p->text->font->bbox[2] + x/scale; //x + p->font->bbox[2] * scale;
    shape->bounds[3] = p->text->font->bbox[3] + y/scale; //y + p->font->bbox[3] * scale;
    //  if (letter == L'C') {
    //      DumpFloat2("glyph bounds in text", shape->bounds, 4);
    //  }
    //  if (color == NSVG_RGBA(0x80, 0xFF, 0, 255)) {
    //    DBG("glyph code=%x\n", letter);
    //    DumpFloat2("glyph xform", shape->xform, 6);
    //    DumpFloat2("glyph bounds", shape->bounds, 4);
    //    DBG("glyph width=%d\n", g->horizAdvX);
    //  }
  
    x1 += g->horizAdvX * scale; //position for next letter in user's units
  
    // Add to tail
    if (p->image->shapes == NULL)
      p->image->shapes = shape;
    else
      p->shapesTail->next = shape;
    p->shapesTail = shape;
    return x1;
  }
  
  static void addString(NSVGparser* p, char* s)
  {
    //text support should create shape for each letter
    UINTN len = strlen(s);
    UINTN i;
    if (!p->text->font) {
      DBG("font for the text is not loaded\n");
      return; //use external fonts
    }
    //  DBG("the text %s uses font %a\n", s, p->text->fontFace->fontFamily);
  
    //calculate letter size
    float sy = p->text->font->bbox[3] - p->text->font->bbox[1];
    sy = (sy <= 0.f)? p->text->font->fontWeight: sy;
    //required height
    float h = p->text->fontSize;
    float scale = h / sy;  //scale to font size
    //text position based on ?
    float x = p->text->x;  //user space
    float y = p->text->y - h;
    for (i = 0; i < len; i++) {
      CHAR16 letter = 0;
      s = GetUnicodeChar(s, &letter);
      if (!letter) {
        break;
      }
      x = addLetter(p, letter, x, y, scale, p->text->fontColor);
    }
  }
  
  static void nsvg__content(void* ud, char* s)
  {
    NSVGparser* p = (NSVGparser*)ud;
    if (p->titleFlag) {
      int len = (int)strlen(s);
      NSVGshape *shape = p->image->shapes;
      const int lim = sizeof(shape->title);
      if(len > lim-1)
        len = lim-1;
      if (p->shapeFlag) {
        while (shape->next)
          shape = shape->next;
        if (shape) {
          memcpy(shape->title, s, len);
          memset(shape->title + len, 0, lim-len);
        }
      } else { //not shape
        NSVGattrib* attr = nsvg__getAttr(p);
        memcpy(attr->title, s, len);
        memset(attr->title + len, 0, lim-len);
      }
    } else
      if (p->styleFlag) {
        // decrease string to cdata content (if present)
        char* rv = strstr(s, "<![CDATA[");
        if (rv) {
          s = rv + 9;
          rv = strstr(s, "]]>");
          if (!rv)
            return;
          else *rv = '\0';
        }
  
        //.cls-1{fill:url(#linear-gradient);}
        const char* start = s;
        int state = 0;
        while (*s) {
          char c = *s;
          if (state == 1) {
            if (nsvg__isspace(c) || c == '{') {
              NSVGstyles* next = p->styles;
              p->styles = (NSVGstyles*)AllocatePool(sizeof(NSVGstyles));
              p->styles->next = next;
              p->styles->name = nsvg__strndup(start, (size_t)(s - start)); //style->name=cls-1
              p->styles->description = NULL;
              if (c == '{') {
                start = s + 1;
                state = 3;
              } else {
                state = 2;
              }
            }
          } else if (state == 2 && c == '{') {
            start = s + 1;
            state = 3;
          } else if (state == 3 && c == '}') {
            p->styles->description = nsvg__strndup(start, (size_t)(s - start));
            //     nsvg__parseStyle(p, p->styles->description);
            state = 0;
          } else if (state == 0 && c == '.') {
            start = s + 1;
            state = 1;
          }
          s++;
        }
      }
      else if (p->isText) { //text support
        addString(p, s);
      }
  }
  
  static void nsvg__assignGradients(NSVGparser* p, NSVGshape* shapes)
  {
    for (NSVGshape* shape = shapes; shape != NULL; shape = shape->next) {
  
      if (shape->fill.type == NSVG_PAINT_GRADIENT_LINK) {
        NSVGgradientLink* link = shape->fill.paint.gradientLink;
        shape->fill.paint.gradient = nsvg__createGradient(p, shape, link, &shape->fill.type);
        if (link != NULL) {
          FreePool(link);
        }
        if (shape->fill.paint.gradient == NULL) {
          shape->fill.type = NSVG_PAINT_NONE;
        }
      }
      if (shape->stroke.type == NSVG_PAINT_GRADIENT_LINK) {
        NSVGgradientLink* link = shape->stroke.paint.gradientLink;
        shape->stroke.paint.gradient = nsvg__createGradient(p, shape, link, &shape->stroke.type);
        if (link != NULL) {
          FreePool(link);
        }
        if (shape->stroke.paint.gradient == NULL) {
          shape->stroke.type = NSVG_PAINT_NONE;
        }
      }
    }
  }
  
  static char *nsvg__strndup(const char *s, size_t n)
  {
    char *result;
    size_t len = strlen(s);
  
    if (n < len)
      len = n;
  
    result = (char *)AllocateCopyPool(len + 1, s);
    if (!result)
      return 0;
  
    result[len] = '\0';
    return result;
  }
  
  void takeXformBounds(NSVGshape *shape, float *xform, float *bounds)
  {
    float newBounds[8]; //(x1, y1), (x2, y2), (x2, y1), (x1, y2)
    nsvg__xformPoint(&newBounds[0], &newBounds[1], shape->bounds[0], shape->bounds[1], xform);
    nsvg__xformPoint(&newBounds[2], &newBounds[3], shape->bounds[2], shape->bounds[3], xform);
    nsvg__xformPoint(&newBounds[4], &newBounds[5], shape->bounds[2], shape->bounds[1], xform);
    nsvg__xformPoint(&newBounds[6], &newBounds[7], shape->bounds[0], shape->bounds[3], xform);
  //we have to take into account all points, as x1 can be > x2 etc.
    bounds[0] = nsvg__minf(bounds[0], newBounds[0]);
    bounds[0] = nsvg__minf(bounds[0], newBounds[2]);
    bounds[0] = nsvg__minf(bounds[0], newBounds[4]);
    bounds[0] = nsvg__minf(bounds[0], newBounds[6]);
  
    bounds[1] = nsvg__minf(bounds[1], newBounds[1]);
    bounds[1] = nsvg__minf(bounds[1], newBounds[3]);
    bounds[1] = nsvg__minf(bounds[1], newBounds[5]);
    bounds[1] = nsvg__minf(bounds[1], newBounds[7]);
  
    bounds[2] = nsvg__maxf(bounds[2], newBounds[0]);
    bounds[2] = nsvg__maxf(bounds[2], newBounds[2]);
    bounds[2] = nsvg__maxf(bounds[2], newBounds[4]);
    bounds[2] = nsvg__maxf(bounds[2], newBounds[6]);
    
    bounds[3] = nsvg__maxf(bounds[3], newBounds[1]);
    bounds[3] = nsvg__maxf(bounds[3], newBounds[3]);
    bounds[3] = nsvg__maxf(bounds[3], newBounds[5]);
    bounds[3] = nsvg__maxf(bounds[3], newBounds[7]);
  }
  //image bounds for a shape group
  //bounds inited before use, called from nsvgParse
  //assumed each shape already has bounds calculated.
  int nsvg__shapesBound(/*NSVGimage* image,*/ NSVGshape *shapes, float* bounds)
  {
    NSVGshape *shape, *shapeLink;
    float xform[6];
    float xform2[6];
    int count = 0;
    int visibility;
    for (shapeLink = shapes; shapeLink != NULL; shapeLink = shapeLink->next) {
      memcpy(&xform[0], shapeLink->xform, sizeof(float)*6);
      visibility = (shapeLink->flags & NSVG_VIS_VISIBLE); //check origin visibility, not link
  
      if (/*shapeLink->isText ||*/ !visibility) { //dont count text
        continue;
      }
      shape = shapeLink->link;  //this is <use>
      if (!shape) {
        takeXformBounds(shapeLink, &xform[0], bounds);
      }
      while (shape) { //take bounds from symbol's shapes
        memcpy(xform2, xform, sizeof(float)*6);
        nsvg__xformPremultiply(&xform2[0], shape->xform);
        takeXformBounds(shape, &xform2[0], bounds);
        shape = shape->next;
      }
  /*
      if (shapeLink->isText) { //strstr(shapeLink->id, "shar")) {
         DBG("take Bounds: shapeID=%a\n", shapeLink->id);
         DumpFloat2("  transform", xform, 6);
         DumpFloat2("  shape initial bounds", shapeLink->bounds, 4);
       }
  */
      count++; //count visible
    }
    return count;
  }
  
  void nsvg__imageBounds(NSVGparser* p, float* bounds)
  {
    NSVGimage* image = p->image;
    NSVGclipPath* clipPath;
    int count = 0;
    clipPath = image->clipPaths;
    while (clipPath != NULL) {
      if (clipPath->index == 0) { // this is bottom image
        //check max bound only for this image
        count = nsvg__shapesBound(clipPath->shapes, bounds);
      }
      clipPath = clipPath->next;
    }
    count += nsvg__shapesBound(image->shapes, bounds);
    DBG("found shapes=%d\n", count);
    if (count == 0) {
      bounds[0] = bounds[1] = 0.0f;
      bounds[2] = bounds[3] = 1.0f;
    }
  }
  // units like "px" is not used so just exclude it
  NSVGparser* nsvgParse(char* input, /* const char* units,*/ float dpi, float opacity)
  {
    NSVGparser* p;
    NSVGclipPath* clipPath;
    NSVGsymbol* symbol;
    float bounds[4];
    bounds[0] = FLT_MAX;
    bounds[1] = FLT_MAX;
    bounds[2] = -FLT_MAX;
    bounds[3] = -FLT_MAX;
  
    p = nsvg__createParser();
    if (p == NULL) {
      return NULL;
    }
    p->dpi = dpi;
    p->opacity = opacity;
    nsvg__parseXML(input, nsvg__startElement, nsvg__endElement, nsvg__content, p);
  //assign gradients
    clipPath = p->image->clipPaths;
    while (clipPath != NULL) {
      nsvg__assignGradients(p, clipPath->shapes);
      clipPath = clipPath->next;
    }
    symbol = p->symbols;
    while (symbol) {
      nsvg__assignGradients(p, symbol->shapes);
      symbol = symbol->next;
    }
    nsvg__assignGradients(p, p->image->shapes);
    nsvg__imageBounds(p, bounds);
  #if 1
    memcpy(p->image->realBounds, bounds, 4*sizeof(float));
  
    DumpFloat2("image real bounds", bounds, 4);
    p->image->width = bounds[2] - bounds[0];
    p->image->height = bounds[3] - bounds[1];
  #endif
     DBG("scaled width=%s height=%s\n", PoolPrintFloat(p->image->width),
          PoolPrintFloat(p->image->height));
    return p;
  }
  
  void nsvg__deleteShapes(NSVGshape* shape)
  {
    NSVGshape *snext;
    while (shape != NULL) {
      snext = shape->next;
      if (!shape->link) { //don't touch fake shape!
        nsvg__deleteFont(shape->fontFace);
        shape->fontFace = NULL;
        nsvg__deletePaint(&shape->fill);
        nsvg__deletePaint(&shape->stroke);
      }
      if (shape->clip.index) {
        FreePool(shape->clip.index);
      }
      FreePool(shape);
      shape = snext;
    }
  }
  
  void nsvg__deleteClipPaths(NSVGclipPath* path)
  {
    NSVGclipPath *pnext;
    while (path != NULL) {
      pnext = path->next;
      nsvg__deleteShapes(path->shapes);
      FreePool(path);
      path = pnext;
    }
  }
  
  void nsvgDelete(NSVGimage* image)
  {
    NSVGgroup *group, *gnext;
    if (image == NULL) return;
    nsvg__deleteShapes(image->shapes);
    nsvg__deleteClipPaths(image->clipPaths);
    group = image->groups;
    while (group != NULL) {
      gnext = group->next;
      FreePool(group);
      group = gnext;
    }
    FreePool(image);
  }
  /*
   NSVGpath* nsvgDuplicatePath(NSVGpath* p)
   {
   NSVGpath* res = NULL;
  
   if (p == NULL)
   return NULL;
  
   res = (NSVGpath*)AllocateZeroPool(sizeof(NSVGpath));
   if (res == NULL) return NULL;
  
   res->pts = (float*)AllocatePool(p->npts*2*sizeof(float));
   if (res->pts == NULL) {
   FreePool(res);
   return NULL;
   }
   memcpy(res->pts, p->pts, p->npts * sizeof(float) * 2);
   res->npts = p->npts;
  
   memcpy(res->bounds, p->bounds, sizeof(p->bounds));
  
   res->closed = p->closed;
  
   return res;
   }
   */
  
  
  