Commit 6e42145d authored by Pekka Pessi's avatar Pekka Pessi

s2check: added

darcs-hash:20090115144056-db55f-0baa02497db3bfbe38084b850eb5d80662f846ff.gz
parent 664c7341
......@@ -334,6 +334,7 @@ libsofia-sip-ua/tport/Makefile
libsofia-sip-ua/url/Doxyfile
libsofia-sip-ua/url/Makefile
libsofia-sip-ua/features/sofia-sip/sofia_features.h
s2check/Makefile
libsofia-sip-ua-glib/Makefile
libsofia-sip-ua-glib/su-glib/Makefile
libsofia-sip-ua-glib/su-glib/Doxyfile
......
#
# Makefile.am for Sofia-SIP module and unit testing
#
# Copyright (C) 2009 Nokia Corporation
# Contact: Pekka Pessi <pekka.pessi@nokia.com>
# Licensed under LGPL. See file COPYING.
# ----------------------------------------------------------------------
# Header paths
INCLUDES = $(INTERNAL_INCLUDES)
# ----------------------------------------------------------------------
# Build targets
noinst_LIBRARIES = libs2.a
# ----------------------------------------------------------------------
# Rules for building the targets
libs2_a_SOURCES = s2check.h s2tcase.c \
s2_localinfo.h s2_localinfo.c
# ----------------------------------------------------------------------
# Install and distribution rules
EXTRA_DIST =
# ----------------------------------------------------------------------
# Tests
TESTS =
# ----------------------------------------------------------------------
# Sofia specific rules
include $(top_srcdir)/rules/sofia.am
/*
* This file is part of the Sofia-SIP package
*
* Copyright (C) 2009 Nokia Corporation.
*
* Contact: Pekka Pessi <pekka.pessi@nokia.com>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License
* as published by the Free Software Foundation; either version 2.1 of
* the License, or (at your option) any later version.
*
* This library 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
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
* 02110-1301 USA
*
*/
/**@CFILE s2_localinfo.c
*
* @brief s2_localinfo() stub returning well-known addresses for testing.
*
* @author Pekka Pessi <Pekka.Pessi@nokia.com>
*/
#include "config.h"
#include <sofia-sip/hostdomain.h>
#include <sofia-sip/su_string.h>
#include <sofia-sip/su_alloc.h>
#include <stdlib.h>
#include <assert.h>
#define SU_LOCALINFO_TEST 1
#define su_getlocalinfo s2_getlocalinfo
#define su_freelocalinfo s2_freelocalinfo
#define su_gli_strerror s2_gli_strerror
#define su_copylocalinfo s2_copylocalinfo
#define su_sockaddr_scope s2_sockaddr_scope
#define su_getlocalip s2_getlocalip
#include "su_localinfo.c"
static char const *default_ifaces[] = {
"lo0\0" "127.0.0.1\0" "::1\0",
NULL
};
static char const **ifaces = default_ifaces;
void s2_localinfo_ifaces(char const **replace_ifaces)
{
ifaces = replace_ifaces;
}
int
s2_getlocalinfo(su_localinfo_t const *hints,
su_localinfo_t **return_localinfo)
{
int error = 0, ip4 = 0, ip6 = 0, i;
su_localinfo_t *result = NULL, **rr = &result;
su_localinfo_t hh[1] = {{ 0 }};
assert(return_localinfo);
*return_localinfo = NULL;
if (hints) {
/* Copy hints so that it can be modified */
*hh = *hints;
if (hh->li_canonname)
hh->li_flags |= LI_CANONNAME;
}
hints = hh;
switch (hh->li_family) {
#if SU_HAVE_IN6
case AF_INET6:
if (hh->li_flags & LI_V4MAPPED)
ip6 = ip4 = 1, hh->li_family = 0;
else
ip6 = 1;
break;
#endif
case AF_INET:
ip4 = 1;
break;
case 0:
ip6 = ip4 = 1;
break;
default:
return -1;
}
for (i = 0; ifaces[i]; i++) {
char const *iface = ifaces[i], *address = iface;
su_sockaddr_t su[1];
for (;(address += strlen(address) + 1)[0];) {
su_localinfo_t *li = NULL;
int scope = 0;
memset(su, 0, sizeof su);
if (0)
;
#if SU_HAVE_IN6
else if (ip4 &&
(hints->li_flags & LI_V4MAPPED) != 0 &&
host_is_ip4_address(address)) {
int32_t mapped;
su->su_len = (sizeof su->su_sin6);
su_inet_pton(su->su_family = AF_INET6,
address,
&mapped);
((int32_t*)&su->su_sin6.sin6_addr)[2] = htonl(0xffff);
((int32_t*)&su->su_sin6.sin6_addr)[3] = mapped;
scope = li_scope4(mapped);
}
else if (ip6 && host_is_ip6_address(address)) {
su->su_len = (sizeof su->su_sin6);
su_inet_pton(su->su_family = AF_INET6,
address,
&su->su_sin6.sin6_addr);
scope = li_scope6(&su->su_sin6.sin6_addr);
}
#endif
else if (ip4 && host_is_ip4_address(address)) {
su->su_len = (sizeof su->su_sin);
su_inet_pton(su->su_family = AF_INET,
address,
&su->su_sin.sin_addr);
scope = li_scope4(su->su_sin.sin_addr.s_addr);
}
else
continue;
if (scope == 0)
continue;
if (hints->li_scope && (hints->li_scope & scope) == 0)
continue;
if (hints->li_index && hints->li_index != i + 1)
continue;
if (hints->li_ifname && strcmp(hints->li_ifname, iface) != 0)
continue;
if (hints->li_family && hints->li_family != su->su_family)
continue;
if (hints->li_canonname && !su_casematch(address, hints->li_canonname))
continue;
li = calloc(1, (sizeof *li) + (sizeof *su) + strlen(iface) + 1);
li->li_family = su->su_family;
li->li_scope = scope;
li->li_index = i + 1;
li->li_addrlen = su_sockaddr_size(su);
li->li_addr = memcpy((li + 1), su, (sizeof *su));
if (hints->li_flags & LI_IFNAME)
li->li_ifname = strcpy((char *)li->li_addr + li->li_addrlen, iface);
if ((hints->li_flags & LI_CANONNAME) || hints->li_canonname) {
li->li_flags |= LI_NUMERIC;
li->li_canonname = su_strdup(NULL, address);
}
#define LI_MAPPED(li) \
((li)->li_family == AF_INET6 && \
(IN6_IS_ADDR_V4MAPPED(&(li)->li_addr->su_sin6.sin6_addr) || \
IN6_IS_ADDR_V4COMPAT(&(li)->li_addr->su_sin6.sin6_addr)))
/* Insert according to scope, mappedness and family */
for (rr = &result; *rr; rr = &(*rr)->li_next) {
if ((*rr)->li_scope < li->li_scope)
break;
#if SU_HAVE_IN6
if (LI_MAPPED(*rr) > LI_MAPPED(li))
break;
#endif
if ((*rr)->li_family < li->li_family)
break;
}
li->li_next = *rr;
*rr = li;
}
}
*return_localinfo = result;
if (result == NULL)
error = ELI_NOADDRESS;
return error;
}
/*
* This file is part of the Sofia-SIP package
*
* Copyright (C) 2009 Nokia Corporation.
*
* Contact: Pekka Pessi <pekka.pessi@nokia.com>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License
* as published by the Free Software Foundation; either version 2.1 of
* the License, or (at your option) any later version.
*
* This library 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
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
* 02110-1301 USA
*
*/
#ifndef S2CHECK_H
/** Defined when <s2check.h> has been included. */
#define S2CHECK_H
/**@internal @file s2check.h
*
* @brief Check-based testing
*
* @author Pekka Pessi <Pekka.Pessi@nokia.com>
*/
#include <check.h>
SOFIA_BEGIN_DECLS
#undef tcase_add_test
/* Redirect tcase_add_test() to our function */
#define tcase_add_test(tc, tf) s2_tcase_add_test(tc, tf, "" #tf "")
void s2_tcase_add_test(TCase *, TFun, char const *name);
SOFIA_END_DECLS
#endif /* S2CHECK_H */
/*
* This file is part of the Sofia-SIP package
*
* Copyright (C) 2009 Nokia Corporation.
*
* Contact: Pekka Pessi <pekka.pessi@nokia.com>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License
* as published by the Free Software Foundation; either version 2.1 of
* the License, or (at your option) any later version.
*
* This library 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
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
* 02110-1301 USA
*
*/
#include "config.h"
#if HAVE_CHECK
#if HAVE_FNMATCH_H
#include <fnmatch.h>
#endif
static char const * const default_patterns[] = { "*", NULL };
static char const * const *test_patterns = default_patterns;
#undef tcase_add_test
/** tcase_add_test() replacement.
*
* A special version of tcase_add_test() that inserts test function into
* tcase only if its name matches given pattern.
*/
void s2_tcase_add_test(TCase *tc, TFun tf, char const *name)
{
char const * const *patterns;
#if HAVE_FNMATCH_H
for (patterns = test_patterns; *patterns; patterns++) {
if (!fnmatch(*patterns, name, 0)) {
if (strcmp(*patterns, "*")) {
printf("%s: running\n", name);
}
tcase_add_test(tc, tf, name, 0, 0, 1);
return;
}
}
#else
for (patterns = test_patterns; *patterns; patterns++) {
if (!strcmp(*patterns, name) || !strcmp(*patterns, "*")) {
if (strcmp(*patterns, "*")) {
printf("%s: running\n", name);
}
tcase_add_test(tc, tf, name, 0, 0, 1);
return;
}
}
#endif
}
/** Select tests based on pattern.
*
* Allow easy selection of test cases to run. Pattern can be a shell glob,
* or consists of multiple comma-separated patterns.
*/
void s2_select_tests(char const *pattern)
{
size_t i;
char *cases, *s, **patterns;
if (!pattern)
return;
cases = strdup(pattern);
/* Count commas */
for (i = 2, s = cases; (s = strchr(s, ',')); s++)
i++;
patterns = calloc(i, sizeof *patterns);
/* Split by commas */
for (i = 0, s = cases;; i++) {
patterns[i] = s;
if (s == NULL)
break;
s = strchr(s, ',');
if (s)
*s++ = '\0';
}
test_patterns = (char const * const *)patterns;
}
#endif /* HAVE_CHECK */
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment