home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / d / d020_1_4 / 5.ddi / MULTIPAD / MPPRINT.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-06-01  |  11.9 KB  |  405 lines
  1. /***************************************************************************
  2.  *                                       *
  3.  *  MODULE    : MpPrint()                           *
  4.  *                                       *
  5.  *  PURPOSE    : Printing code for MultiPad.                   *
  6.  *                                       *
  7.  *  FUNCTIONS    : GetPrinterDC ()       -  Creates a printer DC for the *
  8.  *                          default device.           *
  9.  *                                       *
  10.  *          AbortProc ()           -  Export proc. for GDI to check*
  11.  *                          print abort.           *
  12.  *                                       *
  13.  *          PrintDlgProc ()       -  Dialog function for the print*
  14.  *                          cancel dialog.           *
  15.  *                                       *
  16.  *          PrintFile ()           -  Prints the contents of the   *
  17.  *                          edit control.           *
  18.  *                                       *
  19.  *          GetInitializationData () -  Gets DC initialisation data  *
  20.  *                          from a DC supporting       *
  21.  *                          ExtDeviceMode().           *
  22.  *                                       *
  23.  ***************************************************************************/
  24. #include "multipad.h"
  25.  
  26. BOOL fAbort;        /* TRUE if the user has aborted the print job     */
  27. HWND hwndPDlg;        /* Handle to the cancel print dialog         */
  28. char szDevice[160];    /* Contains the device, the driver, and the port */
  29. PSTR szDriver;        /* Pointer to the driver name             */
  30. PSTR szPort;        /* Port, ie, LPT1                 */
  31. PSTR szTitle;        /* Global pointer to job title             */
  32. int iPrinter = 0;    /* level of available printer support.         */
  33.             /* 0 - no printer available             */
  34.             /* 1 - printer available             */
  35.             /* 2 - driver supports 3.0 device initialization */
  36. HANDLE hInitData=NULL;    /* handle to initialization data         */
  37.  
  38. char szExtDeviceMode[] = "EXTDEVICEMODE";
  39.  
  40. /****************************************************************************
  41.  *                                        *
  42.  *  FUNCTION   : GetPrinterDC ()                        *
  43.  *                                        *
  44.  *  PURPOSE    : Creates a printer display context for the default device.  *
  45.  *         As a side effect, it sets the szDevice and szPort variables*
  46.  *         It also sets iPrinter to the supported level of printing.  *
  47.  *                                        *
  48.  *  RETURNS    : HDC   - A handle to printer DC.                *
  49.  *                                        *
  50.  ****************************************************************************/
  51. HDC FAR PASCAL GetPrinterDC(void)
  52. {
  53.     char     szT[32];
  54.     HDC      hdc;
  55.     LPSTR    lpdevmode = NULL;
  56.  
  57.     iPrinter = 0;
  58.  
  59.     /* Get the printer information from win.ini into a buffer and
  60.      * null terminate it.
  61.      */
  62.     GetProfileString ( "windows", "device", "" ,szDevice, sizeof(szDevice));
  63.     for (szDriver = szDevice; *szDriver && *szDriver != ','; szDriver++)
  64.     ;
  65.     if (*szDriver)
  66.     *szDriver++ = 0;
  67.  
  68.     /* From the current position in the buffer, null teminate the
  69.      * list of ports
  70.      */
  71.     for (szPort = szDriver; *szPort && *szPort != ','; szPort++)
  72.     ;
  73.     if (*szPort)
  74.     *szPort++ = 0;
  75.  
  76.     /* if the device, driver and port buffers all contain meaningful data,
  77.      * proceed.
  78.      */
  79.     if (!*szDevice || !*szDriver || !*szPort){
  80.     *szDevice = 0;
  81.     return NULL;
  82.     }
  83.  
  84.     /* Create the printer display context */
  85.     if (hInitData){
  86.     /* Get a pointer to the initialization data */
  87.     lpdevmode = (LPSTR) LocalLock (hInitData);
  88.  
  89.     if (lstrcmp (szDevice, lpdevmode)){
  90.         /* User has changed the device... cancel this setup, as it is
  91.          * invalid (although if we worked harder we could retain some
  92.          * of it).
  93.          */
  94.         lpdevmode = NULL;
  95.         LocalUnlock (hInitData);
  96.         LocalFree (hInitData);
  97.         hInitData = NULL;
  98.     }
  99.     }
  100.     hdc = CreateDC (szDriver, szDevice, szPort, lpdevmode);
  101.  
  102.     /* Unlock initialization data */
  103.     if (hInitData)
  104.     LocalUnlock (hInitData);
  105.  
  106.     if (!hdc)
  107.     return NULL;
  108.  
  109.  
  110.     iPrinter = 1;
  111.  
  112.     /* Find out if ExtDeviceMode() is supported and set flag appropriately */
  113.     if (GetProcAddress (GetModuleHandle (szDriver), szExtDeviceMode))
  114.     iPrinter = 2;
  115.  
  116.     return hdc;
  117.  
  118. }
  119.  
  120. /****************************************************************************
  121.  *                                        *
  122.  *  FUNCTION   : AbortProc()                            *
  123.  *                                        *
  124.  *  PURPOSE    : To be called by GDI print code to check for user abort.    *
  125.  *                                        *
  126.  ****************************************************************************/
  127. int FAR PASCAL AbortProc ( hdc, reserved )
  128. HDC hdc;
  129. WORD reserved;
  130. {
  131.     MSG msg;
  132.  
  133.     /* Allow other apps to run, or get abort messages */
  134.     while (!fAbort && PeekMessage (&msg, NULL, NULL, NULL, TRUE))
  135.     if (!hwndPDlg || !IsDialogMessage (hwndPDlg, &msg)){
  136.         TranslateMessage (&msg);
  137.         DispatchMessage  (&msg);
  138.     }
  139.     return !fAbort;
  140. }
  141.  
  142. /****************************************************************************
  143.  *                                        *
  144.  *  FUNCTION   : PrintDlgProc ()                        *
  145.  *                                        *
  146.  *  PURPOSE    : Dialog function for the print cancel dialog box.        *
  147.  *                                        *
  148.  *  RETURNS    : TRUE  - OK to abort/ not OK to abort                *
  149.  *         FALSE - otherwise.                        *
  150.  *                                        *
  151.  ****************************************************************************/
  152. BOOL FAR PASCAL PrintDlgProc(HWND hwnd, WORD msg, WORD wParam, LONG lParam)
  153. {
  154.     switch (msg){
  155.     case WM_INITDIALOG:
  156.         /* Set up information in dialog box */
  157.         SetDlgItemText (hwnd, IDD_PRINTDEVICE, (LPSTR)szDevice);
  158.         SetDlgItemText (hwnd, IDD_PRINTPORT, (LPSTR)szPort);
  159.         SetDlgItemText (hwnd, IDD_PRINTTITLE, (LPSTR)szTitle);
  160.         break;
  161.  
  162.     case WM_COMMAND:
  163.         /* abort printing if the only button gets hit */
  164.         fAbort = TRUE;
  165.         break;
  166.  
  167.     default:
  168.         return FALSE;
  169.     }
  170.     return TRUE;
  171. }
  172.  
  173. /****************************************************************************
  174.  *                                        *
  175.  *  FUNCTION   : PrintFile ()                            *
  176.  *                                        *
  177.  *  PURPOSE    : Prints the contents of the edit control.            *
  178.  *                                        *
  179.  ****************************************************************************/
  180.  
  181. VOID FAR PASCAL PrintFile(HWND hwnd)
  182. {
  183.     HDC     hdc;
  184.     int     yExtPage;
  185.     char    sz[32];
  186.     WORD    cch;
  187.     WORD    ich;
  188.     PSTR    pch;
  189.     WORD    iLine;
  190.     WORD    nLinesEc;
  191.     WORD    i;
  192.     HANDLE  hT;
  193.     FARPROC lpfnAbort;
  194.     FARPROC lpfnPDlg;
  195.     HWND    hwndPDlg;
  196.     WORD    dy;
  197.     int     yExtSoFar;
  198.     WORD    fError = TRUE;
  199.     HWND    hwndEdit;
  200.  
  201.     hwndEdit = (HWND)GetWindowWord(hwnd,GWW_HWNDEDIT);
  202.  
  203.     /* Create the job title by loading the title string from STRINGTABLE */
  204.     cch = LoadString (hInst, IDS_PRINTJOB, sz, sizeof(sz));
  205.     szTitle = sz + cch;
  206.     cch += GetWindowText (hwnd, sz + cch, 32 - cch);
  207.     sz[31] = 0;
  208.  
  209.     /* Make instances of the Abort proc. and the Print dialog function */
  210.     lpfnAbort = MakeProcInstance (AbortProc, hInst);
  211.     if (!lpfnAbort)
  212.     goto getout;
  213.     lpfnPDlg = MakeProcInstance (PrintDlgProc, hInst);
  214.     if (!lpfnPDlg)
  215.     goto getout4;
  216.  
  217.     /* Initialize the printer */
  218.     hdc = GetPrinterDC();
  219.     if (!hdc)
  220.     goto getout5;
  221.  
  222.     /* Disable the main application window and create the Cancel dialog */
  223.     EnableWindow (hwndFrame, FALSE);
  224.     hwndPDlg = CreateDialog (hInst, IDD_PRINT, hwnd, lpfnPDlg);
  225.     if (!hwndPDlg)
  226.     goto getout3;
  227.     ShowWindow (hwndPDlg, SW_SHOW);
  228.     UpdateWindow (hwndPDlg);
  229.  
  230.     /* Allow the app. to inform GDI of the escape function to call */
  231.     if (Escape (hdc, SETABORTPROC, 0, (LPSTR)lpfnAbort, NULL) < 0)
  232.     goto getout1;
  233.  
  234.     /* Initialize the document */
  235.     if (Escape (hdc, STARTDOC, cch, (LPSTR)sz, NULL) < 0)
  236.     goto getout1;
  237.  
  238.     /* Get the height of one line and the height of a page */
  239.     dy = HIWORD (GetTextExtent (hdc, "CC", 2));
  240.     yExtPage = GetDeviceCaps (hdc, VERTRES);
  241.  
  242.     /* Get the lines in document and and a handle to the text buffer */
  243.     iLine     = 0;
  244.     yExtSoFar = 0;
  245.     nLinesEc  = (WORD)SendMessage (hwndEdit, EM_GETLINECOUNT, 0, 0L);
  246.     hT          = (HANDLE)SendMessage (hwndEdit, EM_GETHANDLE, 0, 0L);
  247.  
  248.     /* While more lines print out the text */
  249.     while (iLine < nLinesEc){
  250.     if (yExtSoFar + dy > yExtPage){
  251.         /* Reached the end of a page. Tell the device driver to eject a
  252.          * page
  253.          */
  254.         if (Escape (hdc, NEWFRAME, 0, NULL, NULL) < 0 || fAbort)
  255.         goto getout2;
  256.         yExtSoFar = 0;
  257.     }
  258.  
  259.     /* Get the length and position of the line in the buffer
  260.      * and lock from that offset into the buffer */
  261.     ich = (WORD)SendMessage (hwndEdit, EM_LINEINDEX, iLine, 0L);
  262.     cch = (WORD)SendMessage (hwndEdit, EM_LINELENGTH, ich, 0L);
  263.     pch = LocalLock(hT) + ich;
  264.  
  265.     /* Print the line and unlock the text handle */
  266.     TextOut (hdc, 0, yExtSoFar, (LPSTR)pch, cch);
  267.     LocalUnlock (hT);
  268.  
  269.     /* Test and see if the Abort flag has been set. If yes, exit. */
  270.     if (fAbort)
  271.         goto getout2;
  272.  
  273.     /* Move down the page */
  274.     yExtSoFar += dy;
  275.     iLine++;
  276.     }
  277.  
  278.     /* Eject the last page. */
  279.     if (Escape (hdc, NEWFRAME, 0, NULL, NULL) < 0)
  280.     goto getout2;
  281.  
  282.     /* Complete the document. */
  283.     if (Escape (hdc, ENDDOC, 0, NULL, NULL) < 0){
  284. getout2:
  285.     /* Ran into a problem before NEWFRAME? Abort the document */
  286.     Escape( hdc, ABORTDOC, 0, NULL, NULL);
  287.     }
  288.     else
  289.     fError=FALSE;
  290.  
  291. getout3:
  292.     /* Close the cancel dialog and re-enable main app. window */
  293.     EnableWindow (hwndFrame, TRUE);
  294.     DestroyWindow (hwndPDlg);
  295.  
  296. getout1:
  297.     DeleteDC(hdc);
  298.  
  299. getout5:
  300.     /* Get rid of dialog procedure instances */
  301.     FreeProcInstance (lpfnPDlg);
  302.  
  303. getout4:
  304.     FreeProcInstance (lpfnAbort);
  305.  
  306. getout:
  307.  
  308.     /* Error? make sure the user knows... */
  309.     if (fError)
  310.     MPError (hwnd, MB_OK | MB_ICONEXCLAMATION, IDS_PRINTERROR, (LPSTR)szTitle);
  311.  
  312.     return;
  313. }
  314.  
  315. /****************************************************************************
  316.  *                                        *
  317.  *  FUNCTION   : GetInitializationData()                    *
  318.  *                                        *
  319.  *  PURPOSE    : Gets DC initialization data from a printer driver        *
  320.  *         supporting ExtDeviceMode(). Called in response to the        *
  321.  *         File/Printer setup menu selection.                *
  322.  *                                        *
  323.  *         This function allows the user to change the printer        *
  324.  *         settings FOR MULTIPAD ONLY.  This allows Multipad to print *
  325.  *         in a variety of settings without messing up any other        *
  326.  *         applications. In a more sophisticated application, this    *
  327.  *         setup could even be saved on a document-by-document basis. *
  328.  *                                        *
  329.  ****************************************************************************/
  330. BOOL FAR PASCAL GetInitializationData( hwnd )
  331. HWND hwnd ;
  332. {
  333.     LPSTR     lpOld;
  334.     LPSTR     lpNew;
  335.     FARPROC   lpfn;
  336.     HANDLE    hT,hDrv;
  337.     char      sz[32];
  338.     WORD      cb;
  339.     int       flag;
  340.  
  341.     /* Pop up dialog for user and retain data in app buffer */
  342.     flag = DM_PROMPT | DM_COPY;
  343.  
  344.     /* Load the device driver and find the ExtDeviceMode() function */
  345.     wsprintf (sz, "%s.drv", (LPSTR)szDriver);
  346.     if ((hDrv = LoadLibrary (sz)) < 32)
  347.     return FALSE;
  348.     if (!(lpfn = GetProcAddress (hDrv, szExtDeviceMode)))
  349.     return FALSE;
  350.  
  351.     if (hInitData){
  352.     /* We have some old data... we want to modify the previously specified
  353.      * setup rather than starting with the default setup.
  354.      */
  355.     lpOld = (LPSTR)LocalLock(hInitData);
  356.     flag |= DM_MODIFY;
  357.     }
  358.     else
  359.     lpOld = NULL;
  360.  
  361.     /* Get the number of bytes needed for the init data */
  362.     cb = (*lpfn) (hwnd,
  363.           hDrv,
  364.           NULL,
  365.           (LPSTR)szDevice,
  366.           (LPSTR)szPort,
  367.           (LPDEVMODE)NULL,
  368.           (LPSTR)NULL,
  369.           0);
  370.  
  371.     /* Grab some memory for the new data and lock it. */
  372.     hT      = LocalAlloc (LHND,cb);
  373.     lpNew = (LPSTR)LocalLock (hT);
  374.  
  375.     /* Post the device mode dialog. 0 flag iff user hits OK button */
  376.     if ((*lpfn) (hwnd,
  377.          hDrv,
  378.          (LPDEVMODE)lpNew,
  379.          (LPSTR)szDevice,
  380.          (LPSTR)szPort,
  381.          (LPDEVMODE)lpOld,
  382.          (LPSTR)NULL,
  383.          flag)==IDOK)
  384.     flag = 0;
  385.  
  386.     /* Unlock the input structures */
  387.     LocalUnlock (hT);
  388.     if (hInitData)
  389.     LocalUnlock (hInitData);
  390.  
  391.     /* If the user hit OK and everything worked, free the original init.
  392.      * data and retain the new one.  Otherwise, toss the new buffer.
  393.      */
  394.     if (flag)
  395.     LocalFree (hT);
  396.     else{
  397.     if (hInitData)
  398.         LocalFree (hInitData);
  399.     hInitData = hT;
  400.     }
  401.  
  402.     FreeLibrary(hDrv);
  403.     return (!flag);
  404. }
  405.