Index: trunk/src/search.c
===================================================================
--- trunk/src/search.c	(revision 20120)
+++ trunk/src/search.c	(revision 20121)
@@ -1551,3 +1551,56 @@
 	return 1;
 }
 
+
+pcb_r_dir_t pcb_search_data_by_loc(pcb_data_t *data, pcb_objtype_t type, const pcb_box_t *query_box, pcb_r_dir_t (*cb_)(void *closure, const pcb_any_obj_t *obj, void *box), void *closure)
+{
+	pcb_layer_t *ly;
+	pcb_layer_id_t lid;
+	pcb_r_dir_t res;
+	const pcb_rtree_box_t *query = (const pcb_rtree_box_t *)query_box;
+	pcb_rtree_dir_t (*cb)(void *, void *, const pcb_rtree_box_t *) = (pcb_rtree_dir_t(*)(void *, void *, const pcb_rtree_box_t *))cb_;
+
+	if ((type & PCB_OBJ_PSTK) && (data->padstack_tree != NULL)) {
+		res = pcb_rtree_search_any(data->padstack_tree, query, NULL, cb, closure, NULL);
+		if (res & pcb_RTREE_DIR_STOP)
+			return res;
+	}
+
+	if ((type & PCB_OBJ_SUBC) && (data->subc_tree != NULL)) {
+		res = pcb_rtree_search_any(data->subc_tree, query, NULL, cb, closure, NULL);
+		if (res & pcb_RTREE_DIR_STOP)
+			return res;
+	}
+
+	if ((type & PCB_OBJ_RAT) && (data->rat_tree != NULL)) {
+		res = pcb_rtree_search_any(data->rat_tree, query, NULL, cb, closure, NULL);
+		if (res & pcb_RTREE_DIR_STOP)
+			return res;
+	}
+
+	for(lid = 0, ly = data->Layer; lid < data->LayerN; lid++,ly++) {
+
+		if ((type & PCB_OBJ_ARC) && (ly->arc_tree != NULL)) {
+			res = pcb_rtree_search_any(ly->arc_tree, query, NULL, cb, closure, NULL);
+			if (res & pcb_RTREE_DIR_STOP)
+				return res;
+		}
+		if ((type & PCB_OBJ_LINE) && (ly->line_tree != NULL)) {
+			res = pcb_rtree_search_any(ly->line_tree, query, NULL, cb, closure, NULL);
+			if (res & pcb_RTREE_DIR_STOP)
+				return res;
+		}
+		if ((type & PCB_OBJ_POLY) && (ly->polygon_tree != NULL)) {
+			res = pcb_rtree_search_any(ly->polygon_tree, query, NULL, cb, closure, NULL);
+			if (res & pcb_RTREE_DIR_STOP)
+				return res;
+		}
+		if ((type & PCB_OBJ_TEXT) && (ly->text_tree != NULL)) {
+			res = pcb_rtree_search_any(ly->text_tree, query, NULL, cb, closure, NULL);
+			if (res & pcb_RTREE_DIR_STOP)
+				return res;
+		}
+
+	}
+}
+
Index: trunk/src/search_r.h
===================================================================
--- trunk/src/search_r.h	(nonexistent)
+++ trunk/src/search_r.h	(revision 20121)
@@ -0,0 +1,37 @@
+/*
+ *                            COPYRIGHT
+ *
+ *  pcb-rnd, interactive printed circuit board design
+ *  Copyright (C) 2018 Tibor 'Igor2' Palinkas
+ *
+ *  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, write to the Free Software
+ *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ *  Contact:
+ *    Project page: http://repo.hu/projects/pcb-rnd
+ *    lead developer: email to pcb-rnd (at) igor2.repo.hu
+ *    mailing list: pcb-rnd (at) list.repo.hu (send "subscribe")
+ */
+
+/* Search functions with rtree callbacks; implementation: in search.c */
+
+#ifndef PCB_SEARCH_R_H
+#define PCB_SEARCH_R_H
+
+#include "rtree.h"
+
+/* Search data for given object types within a box using the usual rtree conventions for the callback */
+pcb_r_dir_t pcb_search_data_by_loc(pcb_data_t *data, pcb_objtype_t type, const pcb_box_t *query_box, pcb_r_dir_t (*cb_)(void *closure, const pcb_any_obj_t *obj, void *box), void *closure);
+
+#endif