emo/xbps
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
9a69c5e349
xbps/tests/libxbps/plist_remove/main.c

231 lines
6.9 KiB
C
Raw Normal View History

Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
/*-
* Copyright (c) 2012 Juan Romero Pardines.
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*-
*/
#include <atf-c.h>
#include <xbps_api.h>
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
#include <string.h>
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
static const char dictxml[] =
"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
"<!DOCTYPE plist PUBLIC \"-//Apple Computer//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n"
"<plist version=\"1.0\">\n"
"<dict>\n"
" <key>packages</key>\n"
" <array>\n"
" <dict>\n"
" <key>pkgname</key>\n"
" <string>afoo</string>\n"
" <key>version</key>\n"
libxbps: require an underscore in strings to detect correctly pkgname/version.
2012-06-05 14:28:39 +05:30
" <string>1.1_1</string>\n"
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
" <key>pkgver</key>\n"
libxbps: require an underscore in strings to detect correctly pkgname/version.
2012-06-05 14:28:39 +05:30
" <string>afoo-1.1_1</string>\n"
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
" </dict>\n"
" <dict>\n"
" <key>pkgname</key>\n"
" <string>foo</string>\n"
" <key>version</key>\n"
libxbps: require an underscore in strings to detect correctly pkgname/version.
2012-06-05 14:28:39 +05:30
" <string>2.0_1</string>\n"
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
" <key>pkgver</key>\n"
libxbps: require an underscore in strings to detect correctly pkgname/version.
2012-06-05 14:28:39 +05:30
" <string>foo-2.0_1</string>\n"
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
" </dict>\n"
" </array>\n"
"</dict>\n"
"</plist>\n";
static const char dictxml2[] =
"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
"<!DOCTYPE plist PUBLIC \"-//Apple Computer//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n"
"<plist version=\"1.0\">\n"
"<dict>\n"
" <key>packages</key>\n"
" <array>\n"
" <dict>\n"
" <key>pkgname</key>\n"
" <string>foo</string>\n"
" <key>version</key>\n"
libxbps: require an underscore in strings to detect correctly pkgname/version.
2012-06-05 14:28:39 +05:30
" <string>2.0_1</string>\n"
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
" <key>pkgver</key>\n"
libxbps: require an underscore in strings to detect correctly pkgname/version.
2012-06-05 14:28:39 +05:30
" <string>foo-2.0_1</string>\n"
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
" </dict>\n"
" </array>\n"
"</dict>\n"
"</plist>\n";
static const char axml[] =
"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
"<!DOCTYPE plist PUBLIC \"-//Apple Computer//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n"
"<plist version=\"1.0\">\n"
"<array>\n"
libxbps: require an underscore in strings to detect correctly pkgname/version.
2012-06-05 14:28:39 +05:30
" <string>foo-1.0_1</string>\n"
" <string>blah-2.0_1</string>\n"
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
"</array>\n"
"</plist>\n";
static const char axml2[] =
"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
"<!DOCTYPE plist PUBLIC \"-//Apple Computer//DTD PLIST 1.0//EN\" \"http://www.apple.com/DTDs/PropertyList-1.0.dtd\">\n"
"<plist version=\"1.0\">\n"
"<array>\n"
libxbps: require an underscore in strings to detect correctly pkgname/version.
2012-06-05 14:28:39 +05:30
" <string>blah-2.0_1</string>\n"
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
"</array>\n"
"</plist>\n";
ATF_TC(remove_pkg_from_array_by_name_test);
ATF_TC_HEAD(remove_pkg_from_array_by_name_test, tc)
{
atf_tc_set_md_var(tc, "descr", "Test xbps_remove_pkg_from_array_by_name");
}
ATF_TC_BODY(remove_pkg_from_array_by_name_test, tc)
{
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
struct xbps_handle xh;
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
prop_array_t a;
prop_dictionary_t d, d2;
tests: drop trailing whitespaces.
2012-03-12 20:05:53 +05:30
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
d = prop_dictionary_internalize(dictxml);
ATF_REQUIRE_EQ(prop_object_type(d), PROP_TYPE_DICTIONARY);
d2 = prop_dictionary_internalize(dictxml2);
ATF_REQUIRE_EQ(prop_object_type(d2), PROP_TYPE_DICTIONARY);
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
memset(&xh, 0, sizeof(xh));
xbps_init(&xh);
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
a = prop_dictionary_get(d, "packages");
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
ATF_REQUIRE_EQ(xbps_remove_pkg_from_array_by_name(&xh, a, "afoo", NULL), true);
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
ATF_REQUIRE_EQ(prop_dictionary_equals(d, d2), true);
}
ATF_TC(remove_pkg_from_array_by_pattern_test);
ATF_TC_HEAD(remove_pkg_from_array_by_pattern_test, tc)
{
atf_tc_set_md_var(tc, "descr", "Test xbps_remove_pkg_from_array_by_pattern");
}
ATF_TC_BODY(remove_pkg_from_array_by_pattern_test, tc)
{
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
struct xbps_handle xh;
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
prop_array_t a;
prop_dictionary_t d, d2;
tests: drop trailing whitespaces.
2012-03-12 20:05:53 +05:30
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
d = prop_dictionary_internalize(dictxml);
ATF_REQUIRE_EQ(prop_object_type(d), PROP_TYPE_DICTIONARY);
d2 = prop_dictionary_internalize(dictxml2);
ATF_REQUIRE_EQ(prop_object_type(d2), PROP_TYPE_DICTIONARY);
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
memset(&xh, 0, sizeof(xh));
xbps_init(&xh);
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
a = prop_dictionary_get(d, "packages");
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
ATF_REQUIRE_EQ(xbps_remove_pkg_from_array_by_pattern(&xh, a, "afoo>=1.0", NULL), true);
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
ATF_REQUIRE_EQ(prop_dictionary_equals(d, d2), true);
}
ATF_TC(remove_pkg_from_array_by_pkgver_test);
ATF_TC_HEAD(remove_pkg_from_array_by_pkgver_test, tc)
{
atf_tc_set_md_var(tc, "descr", "Test xbps_remove_pkg_from_array_by_pkgver");
}
ATF_TC_BODY(remove_pkg_from_array_by_pkgver_test, tc)
{
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
struct xbps_handle xh;
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
prop_array_t a;
prop_dictionary_t d, d2;
tests: drop trailing whitespaces.
2012-03-12 20:05:53 +05:30
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
d = prop_dictionary_internalize(dictxml);
ATF_REQUIRE_EQ(prop_object_type(d), PROP_TYPE_DICTIONARY);
d2 = prop_dictionary_internalize(dictxml2);
ATF_REQUIRE_EQ(prop_object_type(d2), PROP_TYPE_DICTIONARY);
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
memset(&xh, 0, sizeof(xh));
xbps_init(&xh);
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
a = prop_dictionary_get(d, "packages");
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
ATF_REQUIRE_EQ(xbps_remove_pkg_from_array_by_pkgver(&xh, a, "afoo-1.1_1", NULL), true);
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
ATF_REQUIRE_EQ(prop_dictionary_equals(d, d2), true);
}
ATF_TC(remove_string_from_array_test);
ATF_TC_HEAD(remove_string_from_array_test, tc)
{
atf_tc_set_md_var(tc, "descr", "Test xbps_remove_string_from_array");
}
ATF_TC_BODY(remove_string_from_array_test, tc)
{
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
struct xbps_handle xh;
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
prop_array_t a, a2;
tests: drop trailing whitespaces.
2012-03-12 20:05:53 +05:30
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
a = prop_array_internalize(axml);
ATF_REQUIRE_EQ(prop_object_type(a), PROP_TYPE_ARRAY);
a2 = prop_array_internalize(axml2);
ATF_REQUIRE_EQ(prop_object_type(a2), PROP_TYPE_ARRAY);
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
memset(&xh, 0, sizeof(xh));
xbps_init(&xh);
ATF_REQUIRE_EQ(xbps_remove_string_from_array(&xh, a, "foo-1.0_1"), true);
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
ATF_REQUIRE_EQ(prop_array_equals(a, a2), true);
}
ATF_TC(remove_pkgname_from_array_test);
ATF_TC_HEAD(remove_pkgname_from_array_test, tc)
{
atf_tc_set_md_var(tc, "descr", "Test xbps_remove_pkgname_from_array");
}
ATF_TC_BODY(remove_pkgname_from_array_test, tc)
{
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
struct xbps_handle xh;
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
prop_array_t a, a2;
tests: drop trailing whitespaces.
2012-03-12 20:05:53 +05:30
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
a = prop_array_internalize(axml);
ATF_REQUIRE_EQ(prop_object_type(a), PROP_TYPE_ARRAY);
a2 = prop_array_internalize(axml2);
ATF_REQUIRE_EQ(prop_object_type(a2), PROP_TYPE_ARRAY);
libxbps: performance improvements by caching the most accessed paths. 1- We can cache the result of the first xbps_pkgdb_init() when it fails and avoid the malloc/free/access from it. 2- We cache the uname(2) result into a private var in xbps_handle and use it in xbps_pkg_arch_match(). This improves performance by ~5% approx and it's close as it was before introducing the repository index format 1.5.
2012-06-15 19:03:11 +05:30
memset(&xh, 0, sizeof(xh));
xbps_init(&xh);
ATF_REQUIRE_EQ(xbps_remove_pkgname_from_array(&xh, a, "foo"), true);
Commit Kyua/ATF test suite for libxbps.
2012-03-12 19:53:04 +05:30
ATF_REQUIRE_EQ(prop_array_equals(a, a2), true);
}
ATF_TP_ADD_TCS(tp)
{
ATF_TP_ADD_TC(tp, remove_pkg_from_array_by_name_test);
ATF_TP_ADD_TC(tp, remove_pkg_from_array_by_pattern_test);
ATF_TP_ADD_TC(tp, remove_pkg_from_array_by_pkgver_test);
ATF_TP_ADD_TC(tp, remove_string_from_array_test);
ATF_TP_ADD_TC(tp, remove_pkgname_from_array_test);
return atf_no_error();
}
Reference in New Issue Copy Permalink