kicad/pcbnew/gendrill.cpp

840 lines
25 KiB
C++
Raw Normal View History

/*************************************************************/
/* Functions to create EXCELLON drill files and report files */
/*************************************************************/
#include "fctsys.h"
#include "appl_wxstruct.h"
2008-01-16 20:37:50 +00:00
#include <vector>
#include "common.h"
#include "plot_common.h"
#include "trigo.h"
#include "confirm.h"
#include "kicad_string.h"
#include "gestfich.h"
#include "pcbnew.h"
2009-07-30 11:04:07 +00:00
#include "wxPcbStruct.h"
#include "pcbplot.h"
#include "macros.h"
#include "appl_wxstruct.h"
2009-10-28 11:48:47 +00:00
#include "class_board_design_settings.h"
#include "gendrill.h"
#include "dialog_gendrill.h" // Dialog box for drill file generation
#include "build_version.h"
const wxString DrillFileExtension( wxT( "drl" ) );
const wxString DrillFileWildcard( _( "Drill files (*.drl)|*.drl" ) );
/*
2008-01-14 19:24:41 +00:00
* Creates the drill files in EXCELLON format
* Number format:
* - Floating point format
* - integer format
* - integer format: "Trailing Zero" ( TZ ) or "Leading Zero"
2008-01-14 19:24:41 +00:00
* Units
* - Decimal
* - Metric
2008-01-16 20:37:50 +00:00
*
2008-01-14 19:24:41 +00:00
* The drill maps can be created in HPGL or PS format
*
* dialog_gendrill.cpp is the filewhich handles
* the Dialog box for drill file generation
*/
2008-01-14 19:24:41 +00:00
static void Gen_Line_EXCELLON( char* line, float x, float y );
static void Write_End_Of_File_Drill( FILE* aFile );
static float s_ConversionUnits; /* Conversion unite for
* drill / pcb */
static int s_Unit_Drill_is_Inch = TRUE; /* INCH,LZ (2:4) */
2008-01-16 20:37:50 +00:00
static int s_Zeros_Format = DECIMAL_FORMAT;
static DrillPrecision s_Precision( 2, 4 );
static bool DrillOriginIsAuxAxis; /* Axis selection (main /
* auxiliary) for drill
* origin coordinates */
static wxPoint File_Drill_Offset; /* Offset coordinate for
* drilling file. */
2008-01-16 20:37:50 +00:00
static bool Minimal = false;
static bool Mirror = true;
2008-01-16 20:37:50 +00:00
static std::vector<DRILL_TOOL> s_ToolListBuffer;
static std::vector<HOLE_INFO> s_HoleListBuffer;
// Keywords for read and write config
#define ZerosFormatKey wxT( "DrillZerosFormat" )
#define LeftPrecisionKey wxT( "DrillLeftPrecisionOpt" )
#define RightPrecisionKey wxT( "DrillRightPrecisionOpt" )
#define MirrorKey wxT( "DrillMirrorYOpt" )
#define MinimalKey wxT( "DrillMinHeader" )
#define UnitDrillInchKey wxT( "DrillUnit" )
#define DrillOriginIsAuxAxisKey wxT( "DrillAuxAxis" )
/* some param values initialization before display dialog window
2008-01-16 20:37:50 +00:00
*/
void DIALOG_GENDRILL::InitDisplayParams( void )
{
2008-01-16 20:37:50 +00:00
wxString msg;
if( s_Zeros_Format == DECIMAL_FORMAT )
m_Choice_Precision->Enable( false );
if( DrillOriginIsAuxAxis )
m_Choice_Drill_Offset->SetSelection( 1 );
2008-01-16 20:37:50 +00:00
2008-01-14 19:24:41 +00:00
msg << s_Precision.m_lhs << wxT( ":" ) << s_Precision.m_rhs;
m_Choice_Precision->SetStringSelection( msg );
if( s_Zeros_Format == DECIMAL_FORMAT )
2008-01-14 19:24:41 +00:00
m_Choice_Precision->Enable( false );
m_ViaDrillValue->SetLabel( _( "Use Netclasses values" ) );
2008-01-16 20:37:50 +00:00
m_MicroViaDrillValue->SetLabel( _( "Use Netclasses values" ) );
2008-01-16 20:37:50 +00:00
msg.Empty();
msg << g_pcb_plot_options.HPGL_Pen_Num;
2008-01-16 20:37:50 +00:00
m_PenNum->SetValue( msg );
msg.Empty();
msg << g_pcb_plot_options.HPGL_Pen_Speed;
2008-01-16 20:37:50 +00:00
m_PenSpeed->SetValue( msg );
// See if we have some buried vias or/and microvias, and display
// microvias drill value if so
2008-01-16 20:37:50 +00:00
m_ThroughViasCount = 0;
m_MicroViasCount = 0;
m_BlindOrBuriedViasCount = 0;
for( TRACK* track = m_Parent->GetBoard()->m_Track; track != NULL;
track = track->Next() )
2008-01-16 20:37:50 +00:00
{
if( track->Type() != TYPE_VIA )
2008-01-16 20:37:50 +00:00
continue;
if( track->Shape() == VIA_THROUGH )
m_ThroughViasCount++;
else if( track->Shape() == VIA_MICROVIA )
m_MicroViasCount++;
else if( track->Shape() == VIA_BLIND_BURIED )
m_BlindOrBuriedViasCount++;
}
2008-01-14 19:24:41 +00:00
2008-01-16 20:37:50 +00:00
m_MicroViaDrillValue->Enable( m_MicroViasCount );
// Pads holes round:
2008-01-16 20:37:50 +00:00
m_PadsHoleCount = 0;
for( MODULE* module = m_Parent->GetBoard()->m_Modules;
module != NULL; module = module->Next() )
2008-01-16 20:37:50 +00:00
{
for( D_PAD* pad = module->m_Pads; pad != NULL; pad = pad->Next() )
{
2008-01-14 19:24:41 +00:00
if( pad->m_DrillShape == PAD_CIRCLE )
{
2008-01-16 20:37:50 +00:00
if( pad->m_Drill.x != 0 )
m_PadsHoleCount++;
2008-02-26 19:19:54 +00:00
}
else
if( MIN( pad->m_Drill.x, pad->m_Drill.y ) != 0 )
m_PadsHoleCount++;
2008-01-16 20:37:50 +00:00
}
}
msg = m_PadsCountInfoMsg->GetLabel();
msg << wxT( " " ) << m_PadsHoleCount;
m_PadsCountInfoMsg->SetLabel( msg );
msg = m_ThroughViasInfoMsg->GetLabel();
msg << wxT( " " ) << m_ThroughViasCount;
m_ThroughViasInfoMsg->SetLabel( msg );
msg = m_MicroViasInfoMsg->GetLabel();
msg << wxT( " " ) << m_MicroViasCount;
m_MicroViasInfoMsg->SetLabel( msg );
msg = m_BuriedViasInfoMsg->GetLabel();
msg << wxT( " " ) << m_BlindOrBuriedViasCount;
m_BuriedViasInfoMsg->SetLabel( msg );
}
void DIALOG_GENDRILL::SetParams( void )
{
2008-01-16 20:37:50 +00:00
wxString msg;
long ltmp;
2008-01-14 19:24:41 +00:00
s_Unit_Drill_is_Inch = (m_Choice_Unit->GetSelection() == 0) ? FALSE : TRUE;
Minimal = m_Check_Minimal->IsChecked();
Mirror = m_Check_Mirror->IsChecked();
s_Zeros_Format = m_Choice_Zeros_Format->GetSelection();
DrillOriginIsAuxAxis = m_Choice_Drill_Offset->GetSelection();
2008-01-14 19:24:41 +00:00
msg = m_PenSpeed->GetValue();
2008-01-16 20:37:50 +00:00
if( msg.ToLong( &ltmp ) )
g_pcb_plot_options.HPGL_Pen_Speed = ltmp;
2008-01-14 19:24:41 +00:00
msg = m_PenNum->GetValue();
2008-01-16 20:37:50 +00:00
if( msg.ToLong( &ltmp ) )
g_pcb_plot_options.HPGL_Pen_Num = ltmp;
2008-01-16 20:37:50 +00:00
if( m_Choice_Drill_Offset->GetSelection() == 0 )
File_Drill_Offset = wxPoint( 0, 0 );
else
File_Drill_Offset = m_Parent->m_Auxiliary_Axis_Position;
/* get precision from radio box strings (this just makes it easier to
* change options later)*/
wxString ps = m_Choice_Precision->GetStringSelection();
wxString l = ps.substr( 0, 1 );
wxString r = ps.substr( 2, 1 );
2008-01-16 20:37:50 +00:00
2007-12-17 21:54:24 +00:00
// a long is not an int on all machines
long lhs;
long rhs;
2008-01-16 20:37:50 +00:00
2007-12-17 21:54:24 +00:00
l.ToLong( &lhs );
r.ToLong( &rhs );
2008-01-16 20:37:50 +00:00
2007-12-17 21:54:24 +00:00
s_Precision.m_lhs = lhs;
s_Precision.m_rhs = rhs;
}
/* This function displays and deletes the dialog frame for drill tools
*/
void WinEDA_PcbFrame::InstallDrillFrame( wxCommandEvent& event )
{
wxConfig* Config = wxGetApp().m_EDA_Config;
if( Config )
{
Config->Read( ZerosFormatKey, &s_Zeros_Format );
Config->Read( LeftPrecisionKey, &s_Precision.m_lhs );
Config->Read( RightPrecisionKey, &s_Precision.m_rhs );
Config->Read( MirrorKey, &Mirror );
Config->Read( MinimalKey, &Minimal );
2008-01-14 19:24:41 +00:00
Config->Read( UnitDrillInchKey, &s_Unit_Drill_is_Inch );
Config->Read( DrillOriginIsAuxAxisKey, &DrillOriginIsAuxAxis );
}
DIALOG_GENDRILL* frame = new DIALOG_GENDRILL( this );
frame->ShowModal();
frame->Destroy();
}
/* Save drill options: */
void DIALOG_GENDRILL::UpdateConfig()
{
SetParams();
wxConfig* Config = wxGetApp().m_EDA_Config;
if( Config )
{
Config->Write( ZerosFormatKey, s_Zeros_Format );
Config->Write( LeftPrecisionKey, s_Precision.m_lhs );
Config->Write( RightPrecisionKey, s_Precision.m_rhs );
Config->Write( MirrorKey, Mirror );
Config->Write( MinimalKey, Minimal );
2008-01-14 19:24:41 +00:00
Config->Write( UnitDrillInchKey, s_Unit_Drill_is_Inch );
Config->Write( DrillOriginIsAuxAxisKey, DrillOriginIsAuxAxis );
}
}
/**
* Function GenDrillFiles
* Calls the functions to create EXCELLON drill files and/or drill map files
* When all holes are through, one excellon file is created
* when there are some partial holes (some blind or buried vias:
* One excellon file is created, for all through holes.
* And one file per layer pair, which have one or more holes, excluding
* through holes, already in the first file.
2008-01-16 20:37:50 +00:00
*/
void DIALOG_GENDRILL::GenDrillFiles( wxCommandEvent& event )
{
wxFileName fn;
wxString layer_extend; /* added to the Board FileName to
* create FullFileName (= Board
* FileName + layer pair names) */
wxString msg;
bool ExistsBuriedVias = false; /* If true, drill files are created
* layer pair by layer pair for
* buried vias */
int layer1 = LAYER_N_BACK;
int layer2 = LAYER_N_FRONT;
bool gen_through_holes = true;
UpdateConfig(); /* set params and Save drill options */
m_Parent->MsgPanel->EraseMsgBox();
2008-01-14 19:24:41 +00:00
/* Set conversion scale depending on drill file units */
s_ConversionUnits = 0.0001f; /* units = INCHES */
2008-01-14 19:24:41 +00:00
if( !s_Unit_Drill_is_Inch )
s_ConversionUnits = 0.000254f; /* units = mm */
if( m_MicroViasCount || m_BlindOrBuriedViasCount )
ExistsBuriedVias = true;
for( ; ; )
{
Build_Holes_List( m_Parent->GetBoard(), s_HoleListBuffer,
s_ToolListBuffer, layer1, layer2,
gen_through_holes ? false : true );
if( s_ToolListBuffer.size() > 0 ) //holes?
2008-03-22 05:55:06 +00:00
{
fn = m_Parent->GetScreen()->m_FileName;
2008-03-22 05:55:06 +00:00
layer_extend.Empty();
2008-03-22 05:55:06 +00:00
if( !gen_through_holes )
{
if( layer1 == LAYER_N_BACK )
2008-03-22 05:55:06 +00:00
layer_extend << wxT( "-copper" );
else
layer_extend << wxT( "-inner" ) << layer1;
if( layer2 == LAYER_N_FRONT )
2008-03-22 05:55:06 +00:00
layer_extend << wxT( "-cmp" );
else
layer_extend << wxT( "-inner" ) << layer2;
}
fn.SetName( fn.GetName() + layer_extend );
fn.SetExt( DrillFileExtension );
2009-06-30 10:43:20 +00:00
wxFileDialog dlg( this, _( "Save Drill File" ), fn.GetPath(),
fn.GetFullName(), DrillFileWildcard,
wxFD_SAVE | wxFD_OVERWRITE_PROMPT );
if( dlg.ShowModal() == wxID_CANCEL )
2009-06-30 10:43:20 +00:00
break;
FILE* excellon_dest = wxFopen( dlg.GetPath(), wxT( "w" ) );
if( excellon_dest == 0 )
2008-03-22 05:55:06 +00:00
{
msg = _( "Unable to create file " ) + dlg.GetPath();
DisplayError( this, msg );
EndModal( 0 );
return;
2008-03-22 05:55:06 +00:00
}
Create_Drill_File_EXCELLON( excellon_dest, s_HoleListBuffer,
s_ToolListBuffer );
2008-03-22 05:55:06 +00:00
switch( m_Choice_Drill_Map->GetSelection() )
{
case 0:
break;
case 1:
GenDrillMap( dlg.GetPath(), s_HoleListBuffer, s_ToolListBuffer,
PLOT_FORMAT_HPGL );
2008-03-22 05:55:06 +00:00
break;
case 2:
GenDrillMap( dlg.GetPath(), s_HoleListBuffer, s_ToolListBuffer,
PLOT_FORMAT_POST );
2008-03-22 05:55:06 +00:00
break;
case 3:
GenDrillMap( dlg.GetPath(), s_HoleListBuffer, s_ToolListBuffer,
PLOT_FORMAT_GERBER );
break;
2009-06-30 10:43:20 +00:00
case 4:
GenDrillMap( dlg.GetPath(), s_HoleListBuffer, s_ToolListBuffer,
PLOT_FORMAT_DXF );
break;
2008-03-22 05:55:06 +00:00
}
if( !ExistsBuriedVias )
2008-03-22 05:55:06 +00:00
break;
}
if( gen_through_holes )
layer2 = layer1 + 1;
else
{
if( layer2 >= LAYER_N_FRONT ) // no more layer pair to consider
break;
layer1++;
layer2++; // use next layer pair
if( layer2 == m_Parent->GetBoard()->GetCopperLayerCount() - 1 )
layer2 = LAYER_N_FRONT; // the last layer is always the
// component layer
}
gen_through_holes = false;
}
if( m_Choice_Drill_Report->GetSelection() > 0 )
{
GenDrillReport( m_Parent->GetScreen()->m_FileName );
}
EndModal( 0 );
}
void DIALOG_GENDRILL::UpdatePrecisionOptions( wxCommandEvent& event )
{
if( m_Choice_Unit->GetSelection()==1 )
{
/* inch options */
m_Choice_Precision->SetString( 0, _( "2:3" ) );
m_Choice_Precision->SetString( 1, _( "2:4" ) );
}
else
{
/* metric options */
m_Choice_Precision->SetString( 0, _( "3:2" ) );
m_Choice_Precision->SetString( 1, _( "3:3" ) );
}
if( m_Choice_Zeros_Format->GetSelection()==DECIMAL_FORMAT )
m_Choice_Precision->Enable( false );
else
m_Choice_Precision->Enable( true );
}
/**
* Create the drill file in EXCELLON format
* @return hole count
* @param aHoleListBuffer = hole descriptor list
* @param aToolListBuffer = Drill tools list
*/
int DIALOG_GENDRILL::Create_Drill_File_EXCELLON( FILE* excellon_dest,
std::vector<HOLE_INFO>& aHoleListBuffer,
std::vector<DRILL_TOOL>& aToolListBuffer )
{
int diam, holes_count;
int x0, y0, xf, yf, xc, yc;
float xt, yt;
char line[1024];
SetLocaleTo_C_standard(); // Use the standard notation for float numbers
Write_Excellon_Header( excellon_dest );
2008-01-16 20:37:50 +00:00
holes_count = 0;
int tool_reference = -2;
/* Write the tool list */
for( unsigned ii = 0; ii < aToolListBuffer.size(); ii++ )
{
if( s_Unit_Drill_is_Inch ) /* does it need T01, T02 or is T1,T2 ok?*/
fprintf( excellon_dest, "T%dC%.3f\n", ii + 1,
float (aToolListBuffer[ii].m_Diameter)
* s_ConversionUnits );
else
fprintf( excellon_dest, "T%dC%.3f\n", ii + 1,
float (aToolListBuffer[ii].m_Diameter)
* s_ConversionUnits * 10.0 );
}
fputs( "%\n", excellon_dest );
if( !Minimal )
fputs( "M47\n", excellon_dest ); /* Operator message */
fputs( "G05\n", excellon_dest ); /* Drill mode */
/* Units : */
if( s_Unit_Drill_is_Inch && !Minimal )
fputs( "M72\n", excellon_dest ); /* M72 = inch mode */
else if( !Minimal )
fputs( "M71\n", excellon_dest ); /* M71 = metric mode */
/* Read the hole file and generate lines for normal holes (oblong
* holes will be created later) */
for( unsigned ii = 0; ii < aHoleListBuffer.size(); ii++ )
{
if( aHoleListBuffer[ii].m_Hole_Shape )
continue; // oblong holes will be created later
if( tool_reference != aHoleListBuffer[ii].m_Tool_Reference )
{
tool_reference = aHoleListBuffer[ii].m_Tool_Reference;
fprintf( excellon_dest, "T%d\n", tool_reference );
}
x0 = aHoleListBuffer[ii].m_Hole_Pos_X - File_Drill_Offset.x;
y0 = aHoleListBuffer[ii].m_Hole_Pos_Y - File_Drill_Offset.y;
if( !Mirror )
y0 *= -1;
xt = float (x0) * s_ConversionUnits; yt = float (y0) * s_ConversionUnits;
if( s_Unit_Drill_is_Inch )
{
Gen_Line_EXCELLON( line, xt, yt );
}
else
{
/* metric 3:3 */
Gen_Line_EXCELLON( line, xt * 10, yt * 10 );
}
fputs( line, excellon_dest );
holes_count++;
}
2008-01-16 20:37:50 +00:00
/* Read the hole file and generate lines for normal holes (oblong holes
* will be created later) */
tool_reference = -2; // set to a value not used for
// aHoleListBuffer[ii].m_Tool_Reference
for( unsigned ii = 0; ii < aHoleListBuffer.size(); ii++ )
{
if( aHoleListBuffer[ii].m_Hole_Shape == 0 )
continue; // wait for oblong holes
if( tool_reference != aHoleListBuffer[ii].m_Tool_Reference )
{
tool_reference = aHoleListBuffer[ii].m_Tool_Reference;
fprintf( excellon_dest, "T%d\n", tool_reference );
2008-01-16 20:37:50 +00:00
}
diam = MIN( aHoleListBuffer[ii].m_Hole_SizeX,
aHoleListBuffer[ii].m_Hole_SizeY );
if( diam == 0 )
continue;
/* Compute the hole coordinates: */
xc = x0 = xf = aHoleListBuffer[ii].m_Hole_Pos_X - File_Drill_Offset.x;
yc = y0 = yf = aHoleListBuffer[ii].m_Hole_Pos_Y - File_Drill_Offset.y;
/* Compute the start and end coordinates for the shape */
if( aHoleListBuffer[ii].m_Hole_SizeX < aHoleListBuffer[ii].m_Hole_SizeY )
{
int delta = ( aHoleListBuffer[ii].m_Hole_SizeY
- aHoleListBuffer[ii].m_Hole_SizeX ) / 2;
y0 -= delta; yf += delta;
}
else
{
int delta = ( aHoleListBuffer[ii].m_Hole_SizeX
- aHoleListBuffer[ii].m_Hole_SizeY ) / 2;
x0 -= delta; xf += delta;
}
RotatePoint( &x0, &y0, xc, yc, aHoleListBuffer[ii].m_Hole_Orient );
RotatePoint( &xf, &yf, xc, yc, aHoleListBuffer[ii].m_Hole_Orient );
if( !Mirror )
{
y0 *= -1; yf *= -1;
}
xt = float (x0) * s_ConversionUnits;
yt = float (y0) * s_ConversionUnits;
if( s_Unit_Drill_is_Inch )
Gen_Line_EXCELLON( line, xt, yt );
else
Gen_Line_EXCELLON( line, xt * 10, yt * 10 );
/* remove the '\n' from end of line, because we must add the "G85"
* command to the line: */
for( int kk = 0; line[kk] != 0; kk++ )
if( line[kk] == '\n' || line[kk] =='\r' )
line[kk] = 0;
2008-01-16 20:37:50 +00:00
fputs( line, excellon_dest );
fputs( "G85", excellon_dest ); // add the "G85" command
2008-01-16 20:37:50 +00:00
xt = float (xf) * s_ConversionUnits;
yt = float (yf) * s_ConversionUnits;
if( s_Unit_Drill_is_Inch )
Gen_Line_EXCELLON( line, xt, yt );
else
Gen_Line_EXCELLON( line, xt * 10, yt * 10 );
fputs( line, excellon_dest );
fputs( "G05\n", excellon_dest );
holes_count++;
}
Write_End_Of_File_Drill( excellon_dest );
SetLocaleTo_Default(); // Revert to locale float notation
2008-01-16 20:37:50 +00:00
return holes_count;
}
/* Created a line like:
* X48000Y19500
* According to the selected format
*/
void Gen_Line_EXCELLON( char* line, float x, float y )
{
wxString xs, ys;
int xpad = s_Precision.m_lhs + s_Precision.m_rhs;
int ypad = xpad;
/* I need to come up with an algorithm that handles any lhs:rhs format.*/
/* one idea is to take more inputs for xpad/ypad when metric is used. */
switch( s_Zeros_Format )
{
default:
case DECIMAL_FORMAT:
sprintf( line, "X%.3fY%.3f\n", x, y );
break;
case SUPPRESS_LEADING: /* that should work now */
for( int i = 0; i< s_Precision.m_rhs; i++ )
{
x *= 10; y *= 10;
}
sprintf( line, "X%dY%d\n", wxRound( x ), wxRound( y ) );
break;
case SUPPRESS_TRAILING:
{
for( int i = 0; i < s_Precision.m_rhs; i++ )
{
x *= 10;
y *= 10;
}
if( x<0 )
xpad++;
if( y<0 )
ypad++;
xs.Printf( wxT( "%0*d" ), xpad, wxRound( x ) );
ys.Printf( wxT( "%0*d" ), ypad, wxRound( y ) );
size_t j = xs.Len() - 1;
while( xs[j] == '0' && j )
xs.Truncate( j-- );
j = ys.Len() - 1;
while( ys[j] == '0' && j )
ys.Truncate( j-- );
sprintf( line, "X%sY%s\n", CONV_TO_UTF8( xs ), CONV_TO_UTF8( ys ) );
break;
}
case KEEP_ZEROS:
for( int i = 0; i< s_Precision.m_rhs; i++ )
{
x *= 10; y *= 10;
}
if( x<0 )
xpad++;
if( y<0 )
ypad++;
xs.Printf( wxT( "%0*d" ), xpad, wxRound( x ) );
ys.Printf( wxT( "%0*d" ), ypad, wxRound( y ) );
sprintf( line, "X%sY%s\n", CONV_TO_UTF8( xs ), CONV_TO_UTF8( ys ) );
break;
}
}
/* Print the DRILL file header. The full header is:
* M48
* ;DRILL file {PCBNEW (2007-11-29-b)} date 17/1/2008-21:02:35
* ;FORMAT={ <precision> / absolute / <units> / <numbers format>}
* R,T
* VER,1
* FMAT,2
* INCH,TZ
* TCST,OFF
* ICI,OFF
* ATC,ON
*/
void DIALOG_GENDRILL::Write_Excellon_Header( FILE* aFile )
{
char Line[256];
fputs( "M48\n", aFile );
if( !Minimal )
{
int ii = m_Choice_Zeros_Format->GetSelection();
DateAndTime( Line );
// The next 2 lines in EXCELLON files are comments:
wxString msg = wxGetApp().GetTitle() + wxT( " " ) + GetBuildVersion();
fprintf( aFile, ";DRILL file {%s} date %s\n", CONV_TO_UTF8( msg ),
Line );
2008-08-25 13:26:48 +00:00
msg = wxT( ";FORMAT={" );
// Print precision:
if( ii > 0 )
msg << m_Choice_Precision->GetStringSelection();
else
msg << wxT( "-.-" ); // in decimal format the precision is irrelevant
msg << wxT( "/ absolute / " );
msg << ( s_Unit_Drill_is_Inch ? wxT( "inch" ) : wxT( "metric" ) );
/* Adding numbers notation format.
* this is same as m_Choice_Zeros_Format strings, but NOT translated
* because some EXCELLON parsers do not like non ascii values
* so we use ONLY english (ascii) strings.
* if new options are added in m_Choice_Zeros_Format, they must also
* be added here
*/
msg << wxT( " / " );
const wxString zero_fmt[5] =
{
wxT( "decimal" ), wxT( "suppress leading zeros" ),
wxT( "suppress trailing zeros" ), wxT( "keep zeros" ),
wxT( "???" )
};
if( ii < 0 || ii > 4 )
ii = 4;
msg << zero_fmt[ii];
msg << wxT( "}\n" );
2008-08-25 13:26:48 +00:00
fputs( CONV_TO_UTF8( msg ), aFile );
fputs( "R,T\nVER,1\nFMAT,2\n", aFile );
}
fputs( s_Unit_Drill_is_Inch ? "INCH" : "METRIC", aFile );
switch( s_Zeros_Format )
{
case SUPPRESS_LEADING:
case DECIMAL_FORMAT:
fputs( ",TZ\n", aFile );
break;
case SUPPRESS_TRAILING:
fputs( ",LZ\n", aFile );
break;
case KEEP_ZEROS:
fputs( ",TZ\n", aFile ); // TZ is acceptable when all zeros are kept
break;
}
if( !Minimal )
fputs( "TCST,OFF\nICI,OFF\nATC,ON\n", aFile );
}
void Write_End_Of_File_Drill( FILE* aFile )
{
//add if minimal here
fputs( "T0\nM30\n", aFile ); fclose( aFile );
}
/* Generate the drill plan (Drill map) format HPGL or POSTSCRIPT
*/
void DIALOG_GENDRILL::GenDrillMap( const wxString aFileName,
std::vector<HOLE_INFO>& aHoleListBuffer,
std::vector<DRILL_TOOL>& buffer,
int format )
{
wxFileName fn;
wxString ext, wildcard;
wxString msg;
/* Init extension */
switch( format )
{
case PLOT_FORMAT_HPGL:
ext = wxT( "plt" );
wildcard = _( "HPGL plot files (.plt)|*.plt" );
break;
case PLOT_FORMAT_POST:
ext = wxT( "ps" );
wildcard = _( "PostScript files (.ps)|*.ps" );
break;
case PLOT_FORMAT_GERBER:
ext = wxT( "pho" );
wildcard = _( "Gerber files (.pho)|*.pho" );
break;
2009-06-30 10:43:20 +00:00
case PLOT_FORMAT_DXF:
ext = wxT( "dxf" );
wildcard = _( "DXF files (.dxf)|*.dxf" );
break;
default:
DisplayError( this, wxT( "DIALOG_GENDRILL::GenDrillMap() error" ) );
return;
}
/* Init file name */
fn = aFileName;
fn.SetName( fn.GetName() + wxT( "-drl" ) );
fn.SetExt( ext );
2009-06-30 10:43:20 +00:00
wxFileDialog dlg( this, _( "Save Drill Plot File" ), fn.GetPath(),
fn.GetFullName(), wildcard,
2009-06-30 10:43:20 +00:00
wxFD_SAVE | wxFD_OVERWRITE_PROMPT );
if( dlg.ShowModal() == wxID_CANCEL )
return;
FILE* drillplot_dest = wxFopen( dlg.GetPath(), wxT( "wt" ) );
if( drillplot_dest == 0 )
{
msg = _( "Unable to create file" );
msg << wxT( " <" ) << dlg.GetPath() << wxT( ">" );
DisplayError( this, msg );
return;
}
GenDrillMapFile( m_Parent->GetBoard(),
drillplot_dest,
dlg.GetPath(),
m_Parent->GetScreen()->m_CurrentSheetDesc,
s_HoleListBuffer,
s_ToolListBuffer,
s_Unit_Drill_is_Inch,
format, File_Drill_Offset );
}
/*
* Create a list of drill values and drill count
*/
void DIALOG_GENDRILL::GenDrillReport( const wxString aFileName )
{
wxFileName fn;
wxString msg;
wxString wildcard = _( "Drill report files (.rpt)|*.rpt" );
fn = aFileName;
fn.SetName( fn.GetName() + wxT( "-drl" ) );
fn.SetExt( wxT( "rpt" ) );
wxFileDialog dlg( this, _( "Save Drill Report File" ), fn.GetPath(),
fn.GetFullName(), wildcard,
2009-06-30 10:43:20 +00:00
wxFD_SAVE | wxFD_OVERWRITE_PROMPT );
if( dlg.ShowModal() == wxID_CANCEL )
return;
FILE* report_dest = wxFopen( dlg.GetPath(), wxT( "w" ) );
if( report_dest == 0 )
{
msg = _( "Unable to create file " ) + dlg.GetPath();
DisplayError( this, msg );
return;
}
GenDrillReportFile( report_dest, m_Parent->GetBoard(),
m_Parent->GetScreen()->m_FileName,
s_Unit_Drill_is_Inch,
s_HoleListBuffer,
s_ToolListBuffer );
}