fixed page52.pdf segfault (added null pointer handling to
[swftools.git] / pdf2swf / SWFOutputDev.cc
index b0472ba..2728dcb 100644 (file)
 #include <string.h>
 #include <unistd.h>
 #include "../config.h"
+#ifdef HAVE_DIRENT_H
+#include <dirent.h>
+#endif
+#ifdef HAVE_SYS_STAT_H
+#include <sys/stat.h>
+#endif
+#ifdef HAVE_FONTCONFIG_H
+#include <fontconfig.h>
+#endif
 //xpdf header files
 #include "config.h"
 #include "gfile.h"
 #include "GfxFont.h"
 #include "CharCodeToUnicode.h"
 #include "NameToUnicodeTable.h"
-#include "FontFile.h"
 #include "GlobalParams.h"
+//#define XPDF_101
+#ifdef XPDF_101
+#include "FontFile.h"
+#else
+#include "FoFiType1C.h"
+#include "FoFiTrueType.h"
+#endif
+#include "SWFOutputDev.h"
+
 //swftools header files
 #include "swfoutput.h"
 #include "../lib/log.h"
 
-#include "ttf2pt1.h"
 #include <math.h>
 
-static PDFDoc*doc = 0;
-static char* swffilename = 0;
-int numpages;
-int currentpage;
+typedef struct _fontfile
+{
+    char*filename;
+    int used;
+} fontfile_t;
+
+// for pdfswf_addfont
+static fontfile_t fonts[2048];
+static int fontnum = 0;
+
+static int config_use_fontconfig = 1;
 
 // swf <-> pdf pages
-int*pages = 0;
-int pagebuflen = 0;
-int pagepos = 0;
+// TODO: move into pdf_doc_t
+static int*pages = 0;
+static int pagebuflen = 0;
+static int pagepos = 0;
 
-double caplinewidth = 3.0;
+/* config */
+static double caplinewidth = 3.0;
+static int zoom = 72; /* xpdf: 86 */
+static int forceType0Fonts = 0;
 
 static void printInfoString(Dict *infoDict, char *key, char *fmt);
 static void printInfoDate(Dict *infoDict, char *key, char *fmt);
 
-double fontsizes[] = 
-{
- 0.833,0.833,0.889,0.889,
- 0.788,0.722,0.833,0.778,
- 0.600,0.600,0.600,0.600,
- 0.576,0.576,0.576,0.576,
- 0.733 //?
-};
-char*fontnames[]={
-"Helvetica",             
-"Helvetica-Bold",        
-"Helvetica-BoldOblique", 
-"Helvetica-Oblique",     
-"Times-Roman",           
-"Times-Bold",            
-"Times-BoldItalic",      
-"Times-Italic",          
-"Courier",               
-"Courier-Bold",          
-"Courier-BoldOblique",   
-"Courier-Oblique",       
-"Symbol",                
-"Symbol",                
-"Symbol",                
-"Symbol",
-"ZapfDingBats"
-};
-
 struct mapping {
     char*pdffont;
     char*filename;
-    int id;
 } pdf2t1map[] ={
-{"Times-Roman",           "n021003l.pfb"},
-{"Times-Italic",          "n021023l.pfb"},
-{"Times-Bold",            "n021004l.pfb"},
-{"Times-BoldItalic",      "n021024l.pfb"},
-{"Helvetica",             "n019003l.pfb"},
-{"Helvetica-Oblique",     "n019023l.pfb"},
-{"Helvetica-Bold",        "n019004l.pfb"},
-{"Helvetica-BoldOblique", "n019024l.pfb"},
-{"Courier",               "n022003l.pfb"},
-{"Courier-Oblique",       "n022023l.pfb"},
-{"Courier-Bold",          "n022004l.pfb"},
-{"Courier-BoldOblique",   "n022024l.pfb"},
-{"Symbol",                "s050000l.pfb"},
-{"ZapfDingbats",          "d050000l.pfb"}};
-
-class GfxState;
-class GfxImageColorMap;
+{"Times-Roman",           "n021003l"},
+{"Times-Italic",          "n021023l"},
+{"Times-Bold",            "n021004l"},
+{"Times-BoldItalic",      "n021024l"},
+{"Helvetica",             "n019003l"},
+{"Helvetica-Oblique",     "n019023l"},
+{"Helvetica-Bold",        "n019004l"},
+{"Helvetica-BoldOblique", "n019024l"},
+{"Courier",               "n022003l"},
+{"Courier-Oblique",       "n022023l"},
+{"Courier-Bold",          "n022004l"},
+{"Courier-BoldOblique",   "n022024l"},
+{"Symbol",                "s050000l"},
+{"ZapfDingbats",          "d050000l"}};
 
 class SWFOutputDev:  public OutputDev {
-  struct swfoutput output;
   int outputstarted;
+  struct swfoutput output;
 public:
 
   // Constructor.
@@ -128,6 +123,15 @@ public:
   // Destructor.
   virtual ~SWFOutputDev() ;
 
+  void setMove(int x,int y);
+  void setClip(int x1,int y1,int x2,int y2);
+  
+  int save(char*filename);
+  void  pagefeed();
+  void* getSWF();
+
+  void getDimensions(int*x1,int*y1,int*x2,int*y2);
+
   //----- get info about output device
 
   // Does this device use upside-down coordinates?
@@ -137,14 +141,17 @@ public:
   // Does this device use drawChar() or drawString()?
   virtual GBool useDrawChar();
   
+  // Can this device draw gradients?
+  virtual GBool useGradients();
+  
   virtual GBool interpretType3Chars() {return gTrue;}
 
   //----- initialization and control
 
-  void startDoc(XRef *xref);
+  void setXRef(PDFDoc*doc, XRef *xref);
 
   // Start a page.
-  virtual void startPage(int pageNum, GfxState *state) ;
+  virtual void startPage(int pageNum, GfxState *state, double x1, double y1, double x2, double y2) ;
 
   //----- link borders
   virtual void drawLink(Link *link, Catalog *catalog) ;
@@ -208,9 +215,12 @@ public:
   int clipping[64];
   int clippos;
 
+  int currentpage;
+
+  PDFDoc*doc;
   XRef*xref;
 
-  int searchT1Font(char*name);
+  char* searchFont(char*name);
   char* substituteFont(GfxFont*gfxFont, char*oldname);
   char* writeEmbeddedFontToFile(XRef*ref, GfxFont*font);
   int t1id;
@@ -218,14 +228,166 @@ public:
   int pbminfo; // did we write "File contains jpegs" yet?
   int linkinfo; // did we write "File contains links" yet?
   int ttfinfo; // did we write "File contains TrueType Fonts" yet?
+  int gradientinfo; // did we write "File contains Gradients yet?
 
   int type3active; // are we between beginType3()/endType3()?
 
   GfxState *laststate;
+
+  int pic_xids[1024];
+  int pic_yids[1024];
+  int pic_ids[1024];
+  int pic_width[1024];
+  int pic_height[1024];
+  int picpos;
+  int pic_id;
+  char type3Warning;
+
+  char* substitutetarget[256];
+  char* substitutesource[256];
+  int substitutepos;
+
+  int user_movex,user_movey;
+  int user_clipx1,user_clipx2,user_clipy1,user_clipy2;
+};
+
+static char*getFontID(GfxFont*font);
+
+class InfoOutputDev:  public OutputDev 
+{
+  public:
+  int x1,y1,x2,y2;
+  int num_links;
+  int num_images;
+  int num_fonts;
+
+  InfoOutputDev() 
+  {
+      num_links = 0;
+      num_images = 0;
+      num_fonts = 0;
+  }
+  virtual ~InfoOutputDev() 
+  {
+  }
+  virtual GBool upsideDown() {return gTrue;}
+  virtual GBool useDrawChar() {return gTrue;}
+  virtual GBool useGradients() {return gTrue;}
+  virtual GBool interpretType3Chars() {return gTrue;}
+  virtual void startPage(int pageNum, GfxState *state, double crop_x1, double crop_y1, double crop_x2, double crop_y2)
+  {
+      double x1,y1,x2,y2;
+      state->transform(crop_x1,crop_y1,&x1,&y1);
+      state->transform(crop_x2,crop_y2,&x2,&y2);
+      if(x2<x1) {double x3=x1;x1=x2;x2=x3;}
+      if(y2<y1) {double y3=y1;y1=y2;y2=y3;}
+      this->x1 = (int)x1;
+      this->y1 = (int)y1;
+      this->x2 = (int)x2;
+      this->y2 = (int)y2;
+  }
+  virtual void drawLink(Link *link, Catalog *catalog) 
+  {
+      num_links++;
+  }
+  virtual void updateFont(GfxState *state) 
+  {
+      GfxFont*font = state->getFont();
+      if(!font)
+          return;
+      char*id = getFontID(font);
+      /* FIXME*/
+      num_fonts++;
+  }
+  virtual void drawImageMask(GfxState *state, Object *ref, Stream *str,
+                            int width, int height, GBool invert,
+                            GBool inlineImg) 
+  {
+      num_images++;
+  }
+  virtual void drawImage(GfxState *state, Object *ref, Stream *str,
+                        int width, int height, GfxImageColorMap *colorMap,
+                        int *maskColors, GBool inlineImg)
+  {
+      num_images++;
+  }
 };
 
