2 * PostScript driver Escape function
4 * Copyright 1998 Huw D M Davies
8 #include "wine/winuser16.h"
10 #include "debugtools.h"
14 DEFAULT_DEBUG_CHANNEL(psdrv
)
17 INT
PSDRV_Escape( DC
*dc
, INT nEscape
, INT cbInput
,
18 SEGPTR lpInData
, SEGPTR lpOutData
)
20 PSDRV_PDEVICE
*physDev
= (PSDRV_PDEVICE
*)dc
->physDev
;
25 RECT16
*r
= (RECT16
*)PTR_SEG_TO_LIN(lpOutData
);
26 if(!physDev
->job
.banding
) {
27 physDev
->job
.banding
= TRUE
;
30 r
->right
= dc
->devCaps
->horzRes
;
31 r
->bottom
= dc
->devCaps
->vertRes
;
32 TRACE("NEXTBAND returning %d,%d - %d,%d\n", r
->left
,
33 r
->top
, r
->right
, r
->bottom
);
40 TRACE("NEXTBAND rect to 0,0 - 0,0\n" );
41 physDev
->job
.banding
= FALSE
;
47 if(!physDev
->job
.hJob
) {
48 FIXME("hJob == 0. Now what?\n");
52 if(!PSDRV_EndPage( dc
))
58 WARN("cbInput < 2 (=%d) for QUERYESCSUPPORT\n", cbInput
);
61 UINT16 num
= *(UINT16
*)PTR_SEG_TO_LIN(lpInData
);
62 TRACE("QUERYESCSUPPORT for %d\n", num
);
72 case GETPRINTINGOFFSET
:
73 case GETSCALINGFACTOR
:
83 case POSTSCRIPT_PASSTHROUGH
:
92 TRACE("SETABORTPROC\n");
103 /* lpInData may not be 0 terminated so we must copy it */
105 name
= HeapAlloc( GetProcessHeap(), 0, cbInput
+1 );
106 memcpy(name
, PTR_SEG_TO_LIN(lpInData
), cbInput
);
107 name
[cbInput
] = '\0';
109 doc
.cbSize
= sizeof(doc
);
110 doc
.lpszDocName
= name
;
111 doc
.lpszOutput
= doc
.lpszDatatype
= NULL
;
114 ret
= PSDRV_StartDoc(dc
, &doc
);
115 if(name
) HeapFree( GetProcessHeap(), 0, name
);
116 if(ret
<= 0) return -1;
117 ret
= PSDRV_StartPage(dc
);
118 if(ret
<= 0) return -1;
124 return PSDRV_EndDoc( dc
);
126 case GETPHYSPAGESIZE
:
128 POINT16
*p
= (POINT16
*)PTR_SEG_TO_LIN(lpOutData
);
130 p
->x
= dc
->devCaps
->horzRes
;
131 p
->y
= dc
->devCaps
->vertRes
;
132 TRACE("GETPHYSPAGESIZE: returning %dx%d\n", p
->x
, p
->y
);
136 case GETPRINTINGOFFSET
:
138 POINT16
*p
= (POINT16
*)PTR_SEG_TO_LIN(lpOutData
);
141 TRACE("GETPRINTINGOFFSET: returning %dx%d\n", p
->x
, p
->y
);
145 case GETSCALINGFACTOR
:
147 POINT16
*p
= (POINT16
*)PTR_SEG_TO_LIN(lpOutData
);
150 TRACE("GETSCALINGFACTOR: returning %dx%d\n", p
->x
, p
->y
);
156 INT16
*NumCopies
= (INT16
*)PTR_SEG_TO_LIN(lpInData
);
157 INT16
*ActualCopies
= (INT16
*)PTR_SEG_TO_LIN(lpOutData
);
159 WARN("cbInput != 2 (=%d) for SETCOPYCOUNT\n", cbInput
);
162 TRACE("SETCOPYCOUNT %d\n", *NumCopies
);
169 LPSTR p
= (LPSTR
)PTR_SEG_TO_LIN(lpOutData
);
170 strcpy(p
, "PostScript");
171 *(p
+ strlen(p
) + 1) = '\0'; /* 2 '\0's at end of string */
177 INT16 newCap
= *(INT16
*)PTR_SEG_TO_LIN(lpInData
);
179 WARN("cbInput != 2 (=%d) for SETLINECAP\n", cbInput
);
182 TRACE("SETLINECAP %d\n", newCap
);
188 INT16 newJoin
= *(INT16
*)PTR_SEG_TO_LIN(lpInData
);
190 WARN("cbInput != 2 (=%d) for SETLINEJOIN\n", cbInput
);
193 TRACE("SETLINEJOIN %d\n", newJoin
);
199 INT16 newLimit
= *(INT16
*)PTR_SEG_TO_LIN(lpInData
);
201 WARN("cbInput != 2 (=%d) for SETMITERLIMIT\n", cbInput
);
204 TRACE("SETMITERLIMIT %d\n", newLimit
);
209 /* Undocumented escape used by winword6.
210 Switches between ANSI and a special charset.
211 If *lpInData == 1 we require that
215 0x94 is quotedblright
219 0xa0 is non break space - yeah right.
221 If *lpInData == 0 we get ANSI.
222 Since there's nothing else there, let's just make these the default
223 anyway and see what happens...
227 case EXT_DEVICE_CAPS
:
229 UINT16 cap
= *(UINT16
*)PTR_SEG_TO_LIN(lpInData
);
231 WARN("cbInput != 2 (=%d) for EXT_DEVICE_CAPS\n",
235 TRACE("EXT_DEVICE_CAPS %d\n", cap
);
241 RECT16
*r
= (RECT16
*)PTR_SEG_TO_LIN(lpInData
);
243 WARN("cbInput != 8 (=%d) for SET_BOUNDS\n", cbInput
);
246 TRACE("SET_BOUNDS (%d,%d) - (%d,%d)\n", r
->left
, r
->top
,
247 r
->right
, r
->bottom
);
252 case POSTSCRIPT_PASSTHROUGH
:
254 /* Write directly to spool file, bypassing normal PS driver
255 * processing that is done along with writing PostScript code
258 return WriteSpool16(physDev
->job
.hJob
, ((char *)lpInData
) + 2,
263 FIXME("Unimplemented code 0x%x\n", nEscape
);
268 /************************************************************************
271 INT
PSDRV_StartPage( DC
*dc
)
273 PSDRV_PDEVICE
*physDev
= (PSDRV_PDEVICE
*)dc
->physDev
;
275 if(!physDev
->job
.OutOfPage
) {
276 FIXME("Already started a page?\n");
279 physDev
->job
.PageNo
++;
280 if(!PSDRV_WriteNewPage( dc
))
282 physDev
->job
.OutOfPage
= FALSE
;
287 /************************************************************************
290 INT
PSDRV_EndPage( DC
*dc
)
292 PSDRV_PDEVICE
*physDev
= (PSDRV_PDEVICE
*)dc
->physDev
;
294 if(physDev
->job
.OutOfPage
) {
295 FIXME("Already ended a page?\n");
298 if(!PSDRV_WriteEndPage( dc
))
300 physDev
->job
.OutOfPage
= TRUE
;
305 /************************************************************************
308 INT
PSDRV_StartDoc( DC
*dc
, const DOCINFOA
*doc
)
310 PSDRV_PDEVICE
*physDev
= (PSDRV_PDEVICE
*)dc
->physDev
;
312 if(physDev
->job
.hJob
) {
313 FIXME("hJob != 0. Now what?\n");
317 if(doc
->lpszOutput
) {
318 HeapFree( PSDRV_Heap
, 0, physDev
->job
.output
);
319 physDev
->job
.output
= HEAP_strdupA( PSDRV_Heap
, 0, doc
->lpszOutput
);
321 physDev
->job
.hJob
= OpenJob16(physDev
->job
.output
, doc
->lpszDocName
,
323 if(!physDev
->job
.hJob
) {
324 WARN("OpenJob failed\n");
327 physDev
->job
.banding
= FALSE
;
328 physDev
->job
.OutOfPage
= TRUE
;
329 physDev
->job
.PageNo
= 0;
330 if(!PSDRV_WriteHeader( dc
, doc
->lpszDocName
))
333 return physDev
->job
.hJob
;
337 /************************************************************************
340 INT
PSDRV_EndDoc( DC
*dc
)
342 PSDRV_PDEVICE
*physDev
= (PSDRV_PDEVICE
*)dc
->physDev
;
344 if(!physDev
->job
.hJob
) {
345 FIXME("hJob == 0. Now what?\n");
349 if(!physDev
->job
.OutOfPage
) {
350 WARN("Somebody forgot a EndPage\n");
353 if(!PSDRV_WriteFooter( dc
))
356 if( CloseJob16( physDev
->job
.hJob
) == SP_ERROR
) {
357 WARN("CloseJob error\n");
360 physDev
->job
.hJob
= 0;