/* ---------------------------------------------------------------------------
* moves a line between layers
*/
static void *
MoveRatToLayer (RatType *Rat)
{
LineTypePtr newone;
//Coord X1 = Rat->Point1.X, Y1 = Rat->Point1.Y;
//Coord X1 = Rat->Point1.X, Y1 = Rat->Point1.Y;
// if VIAFLAG
// if we're on a pin, add a thermal
// else make a via and a wire, but 0-length wire not good
// else as before
newone = CreateNewLineOnLayer (Dest, Rat->Point1.X, Rat->Point1.Y,
Rat->Point2.X, Rat->Point2.Y,
Settings.LineThickness, 2 * Settings.Keepaway,
Rat->Flags);
if (TEST_FLAG (CLEARNEWFLAG, PCB))
SET_FLAG (CLEARLINEFLAG, newone);
if (!newone)
return (NULL);
AddObjectToCreateUndoList (LINE_TYPE, Dest, newone, newone);
if (PCB->RatOn)
EraseRat (Rat);
MoveObjectToRemoveUndoList (RATLINE_TYPE, Rat, Rat, Rat);
DrawLine (Dest, newone);
Draw ();
return (newone);
}
/* ---------------------------------------------------------------------------
* inserts a point into a rat-line
*/
static void *
InsertPointIntoRat (RatTypePtr Rat)
{
LineTypePtr newone;
newone = CreateDrawnLineOnLayer (CURRENT, Rat->Point1.X, Rat->Point1.Y,
InsertX, InsertY, Settings.LineThickness,
2 * Settings.Keepaway, Rat->Flags);
if (!newone)
return newone;
AddObjectToCreateUndoList (LINE_TYPE, CURRENT, newone, newone);
EraseRat (Rat);
DrawLine (CURRENT, newone, 0);
newone = CreateDrawnLineOnLayer (CURRENT, Rat->Point2.X, Rat->Point2.Y,
InsertX, InsertY, Settings.LineThickness,
2 * Settings.Keepaway, Rat->Flags);
if (newone)
{
AddObjectToCreateUndoList (LINE_TYPE, CURRENT, newone, newone);
DrawLine (CURRENT, newone, 0);
}
MoveObjectToRemoveUndoList (RATLINE_TYPE, Rat, Rat, Rat);
Draw ();
return (newone);
}
/*!
* \brief Creates a new line on a layer and checks for overlap and
* extension.
*/
LineType *
CreateDrawnLineOnLayer (LayerType *Layer,
Coord X1, Coord Y1,
Coord X2, Coord Y2,
Coord Thickness, Coord Clearance,
FlagType Flags)
{
struct line_info info;
BoxType search;
search.X1 = MIN (X1, X2);
search.X2 = MAX (X1, X2);
search.Y1 = MIN (Y1, Y2);
search.Y2 = MAX (Y1, Y2);
if (search.Y2 == search.Y1)
search.Y2++;
if (search.X2 == search.X1)
search.X2++;
info.X1 = X1;
info.X2 = X2;
info.Y1 = Y1;
info.Y2 = Y2;
info.Thickness = Thickness;
info.Clearance = Clearance;
info.Flags = Flags;
info.test.Thickness = 0;
info.test.Flags = NoFlags ();
info.ans = NULL;
/* prevent stacking of duplicate lines
* and remove needless intermediate points
* verify that the layer is on the board first!
*/
if (setjmp (info.env) == 0)
{
r_search (Layer->line_tree, &search, NULL, line_callback, &info);
return CreateNewLineOnLayer (Layer, X1, Y1, X2, Y2,
Thickness, Clearance, Flags);
}
if ((void *) info.ans == (void *) (-1))
return NULL; /* stacked line */
/* remove unnecessary points */
if (info.ans)
{
/* must do this BEFORE getting new line memory */
MoveObjectToRemoveUndoList (LINE_TYPE, Layer, info.ans, info.ans);
X1 = info.test.Point1.X;
X2 = info.test.Point2.X;
Y1 = info.test.Point1.Y;
Y2 = info.test.Point2.Y;
}
return CreateNewLineOnLayer (Layer, X1, Y1, X2, Y2,
Thickness, Clearance, Flags);
}
/* ---------------------------------------------------------------------------
* removes a text from a layer
*/
void *
RemoveText (LayerTypePtr Layer, TextTypePtr Text)
{
/* erase from screen */
if (Layer->On)
{
EraseText (Layer, Text);
if (!Bulk)
Draw ();
}
MoveObjectToRemoveUndoList (TEXT_TYPE, Layer, Text, Text);
return NULL;
}
/* ---------------------------------------------------------------------------
* removes a polygon from a layer
*/
void *
RemovePolygon (LayerTypePtr Layer, PolygonTypePtr Polygon)
{
/* erase from screen */
if (Layer->On)
{
ErasePolygon (Polygon);
if (!Bulk)
Draw ();
}
MoveObjectToRemoveUndoList (POLYGON_TYPE, Layer, Polygon, Polygon);
return NULL;
}
/* ---------------------------------------------------------------------------
* removes an arc from a layer
*/
void *
RemoveArc (LayerTypePtr Layer, ArcTypePtr Arc)
{
/* erase from screen */
if (Layer->On)
{
EraseArc (Arc);
if (!Bulk)
Draw ();
}
MoveObjectToRemoveUndoList (ARC_TYPE, Layer, Arc, Arc);
return NULL;
}
/* ---------------------------------------------------------------------------
* removes a line from a layer
*/
void *
RemoveLine (LayerTypePtr Layer, LineTypePtr Line)
{
/* erase from screen */
if (Layer->On)
{
EraseLine (Line);
if (!Bulk)
Draw ();
}
MoveObjectToRemoveUndoList (LINE_TYPE, Layer, Line, Line);
return NULL;
}
/* ---------------------------------------------------------------------------
* removes a rat
*/
static void *
RemoveRat (RatTypePtr Rat)
{
/* erase from screen and memory */
if (PCB->RatOn)
{
EraseRat (Rat);
if (!Bulk)
Draw ();
}
MoveObjectToRemoveUndoList (RATLINE_TYPE, Rat, Rat, Rat);
return NULL;
}
/* ---------------------------------------------------------------------------
* removes a via
*/
static void *
RemoveVia (PinTypePtr Via)
{
/* erase from screen and memory */
if (PCB->ViaOn)
{
EraseVia (Via);
if (!Bulk)
Draw ();
}
MoveObjectToRemoveUndoList (VIA_TYPE, Via, Via, Via);
return NULL;
}
static void
replace_one_footprint_aux(ElementTypePtr old_element,
PadOrPinType* old1_pp, PadOrPinType* old2_pp,
ElementTypePtr copy_element,
PadOrPinType* copy1_pp, PadOrPinType* copy2_pp)
{
Boolean two_points = (old2_pp && copy2_pp);
Boolean reflect = IS_REFLECTED(copy_element, old_element);
debug_log("Reflect?: %s\n", (reflect ? "yes" : "no"));
if (reflect) {
/* Change side of board */
ChangeElementSide(copy_element, 0);
}
CheapPointType copy1_pt = pad_or_pin_center(copy1_pp);
CheapPointType old1_pt = pad_or_pin_center(old1_pp);
BYTE rot_steps = 0;
if (two_points) {
/* Calculate nearest rotation steps */
CheapPointType copy2_pt = pad_or_pin_center(copy2_pp);
CheapPointType old2_pt = pad_or_pin_center(old2_pp);
rot_steps =
calculate_rotation_steps(copy1_pt, copy2_pt, old1_pt, old2_pt);
}
if (rot_steps) {
/* Rotate copy */
RotateElementLowLevel(PCB->Data, copy_element, 0, 0, rot_steps);
/* Recalculate since copy_element has changed. */
copy1_pt = pad_or_pin_center(copy1_pp);
}
/* Calculate translation */
LocationType dx = old1_pt.X - copy1_pt.X;
LocationType dy = old1_pt.Y - copy1_pt.Y;
/* Move element */
MoveElementLowLevel(PCB->Data, copy_element, dx, dy);
/* Transfer pad/pin text and names. */
transfer_text(old_element, copy_element);
transfer_names(old_element, copy_element);
transfer_flags(old_element, copy_element);
SetElementBoundingBox(PCB->Data, copy_element, &PCB->Font);
AddObjectToCreateUndoList(ELEMENT_TYPE,
copy_element, copy_element, copy_element);
/* Remove old element. */
MoveObjectToRemoveUndoList(ELEMENT_TYPE,
old_element, old_element, old_element);
}
/* ---------------------------------------------------------------------------
* removes an element
*/
void *
RemoveElement (ElementTypePtr Element)
{
/* erase from screen */
if ((PCB->ElementOn || PCB->PinOn) &&
(FRONT (Element) || PCB->InvisibleObjectsOn))
{
EraseElement (Element);
if (!Bulk)
Draw ();
}
MoveObjectToRemoveUndoList (ELEMENT_TYPE, Element, Element, Element);
return NULL;
}
/*!
* \brief Removes a text from a layer.
*/
void *
RemoveText (LayerType *Layer, TextType *Text)
{
/* erase from screen */
if (Layer->On)
{
EraseText (Layer, Text);
r_delete_entry (Layer->text_tree, (BoxType *) Text);
if (!Bulk)
Draw ();
}
MoveObjectToRemoveUndoList (TEXT_TYPE, Layer, Text, Text);
return NULL;
}