-char mybuf[1024];
-char* gfxstate2str(GfxState *state)
+SWFOutputDev::SWFOutputDev()
+{
+    jpeginfo = 0;
+    ttfinfo = 0;
+    linkinfo = 0;
+    pbminfo = 0;
+    type3active = 0;
+    clippos = 0;
+    clipping[clippos] = 0;
+    outputstarted = 0;
+    xref = 0;
+    picpos = 0;
+    pic_id = 0;
+    substitutepos = 0;
+    type3Warning = 0;
+    user_movex = 0;
+    user_movey = 0;
+    user_clipx1 = 0;
+    user_clipy1 = 0;
+    user_clipx2 = 0;
+    user_clipy2 = 0;
+    memset(&output, 0, sizeof(output));
+//    printf("SWFOutputDev::SWFOutputDev() \n");
+};
+  
+void SWFOutputDev::setMove(int x,int y)
+{
+    this->user_movex = x;
+    this->user_movey = y;
+}
+
+void SWFOutputDev::setClip(int x1,int y1,int x2,int y2)
+{
+    if(x2<x1) {int x3=x1;x1=x2;x2=x3;}
+    if(y2<y1) {int y3=y1;y1=y2;y2=y3;}
+
+    this->user_clipx1 = x1;
+    this->user_clipy1 = y1;
+    this->user_clipx2 = x2;
+    this->user_clipy2 = y2;
+}
+void SWFOutputDev::getDimensions(int*x1,int*y1,int*x2,int*y2)
+{
+    return swfoutput_getdimensions(&output, x1,y1,x2,y2);
+}
+
+static char*getFontID(GfxFont*font)
+{
+    GString*gstr = font->getName();
+    char* fontname = gstr==0?0:gstr->getCString();
+    if(fontname==0) {
+       char buf[32];
+       Ref*r=font->getID();
+       sprintf(buf, "UFONT%d", r->num);
+       return strdup(buf);
+    }
+    return strdup(fontname);
+}
+
+static char*getFontName(GfxFont*font)
+{
+    char*fontid = getFontID(font);
+    char*fontname= 0;
+    char* plus = strchr(fontid, '+');
+    if(plus && plus < &fontid[strlen(fontid)-1]) {
+       fontname = strdup(plus+1);
+    } else {
+        fontname = strdup(fontid);
+    }
+    free(fontid);
+    return fontname;
+}
+
+static char mybuf[1024];
+static char* gfxstate2str(GfxState *state)
 {
   char*bufpos = mybuf;
   GfxRGB rgb;
@@ -303,8 +465,8 @@ char* gfxstate2str(GfxState *state)
   if(state->getLineJoin()!=0)
   bufpos+=sprintf(bufpos,"ML%d ", state->getMiterLimit());
 
-  if(state->getFont() && state->getFont()->getName() && state->getFont()->getName()->getCString())
-  bufpos+=sprintf(bufpos,"F\"%s\" ",((state->getFont())->getName())->getCString());
+  if(state->getFont() && getFontID(state->getFont()))
+  bufpos+=sprintf(bufpos,"F\"%s\" ",getFontID(state->getFont()));
   bufpos+=sprintf(bufpos,"FS%.1f ", state->getFontSize());
   bufpos+=sprintf(bufpos,"MAT[%.1f/%.1f/%.1f/%.1f/%.1f/%.1f] ", state->getTextMat()[0],state->getTextMat()[1],state->getTextMat()[2],
                                   state->getTextMat()[3],state->getTextMat()[4],state->getTextMat()[5]);
@@ -331,14 +493,14 @@ char* gfxstate2str(GfxState *state)
   return mybuf;
 }
 
-void dumpFontInfo(char*loglevel, GfxFont*font);
-int lastdumps[1024];
-int lastdumppos = 0;
+static void dumpFontInfo(char*loglevel, GfxFont*font);
+static int lastdumps[1024];
+static int lastdumppos = 0;
 /* nr = 0  unknown
    nr = 1  substituting
    nr = 2  type 3
  */
-void showFontError(GfxFont*font, int nr) 
+static void showFontError(GfxFont*font, int nr) 
 {  
     Ref*r=font->getID();
     int t;
@@ -358,45 +520,43 @@ void showFontError(GfxFont*font, int nr)
     dumpFontInfo("<warning>", font);
 }
 
-void dumpFontInfo(char*loglevel, GfxFont*font)
+static void dumpFontInfo(char*loglevel, GfxFont*font)
 {
-  GString *gstr;
-  char*name = 0;
-  gstr = font->getName();
+  char* name = getFontID(font);
   Ref* r=font->getID();
-  msg("%s=========== %s (ID:%d,%d) ==========\n", loglevel, gstr?FIXNULL(gstr->getCString()):"(unknown font)", r->num,r->gen);
+  msg("%s=========== %s (ID:%d,%d) ==========\n", loglevel, getFontName(font), r->num,r->gen);
 
-  gstr  = font->getTag();
-  if(gstr) 
-   msg("%sTag: %s\n", loglevel, FIXNULL(gstr->getCString()));
+  GString*gstr  = font->getTag();
+   
+  msg("%s| Tag: %s\n", loglevel, name);
   
-  if(font->isCIDFont()) msg("%sis CID font\n", loglevel);
+  if(font->isCIDFont()) msg("%s| is CID font\n", loglevel);
 
   GfxFontType type=font->getType();
   switch(type) {
     case fontUnknownType:
-     msg("%sType: unknown\n",loglevel);
+     msg("%s| Type: unknown\n",loglevel);
     break;
     case fontType1:
-     msg("%sType: 1\n",loglevel);
+     msg("%s| Type: 1\n",loglevel);
     break;
     case fontType1C:
-     msg("%sType: 1C\n",loglevel);
+     msg("%s| Type: 1C\n",loglevel);
     break;
     case fontType3:
-     msg("%sType: 3\n",loglevel);
+     msg("%s| Type: 3\n",loglevel);
     break;
     case fontTrueType:
-     msg("%sType: TrueType\n",loglevel);
+     msg("%s| Type: TrueType\n",loglevel);
     break;
     case fontCIDType0:
-     msg("%sType: CIDType0\n",loglevel);
+     msg("%s| Type: CIDType0\n",loglevel);
     break;
     case fontCIDType0C:
-     msg("%sType: CIDType0C\n",loglevel);
+     msg("%s| Type: CIDType0C\n",loglevel);
     break;
     case fontCIDType2:
-     msg("%sType: CIDType2\n",loglevel);
+     msg("%s| Type: CIDType2\n",loglevel);
     break;
   }
   
@@ -405,52 +565,70 @@ void dumpFontInfo(char*loglevel, GfxFont*font)
   if(font->getEmbeddedFontName())
     name = font->getEmbeddedFontName()->getCString();
   if(embedded)
-   msg("%sEmbedded name: %s id: %d\n",loglevel, FIXNULL(name), embRef.num);
+   msg("%s| Embedded name: %s id: %d\n",loglevel, FIXNULL(name), embRef.num);
 
   gstr = font->getExtFontFile();
   if(gstr)
-   msg("%sExternal Font file: %s\n", loglevel, FIXNULL(gstr->getCString()));
+   msg("%s| External Font file: %s\n", loglevel, FIXNULL(gstr->getCString()));
 
   // Get font descriptor flags.
-  if(font->isFixedWidth()) msg("%sis fixed width\n", loglevel);
-  if(font->isSerif()) msg("%sis serif\n", loglevel);
-  if(font->isSymbolic()) msg("%sis symbolic\n", loglevel);
-  if(font->isItalic()) msg("%sis italic\n", loglevel);
-  if(font->isBold()) msg("%sis bold\n", loglevel);
+  if(font->isFixedWidth()) msg("%s| is fixed width\n", loglevel);
+  if(font->isSerif()) msg("%s| is serif\n", loglevel);
+  if(font->isSymbolic()) msg("%s| is symbolic\n", loglevel);
+  if(font->isItalic()) msg("%s| is italic\n", loglevel);
+  if(font->isBold()) msg("%s| is bold\n", loglevel);
 }
 
 //void SWFOutputDev::drawImageMask(GfxState *state, Object *ref, Stream *str, int width, int height, GBool invert, GBool inlineImg) {printf("void SWFOutputDev::drawImageMask(GfxState *state, Object *ref, Stream *str, int width, int height, GBool invert, GBool inlineImg) \n");}
 //void SWFOutputDev::drawImage(GfxState *state, Object *ref, Stream *str, int width, int height, GfxImageColorMap *colorMap, GBool inlineImg) {printf("void SWFOutputDev::drawImage(GfxState *state, Object *ref, Stream *str, int width, int height, GfxImageColorMap *colorMap, GBool inlineImg) \n");}
 
-SWFOutputDev::SWFOutputDev() 
+static void free_outline(SWF_OUTLINE*outline)
 {
-    jpeginfo = 0;
-    ttfinfo = 0;
-    linkinfo = 0;
-    pbminfo = 0;
-    type3active = 0;
-    clippos = 0;
-    clipping[clippos] = 0;
-    outputstarted = 0;
-    xref = 0;
-//    printf("SWFOutputDev::SWFOutputDev() \n");
-};
+    while(outline) {
+        SWF_OUTLINE*next = outline->link;
+        free(outline);
+        outline = next;
+    }
+}
+
+static void dump_outline(SWF_OUTLINE*outline)
+{
+    double x=0,y=0;
+    while(outline) {
+        double lastx=x,lasty=y;
+        x += (outline->dest.x/(float)0xffff);
+        y += (outline->dest.y/(float)0xffff);
+        if(outline->type == SWF_PATHTYPE_MOVE) {
+            msg("<trace> | moveto %f,%f", x,y);
+        } else if(outline->type == SWF_PATHTYPE_LINE) {
+            msg("<trace> | lineto: %f,%f\n",x,y);
+        } else if(outline->type == SWF_PATHTYPE_BEZIER) {
+            SWF_BEZIERSEGMENT*o2 = (SWF_BEZIERSEGMENT*)outline;
+            float x1 = o2->C.x/(float)0xffff+lastx;
+            float y1 = o2->C.y/(float)0xffff+lasty;
+            float x2 = o2->B.x/(float)0xffff+lastx;
+            float y2 = o2->B.y/(float)0xffff+lasty;
+            msg("<trace> | spline: %f,%f -> %f,%f -> %f,%f\n",x1,y1,x2,y2,x,y);
+        } 
+        outline = outline->link;
+    }
+}
 
-T1_OUTLINE* gfxPath_to_T1_OUTLINE(GfxState*state, GfxPath*path)
+SWF_OUTLINE* gfxPath_to_SWF_OUTLINE(GfxState*state, GfxPath*path)
 {
     int num = path->getNumSubpaths();
     int s,t;
     bezierpathsegment*start,*last=0;
-    bezierpathsegment*outline = start = new bezierpathsegment();
+    bezierpathsegment*outline = start = (bezierpathsegment*)malloc(sizeof(bezierpathsegment));
     int cpos = 0;
     double lastx=0,lasty=0;
     if(!num) {
        msg("<warning> empty path");
-       outline->type = T1_PATHTYPE_MOVE;
+       outline->type = SWF_PATHTYPE_MOVE;
        outline->dest.x = 0;
        outline->dest.y = 0;
        outline->link = 0;
-       return (T1_OUTLINE*)outline;
+       return (SWF_OUTLINE*)outline;
     }
     for(t = 0; t < num; t++) {
        GfxSubpath *subpath = path->getSubpath(t);
@@ -464,10 +642,10 @@ T1_OUTLINE* gfxPath_to_T1_OUTLINE(GfxState*state, GfxPath*path)
           if(s==0) 
           {
                last = outline;
-               outline->type = T1_PATHTYPE_MOVE;
+               outline->type = SWF_PATHTYPE_MOVE;
                outline->dest.x = x;
                outline->dest.y = y;
-               outline->link = (T1_OUTLINE*)new bezierpathsegment();
+               outline->link = (SWF_OUTLINE*)malloc(sizeof(bezierpathsegment));
                outline = (bezierpathsegment*)outline->link;
                cpos = 0;
                lastx = nx;
@@ -490,9 +668,8 @@ T1_OUTLINE* gfxPath_to_T1_OUTLINE(GfxState*state, GfxPath*path)
                last = outline;
                outline->dest.x = x;
                outline->dest.y = y;
-               outline->type = cpos?T1_PATHTYPE_BEZIER:T1_PATHTYPE_LINE;
-               outline->link = 0;
-               outline->link = (T1_OUTLINE*)new bezierpathsegment();
+               outline->type = cpos?SWF_PATHTYPE_BEZIER:SWF_PATHTYPE_LINE;
+               outline->link = (SWF_OUTLINE*)malloc(sizeof(bezierpathsegment));
                outline = (bezierpathsegment*)outline->link;
                cpos = 0;
                lastx = nx;
@@ -500,8 +677,10 @@ T1_OUTLINE* gfxPath_to_T1_OUTLINE(GfxState*state, GfxPath*path)
           }
        }
     }
