specctra_import.cpp

Go to the documentation of this file.

/*
 * This program source code file is part of KiCad, a free EDA CAD application.
 *
 * Copyright (C) 2007-2013 SoftPLC Corporation, Dick Hollenbeck <[email protected]>
 * Copyright (C) 2007-2022 KiCad Developers, see AUTHORS.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
 */
 
 
/* This source is a complement to specctra.cpp and implements the import of
 a specctra session file (*.ses), and import of a specctra design file
 (*.dsn) file. The specification for the grammar of the specctra dsn file
 used to develop this code is given here:
 http://tech.groups.yahoo.com/group/kicad-users/files/ then file "specctra.pdf"
 Also see the comments at the top of the specctra.cpp file itself.
*/
 
 
#include <confirm.h> // DisplayError()
#include <gestfich.h> // EDA_FileSelector()
#include <pcb_edit_frame.h>
#include <locale_io.h>
#include <macros.h>
#include <board.h>
#include <board_design_settings.h>
#include <footprint.h>
#include <pcb_track.h>
#include <connectivity/connectivity_data.h>
#include <view/view.h>
#include "specctra.h"
#include <math/util.h> // for KiROUND
#include <pcbnew_settings.h>
 
using namespace DSN;
 
 
bool PCB_EDIT_FRAME::ImportSpecctraSession( const wxString& fullFileName )
{
 // To avoid issues with undo/redo lists (dangling pointers) clear the lists
 // todo: use undo/redo feature
 ClearUndoRedoList();
 
 // Remove existing tracks from view. They will be readded later after loading new tracks.
 if( GetCanvas() ) // clear view:
 {
 for( PCB_TRACK* track : GetBoard()->Tracks() )
 GetCanvas()->GetView()->Remove( track );
 }
 
 SPECCTRA_DB db;
 LOCALE_IO toggle;
 
 try
 {
 db.LoadSESSION( fullFileName );
 db.FromSESSION( GetBoard() );
 }
 catch( const IO_ERROR& ioe )
 {
 wxString msg = _( "Board may be corrupted, do not save it.\n Fix problem and try again" );
 
 wxString extra = ioe.What();
 
 DisplayErrorMessage( this, msg, extra);
 return false;
 }
 
 GetBoard()->GetConnectivity()->ClearRatsnest();
 GetBoard()->BuildConnectivity();
 
 OnModify();
 
 if( GetCanvas() ) // Update view:
 {
 // Update footprint positions
 GetCanvas()->GetView()->RecacheAllItems();
 
 // add imported tracks (previous tracks are removed, therefore all are new)
 for( auto track : GetBoard()->Tracks() )
 GetCanvas()->GetView()->Add( track );
 }
 
 SetStatusText( wxString( _( "Session file imported and merged OK." ) ) );
 
 Refresh();
 
 return true;
}
 
 
namespace DSN {
 
 
static int scale( double distance, UNIT_RES* aResolution )
{
 double resValue = aResolution->GetValue();
 double factor;
 
 switch( aResolution->GetEngUnits() )
 {
 default:
 case T_inch: factor = 25.4e6; break; // nanometers per inch
 case T_mil: factor = 25.4e3; break; // nanometers per mil
 case T_cm: factor = 1e7; break; // nanometers per cm
 case T_mm: factor = 1e6; break; // nanometers per mm
 case T_um: factor = 1e3; break; // nanometers per um
 }
 
 return KiROUND( factor * distance / resValue );
}
 
 
static wxPoint mapPt( const POINT& aPoint, UNIT_RES* aResolution )
{
 wxPoint ret( scale( aPoint.x, aResolution ),
 -scale( aPoint.y, aResolution ) ); // negate y
 
 return ret;
}
 
 
PCB_TRACK* SPECCTRA_DB::makeTRACK( WIRE* wire, PATH* aPath, int aPointIndex, int aNetcode )
{
 int layerNdx = findLayerName( aPath->layer_id );
 
 if( layerNdx == -1 )
 {
 THROW_IO_ERROR( wxString::Format( _( "Session file uses invalid layer id '%s'." ),
 FROM_UTF8( aPath->layer_id.c_str() ) ) );
 }
 
 PCB_TRACK* track = new PCB_TRACK( m_sessionBoard );
 
 track->SetStart( mapPt( aPath->points[aPointIndex+0], m_routeResolution ) );
 track->SetEnd( mapPt( aPath->points[aPointIndex+1], m_routeResolution ) );
 track->SetLayer( m_pcbLayer2kicad[layerNdx] );
 track->SetWidth( scale( aPath->aperture_width, m_routeResolution ) );
 track->SetNetCode( aNetcode );
 
 // a track can be locked.
 // However specctra as 4 types, none is exactly the same as our locked option
 // wire->wire_type = T_fix, T_route, T_normal or T_protect
 // fix and protect could be used as lock option
 // but protect is returned for all tracks having initially the route or protect property
 if( wire->wire_type == T_fix )
 track->SetLocked( true );
 
 return track;
}
 
 
PCB_VIA* SPECCTRA_DB::makeVIA( WIRE_VIA*aVia, PADSTACK* aPadstack, const POINT& aPoint, int aNetCode,
 int aViaDrillDefault )
{
 PCB_VIA* via = 0;
 SHAPE* shape;
 int shapeCount = aPadstack->Length();
 int drill_diam_iu = -1;
 int copperLayerCount = m_sessionBoard->GetCopperLayerCount();
 
 
 // The drill diameter is encoded in the padstack name if Pcbnew did the DSN export.
 // It is after the colon and before the last '_'
 int drillStartNdx = aPadstack->padstack_id.find( ':' );
 
 if( drillStartNdx != -1 )
 {
 ++drillStartNdx; // skip over the ':'
 
 int drillEndNdx = aPadstack->padstack_id.rfind( '_' );
 if( drillEndNdx != -1 )
 {
 std::string diam_txt( aPadstack->padstack_id,
 drillStartNdx, drillEndNdx-drillStartNdx );
 
 double drill_um = strtod( diam_txt.c_str(), 0 );
 
 drill_diam_iu = int( drill_um * ( pcbIUScale.IU_PER_MM / 1000.0 ) );
 
 if( drill_diam_iu == aViaDrillDefault )
 drill_diam_iu = UNDEFINED_DRILL_DIAMETER;
 }
 }
 
 if( shapeCount == 0 )
 {
 THROW_IO_ERROR( _( "Session via padstack has no shapes" ) );
 }
 else if( shapeCount == 1 )
 {
 shape = (SHAPE*) (*aPadstack)[0];
 DSN_T type = shape->shape->Type();
 
 if( type != T_circle )
 {
 THROW_IO_ERROR( wxString::Format( _( "Unsupported via shape: %s." ),
 GetTokenString( type ) ) );
 }
 
 CIRCLE* circle = (CIRCLE*) shape->shape;
 int viaDiam = scale( circle->diameter, m_routeResolution );
 
 via = new PCB_VIA( m_sessionBoard );
 via->SetPosition( mapPt( aPoint, m_routeResolution ) );
 via->SetDrill( drill_diam_iu );
 via->SetViaType( VIATYPE::THROUGH );
 via->SetWidth( viaDiam );
 via->SetLayerPair( F_Cu, B_Cu );
 }
 else if( shapeCount == copperLayerCount )
 {
 shape = (SHAPE*) (*aPadstack)[0];
 DSN_T type = shape->shape->Type();
 
 if( type != T_circle )
 {
 THROW_IO_ERROR( wxString::Format( _( "Unsupported via shape: %s" ),
 GetTokenString( type ) ) );
 }
 
 CIRCLE* circle = (CIRCLE*) shape->shape;
 int viaDiam = scale( circle->diameter, m_routeResolution );
 
 via = new PCB_VIA( m_sessionBoard );
 via->SetPosition( mapPt( aPoint, m_routeResolution ) );
 via->SetDrill( drill_diam_iu );
 via->SetViaType( VIATYPE::THROUGH );
 via->SetWidth( viaDiam );
 via->SetLayerPair( F_Cu, B_Cu );
 }
 else // VIA_MICROVIA or VIA_BLIND_BURIED
 {
 int topLayerNdx = -1; // session layer detectors
 int botLayerNdx = INT_MAX;
 
 int viaDiam = -1;
 
 for( int i=0; i<shapeCount; ++i )
 {
 shape = (SHAPE*) (*aPadstack)[i];
 DSN_T type = shape->shape->Type();
 
 if( type != T_circle )
 {
 THROW_IO_ERROR( wxString::Format( _( "Unsupported via shape: %s" ),
 GetTokenString( type ) ) );
 }
 
 CIRCLE* circle = (CIRCLE*) shape->shape;
 
 int layerNdx = findLayerName( circle->layer_id );
 if( layerNdx == -1 )
 {
 wxString layerName = FROM_UTF8( circle->layer_id.c_str() );
 THROW_IO_ERROR( wxString::Format( _( "Session file uses invalid layer id '%s'" ),
 layerName ) );
 }
 
 if( layerNdx > topLayerNdx )
 topLayerNdx = layerNdx;
 
 if( layerNdx < botLayerNdx )
 botLayerNdx = layerNdx;
 
 if( viaDiam == -1 )
 viaDiam = scale( circle->diameter, m_routeResolution );
 }
 
 via = new PCB_VIA( m_sessionBoard );
 via->SetPosition( mapPt( aPoint, m_routeResolution ) );
 via->SetDrill( drill_diam_iu );
 
 if( ( topLayerNdx == 0 && botLayerNdx == 1 )
 || ( topLayerNdx == copperLayerCount-2 && botLayerNdx == copperLayerCount-1 ) )
 {
 via->SetViaType( VIATYPE::MICROVIA );
 }
 else
 {
 via->SetViaType( VIATYPE::BLIND_BURIED );
 }
 
 via->SetWidth( viaDiam );
 via->SetLayerPair( m_pcbLayer2kicad[ topLayerNdx ], m_pcbLayer2kicad[ botLayerNdx ] );
 }
 
 wxASSERT( via );
 
 via->SetNetCode( aNetCode );
 
 // a via can be locked.
 // However specctra as 4 types, none is exactly the same as our locked option
 // aVia->via_type = T_fix, T_route, T_normal or T_protect
 // fix and protect could be used as lock option
 // but protect is returned for all tracks having initially the route or protect property
 if( aVia->via_type == T_fix )
 via->SetLocked( true );
 
 return via;
}
 
 
// no UI code in this function, throw exception to report problems to the
// UI handler: void PCB_EDIT_FRAME::ImportSpecctraSession( wxCommandEvent& event )
 
void SPECCTRA_DB::FromSESSION( BOARD* aBoard )
{
 m_sessionBoard = aBoard; // not owned here
 
 if( !m_session )
 THROW_IO_ERROR( _("Session file is missing the \"session\" section") );
 
 if( !m_session->route )
 THROW_IO_ERROR( _("Session file is missing the \"routes\" section") );
 
 if( !m_session->route->library )
 THROW_IO_ERROR( _("Session file is missing the \"library_out\" section") );
 
 // delete the old tracks and vias but save locked tracks/vias; they will be re-added later
 std::vector<PCB_TRACK*> locked;
 
 while( !aBoard->Tracks().empty() )
 {
 PCB_TRACK* track = aBoard->Tracks().back();
 aBoard->Tracks().pop_back();
 
 if( track->IsLocked() )
 locked.push_back( track );
 else
 delete track;
 }
 
 aBoard->DeleteMARKERs();
 
 buildLayerMaps( aBoard );
 
 // Add locked tracks: because they are exported as Fix tracks, they are not
 // in .ses file.
 for( PCB_TRACK* track: locked )
 aBoard->Add( track );
 
 if( m_session->placement )
 {
 // Walk the PLACEMENT object's COMPONENTs list, and for each PLACE within
 // each COMPONENT, reposition and re-orient each component and put on
 // correct side of the board.
 COMPONENTS& components = m_session->placement->components;
 
 for( COMPONENTS::iterator comp=components.begin(); comp!=components.end(); ++comp )
 {
 PLACES& places = comp->places;
 for( unsigned i=0; i<places.size(); ++i )
 {
 PLACE* place = &places[i]; // '&' even though places[] holds a pointer!
 
 wxString reference = FROM_UTF8( place->component_id.c_str() );
 FOOTPRINT* footprint = aBoard->FindFootprintByReference( reference );
 
 if( !footprint )
 {
 THROW_IO_ERROR( wxString::Format( _( "Reference '%s' not found." ),
 reference ) );
 }
 
 if( !place->hasVertex )
 continue;
 
 UNIT_RES* resolution = place->GetUnits();
 wxASSERT( resolution );
 
 wxPoint newPos = mapPt( place->vertex, resolution );
 footprint->SetPosition( newPos );
 
 if( place->side == T_front )
 {
 // convert from degrees to tenths of degrees used in KiCad.
 EDA_ANGLE orientation( place->rotation, DEGREES_T );
 
 if( footprint->GetLayer() != F_Cu )
 {
 // footprint is on copper layer (back)
 footprint->Flip( footprint->GetPosition(), false );
 }
 
 footprint->SetOrientation( orientation );
 }
 else if( place->side == T_back )
 {
 EDA_ANGLE orientation( place->rotation + 180.0, DEGREES_T );
 
 if( footprint->GetLayer() != B_Cu )
 {
 // footprint is on component layer (front)
 footprint->Flip( footprint->GetPosition(), false );
 }
 
 footprint->SetOrientation( orientation );
 }
 else
 {
 // as I write this, the PARSER *is* catching this, so we should never see below:
 wxFAIL_MSG( wxT("DSN::PARSER did not catch an illegal side := 'back|front'") );
 }
 }
 }
 }
 
 m_routeResolution = m_session->route->GetUnits();
 
 // Walk the NET_OUTs and create tracks and vias anew.
 NET_OUTS& net_outs = m_session->route->net_outs;
 for( NET_OUTS::iterator net = net_outs.begin(); net!=net_outs.end(); ++net )
 {
 int netoutCode = 0;
 
 // page 143 of spec says wire's net_id is optional
 if( net->net_id.size() )
 {
 wxString netName = FROM_UTF8( net->net_id.c_str() );
 NETINFO_ITEM* netinfo = aBoard->FindNet( netName );
 
 if( netinfo )
 netoutCode = netinfo->GetNetCode();
 }
 
 WIRES& wires = net->wires;
 for( unsigned i = 0; i<wires.size(); ++i )
 {
 WIRE* wire = &wires[i];
 DSN_T shape = wire->shape->Type();
 
 if( shape != T_path )
 {
  /*
 * shape == T_polygon is expected from freerouter if you have a zone on a non-
 * "power" type layer, i.e. a T_signal layer and the design does a round-trip
 * back in as session here. We kept our own zones in the BOARD, so ignore this
 * so called 'wire'.
 
 wxString netId = FROM_UTF8( wire->net_id.c_str() );
 THROW_IO_ERROR( wxString::Format( _( "Unsupported wire shape: '%s' for net: '%s'" ),
 DLEX::GetTokenString(shape).GetData(),
 netId.GetData() ) );
 */
 }
 else
 {
 PATH* path = (PATH*) wire->shape;
 
 for( unsigned pt=0; pt < path->points.size()-1; ++pt )
 {
 PCB_TRACK* track = makeTRACK( wire, path, pt, netoutCode );
 aBoard->Add( track );
 }
 }
 }
 
 WIRE_VIAS& wire_vias = net->wire_vias;
 LIBRARY& library = *m_session->route->library;
 
 for( unsigned i=0; i<wire_vias.size(); ++i )
 {
 int netCode = 0;
 
 // page 144 of spec says wire_via's net_id is optional
 if( net->net_id.size() )
 {
 wxString netName = FROM_UTF8( net->net_id.c_str() );
 NETINFO_ITEM* netvia = aBoard->FindNet( netName );
 
 if( netvia )
 netCode = netvia->GetNetCode();
 }
 
 WIRE_VIA* wire_via = &wire_vias[i];
 
 // example: (via Via_15:8_mil 149000 -71000 )
 
  PADSTACK* padstack = library.FindPADSTACK( wire_via->GetPadstackId() );
 if( !padstack )
 {
 // Dick Feb 29, 2008:
 // Freerouter has a bug where it will not round trip all vias. Vias which have
 // a (use_via) element will be round tripped. Vias which do not, don't come back
 // in in the session library, even though they may be actually used in the
 // pre-routed, protected wire_vias. So until that is fixed, create the padstack
 // from its name as a work around.
 wxString psid( FROM_UTF8( wire_via->GetPadstackId().c_str() ) );
 
 THROW_IO_ERROR( wxString::Format( _( "A wire_via refers to missing padstack '%s'." ),
 psid ) );
 }
 
 std::shared_ptr<NET_SETTINGS>& netSettings = aBoard->GetDesignSettings().m_NetSettings;
 
 int via_drill_default = netSettings->m_DefaultNetClass->GetViaDrill();
 
 for( unsigned v = 0; v < wire_via->vertexes.size(); ++v )
 {
 PCB_VIA* via = makeVIA( wire_via, padstack, wire_via->vertexes[v], netCode,
 via_drill_default );
 aBoard->Add( via );
 }
 }
 }
}
 
 
} // namespace DSN