Home | History | Annotate | Line # | Download | only in libexecinfo
t_backtrace.c revision 1.5
      1  1.5     njoly /*	$NetBSD: t_backtrace.c,v 1.5 2012/06/02 14:52:28 njoly Exp $	*/
      2  1.1  christos 
      3  1.1  christos /*-
      4  1.1  christos  * Copyright (c) 2012 The NetBSD Foundation, Inc.
      5  1.1  christos  * All rights reserved.
      6  1.1  christos  *
      7  1.1  christos  * This code is derived from software contributed to The NetBSD Foundation
      8  1.1  christos  * by Christos Zoulas.
      9  1.1  christos  *
     10  1.1  christos  * Redistribution and use in source and binary forms, with or without
     11  1.1  christos  * modification, are permitted provided that the following conditions
     12  1.1  christos  * are met:
     13  1.1  christos  * 1. Redistributions of source code must retain the above copyright
     14  1.1  christos  *    notice, this list of conditions and the following disclaimer.
     15  1.1  christos  * 2. Redistributions in binary form must reproduce the above copyright
     16  1.1  christos  *    notice, this list of conditions and the following disclaimer in the
     17  1.1  christos  *    documentation and/or other materials provided with the distribution.
     18  1.1  christos  *
     19  1.1  christos  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  1.1  christos  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  1.1  christos  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  1.1  christos  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  1.1  christos  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  1.1  christos  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  1.1  christos  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  1.1  christos  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  1.1  christos  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  1.1  christos  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  1.1  christos  * POSSIBILITY OF SUCH DAMAGE.
     30  1.1  christos  */
     31  1.1  christos #include <sys/cdefs.h>
     32  1.5     njoly __RCSID("$NetBSD: t_backtrace.c,v 1.5 2012/06/02 14:52:28 njoly Exp $");
     33  1.1  christos 
     34  1.1  christos #include <atf-c.h>
     35  1.3    martin #include <atf-c/config.h>
     36  1.1  christos #include <string.h>
     37  1.1  christos #include <stdlib.h>
     38  1.1  christos #include <execinfo.h>
     39  1.1  christos 
     40  1.1  christos #ifndef __arraycount
     41  1.1  christos #define __arraycount(a) (sizeof(a) / sizeof(a[0]))
     42  1.1  christos #endif
     43  1.1  christos 
     44  1.1  christos static void __attribute__((__noinline__))
     45  1.1  christos myfunc3(size_t ncalls)
     46  1.1  christos {
     47  1.1  christos 	static const char *top[] = { "myfunc", "atfu_backtrace_fmt_basic_body",
     48  1.1  christos 	    "atf_tc_run", "atf_tp_main", "main", "___start" };
     49  1.1  christos 	size_t j, nptrs;
     50  1.1  christos 	void *buffer[ncalls + 10];
     51  1.1  christos 	char **strings;
     52  1.1  christos 
     53  1.1  christos 	nptrs = backtrace(buffer, __arraycount(buffer));
     54  1.2    martin 	ATF_REQUIRE_EQ(nptrs, ncalls + 8);
     55  1.1  christos 
     56  1.1  christos 	strings = backtrace_symbols_fmt(buffer, nptrs, "%n");
     57  1.1  christos 
     58  1.1  christos 	ATF_CHECK(strings != NULL);
     59  1.1  christos 	ATF_CHECK_STREQ(strings[0], "myfunc3");
     60  1.1  christos 	ATF_CHECK_STREQ(strings[1], "myfunc2");
     61  1.1  christos 
     62  1.1  christos 	for (j = 2; j < ncalls + 2; j++)
     63  1.1  christos 		ATF_CHECK_STREQ(strings[j], "myfunc1");
     64  1.1  christos 
     65  1.1  christos 	for (size_t i = 0; j < nptrs; i++, j++)
     66  1.1  christos 		ATF_CHECK_STREQ(strings[j], top[i]);
     67  1.1  christos 
     68  1.1  christos 	free(strings);
     69  1.1  christos }
     70  1.1  christos 
     71  1.1  christos static void __attribute__((__noinline__))
     72  1.1  christos myfunc2(size_t ncalls)
     73  1.1  christos {
     74  1.1  christos 	myfunc3(ncalls);
     75  1.1  christos }
     76  1.1  christos 
     77  1.1  christos static void __attribute__((__noinline__))
     78  1.1  christos myfunc1(size_t origcalls, size_t ncalls)
     79  1.1  christos {
     80  1.1  christos 	if (ncalls > 1)
     81  1.1  christos 		myfunc1(origcalls, ncalls - 1);
     82  1.1  christos 	else
     83  1.1  christos 		myfunc2(origcalls);
     84  1.1  christos }
     85  1.1  christos 
     86  1.1  christos static void __attribute__((__noinline__))
     87  1.1  christos myfunc(size_t ncalls)
     88  1.1  christos {
     89  1.1  christos 	myfunc1(ncalls, ncalls);
     90  1.1  christos }
     91  1.1  christos 
     92  1.1  christos ATF_TC(backtrace_fmt_basic);
     93  1.1  christos ATF_TC_HEAD(backtrace_fmt_basic, tc)
     94  1.1  christos {
     95  1.1  christos         atf_tc_set_md_var(tc, "descr", "Test backtrace_fmt(3)");
     96  1.1  christos }
     97  1.1  christos 
     98  1.1  christos ATF_TC_BODY(backtrace_fmt_basic, tc)
     99  1.1  christos {
    100  1.4    jruoho 	const char *arch = atf_config_get("atf_arch");
    101  1.3    martin 
    102  1.5     njoly         if (strcmp(arch, "x86_64") != 0)
    103  1.3    martin         	atf_tc_skip("PR toolchain/46490: libexecinfo only"
    104  1.3    martin 		    " works on amd64 currently");
    105  1.3    martin 
    106  1.1  christos 	myfunc(12);
    107  1.1  christos }
    108  1.1  christos 
    109  1.1  christos ATF_TP_ADD_TCS(tp)
    110  1.1  christos {
    111  1.1  christos 
    112  1.1  christos 	ATF_TP_ADD_TC(tp, backtrace_fmt_basic);
    113  1.1  christos 
    114  1.1  christos 	return atf_no_error();
    115  1.1  christos }
    116