netlist_exporter_base.cpp

Go to the documentation of this file.

/*
 * This program source code file is part of KiCad, a free EDA CAD application.
 *
 * Copyright (C) 1992-2017 jp.charras at wanadoo.fr
 * Copyright (C) 2013-2017 SoftPLC Corporation, Dick Hollenbeck <[email protected]>
 * Copyright (C) 1992-2021 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
 */

#include <netlist_exporter_base.h>

#include <string_utils.h>

#include <symbol_library.h>
#include <connection_graph.h>
#include <sch_reference_list.h>
#include <sch_screen.h>
#include <schematic.h>


wxString NETLIST_EXPORTER_BASE::MakeCommandLine( const wxString& aFormatString,
 const wxString& aNetlistFile,
 const wxString& aFinalFile,
 const wxString& aProjectPath )
{
 // Expand format symbols in the command line:
 // %B => base filename of selected output file, minus path and extension.
 // %P => project directory name, without trailing '/' or '\'.
 // %I => full filename of the input file (the intermediate net file).
 // %O => complete filename and path (but without extension) of the user chosen output file.

 wxString ret = aFormatString;
 wxFileName in = aNetlistFile;
 wxFileName out = aFinalFile;
 wxString str_out = out.GetFullPath();

 ret.Replace( wxT( "%P" ), aProjectPath, true );
 ret.Replace( wxT( "%B" ), out.GetName(), true );
 ret.Replace( wxT( "%I" ), in.GetFullPath(), true );

#ifdef __WINDOWS__
 // A ugly hack to run xsltproc that has a serious bug on Window since a long time:
 // the filename given after -o option (output filename) cannot use '\' in filename
 // so replace if by '/' if possible (I mean if the filename does not start by "\\"
 // that is a filename on a Windows server)

 if( !str_out.StartsWith( wxT( "\\\\" ) ) )
 str_out.Replace( wxT( "\\" ), wxT( "/" ) );
#endif

 ret.Replace( wxT( "%O" ), str_out, true );

 return ret;
}


SCH_SYMBOL* NETLIST_EXPORTER_BASE::findNextSymbol( EDA_ITEM* aItem, SCH_SHEET_PATH* aSheetPath )
{
 wxCHECK( aItem, nullptr );
 wxCHECK( aSheetPath, nullptr );

 wxString ref;

 if( aItem->Type() != SCH_SYMBOL_T )
 return nullptr;

 // found next symbol
 SCH_SYMBOL* symbol = (SCH_SYMBOL*) aItem;

 // Power symbols and other symbols which have the reference starting with "#" are not
 // included in netlist (pseudo or virtual symbols)
 ref = symbol->GetRef( aSheetPath );

 if( ref[0] == wxChar( '#' ) )
 return nullptr;

 SCH_SCREEN* screen = aSheetPath->LastScreen();

 wxCHECK( screen, nullptr );

 LIB_SYMBOL* libSymbol = screen->GetLibSymbols()[ symbol->GetSchSymbolLibraryName() ];

 wxCHECK( libSymbol, nullptr );

 // If symbol is a "multi parts per package" type
 if( libSymbol->GetUnitCount() > 1 )
 {
 // test if this reference has already been processed, and if so skip
 if( m_referencesAlreadyFound.Lookup( ref ) )
 return nullptr;
 }

 // record the usage of this library symbol entry.
 m_libParts.insert( libSymbol ); // rejects non-unique pointers

 return symbol;
}


static bool sortPinsByNum( PIN_INFO& aPin1, PIN_INFO& aPin2 )
{
 // return "lhs < rhs"
 return StrNumCmp( aPin1.num, aPin2.num, true ) < 0;
}


