| blob | 69f38a1f1e889dda29ee1c3a55f9cd7f237f94e4 |
1 /*!
2 * \file src/action.c
3 *
4 * \brief Action routines for output window.
5 *
6 * <hr>
7 *
8 * <h1><b>Copyright.</b></h1>\n
9 *
10 * PCB, interactive printed circuit board design
11 *
12 * Copyright (C) 1994,1995,1996 Thomas Nau
13 *
14 * Copyright (C) 1997, 1998, 1999, 2000, 2001 Harry Eaton
15 *
16 * This program is free software; you can redistribute it and/or modify
17 * it under the terms of the GNU General Public License as published by
18 * the Free Software Foundation; either version 2 of the License, or
19 * (at your option) any later version.
20 *
21 * This program is distributed in the hope that it will be useful,
22 * but WITHOUT ANY WARRANTY; without even the implied warranty of
23 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
24 * GNU General Public License for more details.
25 *
26 * You should have received a copy of the GNU General Public License
27 * along with this program; if not, write to the Free Software
28 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
29 *
30 * Contact addresses for paper mail and Email:
31 * Harry Eaton, 6697 Buttonhole Ct, Columbia, MD 21044, USA
32 * haceaton@aplcomm.jhuapl.edu
33 */
35 #ifdef HAVE_CONFIG_H
37 #endif
62 /*#include "print.h"*/
78 #include <assert.h>
81 #ifdef HAVE_LIBDMALLOC
82 #include <dmalloc.h>
83 #endif
85 /* for fork() and friends */
86 #ifdef HAVE_UNISTD_H
87 #include <unistd.h>
88 #endif
90 #ifdef HAVE_SYS_WAIT_H
91 #include <sys/wait.h>
92 #endif
94 #define DEBUG
96 /* ---------------------------------------------------------------------------
97 * some local types
98 */
100 {
101 F_AddSelected,
102 F_All,
103 F_AllConnections,
104 F_AllRats,
105 F_AllUnusedPins,
106 F_Arc,
107 F_Arrow,
108 F_Block,
109 F_Description,
110 F_Cancel,
111 F_Center,
112 F_Clear,
113 F_ClearAndRedraw,
114 F_ClearList,
115 F_Close,
116 F_CreatePins,
117 F_CreateVias,
118 F_CreateHoles,
119 F_Found,
120 F_Connection,
121 F_Convert,
122 F_Copy,
123 F_CycleClip,
124 F_CycleCrosshair,
125 F_DeleteRats,
126 F_Drag,
127 F_DrillReport,
128 F_Element,
129 F_ElementByName,
130 F_ElementConnections,
131 F_ElementToBuffer,
132 F_Escape,
133 F_Find,
134 F_FlipElement,
135 F_FoundPins,
136 F_Grid,
137 F_InsertPoint,
138 F_Layer,
139 F_Layout,
140 F_LayoutAs,
141 F_LayoutToBuffer,
142 F_Line,
143 F_LineSize,
144 F_Lock,
145 F_Mirror,
146 F_Move,
147 F_NameOnPCB,
148 F_Netlist,
149 F_NetByName,
150 F_None,
151 F_Notify,
152 F_Object,
153 F_ObjectByName,
154 F_PasteBuffer,
155 F_PadByName,
156 F_PinByName,
157 F_PinOrPadName,
158 F_Pinout,
159 F_Polygon,
160 F_PolygonHole,
161 F_PreviousPoint,
162 F_RatsNest,
163 F_Rectangle,
164 F_Redraw,
165 F_Release,
166 F_Revert,
167 F_Remove,
168 F_RemoveSelected,
169 F_Report,
170 F_Reset,
171 F_ResetLinesAndPolygons,
172 F_ResetPinsViasAndPads,
173 F_Restore,
174 F_Rotate,
175 F_Save,
176 F_Selected,
177 F_SelectedArcs,
178 F_SelectedElements,
179 F_SelectedLines,
180 F_SelectedNames,
181 F_SelectedObjects,
182 F_SelectedPads,
183 F_SelectedPins,
184 F_SelectedTexts,
185 F_SelectedVias,
186 F_SelectedRats,
187 F_Stroke,
188 F_Text,
189 F_TextByName,
190 F_TextScale,
191 F_Thermal,
192 F_ToLayout,
193 F_ToggleAllDirections,
194 F_ToggleAutoDRC,
195 F_ToggleClearLine,
196 F_ToggleFullPoly,
197 F_ToggleGrid,
198 F_ToggleHideNames,
199 F_ToggleMask,
200 F_ToggleName,
201 F_ToggleObject,
202 F_ToggleShowDRC,
203 F_ToggleLiveRoute,
204 F_ToggleRubberBandMode,
205 F_ToggleStartDirection,
206 F_ToggleSnapPin,
207 F_ToggleThindraw,
208 F_ToggleLockNames,
209 F_ToggleOnlyNames,
210 F_ToggleThindrawPoly,
211 F_ToggleOrthoMove,
212 F_ToggleLocalRef,
213 F_ToggleCheckPlanes,
214 F_ToggleUniqueNames,
215 F_Via,
216 F_ViaByName,
217 F_Value,
218 F_ViaDrillingHole,
219 F_ViaSize,
220 F_Zoom,
221 F_ThroughHole,
222 F_BuriedVias,
223 F_ToggleAutoBuriedVias
224 }
225 FunctionID;
228 {
230 FunctionID ID;
231 }
232 FunctionType;
234 /* --------------------------------------------------------------------------- */
236 /* %start-doc actions 00delta
238 Many actions take a @code{delta} parameter as the last parameter,
239 which is an amount to change something. That @code{delta} may include
240 units, as an additional parameter, such as @code{Action(Object,5,mm)}.
241 If no units are specified, the default is PCB's native units
242 (currently 1/100 mil). Also, if the delta is prefixed by @code{+} or
243 @code{-}, the size is increased or decreased by that amount.
244 Otherwise, the size size is set to the given amount.
246 @example
247 Action(Object,5,mil)
248 Action(Object,+0.5,mm)
249 Action(Object,-1)
250 @end example
252 Actions which take a @code{delta} parameter which do not accept all
253 these options will specify what they do take.
255 %end-doc */
257 /* %start-doc actions 00objects
259 Many actions act on indicated objects on the board. They will have
260 parameters like @code{ToggleObject} or @code{SelectedVias} to indicate
261 what group of objects they act on. Unless otherwise specified, these
262 parameters are defined as follows:
264 @table @code
266 @item Object
267 @itemx ToggleObject
268 Affects the object under the mouse pointer. If this action is invoked
269 from a menu or script, the user will be prompted to click on an
270 object, which is then the object affected.
272 @item Selected
273 @itemx SelectedObjects
275 Affects all objects which are currently selected. At least, all
276 selected objects for which the given action makes sense.
278 @item SelectedPins
279 @itemx SelectedVias
280 @itemx Selected@var{Type}
281 @itemx @i{etc}
282 Affects all objects which are both selected and of the @var{Type} specified.
284 @end table
286 %end-doc */
288 /* %start-doc actions 00macros
290 @macro pinshapes
292 Pins, pads, and vias can have various shapes. All may be round. Pins
293 and pads may be square (obviously "square" pads are usually
294 rectangular). Pins and vias may be octagonal. When you change a
295 shape flag of an element, you actually change all of its pins and
296 pads.
298 Note that the square flag takes precedence over the octagon flag,
299 thus, if both the square and octagon flags are set, the object is
300 square. When the square flag is cleared, the pins and pads will be
301 either round or, if the octagon flag is set, octagonal.
303 @end macro
305 %end-doc */
307 /* ---------------------------------------------------------------------------
308 * some local identifiers
309 */
312 static struct
313 {
315 LineType line;
316 }
317 fake;
319 static struct
320 {
322 Cardinal Buffer;
329 }
330 Note;
337 #ifdef HAVE_LIBSTROKE
340 #endif
466 };
468 /* ---------------------------------------------------------------------------
469 * some local routines
470 */
477 #ifdef HAVE_LIBSTROKE
482 #endif
485 #define ARG(n) (argc > (n) ? argv[n] : NULL)
487 #ifdef HAVE_LIBSTROKE
489 /*!
490 * \brief Try to recognize the stroke sent.
491 */
492 void
494 {
502 {
505 {
508 {
510 }
554 /* XXX: FIXME: Call a zoom-extents action */
565 /* XXX: FIXME: Zoom to fit the box StrokeBox.[X1,Y1] - StrokeBox.[X2,Y2] */
571 }
572 }
573 else
575 }
576 #endif
578 /*!
579 * \brief Clear warning color from pins/pads.
580 */
581 static void
583 {
586 {
588 {
591 }
592 }
593 ENDALL_LOOP;
595 {
597 {
600 }
601 }
602 ENDALL_LOOP;
604 }
606 /*!
607 * \brief Click callback.
608 *
609 * This is called a clicktime after a mouse down, to we can distinguish
610 * between short clicks (typically: select or create something) and long
611 * clicks. Long clicks typically drag something.
612 */
613 static void
615 {
617 {
621 {
631 }
633 {
642 }
643 else
644 {
645 BoxType box;
654 /* unselect first if shift key not down */
660 }
662 }
663 }
665 /*!
666 * \brief This is typically called when the mouse has moved or the mouse
667 * button was released.
668 */
669 static void
671 {
672 BoxType box;
675 {
676 BoxType box;
685 /* unselect first if shift key not down */
687 {
691 {
695 }
696 }
697 /* Restore the SN so that if we select something the deselect/select combo
698 gets the same SN. */
702 else
703 /* We didn't select anything new, so, the deselection should get its
704 own SN. */
708 }
710 {
717 }
719 {
722 }
724 {
739 }
743 }
745 #define HSIZE 257
749 static int
751 {
754 {
757 s ++;
758 }
761 }
763 /*!
764 * \brief Get function ID of passed string.
765 */
766 static int
768 {
775 {
778 {
782 }
784 {
785 /* Change 'char' to 'int' and remove this when we get to 256
786 strings to hash. */
791 }
793 {
798 }
799 }
803 {
804 /* We enforce the "hash table bigger than function table" rule,
805 so we know there will be at least one zero entry to find. */
811 }
812 }
814 /*!
815 * \brief Set new coordinates if in 'RECTANGLE' mode.
816 *
817 * The cursor shape is also adjusted.
818 */
819 static void
821 {
823 {
826 }
828 {
830 {
831 /* update coordinates */
835 }
836 }
837 }
839 /*!
840 * \brief Adjusts the objects which are to be created like attached
841 * lines.
842 */
843 void
845 {
848 {
849 /* update at least an attached block (selection) */
853 {
856 }
859 /* rectangle creation mode */
865 /* polygon creation mode */
870 /* line creation mode */
874 else
877 /* point insertion mode */
885 }
886 }
888 /*!
889 * \brief Creates points of a line.
890 */
891 static void
893 {
900 {
905 {
908 }
910 {
912 {
918 /* XXX: What about undo serial number? */
919 }
920 /* XXX: NEED TO FIGURE OUT WHAT NET CLASS THIS IS, AND/OR STORE FOR USE WITH DRC */
921 // Crosshair.Netclass = get_netclass_at_xy (LAYER_ON_STACK(0), Crosshair.X, Crosshair.Y); /* XXX: Not sure about the layer! */
922 // PCB->Bloat = get_min_clearance_for_netclass (Crosshair.Netclass);
923 }
925 {
930 }
932 {
937 {
940 }
941 else
942 {
945 }
946 }
947 else
948 {
953 }
958 /* fall through to third state too */
963 }
964 }
966 /*!
967 * \brief Create first or second corner of a marked block.
968 */
969 static void
971 {
974 {
986 }
988 }
991 /*!
992 * \brief This is called after every mode change, like mouse button pressed,
993 * mouse button released, dragging something started or a different tool
994 * selected.
995 *
996 * It does what's appropriate for the current mode setting.
997 * This can also mean creation of an object at the current crosshair location.
998 *
999 * New created objects are added to the create undo list of course.
1000 */
1001 static void
1003 {
1010 {
1012 {
1014 hidval hv;
1017 /* do something after click time */
1020 /* see if we clicked on something already selected
1021 * (Note.Moving) or clicked on a MOVE_TYPE
1022 * (Note.Hit)
1023 */
1026 {
1030 {
1035 }
1041 }
1043 }
1046 {
1050 {
1054 }
1059 {
1066 }
1068 }
1071 {
1073 {
1084 {
1092 {
1096 #ifdef ARC45
1099 else
1100 #endif
1102 }
1103 else
1104 {
1108 #ifdef ARC45
1111 else
1112 #endif
1115 }
1117 Crosshair.
1118 AttachedBox.
1120 Crosshair.
1121 AttachedBox.
1125 sa,
1126 dir,
1127 Settings.
1128 LineThickness,
1130 Keepaway,
1131 MakeFlags
1132 (TEST_FLAG
1134 PCB) ?
1135 CLEARLINEFLAG :
1137 {
1147 addedLines++;
1151 }
1153 }
1154 }
1156 }
1158 {
1161 {
1166 {
1169 }
1170 END_LOOP;
1172 {
1175 }
1176 END_LOOP;
1178 /* always re-draw it since I'm too lazy
1179 * to tell if a selected flag changed
1180 */
1184 }
1186 {
1191 {
1192 /* this is not un-doable since LOCK isn't */
1196 }
1198 }
1200 }
1202 {
1204 =
1208 {
1210 {
1212 tstyle++;
1216 }
1219 else
1221 }
1223 }
1226 /* do update of position */
1231 /* Remove anchor if clicking on start point;
1232 * this means we can't paint 0 length lines
1233 * which could be used for square SMD pads.
1234 * Instead use a very small delta, or change
1235 * the file after saving.
1236 */
1239 {
1242 }
1245 {
1248 {
1249 addedLines++;
1258 }
1260 }
1261 else
1262 /* create line if both ends are determined && length != 0 */
1263 {
1280 {
1281 /* We will only need to paint the second line segment.
1282 Since we only check for vias on the first segment,
1283 swap them so the non-empty segment is the first segment. */
1286 }
1292 {
1306 {
1307 addedLines++;
1310 }
1311 /* place a via if vias are visible, the layer is
1312 in a new group since the last line and there
1313 isn't a pin already here */
1315 {
1321 }
1322 else
1323 {
1326 }
1334 NO_TYPE
1343 {
1346 }
1347 /* copy the coordinates */
1354 }
1358 {
1367 {
1368 addedLines++;
1372 }
1373 /* move to new start point */
1379 {
1381 }
1382 }
1386 }
1390 /* do update of position */
1393 /* create rectangle if both corners are determined
1394 * and width, height are != 0
1395 */
1399 {
1406 Crosshair.
1408 Crosshair.
1410 Crosshair.
1412 Crosshair.
1414 MakeFlags
1416 NULL)
1417 {
1423 }
1425 /* reset state to 'first corner' */
1427 }
1431 {
1435 {
1437 {
1447 {
1452 }
1453 }
1455 }
1457 }
1460 {
1464 /* do update of position; use the 'LINE_MODE' mechanism */
1467 /* check if this is the last point of a polygon */
1471 {
1475 }
1477 /* create new point if it's the first one or if it's
1478 * different to the last one
1479 */
1483 {
1489 /* copy the coordinates */
1492 }
1494 }
1497 {
1499 {
1500 /* first notify, lookup object */
1509 {
1512 }
1515 {
1519 }
1520 else
1522 /* Fall thru: first click is also the first point of the
1523 * poly hole. */
1525 /* second notify, insert new point into object */
1527 {
1531 FlagType Flags;
1533 /* do update of position; use the 'LINE_MODE' mechanism */
1536 /* check if this is the last point of a polygon */
1540 {
1541 /* Create POLYAREAs from the original polygon
1542 * and the new hole polygon */
1546 /* Subtract the hole from the original polygon shape */
1549 /* Convert the resulting polygon(s) into a new set of nodes
1550 * and place them on the page. Delete the original polygon.
1551 */
1564 /* reset state of attached line */
1570 }
1572 /* create new point if it's the first one or if it's
1573 * different to the last one
1574 */
1578 {
1584 /* copy the coordinates */
1587 }
1589 }
1590 }
1593 }
1596 {
1601 {
1606 {
1609 {
1617 }
1618 }
1619 }
1623 {
1628 {
1635 {
1647 }
1648 }
1649 }
1651 }
1657 {
1659 {
1662 }
1664 {
1672 {
1679 else
1681 ptr++;
1682 }
1683 }
1687 }
1697 /* both are almost the same */
1701 {
1702 /* first notify, lookup object */
1704 {
1714 {
1718 {
1721 }
1722 else
1724 }
1726 }
1728 /* second notify, move or copy object */
1737 else
1738 {
1746 }
1749 /* reset identifiers */
1753 }
1756 /* insert a point into a polygon/line/... */
1759 {
1760 /* first notify, lookup object */
1769 {
1772 {
1776 }
1777 else
1778 {
1779 /* get starting point of nearest segment */
1781 {
1784 polyIndex =
1792 }
1795 }
1796 }
1799 /* second notify, insert new point into object */
1806 else
1814 /* reset identifiers */
1818 }
1820 }
1821 }
1824 /* --------------------------------------------------------------------------- */
1830 /* %start-doc actions Atomic
1832 This action allows making multiple-action bindings into an atomic
1833 operation that will be undone by a single Undo command. For example,
1834 to optimize rat lines, you'd delete the rats and re-add them. To
1835 group these into a single undo, you'd want the deletions and the
1836 additions to have the same undo serial number. So, you @code{Save},
1837 delete the rats, @code{Restore}, add the rats - using the same serial
1838 number as the deletes, then @code{Block}, which checks to see if the
1839 deletions or additions actually did anything. If not, the serial
1840 number is set to the saved number, as there's nothing to undo. If
1841 something did happen, the serial number is incremented so that these
1842 actions are counted as a single undo step.
1844 @table @code
1846 @item Save
1847 Saves the undo serial number.
1849 @item Restore
1850 Returns it to the last saved number.
1852 @item Close
1853 Sets it to 1 greater than the last save.
1855 @item Block
1856 Does a Restore if there was nothing to undo, else does a Close.
1858 @end table
1860 %end-doc */
1862 static int
1864 {
1869 {
1885 }
1887 }
1889 /* -------------------------------------------------------------------------- */
1895 /* %start-doc actions DRC
1897 Note that the design rule check uses the current board rule settings,
1898 not the current style settings.
1900 %end-doc */
1902 static int
1904 {
1908 {
1916 }
1919 {
1924 else
1926 }
1928 }
1930 /* -------------------------------------------------------------------------- */
1937 /* %start-doc actions DumpLibrary
1940 %end-doc */
1942 static int
1944 {
1951 {
1962 {
1965 {
1968 }
1969 else
1970 {
1977 }
1978 }
1979 }
1982 }
1984 /* -------------------------------------------------------------------------- */
1991 /* %start-doc actions Flip
1993 Note that the location of the element will be symmetric about the
1994 cursor location; i.e. if the part you are pointing at will still be at
1995 the same spot once the element is on the other side. When flipping
1996 multiple elements, this retains their positions relative to each
1997 other, not their absolute positions on the board.
1999 %end-doc */
2001 static int
2003 {
2010 {
2012 {
2016 {
2021 }
2030 }
2033 }
2036 }
2038 /* -------------------------------------------------------------------------- */
2044 /* %start-doc actions Message
2046 This action displays a message to the log window. This action is primarily
2047 provided for use by other programs which may interface with PCB. If
2048 multiple arguments are given, each one is sent to the log window
2049 followed by a newline.
2051 %end-doc */
2053 static int
2055 {
2062 {
2065 }
2068 }
2071 /* -------------------------------------------------------------------------- */
2085 /* %start-doc actions SetThermal
2087 This changes how/whether pins or vias connect to any rectangle or polygon
2088 on the current layer. The first argument can specify one object, or all
2089 selected pins, or all selected vias, or all selected pins and vias.
2090 The second argument specifies the style of connection.
2091 There are 5 possibilities:
2092 0 - no connection,
2093 1 - 45 degree fingers with sharp edges,
2094 2 - horizontal & vertical fingers with sharp edges,
2095 3 - solid connection,
2096 4 - 45 degree fingers with rounded corners,
2097 5 - horizontal & vertical fingers with rounded corners.
2099 Pins and Vias may have thermals whether or not there is a polygon available
2100 to connect with. However, they will have no effect without the polygon.
2101 %end-doc */
2103 static int
2105 {
2113 {
2117 {
2120 }
2121 else
2124 /* To allow relative values we could search for the first selected
2125 item and make 'kind' relative to that, but that's not too useful
2126 and requires quite some code. For example there's no
2127 GetFirstSelectedPin() function available. Let's postpone this
2128 functionality, there are more urgent things to do. */
2132 {
2137 {
2141 }
2156 }
2157 else
2159 }
2160 else
2167 }
2169 /*!
2170 * \brief Event handler to set the cursor according to the X pointer
2171 * position called from inside main.c.
2172 *
2173 * \warning !!! no action routine !!!
2174 */
2175 void
2177 {
2178 #ifdef HAVE_LIBSTROKE
2180 {
2185 }
2188 {
2189 /* update object position and cursor location */
2192 }
2193 }
2195 /* --------------------------------------------------------------------------- */
2204 /* %start-doc actions SetValue
2206 @table @code
2208 @item ViaDrillingHole
2209 Changes the diameter of the drill for new vias.
2211 @item Grid
2212 Sets the grid spacing.
2214 @item Line
2215 @item LineSize
2216 Changes the thickness of new lines.
2218 @item Via
2219 @item ViaSize
2220 Changes the diameter of new vias.
2222 @item Text
2223 @item TextScale
2224 Changes the size of new text.
2226 @end table
2228 %end-doc */
2230 static int
2232 {
2242 {
2245 {
2256 else
2257 {
2261 /* On the way down, short against the minimum
2262 * PCB drawing unit */
2267 else
2269 }
2297 }
2300 }
2303 }
2306 /* --------------------------------------------------------------------------- */
2312 /* %start-doc actions Quit
2314 If you have unsaved changes, you will be prompted to confirm (or
2315 save) before quitting.
2317 %end-doc */
2319 static int
2321 {
2324 {
2327 }
2331 }
2333 /* --------------------------------------------------------------------------- */
2341 /* %start-doc actions Connection
2343 Connections found with this action will be highlighted in the
2344 ``connected-color'' color and will have the ``found'' flag set.
2346 @table @code
2348 @item Find
2349 The net under the cursor is ``found''.
2351 @item ResetLinesAndPolygons
2352 Any ``found'' lines and polygons are marked ``not found''.
2354 @item ResetPinsAndVias
2355 Any ``found'' pins and vias are marked ``not found''.
2357 @item Reset
2358 All ``found'' objects are marked ``not found''.
2360 @end table
2362 %end-doc */
2364 static int
2366 {
2369 {
2371 {
2373 {
2378 }
2382 {
2385 }
2390 {
2393 }
2398 {
2401 }
2403 }
2405 }
2408 }
2410 /* --------------------------------------------------------------------------- */
2417 /* %start-doc actions DisperseElements
2419 Normally this is used when starting a board, by selecting all elements
2420 and then dispersing them. This scatters the elements around the board
2421 so that you can pick individual ones, rather than have all the
2422 elements at the same 0,0 coordinate and thus impossible to choose
2423 from.
2425 %end-doc */
2427 #define GAP MIL_TO_COORD(100)
2429 static int
2431 {
2440 {
2442 }
2443 else
2444 {
2446 {
2457 }
2458 }
2461 {
2463 }
2467 {
2468 /*
2469 * If we want to disperse selected elements, maybe we need smarter
2470 * code here to avoid putting components on top of others which
2471 * are not selected. For now, I'm assuming that this is typically
2472 * going to be used either with a brand new design or a scratch
2473 * design holding some new components
2474 */
2476 {
2478 /* figure out how much to move the element */
2481 /* snap to the grid */
2484 /*
2485 * and add one grid size so we make sure we always space by GAP or
2486 * more
2487 */
2490 /* Figure out if this row has room. If not, start a new row */
2492 {
2495 }
2497 /* figure out how much to move the element */
2501 /* snap to the grid */
2507 /* move the element */
2510 /* and add to the undo list so we can undo this operation */
2513 /* keep track of how tall this row is */
2516 {
2518 }
2519 }
2521 }
2522 END_LOOP;
2524 /* done with our action so increment the undo # */
2531 }
2533 #undef GAP
2535 /* --------------------------------------------------------------------------- */
2550 /* %start-doc actions Display
2552 @table @code
2554 @item NameOnPCB
2555 @item Description
2556 @item Value
2557 Specify whether all elements show their name, description, or value.
2559 @item Redraw
2560 Redraw the whole board.
2562 @item Toggle45Degree
2563 When clear, lines can be drawn at any angle. When set, lines are
2564 restricted to multiples of 45 degrees and requested lines may be
2565 broken up according to the clip setting.
2567 @item CycleClip
2568 Changes the way lines are restricted to 45 degree increments. The
2569 various settings are: straight only, orthogonal then angled, and angled
2570 then orthogonal. If AllDirections is set, this action disables it.
2572 @item CycleCrosshair
2573 Changes crosshair drawing. Crosshair may accept form of 4-ray,
2574 8-ray and 12-ray cross.
2576 @item ToggleRubberBandMode
2577 If set, moving an object moves all the lines attached to it too.
2579 @item ToggleStartDirection
2580 If set, each time you set a point in a line, the Clip toggles between
2581 orth-angle and angle-ortho.
2583 @item ToggleUniqueNames
2584 If set, you will not be permitted to change the name of an element to
2585 match that of another element.
2587 @item ToggleSnapPin
2588 If set, pin centers and pad end points are treated as additional grid
2589 points that the cursor can snap to.
2591 @item ToggleLocalRef
2592 If set, the mark is automatically set to the beginning of any move, so
2593 you can see the relative distance you've moved.
2595 @item ToggleThindraw
2596 If set, objects on the screen are drawn as outlines (lines are drawn
2597 as center-lines). This lets you see line endpoints hidden under pins,
2598 for example.
2600 @item ToggleThindrawPoly
2601 If set, polygons on the screen are drawn as outlines.
2603 @item ToggleShowDRC
2604 If set, pending objects (i.e. lines you're in the process of drawing)
2605 will be drawn with an outline showing how far away from other copper
2606 you need to be.
2608 @item ToggleLiveRoute
2609 If set, the progress of the autorouter will be visible on the screen.
2611 @item ToggleAutoDRC
2612 If set, you will not be permitted to make connections which violate
2613 the current DRC and netlist settings.
2615 @item ToggleCheckPlanes
2616 If set, lines and arcs aren't drawn, which usually leaves just the
2617 polygons. If you also disable all but the layer you're interested in,
2618 this allows you to check for isolated regions.
2620 @item ToggleOrthoMove
2621 If set, the crosshair is only allowed to move orthogonally from its
2622 previous position. I.e. you can move an element or line up, down,
2623 left, or right, but not up+left or down+right.
2625 @item ToggleName
2626 Selects whether the pinouts show the pin names or the pin numbers.
2628 @item ToggleLockNames
2629 If set, text will ignore left mouse clicks and actions that work on
2630 objects under the mouse. You can still select text with a lasso (left
2631 mouse drag) and perform actions on the selection.
2633 @item ToggleOnlyNames
2634 If set, only text will be sensitive for mouse clicks and actions that
2635 work on objects under the mouse. You can still select other objects
2636 with a lasso (left mouse drag) and perform actions on the selection.
2638 @item ToggleMask
2639 Turns the solder mask on or off.
2641 @item ToggleClearLine
2642 When set, the clear-line flag causes new lines and arcs to have their
2643 ``clear polygons'' flag set, so they won't be electrically connected
2644 to any polygons they overlap.
2646 @item ToggleFullPoly
2647 When set, the full-poly flag causes new polygons to have their
2648 ``full polygon'' flag set, so all parts of them will be displayed
2649 instead of only the biggest one.
2651 @item ToggleGrid
2652 Resets the origin of the current grid to be wherever the mouse pointer
2653 is (not where the crosshair currently is). If you provide two numbers
2654 after this, the origin is set to that coordinate.
2656 @item Grid
2657 Toggles whether the grid is displayed or not.
2659 @item Pinout
2660 Causes the pinout of the element indicated by the cursor to be
2661 displayed, usually in a separate window.
2663 @item PinOrPadName
2664 Toggles whether the names of pins, pads, or (yes) vias will be
2665 displayed. If the cursor is over an element, all of its pins and pads
2666 are affected.
2668 @item ToggleAutoBuriedVias
2669 If set, automatically created vias are buried vias.
2671 @end table
2673 %end-doc */
2675 static enum crosshair_shape
2677 {
2679 {
2692 }
2694 }
2696 static int
2698 {
2707 {
2709 {
2711 /* redraw layout */
2717 /* change the displayed name of elements */
2722 {
2724 }
2725 END_LOOP;
2728 {
2737 }
2739 {
2741 }
2742 END_LOOP;
2746 /* toggle line-adjust flag */
2755 {
2758 }
2759 else
2842 {
2844 {
2847 }
2849 {
2856 }
2857 }
2888 /* shift grid alignment */
2890 {
2897 }
2900 /* toggle displaying of the grid */
2906 /* display the pinout of an element */
2908 {
2917 {
2920 }
2922 }
2924 /* toggle displaying of pin/pad/via names */
2926 {
2936 {
2939 {
2942 else
2946 }
2947 END_LOOP;
2949 {
2952 else
2956 }
2957 END_LOOP;
2966 else
2978 else
2989 else
2997 }
2999 }
3002 }
3003 }
3005 {
3007 {
3010 {
3015 }
3021 }
3022 }
3023 else
3030 }
3032 /* --------------------------------------------------------------------------- */
3042 /* %start-doc actions Mode
3044 @table @code
3046 @item Arc
3047 @itemx Arrow
3048 @itemx Copy
3049 @itemx InsertPoint
3050 @itemx Line
3051 @itemx Lock
3052 @itemx Move
3053 @itemx None
3054 @itemx PasteBuffer
3055 @itemx Polygon
3056 @itemx Rectangle
3057 @itemx Remove
3058 @itemx Rotate
3059 @itemx Text
3060 @itemx Thermal
3061 @itemx Via
3062 Select the indicated tool.
3064 @item Notify
3065 Called when you press the mouse button, or move the mouse.
3067 @item Release
3068 Called when you release the mouse button.
3070 @item Cancel
3071 Cancels any pending tool activity, allowing you to restart elsewhere.
3072 For example, this allows you to start a new line rather than attach a
3073 line to the previous line.
3075 @item Escape
3076 Similar to Cancel but calling this action a second time will return
3077 to the Arrow tool.
3079 @item Stroke
3080 If your @code{pcb} was built with libstroke, this invokes the stroke
3081 input method. If not, this will restart a drawing mode if you were
3082 drawing, else it will select objects.
3084 @item Save
3085 Remembers the current tool.
3087 @item Restore
3088 Restores the tool to the last saved tool.
3090 @end table
3092 %end-doc */
3094 static int
3096 {
3100 {
3105 {
3131 {
3135 }
3138 {
3140 {
3159 else
3160 {
3163 }
3169 else
3170 {
3173 }
3179 else
3180 {
3183 }
3189 else
3190 {
3193 }
3199 else
3200 {
3203 }
3211 }
3212 }
3227 #ifndef HAVE_LIBSTROKE
3231 #else
3235 else
3238 #endif
3249 #ifdef HAVE_LIBSTROKE
3254 #else
3255 /* Handle middle mouse button restarts of drawing mode. If not in
3256 | a drawing mode, middle mouse button will select objects.
3257 */
3260 {
3262 }
3272 else
3273 {
3278 }
3280 #endif
3298 }
3301 }
3304 }
3306 /* --------------------------------------------------------------------------- */
3312 /* %start-doc actions RemoveSelected
3314 %end-doc */
3316 static int
3318 {
3322 }
3324 /* --------------------------------------------------------------------------- */
3333 /* %start-doc actions Renumber
3335 %end-doc */
3337 static int
3339 {
3351 struct _cnt_list
3352 {
3362 {
3363 /*
3364 * We deal with the case where name already exists in this
3365 * function so the GUI doesn't need to deal with it
3366 */
3375 }
3376 else
3380 {
3383 }
3386 {
3388 }
3391 {
3394 {
3398 }
3399 }
3402 {
3407 }
3415 /*
3416 * Make a first pass through all of the elements and sort them out
3417 * by location on the board. While here we also collect a list of
3418 * locked elements.
3419 *
3420 * We'll actually renumber things in the 2nd pass.
3421 */
3428 {
3431 }
3437 {
3439 {
3440 /*
3441 * add to the list of locked elements which we won't try to
3442 * renumber and whose reference designators are now reserved.
3443 */
3448 lock_cnt++;
3449 }
3451 else
3452 {
3453 /* count of devices which will be renumbered */
3454 cnt++;
3456 /* search for correct position in the list */
3459 i++;
3461 /*
3462 * We have found the position where we have the first element that
3463 * has the same Y value or a lower Y value. Now move forward if
3464 * needed through the X values
3465 */
3469 i++;
3472 {
3474 }
3476 }
3477 }
3478 END_LOOP;
3481 /*
3482 * Now that the elements are sorted by board position, we go through
3483 * and renumber them.
3484 */
3486 /*
3487 * turn off the flag which requires unique names so it doesn't get
3488 * in our way. When we're done with the renumber we will have unique
3489 * names.
3490 */
3496 {
3497 /* If there is no refdes, maybe just spit out a warning */
3499 {
3500 /* figure out the prefix */
3505 j++;
3508 /* check the counter for this prefix */
3513 /* grow the list if needed */
3515 {
3519 {
3522 }
3523 /* zero out the memory that we added */
3525 {
3528 }
3529 }
3531 /*
3532 * start a new counter if we don't have a counter for this
3533 * prefix
3534 */
3536 {
3539 }
3541 /*
3542 * check to see if the new refdes is already used by a
3543 * locked element
3544 */
3545 do
3546 {
3551 /* space for the prefix plus 1 digit plus the '\0' */
3554 /* and 1 more per extra digit needed to hold the number */
3557 {
3558 sz++;
3560 }
3564 /*
3565 * now compare to the list of reserved (by locked
3566 * elements) names
3567 */
3569 {
3573 {
3576 }
3577 }
3579 }
3583 {
3587 /* add this rename to our table of renames so we can update the netlist */
3590 c_cnt++;
3598 tmps);
3601 /* we don't free tmps in this case because it is used */
3602 }
3603 else
3605 }
3606 else
3607 {
3610 }
3612 }
3616 /* restore the unique flag setting */
3621 {
3623 /* update the netlist */
3626 /* iterate over each net */
3628 {
3630 /* iterate over each pin on the net */
3632 {
3634 /* figure out the pin number part from strings like U3-21 */
3640 /* iterate over the list of changed reference designators */
3642 {
3643 /*
3644 * if the pin needs to change, change it and quit
3645 * searching in the list.
3646 */
3648 {
3656 }
3658 }
3660 }
3661 }
3663 {
3666 }
3671 }
3679 }
3682 /* --------------------------------------------------------------------------- */
3689 /* %start-doc actions RipUp
3691 @table @code
3693 @item All
3694 Removes all lines and vias which were created by the autorouter.
3696 @item Selected
3697 Removes all selected lines and vias which were created by the
3698 autorouter.
3700 @item Element
3701 Converts the element under the cursor to parts (vias and lines). Note
3702 that this uses the highest numbered paste buffer.
3704 @end table
3706 %end-doc */
3708 static int
3710 {
3715 {
3717 {
3720 {
3722 {
3725 }
3726 }
3727 ENDALL_LOOP;
3729 {
3731 {
3734 }
3735 }
3736 ENDALL_LOOP;
3738 {
3740 {
3743 }
3744 }
3745 END_LOOP;
3748 {
3751 }
3755 {
3758 {
3761 }
3762 }
3763 ENDALL_LOOP;
3766 {
3769 {
3772 }
3773 }
3774 END_LOOP;
3776 {
3779 }
3782 {
3787 {
3803 }
3804 }
3806 }
3807 }
3809 }
3811 /* --------------------------------------------------------------------------- */
3818 /* %start-doc actions AddRats
3820 @table @code
3822 @item AllRats
3823 Create rat lines for all loaded nets that aren't already connected on
3824 with copper.
3826 @item SelectedRats
3827 Similarly, but only add rat lines for nets connected to selected pins
3828 and pads.
3830 @item Close
3831 Selects the shortest unselected rat on the board.
3833 @end table
3835 %end-doc */
3837 static int
3839 {
3845 {
3849 {
3864 {
3870 {
3873 }
3874 }
3875 END_LOOP;
3877 {
3885 }
3887 }
3888 }
3890 }
3892 /* --------------------------------------------------------------------------- */
3900 /* %start-doc actions Delete
3902 %end-doc */
3904 static int
3906 {
3914 {
3917 }
3920 {
3938 }
3941 }
3943 /* --------------------------------------------------------------------------- */
3950 /* %start-doc actions DeleteRats
3952 %end-doc */
3954 static int
3956 {
3959 {
3963 {
3973 }
3974 }
3976 }
3978 /* --------------------------------------------------------------------------- */
3984 /* %start-doc actions AutoPlaceSelected
3986 Attempts to re-arrange the selected components such that the nets
3987 connecting them are minimized. Note that you cannot undo this.
3989 %end-doc */
3991 static int
3993 {
3997 {
4000 }
4002 }
4004 /* --------------------------------------------------------------------------- */
4010 /* %start-doc actions AutoRoute
4012 @table @code
4014 @item AllRats
4015 Attempt to autoroute all rats.
4017 @item SelectedRats
4018 Attempt to autoroute the selected rats.
4020 @end table
4022 Before autorouting, it's important to set up a few things. First,
4023 make sure any layers you aren't using are disabled, else the
4024 autorouter may use them. Next, make sure the current line and via
4025 styles are set accordingly. Last, make sure "new lines clear
4026 polygons" is set, in case you eventually want to add a copper pour.
4028 Autorouting takes a while. During this time, the program may not be
4029 responsive.
4031 %end-doc */
4033 static int
4035 {
4039 {
4041 {
4051 }
4052 }
4054 }
4056 /* --------------------------------------------------------------------------- */
4064 /* %start-doc actions MarkCrosshair
4066 The ``mark'' is a small X-shaped target on the display which is
4067 treated like a second origin (the normal origin is the upper let
4068 corner of the board). The GUI will display a second set of
4069 coordinates for this mark, which tells you how far you are from it.
4071 If no argument is given, the mark is toggled - disabled if it was
4072 enabled, or enabled at the current cursor position of disabled. If
4073 the @code{Center} argument is given, the mark is moved to the current
4074 cursor location.
4076 %end-doc */
4078 static int
4080 {
4083 {
4085 {
4089 }
4090 else
4091 {
4098 }
4099 }
4101 {
4107 }
4109 }
4111 /* --------------------------------------------------------------------------- */
4122 /* %start-doc actions ChangeSize
4124 For lines and arcs, this changes the width. For pins and vias, this
4125 changes the overall diameter of the copper annulus. For pads, this
4126 changes the width and, indirectly, the length. For texts and names,
4127 this changes the scaling factor. For elements, this changes the width
4128 of the silk layer lines and arcs for this element.
4130 %end-doc */
4132 static int
4134 {
4139 Coord value;
4142 {
4148 {
4150 {
4162 }
4209 }
4210 }
4212 }
4214 /* --------------------------------------------------------------------------- */
4223 /* %start-doc actions ChangeDrillSize
4225 %end-doc */
4227 static int
4229 {
4234 Coord value;
4237 {
4240 {
4242 {
4254 }
4270 }
4271 }
4273 }
4275 /* --------------------------------------------------------------------------- */
4286 /* %start-doc actions ChangeClearSize
4288 If the solder mask is currently showing, this action changes the
4289 solder mask clearance. If the mask is not showing, this action
4290 changes the polygon clearance.
4292 %end-doc */
4294 static int
4296 {
4301 Coord value;
4304 {
4310 {
4312 {
4324 }
4350 }
4351 }
4353 }
4355 /* --------------------------------------------------------------------------- */
4364 /* %start-doc actions MinMaskGap
4366 Checks all specified pins and/or pads, and increases the mask if
4367 needed to ensure a minimum distance between the pin or pad edge and
4368 the mask edge.
4370 %end-doc */
4372 static int
4374 {
4379 Coord value;
4380 Coord thickness;
4387 else
4388 {
4392 }
4397 {
4399 {
4411 {
4414 }
4415 }
4416 END_LOOP;
4418 {
4422 {
4426 }
4427 }
4428 END_LOOP;
4429 }
4430 END_LOOP;
4432 {
4442 {
4445 }
4446 }
4447 END_LOOP;
4451 }
4453 /* --------------------------------------------------------------------------- */
4462 /* %start-doc actions MinClearGap
4464 Checks all specified objects, and increases the polygon clearance if
4465 needed to ensure a minimum distance between their edges and the
4466 polygon edges.
4468 %end-doc */
4470 static int
4472 {
4477 Coord value;
4484 else
4485 {
4489 }
4494 {
4496 {
4500 {
4504 }
4505 }
4506 END_LOOP;
4508 {
4512 {
4516 }
4517 }
4518 END_LOOP;
4519 }
4520 END_LOOP;
4522 {
4526 {
4529 }
4530 }
4531 END_LOOP;
4533 {
4537 {
4540 }
4541 }
4542 ENDALL_LOOP;
4544 {
4548 {
4551 }
4552 }
4553 ENDALL_LOOP;
4557 }
4559 /* --------------------------------------------------------------------------- */
4567 /* %start-doc actions ChangePinName
4569 This can be especially useful for annotating pin names from a
4570 schematic to the layout without requiring knowledge of the pcb file
4571 format.
4573 @example
4574 ChangePinName(U3, 7, VCC)
4575 @end example
4577 %end-doc */
4579 static int
4581 {
4586 {
4588 }
4595 {
4597 {
4599 {
4601 {
4604 /*
4605 * Note: we can't free() pin->Name first because
4606 * it is used in the undo list
4607 */
4611 }
4612 }
4613 END_LOOP;
4616 {
4618 {
4621 /*
4622 * Note: we can't free() pad->Name first because
4623 * it is used in the undo list
4624 */
4628 }
4629 }
4630 END_LOOP;
4631 }
4632 }
4633 END_LOOP;
4634 /*
4635 * done with our action so increment the undo # if we actually
4636 * changed anything
4637 */
4639 {
4642 else
4643 {
4646 }
4647 }
4650 }
4652 /* --------------------------------------------------------------------------- */
4660 /* %start-doc actions ChangeName
4662 @table @code
4664 @item Object
4665 Changes the name of the element under the cursor.
4667 @item Layout
4668 Changes the name of the layout. This is printed on the fab drawings.
4670 @item Layer
4671 Changes the name of the currently active layer.
4673 @end table
4675 %end-doc */
4677 int
4679 {
4684 {
4686 {
4687 /* change the name of an object */
4689 {
4697 {
4700 {
4703 {
4713 {
4719 }
4722 }
4723 }
4724 }
4726 }
4728 /* change the layout's name */
4730 name =
4732 /* NB: ChangeLayoutName takes ownership of the passed memory */
4737 /* change the name of the active layer */
4741 /* NB: ChangeLayerName takes ownership of the passed memory */
4745 }
4746 }
4748 }
4751 /* --------------------------------------------------------------------------- */
4758 /* %start-doc actions MorphPolygon
4760 If a polygon is divided into unconnected "islands", you can use
4761 this command to convert the otherwise disappeared islands into
4762 separate polygons. Be sure the cursor is over a portion of the
4763 polygon that remains visible. Very small islands that may flake
4764 off are automatically deleted.
4766 %end-doc */
4768 static int
4770 {
4773 {
4775 {
4777 {
4784 {
4788 }
4790 }
4794 {
4797 }
4798 ENDALL_LOOP;
4802 }
4803 }
4805 }
4807 /* --------------------------------------------------------------------------- */
4815 /* %start-doc actions ToggleHideName
4817 If names are hidden you won't see them on the screen and they will not
4818 appear on the silk layer when you print the layout.
4820 %end-doc */
4822 static int
4824 {
4827 {
4829 {
4831 {
4838 {
4845 }
4847 }
4850 {
4853 {
4858 {
4865 }
4866 }
4867 END_LOOP;
4869 {
4872 }
4873 }
4874 }
4875 }
4877 }
4879 /* --------------------------------------------------------------------------- */
4887 /* %start-doc actions ChangeJoin
4889 The join flag determines whether a line or arc, drawn to intersect a
4890 polygon, electrically connects to the polygon or not. When joined,
4891 the line/arc is simply drawn over the polygon, making an electrical
4892 connection. When not joined, a gap is drawn between the line and the
4893 polygon, insulating them from each other.
4895 %end-doc */
4897 static int
4899 {
4902 {
4904 {
4907 {
4918 }
4935 }
4936 }
4938 }
4940 /* --------------------------------------------------------------------------- */
4950 /* %start-doc actions ChangeSquare
4952 Note that @code{Pins} means both pins and pads.
4954 @pinshapes
4956 %end-doc */
4958 static int
4960 {
4963 {
4965 {
4968 {
4979 }
4996 }
4997 }
4999 }
5001 /* --------------------------------------------------------------------------- */
5008 /* %start-doc actions SetSquare
5010 Note that @code{Pins} means pins and pads.
5012 @pinshapes
5014 %end-doc */
5016 static int
5018 {
5021 {
5023 {
5026 {
5037 }
5054 }
5055 }
5057 }
5059 /* --------------------------------------------------------------------------- */
5067 /* %start-doc actions ClearSquare
5069 Note that @code{Pins} means pins and pads.
5071 @pinshapes
5073 %end-doc */
5075 static int
5077 {
5080 {
5082 {
5085 {
5096 }
5113 }
5114 }
5116 }
5118 /* --------------------------------------------------------------------------- */
5127 /* %start-doc actions ChangeOctagon
5129 @pinshapes
5131 %end-doc */
5133 static int
5135 {
5138 {
5140 {
5143 {
5154 }
5176 }
5177 }
5179 }
5181 /* --------------------------------------------------------------------------- */
5188 /* %start-doc actions SetOctagon
5190 @pinshapes
5192 %end-doc */
5194 static int
5196 {
5199 {
5201 {
5204 {
5215 }
5237 }
5238 }
5240 }
5242 /* --------------------------------------------------------------------------- */
5251 /* %start-doc actions ClearOctagon
5253 @pinshapes
5255 %end-doc */
5257 static int
5259 {
5262 {
5264 {
5267 {
5278 }
5300 }
5301 }
5303 }
5305 /* --------------------------------------------------------------------------- */
5312 /* %start-doc actions ChangeHole
5314 The "hole flag" of a via determines whether the via is a
5315 plated-through hole (not set), or an unplated hole (set).
5317 %end-doc */
5319 static int
5321 {
5324 {
5326 {
5329 {
5339 }
5346 }
5347 }
5349 }
5351 /* --------------------------------------------------------------------------- */
5359 /* %start-doc actions ChangePaste
5361 The "no paste flag" of a pad determines whether the solderpaste
5362 stencil will have an opening for the pad (no set) or if there wil be
5363 no solderpaste on the pad (set). This is used for things such as
5364 fiducial pads.
5366 %end-doc */
5368 static int
5370 {
5373 {
5375 {
5378 {
5388 }
5395 }
5396 }
5398 }
5400 /* --------------------------------------------------------------------------- */
5413 /* %start-doc actions Select
5415 @table @code
5417 @item ElementByName
5418 @item ObjectByName
5419 @item PadByName
5420 @item PinByName
5421 @item TextByName
5422 @item ViaByName
5423 @item NetByName
5425 These all rely on having a regular expression parser built into
5426 @code{pcb}. If the name is not specified then the user is prompted
5427 for a pattern, and all objects that match the pattern and are of the
5428 type specified are selected.
5430 @item Object
5431 @item ToggleObject
5432 Selects the object under the cursor.
5434 @item Block
5435 Selects all objects in a rectangle indicated by the cursor.
5437 @item All
5438 Selects all objects on the board.
5440 @item Found
5441 Selects all connections with the ``found'' flag set.
5443 @item Connection
5444 Selects all connections with the ``connected'' flag set.
5446 @item Connection
5447 Selects all blind and buried vias.
5449 @item Convert
5450 Converts the selected objects to an element. This uses the highest
5451 numbered paste buffer.
5453 @end table
5455 %end-doc */
5457 static int
5459 {
5462 {
5464 {
5465 #if defined(HAVE_REGCOMP) || defined(HAVE_RE_COMP)
5467 /* select objects by their names */
5490 commonByName:
5491 {
5497 {
5502 }
5504 }
5507 /* select a single object */
5514 /* all objects in block */
5516 {
5517 BoxType box;
5531 {
5534 }
5537 }
5539 /* select all visible objects */
5541 {
5542 BoxType box;
5551 }
5553 /* all logical connections */
5556 {
5560 }
5563 /* all physical connections */
5566 {
5570 }
5575 {
5579 }
5583 {
5598 }
5604 }
5605 }
5607 }
5609 /* FLAG(have_regex,FlagHaveRegex,0) */
5610 int
5612 {
5613 #if defined(HAVE_REGCOMP) || defined(HAVE_RE_COMP)
5615 #else
5617 #endif
5618 }
5620 /* --------------------------------------------------------------------------- */
5632 /* %start-doc actions Unselect
5634 @table @code
5636 @item All
5637 Unselect all objects.
5639 @item Block
5640 Unselect all objects in a rectangle given by the cursor.
5642 @item Connection
5643 Unselect all connections with the ``found'' flag set.
5645 @item ElementByName
5646 @item ObjectByName
5647 @item PadByName
5648 @item PinByName
5649 @item TextByName
5650 @item ViaByName
5652 These all rely on having a regular expression parser built into
5653 @code{pcb}. If the name is not specified then the user is prompted
5654 for a pattern, and all objects that match the pattern and are of the
5655 type specified are unselected.
5658 @end table
5660 %end-doc */
5662 static int
5664 {
5667 {
5669 {
5670 #if defined(HAVE_REGCOMP) || defined(HAVE_RE_COMP)
5672 /* select objects by their names */
5695 commonByName:
5696 {
5702 {
5707 }
5709 }
5712 /* all objects in block */
5714 {
5715 BoxType box;
5729 {
5732 }
5735 }
5737 /* unselect all visible objects */
5739 {
5740 BoxType box;
5749 }
5751 /* all logical connections */
5754 {
5758 }
5761 /* all physical connections */
5764 {
5768 }
5775 }
5776 }
5778 }
5780 /* --------------------------------------------------------------------------- */
5789 /* %start-doc actions SaveTo
5791 @table @code
5793 @item Layout
5794 Saves the current layout.
5796 @item LayoutAs
5797 Saves the current layout, and remembers the filename used.
5799 @item AllConnections
5800 Save all connections to a file.
5802 @item AllUnusedPins
5803 List all unused pins to a file.
5805 @item ElementConnections
5806 Save connections to the element at the cursor to a file.
5808 @item PasteBuffer
5809 Save the content of the active Buffer to a file. This is the graphical way to create a footprint.
5811 @end table
5813 %end-doc */
5815 static int
5817 {
5824 {
5828 }
5836 {
5838 {
5844 }
5846 }
5849 {
5853 {
5857 }
5859 }
5862 {
5866 {
5870 }
5872 }
5875 {
5883 {
5887 {
5891 }
5892 }
5894 }
5897 {
5899 }
5902 }
5904 /* --------------------------------------------------------------------------- */
5912 /* %start-doc actions SaveSettings
5914 If you pass no arguments, the settings are stored in
5915 @code{$HOME/.pcb/settings}. If you pass the word @code{local} they're
5916 saved in @code{./pcb.settings}.
5918 %end-doc */
5920 static int
5922 {
5926 }
5928 /* --------------------------------------------------------------------------- */
5931 N_("LoadFrom(Layout|LayoutToBuffer|ElementToBuffer|STEPOutlineToBufferLines|STEPOutlineToBufferPolys|Netlist|Revert,filename)");
5935 /* %start-doc actions LoadFrom
5937 This action assumes you know what the filename is. The various GUIs
5938 should have a similar @code{Load} action where the filename is
5939 optional, and will provide their own file selection mechanism to let
5940 you choose the file name.
5942 @table @code
5944 @item Layout
5945 Loads an entire PCB layout, replacing the current one.
5947 @item LayoutToBuffer
5948 Loads an entire PCB layout to the paste buffer.
5950 @item ElementToBuffer
5951 Loads the given element file into the paste buffer. Element files
5952 contain only a single @code{Element} definition, such as the
5953 ``newlib'' library uses.
5955 @item Netlist
5956 Loads a new netlist, replacing any current netlist.
5958 @item Revert
5959 Re-loads the current layout from its disk file, reverting any changes
5960 you may have made.
5962 @end table
5964 %end-doc */
5966 static int
5968 {
5979 {
5984 }
5987 {
5992 }
5995 {
6000 }
6003 {
6008 }
6011 {
6015 }
6018 {
6025 }
6029 {
6031 }
6034 }
6036 /* --------------------------------------------------------------------------- */
6042 /* %start-doc actions New
6044 If a name is not given, one is prompted for.
6046 %end-doc */
6048 static int
6050 {
6054 {
6057 else
6064 /* do emergency saving
6065 * clear the old struct and allocate memory for the new one
6066 */
6074 /* setup the new name and reset some values to default */
6086 }
6088 }
6090 /*!
6091 * \brief No operation, just for testing purposes.
6092 * syntax: Bell(volume)
6093 */
6094 void
6096 {
6098 }
6100 /* --------------------------------------------------------------------------- */
6111 /* %start-doc actions PasteBuffer
6113 There are a number of paste buffers; the actual limit is a
6114 compile-time constant @code{MAX_BUFFER} in @file{globalconst.h}. It
6115 is currently @code{5}. One of these is the ``current'' paste buffer,
6116 often referred to as ``the'' paste buffer.
6118 @table @code
6120 @item AddSelected
6121 Copies the selected objects to the current paste buffer.
6123 @item Clear
6124 Remove all objects from the current paste buffer.
6126 @item Convert
6127 Convert the current paste buffer to an element. Vias are converted to
6128 pins, lines are converted to pads.
6130 @item Restore
6131 Convert any elements in the paste buffer back to vias and lines.
6133 @item Mirror
6134 Flip all objects in the paste buffer vertically (up/down flip). To mirror
6135 horizontally, combine this with rotations.
6137 @item Rotate
6138 Rotates the current buffer. The number to pass is 1..3, where 1 means
6139 90 degrees counter clockwise, 2 means 180 degrees, and 3 means 90
6140 degrees clockwise (270 CCW).
6142 @item Save
6143 Saves any elements in the current buffer to the indicated file.
6145 @item ToLayout
6146 Pastes any elements in the current buffer to the indicated X, Y
6147 coordinates in the layout. The @code{X} and @code{Y} are treated like
6148 @code{delta} is for many other objects. For each, if it's prefixed by
6149 @code{+} or @code{-}, then that amount is relative to the last
6150 location. Otherwise, it's absolute. Units can be
6151 @code{mil} or @code{mm}; if unspecified, units are PCB's internal
6152 units, currently 1/100 mil.
6155 @item 1..MAX_BUFFER
6156 Selects the given buffer to be the current paste buffer.
6158 @end table
6160 %end-doc */
6162 static int
6164 {
6173 {
6175 {
6176 /* clear contents of paste buffer */
6181 /* copies objects to paste buffer */
6186 /* converts buffer contents into an element */
6191 /* break up element for editing */
6196 /* Mirror buffer */
6203 {
6206 }
6211 {
6214 }
6217 {
6225 {
6228 }
6230 {
6232 }
6234 }
6236 else
6239 {
6243 {
6248 }
6249 else
6254 }
6258 {
6264 {
6266 }
6268 {
6275 }
6276 else
6277 {
6280 }
6286 }
6289 /* set number */
6291 {
6294 /* correct number */
6297 }
6298 }
6299 }
6303 }
6305 /* --------------------------------------------------------------------------- */
6312 /* %start-doc actions Undo
6314 The unlimited undo feature of @code{Pcb} allows you to recover from
6315 most operations that materially affect you work. Calling
6316 @code{Undo()} without any parameter recovers from the last (non-undo)
6317 operation. @code{ClearList} is used to release the allocated
6318 memory. @code{ClearList} is called whenever a new layout is started or
6319 loaded. See also @code{Redo} and @code{Atomic}.
6321 Note that undo groups operations by serial number; changes with the
6322 same serial number will be undone (or redone) as a group. See
6323 @code{Atomic}.
6325 %end-doc */
6327 static int
6329 {
6332 {
6333 /* don't allow undo in the middle of an operation */
6340 /* undo the last operation */
6346 {
6350 }
6351 /* move anchor point if undoing during line creation */
6353 {
6355 {
6362 }
6364 {
6368 /* this search is guaranteed to succeed */
6375 /* save both ends of line */
6380 /* check that the undo was of the right type */
6382 {
6383 /* wrong undo type, restore anchor points */
6390 }
6391 /* move to new anchor */
6396 /* check if an intermediate point was removed */
6398 {
6399 /* this search should find the restored line */
6407 {
6408 /* undo loses CONNECTEDFLAG and FOUNDFLAG */
6412 }
6417 }
6421 {
6424 }
6425 else
6426 {
6427 /* this search is guaranteed to succeed too */
6435 }
6438 }
6439 }
6441 {
6443 {
6447 }
6449 {
6452 /* guaranteed to succeed */
6464 }
6465 }
6466 /* undo the last destructive operation */
6469 }
6471 {
6473 {
6474 /* clear 'undo objects' list */
6478 }
6479 }
6482 }
6484 /* --------------------------------------------------------------------------- */
6490 /* %start-doc actions Redo
6492 This routine allows you to recover from the last undo command. You
6493 might want to do this if you thought that undo was going to revert
6494 something other than what it actually did (in case you are confused
6495 about which operations are un-doable), or if you have been backing up
6496 through a long undo list and over-shoot your stopping point. Any
6497 change that is made since the undo in question will trim the redo
6498 list. For example if you add ten lines, then undo three of them you
6499 could use redo to put them back, but if you move a line on the board
6500 before performing the redo, you will lose the ability to "redo" the
6501 three "undone" lines.
6503 %end-doc */
6505 static int
6507 {
6515 {
6519 {
6525 addedLines++;
6526 }
6527 }
6530 }
6532 /* --------------------------------------------------------------------------- */
6538 /* %start-doc actions Polygon
6540 Polygons need a special action routine to make life easier.
6542 @table @code
6544 @item Close
6545 Creates the final segment of the polygon. This may fail if clipping
6546 to 45 degree lines is switched on, in which case a warning is issued.
6548 @item PreviousPoint
6549 Resets the newly entered corner to the previous one. The Undo action
6550 will call Polygon(PreviousPoint) when appropriate to do so.
6552 @end table
6554 %end-doc */
6556 static int
6558 {
6561 {
6564 {
6565 /* close open polygon if possible */
6570 /* go back to the previous point */
6574 }
6576 }
6578 }
6580 /* --------------------------------------------------------------------------- */
6587 /* %start-doc actions RouteStyle
6589 %end-doc */
6591 static int
6593 {
6599 {
6602 {
6609 }
6610 }
6612 }
6615 /* --------------------------------------------------------------------------- */
6622 /* %start-doc actions MoveObject
6624 The @code{X} and @code{Y} are treated like @code{delta} is for many
6625 other objects. For each, if it's prefixed by @code{+} or @code{-},
6626 then that amount is relative. Otherwise, it's absolute. Units can be
6627 @code{mil} or @code{mm}; if unspecified, units are PCB's internal
6628 units, currently 1/100 mil.
6630 %end-doc */
6632 static int
6634 {
6648 {
6651 }
6664 }
6666 /* --------------------------------------------------------------------------- */
6674 /* %start-doc actions MoveToCurrentLayer
6676 Note that moving an element from a component layer to a solder layer,
6677 or from solder to component, won't automatically flip it. Use the
6678 @code{Flip()} action to do that.
6680 %end-doc */
6682 static int
6684 {
6687 {
6689 {
6691 {
6702 }
6709 }
6710 }
6712 }
6720 /* %start-doc actions SetSame
6722 When invoked over any line, arc, polygon, or via, this changes the
6723 current layer to be the layer that item is on, and changes the current
6724 sizes (thickness, keepaway, drill, etc) according to that item.
6726 %end-doc */
6728 static int
6730 {
6736 /* set layer current and size from line or arc */
6738 {
6778 }
6780 {
6783 }
6785 }
6788 /* --------------------------------------------------------------------------- */
6799 /* %start-doc actions SetFlag
6801 Turns the given flag on, regardless of its previous setting. See
6802 @code{ChangeFlag}.
6804 @example
6805 SetFlag(SelectedPins,thermal)
6806 @end example
6808 %end-doc */
6810 static int
6812 {
6817 }
6819 /* --------------------------------------------------------------------------- */
6830 /* %start-doc actions ClrFlag
6832 Turns the given flag off, regardless of its previous setting. See
6833 @code{ChangeFlag}.
6835 @example
6836 ClrFlag(SelectedLines,join)
6837 @end example
6839 %end-doc */
6841 static int
6843 {
6848 }
6850 /* --------------------------------------------------------------------------- */
6862 /* %start-doc actions ChangeFlag
6864 Toggles the given flag on the indicated object(s). The flag may be
6865 one of the flags listed above (square, octagon, thermal, join). The
6866 value may be the number 0 or 1. If the value is 0, the flag is
6867 cleared. If the value is 1, the flag is set.
6869 %end-doc */
6871 static int
6873 {
6882 }
6885 static void
6887 {
6892 {
6895 }
6897 {
6900 }
6902 {
6903 /* Note: these are backwards, because the flag is "clear" but
6904 the command is "join". */
6907 }
6908 else
6909 {
6912 }
6915 {
6917 {
6929 }
6971 }
6972 }
6974 /* --------------------------------------------------------------------------- */
6980 /* %start-doc actions ExecuteFile
6982 Lines starting with @code{#} are ignored.
6984 %end-doc */
6986 static int
6988 {
7001 {
7004 }
7009 {
7010 n++;
7013 /* eat the trailing newline */
7015 sp++;
7018 /* eat leading spaces and tabs */
7021 sp++;
7023 /*
7024 * if we have anything left and its not a comment line
7025 * then execute it
7026 */
7029 {
7030 /*Message ("%s : line %-3d : \"%s\"\n", fname, n, sp);*/
7032 }
7033 }
7037 {
7040 }
7043 }
7045 /* --------------------------------------------------------------------------- */
7047 static int
7049 {
7053 }
7055 /* --------------------------------------------------------------------------- */
7061 {
7068 {
7071 {
7074 }
7075 }
7076 END_LOOP;
7078 }
7082 {
7088 }
7090 static void
7092 {
7099 }
7101 /* ---------------------------------------------------------------- */
7108 /* %start-doc actions elementlist
7110 @table @code
7112 @item Start
7113 Indicates the start of an element list; call this before any Need
7114 actions.
7116 @item Need
7117 Searches the board for an element with a matching refdes.
7119 If found, the value and footprint are updated.
7121 If not found, a new element is created with the given footprint and value.
7123 @item Done
7124 Compares the list of elements needed since the most recent
7125 @code{start} with the list of elements actually on the board. Any
7126 elements that weren't listed are selected, so that the user may delete
7127 them.
7129 @end table
7131 %end-doc */
7135 static int
7137 {
7142 }
7144 static int
7146 {
7157 #ifdef DEBUG
7159 #endif
7162 {
7164 {
7166 }
7167 END_LOOP;
7171 }
7174 {
7176 {
7178 {
7180 }
7182 {
7183 /* Unnamed elements should remain untouched */
7185 }
7186 }
7187 END_LOOP;
7193 }
7201 argc --;
7202 argv ++;
7212 #ifdef DEBUG
7216 #endif
7221 {
7224 #ifdef DEBUG
7226 #endif
7227 /* Not on board, need to add it. */
7229 {
7230 number_of_footprints_not_found ++;
7232 }
7243 {
7246 }
7257 /* Place components onto center of board. */
7260 }
7263 {
7268 #ifdef DEBUG
7270 #endif
7271 /* Different footprint, we need to swap them out. */
7273 {
7274 number_of_footprints_not_found ++;
7276 }
7291 {
7296 }
7302 }
7304 /* Now reload footprint */
7317 #ifdef DEBUG
7319 #endif
7322 }
7324 /* ---------------------------------------------------------------- */
7331 /* %start-doc actions elementsetattr
7333 If a value is specified, the named attribute is added (if not already
7334 present) or changed (if it is) to the given value. If the value is
7335 not specified, the given attribute is removed if present.
7337 %end-doc */
7339 static int
7341 {
7347 {
7349 }
7356 {
7358 {
7361 }
7362 }
7363 END_LOOP;
7366 {
7369 }
7374 {
7377 }
7379 {
7381 }
7383 {
7385 }
7388 }
7390 /* ---------------------------------------------------------------- */
7395 /* %start-doc actions execcommand
7397 Runs the given command, which is a system executable.
7399 %end-doc */
7401 static int
7403 {
7407 {
7409 }
7416 }
7418 /* ---------------------------------------------------------------- */
7420 static int
7422 {
7423 #ifdef HAVE__SPAWNVP
7427 else
7429 #else
7433 {
7434 /* error */
7437 }
7439 {
7440 /* Child */
7443 }
7444 else
7445 {
7447 /* Parent */
7449 }
7451 #endif
7452 }
7454 /* ---------------------------------------------------------------- */
7456 /*!
7457 * \brief Creates a new temporary file name.
7458 *
7459 * Hopefully the operating system provides a mkdtemp() function to
7460 * securily create a temporary directory with mode 0700.\n
7461 * If so then that directory is created and the returned string is made
7462 * up of the directory plus the name variable.\n
7463 * For example:\n
7464 *
7465 * tempfile_name_new ("myfile") might return
7466 * "/var/tmp/pcb.123456/myfile".
7467 *
7468 * If mkdtemp() is not available then 'name' is ignored and the
7469 * insecure tmpnam() function is used.
7470 *
7471 * Files/names created with tempfile_name_new() should be unlinked
7472 * with tempfile_unlink to make sure the temporary directory is also
7473 * removed when mkdtemp() is used.
7474 */
7477 {
7479 #ifdef HAVE_MKDTEMP
7482 #endif
7486 #ifdef HAVE_MKDTEMP
7492 /* FIXME -- what about win32? */
7495 }
7505 }
7515 }
7522 ;
7532 #undef TEMPLATE
7533 #else
7534 /*
7535 * tmpnam() uses a static buffer so strdup() the result right away
7536 * in case someone decides to create multiple temp names.
7537 */
7539 #ifdef __WIN32__
7540 {
7541 /* Guile doesn't like \ separators */
7546 }
7547 #endif
7548 #endif
7551 }
7553 /* ---------------------------------------------------------------- */
7555 /*!
7556 * \brief Unlink a temporary file.
7557 *
7558 * If we have mkdtemp() then our temp file lives in a temporary
7559 * directory and we need to remove that directory too.
7560 */
7561 static int
7563 {
7564 #ifdef DEBUG
7565 /* SDB says: Want to keep old temp files for examiniation when debugging */
7569 #ifdef HAVE_MKDTEMP
7574 /* it is possible that the file was never created so it is OK if the
7575 unlink fails */
7577 /* now figure out the directory name to remove */
7584 /*
7585 * at this point, e *should* point to the end of the directory part
7586 * but lets make sure.
7587 */
7592 }
7596 __FUNCTION__);
7600 }
7602 /* name was allocated with malloc */
7606 /*
7607 * FIXME - should also return -1 if the temp file exists and was not
7608 * removed.
7609 */
7612 }
7621 }
7628 }
7630 /* ---------------------------------------------------------------- */
7639 /* %start-doc actions Import
7641 Imports element and netlist data from the schematics (or some other
7642 source). The first parameter, which is optional, is the mode. If not
7643 specified, the @code{import::mode} attribute in the PCB is used.
7644 @code{gnetlist} means gnetlist is used to obtain the information from
7645 the schematics. @code{make} invokes @code{make}, assuming the user
7646 has a @code{Makefile} in the current directory. The @code{Makefile}
7647 will be invoked with the following variables set:
7649 @table @code
7651 @item PCB
7652 The name of the .pcb file
7654 @item SRCLIST
7655 A space-separated list of source files
7657 @item OUT
7658 The name of the file in which to put the command script, which may
7659 contain any @pcb{} actions. By default, this is a temporary file
7660 selected by @pcb{}, but if you specify an @code{import::outfile}
7661 attribute, that file name is used instead (and not automatically
7662 deleted afterwards).
7664 @end table
7666 The target specified to be built is the first of these that apply:
7668 @itemize @bullet
7670 @item
7671 The target specified by an @code{import::target} attribute.
7673 @item
7674 The output file specified by an @code{import::outfile} attribute.
7676 @item
7677 If nothing else is specified, the target is @code{pcb_import}.
7679 @end itemize
7681 If you specify an @code{import::makefile} attribute, then "-f <that
7682 file>" will be added to the command line.
7684 If you specify the mode, you may also specify the source files
7685 (schematics). If you do not specify any, the list of schematics is
7686 obtained by reading the @code{import::src@var{N}} attributes (like
7687 @code{import::src0}, @code{import::src1}, etc).
7689 For compatibility with future extensions to the import file format,
7690 the generated file @emph{must not} start with the two characters
7691 @code{#%}.
7693 If a temporary file is needed the @code{TMPDIR} environment variable
7694 is used to select its location.
7696 Note that the programs @code{gnetlist} and @code{make} may be
7697 overridden by the user via the @code{make-program} and @code{gnetlist}
7698 @code{pcb} settings (i.e. in @code{~/.pcb/settings} or on the command
7699 line).
7701 If @pcb{} cannot determine which schematic(s) to import from, the GUI
7702 is called to let user choose (see @code{ImportGUI()}).
7704 Note that Import() doesn't delete anything - after an Import, elements
7705 which shouldn't be on the board are selected and may be removed once
7706 it's determined that the deletion is appropriate.
7708 If @code{Import()} is called with @code{setnewpoint}, then the location
7709 of new components can be specified. This is where parts show up when
7710 they're added to the board. The default is the center of the board.
7712 @table @code
7714 @item Import(setnewpoint)
7716 Prompts the user to click on the board somewhere, uses that point. If
7717 called by a hotkey, uses the current location of the crosshair.
7719 @item Import(setnewpoint,mark)
7721 Uses the location of the mark. If no mark is present, the point is
7722 not changed.
7724 @item Import(setnewpoint,center)
7726 Resets the point to the center of the board.
7728 @item Import(setnewpoint,X,Y,units)
7730 Sets the point to the specific coordinates given. Example:
7731 @code{Import(setnewpoint,50,25,mm)}
7733 @end table
7735 Note that the X and Y locations are stored in attributes named
7736 @code{import::newX} and @code{import::newY} so you could change them
7737 manually if you wished.
7739 Calling @code{Import(setdisperse,D,units)} sets how much the newly
7740 placed elements are dispersed relative to the set point. For example,
7741 @code{Import(setdisperse,10,mm)} will offset each part randomly up to
7742 10mm away from the point. The default dispersion is 1/10th of the
7743 smallest board dimension. Dispersion is saved in the
7744 @code{import::disperse} attribute.
7746 %end-doc */
7748 static int
7750 {
7755 #ifdef DEBUG
7757 #endif
7762 {
7769 {
7772 }
7774 {
7777 }
7778 else
7783 }
7786 {
7796 {
7798 }
7800 {
7804 }
7806 {
7812 }
7814 {
7817 }
7818 else
7819 {
7822 }
7829 }
7837 {
7840 }
7843 {
7849 nsources ++;
7855 {
7859 nsources ++;
7864 }
7865 }
7868 {
7869 /* Replace .pcb with .sch and hope for the best. */
7891 {
7894 }
7900 }
7903 {
7911 }
7924 #ifdef DEBUG
7928 #endif
7931 {
7934 }
7936 #ifdef DEBUG
7937 printf("ActionImport: =========== About to run ActionExecuteFile, file = %s ============\n", tmpfile);
7938 #endif
7946 }
7948 {
7968 else
7969 {
7975 }
7977 }
7985 {
7989 }
7998 {
8001 }
8006 {
8013 }
8024 }
8025 else
8026 {
8029 }
8034 #ifdef DEBUG
8036 #endif
8039 }
8041 /* ------------------------------------------------------------ */
8051 /* %start-doc actions Attributes
8053 This just pops up a dialog letting the user edit the attributes of the
8054 pcb, an element, or a layer.
8056 %end-doc */
8059 static int
8061 {
8070 {
8073 }
8076 {
8078 {
8081 }
8084 {
8087 {
8092 {
8095 }
8097 {
8100 }
8101 }
8108 }
8111 {
8115 {
8117 {
8119 n_found ++;
8120 }
8121 }
8122 END_LOOP;
8124 {
8127 }
8129 {
8136 else
8137 {
8140 }
8141 }
8144 {
8148 }
8149 else
8150 {
8152 }
8156 }
8160 }
8163 }
8165 /* ------------------------------------------------------------ */
8170 /* %start-doc actions Attributes
8172 This smashes the given object into pieces in-place on the PCB.
8174 %end-doc */
8177 static void
8179 {
8180 Cardinal group;
8196 {
8203 {
8206 }
8207 }
8208 END_LOOP;
8210 {
8218 }
8219 END_LOOP;
8221 {
8232 }
8233 END_LOOP;
8235 {
8242 {
8245 }
8246 }
8247 END_LOOP;
8249 }
8251 /*---------------------------------------------------------------------------
8252 *
8253 * break selected element(s) into pieces
8254 */
8255 static int
8257 {
8264 {
8266 {
8270 {
8274 }
8280 {
8282 {
8284 {
8287 }
8288 }
8289 END_LOOP;
8290 }
8295 }
8298 {
8302 }
8304 }
8307 }
8310 static const char repairdrills_syntax[] = N_("RepairDrills(CreatePins|CreateVias|CreateHoles,<layername>)");
8311 static const char repairdrills_help[] = N_("Repair and reconstruct elements containing pins, or discrete vias, where two matching single-pad elements are found (top and bottom sides, and a 0-length line represeting the drill size on the named layer.");
8315 {
8320 {
8325 }
8328 }
8330 /*---------------------------------------------------------------------------
8331 *
8332 * break selected element(s) into pieces
8333 */
8334 static int
8336 {
8360 /* ITERATE OVER ALL LINE SEGMENTS ON "drill_layer" */
8362 {
8369 /* Pass over any lines which are not zero length */
8374 /* Now we have a target "drill", of width line->Thickness, we need to check
8375 * for corresponding pads on the top and bottom layers for it to mate with.
8376 *
8377 * XXX: Should we delete those here, and make a list of new vias / pins to add?
8378 */
8379 pcb_printf ("Found potential drill at (%$ms, %$ms) width is %$ms\t", line->Point1.X, line->Point1.Y, line->Thickness);
8381 /* Find a top side pad which corresponds to the drill location */
8383 if (SearchObjectByLocation (PAD_TYPE, (void **)&top_pad_element, (void **)&top_pad, (void **)&dummy, line->Point1.X, line->Point1.Y, 0) != PAD_TYPE ||
8388 {
8391 }
8394 /* Create a hole at given location */
8399 }
8401 /* Find a bottom side pad which corresponds to the drill location */
8403 if (SearchObjectByLocation (PAD_TYPE, (void **)&bottom_pad_element, (void **)&bottom_pad, (void **)&dummy, line->Point1.X, line->Point1.Y, 0) != PAD_TYPE ||
8408 {
8411 }
8413 /* If the top and bottom pads are not the same radius, give up */
8415 {
8418 }
8425 }
8426 END_LOOP;
8432 }
8434 /* --------------------------------------------------------------------------- */
8439 "SetViaLayers(Object|SelectedVias|Selected,[c|-|from],[c|-|to])"
8440 );
8445 /* %start-doc actions setvialayers
8447 Specifies layers, which are connected by via.
8449 @table @code
8451 @item TH|ThroughHole
8452 The vias will be set as through-hole, connecting all layers
8454 @item from
8455 layer name or layer number of the first layer to be connected by via; "-" stands for unchanged, "c" stands for currently selected layer
8457 @item to
8458 layer name or layer number of the last layer to be connected by via; "-" stands for unchanged, "c" stands for currently selected layer
8460 @end table
8462 If no parameter us used, dialog is displayed (if implemented in the respective GUI HID).
8465 %end-doc */
8467 static bool
8469 {
8473 {
8476 }
8479 {
8481 {
8484 }
8485 }
8489 {
8492 }
8498 }
8500 static int
8502 {
8506 Cardinal layer_from ;
8513 {
8516 }
8519 {
8522 }
8523 else
8524 {
8527 {
8530 }
8531 }
8533 /* ensure that layer_from < layer_to */
8537 {
8543 }
8549 {
8551 {
8558 {
8561 else
8562 {
8564 {
8566 }
8567 }
8568 }
8573 {
8575 }
8577 }
8578 }
8581 }
8582 /* --------------------------------------------------------------------------- */
8584 HID_Action action_action_list[] = {
8587 ,
8590 ,
8593 ,
8596 ,
8599 ,
8602 ,
8605 ,
8608 ,
8611 ,
8614 ,
8617 ,
8620 ,
8623 ,
8626 ,
8629 ,
8632 ,
8635 ,
8638 ,
8641 ,
8644 ,
8647 ,
8650 ,
8653 ,
8656 ,
8659 ,
8662 ,
8665 ,
8668 ,
8671 ,
8674 ,
8677 ,
8680 ,
8683 ,
8686 ,
8689 ,
8692 ,
8695 ,
8698 ,
8701 ,
8704 ,
8707 ,
8710 ,
8713 ,
8716 ,
8719 ,
8722 ,
8725 ,
8728 ,
8731 ,
8734 ,
8737 ,
8740 ,
8743 ,
8746 ,
8749 ,
8752 ,
8755 ,
8758 ,
8761 ,
8764 ,
8766 ,
8769 ,
8772 ,
8775 ,
8778 ,
8781 ,
8782 };