470 lines
11 KiB
C
470 lines
11 KiB
C
/*
|
|
* Printing Routines for the IBM PC using MS Windows
|
|
* Wolfgang Muees 27.10.97
|
|
* Holger Vogt 07.12.01
|
|
*/
|
|
|
|
#define STRICT
|
|
#include "ngspice.h"
|
|
|
|
#ifdef HAS_WINDOWS
|
|
|
|
#include "graph.h"
|
|
#include "ftedev.h"
|
|
#include "ftedbgra.h"
|
|
#include "fteext.h"
|
|
|
|
/*
|
|
* The ngspice.h file included above defines BOOLEAN (via bool.h) and this
|
|
* clashes with the definition obtained from windows.h (via winnt.h).
|
|
* However, BOOLEAN is not used by this file so we can work round this problem
|
|
* by undefining BOOLEAN before including windows.h
|
|
* SJB - May 2005
|
|
*/
|
|
#undef BOOLEAN
|
|
|
|
#ifdef _MSC_VER
|
|
#pragma warn -dup
|
|
#endif /* _MSC_VER */
|
|
#include <windows.h>
|
|
#include <windowsx.h>
|
|
#include "suffix.h"
|
|
#ifdef _MSC_VER
|
|
#pragma hdrstop
|
|
#endif /* _MSC_VER */
|
|
|
|
/* Typen */
|
|
typedef struct { /* Extra Printdaten */
|
|
int ColorIndex; /* Index auf die akt. Farbe */
|
|
int LineIndex; /* Index auf den akt. Linientyp */
|
|
} tPrintData;
|
|
typedef tPrintData * tpPrintData; /* Zeiger darauf */
|
|
#define pPrintData(g) ((tpPrintData)(g->devdep))
|
|
|
|
/* externals */
|
|
void WaitForIdle(void); /* Warte, bis keine Events da */
|
|
|
|
/* lokale Variablen */
|
|
static HFONT PlotFont = NULL; /* Font-Merker */
|
|
static HFONT OldFont = NULL;
|
|
#define NumLines 7 /* Anzahl der LineStyles */
|
|
static int LineTable[NumLines]; /* Speicher fuer die LineStyles */
|
|
static HDC PrinterDC = NULL; /* Device Context */
|
|
#define NumPrintColors 2 /* vordef. Farben */
|
|
static COLORREF ColorTable[NumPrintColors];/* Speicher fuer die Farben */
|
|
static int PrinterWidth = 1000; /* Breite des Papiers */
|
|
static int PrinterHeight = 1000; /* Hoehe des Papiers */
|
|
|
|
/******************************************************************************
|
|
Drucker-Initialisierung
|
|
******************************************************************************/
|
|
|
|
void WPRINT_PrintInit(HWND hwnd)
|
|
{
|
|
/* Parameter-Block */
|
|
PRINTDLG pd;
|
|
|
|
/* Initialisieren */
|
|
pd.lStructSize = sizeof(PRINTDLG);
|
|
pd.hwndOwner = hwnd;
|
|
pd.hDevMode = NULL;
|
|
pd.hDevNames = NULL;
|
|
pd.hDC = NULL;
|
|
pd.Flags = PD_PRINTSETUP;
|
|
pd.nFromPage = 1;
|
|
pd.nToPage = 1;
|
|
pd.nMinPage = 0;
|
|
pd.nMaxPage = 0;
|
|
pd.nCopies = 1;
|
|
pd.hInstance = NULL;
|
|
pd.lCustData = 0;
|
|
pd.lpfnPrintHook = NULL;
|
|
pd.lpfnSetupHook = NULL;
|
|
pd.lpPrintTemplateName = NULL;
|
|
pd.lpSetupTemplateName = NULL;
|
|
pd.hPrintTemplate = NULL;
|
|
pd.hSetupTemplate = NULL;
|
|
|
|
/* Default-Drucker initialisieren */
|
|
(void) PrintDlg( &pd);
|
|
|
|
/* Speicher freigeben */
|
|
if( pd.hDevMode) GlobalFree( pd.hDevMode);
|
|
if( pd.hDevNames) GlobalFree( pd.hDevNames);
|
|
}
|
|
|
|
/* Abort-Procedur zum Drucken */
|
|
BOOL CALLBACK WPRINT_Abort( HDC hdc, int iError)
|
|
{
|
|
/* Multitasking */
|
|
WaitForIdle();
|
|
|
|
/* Warten */
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/******************************************************************************
|
|
WPRINT_Init() stellt die Verbindung zur Grafik her. Dazu gehoert die Feststellung
|
|
von
|
|
dispdev->numlinestyles
|
|
dispdev->numcolors
|
|
dispdev->width
|
|
dispdev->height
|
|
|
|
WPRINT_Init() gibt 0 zurueck, falls kein Fehler auftrat.
|
|
|
|
******************************************************************************/
|
|
|
|
int WPRINT_Init( )
|
|
{
|
|
int pWidth;
|
|
int pHeight;
|
|
|
|
/* Printer-DC holen */
|
|
if (!PrinterDC) {
|
|
|
|
/* Parameter-Block */
|
|
PRINTDLG pd;
|
|
|
|
/* Initialisieren */
|
|
pd.lStructSize = sizeof(PRINTDLG);
|
|
pd.hwndOwner = NULL;
|
|
pd.hDevMode = NULL;
|
|
pd.hDevNames = NULL;
|
|
pd.hDC = NULL;
|
|
pd.Flags = PD_NOPAGENUMS | PD_NOSELECTION | PD_RETURNDC;
|
|
pd.nFromPage = 1;
|
|
pd.nToPage = 1;
|
|
pd.nMinPage = 0;
|
|
pd.nMaxPage = 0;
|
|
pd.nCopies = 1;
|
|
pd.hInstance = NULL;
|
|
pd.lCustData = 0;
|
|
pd.lpfnPrintHook = NULL;
|
|
pd.lpfnSetupHook = NULL;
|
|
pd.lpPrintTemplateName = NULL;
|
|
pd.lpSetupTemplateName = NULL;
|
|
pd.hPrintTemplate = NULL;
|
|
pd.hSetupTemplate = NULL;
|
|
|
|
/* Default-Drucker initialisieren */
|
|
(void) PrintDlg( &pd);
|
|
|
|
/* Speicher freigeben */
|
|
if( pd.hDevMode) GlobalFree( pd.hDevMode);
|
|
if( pd.hDevNames) GlobalFree( pd.hDevNames);
|
|
|
|
/* DC holen */
|
|
PrinterDC = pd.hDC;
|
|
if (!PrinterDC) return 1;
|
|
|
|
/* Abmasze bestimmen */
|
|
PrinterWidth = GetDeviceCaps( PrinterDC, HORZRES);
|
|
PrinterHeight = GetDeviceCaps( PrinterDC, VERTRES);
|
|
pWidth = GetDeviceCaps( PrinterDC, HORZSIZE);
|
|
pHeight = GetDeviceCaps( PrinterDC, VERTSIZE);
|
|
|
|
/* Mapping Mode setzen (fuer Kreise) */
|
|
if ( pWidth > pHeight)
|
|
/* Querformat */
|
|
PrinterWidth = (PrinterHeight * pWidth) / pHeight;
|
|
else
|
|
/* Hochformat */
|
|
PrinterHeight = (PrinterWidth * pHeight) / pWidth;
|
|
|
|
SetMapMode( PrinterDC, MM_ISOTROPIC);
|
|
SetWindowExtEx( PrinterDC, PrinterWidth, PrinterHeight, NULL);
|
|
SetViewportExtEx( PrinterDC, PrinterWidth, PrinterHeight, NULL);
|
|
|
|
/* nicht hoeher als breit zeichnen */
|
|
if (pWidth < pHeight) {
|
|
/* Papier im Hochformat */
|
|
PrinterHeight = PrinterWidth;
|
|
}
|
|
|
|
/* Initialisierungen des Display-Descriptors */
|
|
dispdev->width = PrinterWidth;
|
|
dispdev->height = PrinterHeight;
|
|
dispdev->numlinestyles = NumLines;
|
|
dispdev->numcolors = NumPrintColors;
|
|
|
|
/* Farben initialisieren */
|
|
ColorTable[0] = RGB(255,255,255); /* Weisz */
|
|
ColorTable[1] = RGB( 0, 0, 0); /* Schwarz */
|
|
|
|
/* LineStyles initialisieren */
|
|
LineTable[0] = PS_SOLID;
|
|
LineTable[1] = PS_DOT; /* Gitter */
|
|
LineTable[2] = PS_SOLID; /* Erste Linie */
|
|
LineTable[3] = PS_DOT; /* Zweite Linie */
|
|
LineTable[4] = PS_DASH; /* usw */
|
|
LineTable[5] = PS_DASHDOT;
|
|
LineTable[6] = PS_DASHDOTDOT;
|
|
|
|
/* Font */
|
|
if (!PlotFont) {
|
|
PlotFont = CreateFont( 0,0,0,0, FW_DONTCARE, FALSE, FALSE, FALSE,
|
|
ANSI_CHARSET, OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS,
|
|
PROOF_QUALITY, FIXED_PITCH, NULL);
|
|
}
|
|
|
|
/* Abort-Prozedur setzen */
|
|
SetAbortProc( PrinterDC, WPRINT_Abort);
|
|
}
|
|
/* fertig */
|
|
return (0);
|
|
}
|
|
|
|
|
|
/******************************************************************************
|
|
WPRINT_NewViewport() oeffnet den Drucker
|
|
|
|
WPRINT_NewViewport() gibt 0 zurueck, falls erfolgreich
|
|
|
|
******************************************************************************/
|
|
|
|
int WPRINT_NewViewport( GRAPH * graph)
|
|
{
|
|
TEXTMETRIC tm;
|
|
tpPrintData pd;
|
|
DOCINFO di;
|
|
|
|
/* Parameter testen */
|
|
if (!graph) return 1;
|
|
|
|
/* Initialisiere, falls noch nicht geschehen */
|
|
if (WPRINT_Init() != 0) {
|
|
externalerror("Can't initialize Printer.");
|
|
return(1);
|
|
}
|
|
|
|
/* Device dep. Info allocieren */
|
|
pd = calloc(1, sizeof(tPrintData));
|
|
if (!pd) return 1;
|
|
graph->devdep = (char *)pd;
|
|
|
|
/* Setze den Color-Index */
|
|
pd->ColorIndex = 0;
|
|
|
|
/* Font setzen */
|
|
OldFont = SelectObject( PrinterDC, PlotFont);
|
|
|
|
/* Font-Parameter abfragen */
|
|
if (GetTextMetrics( PrinterDC, &tm)) {
|
|
graph->fontheight = tm.tmHeight;
|
|
graph->fontwidth = tm.tmAveCharWidth;
|
|
}
|
|
|
|
/* Setze den Linien-Index */
|
|
pd->LineIndex = 0;
|
|
|
|
/* Viewport-Parameter setzen */
|
|
graph->viewport.height = PrinterHeight;
|
|
graph->viewport.width = PrinterWidth;
|
|
|
|
/* Absolut-Parameter setzen */
|
|
graph->absolute.xpos = 0;
|
|
graph->absolute.ypos = 0;
|
|
graph->absolute.width = PrinterWidth;
|
|
graph->absolute.height = PrinterHeight;
|
|
|
|
/* Druckauftrag anmelden */
|
|
di.cbSize = sizeof( DOCINFO);
|
|
di.lpszDocName = graph->plotname;
|
|
di.lpszOutput = NULL;
|
|
if (StartDoc( PrinterDC, &di) <= 0) return 1;
|
|
if (StartPage( PrinterDC) <= 0) return 1;
|
|
|
|
/* titel drucken */
|
|
if (graph->plotname) {
|
|
UINT align;
|
|
align = GetTextAlign( PrinterDC);
|
|
SetTextAlign( PrinterDC, TA_RIGHT | TA_TOP | TA_NOUPDATECP);
|
|
TextOut( PrinterDC, PrinterWidth-graph->fontwidth, 1, graph->plotname,
|
|
strlen(graph->plotname));
|
|
SetTextAlign( PrinterDC, align);
|
|
}
|
|
|
|
/* fertig */
|
|
return(0);
|
|
}
|
|
|
|
int WPRINT_Close()
|
|
{
|
|
if (PrinterDC) {
|
|
EndPage( PrinterDC);
|
|
EndDoc( PrinterDC);
|
|
if (OldFont) {
|
|
SelectObject( PrinterDC, OldFont);
|
|
OldFont = NULL;
|
|
}
|
|
DeleteObject( PlotFont);
|
|
DeleteDC( PrinterDC);
|
|
PrinterDC = NULL;
|
|
}
|
|
return (0);
|
|
}
|
|
|
|
|
|
int WPRINT_Clear()
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
|
|
int WPRINT_DrawLine(int x1, int y1, int x2, int y2)
|
|
{
|
|
tpPrintData pd;
|
|
HPEN OldPen;
|
|
HPEN NewPen;
|
|
int ColIndex;
|
|
|
|
if (!currentgraph) return 0;
|
|
pd = pPrintData(currentgraph);
|
|
if (!pd) return 0;
|
|
|
|
/* Farben/Dicke */
|
|
ColIndex = pd->ColorIndex;
|
|
if (ColIndex > 1)
|
|
ColIndex = 1;
|
|
|
|
MoveToEx(PrinterDC, x1, PrinterHeight - y1, NULL);
|
|
NewPen = CreatePen( LineTable[pd->LineIndex], 0, ColorTable[ColIndex] );
|
|
OldPen = SelectObject(PrinterDC, NewPen);
|
|
LineTo(PrinterDC, x2, PrinterHeight - y2);
|
|
OldPen = SelectObject(PrinterDC, OldPen);
|
|
DeleteObject( NewPen);
|
|
return (0);
|
|
}
|
|
|
|
|
|
int WPRINT_Arc(int x0, int y0, int radius, double theta1, double theta2)
|
|
/*
|
|
* Notes:
|
|
* Draws an arc of <radius> and center at (x0,y0) beginning at
|
|
* angle theta1 (in rad) and ending at theta2
|
|
*/
|
|
{
|
|
tpPrintData pd;
|
|
HPEN OldPen;
|
|
HPEN NewPen;
|
|
int left, right, top, bottom;
|
|
int xs, ys, xe, ye;
|
|
int yb;
|
|
int direction;
|
|
int ColIndex;
|
|
double temp;
|
|
double r;
|
|
double dx0;
|
|
double dy0;
|
|
|
|
if (!currentgraph) return 0;
|
|
pd = pPrintData(currentgraph);
|
|
if (!pd) return 0;
|
|
|
|
ColIndex = pd->ColorIndex;
|
|
if (ColIndex > 1)
|
|
ColIndex = 1;
|
|
|
|
direction = AD_COUNTERCLOCKWISE;
|
|
if (theta1 > theta2) {
|
|
temp = theta1;
|
|
theta1 = theta2;
|
|
theta2 = temp;
|
|
direction = AD_CLOCKWISE;
|
|
}
|
|
SetArcDirection( PrinterDC, direction);
|
|
|
|
/* Geometrische Vorueberlegungen */
|
|
yb = PrinterHeight;
|
|
left = x0 - radius;
|
|
right = x0 + radius;
|
|
top = y0 + radius;
|
|
bottom = y0 - radius;
|
|
|
|
r = radius;
|
|
dx0 = x0;
|
|
dy0 = y0;
|
|
xs = (dx0 + (r * cos(theta1)));
|
|
ys = (dy0 + (r * sin(theta1)));
|
|
xe = (dx0 + (r * cos(theta2)));
|
|
ye = (dy0 + (r * sin(theta2)));
|
|
|
|
/* Zeichnen */
|
|
NewPen = CreatePen( LineTable[pd->LineIndex], 0, ColorTable[ColIndex] );
|
|
OldPen = SelectObject(PrinterDC, NewPen);
|
|
Arc( PrinterDC, left, yb-top, right, yb-bottom, xs, yb-ys, xe, yb-ye);
|
|
OldPen = SelectObject(PrinterDC, OldPen);
|
|
DeleteObject( NewPen);
|
|
|
|
return 0;
|
|
}
|
|
|
|
int WPRINT_Text( char * text, int x, int y, int degrees)
|
|
{
|
|
tpPrintData pd;
|
|
int ColIndex;
|
|
|
|
if (!currentgraph) return 0;
|
|
pd = pPrintData(currentgraph);
|
|
if (!pd) return 0;
|
|
|
|
ColIndex = pd->ColorIndex;
|
|
if (ColIndex > 1) {
|
|
ColIndex = 1;
|
|
}
|
|
|
|
SetTextColor( PrinterDC, ColorTable[ColIndex]);
|
|
TextOut( PrinterDC, x, PrinterHeight - y - currentgraph->fontheight, text, strlen(text));
|
|
return (0);
|
|
}
|
|
|
|
|
|
int WPRINT_DefineColor(int red, int green, int blue, int num)
|
|
{
|
|
/* nix */
|
|
return (0);
|
|
}
|
|
|
|
int WPRINT_DefineLinestyle(int num, int mask)
|
|
{
|
|
/* nix */
|
|
return (0);
|
|
}
|
|
|
|
int WPRINT_SetLinestyle(int style)
|
|
{
|
|
tpPrintData pd;
|
|
if (!currentgraph) return 0;
|
|
pd = pPrintData(currentgraph);
|
|
if (!pd) return 0;
|
|
|
|
pd->LineIndex = style % NumLines;
|
|
return (0);
|
|
}
|
|
|
|
int WPRINT_SetColor( int color)
|
|
{
|
|
tpPrintData pd;
|
|
if (!currentgraph) return 0;
|
|
pd = pPrintData(currentgraph);
|
|
if (!pd) return 0;
|
|
|
|
pd->ColorIndex = color;
|
|
return (0);
|
|
}
|
|
|
|
int WPRINT_Update()
|
|
{
|
|
return (0);
|
|
}
|
|
|
|
int WPRINT_DiagramReady()
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
#endif /* HAS_WINDOWS */
|
|
|