plot_schematic_PS.cpp 5.7 KB
Newer Older
jean-pierre charras's avatar
jean-pierre charras committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35
/** @file plot_schematic_PS.cpp
 */

/*
 * This program source code file is part of KiCad, a free EDA CAD application.
 *
 * Copyright (C) 1992-2010 KiCad Developers, see change_log.txt for contributors.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, you may find one here:
 * http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
 * or you may search the http://www.gnu.org website for the version 2 license,
 * or you may write to the Free Software Foundation, Inc.,
 * 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA
 */

#include <fctsys.h>
#include <plot_common.h>
#include <class_sch_screen.h>
#include <wxEeschemaStruct.h>
#include <base_units.h>
#include <sch_sheet_path.h>
#include <dialog_plot_schematic.h>


36
void DIALOG_PLOT_SCHEMATIC::createPSFile( bool aPlotAll, bool aPlotFrameRef )
jean-pierre charras's avatar
jean-pierre charras committed
37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57
{
    SCH_SCREEN*     screen = m_parent->GetScreen();
    SCH_SHEET_PATH* sheetpath;
    SCH_SHEET_PATH  oldsheetpath = m_parent->GetCurrentSheet();     // sheetpath is saved here
    wxString        plotFileName;
    PAGE_INFO       actualPage;                                     // page size selected in schematic
    PAGE_INFO       plotPage;                                       // page size selected to plot

    /* When printing all pages, the printed page is not the current page.
     * In complex hierarchies, we must update component references
     *  and others parameters in the given printed SCH_SCREEN, accordint to the sheet path
     *  because in complex hierarchies a SCH_SCREEN (a drawing )
     *  is shared between many sheets and component references depend on the actual sheet path used
     */
    SCH_SHEET_LIST  SheetList( NULL );

    sheetpath = SheetList.GetFirst();
    SCH_SHEET_PATH  list;

    while( true )
    {
58
        if( aPlotAll )
jean-pierre charras's avatar
jean-pierre charras committed
59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100
        {
            if( sheetpath == NULL )
                break;

            list.Clear();

            if( list.BuildSheetPathInfoFromSheetPathValue( sheetpath->Path() ) )
            {
                m_parent->SetCurrentSheet( list );
                m_parent->GetCurrentSheet().UpdateAllScreenReferences();
                m_parent->SetSheetNumberAndCount();
                screen = m_parent->GetCurrentSheet().LastScreen();
            }
            else // Should not happen
                return;

            sheetpath = SheetList.GetNext();
        }

        actualPage = screen->GetPageSettings();

        switch( m_pageSizeSelect )
        {
        case PAGE_SIZE_A:
            plotPage.SetType( wxT( "A" ) );
            plotPage.SetPortrait( actualPage.IsPortrait() );
            break;

        case PAGE_SIZE_A4:
            plotPage.SetType( wxT( "A4" ) );
            plotPage.SetPortrait( actualPage.IsPortrait() );
            break;

        case PAGE_SIZE_AUTO:
        default:
            plotPage = actualPage;
            break;
        }

        double  scalex  = (double) plotPage.GetWidthMils() / actualPage.GetWidthMils();
        double  scaley  = (double) plotPage.GetHeightMils() / actualPage.GetHeightMils();

101
        double  scale = std::min( scalex, scaley );
jean-pierre charras's avatar
jean-pierre charras committed
102 103 104 105 106

        wxPoint plot_offset;
        plotFileName = m_parent->GetUniqueFilenameForCurrentSheet() + wxT( "." )
                       + PS_PLOTTER::GetDefaultFileExtension();

107
        wxString msg;
jean-pierre charras's avatar
jean-pierre charras committed
108

109 110
        if( plotOneSheetPS( plotFileName, screen, plotPage, plot_offset,
                            scale, aPlotFrameRef ) )
111
            msg.Printf( _( "Plot: <%s> OK\n" ), GetChars( plotFileName ) );
112
        else    // Error
113
            msg.Printf( _( "Unable to create <%s>\n" ), GetChars( plotFileName ) );
114 115 116 117 118

        m_MessagesBox->AppendText( msg );


        if( !aPlotAll )
jean-pierre charras's avatar
jean-pierre charras committed
119 120 121 122 123 124 125 126 127
            break;
    }

    m_parent->SetCurrentSheet( oldsheetpath );
    m_parent->GetCurrentSheet().UpdateAllScreenReferences();
    m_parent->SetSheetNumberAndCount();
}


128 129 130 131 132 133
bool DIALOG_PLOT_SCHEMATIC::plotOneSheetPS( const wxString&     aFileName,
                                            SCH_SCREEN*         aScreen,
                                            const PAGE_INFO&    aPageInfo,
                                            wxPoint             aPlot0ffset,
                                            double              aScale,
                                            bool                aPlotFrameRef )
jean-pierre charras's avatar
jean-pierre charras committed
134 135
{
    PS_PLOTTER* plotter = new PS_PLOTTER();
136
    plotter->SetPageSettings( aPageInfo );
137
    plotter->SetDefaultLineWidth( GetDefaultLineThickness() );
jean-pierre charras's avatar
jean-pierre charras committed
138
    plotter->SetColorMode( getModeColor() );
139
    plotter->SetViewport( aPlot0ffset, IU_PER_DECIMILS, aScale, false );
jean-pierre charras's avatar
jean-pierre charras committed
140 141 142

    // Init :
    plotter->SetCreator( wxT( "Eeschema-PS" ) );
143 144 145 146 147 148 149 150 151

    if( ! plotter->OpenFile( aFileName ) )
    {
        delete plotter;
        return false;
    }

    SetLocaleTo_C_standard();
    plotter->StartPlot();
jean-pierre charras's avatar
jean-pierre charras committed
152

153
    if( aPlotFrameRef )
jean-pierre charras's avatar
jean-pierre charras committed
154 155 156 157
    {
        plotter->SetColor( BLACK );
        PlotWorkSheet( plotter, m_parent->GetTitleBlock(),
                       m_parent->GetPageSettings(),
158
                       aScreen->m_ScreenNumber, aScreen->m_NumberOfScreens,
jean-pierre charras's avatar
jean-pierre charras committed
159
                       m_parent->GetScreenDesc(),
160
                       aScreen->GetFileName() );
jean-pierre charras's avatar
jean-pierre charras committed
161 162
    }

163
    aScreen->Plot( plotter );
jean-pierre charras's avatar
jean-pierre charras committed
164 165 166 167 168

    plotter->EndPlot();
    delete plotter;
    SetLocaleTo_Default();

169
    return true;
jean-pierre charras's avatar
jean-pierre charras committed
170
}