+    if(last->link) {free(last->link);}
     last->link = 0;
-    return (T1_OUTLINE*)start;
+
+    return (SWF_OUTLINE*)start;
 }
 /*----------------------------------------------------------------------------
  * Primitive Graphic routines
@@ -509,7 +688,6 @@ T1_OUTLINE* gfxPath_to_T1_OUTLINE(GfxState*state, GfxPath*path)
 
 void SWFOutputDev::stroke(GfxState *state) 
 {
-    msg("<debug> stroke\n");
     GfxPath * path = state->getPath();
     int lineCap = state->getLineCap(); // 0=butt, 1=round 2=square
     int lineJoin = state->getLineJoin(); // 0=miter, 1=round 2=bevel
@@ -522,7 +700,12 @@ void SWFOutputDev::stroke(GfxState *state)
 
     m.m11 = 1; m.m21 = 0; m.m22 = 1;
     m.m12 = 0; m.m13 = 0; m.m23 = 0;
-    T1_OUTLINE*outline = gfxPath_to_T1_OUTLINE(state, path);
+    SWF_OUTLINE*outline = gfxPath_to_SWF_OUTLINE(state, path);
+    
+    if(getLogLevel() >= LOGLEVEL_TRACE)  {
+        msg("<trace> stroke\n");
+        dump_outline(outline);
+    }
 
     lineJoin = 1; // other line joins are not yet supported by the swf encoder
                   // TODO: support bevel joints
@@ -545,51 +728,90 @@ void SWFOutputDev::stroke(GfxState *state)
        updateStrokeColor(state); //reset
        updateFillColor(state);  //reset
     }
+    free_outline(outline);
 }
 void SWFOutputDev::fill(GfxState *state) 
 {
-    msg("<debug> fill\n");
     GfxPath * path = state->getPath();
     struct swfmatrix m;
     m.m11 = 1; m.m21 = 0; m.m22 = 1;
     m.m12 = 0; m.m13 = 0; m.m23 = 0;
-    T1_OUTLINE*outline = gfxPath_to_T1_OUTLINE(state, path);
+    SWF_OUTLINE*outline = gfxPath_to_SWF_OUTLINE(state, path);
+
+    if(getLogLevel() >= LOGLEVEL_TRACE)  {
+        msg("<trace> fill\n");
+        dump_outline(outline);
+    }
+
     swfoutput_setdrawmode(&output, DRAWMODE_FILL);
     swfoutput_drawpath(&output, outline, &m);
+    free_outline(outline);
 }
 void SWFOutputDev::eoFill(GfxState *state) 
 {
-    msg("<debug> eofill\n");
     GfxPath * path = state->getPath();
     struct swfmatrix m;
     m.m11 = 1; m.m21 = 0; m.m22 = 1;
     m.m12 = 0; m.m13 = 0; m.m23 = 0;
-    T1_OUTLINE*outline = gfxPath_to_T1_OUTLINE(state, path);
+    SWF_OUTLINE*outline = gfxPath_to_SWF_OUTLINE(state, path);
+
+    if(getLogLevel() >= LOGLEVEL_TRACE)  {
+        msg("<trace> eofill\n");
+        dump_outline(outline);
+    }
+
     swfoutput_setdrawmode(&output, DRAWMODE_EOFILL);
     swfoutput_drawpath(&output, outline, &m);
+    free_outline(outline);
 }
 void SWFOutputDev::clip(GfxState *state) 
 {
-    msg("<debug> clip\n");
     GfxPath * path = state->getPath();
     struct swfmatrix m;
     m.m11 = 1; m.m22 = 1;
     m.m12 = 0; m.m21 = 0; 
     m.m13 = 0; m.m23 = 0;
-    T1_OUTLINE*outline = gfxPath_to_T1_OUTLINE(state, path);
+    SWF_OUTLINE*outline = gfxPath_to_SWF_OUTLINE(state, path);
+
+    if(getLogLevel() >= LOGLEVEL_TRACE)  {
+        msg("<trace> clip\n");
+        dump_outline(outline);
+    }
+
     swfoutput_startclip(&output, outline, &m);
     clipping[clippos] ++;
+    free_outline(outline);
 }
 void SWFOutputDev::eoClip(GfxState *state) 
 {
-    msg("<debug> eoclip\n");
     GfxPath * path = state->getPath();
     struct swfmatrix m;
     m.m11 = 1; m.m21 = 0; m.m22 = 1;
     m.m12 = 0; m.m13 = 0; m.m23 = 0;
-    T1_OUTLINE*outline = gfxPath_to_T1_OUTLINE(state, path);
+    SWF_OUTLINE*outline = gfxPath_to_SWF_OUTLINE(state, path);
+
+    if(getLogLevel() >= LOGLEVEL_TRACE)  {
+        msg("<trace> eoclip\n");
+        dump_outline(outline);
+    }
+
     swfoutput_startclip(&output, outline, &m);
     clipping[clippos] ++;
+    free_outline(outline);
+}
+
+/* pass through functions for swf_output */
+int SWFOutputDev::save(char*filename)
+{
+    return swfoutput_save(&output, filename);
+}
+void SWFOutputDev::pagefeed()
+{
+    swfoutput_pagefeed(&output);
+}
+void* SWFOutputDev::getSWF()
+{
+    return (void*)swfoutput_get(&output);
 }
 
 SWFOutputDev::~SWFOutputDev() 
@@ -599,12 +821,20 @@ SWFOutputDev::~SWFOutputDev()
 };
 GBool SWFOutputDev::upsideDown() 
 {
-    msg("<debug> upsidedown?");
+    msg("<debug> upsidedown? yes");
     return gTrue;
 };
 GBool SWFOutputDev::useDrawChar() 
 {
-    msg("<debug> usedrawchar?");
+    return gTrue;
+}
+GBool SWFOutputDev::useGradients()
+{
+    if(!gradientinfo)
+    {
+       msg("<notice> File contains gradients");
+       gradientinfo = 1;
+    }
     return gTrue;
 }
 
@@ -618,67 +848,69 @@ void SWFOutputDev::beginString(GfxState *state, GString *s)
     swfoutput_setfontmatrix(&output, m11, -m21, m12, -m22);
 }
 
