2 * Implementation of some printer driver bits
4 * Copyright 1996 John Harvey
5 * Copyright 1998 Huw Davies
6 * Copyright 1998 Andreas Mohr
7 * Copyright 1999 Klaas van Gend
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
25 #include "wine/port.h"
41 #include "wine/winbase16.h"
42 #include "wine/wingdi16.h"
47 #include "wine/debug.h"
52 WINE_DEFAULT_DEBUG_CHANNEL(print
);
54 static char PrinterModel
[] = "Printer Model";
55 static char DefaultDevMode
[] = "Default DevMode";
56 static char PrinterDriverData
[] = "PrinterDriverData";
57 static char Printers
[] = "System\\CurrentControlSet\\Control\\Print\\Printers\\";
60 /******************************************************************
63 * StartDoc calls the STARTDOC Escape with the input data pointing to DocName
64 * and the output data (which is used as a second input parameter).pointing at
65 * the whole docinfo structure. This seems to be an undocumented feature of
66 * the STARTDOC Escape.
68 * Note: we now do it the other way, with the STARTDOC Escape calling StartDoc.
70 INT WINAPI
StartDocA(HDC hdc
, const DOCINFOA
* doc
)
73 DC
*dc
= DC_GetDCPtr( hdc
);
75 TRACE("DocName = '%s' Output = '%s' Datatype = '%s'\n",
76 doc
->lpszDocName
, doc
->lpszOutput
, doc
->lpszDatatype
);
78 if(!dc
) return SP_ERROR
;
80 if (dc
->funcs
->pStartDoc
) ret
= dc
->funcs
->pStartDoc( dc
->physDev
, doc
);
81 GDI_ReleaseObj( hdc
);
85 /*************************************************************************
89 INT WINAPI
StartDocW(HDC hdc
, const DOCINFOW
* doc
)
94 docA
.cbSize
= doc
->cbSize
;
95 docA
.lpszDocName
= doc
->lpszDocName
?
96 HEAP_strdupWtoA( GetProcessHeap(), 0, doc
->lpszDocName
) : NULL
;
97 docA
.lpszOutput
= doc
->lpszOutput
?
98 HEAP_strdupWtoA( GetProcessHeap(), 0, doc
->lpszOutput
) : NULL
;
99 docA
.lpszDatatype
= doc
->lpszDatatype
?
100 HEAP_strdupWtoA( GetProcessHeap(), 0, doc
->lpszDatatype
) : NULL
;
101 docA
.fwType
= doc
->fwType
;
103 ret
= StartDocA(hdc
, &docA
);
106 HeapFree( GetProcessHeap(), 0, (LPSTR
)docA
.lpszDocName
);
108 HeapFree( GetProcessHeap(), 0, (LPSTR
)docA
.lpszOutput
);
109 if(docA
.lpszDatatype
)
110 HeapFree( GetProcessHeap(), 0, (LPSTR
)docA
.lpszDatatype
);
116 /******************************************************************
120 INT WINAPI
EndDoc(HDC hdc
)
123 DC
*dc
= DC_GetDCPtr( hdc
);
124 if(!dc
) return SP_ERROR
;
126 if (dc
->funcs
->pEndDoc
) ret
= dc
->funcs
->pEndDoc( dc
->physDev
);
127 GDI_ReleaseObj( hdc
);
132 /******************************************************************
133 * StartPage [GDI32.@]
136 INT WINAPI
StartPage(HDC hdc
)
139 DC
*dc
= DC_GetDCPtr( hdc
);
140 if(!dc
) return SP_ERROR
;
142 if(dc
->funcs
->pStartPage
)
143 ret
= dc
->funcs
->pStartPage( dc
->physDev
);
146 GDI_ReleaseObj( hdc
);
151 /******************************************************************
155 INT WINAPI
EndPage(HDC hdc
)
157 ABORTPROC abort_proc
;
159 DC
*dc
= DC_GetDCPtr( hdc
);
160 if(!dc
) return SP_ERROR
;
162 if (dc
->funcs
->pEndPage
) ret
= dc
->funcs
->pEndPage( dc
->physDev
);
163 abort_proc
= dc
->pAbortProc
;
164 GDI_ReleaseObj( hdc
);
165 if (abort_proc
&& !abort_proc( hdc
, 0 ))
174 /******************************************************************************
177 INT WINAPI
AbortDoc(HDC hdc
)
180 DC
*dc
= DC_GetDCPtr( hdc
);
181 if(!dc
) return SP_ERROR
;
183 if (dc
->funcs
->pAbortDoc
) ret
= dc
->funcs
->pAbortDoc( dc
->physDev
);
184 GDI_ReleaseObj( hdc
);
188 /**********************************************************************
189 * QueryAbort (GDI.155)
191 * Calls the app's AbortProc function if avail.
194 * TRUE if no AbortProc avail or AbortProc wants to continue printing.
195 * FALSE if AbortProc wants to abort printing.
197 BOOL16 WINAPI
QueryAbort16(HDC16 hdc16
, INT16 reserved
)
200 HDC hdc
= HDC_32( hdc16
);
201 DC
*dc
= DC_GetDCPtr( hdc
);
205 ERR("Invalid hdc %p\n", hdc
);
209 abproc
= dc
->pAbortProc
;
210 GDI_ReleaseObj( hdc
);
213 ret
= abproc(hdc
, 0);
217 /* ### start build ### */
218 extern WORD CALLBACK
PRTDRV_CallTo16_word_ww(FARPROC16
,WORD
,WORD
);
219 /* ### stop build ### */
221 /**********************************************************************
224 static BOOL CALLBACK
call_abort_proc16( HDC hdc
, INT code
)
227 DC
*dc
= DC_GetDCPtr( hdc
);
229 if (!dc
) return FALSE
;
230 proc16
= dc
->pAbortProc16
;
231 GDI_ReleaseObj( hdc
);
232 if (proc16
) return PRTDRV_CallTo16_word_ww( (FARPROC16
)proc16
, HDC_16(hdc
), code
);
237 /**********************************************************************
238 * SetAbortProc (GDI.381)
240 INT16 WINAPI
SetAbortProc16(HDC16 hdc16
, ABORTPROC16 abrtprc
)
242 HDC hdc
= HDC_32( hdc16
);
243 DC
*dc
= DC_GetDCPtr( hdc
);
245 if (!dc
) return FALSE
;
246 dc
->pAbortProc16
= abrtprc
;
247 GDI_ReleaseObj( hdc
);
248 return SetAbortProc( hdc
, call_abort_proc16
);
251 /**********************************************************************
252 * SetAbortProc (GDI32.@)
255 INT WINAPI
SetAbortProc(HDC hdc
, ABORTPROC abrtprc
)
257 DC
*dc
= DC_GetDCPtr( hdc
);
259 if (!dc
) return FALSE
;
260 dc
->pAbortProc
= abrtprc
;
261 GDI_ReleaseObj( hdc
);
266 /****************** misc. printer related functions */
269 * The following function should implement a queing system
278 static struct hpq
*hpqueue
;
280 /**********************************************************************
284 HPQ16 WINAPI
CreatePQ16(INT16 size
)
291 tmp_size
= size
<< 2;
292 if (!(hpq
= GlobalAlloc16(GMEM_SHARE
|GMEM_MOVEABLE
, tmp_size
+ 8)))
294 pPQ
= GlobalLock16(hpq
);
303 FIXME("(%d): stub\n",size
);
308 /**********************************************************************
312 INT16 WINAPI
DeletePQ16(HPQ16 hPQ
)
314 return GlobalFree16((HGLOBAL16
)hPQ
);
317 /**********************************************************************
318 * ExtractPQ (GDI.232)
321 INT16 WINAPI
ExtractPQ16(HPQ16 hPQ
)
323 struct hpq
*queue
, *prev
, *current
, *currentPrev
;
324 int key
= 0, tag
= -1;
325 currentPrev
= prev
= NULL
;
326 queue
= current
= hpqueue
;
332 currentPrev
= current
;
333 current
= current
->next
;
336 if (current
->key
< key
)
348 prev
->next
= queue
->next
;
350 hpqueue
= queue
->next
;
351 HeapFree(GetProcessHeap(), 0, queue
);
354 TRACE("%x got tag %d key %d\n", hPQ
, tag
, key
);
359 /**********************************************************************
363 INT16 WINAPI
InsertPQ16(HPQ16 hPQ
, INT16 tag
, INT16 key
)
365 struct hpq
*queueItem
= HeapAlloc(GetProcessHeap(), 0, sizeof(struct hpq
));
366 if(queueItem
== NULL
) {
367 ERR("Memory exausted!\n");
370 queueItem
->next
= hpqueue
;
372 queueItem
->key
= key
;
373 queueItem
->tag
= tag
;
375 FIXME("(%x %d %d): stub???\n", hPQ
, tag
, key
);
379 /**********************************************************************
383 INT16 WINAPI
MinPQ16(HPQ16 hPQ
)
385 FIXME("(%x): stub\n", hPQ
);
389 /**********************************************************************
393 INT16 WINAPI
SizePQ16(HPQ16 hPQ
, INT16 sizechange
)
395 FIXME("(%x %d): stub\n", hPQ
, sizechange
);
402 * The following functions implement part of the spooling process to
403 * print manager. I would like to see wine have a version of print managers
404 * that used LPR/LPD. For simplicity print jobs will be sent to a file for
407 typedef struct PRINTJOB
415 } PRINTJOB
, *PPRINTJOB
;
417 #define MAX_PRINT_JOBS 1
420 PPRINTJOB gPrintJobsTable
[MAX_PRINT_JOBS
];
423 static PPRINTJOB
FindPrintJobFromHandle(HANDLE16 hHandle
)
425 return gPrintJobsTable
[0];
428 static int CreateSpoolFile(LPCSTR pszOutput
)
432 char *psCmdP
= psCmd
;
434 /* TTD convert the 'output device' into a spool file name */
436 if (pszOutput
== NULL
|| *pszOutput
== '\0')
439 if (!strncmp("LPR:",pszOutput
,4))
440 sprintf(psCmd
,"|lpr -P%s",pszOutput
+4);
446 if(!RegOpenKeyA(HKEY_LOCAL_MACHINE
, "Software\\Wine\\Wine\\Config\\spooler", &hkey
))
448 DWORD type
, count
= sizeof(psCmd
);
449 RegQueryValueExA(hkey
, pszOutput
, 0, &type
, psCmd
, &count
);
453 TRACE("Got printerSpoolCommand '%s' for output device '%s'\n",
456 psCmdP
= (char *)pszOutput
;
459 while (*psCmdP
&& isspace(*psCmdP
))
475 TRACE("In child need to exec %s\n",psCmdP
);
485 TRACE("Need to execute a cmnd and pipe the output to it\n");
489 char buffer
[MAX_PATH
];
491 TRACE("Just assume it's a file\n");
494 * The file name can be dos based, we have to find its
495 * Unix correspondant file name
497 wine_get_unix_file_name(psCmdP
, buffer
, sizeof(buffer
));
499 if ((fd
= open(buffer
, O_CREAT
| O_TRUNC
| O_WRONLY
, 0600)) < 0)
501 ERR("Failed to create spool file '%s' ('%s'). (error %s)\n",
502 buffer
, psCmdP
, strerror(errno
));
508 static int FreePrintJob(HANDLE16 hJob
)
513 pPrintJob
= FindPrintJobFromHandle(hJob
);
514 if (pPrintJob
!= NULL
)
516 gPrintJobsTable
[pPrintJob
->nIndex
] = NULL
;
517 HeapFree(GetProcessHeap(), 0, pPrintJob
->pszOutput
);
518 HeapFree(GetProcessHeap(), 0, pPrintJob
->pszTitle
);
519 if (pPrintJob
->fd
>= 0) close(pPrintJob
->fd
);
520 HeapFree(GetProcessHeap(), 0, pPrintJob
);
526 /**********************************************************************
530 HPJOB16 WINAPI
OpenJob16(LPCSTR lpOutput
, LPCSTR lpTitle
, HDC16 hDC
)
532 HPJOB16 hHandle
= (HPJOB16
)SP_ERROR
;
535 TRACE("'%s' '%s' %04x\n", lpOutput
, lpTitle
, hDC
);
537 pPrintJob
= gPrintJobsTable
[0];
538 if (pPrintJob
== NULL
)
542 /* Try and create a spool file */
543 fd
= CreateSpoolFile(lpOutput
);
546 pPrintJob
= HeapAlloc(GetProcessHeap(), 0, sizeof(PRINTJOB
));
547 if(pPrintJob
== NULL
) {
548 WARN("Memory exausted!\n");
554 pPrintJob
->pszOutput
= HeapAlloc(GetProcessHeap(), 0, strlen(lpOutput
)+1);
555 strcpy( pPrintJob
->pszOutput
, lpOutput
);
558 pPrintJob
->pszTitle
= HeapAlloc(GetProcessHeap(), 0, strlen(lpTitle
)+1);
559 strcpy( pPrintJob
->pszTitle
, lpTitle
);
561 pPrintJob
->hDC
= hDC
;
563 pPrintJob
->nIndex
= 0;
564 pPrintJob
->hHandle
= hHandle
;
565 gPrintJobsTable
[pPrintJob
->nIndex
] = pPrintJob
;
568 TRACE("return %04x\n", hHandle
);
572 /**********************************************************************
576 INT16 WINAPI
CloseJob16(HPJOB16 hJob
)
579 PPRINTJOB pPrintJob
= NULL
;
581 TRACE("%04x\n", hJob
);
583 pPrintJob
= FindPrintJobFromHandle(hJob
);
584 if (pPrintJob
!= NULL
)
586 /* Close the spool file */
587 close(pPrintJob
->fd
);
594 /**********************************************************************
595 * WriteSpool (GDI.241)
598 INT16 WINAPI
WriteSpool16(HPJOB16 hJob
, LPSTR lpData
, INT16 cch
)
601 PPRINTJOB pPrintJob
= NULL
;
603 TRACE("%04x %08lx %04x\n", hJob
, (DWORD
)lpData
, cch
);
605 pPrintJob
= FindPrintJobFromHandle(hJob
);
606 if (pPrintJob
!= NULL
&& pPrintJob
->fd
>= 0 && cch
)
608 if (write(pPrintJob
->fd
, lpData
, cch
) != cch
)
613 /* FIXME: We just cannot call 16 bit functions from here, since we
614 * have acquired several locks (DC). And we do not really need to.
616 if (pPrintJob
->hDC
== 0) {
617 TRACE("hDC == 0 so no QueryAbort\n");
619 else if (!(QueryAbort16(pPrintJob
->hDC
, (nRet
== SP_OUTOFDISK
) ? nRet
: 0 )))
621 CloseJob16(hJob
); /* printing aborted */
629 typedef INT (WINAPI
*MSGBOX_PROC
)( HWND
, LPCSTR
, LPCSTR
, UINT
);
631 /**********************************************************************
632 * WriteDialog (GDI.242)
635 INT16 WINAPI
WriteDialog16(HPJOB16 hJob
, LPSTR lpMsg
, INT16 cchMsg
)
638 MSGBOX_PROC pMessageBoxA
;
641 TRACE("%04x %04x '%s'\n", hJob
, cchMsg
, lpMsg
);
643 if ((mod
= GetModuleHandleA("user32.dll")))
645 if ((pMessageBoxA
= (MSGBOX_PROC
)GetProcAddress( mod
, "MessageBoxA" )))
646 ret
= pMessageBoxA(0, lpMsg
, "Printing Error", MB_OKCANCEL
);
652 /**********************************************************************
653 * DeleteJob (GDI.244)
656 INT16 WINAPI
DeleteJob16(HPJOB16 hJob
, INT16 nNotUsed
)
660 TRACE("%04x\n", hJob
);
662 nRet
= FreePrintJob(hJob
);
667 * The following two function would allow a page to be sent to the printer
668 * when it has been processed. For simplicity they havn't been implemented.
669 * This means a whole job has to be processed before it is sent to the printer.
672 /**********************************************************************
673 * StartSpoolPage (GDI.246)
676 INT16 WINAPI
StartSpoolPage16(HPJOB16 hJob
)
678 FIXME("StartSpoolPage GDI.246 unimplemented\n");
684 /**********************************************************************
685 * EndSpoolPage (GDI.247)
688 INT16 WINAPI
EndSpoolPage16(HPJOB16 hJob
)
690 FIXME("EndSpoolPage GDI.247 unimplemented\n");
695 /**********************************************************************
696 * GetSpoolJob (GDI.245)
699 DWORD WINAPI
GetSpoolJob16(int nOption
, LONG param
)
702 TRACE("In GetSpoolJob param 0x%lx noption %d\n",param
, nOption
);
707 /******************************************************************
708 * DrvGetPrinterDataInternal
710 * Helper for DrvGetPrinterData
712 static DWORD
DrvGetPrinterDataInternal(LPSTR RegStr_Printer
,
713 LPBYTE lpPrinterData
, int cbData
, int what
)
717 DWORD dwType
, cbQueryData
;
719 if (!(RegOpenKeyA(HKEY_LOCAL_MACHINE
, RegStr_Printer
, &hkey
))) {
720 if (what
== INT_PD_DEFAULT_DEVMODE
) { /* "Default DevMode" */
721 if (!(RegQueryValueExA(hkey
, DefaultDevMode
, 0, &dwType
, 0, &cbQueryData
))) {
724 else if ((cbQueryData
) && (cbQueryData
<= cbData
)) {
725 cbQueryData
= cbData
;
726 if (RegQueryValueExA(hkey
, DefaultDevMode
, 0,
727 &dwType
, lpPrinterData
, &cbQueryData
))
731 } else { /* "Printer Driver" */
733 RegQueryValueExA(hkey
, "Printer Driver", 0,
734 &dwType
, lpPrinterData
, &cbQueryData
);
738 if (hkey
) RegCloseKey(hkey
);
742 /******************************************************************
743 * DrvGetPrinterData (GDI.282)
746 DWORD WINAPI
DrvGetPrinterData16(LPSTR lpPrinter
, LPSTR lpProfile
,
747 LPDWORD lpType
, LPBYTE lpPrinterData
,
748 int cbData
, LPDWORD lpNeeded
)
750 LPSTR RegStr_Printer
;
751 HKEY hkey
= 0, hkey2
= 0;
753 DWORD dwType
, PrinterAttr
, cbPrinterAttr
, SetData
, size
;
755 if (HIWORD(lpPrinter
))
756 TRACE("printer %s\n",lpPrinter
);
758 TRACE("printer %p\n",lpPrinter
);
759 if (HIWORD(lpProfile
))
760 TRACE("profile %s\n",lpProfile
);
762 TRACE("profile %p\n",lpProfile
);
763 TRACE("lpType %p\n",lpType
);
765 if ((!lpPrinter
) || (!lpProfile
) || (!lpNeeded
))
766 return ERROR_INVALID_PARAMETER
;
768 RegStr_Printer
= HeapAlloc(GetProcessHeap(), 0,
769 strlen(Printers
) + strlen(lpPrinter
) + 2);
770 strcpy(RegStr_Printer
, Printers
);
771 strcat(RegStr_Printer
, lpPrinter
);
773 if (((DWORD
)lpProfile
== INT_PD_DEFAULT_DEVMODE
) || (HIWORD(lpProfile
) &&
774 (!strcmp(lpProfile
, DefaultDevMode
)))) {
775 size
= DrvGetPrinterDataInternal(RegStr_Printer
, lpPrinterData
, cbData
,
776 INT_PD_DEFAULT_DEVMODE
);
779 if ((lpPrinterData
) && (*lpNeeded
> cbData
))
780 res
= ERROR_MORE_DATA
;
782 else res
= ERROR_INVALID_PRINTER_NAME
;
785 if (((DWORD
)lpProfile
== INT_PD_DEFAULT_MODEL
) || (HIWORD(lpProfile
) &&
786 (!strcmp(lpProfile
, PrinterModel
)))) {
788 if (!lpPrinterData
) goto failed
;
790 res
= ERROR_MORE_DATA
;
793 size
= DrvGetPrinterDataInternal(RegStr_Printer
, lpPrinterData
, cbData
,
794 INT_PD_DEFAULT_MODEL
);
795 if ((size
+1) && (lpType
))
798 res
= ERROR_INVALID_PRINTER_NAME
;
802 if ((res
= RegOpenKeyA(HKEY_LOCAL_MACHINE
, RegStr_Printer
, &hkey
)))
805 if ((res
= RegQueryValueExA(hkey
, "Attributes", 0,
806 &dwType
, (LPBYTE
)&PrinterAttr
, &cbPrinterAttr
)))
808 if ((res
= RegOpenKeyA(hkey
, PrinterDriverData
, &hkey2
)))
811 res
= RegQueryValueExA(hkey2
, lpProfile
, 0,
812 lpType
, lpPrinterData
, lpNeeded
);
813 if ((res
!= ERROR_CANTREAD
) &&
815 (PRINTER_ATTRIBUTE_ENABLE_BIDI
|PRINTER_ATTRIBUTE_NETWORK
))
816 == PRINTER_ATTRIBUTE_NETWORK
))
818 if (!(res
) && (*lpType
== REG_DWORD
) && (*(LPDWORD
)lpPrinterData
== -1))
819 res
= ERROR_INVALID_DATA
;
824 RegSetValueExA(hkey2
, lpProfile
, 0, REG_DWORD
, (LPBYTE
)&SetData
, 4); /* no result returned */
829 if (hkey2
) RegCloseKey(hkey2
);
830 if (hkey
) RegCloseKey(hkey
);
831 HeapFree(GetProcessHeap(), 0, RegStr_Printer
);
836 /******************************************************************
837 * DrvSetPrinterData (GDI.281)
840 DWORD WINAPI
DrvSetPrinterData16(LPSTR lpPrinter
, LPSTR lpProfile
,
841 DWORD lpType
, LPBYTE lpPrinterData
,
844 LPSTR RegStr_Printer
;
848 if (HIWORD(lpPrinter
))
849 TRACE("printer %s\n",lpPrinter
);
851 TRACE("printer %p\n",lpPrinter
);
852 if (HIWORD(lpProfile
))
853 TRACE("profile %s\n",lpProfile
);
855 TRACE("profile %p\n",lpProfile
);
856 TRACE("lpType %08lx\n",lpType
);
858 if ((!lpPrinter
) || (!lpProfile
) ||
859 ((DWORD
)lpProfile
== INT_PD_DEFAULT_MODEL
) || (HIWORD(lpProfile
) &&
860 (!strcmp(lpProfile
, PrinterModel
))))
861 return ERROR_INVALID_PARAMETER
;
863 RegStr_Printer
= HeapAlloc(GetProcessHeap(), 0,
864 strlen(Printers
) + strlen(lpPrinter
) + 2);
865 strcpy(RegStr_Printer
, Printers
);
866 strcat(RegStr_Printer
, lpPrinter
);
868 if (((DWORD
)lpProfile
== INT_PD_DEFAULT_DEVMODE
) || (HIWORD(lpProfile
) &&
869 (!strcmp(lpProfile
, DefaultDevMode
)))) {
870 if ( RegOpenKeyA(HKEY_LOCAL_MACHINE
, RegStr_Printer
, &hkey
)
872 RegSetValueExA(hkey
, DefaultDevMode
, 0, REG_BINARY
,
873 lpPrinterData
, dwSize
) != ERROR_SUCCESS
)
874 res
= ERROR_INVALID_PRINTER_NAME
;
878 strcat(RegStr_Printer
, "\\");
880 if( (res
= RegOpenKeyA(HKEY_LOCAL_MACHINE
, RegStr_Printer
, &hkey
)) ==
884 res
= RegDeleteValueA(hkey
, lpProfile
);
886 res
= RegSetValueExA(hkey
, lpProfile
, 0, lpType
,
887 lpPrinterData
, dwSize
);
891 if (hkey
) RegCloseKey(hkey
);
892 HeapFree(GetProcessHeap(), 0, RegStr_Printer
);