app/win32print.c

   1 /* Dia -- an diagram creation/manipulation program
   2  * Copyright (C) 1998 Alexander Larsson
   3  *
   4  * win32print.c - output file directly to a windoze printer
   5  *                Don't try it with a *non* PostScript printer !
   6  *
   7  * Copyright (C) 2001 Hans Breuer
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 2 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program 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
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  22  */
  23
  24 #include <config.h>
  25
  26 #include <windows.h>
  27 #include <winspool.h>
  28
  29 #include <stdlib.h>
  30 #include <stdio.h>
  31
  32 #include <fcntl.h>
  33 #include <io.h>
  34
  35 #include <glib.h>
  36
  37 #include "win32print.h"
  38
  39 static void
  40 PrintError (const char* s, DWORD err)
  41 {
  42   if (0 != err)
  43   {
  44     char* lpBuffer;
  45     /* get the Windows message */
  46     FormatMessage (FORMAT_MESSAGE_ALLOCATE_BUFFER
  47                    | FORMAT_MESSAGE_FROM_SYSTEM
  48                    | FORMAT_MESSAGE_IGNORE_INSERTS,
  49                    NULL,
  50                    err,
  51                    MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
  52                    (char*)&lpBuffer,
  53                    0,NULL);
  54     g_print ("%s : %s", s, lpBuffer);
  55                 LocalFree (lpBuffer);
  56   }
  57 }
  58
  59 const char*
  60 win32_printer_default (void)
  61 {
  62   static char sName[1024];
  63   GetProfileString("windows", "device", "", sName, sizeof(sName));
  64   if (strchr (sName, ','))
  65     *strchr (sName, ',') = 0;
  66   else if ( strlen (sName) < 1)
  67     strcpy (sName, "unknown");
  68
  69   return sName;
  70 }
  71
  72 static HANDLE hPrinter = NULL;
  73 static ADDJOB_INFO_1* pJob = NULL;
  74 static HANDLE hFile = INVALID_HANDLE_VALUE;
  75
  76 FILE*
  77 win32_printer_open (char* sName)
  78 {
  79   BYTE data [_MAX_PATH*2];
  80   DWORD dwID = 0;
  81   DWORD dwSizeRequired=0;
  82   int err = 0;
  83
  84   if (!OpenPrinter (sName,
  85                     &hPrinter,
  86                     NULL))
  87   {
  88     g_print ("Failed to open printer : %s\n", sName);
  89     return NULL;
  90   }
  91
  92   if (!AddJob (hPrinter, 1, data, sizeof(data), &dwSizeRequired))
  93   {
  94     PrintError ("Failed to add job", GetLastError());
  95   }
  96   else
  97   {
  98     pJob = (ADDJOB_INFO_1*)data;
  99     hFile = CreateFile (pJob->Path,
 100                         GENERIC_WRITE,
 101                         0,      /* no share */
 102                         NULL,   /* default security */
 103                         OPEN_ALWAYS,
 104                         FILE_ATTRIBUTE_NORMAL,
 105                         NULL); /* template */
 106     if (INVALID_HANDLE_VALUE == hFile)
 107     {
 108       PrintError ("Failed to CreateFile", GetLastError());
 109     }
 110     else
 111     {
 112        int hnd = _open_osfhandle ((long)hFile, _O_APPEND);
 113          if (-1 != hnd)
 114          return _fdopen (hnd, "wb");
 115        else
 116          PrintError ("Failed to _open_osfhandle", 0);
 117     }
 118   }
 119
 120   return NULL;
 121 }
 122
 123 int
 124 win32_printer_close (FILE* f)
 125 {
 126   int ret = 0;
 127
 128   fflush (f);
 129   if (!pJob || !ScheduleJob (hPrinter, pJob->JobId))
 130   {
 131     PrintError ("Failed to schedule job", GetLastError());
 132     ret = GetLastError();
 133   }
 134
 135   if (f)
 136     fclose (f);
 137   CloseHandle (hFile);
 138   ClosePrinter (hPrinter);
 139   return ret;
 140 }