-int charcounter = 0;
 void SWFOutputDev::drawChar(GfxState *state, double x, double y,
                        double dx, double dy,
                        double originX, double originY,
                        CharCode c, Unicode *_u, int uLen)
 {
-    msg("<debug> drawChar(%f,%f,%f,%f,'%c')\n",x,y,dx,dy,c);
-    
     // check for invisible text -- this is used by Acrobat Capture
     if ((state->getRender() & 3) == 3)
        return;
-
+    Gushort *CIDToGIDMap = 0;
     GfxFont*font = state->getFont();
 
     if(font->getType() == fontType3) {
-       /* type 3 chars are passed primarily as graphics */
+       /* type 3 chars are passed as graphics */
        return;
     }
     double x1,y1;
     x1 = x;
     y1 = y;
     state->transform(x, y, &x1, &y1);
+    
+    Unicode u=0;
+    char*name=0;
 
-    if(font->isCIDFont()) {
-       GfxCIDFont*cfont = (GfxCIDFont*)font;
-       Unicode u=0;
-       char*name=0;
-       if(_u) 
-           u = *_u;
-       if(u) {
+    if(_u && uLen) {
+       u = *_u;
+       if (u) {
            int t;
-           for(t=0;t<sizeof(nameToUnicodeTab)/sizeof(nameToUnicodeTab[0]);t++)
-               /* todo: should be precomputed */
+           /* find out char name from unicode index 
+              TODO: should be precomputed
+            */
+           for(t=0;t<sizeof(nameToUnicodeTab)/sizeof(nameToUnicodeTab[0]);t++) {
                if(nameToUnicodeTab[t].u == u) {
                    name = nameToUnicodeTab[t].name;
                    break;
                }
+           }
        }
-/*        printf("%02x %04x/%04x-%d \"%s\" %s %d\n", c,u, *_u, uLen, name, cfont->getName()->getCString(),
-               cfont->getType());*/
+    }
+
+    if(font->isCIDFont()) {
+       GfxCIDFont*cfont = (GfxCIDFont*)font;
 
-       if(name)
-          swfoutput_drawchar(&output, x1, y1, name, c);
-       else
-          msg("<warning> couldn't get name for CID character %02x from Encoding", c);
+       if(font->getType() == fontCIDType2) {
+           CIDToGIDMap = cfont->getCIDToGID();
+       }
     } else {
        Gfx8BitFont*font8;
        font8 = (Gfx8BitFont*)font;
        char**enc=font8->getEncoding();
-
        if(enc && enc[c])
-          swfoutput_drawchar(&output, x1, y1, enc[c], c);
-       else {
-          msg("<warning> couldn't get name for character %02x from Encoding", c);
-       }
+          name = enc[c];
+    }
+    if (CIDToGIDMap) {
+       msg("<debug> drawChar(%f, %f, c='%c' (%d), GID=%d, u=%d <%d>) CID=%d name=\"%s\"\n", x, y, (c&127)>=32?c:'?', c, CIDToGIDMap[c], u, uLen, font->isCIDFont(), FIXNULL(name));
+       swfoutput_drawchar(&output, x1, y1, name, CIDToGIDMap[c], u);
+    } else {
+       msg("<debug> drawChar(%f,%f,c='%c' (%d), u=%d <%d>) CID=%d name=\"%s\"\n",x,y,(c&127)>=32?c:'?',c,u, uLen, font->isCIDFont(), FIXNULL(name));
+       swfoutput_drawchar(&output, x1, y1, name, c, u);
     }
 }
 
-void SWFOutputDev::endString(GfxState *state) 
-{ 
-    msg("<debug> endstring\n");
+void SWFOutputDev::endString(GfxState *state) { 
 }    
 
  
@@ -698,34 +930,61 @@ void SWFOutputDev::endType3Char(GfxState *state)
     msg("<debug> endType3Char");
 }
 
-void SWFOutputDev::startPage(int pageNum, GfxState *state) 
+void SWFOutputDev::startPage(int pageNum, GfxState *state, double crop_x1, double crop_y1, double crop_x2, double crop_y2) 
 {
-  double x1,y1,x2,y2;
-  laststate = state;
-  msg("<debug> startPage %d\n", pageNum);
-  msg("<notice> processing page %d", pageNum);
+    this->currentpage = pageNum;
+    double x1,y1,x2,y2;
+    int rot = doc->getPageRotate(1);
+    laststate = state;
+    msg("<verbose> startPage %d (%f,%f,%f,%f)\n", pageNum, crop_x1, crop_y1, crop_x2, crop_y2);
+    if(rot!=0)
+        msg("<verbose> page is rotated %d degrees\n", rot);
+
+    /* state->transform(state->getX1(),state->getY1(),&x1,&y1);
+    state->transform(state->getX2(),state->getY2(),&x2,&y2);
+    Use CropBox, not MediaBox, as page size
+    */
+    
+    /*x1 = crop_x1;
+    y1 = crop_y1;
+    x2 = crop_x2;
+    y2 = crop_y2;*/
+    state->transform(crop_x1,crop_y1,&x1,&y1);
+    state->transform(crop_x2,crop_y2,&x2,&y2);
+
+    if(x2<x1) {double x3=x1;x1=x2;x2=x3;}
+    if(y2<y1) {double y3=y1;y1=y2;y2=y3;}
+
+    /* apply user clip box */
+    if(user_clipx1|user_clipy1|user_clipx2|user_clipy2) {
+        /*if(user_clipx1 > x1)*/ x1 = user_clipx1;
+        /*if(user_clipx2 < x2)*/ x2 = user_clipx2;
+        /*if(user_clipy1 > y1)*/ y1 = user_clipy1;
+        /*if(user_clipy2 < y2)*/ y2 = user_clipy2;
+    }
 
-  state->transform(state->getX1(),state->getY1(),&x1,&y1);
-  state->transform(state->getX2(),state->getY2(),&x2,&y2);
-  if(!outputstarted) {
-    swfoutput_init(&output, swffilename, abs((int)(x2-x1)),abs((int)(y2-y1)));
-    outputstarted = 1;
-  }
-  else
-    swfoutput_newpage(&output);
+    if(!outputstarted) {
+        msg("<verbose> Bounding box is (%f,%f)-(%f,%f)", x1,y1,x2,y2);
+        swfoutput_init(&output);
+        outputstarted = 1;
+    }
+      
+    swfoutput_newpage(&output, pageNum, user_movex, user_movey, (int)x1, (int)y1, (int)x2, (int)y2);
 }
 
 void SWFOutputDev::drawLink(Link *link, Catalog *catalog) 
 {
-  msg("<debug> drawlink\n");
-  double x1, y1, x2, y2, w;
-  GfxRGB rgb;
-  swfcoord points[5];
-  int x, y;
+    msg("<debug> drawlink\n");
+    double x1, y1, x2, y2, w;
+    GfxRGB rgb;
+    swfcoord points[5];
+    int x, y;
 
-  link->getBorder(&x1, &y1, &x2, &y2, &w);
-//  if (w > 0) 
-  {
+#ifdef XPDF_101
+    link->getBorder(&x1, &y1, &x2, &y2, &w);
+#else
+    link->getRect(&x1, &y1, &x2, &y2);
+#endif
     rgb.r = 0;
     rgb.g = 0;
     rgb.b = 1;
@@ -744,121 +1003,124 @@ void SWFOutputDev::drawLink(Link *link, Catalog *catalog)
 
     LinkAction*action=link->getAction();
     char buf[128];
-    char*s = "-?-";
+    char*s = 0;
     char*type = "-?-";
     char*url = 0;
     char*named = 0;
     int page = -1;
     switch(action->getKind())
     {
-       case actionGoTo: {
-           type = "GoTo";
-           LinkGoTo *ha=(LinkGoTo *)link->getAction();
-           LinkDest *dest=NULL;
-           if (ha->getDest()==NULL) 
-               dest=catalog->findDest(ha->getNamedDest());
-           else dest=ha->getDest();
-           if (dest){ 
-             if (dest->isPageRef()){
-               Ref pageref=dest->getPageRef();
-               page=catalog->findPage(pageref.num,pageref.gen);
-             }
-             else  page=dest->getPageNum();
-             sprintf(buf, "%d", page);
-             s = buf;
-           }
-       }
+        case actionGoTo: {
+            type = "GoTo";
+            LinkGoTo *ha=(LinkGoTo *)link->getAction();
+            LinkDest *dest=NULL;
+            if (ha->getDest()==NULL) 
+                dest=catalog->findDest(ha->getNamedDest());
+            else dest=ha->getDest();
+            if (dest){ 
+              if (dest->isPageRef()){
+                Ref pageref=dest->getPageRef();
+                page=catalog->findPage(pageref.num,pageref.gen);
+              }
+              else  page=dest->getPageNum();
+              sprintf(buf, "%d", page);
+              s = strdup(buf);
+            }
+        }
         break;
-       case actionGoToR: {
-           type = "GoToR";
-           LinkGoToR*l = (LinkGoToR*)action;
-           GString*g = l->getNamedDest();
-           if(g)
-            s = g->getCString();
-       }
+        case actionGoToR: {
+            type = "GoToR";
+            LinkGoToR*l = (LinkGoToR*)action;
+            GString*g = l->getNamedDest();
+            if(g)
+             s = strdup(g->getCString());
+        }
         break;
-       case actionNamed: {
-           type = "Named";
-           LinkNamed*l = (LinkNamed*)action;
-           GString*name = l->getName();
-           if(name) {
-               s = name->lowerCase()->getCString();
-               named = name->getCString();
-               if(!strchr(s,':')) 
-               {
-                   if(strstr(s, "next") || strstr(s, "forward"))
-                   {
-                       page = currentpage + 1;
-                   }
-                   else if(strstr(s, "prev") || strstr(s, "back"))
-                   {
-                       page = currentpage - 1;
-                   }
-                   else if(strstr(s, "last") || strstr(s, "end"))
-                   {
-                       page = pages[pagepos-1]; //:)
-                   }
-                   else if(strstr(s, "first") || strstr(s, "top"))
-                   {
-                       page = 1;
-                   }
-               }
-           }
-       }
+        case actionNamed: {
+            type = "Named";
+            LinkNamed*l = (LinkNamed*)action;
+            GString*name = l->getName();
+            if(name) {
+                s = strdup(name->lowerCase()->getCString());
+                named = name->getCString();
+                if(!strchr(s,':')) 
+                {
+                    if(strstr(s, "next") || strstr(s, "forward"))
+                    {
+                        page = currentpage + 1;
+                    }
+                    else if(strstr(s, "prev") || strstr(s, "back"))
+                    {
+                        page = currentpage - 1;
+                    }
+                    else if(strstr(s, "last") || strstr(s, "end"))
+                    {
+                        page = pagepos>0?pages[pagepos-1]:0;
+                    }
+                    else if(strstr(s, "first") || strstr(s, "top"))
+                    {
+                        page = 1;
+                    }
+                }
+            }
+        }
         break;
-       case actionLaunch: {
-           type = "Launch";
-           LinkLaunch*l = (LinkLaunch*)action;
-           GString * str = new GString(l->getFileName());
-           str->append(l->getParams());
-           s = str->getCString();
-       }
+        case actionLaunch: {
+            type = "Launch";
+            LinkLaunch*l = (LinkLaunch*)action;
+            GString * str = new GString(l->getFileName());
+            str->append(l->getParams());
+            s = strdup(str->getCString());
+            delete str;
+        }
         break;
-       case actionURI: {
-           type = "URI";
-           LinkURI*l = (LinkURI*)action;
-           GString*g = l->getURI();
-           if(g) {
-            url = g->getCString();
-            s = url;
-           }
-       }
+        case actionURI: {
+            type = "URI";
+            LinkURI*l = (LinkURI*)action;
+            GString*g = l->getURI();
+            if(g) {
+             url = g->getCString();
+             s = strdup(url);
+            }
+        }
         break;
-       case actionUnknown: {
-           type = "Unknown";
-           LinkUnknown*l = (LinkUnknown*)action;
-           s = "";
-       }
+        case actionUnknown: {
+            type = "Unknown";
+            LinkUnknown*l = (LinkUnknown*)action;
+            s = strdup("");
+        }
         break;
-       default: {
-           msg("<error> Unknown link type!\n");
-           break;
-       }
+        default: {
+            msg("<error> Unknown link type!\n");
+            break;
+        }
     }
+    if(!s) s = strdup("-?-");
+
     if(!linkinfo && (page || url))
     {
-       msg("<notice> File contains links");
-       linkinfo = 1;
+        msg("<notice> File contains links");
+        linkinfo = 1;
     }
     if(page>0)
     {
-       int t;
-       for(t=0;t<pagepos;t++)
-           if(pages[t]==page)
-               break;
-       if(t!=pagepos)
-       swfoutput_linktopage(&output, t, points);
+        int t;
+        for(t=0;t<pagepos;t++)
+            if(pages[t]==page)
+                break;
+        if(t!=pagepos)
+            swfoutput_linktopage(&output, t, points);
     }
     else if(url)
     {
-       swfoutput_linktourl(&output, url, points);
+        swfoutput_linktourl(&output, url, points);
     }
     else if(named)
     {
-       swfoutput_namedlink(&output, named, points);
+        swfoutput_namedlink(&output, named, points);
     }
     msg("<verbose> \"%s\" link to \"%s\" (%d)\n", type, FIXNULL(s), page);
-  }
+    free(s);s=0;
 }
 
 void SWFOutputDev::saveState(GfxState *state) {
@@ -881,58 +1143,39 @@ void SWFOutputDev::restoreState(GfxState *state) {
   clippos--;
 }
 
-char type3Warning=0;
-
-int SWFOutputDev::searchT1Font(char*name) 
+char* SWFOutputDev::searchFont(char*name) 
 {      
     int i;
-    int mapid=-1;
     char*filename=0;
+    int is_standard_font = 0;
+       
+    msg("<verbose> SearchFont(%s)", name);
 
+    /* see if it is a pdf standard font */
     for(i=0;i<sizeof(pdf2t1map)/sizeof(mapping);i++) 
     {
        if(!strcmp(name, pdf2t1map[i].pdffont))
        {
-           filename = pdf2t1map[i].filename;
-           mapid = i;
+           name = pdf2t1map[i].filename;
+           is_standard_font = 1;
+           break;
        }
     }
-    if(filename) {
-       for(i=0; i<T1_Get_no_fonts(); i++)
-       {
-           char*fontfilename = T1_GetFontFileName (i);
-           if(strstr(fontfilename, filename))
-           {
-                   pdf2t1map[i].id = mapid;
-                   return i;
-           }
-       }
-    } else {
-       for(i=0; i<T1_Get_no_fonts(); i++)
+    /* look in all font files */
+    for(i=0;i<fontnum;i++) 
+    {
+       if(strstr(fonts[i].filename, name))
        {
-           char*fontname = T1_GetFontName (i);
-           if(!fontname) {
-               T1_LoadFont(i);
-               fontname = T1_GetFontName (i);
-               msg("<verbose> Loading extra font %s from %s\n", FIXNULL(fontname), 
-                                                                 FIXNULL(T1_GetFontFileName(i)));
-           }
+           if(!fonts[i].used) {
 
-           if(fontname && !strcmp(name, fontname)) {
-               msg("<notice> Extra font %d, \"%s\" is being used.\n", i, fontname);
-               return i;
-           }
-           fontname = T1_GetFontFileName(i);
-           if(strrchr(fontname,'/'))
-                   fontname = strrchr(fontname,'/')+1;
-           if(strstr(fontname, name)) {
-               msg("<notice> Extra font %d, \"%s\" is being used.\n", i, fontname);
-               return i;
+               fonts[i].used = 1;
+               if(!is_standard_font)
+                   msg("<notice> Using %s for %s", fonts[i].filename, name);
            }
+           return strdup(fonts[i].filename);
        }
     }
-    return -1;
+    return 0;
 }
 
 void SWFOutputDev::updateLineWidth(GfxState *state)
@@ -971,132 +1214,248 @@ void SWFOutputDev::updateStrokeColor(GfxState *state)
                                      (char)(rgb.b*255), (char)(opaq*255));
 }
 
+void FoFiWrite(void *stream, char *data, int len)
+{
+   fwrite(data, len, 1, (FILE*)stream);
+}
+
 char*SWFOutputDev::writeEmbeddedFontToFile(XRef*ref, GfxFont*font)
 {
-      char*tmpFileName = NULL;
-      FILE *f;
-      int c;
-      char *fontBuf;
-      int fontLen;
-      Type1CFontFile *cvt;
-      Ref embRef;
-      Object refObj, strObj;
-      tmpFileName = "/tmp/tmpfont";
-      int ret;
-
-      ret = font->getEmbeddedFontID(&embRef);
-      if(!ret) {
-         msg("<verbose> Didn't get embedded font id");
-         /* not embedded- the caller should now search the font
-            directories for this font */
-         return 0;
-      }
+    char*tmpFileName = NULL;
+    FILE *f;
+    int c;
+    char *fontBuf;
+    int fontLen;
+    Ref embRef;
+    Object refObj, strObj;
+    char namebuf[512];
+    tmpFileName = mktmpname(namebuf);
+    int ret;
+
+    ret = font->getEmbeddedFontID(&embRef);
+    if(!ret) {
+       msg("<verbose> Didn't get embedded font id");
+       /* not embedded- the caller should now search the font
+          directories for this font */
+       return 0;
+    }
 
-      f = fopen(tmpFileName, "wb");
-      if (!f) {
-       msg("<error> Couldn't create temporary Type 1 font file");
-         return 0;
-      }
-      if (font->getType() == fontType1C) {
-       if (!(fontBuf = font->readEmbFontFile(xref, &fontLen))) {
-         fclose(f);
-         msg("<error> Couldn't read embedded font file");
-         return 0;
-       }
-       cvt = new Type1CFontFile(fontBuf, fontLen);
-       cvt->convertToType1(f);
-       delete cvt;
-       gfree(fontBuf);
-      } else {
-       font->getEmbeddedFontID(&embRef);
-       refObj.initRef(embRef.num, embRef.gen);
-       refObj.fetch(ref, &strObj);
-       refObj.free();
-       strObj.streamReset();
-       int f4[4];
-       char f4c[4];
-       int t;
-       for(t=0;t<4;t++) {
-           f4[t] = strObj.streamGetChar();
-           f4c[t] = (char)f4[t];
-           if(f4[t] == EOF)
-               break;
-       }
-       if(t==4) {
-           if(!strncmp(f4c, "true", 4)) {
-               /* some weird TTF fonts don't start with 0,1,0,0 but with "true".
-                  Change this on the fly */
-               f4[0] = f4[2] = f4[3] = 0;
-               f4[1] = 1;
-           }
-           fputc(f4[0], f);
-           fputc(f4[1], f);
-           fputc(f4[2], f);
-           fputc(f4[3], f);
+    f = fopen(tmpFileName, "wb");
+    if (!f) {
+      msg("<error> Couldn't create temporary Type 1 font file");
+       return 0;
+    }
 
-           while ((c = strObj.streamGetChar()) != EOF) {
-             fputc(c, f);
-           }
-       }
-       strObj.streamClose();
-       strObj.free();
+    /*if(font->isCIDFont()) {
+       GfxCIDFont* cidFont = (GfxCIDFont *)font;
+       GString c = cidFont->getCollection();
+       msg("<notice> Collection: %s", c.getCString());
+    }*/
+
+    if (font->getType() == fontType1C ||
+       font->getType() == fontCIDType0C) {
+      if (!(fontBuf = font->readEmbFontFile(xref, &fontLen))) {
+       fclose(f);
+       msg("<error> Couldn't read embedded font file");
+       return 0;
       }
-      fclose(f);
-
-      if(font->getType() == fontTrueType ||
-        font->getType() == fontCIDType2)
-      {
-         if(!ttfinfo) {
-             msg("<notice> File contains TrueType fonts");
-             ttfinfo = 1;
-         }
-         char name2[80];
-         char*tmp;
-         tmp = strdup(mktmpname((char*)name2));
-         sprintf(name2, "%s", tmp);
-         char*a[] = {"./ttf2pt1", "-W0",
-#ifndef USE_FREETYPE
-             "-pttf",
+#ifdef XPDF_101
+      Type1CFontFile *cvt = new Type1CFontFile(fontBuf, fontLen);
+      if(!cvt) return 0;
+      cvt->convertToType1(f);
 #else
-             "-pft",
+      FoFiType1C *cvt = FoFiType1C::make(fontBuf, fontLen);
+      if(!cvt) return 0;
+      cvt->convertToType1(NULL, gTrue, FoFiWrite, f);
 #endif
-             "-b", tmpFileName, name2};
-         msg("<verbose> Invoking ttf2pt1...");
-         ttf2pt1_main(6,a);
-         unlink(tmpFileName);
-         sprintf(name2,"%s.pfb",tmp);
-         tmpFileName = strdup(name2);
+      //cvt->convertToCIDType0("test", f);
+      //cvt->convertToType0("test", f);
+      delete cvt;
+      gfree(fontBuf);
+    } else if(font->getType() == fontTrueType) {
+      msg("<verbose> writing font using TrueTypeFontFile::writeTTF");
+      if (!(fontBuf = font->readEmbFontFile(xref, &fontLen))) {
+       fclose(f);
+       msg("<error> Couldn't read embedded font file");
+       return 0;
       }
-
-    return tmpFileName;
-}
-
-char* gfxFontName(GfxFont* gfxFont)
-{
-      GString *gstr;
-      gstr = gfxFont->getName();
-      if(gstr) {
-         return gstr->getCString();
+#ifdef XPDF_101
+      TrueTypeFontFile *cvt = new TrueTypeFontFile(fontBuf, fontLen);
+      cvt->writeTTF(f);
+#else
+      FoFiTrueType *cvt = FoFiTrueType::make(fontBuf, fontLen);
+      cvt->writeTTF(FoFiWrite, f);
+#endif
+      delete cvt;
+      gfree(fontBuf);
+    } else {
+      font->getEmbeddedFontID(&embRef);
+      refObj.initRef(embRef.num, embRef.gen);
+      refObj.fetch(ref, &strObj);
+      refObj.free();
+      strObj.streamReset();
+      int f4[4];
+      char f4c[4];
+      int t;
+      for(t=0;t<4;t++) {
+         f4[t] = strObj.streamGetChar();
+         f4c[t] = (char)f4[t];
+         if(f4[t] == EOF)
+             break;
       }
-      else {
-         char buf[32];
-         Ref*r=gfxFont->getID();
-         sprintf(buf, "UFONT%d", r->num);
-         return strdup(buf);
+      if(t==4) {
+         if(!strncmp(f4c, "true", 4)) {
+             /* some weird TTF fonts don't start with 0,1,0,0 but with "true".
+                Change this on the fly */
+             f4[0] = f4[2] = f4[3] = 0;
+             f4[1] = 1;
+         }
+         fputc(f4[0], f);
+         fputc(f4[1], f);
+         fputc(f4[2], f);
+         fputc(f4[3], f);
+
+         while ((c = strObj.streamGetChar()) != EOF) {
+           fputc(c, f);
+         }
       }
+      strObj.streamClose();
+      strObj.free();
+    }
+    fclose(f);
+
+    return strdup(tmpFileName);
 }
+    
+char* searchForSuitableFont(GfxFont*gfxFont)
+{
+    char*name = getFontName(gfxFont);
+    char*fontname = 0;
+    char*filename = 0;
 
-char* substitutetarget[256];
-char* substitutesource[256];
-int substitutepos = 0;
+    if(!config_use_fontconfig)
+        return 0;
+    
+#ifdef HAVE_FONTCONFIG
+    FcPattern *pattern, *match;
+    FcResult result;
+    FcChar8 *v;
+
+    static int fcinitcalled = false; 
+        
+    msg("<debug> searchForSuitableFont(%s)", name);
+    
+    // call init ony once
+    if (!fcinitcalled) {
+        msg("<debug> Initializing FontConfig...");
+        fcinitcalled = true;
+       if(FcInit()) {
+            msg("<debug> FontConfig Initialization failed. Disabling.");
+            config_use_fontconfig = 0;
+            return 0;
+        }
+        msg("<debug> ...initialized FontConfig");
+    }
+   
+    msg("<debug> FontConfig: Create \"%s\" Family Pattern", name);
+    pattern = FcPatternBuild(NULL, FC_FAMILY, FcTypeString, name, NULL);
+    if (gfxFont->isItalic()) // check for italic
+        msg("<debug> FontConfig: Adding Italic Slant");
+       FcPatternAddInteger(pattern, FC_SLANT, FC_SLANT_ITALIC);
+    if (gfxFont->isBold()) // check for bold
+        msg("<debug> FontConfig: Adding Bold Weight");
+        FcPatternAddInteger(pattern, FC_WEIGHT, FC_WEIGHT_BOLD);
+
+    msg("<debug> FontConfig: Try to match...");
+    // configure and match using the original font name 
+    FcConfigSubstitute(0, pattern, FcMatchPattern); 
+    FcDefaultSubstitute(pattern);
+    match = FcFontMatch(0, pattern, &result);
+    
+    if (FcPatternGetString(match, "family", 0, &v) == FcResultMatch) {
+        msg("<debug> FontConfig: family=%s", (char*)v);
+        // if we get an exact match
+        if (strcmp((char *)v, name) == 0) {
+           if (FcPatternGetString(match, "file", 0, &v) == FcResultMatch) {
+               filename = strdup((char*)v);
+               char *nfn = strrchr(filename, '/');
+               if(nfn) fontname = strdup(nfn+1);
+               else    fontname = filename;
+            }
+            msg("<debug> FontConfig: Returning \"%s\"", fontname);
+        } else {
+            // initialize patterns
+            FcPatternDestroy(pattern);
+           FcPatternDestroy(match);
+
+            // now match against serif etc.
+           if (gfxFont->isSerif()) {
+                msg("<debug> FontConfig: Create Serif Family Pattern");
+                pattern = FcPatternBuild (NULL, FC_FAMILY, FcTypeString, "serif", NULL);
+            } else if (gfxFont->isFixedWidth()) {
+                msg("<debug> FontConfig: Create Monospace Family Pattern");
+                pattern = FcPatternBuild (NULL, FC_FAMILY, FcTypeString, "monospace", NULL);
+            } else {
+                msg("<debug> FontConfig: Create Sans Family Pattern");
+                pattern = FcPatternBuild (NULL, FC_FAMILY, FcTypeString, "sans", NULL);
+            }
+
+            // check for italic
+            if (gfxFont->isItalic()) {
+                msg("<debug> FontConfig: Adding Italic Slant");
+                int bb = FcPatternAddInteger(pattern, FC_SLANT, FC_SLANT_ITALIC);
+            }
+            // check for bold
+            if (gfxFont->isBold()) {
+                msg("<debug> FontConfig: Adding Bold Weight");
+                int bb = FcPatternAddInteger(pattern, FC_WEIGHT, FC_WEIGHT_BOLD);
+            }
+
+            msg("<debug> FontConfig: Try to match... (2)");
+            // configure and match using serif etc
+           FcConfigSubstitute (0, pattern, FcMatchPattern);
+            FcDefaultSubstitute (pattern);
+            match = FcFontMatch (0, pattern, &result);
+            
+            if (FcPatternGetString(match, "file", 0, &v) == FcResultMatch) {
+               filename = strdup((char*)v);
+               char *nfn = strrchr(filename, '/');
+               if(nfn) fontname = strdup(nfn+1);
+               else    fontname = filename;
+           }
+            msg("<debug> FontConfig: Returning \"%s\"", fontname);
+        }        
+    }
+
+    //printf("FONTCONFIG: pattern");
+    //FcPatternPrint(pattern);
+    //printf("FONTCONFIG: match");
+    //FcPatternPrint(match);
+    FcPatternDestroy(pattern);
+    FcPatternDestroy(match);
+
+    pdfswf_addfont(filename);
+    return fontname;
+#else
+    return 0;
+#endif
+}
 
 char* SWFOutputDev::substituteFont(GfxFont*gfxFont, char* oldname)
 {
-/* ------------------------------ V1 */
+    char*fontname = 0, *filename = 0;
+    msg("<notice> subsituteFont(%s)", oldname);
+
+    if(!(fontname = searchForSuitableFont(gfxFont))) {
+       fontname = "Times-Roman";
+    }
+    filename = searchFont(fontname);
+    if(!filename) {
+       msg("<error> Couldn't find font %s- did you install the default fonts?");
+       return 0;
+    }
 
-    char*fontname = "Times-Roman";
-    msg("<verbose> substituteFont(,%s)", FIXNULL(oldname));
-    this->t1id = searchT1Font(fontname);
     if(substitutepos>=sizeof(substitutesource)/sizeof(char*)) {
        msg("<fatal> Too many fonts in file.");
        exit(1);
@@ -1104,98 +1463,10 @@ char* SWFOutputDev::substituteFont(GfxFont*gfxFont, char* oldname)
     if(oldname) {
        substitutesource[substitutepos] = oldname;
        substitutetarget[substitutepos] = fontname;
-       msg("<verbose> substituting %s -> %s", FIXNULL(oldname), FIXNULL(fontname));
+       msg("<notice> substituting %s -> %s", FIXNULL(oldname), FIXNULL(fontname));
        substitutepos ++;
     }
-    return fontname;
-
-/* ------------------------------ V2 */
-
-/*      //substitute font
-      char* fontname = 0;
-      double m11, m12, m21, m22;
-      int index;
-      int code;
-      double w,w1,w2;
-      double*fm;
-      double v;
-      if(gfxFont->getName()) {
-       fontname = gfxFont->getName()->getCString();
-      }
-
-//       printf("%d %s\n", t, gfxFont->getCharName(t));
-      showFontError(gfxFont, 1);
-      if(1) { //if (!gfxFont->isCIDFont()) { FIXME: xpdf 1.01 does not have is16Bit()
-       if(gfxFont->isSymbolic()) {
-         if(fontname && (strstr(fontname,"ing"))) //Dingbats, Wingdings etc.
-          index = 16;
-         else 
-          index = 12;
-        } else if (gfxFont->isFixedWidth()) {
-         index = 8;
-       } else if (gfxFont->isSerif()) {
-         index = 4;
-       } else {
-         index = 0;
-       }
-       if (gfxFont->isBold() && index!=16)
-         index += 2;
-       if (gfxFont->isItalic() && index!=16)
-         index += 1;
-       fontname = fontnames[index];
-       // get width of 'm' in real font and substituted font
-       if ((code = gfxFont->getCharCode("m")) >= 0)
-         w1 = gfxFont->getWidth(code);
-       else
-         w1 = 0;
-       w2 = fontsizes[index];
-       if (gfxFont->getType() == fontType3) {
-         // This is a hack which makes it possible to substitute for some
-         // Type 3 fonts.  The problem is that it's impossible to know what
-         // the base coordinate system used in the font is without actually
-         // rendering the font.  This code tries to guess by looking at the
-         // width of the character 'm' (which breaks if the font is a
-         // subset that doesn't contain 'm').
-         if (w1 > 0 && (w1 > 1.1 * w2 || w1 < 0.9 * w2)) {
-           w1 /= w2;
-           m11 *= w1;
-           m12 *= w1;
-           m21 *= w1;
-           m22 *= w1;
-         }
-         fm = gfxFont->getFontMatrix();
-         v = (fm[0] == 0) ? 1 : (fm[3] / fm[0]);
-         m21 *= v;
-         m22 *= v;
-       } else if (!gfxFont->isSymbolic()) {
-         // if real font is substantially narrower than substituted
-         // font, reduce the font size accordingly
-         if (w1 > 0.01 && w1 < 0.9 * w2) {
-           w1 /= w2;
-           if (w1 < 0.8) {
-             w1 = 0.8;
-           }
-           m11 *= w1;
-           m12 *= w1;
-           m21 *= w1;
-           m22 *= w1;
-         }
-       }
-      }
-      if(fontname) {
-        this->t1id = searchT1Font(fontname);
-      }
-      if(substitutepos>=sizeof(substitutesource)/sizeof(char*)) {
-         msg("<fatal> Too many fonts in file.");
-         exit(1);
-      }
-      if(oldname) {
-         substitutesource[substitutepos] = oldname;
-         substitutetarget[substitutepos] = fontname;
-         msg("<verbose> substituting %s -> %s", FIXNULL(oldname), FIXNULL(fontname));
-         substitutepos ++;
-      }
-      return fontname;*/
+    return strdup(filename);
 }
 
 void unlinkfont(char* filename)
@@ -1227,125 +1498,100 @@ void unlinkfont(char* filename)
     }
 }
 
-void SWFOutputDev::startDoc(XRef *xref) 
+void SWFOutputDev::setXRef(PDFDoc*doc, XRef *xref) 
 {
-  this->xref = xref;
+    this->doc = doc;
+    this->xref = xref;
 }
 
 
 void SWFOutputDev::updateFont(GfxState *state) 
 {
-  GfxFont*gfxFont = state->getFont();
-  char * fileName = 0;
+    GfxFont*gfxFont = state->getFont();
+      
+    if (!gfxFont) {
+       return;
+    }  
+    char * fontid = getFontID(gfxFont);
     
-  if (!gfxFont) {
-    return;
-  }  
-  char * fontname = gfxFontName(gfxFont);
-  int t;
-  /* first, look if we substituted this font before-
-     this way, we don't initialize the T1 Fonts
-     too often */
-  for(t=0;t<substitutepos;t++) {
-      if(!strcmp(fontname, substitutesource[t])) {
-         fontname = substitutetarget[t];
-         break;
-      }
-  }
+    int t;
+    /* first, look if we substituted this font before-
+       this way, we don't initialize the T1 Fonts
+       too often */
+    for(t=0;t<substitutepos;t++) {
+       if(!strcmp(fontid, substitutesource[t])) {
+           fontid = substitutetarget[t];
+           break;
+       }
+    }
 
-  /* second, see if swfoutput already has this font
-     cached- if so, we are done */
+    /* second, see if swfoutput already has this font
+       cached- if so, we are done */
+    if(swfoutput_queryfont(&output, fontid))
+    {
+       swfoutput_setfont(&output, fontid, 0);
+       
+       msg("<debug> updateFont(%s) [cached]", fontid);
+       return;
+    }
 
-  if(swfoutput_queryfont(&output, fontname))
-  {
-      swfoutput_setfont(&output, fontname, -1, 0);
-      return;
-  }
+    // look for Type 3 font
+    if (gfxFont->getType() == fontType3) {
+       if(!type3Warning) {
+           type3Warning = gTrue;
+           showFontError(gfxFont, 2);
+       }
+       return;
+    }
 
-  // look for Type 3 font
-  if (!type3Warning && gfxFont->getType() == fontType3) {
-    type3Warning = gTrue;
-    showFontError(gfxFont, 2);
-  }
+    /* now either load the font, or find a substitution */
 
-  /* now either load the font, or find a substitution */
+    Ref embRef;
+    GBool embedded = gfxFont->getEmbeddedFontID(&embRef);
 
-  Ref embRef;
-  GBool embedded = gfxFont->getEmbeddedFontID(&embRef);
-  if(embedded) {
-    if (gfxFont->getType() == fontType1 ||
+    char*fileName = 0;
+    int del = 0;
+    if(embedded &&
+       (gfxFont->getType() == fontType1 ||
        gfxFont->getType() == fontType1C ||
+       (gfxFont->getType() == fontCIDType0C && forceType0Fonts) ||
        gfxFont->getType() == fontTrueType ||
-       gfxFont->getType() == fontCIDType2) 
+       gfxFont->getType() == fontCIDType2
+       ))
     {
-       fileName = writeEmbeddedFontToFile(xref, gfxFont);
-       if(!fileName) {
-         msg("<error> Couldn't write font to file");
-         showFontError(gfxFont,0);
-         return ;
-       }
-       this->t1id = T1_AddFont(fileName);
-       if(this->t1id<0) {
-         msg("<error> Couldn't load font from file");
-         showFontError(gfxFont,0);
-         unlinkfont(fileName);
-         return ;
-       }
-    }
-    else {
-       /* in case the font is embedded, but has an
-          unsupported format, we just look through the
-          font directories */
-       int newt1id = searchT1Font(fontname);
-       if(newt1id<0) {
-           showFontError(gfxFont,0);
-           fontname = substituteFont(gfxFont, fontname);
-       } else
-           this->t1id = newt1id;
-    }
-  } else {
-    if(fontname) {
-       int newt1id = searchT1Font(fontname);
-       if(newt1id<0) {
-           showFontError(gfxFont,1);
-           fontname = substituteFont(gfxFont, fontname);
-       } else
-           this->t1id = newt1id;
+      fileName = writeEmbeddedFontToFile(xref, gfxFont);
+      if(!fileName) showFontError(gfxFont,0);
+      else del = 1;
+    } else {
+      char * fontname = getFontName(gfxFont);
+      fileName = searchFont(fontname);
+      if(!fileName) showFontError(gfxFont,0);
     }
-    else {
-       showFontError(gfxFont,1);
-       fontname = substituteFont(gfxFont, fontname);
+    if(!fileName) {
+       char * fontname = getFontName(gfxFont);
+       msg("<warning> Font %s %scould not be loaded.", fontname, embedded?"":"(not embedded) ");
+       msg("<warning> Try putting a TTF version of that font (named \"%s.ttf\") into /swftools/fonts", fontname);
+       fileName = substituteFont(gfxFont, fontid);
+       if(fontid) { fontid = substitutetarget[substitutepos-1]; /*ugly hack*/};
+       msg("<notice> Font is now %s (%s)", fontid, fileName);
     }
-  }
-
-  if(t1id<0) {
-      showFontError(gfxFont,0);
-      return;
-  }
-  /* we may have done some substitutions here, so check
-     again if this font is cached. */
-  if(swfoutput_queryfont(&output, fontname))
-  {
-      swfoutput_setfont(&output, fontname, -1, 0);
-      return;
-  }
 
-  msg("<verbose> Creating new SWF font: t1id: %d, filename: %s name:%s", this->t1id, FIXNULL(fileName), FIXNULL(fontname));
-  swfoutput_setfont(&output, fontname, this->t1id, fileName);
-  if(fileName)
-      unlinkfont(fileName);
+    if(!fileName) {
+       msg("<error> Couldn't set font %s\n", fontid);
+       return;
+    }
+       
+    msg("<verbose> updateFont(%s) -> %s", fontid, fileName);
+    dumpFontInfo("<verbose>", gfxFont);
+
+    swfoutput_setfont(&output, fontid, fileName);
+   
+    if(fileName && del)
+       unlinkfont(fileName);
+    if(fileName)
+        free(fileName);
 }
 
-int pic_xids[1024];
-int pic_yids[1024];
-int pic_ids[1024];
-int pic_width[1024];
-int pic_height[1024];
-int picpos = 0;
-int pic_id = 0;
-
 #define SQR(x) ((x)*(x))
 
 unsigned char* antialize(unsigned char*data, int width, int height, int newwidth, int newheight, int palettesize)
@@ -1713,204 +1959,378 @@ static void printInfoDate(Dict *infoDict, char *key, char *fmt) {
   obj.free();
 }
 
-void pdfswf_init(char*filename, char*userPassword) 
+void pdfswf_setparameter(char*name, char*value)
+{
+    msg("<verbose> setting parameter %s to \"%s\"", name, value);
+    if(!strcmp(name, "caplinewidth")) {
+       caplinewidth = atof(value);
+    } else if(!strcmp(name, "zoom")) {
+       zoom = atoi(value);
+    } else if(!strcmp(name, "forceType0Fonts")) {
+       forceType0Fonts = atoi(value);
+    } else if(!strcmp(name, "fontdir")) {
+        pdfswf_addfontdir(value);
+    } else if(!strcmp(name, "languagedir")) {
+        pdfswf_addlanguagedir(value);
+    } else if(!strcmp(name, "fontconfig")) {
+        config_use_fontconfig = atoi(value);
+    } else {
+       swfoutput_setparameter(name, value);
+    }
+}
+void pdfswf_addfont(char*filename)
 {
-  GString *fileName = new GString(filename);
-  GString *userPW;
-  Object info;
+    fontfile_t f;
+    memset(&f, 0, sizeof(fontfile_t));
+    f.filename = filename;
+    if(fontnum < sizeof(fonts)/sizeof(fonts[0])) {
+        fonts[fontnum++] = f;
+    } else {
+        msg("<error> Too many external fonts. Not adding font file \"%s\".", filename);
+    }
+}
 
-  // read config file
-  globalParams = new GlobalParams("");
+static char* dirseparator()
+{
+#ifdef WIN32
+    return "\\";
+#else
+    return "/";
+#endif
+}
 
-  // open PDF file
-  if (userPassword && userPassword[0]) {
-    userPW = new GString(userPassword);
-  } else {
-    userPW = NULL;
-  }
-  doc = new PDFDoc(fileName, userPW);
-  if (userPW) {
-    delete userPW;
-  }
-  if (!doc->isOk()) {
-    exit(1);
-  }
+void pdfswf_addlanguagedir(char*dir)
+{
+    if(!globalParams)
+        globalParams = new GlobalParams("");
+    
+    msg("<notice> Adding %s to language pack directories", dir);
 
-  // print doc info
-  doc->getDocInfo(&info);
-  if (info.isDict() &&
-    (screenloglevel>=LOGLEVEL_NOTICE)) {
-    printInfoString(info.getDict(), "Title",        "Title:        %s\n");
-    printInfoString(info.getDict(), "Subject",      "Subject:      %s\n");
-    printInfoString(info.getDict(), "Keywords",     "Keywords:     %s\n");
-    printInfoString(info.getDict(), "Author",       "Author:       %s\n");
-    printInfoString(info.getDict(), "Creator",      "Creator:      %s\n");
-    printInfoString(info.getDict(), "Producer",     "Producer:     %s\n");
-    printInfoDate(info.getDict(),   "CreationDate", "CreationDate: %s\n");
-    printInfoDate(info.getDict(),   "ModDate",      "ModDate:      %s\n");
-    printf("Pages:        %d\n", doc->getNumPages());
-    printf("Linearized:   %s\n", doc->isLinearized() ? "yes" : "no");
-    printf("Encrypted:    ");
-    if (doc->isEncrypted()) {
-      printf("yes (print:%s copy:%s change:%s addNotes:%s)\n",
-            doc->okToPrint() ? "yes" : "no",
-            doc->okToCopy() ? "yes" : "no",
-            doc->okToChange() ? "yes" : "no",
-            doc->okToAddNotes() ? "yes" : "no");
-    } else {
-      printf("no\n");
+    int l;
+    FILE*fi = 0;
+    char* config_file = (char*)malloc(strlen(dir) + 1 + sizeof("add-to-xpdfrc"));
+    strcpy(config_file, dir);
+    strcat(config_file, dirseparator());
+    strcat(config_file, "add-to-xpdfrc");
+
+    fi = fopen(config_file, "rb");
+    if(!fi) {
+        msg("<error> Could not open %s", config_file);
+        return;
     }
-  }
-  info.free();
-
-  numpages = doc->getNumPages();
-  if (doc->isEncrypted()) {
-       /*ERROR: This pdf is encrypted, and disallows copying.
-         Due to the DMCA, paragraph 1201, (2) A-C, circumventing
-         a technological measure that efficively controls access to
-         a protected work is violating American law. 
-         See www.eff.org for more information about DMCA issues.
-        */
-       if(!doc->okToCopy()) {
-           printf("PDF disallows copying. Bailing out.\n");
-           exit(1); //bail out
-       }
-       if(!doc->okToChange() || !doc->okToAddNotes())
-           swfoutput_setprotected();
-  }
+    globalParams->parseFile(new GString(config_file), fi);
+    fclose(fi);
+}
 
-  output = new SWFOutputDev();
-  output->startDoc(doc->getXRef());
+void pdfswf_addfontdir(char*dirname)
+{
+#ifdef HAVE_DIRENT_H
+    msg("<notice> Adding %s to font directories", dirname);
+    DIR*dir = opendir(dirname);
+    if(!dir) {
+       msg("<warning> Couldn't open directory %s\n", dirname);
+       return;
+    }
+    struct dirent*ent;
+    while(1) {
+       ent = readdir (dir);
+       if (!ent) 
+           break;
+       int l;
+       char*name = ent->d_name;
+       char type = 0;
+       if(!name) continue;
+       l=strlen(name);
+       if(l<4)
+           continue;
+       if(!strncasecmp(&name[l-4], ".pfa", 4)) 
+           type=1;
+       if(!strncasecmp(&name[l-4], ".pfb", 4)) 
+           type=3;
+       if(!strncasecmp(&name[l-4], ".ttf", 4)) 
+           type=2;
+       if(type)
+       {
+           char*fontname = (char*)malloc(strlen(dirname)+strlen(name)+2);
+           strcpy(fontname, dirname);
+            strcat(fontname, dirseparator());
+           strcat(fontname, name);
+           msg("<verbose> Adding %s to fonts", fontname);
+           pdfswf_addfont(fontname);
+       }
+    }
+    closedir(dir);
+#else
+    msg("<warning> No dirent.h- unable to add font dir %s", dir);
+#endif
 }
 
-void pdfswf_setparameter(char*name, char*value)
+
+typedef struct _pdf_doc_internal
 {
-    if(!strcmp(name, "drawonlyshapes")) {
-       drawonlyshapes = atoi(value);
-    } else if(!strcmp(name, "ignoredraworder")) {
-       ignoredraworder = atoi(value);
-    } else if(!strcmp(name, "linksopennewwindow")) {
-       opennewwindow = atoi(value);
-    } else if(!strcmp(name, "storeallcharacters")) {
-       storeallcharacters = atoi(value);
-    } else if(!strcmp(name, "enablezlib")) {
-       enablezlib = atoi(value);
-    } else if(!strcmp(name, "insertstop")) {
-       insertstoptag = atoi(value);
-    } else if(!strcmp(name, "flashversion")) {
-       flashversion = atoi(value);
-    } else if(!strcmp(name, "jpegquality")) {
-       int val = atoi(value);
-       if(val<0) val=0;
-       if(val>100) val=100;
-       jpegquality = val;
-    } else if(!strcmp(name, "outputfilename")) {
-       swffilename = value;
-    } else if(!strcmp(name, "caplinewidth")) {
-       caplinewidth = atof(value);
-    } else if(!strcmp(name, "splinequality")) {
-       int v = atoi(value);
-       v = 500-(v*5); // 100% = 0.25 pixel, 0% = 25 pixel
-       if(v<1) v = 1;
-       splinemaxerror = v;
-    } else if(!strcmp(name, "fontquality")) {
-       int v = atoi(value);
-       v = 500-(v*5); // 100% = 0.25 pixel, 0% = 25 pixel
-       if(v<1) v = 1;
-       fontsplinemaxerror = v;
+    int protect;
+    PDFDoc*doc;
+} pdf_doc_internal_t;
+typedef struct _pdf_page_internal
+{
+} pdf_page_internal_t;
+typedef struct _swf_output_internal
+{
+    SWFOutputDev*outputDev;
+} swf_output_internal_t;
+
+pdf_doc_t* pdf_init(char*filename, char*userPassword)
+{
+    pdf_doc_t*pdf_doc = (pdf_doc_t*)malloc(sizeof(pdf_doc_t));
+    memset(pdf_doc, 0, sizeof(pdf_doc_t));
+    pdf_doc_internal_t*i= (pdf_doc_internal_t*)malloc(sizeof(pdf_doc_internal_t));
+    memset(i, 0, sizeof(pdf_doc_internal_t));
+    pdf_doc->internal = i;
+    
+    GString *fileName = new GString(filename);
+    GString *userPW;
+    Object info;
+
+    // read config file
+    if(!globalParams)
+        globalParams = new GlobalParams("");
+
+    // open PDF file
+    if (userPassword && userPassword[0]) {
+      userPW = new GString(userPassword);
     } else {
-       fprintf(stderr, "unknown parameter: %s (=%s)\n", name, value);
+      userPW = NULL;
+    }
+    i->doc = new PDFDoc(fileName, userPW);
+    if (userPW) {
+      delete userPW;
+    }
+    if (!i->doc->isOk()) {
+        return 0;
+    }
+
+    // print doc info
+    i->doc->getDocInfo(&info);
+    if (info.isDict() &&
+      (getScreenLogLevel()>=LOGLEVEL_NOTICE)) {
+      printInfoString(info.getDict(), "Title",        "Title:        %s\n");
+      printInfoString(info.getDict(), "Subject",      "Subject:      %s\n");
+      printInfoString(info.getDict(), "Keywords",     "Keywords:     %s\n");
+      printInfoString(info.getDict(), "Author",       "Author:       %s\n");
+      printInfoString(info.getDict(), "Creator",      "Creator:      %s\n");
+      printInfoString(info.getDict(), "Producer",     "Producer:     %s\n");
+      printInfoDate(info.getDict(),   "CreationDate", "CreationDate: %s\n");
+      printInfoDate(info.getDict(),   "ModDate",      "ModDate:      %s\n");
+      printf("Pages:        %d\n", i->doc->getNumPages());
+      printf("Linearized:   %s\n", i->doc->isLinearized() ? "yes" : "no");
+      printf("Encrypted:    ");
+      if (i->doc->isEncrypted()) {
+        printf("yes (print:%s copy:%s change:%s addNotes:%s)\n",
+               i->doc->okToPrint() ? "yes" : "no",
+               i->doc->okToCopy() ? "yes" : "no",
+               i->doc->okToChange() ? "yes" : "no",
+               i->doc->okToAddNotes() ? "yes" : "no");
+      } else {
+        printf("no\n");
+      }
     }
+    info.free();
+                   
+    pdf_doc->num_pages = i->doc->getNumPages();
+    i->protect = 0;
+    if (i->doc->isEncrypted()) {
+          if(!i->doc->okToCopy()) {
+              printf("PDF disallows copying.\n");
+              return 0;
+          }
+          if(!i->doc->okToChange() || !i->doc->okToAddNotes())
+              i->protect = 1;
+    }
+   
+    return pdf_doc;
 }
 
-void pdfswf_drawonlyshapes()
+void pdfswf_preparepage(int page)
 {
-    drawonlyshapes = 1;
+    /*FIXME*/
+    if(!pages) {
+       pages = (int*)malloc(1024*sizeof(int));
+       pagebuflen = 1024;
+    } else {
+       if(pagepos == pagebuflen)
+       {
+           pagebuflen+=1024;
+           pages = (int*)realloc(pages, pagebuflen);
+       }
+    }
+    pages[pagepos++] = page;
 }
 
-void pdfswf_ignoredraworder()
+class MemCheck
 {
-    ignoredraworder = 1;
-}
+    public: ~MemCheck()
+    {
+        delete globalParams;globalParams=0;
+        Object::memCheck(stderr);
+        gMemReport(stderr);
+    }
+} myMemCheck;
 
-void pdfswf_linksopennewwindow()
+void pdf_destroy(pdf_doc_t*pdf_doc)
 {
-    opennewwindow = 1;
+    pdf_doc_internal_t*i= (pdf_doc_internal_t*)pdf_doc->internal;
+
+    msg("<debug> pdfswf.cc: pdfswf_close()");
+    delete i->doc; i->doc=0;
+    
+    free(pages); pages = 0; //FIXME
+
+    free(pdf_doc->internal);pdf_doc->internal=0;
+    free(pdf_doc);pdf_doc=0;
 }
 
-void pdfswf_storeallcharacters()
+pdf_page_t* pdf_getpage(pdf_doc_t*pdf_doc, int page)
 {
-    storeallcharacters = 1;
+    pdf_doc_internal_t*di= (pdf_doc_internal_t*)pdf_doc->internal;
+
+    if(page < 1 || page > pdf_doc->num_pages)
+        return 0;
+    
+    pdf_page_t* pdf_page = (pdf_page_t*)malloc(sizeof(pdf_page_t));
+    pdf_page_internal_t*pi= (pdf_page_internal_t*)malloc(sizeof(pdf_page_internal_t));
+    memset(pi, 0, sizeof(pdf_page_internal_t));
+    pdf_page->internal = pi;
+
+    pdf_page->parent = pdf_doc;
+    pdf_page->nr = page;
+    return pdf_page;
 }
 
-void pdfswf_enablezlib()
+void pdf_page_destroy(pdf_page_t*pdf_page)
 {
-    enablezlib = 1;
+    pdf_page_internal_t*i= (pdf_page_internal_t*)pdf_page->internal;
+    free(pdf_page->internal);pdf_page->internal = 0;
+    free(pdf_page);pdf_page=0;
 }
 
-void pdfswf_jpegquality(int val)
+swf_output_t* swf_output_init() 
 {
-    if(val<0) val=0;
-    if(val>100) val=100;
-    jpegquality = val;
+    swf_output_t*swf_output = (swf_output_t*)malloc(sizeof(swf_output_t));
+    memset(swf_output, 0, sizeof(swf_output_t));
+    swf_output_internal_t*i= (swf_output_internal_t*)malloc(sizeof(swf_output_internal_t));
+    memset(i, 0, sizeof(swf_output_internal_t));
+    swf_output->internal = i;
+
+    i->outputDev = new SWFOutputDev();
+    return swf_output;
 }
 
-void pdfswf_setoutputfilename(char*_filename)
+void swf_output_setparameter(swf_output_t*swf_output, char*name, char*value)
 {
-    swffilename = _filename;
+    /* FIXME */
+    pdfswf_setparameter(name, value);
 }
 
-void pdfswf_insertstop()
+void swf_output_pagefeed(swf_output_t*swf)
 {
-    insertstoptag = 1;
+    swf_output_internal_t*i= (swf_output_internal_t*)swf->internal;
+    i->outputDev->pagefeed();
+    i->outputDev->getDimensions(&swf->x1, &swf->y1, &swf->x2, &swf->y2);
 }
 
-void pdfswf_setversion(int n)
+int swf_output_save(swf_output_t*swf, char*filename)
 {
-    flashversion = n;
+    swf_output_internal_t*i= (swf_output_internal_t*)swf->internal;
+    int ret = i->outputDev->save(filename);
+    i->outputDev->getDimensions(&swf->x1, &swf->y1, &swf->x2, &swf->y2);
+    return ret;
 }
 
+void* swf_output_get(swf_output_t*swf)
+{
+    swf_output_internal_t*i= (swf_output_internal_t*)swf->internal;
+    void* ret = i->outputDev->getSWF();
+    i->outputDev->getDimensions(&swf->x1, &swf->y1, &swf->x2, &swf->y2);
+    return ret;
+}
 
-void pdfswf_convertpage(int page)
+void swf_output_destroy(swf_output_t*output)
 {
-    if(!pages)
-    {
-       pages = (int*)malloc(1024*sizeof(int));
-       pagebuflen = 1024;
-    } else {
-       if(pagepos == pagebuflen)
-       {
-           pagebuflen+=1024;
-           pages = (int*)realloc(pages, pagebuflen);
-       }
-    }
-    pages[pagepos++] = page;
+    swf_output_internal_t*i = (swf_output_internal_t*)output->internal;
+    delete i->outputDev; i->outputDev=0;
+    free(output->internal);output->internal=0;
+    free(output);
 }
 
-void pdfswf_performconversion()
+void pdf_page_render2(pdf_page_t*page, swf_output_t*swf)
 {
-    int t;
-    for(t=0;t<pagepos;t++)
-    {
-       currentpage = pages[t];
-       doc->displayPage((OutputDev*)output, currentpage, /*dpi*/72, /*rotate*/0, /*doLinks*/(int)1);
+    pdf_doc_internal_t*pi = (pdf_doc_internal_t*)page->parent->internal;
+    swf_output_internal_t*si = (swf_output_internal_t*)swf->internal;
+
+    if(pi->protect) {
+        swfoutput_setparameter("protect", "1");
     }
+    si->outputDev->setXRef(pi->doc, pi->doc->getXRef());
+#ifdef XPDF_101
+    pi->doc->displayPage((OutputDev*)si->outputDev, page->nr, /*zoom*/zoom, /*rotate*/0, /*doLinks*/(int)1);
+#else
+    pi->doc->displayPage((OutputDev*)si->outputDev, page->nr, zoom, zoom, /*rotate*/0, true, /*doLinks*/(int)1);
+#endif
+    si->outputDev->getDimensions(&swf->x1, &swf->y1, &swf->x2, &swf->y2);
 }
 
-int pdfswf_numpages()
+void pdf_page_rendersection(pdf_page_t*page, swf_output_t*output, int x, int y, int x1, int y1, int x2, int y2)
 {
-  return doc->getNumPages();
+    pdf_doc_internal_t*pi = (pdf_doc_internal_t*)page->parent->internal;
+    swf_output_internal_t*si = (swf_output_internal_t*)output->internal;
+
+    si->outputDev->setMove(x,y);
+    if((x1|y1|x2|y2)==0) x2++;
+    si->outputDev->setClip(x1,y1,x2,y2);
+
+    pdf_page_render2(page, output);
 }
-int closed=0;
-void pdfswf_close()
+void pdf_page_render(pdf_page_t*page, swf_output_t*output)
 {
-    msg("<debug> pdfswf.cc: pdfswf_close()");
-    delete output;
-    delete doc;
-    //freeParams();
-    // check for memory leaks
-    Object::memCheck(stderr);
-    gMemReport(stderr);
+    pdf_doc_internal_t*pi = (pdf_doc_internal_t*)page->parent->internal;
+    swf_output_internal_t*si = (swf_output_internal_t*)output->internal;
+    
+    si->outputDev->setMove(0,0);
+    si->outputDev->setClip(0,0,0,0);
+    
+    pdf_page_render2(page, output);
 }
 
 
+pdf_page_info_t* pdf_page_getinfo(pdf_page_t*page)
+{
+    pdf_doc_internal_t*pi = (pdf_doc_internal_t*)page->parent->internal;
+    pdf_page_internal_t*i= (pdf_page_internal_t*)page->internal;
+    pdf_page_info_t*info = (pdf_page_info_t*)malloc(sizeof(pdf_page_info_t));
+    memset(info, 0, sizeof(pdf_page_info_t));
+
+    InfoOutputDev*output = new InfoOutputDev;
+    
+#ifdef XPDF_101
+    pi->doc->displayPage((OutputDev*)output, page->nr, /*zoom*/zoom, /*rotate*/0, /*doLinks*/(int)1);
+#else
+    pi->doc->displayPage((OutputDev*)output, page->nr, zoom, zoom, /*rotate*/0, true, /*doLinks*/(int)1);
+#endif
+
+    info->xMin = output->x1;
+    info->yMin = output->y1;
+    info->xMax = output->x2;
+    info->yMax = output->y2;
+    info->number_of_images = output->num_images;
+    info->number_of_links = output->num_links;
+    info->number_of_fonts = output->num_fonts;
+
+    delete output;
+
+    return info;
+}
+
+void pdf_page_info_destroy(pdf_page_info_t*info)
+{
+    free(info);
+}