int
mptl_pin_callback (const BoxType *b, void *cl)
{
struct mptlc *d = (struct mptlc *) cl;
PinTypePtr pin = (PinTypePtr) b;
if (!TEST_THERM (d->snum, pin) || !
IsPointInPolygon (pin->X, pin->Y, pin->Thickness + pin->Clearance + 2,
d->polygon))
return 0;
if (d->type == PIN_TYPE)
AddObjectToFlagUndoList (PIN_TYPE, pin->Element, pin, pin);
else
AddObjectToFlagUndoList (VIA_TYPE, pin, pin, pin);
ASSIGN_THERM (d->dnum, GET_THERM (d->snum, pin), pin);
CLEAR_THERM (d->snum, pin);
return 1;
}
/* ---------------------------------------------------------------------------
* flip components/tracks from one side to the other
*/
static void
SwapBuffer (BufferType *Buffer)
{
int j, k;
Cardinal sgroup, cgroup;
LayerType swap;
ELEMENT_LOOP (Buffer->Data);
{
r_delete_element (Buffer->Data, element);
MirrorElementCoordinates (Buffer->Data, element, 0);
}
END_LOOP;
/* set buffer offset to 'mark' position */
Buffer->X = SWAP_X (Buffer->X);
Buffer->Y = SWAP_Y (Buffer->Y);
VIA_LOOP (Buffer->Data);
{
r_delete_entry (Buffer->Data->via_tree, (BoxType *)via);
via->X = SWAP_X (via->X);
via->Y = SWAP_Y (via->Y);
SetPinBoundingBox (via);
r_insert_entry (Buffer->Data->via_tree, (BoxType *)via, 0);
}
END_LOOP;
ALLLINE_LOOP (Buffer->Data);
{
r_delete_entry (layer->line_tree, (BoxType *)line);
line->Point1.X = SWAP_X (line->Point1.X);
line->Point1.Y = SWAP_Y (line->Point1.Y);
line->Point2.X = SWAP_X (line->Point2.X);
line->Point2.Y = SWAP_Y (line->Point2.Y);
SetLineBoundingBox (line);
r_insert_entry (layer->line_tree, (BoxType *)line, 0);
}
ENDALL_LOOP;
ALLARC_LOOP (Buffer->Data);
{
r_delete_entry (layer->arc_tree, (BoxType *)arc);
arc->X = SWAP_X (arc->X);
arc->Y = SWAP_Y (arc->Y);
arc->StartAngle = SWAP_ANGLE (arc->StartAngle);
arc->Delta = SWAP_DELTA (arc->Delta);
SetArcBoundingBox (arc);
r_insert_entry (layer->arc_tree, (BoxType *)arc, 0);
}
ENDALL_LOOP;
ALLPOLYGON_LOOP (Buffer->Data);
{
r_delete_entry (layer->polygon_tree, (BoxType *)polygon);
POLYGONPOINT_LOOP (polygon);
{
point->X = SWAP_X (point->X);
point->Y = SWAP_Y (point->Y);
}
END_LOOP;
SetPolygonBoundingBox (polygon);
r_insert_entry (layer->polygon_tree, (BoxType *)polygon, 0);
/* hmmm, how to handle clip */
}
ENDALL_LOOP;
ALLTEXT_LOOP (Buffer->Data);
{
r_delete_entry (layer->text_tree, (BoxType *)text);
text->X = SWAP_X (text->X);
text->Y = SWAP_Y (text->Y);
TOGGLE_FLAG (ONSOLDERFLAG, text);
SetTextBoundingBox (&PCB->Font, text);
r_insert_entry (layer->text_tree, (BoxType *)text, 0);
}
ENDALL_LOOP;
/* swap silkscreen layers */
swap = Buffer->Data->Layer[solder_silk_layer];
Buffer->Data->Layer[solder_silk_layer] =
Buffer->Data->Layer[component_silk_layer];
Buffer->Data->Layer[component_silk_layer] = swap;
/* swap layer groups when balanced */
sgroup = GetLayerGroupNumberByNumber (solder_silk_layer);
cgroup = GetLayerGroupNumberByNumber (component_silk_layer);
if (PCB->LayerGroups.Number[cgroup] == PCB->LayerGroups.Number[sgroup])
{
for (j = k = 0; j < PCB->LayerGroups.Number[sgroup]; j++)
{
int t1, t2;
Cardinal cnumber = PCB->LayerGroups.Entries[cgroup][k];
Cardinal snumber = PCB->LayerGroups.Entries[sgroup][j];
if (snumber >= max_copper_layer)
continue;
swap = Buffer->Data->Layer[snumber];
while (cnumber >= max_copper_layer)
{
k++;
cnumber = PCB->LayerGroups.Entries[cgroup][k];
}
Buffer->Data->Layer[snumber] = Buffer->Data->Layer[cnumber];
Buffer->Data->Layer[cnumber] = swap;
k++;
/* move the thermal flags with the layers */
ALLPIN_LOOP (Buffer->Data);
{
t1 = TEST_THERM (snumber, pin);
t2 = TEST_THERM (cnumber, pin);
ASSIGN_THERM (snumber, t2, pin);
ASSIGN_THERM (cnumber, t1, pin);
}
ENDALL_LOOP;
VIA_LOOP (Buffer->Data);
{
t1 = TEST_THERM (snumber, via);
t2 = TEST_THERM (cnumber, via);
ASSIGN_THERM (snumber, t2, via);
ASSIGN_THERM (cnumber, t1, via);
}
END_LOOP;
}
}
SetBufferBoundingBox (Buffer);
SetCrosshairRangeToBuffer ();
}
static char *
common_flags_to_string (FlagType flags,
int object_type,
FlagBitsType *flagbits,
int n_flagbits)
{
int len;
int i;
FlagHolder fh, savef;
char *buf, *bp;
fh.Flags = flags;
#ifndef FLAG_TEST
switch (object_type)
{
case VIA_TYPE:
CLEAR_FLAG (VIAFLAG, &fh);
break;
case RATLINE_TYPE:
CLEAR_FLAG (RATFLAG, &fh);
break;
case PIN_TYPE:
CLEAR_FLAG (PINFLAG, &fh);
break;
}
#endif
savef = fh;
len = 3; /* for "()\0" */
for (i = 0; i < n_flagbits; i++)
if ((flagbits[i].object_types & object_type)
&& (TEST_FLAG (flagbits[i].mask, &fh)))
{
len += flagbits[i].nlen + 1;
CLEAR_FLAG (flagbits[i].mask, &fh);
}
if (TEST_ANY_THERMS (&fh))
{
len += sizeof ("thermal()");
for (i = 0; i < MAX_LAYER; i++)
if (TEST_THERM (i, &fh))
len += printed_int_length (i, GET_THERM (i, &fh)) + 1;
}
bp = buf = alloc_buf (len + 2);
*bp++ = '"';
fh = savef;
for (i = 0; i < n_flagbits; i++)
if (flagbits[i].object_types & object_type
&& (TEST_FLAG (flagbits[i].mask, &fh)))
{
if (bp != buf + 1)
*bp++ = ',';
strcpy (bp, flagbits[i].name);
bp += flagbits[i].nlen;
CLEAR_FLAG (flagbits[i].mask, &fh);
}
if (TEST_ANY_THERMS (&fh))
{
if (bp != buf + 1)
*bp++ = ',';
strcpy (bp, "thermal");
bp += strlen ("thermal");
grow_layer_list (0);
for (i = 0; i < MAX_LAYER; i++)
if (TEST_THERM (i, &fh))
set_layer_list (i, GET_THERM (i, &fh));
strcpy (bp, print_layer_list ());
bp += strlen (bp);
}
*bp++ = '"';
*bp = 0;
return buf;
}
static char *
common_flags_to_string (FlagType flags,
int object_type,
FlagBitsType *flagbits,
int n_flagbits)
{
int len;
int i;
FlagHolder fh, savef;
char *buf, *bp;
unknown_flag_t *u;
fh.Flags = flags;
#ifndef FLAG_TEST
switch (object_type)
{
case VIA_TYPE:
CLEAR_FLAG (VIAFLAG, &fh);
break;
case RATLINE_TYPE:
CLEAR_FLAG (RATFLAG, &fh);
break;
case PIN_TYPE:
CLEAR_FLAG (PINFLAG, &fh);
break;
}
#endif
savef = fh;
len = 3; /* for "()\0" */
for (i = 0; i < n_flagbits; i++)
if ((flagbits[i].object_types & object_type)
&& (TEST_FLAG (flagbits[i].mask, &fh)))
{
len += flagbits[i].nlen + 1;
CLEAR_FLAG (flagbits[i].mask, &fh);
}
if (TEST_ANY_THERMS (&fh))
{
len += sizeof ("thermal()");
for (i = 0; i < MAX_LAYER; i++)
if (TEST_THERM (i, &fh))
len += printed_int_length (i, GET_THERM (i, &fh)) + 1;
}
if (flags.q > 0)
{
len += sizeof ("shape(.)");
if (flags.q > 9)
len+=2;
}
if (flags.int_conn_grp > 0)
{
len += sizeof ("intconn(.)");
if (flags.q > 9)
len++;
if (flags.q > 99)
len++;
}
for(u = flags.unknowns; u != NULL; u = u->next)
len += strlen(u->str)+1;
bp = buf = alloc_buf (len + 2);
*bp++ = '"';
fh = savef;
for (i = 0; i < n_flagbits; i++)
if (flagbits[i].object_types & object_type
&& (TEST_FLAG (flagbits[i].mask, &fh)))
{
if (bp != buf + 1)
*bp++ = ',';
strcpy (bp, flagbits[i].name);
bp += flagbits[i].nlen;
CLEAR_FLAG (flagbits[i].mask, &fh);
}
if (TEST_ANY_THERMS (&fh))
{
if (bp != buf + 1)
*bp++ = ',';
strcpy (bp, "thermal");
bp += strlen ("thermal");
grow_layer_list (0);
for (i = 0; i < MAX_LAYER; i++)
if (TEST_THERM (i, &fh))
set_layer_list (i, GET_THERM (i, &fh));
strcpy (bp, print_layer_list ());
bp += strlen (bp);
}
if (flags.q > 0)
{
if (bp != buf + 1)
*bp++ = ',';
bp += sprintf(bp, "shape(%d)", flags.q);
}
if (flags.int_conn_grp > 0)
{
if (bp != buf + 1)
*bp++ = ',';
bp += sprintf(bp, "intconn(%d)", flags.int_conn_grp);
}
for(u = flags.unknowns; u != NULL; u = u->next) {
int len;
len = strlen(u->str);
if (bp != buf + 1)
*bp++ = ',';
memcpy(bp, u->str, len);
bp += len;
}
*bp++ = '"';
*bp = 0;
return buf;
}
