wip: fork

1 files changed, 0 insertions, 518 deletions

diff --git a/src/drivers/WinAPI/Fl_WinAPI_Printer_Driver.cxx b/src/drivers/WinAPI/Fl_WinAPI_Printer_Driver.cxx
deleted file mode 100644
index 4b74c76cb..000000000
--- a/src/drivers/WinAPI/Fl_WinAPI_Printer_Driver.cxx
+++ /dev/null
@@ -1,518 +0,0 @@
-//
-// Printing support for Windows for the Fast Light Tool Kit (FLTK).
-//
-// Copyright 2010-2024 by Bill Spitzak and others.
-//
-// This library is free software. Distribution and use rights are outlined in
-// the file "COPYING" which should have been included with this file.  If this
-// file is missing or damaged, see the license at:
-//
-//     https://www.fltk.org/COPYING.php
-//
-// Please see the following page on how to report bugs and issues:
-//
-//     https://www.fltk.org/bugs.php
-//
-
-#include "../GDI/Fl_GDI_Graphics_Driver.H"
-#include <FL/Fl_PDF_File_Surface.H>
-#include <FL/Fl_Paged_Device.H>
-#include <FL/Fl_Printer.H>
-#include <FL/Fl_Native_File_Chooser.H>
-#include <FL/fl_ask.H>
-#include <FL/math.h>
-#include <FL/fl_draw.H>
-#include <FL/platform.H> // for fl_win32_xid()
-#include <FL/fl_string_functions.h>  // fl_strdup()
-#include <commdlg.h>
-#include <winspool.h> // DocumentProperties(), OpenPrinter(), ClosePrinter()
-
-extern HWND fl_window;
-
-/** Support for printing on the Windows platform */
-class Fl_WinAPI_Printer_Driver : public Fl_Paged_Device {
-  friend class Fl_Printer;
-protected:
-  int   abortPrint;
-  PRINTDLG      pd;
-  HDC           hPr;
-  int           prerr;
-  int left_margin;
-  int top_margin;
-  void absolute_printable_rect(int *x, int *y, int *w, int *h);
-  Fl_WinAPI_Printer_Driver(void);
-  int begin_job(int pagecount = 0, int *frompage = NULL, int *topage = NULL, char **perr_message = NULL) FL_OVERRIDE;
-  int begin_page (void) FL_OVERRIDE;
-  int printable_rect(int *w, int *h) FL_OVERRIDE;
-  void margins(int *left, int *top, int *right, int *bottom) FL_OVERRIDE;
-  void origin(int *x, int *y) FL_OVERRIDE;
-  void origin(int x, int y) FL_OVERRIDE;
-  void scale (float scale_x, float scale_y = 0.) FL_OVERRIDE;
-  void rotate(float angle) FL_OVERRIDE;
-  void translate(int x, int y) FL_OVERRIDE;
-  void untranslate(void) FL_OVERRIDE;
-  int end_page (void) FL_OVERRIDE;
-  void end_job (void) FL_OVERRIDE;
-  ~Fl_WinAPI_Printer_Driver(void);
-};
-
-Fl_WinAPI_Printer_Driver::Fl_WinAPI_Printer_Driver(void) : Fl_Paged_Device() {
-  hPr = NULL;
-  driver(new Fl_GDI_Printer_Graphics_Driver);
-}
-
-Fl_Paged_Device* Fl_Printer::newPrinterDriver(void)
-{
-  return new Fl_WinAPI_Printer_Driver();
-}
-
-
-Fl_WinAPI_Printer_Driver::~Fl_WinAPI_Printer_Driver(void) {
-  if (hPr) end_job();
-  delete driver();
-}
-
-static void WIN_SetupPrinterDeviceContext(HDC prHDC)
-{
-  if ( !prHDC ) return;
-
-  fl_window = 0;
-  SetGraphicsMode(prHDC, GM_ADVANCED); // to allow for rotations
-  SetMapMode(prHDC, MM_ANISOTROPIC);
-  SetTextAlign(prHDC, TA_BASELINE|TA_LEFT);
-  SetBkMode(prHDC, TRANSPARENT);
-  // this matches 720 logical units to the number of device units in 10 inches of paper
-  // thus the logical unit is the point (= 1/72 inch)
-  SetWindowExtEx(prHDC, 720, 720, NULL);
-  SetViewportExtEx(prHDC, 10*GetDeviceCaps(prHDC, LOGPIXELSX), 10*GetDeviceCaps(prHDC, LOGPIXELSY), NULL);
-}
-
-
-class Fl_PDF_GDI_File_Surface : public Fl_WinAPI_Printer_Driver
-{
-private:
-  static LPSTR pdf_printer_name_;
-public:
-  char *doc_fname;
-  Fl_PDF_GDI_File_Surface();
-  ~Fl_PDF_GDI_File_Surface() { if (doc_fname) free(doc_fname); }
-  int begin_job(const char *defaultname,
-                char **perr_message = NULL);
-  int begin_job(int, int*, int *, char **) FL_OVERRIDE {return 1;} // don't use
-  int begin_document(const char* outname,
-                     enum Fl_Paged_Device::Page_Format format,
-                     enum Fl_Paged_Device::Page_Layout layout,
-                     char **perr_message);
-  void end_job() FL_OVERRIDE;
-};
-
-LPSTR Fl_PDF_GDI_File_Surface::pdf_printer_name_ = _strdup("Microsoft Print to PDF");
-
-Fl_PDF_GDI_File_Surface::Fl_PDF_GDI_File_Surface() {
-  driver(new Fl_GDI_Graphics_Driver());
-  doc_fname = NULL;
-}
-
-Fl_Paged_Device *Fl_PDF_File_Surface::new_platform_pdf_surface_(const char ***pfname) {
-  Fl_PDF_GDI_File_Surface *surf = new Fl_PDF_GDI_File_Surface();
-  *pfname = (const char**)&surf->doc_fname;
-  return surf;
-}
-
-int Fl_PDF_File_Surface::begin_job(const char* defaultfilename,
-                                char **perr_message) {
-  return ((Fl_PDF_GDI_File_Surface*)platform_surface_)->begin_job(defaultfilename, perr_message);
-}
-
-int Fl_PDF_File_Surface::begin_document(const char* defaultfilename,
-                                     enum Fl_Paged_Device::Page_Format format,
-                                     enum Fl_Paged_Device::Page_Layout layout,
-                                     char **perr_message) {
-  return ((Fl_PDF_GDI_File_Surface*)platform_surface_)->begin_document(defaultfilename, format, layout, perr_message);
-}
-
-
-int Fl_PDF_GDI_File_Surface::begin_job(const char *defaultfname, char **perr_message) {
-  int err = 0;
-  abortPrint = FALSE;
-
-  HANDLE hPr2;
-  err = OpenPrinterA(pdf_printer_name_, &hPr2, NULL);
-  if (err == 0) {
-    if (perr_message) {
-      int l = 240;
-      *perr_message = new char[l];
-      snprintf(*perr_message, l,
-               "Class Fl_PDF_File_Surface requires printer '%s' available in Windows 10+.",
-               pdf_printer_name_);
-    }
-    return 1;
-  }
-  HWND hwndOwner = fl_win32_xid(Fl::first_window());
-  LONG count = DocumentPropertiesA(hwndOwner, hPr2, pdf_printer_name_, NULL, NULL, 0);
-  if (count <= 0) { ClosePrinter(hPr2); return 1; }
-  char *buffer = new char[count];
-  DEVMODEA *pDevMode = (DEVMODEA*)buffer;
-  memset(buffer, 0, count);
-  pDevMode->dmSize = (WORD)count;
-  count = DocumentPropertiesA(hwndOwner, hPr2, pdf_printer_name_, pDevMode, NULL, DM_OUT_BUFFER | DM_IN_PROMPT);
-  ClosePrinter(hPr2);
-  if (count == IDCANCEL || count < 0) { delete[] buffer; return 1; }
-
-  Fl_Native_File_Chooser fnfc;
-  fnfc.type(Fl_Native_File_Chooser::BROWSE_SAVE_FILE);
-  fnfc.filter("PDF\t*.pdf\n");
-  if (defaultfname && strlen(defaultfname) > 0) fnfc.preset_file(defaultfname);
-  fnfc.options(Fl_Native_File_Chooser::SAVEAS_CONFIRM);
-  if (fnfc.show() == 0) this->hPr = CreateDCA(NULL, pdf_printer_name_, NULL, pDevMode);
-  delete[] buffer;
-  if (!this->hPr) return 1;
-  DOCINFOW     di;
-  wchar_t        docName [256];
-  wchar_t        outName [256];
-  fl_utf8towc("FLTK", 4, docName, 256);
-  fl_utf8towc(fnfc.filename(), (unsigned int)strlen(fnfc.filename()), outName, 256);
-  memset(&di, 0, sizeof(DOCINFOW));
-  di.cbSize = sizeof(DOCINFOW);
-  di.lpszDocName = (LPCWSTR)docName;
-  di.lpszOutput = (LPCWSTR)outName;
-  err = StartDocW(this->hPr, &di);
-  if (err <= 0) {
-    DWORD dw = GetLastError();
-    DeleteDC(this->hPr);
-    this->hPr = NULL;
-    if (dw != ERROR_CANCELLED) {
-      if (perr_message)  {
-        int l = 40;
-        *perr_message = new char[l];
-        snprintf(*perr_message, l, "Error %lu in StartDoc() call", dw);
-      }
-      return 2;
-    }
-    return 1;
-  }
-  x_offset = 0;
-  y_offset = 0;
-  WIN_SetupPrinterDeviceContext(this->hPr);
-  driver()->gc(this->hPr);
-  doc_fname = fl_strdup(fnfc.filename());
-  return 0;
-}
-
-
-int Fl_PDF_GDI_File_Surface::begin_document(const char* outfname,
-                                     enum Fl_Paged_Device::Page_Format format,
-                                     enum Fl_Paged_Device::Page_Layout layout,
-                                     char **perr_message) {
-  int err = 0;
-  abortPrint = FALSE;
-
-  DEVMODEA inDevMode;
-  memset(&inDevMode, 0, sizeof(DEVMODEA)); inDevMode.dmSize = sizeof(DEVMODEA);
-  inDevMode.dmOrientation = (layout == PORTRAIT ? DMORIENT_PORTRAIT : DMORIENT_LANDSCAPE);
-  inDevMode.dmPaperSize = (format == A4 ? DMPAPER_A4 : DMPAPER_LETTER);
-  inDevMode.dmFields = DM_ORIENTATION | DM_PAPERSIZE ;
-
-  this->hPr = CreateDCA(NULL, pdf_printer_name_, NULL, &inDevMode);
-  if (!this->hPr) {
-    if (perr_message)  {
-      int l = 150;
-      *perr_message = new char[l];
-      snprintf(*perr_message, l, "Class Fl_PDF_File_Surface requires printer '%s'.",
-               pdf_printer_name_);
-    }
-    return 2;
-  }
-  DOCINFOW     di;
-  wchar_t  docName[256];
-  wchar_t  outName[256];
-  fl_utf8towc("FLTK", 4, docName, 256);
-  memset(&di, 0, sizeof(DOCINFOW));
-  di.cbSize = sizeof(DOCINFOW);
-  di.lpszDocName = (LPCWSTR)docName;
-  di.lpszOutput = (LPCWSTR)outName;
-  fl_utf8towc(outfname, (unsigned int)strlen(outfname), outName, 256);
-  err = StartDocW(hPr, &di);
-  if (err <= 0) {
-    DWORD dw = GetLastError();
-    DeleteDC(this->hPr);
-    this->hPr = NULL;
-    if (perr_message) {
-      int l = 50;
-      *perr_message = new char[l];
-      snprintf(*perr_message, l, "Error %lu in StartDoc() call", dw);
-    }
-    return 2;
-  }
-  x_offset = 0;
-  y_offset = 0;
-  WIN_SetupPrinterDeviceContext(this->hPr);
-  driver()->gc(this->hPr);
-  doc_fname = fl_strdup(outfname);
-  return 0;
-}
-
-
-int Fl_WinAPI_Printer_Driver::begin_job (int pagecount, int *frompage, int *topage, char **perr_message)
-// returns 0 iff OK
-{
-  if (pagecount == 0) pagecount = 10000;
-  DOCINFO     di;
-  char        docName [256];
-  int err = 0;
-
-  abortPrint = FALSE;
-  memset (&pd, 0, sizeof (PRINTDLG));
-  pd.lStructSize = sizeof (PRINTDLG);
-  pd.hwndOwner = GetForegroundWindow();
-  pd.Flags = PD_RETURNDC | PD_USEDEVMODECOPIESANDCOLLATE | PD_NOSELECTION;
-  pd.nMinPage = 1;
-  pd.nMaxPage = pagecount;
-  BOOL b = PrintDlg (&pd);
-  if (pd.hwndOwner) { // restore the correct state of mouse buttons and keyboard modifier keys (STR #3221)
-    WNDPROC windproc = (WNDPROC)GetWindowLongPtrW(pd.hwndOwner, GWLP_WNDPROC);
-    CallWindowProc(windproc, pd.hwndOwner, WM_ACTIVATEAPP, 1, 0);
-  }
-  if (b != 0) {
-    hPr = pd.hDC;
-    if (hPr != NULL) {
-      strcpy (docName, "FLTK");
-      memset(&di, 0, sizeof(DOCINFO));
-      di.cbSize = sizeof (DOCINFO);
-      di.lpszDocName = (LPCSTR) docName;
-      prerr = StartDoc (hPr, &di);
-      if (prerr < 1) {
-        abortPrint = TRUE;
-        DWORD dw = GetLastError();
-        err = (dw == ERROR_CANCELLED ? 1 : 2);
-        if (perr_message && err == 2) {
-          wchar_t *lpMsgBuf;
-          DWORD retval = FormatMessageW(
-            FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS,
-            NULL,
-            dw,
-            MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
-            (LPWSTR) &lpMsgBuf,
-            0, NULL);
-          if (retval) {
-            unsigned srclen = lstrlenW(lpMsgBuf);
-            while (srclen > 0 && (lpMsgBuf[srclen-1] == '\n' || lpMsgBuf[srclen-1] == '\r')) srclen--;
-            unsigned l = fl_utf8fromwc(NULL, 0, lpMsgBuf, srclen);
-            *perr_message = new char[l+51];
-            snprintf(*perr_message, l+51, "begin_job() failed with error %lu: ", dw);
-            fl_utf8fromwc(*perr_message + strlen(*perr_message), l+1, lpMsgBuf, srclen);
-            LocalFree(lpMsgBuf);
-          }
-        }
-      }
-    }
-  } else {
-    err = 1;
-  }
-  if(!err) {
-    if((pd.Flags & PD_PAGENUMS) != 0 ) {
-      if (frompage) *frompage = pd.nFromPage;
-      if (topage) *topage = pd.nToPage;
-    }
-    else {
-      if (frompage) *frompage = 1;
-      if (topage) *topage = pagecount;
-    }
-    x_offset = 0;
-    y_offset = 0;
-    WIN_SetupPrinterDeviceContext (hPr);
-    driver()->gc(hPr);
-  }
-  return err;
-}
-
-void Fl_PDF_GDI_File_Surface::end_job(void)
-{
-  if (hPr != NULL) {
-    if (! abortPrint) {
-      if (EndDoc (hPr) <= 0) {
-        fl_message ("Error in EndDoc() call");
-      }
-      DeleteDC (hPr);
-    }
-    hPr = NULL;
-  }
-}
-
-void Fl_WinAPI_Printer_Driver::end_job (void)
-{
-  if (hPr != NULL) {
-    if (! abortPrint) {
-      prerr = EndDoc (hPr);
-      if (prerr < 0) {
-        fl_alert ("EndDoc error %d", prerr);
-      }
-    }
-    DeleteDC (hPr);
-    if (pd.hDevMode != NULL) {
-      GlobalFree (pd.hDevMode);
-    }
-    if (pd.hDevNames != NULL) {
-      GlobalFree (pd.hDevNames);
-    }
-  }
-  hPr = NULL;
-}
-
-void Fl_WinAPI_Printer_Driver::absolute_printable_rect(int *x, int *y, int *w, int *h)
-{
-  POINT         physPageSize;
-  POINT         pixelsPerInch;
-  XFORM         transform;
-
-  if (hPr == NULL) return;
-  HDC gc = (HDC)driver()->gc();
-  GetWorldTransform(gc, &transform);
-  ModifyWorldTransform(gc, NULL, MWT_IDENTITY);
-  SetWindowOrgEx(gc, 0, 0, NULL);
-
-  physPageSize.x = GetDeviceCaps(hPr, HORZRES);
-  physPageSize.y = GetDeviceCaps(hPr, VERTRES);
-  DPtoLP(hPr, &physPageSize, 1);
-  *w = physPageSize.x + 1;
-  *h = physPageSize.y + 1;
-  pixelsPerInch.x = GetDeviceCaps(hPr, LOGPIXELSX);
-  pixelsPerInch.y = GetDeviceCaps(hPr, LOGPIXELSY);
-  DPtoLP(hPr, &pixelsPerInch, 1);
-  left_margin = (pixelsPerInch.x / 4);
-  *w -= (pixelsPerInch.x / 2);
-  top_margin = (pixelsPerInch.y / 4);
-  *h -= (pixelsPerInch.y / 2);
-
-  *x = left_margin;
-  *y = top_margin;
-  origin(x_offset, y_offset);
-  SetWorldTransform(gc, &transform);
-}
-
-void Fl_WinAPI_Printer_Driver::margins(int *left, int *top, int *right, int *bottom)
-{
-  int x = 0, y = 0, w = 0, h = 0;
-  absolute_printable_rect(&x, &y, &w, &h);
-  if (left) *left = x;
-  if (top) *top = y;
-  if (right) *right = x;
-  if (bottom) *bottom = y;
-}
-
-int Fl_WinAPI_Printer_Driver::printable_rect(int *w, int *h)
-{
-  int x, y;
-  absolute_printable_rect(&x, &y, w, h);
-  return 0;
-}
-
-int Fl_WinAPI_Printer_Driver::begin_page (void)
-{
-  int  rsult, w, h;
-
-  rsult = 0;
-  if (hPr != NULL) {
-    Fl_Surface_Device::push_current(this);
-    WIN_SetupPrinterDeviceContext (hPr);
-    prerr = StartPage (hPr);
-    if (prerr < 0) {
-      Fl_Surface_Device::pop_current();
-      fl_alert ("StartPage error %d", prerr);
-      rsult = 1;
-    }
-    printable_rect(&w, &h);
-    origin(0, 0);
-    fl_clip_region(0);
-  }
-  return rsult;
-}
-
-void Fl_WinAPI_Printer_Driver::origin (int deltax, int deltay)
-{
-  SetWindowOrgEx( (HDC)driver()->gc(), - left_margin - deltax, - top_margin - deltay, NULL);
-  x_offset = deltax;
-  y_offset = deltay;
-}
-
-void Fl_WinAPI_Printer_Driver::scale (float scalex, float scaley)
-{
-  if (scaley == 0.) scaley = scalex;
-  int w, h;
-  SetWindowExtEx((HDC)driver()->gc(), (int)(720 / scalex + 0.5), (int)(720 / scaley + 0.5), NULL);
-  printable_rect(&w, &h);
-  origin(0, 0);
-}
-
-void Fl_WinAPI_Printer_Driver::rotate (float rot_angle)
-{
-  XFORM mat;
-  float angle;
-  angle = (float) - (rot_angle * M_PI / 180.);
-  mat.eM11 = (float)cos(angle);
-  mat.eM12 = (float)sin(angle);
-  mat.eM21 = - mat.eM12;
-  mat.eM22 = mat.eM11;
-  mat.eDx = mat.eDy = 0;
-  SetWorldTransform((HDC)driver()->gc(), &mat);
-}
-
-int Fl_WinAPI_Printer_Driver::end_page (void)
-{
-  int  rsult;
-
-  rsult = 0;
-  if (hPr != NULL) {
-    Fl_Surface_Device::pop_current();
-    prerr = EndPage (hPr);
-    if (prerr < 0) {
-      abortPrint = TRUE;
-      fl_alert ("EndPage error %d", prerr);
-      rsult = 1;
-    }
-    else { // make sure rotation is not transferred to next page
-      ModifyWorldTransform(hPr, NULL, MWT_IDENTITY);
-    }
-  }
-  return rsult;
-}
-
-static int translate_stack_depth = 0;
-const int translate_stack_max = 5;
-static int translate_stack_x[translate_stack_max];
-static int translate_stack_y[translate_stack_max];
-
-static void do_translate(int x, int y, HDC gc)
-{
-  XFORM tr;
-  tr.eM11 = tr.eM22 = 1;
-  tr.eM12 = tr.eM21 = 0;
-  tr.eDx =  (FLOAT) x;
-  tr.eDy =  (FLOAT) y;
-  ModifyWorldTransform(gc, &tr, MWT_LEFTMULTIPLY);
-}
-
-void Fl_WinAPI_Printer_Driver::translate (int x, int y)
-{
-  do_translate(x, y, (HDC)driver()->gc());
-  if (translate_stack_depth < translate_stack_max) {
-    translate_stack_x[translate_stack_depth] = x;
-    translate_stack_y[translate_stack_depth] = y;
-    translate_stack_depth++;
-    }
-}
-
-void Fl_WinAPI_Printer_Driver::untranslate (void)
-{
-  if (translate_stack_depth > 0) {
-    translate_stack_depth--;
-    do_translate( - translate_stack_x[translate_stack_depth], - translate_stack_y[translate_stack_depth], (HDC)driver()->gc() );
-    }
-}
-
-void Fl_WinAPI_Printer_Driver::origin(int *x, int *y)
-{
-  Fl_Paged_Device::origin(x, y);
-}
-
-