void NETLIST_EXPORTER_BASE::CreatePinList( SCH_SYMBOL* aSymbol,
 SCH_SHEET_PATH* aSheetPath,
 bool aKeepUnconnectedPins )
{
 wxString ref( aSymbol->GetRef( aSheetPath ) );

 // Power symbols and other symbols which have the reference starting with "#" are not
 // included in netlist (pseudo or virtual symbols)

 if( ref[0] == wxChar( '#' ) )
 return;

 // if( aSymbol->m_FlagControlMulti == 1 )
 // continue; /* yes */
 // removed because with multiple instances of one schematic (several sheets pointing to
 // 1 screen), this will be erroneously be toggled.

 if( !aSymbol->GetLibSymbolRef() )
 return;

 m_sortedSymbolPinList.clear();

 // If symbol is a "multi parts per package" type
 if( aSymbol->GetLibSymbolRef()->GetUnitCount() > 1 )
 {
 // Collect all pins for this reference designator by searching the entire design for
 // other parts with the same reference designator.
 // This is only done once, it would be too expensive otherwise.
 findAllUnitsOfSymbol( aSymbol, aSymbol->GetLibSymbolRef().get(),
 aSheetPath, aKeepUnconnectedPins );
 }

 else // GetUnitCount() <= 1 means one part per package
 {
 CONNECTION_GRAPH* graph = m_schematic->ConnectionGraph();

 for( const SCH_PIN* pin : aSymbol->GetPins( aSheetPath ) )
 {
 if( SCH_CONNECTION* conn = pin->Connection( aSheetPath ) )
 {
 const wxString& netName = conn->Name();

 if( !aKeepUnconnectedPins ) // Skip unconnected pins if requested
 {
 CONNECTION_SUBGRAPH* sg = graph->FindSubgraphByName( netName, *aSheetPath );

 if( !sg || sg->m_no_connect || sg->m_items.size() < 2 )
 continue;
 }

 m_sortedSymbolPinList.emplace_back( pin->GetShownNumber(), netName );
 }
 }
 }

 // Sort pins in m_SortedSymbolPinList by pin number
 sort( m_sortedSymbolPinList.begin(), m_sortedSymbolPinList.end(), sortPinsByNum );

 // Remove duplicate Pins in m_SortedSymbolPinList
 eraseDuplicatePins();

 // record the usage of this library symbol
 m_libParts.insert( aSymbol->GetLibSymbolRef().get() ); // rejects non-unique pointers
}


void NETLIST_EXPORTER_BASE::eraseDuplicatePins()
{
 for( unsigned ii = 0; ii < m_sortedSymbolPinList.size(); ii++ )
 {
 if( m_sortedSymbolPinList[ii].num.empty() ) /* already deleted */
 continue;

 /* Search for duplicated pins
 * If found, remove duplicates. The priority is to keep connected pins
 * and remove unconnected
 * - So this allows (for instance when using multi op amps per package
 * - to connect only one op amp to power
 * Because the pin list is sorted by m_PinNum value, duplicated pins
 * are necessary successive in list
 */
 int idxref = ii;

 for( unsigned jj = ii + 1; jj < m_sortedSymbolPinList.size(); jj++ )
 {
 if( m_sortedSymbolPinList[jj].num.empty() ) // Already removed
 continue;

 // if other pin num, stop search,
 // because all pins having the same number are consecutive in list.
 if( m_sortedSymbolPinList[idxref].num != m_sortedSymbolPinList[jj].num )
 break;

 m_sortedSymbolPinList[jj].num.clear();
 }
 }
}


void NETLIST_EXPORTER_BASE::findAllUnitsOfSymbol( SCH_SYMBOL* aSchSymbol, LIB_SYMBOL* aLibSymbol,
 SCH_SHEET_PATH* aSheetPath,
 bool aKeepUnconnectedPins )
{
 wxString ref = aSchSymbol->GetRef( aSheetPath );
 wxString ref2;

 SCH_SHEET_LIST sheetList = m_schematic->GetSheets();
 CONNECTION_GRAPH* graph = m_schematic->ConnectionGraph();

 for( unsigned i = 0; i < sheetList.size(); i++ )
 {
 SCH_SHEET_PATH& sheet = sheetList[i];

 for( SCH_ITEM* item : sheetList[i].LastScreen()->Items().OfType( SCH_SYMBOL_T ) )
 {
 SCH_SYMBOL* comp2 = static_cast<SCH_SYMBOL*>( item );

 ref2 = comp2->GetRef( &sheet );

 if( ref2.CmpNoCase( ref ) != 0 )
 continue;

 for( const SCH_PIN* pin : comp2->GetPins( &sheet ) )
 {
 if( SCH_CONNECTION* conn = pin->Connection( &sheet ) )
 {
 const wxString& netName = conn->Name();

 if( !aKeepUnconnectedPins ) // Skip unconnected pins if requested
 {
 CONNECTION_SUBGRAPH* sg = graph->FindSubgraphByName( netName, sheet );

 if( !sg || sg->m_no_connect || sg->m_items.size() < 2 )
 continue;
 }

 m_sortedSymbolPinList.emplace_back( pin->GetShownNumber(), netName );
 }
 }
 }
 }
}