Browse Source
Add support for unitless values to PCB_EXPR_EVALUATOR.
Add support for unitless values to PCB_EXPR_EVALUATOR.
Fixes https://gitlab.com/kicad/code/kicad/issues/130167.0
10 changed files with 1088 additions and 1007 deletions
-
1common/CMakeLists.txt
-
17common/libeval_compiler/libeval_compiler.cpp
-
2pcbnew/drc/drc_rule_condition.cpp
-
28pcbnew/drc/drc_rule_parser.cpp
-
2pcbnew/drc/drc_rule_parser.h
-
1029pcbnew/pcb_expr_evaluator.cpp
-
24pcbnew/pcb_expr_evaluator.h
-
985pcbnew/pcb_expr_functions.cpp
-
5qa/tools/libeval_compiler/libeval_compiler_test.cpp
-
2qa/unittests/pcbnew/test_libeval_compiler.cpp
1029
pcbnew/pcb_expr_evaluator.cpp
File diff suppressed because it is too large
View File
File diff suppressed because it is too large
View File
@ -0,0 +1,985 @@ |
|||
/*
|
|||
* This program source code file is part of KiCad, a free EDA CAD application. |
|||
* |
|||
* Copyright (C) 2019-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 |
|||
*/ |
|||
|
|||
|
|||
#include <cstdio>
|
|||
#include <memory>
|
|||
#include <board.h>
|
|||
#include <board_design_settings.h>
|
|||
#include <drc/drc_rtree.h>
|
|||
#include <drc/drc_engine.h>
|
|||
#include <pcb_track.h>
|
|||
#include <pcb_group.h>
|
|||
#include <geometry/shape_segment.h>
|
|||
#include <pcb_expr_evaluator.h>
|
|||
|
|||
#include <connectivity/connectivity_data.h>
|
|||
#include <connectivity/connectivity_algo.h>
|
|||
#include <connectivity/from_to_cache.h>
|
|||
|
|||
|
|||
bool fromToFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( aCtx ) : nullptr; |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
LIBEVAL::VALUE* argTo = aCtx->Pop(); |
|||
LIBEVAL::VALUE* argFrom = aCtx->Pop(); |
|||
|
|||
result->Set(0.0); |
|||
aCtx->Push( result ); |
|||
|
|||
if(!item) |
|||
return false; |
|||
|
|||
auto ftCache = item->GetBoard()->GetConnectivity()->GetFromToCache(); |
|||
|
|||
if( !ftCache ) |
|||
{ |
|||
wxLogWarning( wxT( "Attempting to call fromTo() with non-existent from-to cache." ) ); |
|||
return true; |
|||
} |
|||
|
|||
if( ftCache->IsOnFromToPath( static_cast<BOARD_CONNECTED_ITEM*>( item ), |
|||
argFrom->AsString(), argTo->AsString() ) ) |
|||
{ |
|||
result->Set(1.0); |
|||
} |
|||
|
|||
return true; |
|||
} |
|||
|
|||
|
|||
#define MISSING_LAYER_ARG( f ) wxString::Format( _( "Missing layer name argument to %s." ), f )
|
|||
|
|||
static void existsOnLayerFunc( LIBEVAL::CONTEXT* aCtx, void *self ) |
|||
{ |
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( aCtx ) : nullptr; |
|||
|
|||
LIBEVAL::VALUE* arg = aCtx->Pop(); |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
aCtx->Push( result ); |
|||
|
|||
if( !item ) |
|||
return; |
|||
|
|||
if( !arg ) |
|||
{ |
|||
if( aCtx->HasErrorCallback() ) |
|||
aCtx->ReportError( MISSING_LAYER_ARG( wxT( "existsOnLayer()" ) ) ); |
|||
|
|||
return; |
|||
} |
|||
|
|||
result->SetDeferredEval( |
|||
[item, arg, aCtx]() -> double |
|||
{ |
|||
const wxString& layerName = arg->AsString(); |
|||
wxPGChoices& layerMap = ENUM_MAP<PCB_LAYER_ID>::Instance().Choices(); |
|||
|
|||
if( aCtx->HasErrorCallback()) |
|||
{ |
|||
/*
|
|||
* Interpreted version |
|||
*/ |
|||
|
|||
bool anyMatch = false; |
|||
|
|||
for( unsigned ii = 0; ii < layerMap.GetCount(); ++ii ) |
|||
{ |
|||
wxPGChoiceEntry& entry = layerMap[ ii ]; |
|||
|
|||
if( entry.GetText().Matches( layerName )) |
|||
{ |
|||
anyMatch = true; |
|||
|
|||
if( item->IsOnLayer( ToLAYER_ID( entry.GetValue()))) |
|||
return 1.0; |
|||
} |
|||
} |
|||
|
|||
if( !anyMatch ) |
|||
{ |
|||
aCtx->ReportError( wxString::Format( _( "Unrecognized layer '%s'" ), |
|||
layerName ) ); |
|||
} |
|||
} |
|||
else |
|||
{ |
|||
/*
|
|||
* Compiled version |
|||
*/ |
|||
|
|||
BOARD* board = item->GetBoard(); |
|||
std::unique_lock<std::mutex> cacheLock( board->m_CachesMutex ); |
|||
auto i = board->m_LayerExpressionCache.find( layerName ); |
|||
LSET mask; |
|||
|
|||
if( i == board->m_LayerExpressionCache.end() ) |
|||
{ |
|||
for( unsigned ii = 0; ii < layerMap.GetCount(); ++ii ) |
|||
{ |
|||
wxPGChoiceEntry& entry = layerMap[ ii ]; |
|||
|
|||
if( entry.GetText().Matches( layerName ) ) |
|||
mask.set( ToLAYER_ID( entry.GetValue() ) ); |
|||
} |
|||
|
|||
board->m_LayerExpressionCache[ layerName ] = mask; |
|||
} |
|||
else |
|||
{ |
|||
mask = i->second; |
|||
} |
|||
|
|||
if( ( item->GetLayerSet() & mask ).any() ) |
|||
return 1.0; |
|||
} |
|||
|
|||
return 0.0; |
|||
} ); |
|||
} |
|||
|
|||
|
|||
static void isPlatedFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
aCtx->Push( result ); |
|||
|
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( aCtx ) : nullptr; |
|||
|
|||
if( !item ) |
|||
return; |
|||
|
|||
if( item->Type() == PCB_PAD_T && static_cast<PAD*>( item )->GetAttribute() == PAD_ATTRIB::PTH ) |
|||
result->Set( 1.0 ); |
|||
else if( item->Type() == PCB_VIA_T ) |
|||
result->Set( 1.0 ); |
|||
} |
|||
|
|||
|
|||
bool collidesWithCourtyard( BOARD_ITEM* aItem, std::shared_ptr<SHAPE>& aItemShape, |
|||
PCB_EXPR_CONTEXT* aCtx, FOOTPRINT* aFootprint, PCB_LAYER_ID aSide ) |
|||
{ |
|||
SHAPE_POLY_SET footprintCourtyard; |
|||
|
|||
footprintCourtyard = aFootprint->GetCourtyard( aSide ); |
|||
|
|||
if( !aItemShape ) |
|||
{ |
|||
// Since rules are used for zone filling we can't rely on the filled shapes.
|
|||
// Use the zone outline instead.
|
|||
if( ZONE* zone = dynamic_cast<ZONE*>( aItem ) ) |
|||
aItemShape.reset( zone->Outline()->Clone() ); |
|||
else |
|||
aItemShape = aItem->GetEffectiveShape( aCtx->GetLayer() ); |
|||
} |
|||
|
|||
return footprintCourtyard.Collide( aItemShape.get() ); |
|||
}; |
|||
|
|||
|
|||
static bool searchFootprints( BOARD* aBoard, const wxString& aArg, PCB_EXPR_CONTEXT* aCtx, |
|||
std::function<bool( FOOTPRINT* )> aFunc ) |
|||
{ |
|||
if( aArg == wxT( "A" ) ) |
|||
{ |
|||
FOOTPRINT* fp = dynamic_cast<FOOTPRINT*>( aCtx->GetItem( 0 ) ); |
|||
|
|||
if( fp && aFunc( fp ) ) |
|||
return 1.0; |
|||
} |
|||
else if( aArg == wxT( "B" ) ) |
|||
{ |
|||
FOOTPRINT* fp = dynamic_cast<FOOTPRINT*>( aCtx->GetItem( 1 ) ); |
|||
|
|||
if( fp && aFunc( fp ) ) |
|||
return 1.0; |
|||
} |
|||
else for( FOOTPRINT* fp : aBoard->Footprints() ) |
|||
{ |
|||
if( fp->GetReference().Matches( aArg ) ) |
|||
{ |
|||
if( aFunc( fp ) ) |
|||
return 1.0; |
|||
} |
|||
} |
|||
|
|||
return 0.0; |
|||
} |
|||
|
|||
|
|||
#define MISSING_FP_ARG( f ) \
|
|||
wxString::Format( _( "Missing footprint argument (A, B, or reference designator) to %s." ), f ) |
|||
|
|||
static void intersectsCourtyardFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
PCB_EXPR_CONTEXT* context = static_cast<PCB_EXPR_CONTEXT*>( aCtx ); |
|||
LIBEVAL::VALUE* arg = context->Pop(); |
|||
LIBEVAL::VALUE* result = context->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
context->Push( result ); |
|||
|
|||
if( !arg ) |
|||
{ |
|||
if( context->HasErrorCallback() ) |
|||
context->ReportError( MISSING_FP_ARG( wxT( "intersectsCourtyard()" ) ) ); |
|||
|
|||
return; |
|||
} |
|||
|
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( context ) : nullptr; |
|||
|
|||
if( !item ) |
|||
return; |
|||
|
|||
result->SetDeferredEval( |
|||
[item, arg, context]() -> double |
|||
{ |
|||
BOARD* board = item->GetBoard(); |
|||
std::shared_ptr<SHAPE> itemShape; |
|||
|
|||
if( searchFootprints( board, arg->AsString(), context, |
|||
[&]( FOOTPRINT* fp ) |
|||
{ |
|||
PTR_PTR_CACHE_KEY key = { fp, item }; |
|||
std::unique_lock<std::mutex> cacheLock( board->m_CachesMutex ); |
|||
|
|||
auto i = board->m_IntersectsCourtyardCache.find( key ); |
|||
|
|||
if( i != board->m_IntersectsCourtyardCache.end() ) |
|||
return i->second; |
|||
|
|||
bool res = collidesWithCourtyard( item, itemShape, context, fp, F_Cu ) |
|||
|| collidesWithCourtyard( item, itemShape, context, fp, B_Cu ); |
|||
|
|||
board->m_IntersectsCourtyardCache[ key ] = res; |
|||
return res; |
|||
} ) ) |
|||
{ |
|||
return 1.0; |
|||
} |
|||
|
|||
return 0.0; |
|||
} ); |
|||
} |
|||
|
|||
|
|||
static void intersectsFrontCourtyardFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
PCB_EXPR_CONTEXT* context = static_cast<PCB_EXPR_CONTEXT*>( aCtx ); |
|||
LIBEVAL::VALUE* arg = context->Pop(); |
|||
LIBEVAL::VALUE* result = context->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
context->Push( result ); |
|||
|
|||
if( !arg ) |
|||
{ |
|||
if( context->HasErrorCallback() ) |
|||
context->ReportError( MISSING_FP_ARG( wxT( "intersectsFrontCourtyard()" ) ) ); |
|||
|
|||
return; |
|||
} |
|||
|
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( context ) : nullptr; |
|||
|
|||
if( !item ) |
|||
return; |
|||
|
|||
result->SetDeferredEval( |
|||
[item, arg, context]() -> double |
|||
{ |
|||
BOARD* board = item->GetBoard(); |
|||
std::shared_ptr<SHAPE> itemShape; |
|||
|
|||
if( searchFootprints( board, arg->AsString(), context, |
|||
[&]( FOOTPRINT* fp ) |
|||
{ |
|||
PTR_PTR_CACHE_KEY key = { fp, item }; |
|||
std::unique_lock<std::mutex> cacheLock( board->m_CachesMutex ); |
|||
|
|||
auto i = board->m_IntersectsFCourtyardCache.find( key ); |
|||
|
|||
if( i != board->m_IntersectsFCourtyardCache.end() ) |
|||
return i->second; |
|||
|
|||
bool res = collidesWithCourtyard( item, itemShape, context, fp, F_Cu ); |
|||
|
|||
board->m_IntersectsFCourtyardCache[ key ] = res; |
|||
return res; |
|||
} ) ) |
|||
{ |
|||
return 1.0; |
|||
} |
|||
|
|||
return 0.0; |
|||
} ); |
|||
} |
|||
|
|||
|
|||
static void intersectsBackCourtyardFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
PCB_EXPR_CONTEXT* context = static_cast<PCB_EXPR_CONTEXT*>( aCtx ); |
|||
LIBEVAL::VALUE* arg = context->Pop(); |
|||
LIBEVAL::VALUE* result = context->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
context->Push( result ); |
|||
|
|||
if( !arg ) |
|||
{ |
|||
if( context->HasErrorCallback() ) |
|||
context->ReportError( MISSING_FP_ARG( wxT( "intersectsBackCourtyard()" ) ) ); |
|||
|
|||
return; |
|||
} |
|||
|
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( context ) : nullptr; |
|||
|
|||
if( !item ) |
|||
return; |
|||
|
|||
result->SetDeferredEval( |
|||
[item, arg, context]() -> double |
|||
{ |
|||
BOARD* board = item->GetBoard(); |
|||
std::shared_ptr<SHAPE> itemShape; |
|||
|
|||
if( searchFootprints( board, arg->AsString(), context, |
|||
[&]( FOOTPRINT* fp ) |
|||
{ |
|||
PTR_PTR_CACHE_KEY key = { fp, item }; |
|||
std::unique_lock<std::mutex> cacheLock( board->m_CachesMutex ); |
|||
|
|||
auto i = board->m_IntersectsBCourtyardCache.find( key ); |
|||
|
|||
if( i != board->m_IntersectsBCourtyardCache.end() ) |
|||
return i->second; |
|||
|
|||
bool res = collidesWithCourtyard( item, itemShape, context, fp, B_Cu ); |
|||
|
|||
board->m_IntersectsBCourtyardCache[ key ] = res; |
|||
return res; |
|||
} ) ) |
|||
{ |
|||
return 1.0; |
|||
} |
|||
|
|||
return 0.0; |
|||
} ); |
|||
} |
|||
|
|||
|
|||
bool collidesWithArea( BOARD_ITEM* aItem, PCB_EXPR_CONTEXT* aCtx, ZONE* aArea ) |
|||
{ |
|||
BOARD* board = aArea->GetBoard(); |
|||
BOX2I areaBBox = aArea->GetBoundingBox(); |
|||
std::shared_ptr<SHAPE> shape; |
|||
|
|||
// Collisions include touching, so we need to deflate outline by enough to exclude it.
|
|||
// This is particularly important for detecting copper fills as they will be exactly
|
|||
// touching along the entire exclusion border.
|
|||
SHAPE_POLY_SET areaOutline = aArea->Outline()->CloneDropTriangulation(); |
|||
areaOutline.Deflate( board->GetDesignSettings().GetDRCEpsilon(), 0, |
|||
SHAPE_POLY_SET::ALLOW_ACUTE_CORNERS ); |
|||
|
|||
if( aItem->GetFlags() & HOLE_PROXY ) |
|||
{ |
|||
if( aItem->Type() == PCB_PAD_T ) |
|||
{ |
|||
return areaOutline.Collide( aItem->GetEffectiveHoleShape().get() ); |
|||
} |
|||
else if( aItem->Type() == PCB_VIA_T ) |
|||
{ |
|||
LSET overlap = aItem->GetLayerSet() & aArea->GetLayerSet(); |
|||
|
|||
/// Avoid buried vias that don't overlap the zone's layers
|
|||
if( overlap.any() ) |
|||
{ |
|||
if( aCtx->GetLayer() == UNDEFINED_LAYER || overlap.Contains( aCtx->GetLayer() ) ) |
|||
return areaOutline.Collide( aItem->GetEffectiveHoleShape().get() ); |
|||
} |
|||
} |
|||
|
|||
return false; |
|||
} |
|||
|
|||
if( aItem->Type() == PCB_FOOTPRINT_T ) |
|||
{ |
|||
FOOTPRINT* footprint = static_cast<FOOTPRINT*>( aItem ); |
|||
|
|||
if( ( footprint->GetFlags() & MALFORMED_COURTYARDS ) != 0 ) |
|||
{ |
|||
if( aCtx->HasErrorCallback() ) |
|||
aCtx->ReportError( _( "Footprint's courtyard is not a single, closed shape." ) ); |
|||
|
|||
return false; |
|||
} |
|||
|
|||
if( ( aArea->GetLayerSet() & LSET::FrontMask() ).any() ) |
|||
{ |
|||
const SHAPE_POLY_SET& courtyard = footprint->GetCourtyard( F_CrtYd ); |
|||
|
|||
if( courtyard.OutlineCount() == 0 ) |
|||
{ |
|||
if( aCtx->HasErrorCallback() ) |
|||
aCtx->ReportError( _( "Footprint has no front courtyard." ) ); |
|||
|
|||
return false; |
|||
} |
|||
else |
|||
{ |
|||
return areaOutline.Collide( &courtyard.Outline( 0 ) ); |
|||
} |
|||
} |
|||
|
|||
if( ( aArea->GetLayerSet() & LSET::BackMask() ).any() ) |
|||
{ |
|||
const SHAPE_POLY_SET& courtyard = footprint->GetCourtyard( B_CrtYd ); |
|||
|
|||
if( courtyard.OutlineCount() == 0 ) |
|||
{ |
|||
if( aCtx->HasErrorCallback() ) |
|||
aCtx->ReportError( _( "Footprint has no back courtyard." ) ); |
|||
|
|||
return false; |
|||
} |
|||
else |
|||
{ |
|||
return areaOutline.Collide( &courtyard.Outline( 0 ) ); |
|||
} |
|||
} |
|||
|
|||
return false; |
|||
} |
|||
|
|||
if( aItem->Type() == PCB_ZONE_T || aItem->Type() == PCB_FP_ZONE_T ) |
|||
{ |
|||
ZONE* zone = static_cast<ZONE*>( aItem ); |
|||
|
|||
if( !zone->IsFilled() ) |
|||
return false; |
|||
|
|||
DRC_RTREE* zoneRTree = board->m_CopperZoneRTreeCache[ zone ].get(); |
|||
|
|||
if( zoneRTree ) |
|||
{ |
|||
for( PCB_LAYER_ID layer : aArea->GetLayerSet().Seq() ) |
|||
{ |
|||
if( aCtx->GetLayer() == layer || aCtx->GetLayer() == UNDEFINED_LAYER ) |
|||
{ |
|||
if( zoneRTree->QueryColliding( areaBBox, &areaOutline, layer ) ) |
|||
return true; |
|||
} |
|||
} |
|||
} |
|||
|
|||
return false; |
|||
} |
|||
else |
|||
{ |
|||
PCB_LAYER_ID layer = aCtx->GetLayer(); |
|||
|
|||
if( layer != UNDEFINED_LAYER && !( aArea->GetLayerSet().Contains( layer ) ) ) |
|||
return false; |
|||
|
|||
if( !shape ) |
|||
shape = aItem->GetEffectiveShape( layer ); |
|||
|
|||
return areaOutline.Collide( shape.get() ); |
|||
} |
|||
} |
|||
|
|||
|
|||
bool searchAreas( BOARD* aBoard, const wxString& aArg, PCB_EXPR_CONTEXT* aCtx, |
|||
std::function<bool( ZONE* )> aFunc ) |
|||
{ |
|||
if( aArg == wxT( "A" ) ) |
|||
{ |
|||
return aFunc( dynamic_cast<ZONE*>( aCtx->GetItem( 0 ) ) ); |
|||
} |
|||
else if( aArg == wxT( "B" ) ) |
|||
{ |
|||
return aFunc( dynamic_cast<ZONE*>( aCtx->GetItem( 1 ) ) ); |
|||
} |
|||
else if( KIID::SniffTest( aArg ) ) |
|||
{ |
|||
KIID target( aArg ); |
|||
|
|||
for( ZONE* area : aBoard->Zones() ) |
|||
{ |
|||
// Only a single zone can match the UUID; exit once we find a match whether
|
|||
// "inside" or not
|
|||
if( area->m_Uuid == target ) |
|||
return aFunc( area ); |
|||
} |
|||
|
|||
for( FOOTPRINT* footprint : aBoard->Footprints() ) |
|||
{ |
|||
for( ZONE* area : footprint->Zones() ) |
|||
{ |
|||
// Only a single zone can match the UUID; exit once we find a match
|
|||
// whether "inside" or not
|
|||
if( area->m_Uuid == target ) |
|||
return aFunc( area ); |
|||
} |
|||
} |
|||
|
|||
return 0.0; |
|||
} |
|||
else // Match on zone name
|
|||
{ |
|||
for( ZONE* area : aBoard->Zones() ) |
|||
{ |
|||
if( area->GetZoneName().Matches( aArg ) ) |
|||
{ |
|||
// Many zones can match the name; exit only when we find an "inside"
|
|||
if( aFunc( area ) ) |
|||
return true; |
|||
} |
|||
} |
|||
|
|||
for( FOOTPRINT* footprint : aBoard->Footprints() ) |
|||
{ |
|||
for( ZONE* area : footprint->Zones() ) |
|||
{ |
|||
// Many zones can match the name; exit only when we find an "inside"
|
|||
if( area->GetZoneName().Matches( aArg ) ) |
|||
{ |
|||
if( aFunc( area ) ) |
|||
return true; |
|||
} |
|||
} |
|||
} |
|||
|
|||
return false; |
|||
} |
|||
} |
|||
|
|||
|
|||
#define MISSING_AREA_ARG( f ) \
|
|||
wxString::Format( _( "Missing rule-area argument (A, B, or rule-area name) to %s." ), f ) |
|||
|
|||
static void intersectsAreaFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
PCB_EXPR_CONTEXT* context = static_cast<PCB_EXPR_CONTEXT*>( aCtx ); |
|||
LIBEVAL::VALUE* arg = aCtx->Pop(); |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
aCtx->Push( result ); |
|||
|
|||
if( !arg ) |
|||
{ |
|||
if( aCtx->HasErrorCallback() ) |
|||
aCtx->ReportError( MISSING_AREA_ARG( wxT( "intersectsArea()" ) ) ); |
|||
|
|||
return; |
|||
} |
|||
|
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( context ) : nullptr; |
|||
|
|||
if( !item ) |
|||
return; |
|||
|
|||
result->SetDeferredEval( |
|||
[item, arg, context]() -> double |
|||
{ |
|||
BOARD* board = item->GetBoard(); |
|||
PCB_LAYER_ID layer = context->GetLayer(); |
|||
BOX2I itemBBox = item->GetBoundingBox(); |
|||
|
|||
if( searchAreas( board, arg->AsString(), context, |
|||
[&]( ZONE* aArea ) |
|||
{ |
|||
if( !aArea || aArea == item || aArea->GetParent() == item ) |
|||
return false; |
|||
|
|||
if( !( aArea->GetLayerSet() & item->GetLayerSet() ).any() ) |
|||
return false; |
|||
|
|||
if( !aArea->GetBoundingBox().Intersects( itemBBox ) ) |
|||
return false; |
|||
|
|||
std::unique_lock<std::mutex> cacheLock( board->m_CachesMutex ); |
|||
PTR_PTR_LAYER_CACHE_KEY key = { aArea, item, layer }; |
|||
|
|||
auto i = board->m_IntersectsAreaCache.find( key ); |
|||
|
|||
if( i != board->m_IntersectsAreaCache.end() ) |
|||
return i->second; |
|||
|
|||
bool collides = collidesWithArea( item, context, aArea ); |
|||
|
|||
board->m_IntersectsAreaCache[ key ] = collides; |
|||
|
|||
return collides; |
|||
} ) ) |
|||
{ |
|||
return 1.0; |
|||
} |
|||
|
|||
return 0.0; |
|||
} ); |
|||
} |
|||
|
|||
|
|||
static void enclosedByAreaFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
PCB_EXPR_CONTEXT* context = static_cast<PCB_EXPR_CONTEXT*>( aCtx ); |
|||
LIBEVAL::VALUE* arg = aCtx->Pop(); |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
aCtx->Push( result ); |
|||
|
|||
if( !arg ) |
|||
{ |
|||
if( aCtx->HasErrorCallback() ) |
|||
aCtx->ReportError( MISSING_AREA_ARG( wxT( "enclosedByArea()" ) ) ); |
|||
|
|||
return; |
|||
} |
|||
|
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( context ) : nullptr; |
|||
|
|||
if( !item ) |
|||
return; |
|||
|
|||
result->SetDeferredEval( |
|||
[item, arg, context]() -> double |
|||
{ |
|||
BOARD* board = item->GetBoard(); |
|||
int maxError = board->GetDesignSettings().m_MaxError; |
|||
PCB_LAYER_ID layer = context->GetLayer(); |
|||
BOX2I itemBBox = item->GetBoundingBox(); |
|||
|
|||
if( searchAreas( board, arg->AsString(), context, |
|||
[&]( ZONE* aArea ) |
|||
{ |
|||
if( !aArea || aArea == item || aArea->GetParent() == item ) |
|||
return false; |
|||
|
|||
if( !( aArea->GetLayerSet() & item->GetLayerSet() ).any() ) |
|||
return false; |
|||
|
|||
if( !aArea->GetBoundingBox().Intersects( itemBBox ) ) |
|||
return false; |
|||
|
|||
std::unique_lock<std::mutex> cacheLock( board->m_CachesMutex ); |
|||
PTR_PTR_LAYER_CACHE_KEY key = { aArea, item, layer }; |
|||
|
|||
auto i = board->m_EnclosedByAreaCache.find( key ); |
|||
|
|||
if( i != board->m_EnclosedByAreaCache.end() ) |
|||
return i->second; |
|||
|
|||
SHAPE_POLY_SET itemShape; |
|||
bool enclosedByArea; |
|||
|
|||
item->TransformShapeToPolygon( itemShape, layer, 0, maxError, |
|||
ERROR_OUTSIDE ); |
|||
|
|||
if( itemShape.IsEmpty() ) |
|||
{ |
|||
// If it's already empty then our test will have no meaning.
|
|||
enclosedByArea = false; |
|||
} |
|||
else |
|||
{ |
|||
itemShape.BooleanSubtract( *aArea->Outline(), |
|||
SHAPE_POLY_SET::PM_FAST ); |
|||
|
|||
enclosedByArea = itemShape.IsEmpty(); |
|||
} |
|||
|
|||
board->m_EnclosedByAreaCache[ key ] = enclosedByArea; |
|||
|
|||
return enclosedByArea; |
|||
} ) ) |
|||
{ |
|||
return 1.0; |
|||
} |
|||
|
|||
return 0.0; |
|||
} ); |
|||
} |
|||
|
|||
|
|||
#define MISSING_GROUP_ARG( f ) \
|
|||
wxString::Format( _( "Missing group name argument to %s." ), f ) |
|||
|
|||
static void memberOfFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
LIBEVAL::VALUE* arg = aCtx->Pop(); |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
aCtx->Push( result ); |
|||
|
|||
if( !arg ) |
|||
{ |
|||
if( aCtx->HasErrorCallback() ) |
|||
aCtx->ReportError( MISSING_GROUP_ARG( wxT( "memberOf()" ) ) ); |
|||
|
|||
return; |
|||
} |
|||
|
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( aCtx ) : nullptr; |
|||
|
|||
if( !item ) |
|||
return; |
|||
|
|||
result->SetDeferredEval( |
|||
[item, arg]() -> double |
|||
{ |
|||
PCB_GROUP* group = item->GetParentGroup(); |
|||
|
|||
if( !group && item->GetParent() && item->GetParent()->Type() == PCB_FOOTPRINT_T ) |
|||
group = item->GetParent()->GetParentGroup(); |
|||
|
|||
while( group ) |
|||
{ |
|||
if( group->GetName().Matches( arg->AsString() ) ) |
|||
return 1.0; |
|||
|
|||
group = group->GetParentGroup(); |
|||
} |
|||
|
|||
return 0.0; |
|||
} ); |
|||
} |
|||
|
|||
|
|||
static void isMicroVia( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( aCtx ) : nullptr; |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
aCtx->Push( result ); |
|||
|
|||
PCB_VIA* via = dyn_cast<PCB_VIA*>( item ); |
|||
|
|||
if( via && via->GetViaType() == VIATYPE::MICROVIA ) |
|||
result->Set ( 1.0 ); |
|||
} |
|||
|
|||
|
|||
static void isBlindBuriedViaFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( aCtx ) : nullptr; |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
aCtx->Push( result ); |
|||
|
|||
PCB_VIA* via = dyn_cast<PCB_VIA*>( item ); |
|||
|
|||
if( via && via->GetViaType() == VIATYPE::BLIND_BURIED ) |
|||
result->Set ( 1.0 ); |
|||
} |
|||
|
|||
|
|||
static void isCoupledDiffPairFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
PCB_EXPR_CONTEXT* context = static_cast<PCB_EXPR_CONTEXT*>( aCtx ); |
|||
BOARD_CONNECTED_ITEM* a = dynamic_cast<BOARD_CONNECTED_ITEM*>( context->GetItem( 0 ) ); |
|||
BOARD_CONNECTED_ITEM* b = dynamic_cast<BOARD_CONNECTED_ITEM*>( context->GetItem( 1 ) ); |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
aCtx->Push( result ); |
|||
|
|||
result->SetDeferredEval( |
|||
[a, b, context]() -> double |
|||
{ |
|||
NETINFO_ITEM* netinfo = a ? a->GetNet() : nullptr; |
|||
|
|||
if( !netinfo ) |
|||
return 0.0; |
|||
|
|||
wxString coupledNet; |
|||
wxString dummy; |
|||
|
|||
if( !DRC_ENGINE::MatchDpSuffix( netinfo->GetNetname(), coupledNet, dummy ) ) |
|||
return 0.0; |
|||
|
|||
if( context->GetConstraint() == DRC_CONSTRAINT_T::LENGTH_CONSTRAINT |
|||
|| context->GetConstraint() == DRC_CONSTRAINT_T::SKEW_CONSTRAINT ) |
|||
{ |
|||
// DRC engine evaluates these singly, so we won't have a B item
|
|||
return 1.0; |
|||
} |
|||
|
|||
return b && b->GetNetname() == coupledNet; |
|||
} ); |
|||
} |
|||
|
|||
|
|||
#define MISSING_DP_ARG( f ) \
|
|||
wxString::Format( _( "Missing diff-pair name argument to %s." ), f ) |
|||
|
|||
static void inDiffPairFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
LIBEVAL::VALUE* argv = aCtx->Pop(); |
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( aCtx ) : nullptr; |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
result->Set( 0.0 ); |
|||
aCtx->Push( result ); |
|||
|
|||
if( !argv ) |
|||
{ |
|||
if( aCtx->HasErrorCallback() ) |
|||
aCtx->ReportError( MISSING_DP_ARG( wxT( "inDiffPair()" ) ) ); |
|||
|
|||
return; |
|||
} |
|||
|
|||
if( !item || !item->GetBoard() ) |
|||
return; |
|||
|
|||
result->SetDeferredEval( |
|||
[item, argv]() -> double |
|||
{ |
|||
if( item && item->IsConnected() ) |
|||
{ |
|||
NETINFO_ITEM* netinfo = static_cast<BOARD_CONNECTED_ITEM*>( item )->GetNet(); |
|||
|
|||
wxString refName = netinfo->GetNetname(); |
|||
wxString arg = argv->AsString(); |
|||
wxString baseName, coupledNet; |
|||
int polarity = DRC_ENGINE::MatchDpSuffix( refName, coupledNet, baseName ); |
|||
|
|||
if( polarity != 0 && item->GetBoard()->FindNet( coupledNet ) ) |
|||
{ |
|||
if( baseName.Matches( arg ) ) |
|||
return 1.0; |
|||
|
|||
if( baseName.EndsWith( "_" ) && baseName.BeforeLast( '_' ).Matches( arg ) ) |
|||
return 1.0; |
|||
} |
|||
} |
|||
|
|||
return 0.0; |
|||
} ); |
|||
} |
|||
|
|||
|
|||
static void getFieldFunc( LIBEVAL::CONTEXT* aCtx, void* self ) |
|||
{ |
|||
LIBEVAL::VALUE* arg = aCtx->Pop(); |
|||
PCB_EXPR_VAR_REF* vref = static_cast<PCB_EXPR_VAR_REF*>( self ); |
|||
BOARD_ITEM* item = vref ? vref->GetObject( aCtx ) : nullptr; |
|||
LIBEVAL::VALUE* result = aCtx->AllocValue(); |
|||
|
|||
result->Set( "" ); |
|||
aCtx->Push( result ); |
|||
|
|||
if( !arg ) |
|||
{ |
|||
if( aCtx->HasErrorCallback() ) |
|||
{ |
|||
aCtx->ReportError( wxString::Format( _( "Missing field name argument to %s." ), |
|||
wxT( "getField()" ) ) ); |
|||
} |
|||
|
|||
return; |
|||
} |
|||
|
|||
if( !item || !item->GetBoard() ) |
|||
return; |
|||
|
|||
result->SetDeferredEval( |
|||
[item, arg]() -> wxString |
|||
{ |
|||
if( item && item->Type() == PCB_FOOTPRINT_T ) |
|||
{ |
|||
FOOTPRINT* fp = static_cast<FOOTPRINT*>( item ); |
|||
|
|||
if( fp->HasProperty( arg->AsString() ) ) |
|||
return fp->GetProperty( arg->AsString() ); |
|||
} |
|||
|
|||
return ""; |
|||
} ); |
|||
} |
|||
|
|||
|
|||
PCB_EXPR_BUILTIN_FUNCTIONS::PCB_EXPR_BUILTIN_FUNCTIONS() |
|||
{ |
|||
RegisterAllFunctions(); |
|||
} |
|||
|
|||
|
|||
void PCB_EXPR_BUILTIN_FUNCTIONS::RegisterAllFunctions() |
|||
{ |
|||
m_funcs.clear(); |
|||
|
|||
RegisterFunc( wxT( "existsOnLayer('x')" ), existsOnLayerFunc ); |
|||
|
|||
RegisterFunc( wxT( "isPlated()" ), isPlatedFunc ); |
|||
|
|||
RegisterFunc( wxT( "insideCourtyard('x') DEPRECATED" ), intersectsCourtyardFunc ); |
|||
RegisterFunc( wxT( "insideFrontCourtyard('x') DEPRECATED" ), intersectsFrontCourtyardFunc ); |
|||
RegisterFunc( wxT( "insideBackCourtyard('x') DEPRECATED" ), intersectsBackCourtyardFunc ); |
|||
RegisterFunc( wxT( "intersectsCourtyard('x')" ), intersectsCourtyardFunc ); |
|||
RegisterFunc( wxT( "intersectsFrontCourtyard('x')" ), intersectsFrontCourtyardFunc ); |
|||
RegisterFunc( wxT( "intersectsBackCourtyard('x')" ), intersectsBackCourtyardFunc ); |
|||
|
|||
RegisterFunc( wxT( "insideArea('x') DEPRECATED" ), intersectsAreaFunc ); |
|||
RegisterFunc( wxT( "intersectsArea('x')" ), intersectsAreaFunc ); |
|||
RegisterFunc( wxT( "enclosedByArea('x')" ), enclosedByAreaFunc ); |
|||
|
|||
RegisterFunc( wxT( "isMicroVia()" ), isMicroVia ); |
|||
RegisterFunc( wxT( "isBlindBuriedVia()" ), isBlindBuriedViaFunc ); |
|||
|
|||
RegisterFunc( wxT( "memberOf('x')" ), memberOfFunc ); |
|||
|
|||
RegisterFunc( wxT( "fromTo('x','y')" ), fromToFunc ); |
|||
RegisterFunc( wxT( "isCoupledDiffPair()" ), isCoupledDiffPairFunc ); |
|||
RegisterFunc( wxT( "inDiffPair('x')" ), inDiffPairFunc ); |
|||
|
|||
RegisterFunc( wxT( "getField('x')" ), getFieldFunc ); |
|||
} |
|||
|
|||
|
Write
Preview
Loading…
Cancel
Save
Reference in new issue