blob: 013eeb5605ac85d2fbb62f56a84bf4637cc86a2b [file] [log] [blame]
//========================================================================
//
// This file is licensed under the GPLv2 or later
//
// Copyright (C) 2014 Rodrigo Rivas Costa <rodrigorivascosta@gmail.com>
// Copyright (C) 2014, 2017 Adrian Johnson <ajohnson@redneon.com>
// Copyright (C) 2017, 2018, 2022 Albert Astals Cid <aacid@kde.org>
//
// To see a description of the changes please see the Changelog file that
// came with your tarball or type make ChangeLog if you are building from git
//
//========================================================================
#include <cairo.h>
#ifdef CAIRO_HAS_WIN32_SURFACE
# include <cairo-win32.h>
# include "parseargs.h"
# include "pdftocairo-win32.h"
# include "Win32Console.h"
# include <dlgs.h>
# include <commctrl.h>
# include <commdlg.h>
# include <windowsx.h>
# include <winspool.h>
static HDC hdc;
static HGLOBAL hDevmode = nullptr;
static HGLOBAL hDevnames = nullptr;
static DEVMODEA *devmode;
static char *printerName;
struct Win32Option
{
const char *name;
int value;
};
static const Win32Option win32PaperSource[] = { { "upper", DMBIN_UPPER }, { "onlyone", DMBIN_ONLYONE },
{ "lower", DMBIN_LOWER }, { "middle", DMBIN_MIDDLE },
{ "manual", DMBIN_MANUAL }, { "envelope", DMBIN_ENVELOPE },
{ "envmanual", DMBIN_ENVMANUAL }, { "auto", DMBIN_AUTO },
{ "tractor", DMBIN_TRACTOR }, { "smallfmt", DMBIN_SMALLFMT },
{ "largefmt", DMBIN_LARGEFMT }, { "largecapacity", DMBIN_LARGECAPACITY },
{ "formsource", DMBIN_FORMSOURCE }, { nullptr, 0 } };
static void parseSource(GooString *source)
{
const Win32Option *option = win32PaperSource;
while (option->name) {
if (source->cmp(option->name) == 0) {
devmode->dmDefaultSource = option->value;
devmode->dmFields |= DM_DEFAULTSOURCE;
return;
}
option++;
}
fprintf(stderr, "Warning: Unknown paper source \"%s\"\n", source->c_str());
}
static const Win32Option win32DuplexMode[] = { { "off", DMDUP_SIMPLEX }, { "short", DMDUP_HORIZONTAL }, { "long", DMDUP_VERTICAL }, { nullptr, 0 } };
static void parseDuplex(GooString *mode)
{
const Win32Option *option = win32DuplexMode;
while (option->name) {
if (mode->cmp(option->name) == 0) {
devmode->dmDuplex = option->value;
devmode->dmFields |= DM_DUPLEX;
return;
}
option++;
}
fprintf(stderr, "Warning: Unknown duplex mode \"%s\"\n", mode->c_str());
}
static void fillCommonPrinterOptions(bool duplex)
{
if (duplex) {
devmode->dmDuplex = DMDUP_HORIZONTAL;
devmode->dmFields |= DM_DUPLEX;
}
}
static void fillPagePrinterOptions(double w, double h)
{
w *= 254.0 / 72.0; // units are 0.1mm
h *= 254.0 / 72.0;
if (w > h) {
devmode->dmOrientation = DMORIENT_LANDSCAPE;
devmode->dmPaperWidth = static_cast<short>(h);
devmode->dmPaperLength = static_cast<short>(w);
} else {
devmode->dmOrientation = DMORIENT_PORTRAIT;
devmode->dmPaperWidth = static_cast<short>(w);
devmode->dmPaperLength = static_cast<short>(h);
}
devmode->dmPaperSize = 0;
devmode->dmFields |= DM_ORIENTATION | DM_PAPERWIDTH | DM_PAPERLENGTH;
}
static void fillPrinterOptions(bool duplex, GooString *printOpt)
{
// printOpt format is: <opt1>=<val1>,<opt2>=<val2>,...
const char *nextOpt = printOpt->c_str();
while (nextOpt && *nextOpt) {
const char *comma = strchr(nextOpt, ',');
GooString opt;
if (comma) {
opt.Set(nextOpt, static_cast<int>(comma - nextOpt));
nextOpt = comma + 1;
} else {
opt.Set(nextOpt);
nextOpt = NULL;
}
// here opt is "<optN>=<valN> "
const char *equal = strchr(opt.c_str(), '=');
if (!equal) {
fprintf(stderr, "Warning: unknown printer option \"%s\"\n", opt.c_str());
continue;
}
const int iequal = static_cast<int>(equal - opt.c_str());
GooString value(&opt, iequal + 1, opt.getLength() - iequal - 1);
opt.del(iequal, opt.getLength() - iequal);
// here opt is "<optN>" and value is "<valN>"
if (opt.cmp("source") == 0) {
parseSource(&value);
} else if (opt.cmp("duplex") == 0) {
if (duplex)
fprintf(stderr, "Warning: duplex mode is specified both as standalone and printer options\n");
else
parseDuplex(&value);
} else {
fprintf(stderr, "Warning: unknown printer option \"%s\"\n", opt.c_str());
}
}
}
static void getLocalPos(HWND wind, HWND dlg, RECT *rect)
{
GetClientRect(wind, rect);
MapWindowPoints(wind, dlg, (LPPOINT)rect, 2);
}
static HWND createGroupBox(HWND parent, HINSTANCE hInstance, HMENU id, const char *label, RECT *rect)
{
HWND hwnd = CreateWindowA(WC_BUTTONA, label, WS_CHILD | WS_VISIBLE | BS_GROUPBOX, rect->left, rect->top, rect->right - rect->left, rect->bottom - rect->top, parent, id, hInstance, NULL);
HFONT hFont = (HFONT)SendMessage(parent, WM_GETFONT, (WPARAM)0, (LPARAM)0);
if (hFont)
SendMessage(hwnd, WM_SETFONT, (WPARAM)hFont, (LPARAM)0);
return hwnd;
}
static HWND createCheckBox(HWND parent, HINSTANCE hInstance, HMENU id, const char *label, RECT *rect)
{
HWND hwnd = CreateWindowA(WC_BUTTONA, label, WS_CHILD | WS_VISIBLE | BS_AUTOCHECKBOX | WS_TABSTOP, rect->left, rect->top, rect->right - rect->left, rect->bottom - rect->top, parent, id, hInstance, NULL);
HFONT hFont = (HFONT)SendMessage(parent, WM_GETFONT, (WPARAM)0, (LPARAM)0);
if (hFont)
SendMessage(hwnd, WM_SETFONT, (WPARAM)hFont, (LPARAM)0);
return hwnd;
}
static HWND createStaticText(HWND parent, HINSTANCE hinstance, HMENU id, const char *text, RECT *rect)
{
HWND hwnd = CreateWindowA(WC_STATICA, text, WS_CHILD | WS_VISIBLE | SS_LEFT, rect->left, rect->top, rect->right - rect->left, rect->bottom - rect->top, parent, id, hinstance, NULL);
HFONT hFont = (HFONT)SendMessage(parent, WM_GETFONT, (WPARAM)0, (LPARAM)0);
if (hFont)
SendMessage(hwnd, WM_SETFONT, (WPARAM)hFont, (LPARAM)0);
return hwnd;
}
static HWND createPageScaleComboBox(HWND parent, HINSTANCE hinstance, HMENU id, RECT *rect)
{
HWND hwnd = CreateWindowA(WC_COMBOBOX, "", WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP | CBS_DROPDOWNLIST, rect->left, rect->top, rect->right - rect->left, rect->bottom - rect->top, parent, id, hinstance, NULL);
HFONT hFont = (HFONT)SendMessage(parent, WM_GETFONT, (WPARAM)0, (LPARAM)0);
if (hFont)
SendMessage(hwnd, WM_SETFONT, (WPARAM)hFont, (LPARAM)0);
ComboBox_AddString(hwnd, "None");
ComboBox_AddString(hwnd, "Shrink to Printable Area");
ComboBox_AddString(hwnd, "Fit to Printable Area");
return hwnd;
}
enum PageScale
{
NONE = 0,
SHRINK = 1,
FIT = 2
};
// used to set/get option values in printDialogHookProc
static PageScale pageScale;
static bool centerPage;
static bool useOrigPageSize;
// PrintDlg callback to customize the print dialog with additional controls.
static UINT_PTR CALLBACK printDialogHookProc(HWND hdlg, UINT uiMsg, WPARAM wParam, LPARAM lParam)
{
if (uiMsg == WM_INITDIALOG) {
// Get the extant controls. See dlgs.h and prnsetup.dlg for the PrintDlg control ids.
HWND printerGroupWind = GetDlgItem(hdlg, grp4);
HWND printerComboWind = GetDlgItem(hdlg, cmb4);
HWND nameLabelWind = GetDlgItem(hdlg, stc6);
HWND statusLabelWind = GetDlgItem(hdlg, stc8);
HWND printRangeGroupWind = GetDlgItem(hdlg, grp1);
HWND radio1Wind = GetDlgItem(hdlg, rad1);
HWND radio2Wind = GetDlgItem(hdlg, rad3);
HWND copiesGroupWind = GetDlgItem(hdlg, grp2);
HWND okWind = GetDlgItem(hdlg, IDOK);
HWND cancelWind = GetDlgItem(hdlg, IDCANCEL);
if (!printerGroupWind || !printerComboWind || !nameLabelWind || !statusLabelWind || !printRangeGroupWind || !radio1Wind || !radio2Wind || !copiesGroupWind || !okWind || !cancelWind)
return 0;
// Get the size and position of the above controls relative to the
// print dialog window
RECT printerGroupRect;
RECT printerComboRect;
RECT nameLabelRect;
RECT statusLabelRect;
RECT printRangeGroupRect;
RECT radio1Rect, radio2Rect;
RECT copiesGroupRect;
RECT okRect, cancelRect;
getLocalPos(printerGroupWind, hdlg, &printerGroupRect);
getLocalPos(printerComboWind, hdlg, &printerComboRect);
getLocalPos(nameLabelWind, hdlg, &nameLabelRect);
getLocalPos(statusLabelWind, hdlg, &statusLabelRect);
getLocalPos(printRangeGroupWind, hdlg, &printRangeGroupRect);
getLocalPos(radio1Wind, hdlg, &radio1Rect);
getLocalPos(radio2Wind, hdlg, &radio2Rect);
getLocalPos(copiesGroupWind, hdlg, &copiesGroupRect);
getLocalPos(okWind, hdlg, &okRect);
getLocalPos(cancelWind, hdlg, &cancelRect);
// Calc space required for new group
int interGroupSpace = printRangeGroupRect.top - printerGroupRect.bottom;
int groupHeight = statusLabelRect.top - printerGroupRect.top + printRangeGroupRect.bottom - radio1Rect.bottom;
// Increase dialog size
RECT dlgRect;
GetWindowRect(hdlg, &dlgRect);
SetWindowPos(hdlg, nullptr, dlgRect.left, dlgRect.top, dlgRect.right - dlgRect.left, dlgRect.bottom - dlgRect.top + interGroupSpace + groupHeight, SWP_NOMOVE | SWP_NOREDRAW | SWP_NOZORDER);
// Add new group and controls
HINSTANCE hinstance = (HINSTANCE)GetWindowLongPtr(hdlg, GWLP_HINSTANCE);
RECT pdfGroupBoxRect;
pdfGroupBoxRect.left = printRangeGroupRect.left;
pdfGroupBoxRect.right = copiesGroupRect.right;
pdfGroupBoxRect.top = printRangeGroupRect.bottom + interGroupSpace;
pdfGroupBoxRect.bottom = pdfGroupBoxRect.top + groupHeight;
createGroupBox(hdlg, hinstance, (HMENU)grp3, "PDF Print Options", &pdfGroupBoxRect);
RECT textRect;
textRect.left = nameLabelRect.left;
textRect.right = static_cast<LONG>(nameLabelRect.left + 1.8 * (printerComboRect.left - nameLabelRect.left));
textRect.top = pdfGroupBoxRect.top + nameLabelRect.top - printerGroupRect.top;
textRect.bottom = textRect.top + nameLabelRect.bottom - nameLabelRect.top;
createStaticText(hdlg, hinstance, (HMENU)stc1, "Page Scaling:", &textRect);
RECT comboBoxRect;
comboBoxRect.left = textRect.right;
comboBoxRect.right = comboBoxRect.left + printerComboRect.right - printerComboRect.left;
;
comboBoxRect.top = pdfGroupBoxRect.top + printerComboRect.top - printerGroupRect.top;
comboBoxRect.bottom = textRect.top + 4 * (printerComboRect.bottom - printerComboRect.top);
HWND comboBoxWind = createPageScaleComboBox(hdlg, hinstance, (HMENU)cmb1, &comboBoxRect);
RECT checkBox1Rect;
checkBox1Rect.left = radio1Rect.left;
checkBox1Rect.right = pdfGroupBoxRect.right - 10;
checkBox1Rect.top = pdfGroupBoxRect.top + statusLabelRect.top - printerGroupRect.top;
checkBox1Rect.bottom = checkBox1Rect.top + radio1Rect.bottom - radio1Rect.top;
HWND checkBox1Wind = createCheckBox(hdlg, hinstance, (HMENU)chx3, "Center", &checkBox1Rect);
RECT checkBox2Rect;
checkBox2Rect.left = radio1Rect.left;
checkBox2Rect.right = pdfGroupBoxRect.right - 10;
checkBox2Rect.top = checkBox1Rect.top + radio2Rect.top - radio1Rect.top;
checkBox2Rect.bottom = checkBox2Rect.top + radio1Rect.bottom - radio1Rect.top;
HWND checkBox2Wind = createCheckBox(hdlg, hinstance, (HMENU)chx4, "Select page size using document page size", &checkBox2Rect);
// Move OK and Cancel buttons down ensuring they are last in the Z order
// so that the tab order is correct.
SetWindowPos(okWind, HWND_BOTTOM, okRect.left, okRect.top + interGroupSpace + groupHeight, 0, 0,
SWP_NOSIZE); // keep current size
SetWindowPos(cancelWind, HWND_BOTTOM, cancelRect.left, cancelRect.top + interGroupSpace + groupHeight, 0, 0,
SWP_NOSIZE); // keep current size
// Initialize control values
ComboBox_SetCurSel(comboBoxWind, pageScale);
Button_SetCheck(checkBox1Wind, centerPage ? BST_CHECKED : BST_UNCHECKED);
Button_SetCheck(checkBox2Wind, useOrigPageSize ? BST_CHECKED : BST_UNCHECKED);
} else if (uiMsg == WM_COMMAND) {
// Save settings
UINT id = LOWORD(wParam);
if (id == cmb1)
pageScale = (PageScale)ComboBox_GetCurSel(GetDlgItem(hdlg, cmb1));
if (id == chx3)
centerPage = IsDlgButtonChecked(hdlg, chx3);
if (id == chx4)
useOrigPageSize = IsDlgButtonChecked(hdlg, chx4);
}
return 0;
}
void win32SetupPrinter(GooString *printer, GooString *printOpt, bool duplex, bool setupdlg)
{
if (printer->c_str()[0] == 0) {
DWORD size = 0;
GetDefaultPrinterA(nullptr, &size);
printerName = (char *)gmalloc(size);
GetDefaultPrinterA(printerName, &size);
} else {
printerName = copyString(printer->c_str(), printer->getLength());
}
// Query the size of the DEVMODE struct
LONG szProp = DocumentPropertiesA(nullptr, nullptr, printerName, nullptr, nullptr, 0);
if (szProp < 0) {
fprintf(stderr, "Error: Printer \"%s\" not found\n", printerName);
exit(99);
}
devmode = (DEVMODEA *)gmalloc(szProp);
memset(devmode, 0, szProp);
devmode->dmSize = sizeof(DEVMODEA);
devmode->dmSpecVersion = DM_SPECVERSION;
// Load the current default configuration for the printer into devmode
if (DocumentPropertiesA(nullptr, nullptr, printerName, devmode, devmode, DM_OUT_BUFFER) < 0) {
fprintf(stderr, "Error: Printer \"%s\" not found\n", printerName);
exit(99);
}
// Update devmode with selected print options
fillCommonPrinterOptions(duplex);
fillPrinterOptions(duplex, printOpt);
// Call DocumentProperties again so the driver can update its private data
// with the modified print options. This will also display the printer
// properties dialog if setupdlg is true.
int ret;
DWORD mode = DM_IN_BUFFER | DM_OUT_BUFFER;
if (setupdlg)
mode |= DM_IN_PROMPT;
ret = DocumentPropertiesA(nullptr, nullptr, printerName, devmode, devmode, mode);
if (ret < 0) {
fprintf(stderr, "Error: Printer \"%s\" not found\n", printerName);
exit(99);
}
if (setupdlg && ret == IDCANCEL)
exit(0);
hdc = CreateDCA(nullptr, printerName, nullptr, devmode);
if (!hdc) {
fprintf(stderr, "Error: Printer \"%s\" not found\n", printerName);
exit(99);
}
}
void win32ShowPrintDialog(bool *expand, bool *noShrink, bool *noCenter, bool *usePDFPageSize, bool *allPages, int *firstPage, int *lastPage, int maxPages)
{
PRINTDLG pd;
memset(&pd, 0, sizeof(PRINTDLG));
pd.lStructSize = sizeof(PRINTDLG);
pd.Flags = PD_NOSELECTION | PD_ENABLEPRINTHOOK | PD_USEDEVMODECOPIESANDCOLLATE | PD_RETURNDC;
if (*allPages) {
pd.nFromPage = 1;
pd.nToPage = maxPages;
} else {
pd.Flags |= PD_PAGENUMS;
pd.nFromPage = *firstPage;
pd.nToPage = *lastPage;
}
pd.nCopies = 1;
pd.nMinPage = 1;
pd.nMaxPage = maxPages;
pd.lpfnPrintHook = printDialogHookProc;
if (!*expand && *noShrink)
pageScale = NONE;
else if (!*expand && !*noShrink)
pageScale = SHRINK;
else
pageScale = FIT;
centerPage = !*noCenter;
useOrigPageSize = *usePDFPageSize;
if (PrintDlgA(&pd)) {
// Ok
hDevnames = pd.hDevNames;
DEVNAMES *devnames = (DEVNAMES *)GlobalLock(hDevnames);
printerName = (char *)devnames + devnames->wDeviceOffset;
hDevmode = pd.hDevMode;
devmode = (DEVMODEA *)GlobalLock(hDevmode);
hdc = pd.hDC;
if (pd.Flags & PD_PAGENUMS) {
*allPages = false;
*firstPage = pd.nFromPage;
*lastPage = pd.nToPage;
} else {
*allPages = true;
}
if (pageScale == NONE) {
*expand = false;
*noShrink = true;
} else if (pageScale == SHRINK) {
*expand = false;
*noShrink = false;
} else {
*expand = true;
*noShrink = false;
}
*noCenter = !centerPage;
*usePDFPageSize = useOrigPageSize;
} else {
// Cancel
exit(0);
}
}
cairo_surface_t *win32BeginDocument(GooString *inputFileName, GooString *outputFileName)
{
DOCINFOA docinfo;
memset(&docinfo, 0, sizeof(docinfo));
docinfo.cbSize = sizeof(docinfo);
if (inputFileName->cmp("fd://0") == 0)
docinfo.lpszDocName = "pdftocairo <stdin>";
else
docinfo.lpszDocName = inputFileName->c_str();
if (outputFileName)
docinfo.lpszOutput = outputFileName->c_str();
if (StartDocA(hdc, &docinfo) <= 0) {
fprintf(stderr, "Error: StartDoc failed\n");
exit(99);
}
return cairo_win32_printing_surface_create(hdc);
}
void win32BeginPage(double *w, double *h, bool changePageSize, bool useFullPage)
{
if (changePageSize)
fillPagePrinterOptions(*w, *h);
if (DocumentPropertiesA(nullptr, nullptr, printerName, devmode, devmode, DM_IN_BUFFER | DM_OUT_BUFFER) < 0) {
fprintf(stderr, "Error: Printer \"%s\" not found\n", printerName);
exit(99);
}
ResetDCA(hdc, devmode);
// Get actual paper size or if useFullPage is false the printable area.
// Transform the hdc scale to points to be consistent with other cairo backends
int x_dpi = GetDeviceCaps(hdc, LOGPIXELSX);
int y_dpi = GetDeviceCaps(hdc, LOGPIXELSY);
int x_off = GetDeviceCaps(hdc, PHYSICALOFFSETX);
int y_off = GetDeviceCaps(hdc, PHYSICALOFFSETY);
if (useFullPage) {
*w = GetDeviceCaps(hdc, PHYSICALWIDTH) * 72.0 / x_dpi;
*h = GetDeviceCaps(hdc, PHYSICALHEIGHT) * 72.0 / y_dpi;
} else {
*w = GetDeviceCaps(hdc, HORZRES) * 72.0 / x_dpi;
*h = GetDeviceCaps(hdc, VERTRES) * 72.0 / y_dpi;
}
XFORM xform;
xform.eM11 = x_dpi / 72.0f;
xform.eM12 = 0;
xform.eM21 = 0;
xform.eM22 = y_dpi / 72.0f;
if (useFullPage) {
xform.eDx = static_cast<FLOAT>(-x_off);
xform.eDy = static_cast<FLOAT>(-y_off);
} else {
xform.eDx = 0;
xform.eDy = 0;
}
SetGraphicsMode(hdc, GM_ADVANCED);
SetWorldTransform(hdc, &xform);
StartPage(hdc);
}
void win32EndPage(GooString *imageFileName)
{
EndPage(hdc);
}
void win32EndDocument()
{
EndDoc(hdc);
DeleteDC(hdc);
if (hDevmode) {
GlobalUnlock(hDevmode);
GlobalFree(hDevmode);
} else {
gfree(devmode);
}
if (hDevnames) {
GlobalUnlock(hDevnames);
GlobalFree(hDevnames);
} else {
gfree(printerName);
}
}
#endif // CAIRO_HAS_WIN32_SURFACE