test_strings.c

Go to the documentation of this file.

/*
 * Asterisk -- An open source telephony toolkit.
 *
 * Copyright (C) 2010, Digium, Inc.
 *
 * Mark Michelson <mmichelson@digium.com>
 *
 * See http://www.asterisk.org for more information about
 * the Asterisk project. Please do not directly contact
 * any of the maintainers of this project for assistance;
 * the project provides a web site, mailing lists and IRC
 * channels for your use.
 *
 * This program is free software, distributed under the terms of
 * the GNU General Public License Version 2. See the LICENSE file
 * at the top of the source tree.
 */
 
/*!
 * \file
 * \brief Dynamic string tests
 *
 * \author Mark Michelson <mmichelson@digium.com>
 *
 * This module will run some dynamic string tests.
 *
 * \ingroup tests
 */
 
/*** MODULEINFO
    <depend>TEST_FRAMEWORK</depend>
    <support_level>core</support_level>
 ***/
 
#include "asterisk.h"
 
#include "asterisk/test.h"
#include "asterisk/utils.h"
#include "asterisk/strings.h"
#include "asterisk/module.h"
 
AST_TEST_DEFINE(str_test)
{
    struct ast_str *stack_str;
    struct ast_str *heap_str;
    const char short_string1[] = "apple";
    const char short_string2[] = "banana";
    char short_string_cat[30];
    const char long_string1[] = "applebananapeachmangocherrypeargrapeplumlimetangerinepomegranategravel";
    const char long_string2[] = "passionuglinectarinepineapplekiwilemonpaintthinner";
    char long_string_cat[200];
    char string_limit_cat[11];
    const int string_limit = 5;
    int current_size;
    enum ast_test_result_state res = AST_TEST_PASS;
 
    switch (cmd) {
    case TEST_INIT:
        info->name = "str_test";
        info->category = "/main/strings/";
        info->summary = "Test dynamic string operations";
        info->description = "Test setting and appending stack and heap-allocated strings";
        return AST_TEST_NOT_RUN;
    case TEST_EXECUTE:
        break;
    }
    snprintf(short_string_cat, sizeof(short_string_cat), "%s%s", short_string1, short_string2);
    snprintf(long_string_cat, sizeof(long_string_cat), "%s%s", long_string1, long_string2);
    snprintf(string_limit_cat, string_limit, "%s", long_string1);
    strncat(string_limit_cat, long_string2, string_limit);
 
    if (!(stack_str = ast_str_alloca(15))) {
        ast_test_status_update(test, "Failed to allocate an ast_str on the stack\n");
        return AST_TEST_FAIL;
    }
 
    if (!(heap_str = ast_str_create(15))) {
        ast_test_status_update(test, "Failed to allocate an ast_str on the heap\n");
    }
 
    /* Stack string tests:
     * Part 1: Basic tests
     * a. set a small string
     * b. append a small string
     * c. clear a string
     * Part 2: Advanced tests
     * a. Set a string that is larger than our allocation
     * b. Append a string that is larger than our allocation
     */
 
    /* Part 1a */
    if (ast_str_set(&stack_str, 0, "%s", short_string1) < 0) {
        ast_test_status_update(test, "Error setting stack string\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (strcmp(ast_str_buffer(stack_str), short_string1)) {
        ast_test_status_update(test, "ast_str_set failed for stack string. Expected '%s' but"
                "instead got %s\n", short_string1, ast_str_buffer(stack_str));
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    /* Part 1b */
    if (ast_str_append(&stack_str, 0, "%s", short_string2) < 0) {
        ast_test_status_update(test, "Error appending to stack string\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (strcmp(ast_str_buffer(stack_str), short_string_cat)) {
        ast_test_status_update(test, "ast_str_set failed for stack string. Expected '%s'"
                "but instead got %s\n", short_string_cat, ast_str_buffer(stack_str));
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    /* Part 1c */
    ast_str_reset(stack_str);
    if (ast_str_strlen(stack_str) != 0) {
        ast_test_status_update(test, "ast_str_reset resulted in non-zero length for stack_str\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
 
    /* Part 2a */
    if (ast_str_set(&stack_str, -1, "%s", long_string1) < 0) {
        ast_test_status_update(test, "Error setting stack string with long input\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (strncmp(ast_str_buffer(stack_str), long_string1, ast_str_strlen(stack_str))) {
        ast_test_status_update(test, "Stack string not set to what is expected.\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    /* Part 2b */
    if (ast_str_append(&stack_str, -1, "%s", long_string2) < 0) {
        ast_test_status_update(test, "Error appending long string to full stack string buffer\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (strncmp(ast_str_buffer(stack_str), long_string_cat, ast_str_strlen(stack_str))) {
        ast_test_status_update(test, "Stack string not set to what is expected.\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
 
    /* Heap string tests
     *
     * All stack string tests from part 1.
     * All stack string tests 2a and 2b.
     * Tests 2a and 2b from stack string tests, passing 0 as max_len
     * instead of -1. This allows for the buffer to grow.
     */
    /* Part 1a */
    if (ast_str_set(&heap_str, 0, "%s", short_string1) < 0) {
        ast_test_status_update(test, "Error setting heap string\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (strcmp(ast_str_buffer(heap_str), short_string1)) {
        ast_test_status_update(test, "ast_str_set failed for heap string. Expected '%s' but"
                "instead got %s\n", short_string1, ast_str_buffer(heap_str));
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    /* Part 1b */
    if (ast_str_append(&heap_str, 0, "%s", short_string2) < 0) {
        ast_test_status_update(test, "Error appending to heap string\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (strcmp(ast_str_buffer(heap_str), short_string_cat)) {
        ast_test_status_update(test, "ast_str_set failed for stack string. Expected '%s'"
                "but instead got %s\n", short_string_cat, ast_str_buffer(stack_str));
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    /* Part 1c */
    ast_str_reset(heap_str);
    if (ast_str_strlen(heap_str) != 0) {
        ast_test_status_update(test, "ast_str_reset resulted in non-zero length for stack_str\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    /* Part 2a with -1 arg */
    current_size = ast_str_size(heap_str);
    if (ast_str_set(&heap_str, -1, "%s", long_string1) < 0) {
        ast_test_status_update(test, "Error setting heap string with long input\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (current_size != ast_str_size(heap_str)) {
        ast_test_status_update(test, "Heap string changed size during ast_str_set when it was"
                "instructed not to. Was %d and now is %d\n", current_size, (int) ast_str_size(heap_str));
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (strncmp(ast_str_buffer(heap_str), long_string1, ast_str_strlen(heap_str))) {
        ast_test_status_update(test, "Heap string not set to what is expected.\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    /* Part 2b with -1 arg */
    current_size = ast_str_size(heap_str);
    if (ast_str_append(&heap_str, -1, "%s", long_string2) < 0) {
        ast_test_status_update(test, "Error appending long string to full heap string buffer\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (current_size != ast_str_size(heap_str)) {
        ast_test_status_update(test, "Heap string changed size during ast_str_append when it was"
                "instructed not to. Was %d and now is %d\n", current_size, (int) ast_str_size(heap_str));
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (strncmp(ast_str_buffer(heap_str), long_string_cat, ast_str_strlen(heap_str))) {
        ast_test_status_update(test, "Heap string not set to what is expected.\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    /* reset string before continuing */
    ast_str_reset(heap_str);
    /* Part 2a with 0 arg */
    if (ast_str_set(&heap_str, 0, "%s", long_string1) < 0) {
        ast_test_status_update(test, "Error setting heap string with long input\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (strcmp(ast_str_buffer(heap_str), long_string1)) {
        ast_test_status_update(test, "Heap string does not contain what was expected. Expected %s"
                "but have %s instead\n", long_string1, ast_str_buffer(heap_str));
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    /* Part 2b with 0 arg */
    if (ast_str_append(&heap_str, 0, "%s", long_string2) < 0) {
        ast_test_status_update(test, "Error setting heap string with long input\n");
        res = AST_TEST_FAIL;
        goto cleanup;
    }
    if (strcmp(ast_str_buffer(heap_str), long_string_cat)) {
        ast_test_status_update(test, "Heap string does not contain what was expected. Expected %s"
                "but have %s instead\n", long_string_cat, ast_str_buffer(heap_str));
        res = AST_TEST_FAIL;
        goto cleanup;
    }
 
cleanup:
    ast_free(heap_str);
    return res;
}
 
AST_TEST_DEFINE(begins_with_test)
{
    switch (cmd) {
    case TEST_INIT:
        info->name = "begins_with";
        info->category = "/main/strings/";
        info->summary = "Test ast_begins_with";
        info->description = "Test ast_begins_with";
        return AST_TEST_NOT_RUN;
    case TEST_EXECUTE:
        break;
    }
 
    // prefixes
    ast_test_validate(test, 1 == ast_begins_with("foobar", "foobar"));
    ast_test_validate(test, 1 == ast_begins_with("foobar", "foo"));
    ast_test_validate(test, 1 == ast_begins_with("foobar", ""));
    ast_test_validate(test, 1 == ast_begins_with("", ""));
 
    // not prefixes
    ast_test_validate(test, 0 == ast_begins_with("foobar", "bang"));
    ast_test_validate(test, 0 == ast_begins_with("foobar", "foobat"));
    ast_test_validate(test, 0 == ast_begins_with("boo", "boom"));
    ast_test_validate(test, 0 == ast_begins_with("", "blitz"));
 
    // nothing failed; we're all good!
    return AST_TEST_PASS;
}
 
AST_TEST_DEFINE(ends_with_test)
{
    switch (cmd) {
    case TEST_INIT:
        info->name = "ends_with";
        info->category = "/main/strings/";
        info->summary = "Test ast_ends_with";
        info->description = "Test ast_ends_with";
        return AST_TEST_NOT_RUN;
    case TEST_EXECUTE:
        break;
    }
 
    // prefixes
    ast_test_validate(test, 1 == ast_ends_with("foobar", "foobar"));
    ast_test_validate(test, 1 == ast_ends_with("foobar", "bar"));
    ast_test_validate(test, 1 == ast_ends_with("foobar", ""));
    ast_test_validate(test, 1 == ast_ends_with("", ""));
 
    // not suffixes
    ast_test_validate(test, 0 == ast_ends_with("bar", "bbar"));
    ast_test_validate(test, 0 == ast_ends_with("foobar", "bang"));
    ast_test_validate(test, 0 == ast_ends_with("foobar", "foobat"));
    ast_test_validate(test, 0 == ast_ends_with("boo", "boom"));
    ast_test_validate(test, 0 == ast_ends_with("", "blitz"));
 
    // nothing failed; we're all good!
    return AST_TEST_PASS;
}
 
AST_TEST_DEFINE(strsep_test)
{
    char *test1, *test2, *test3;
 
    switch (cmd) {
    case TEST_INIT:
        info->name = "strsep";
        info->category = "/main/strings/";
        info->summary = "Test ast_strsep";
        info->description = "Test ast_strsep";
        return AST_TEST_NOT_RUN;
    case TEST_EXECUTE:
        break;
    }
 
    test1 = ast_strdupa("ghi=jkl,mno='pqr,stu',abc=def, vwx = yz1 ,  vwx = yz1 ,  '"
        " vwx = yz1 ' ,  ' vwx , yz1 ',v\"w\"x, '\"x,v\",\"x\"' , \" i\\'m a test\""
        ", \" i\\'m a, test\", \" i\\'m a, test\", e\\,nd, end\\");
 
    test2 = ast_strsep(&test1, ',', 0);
    ast_test_validate(test, 0 == strcmp("ghi=jkl", test2));
 
    test3 = ast_strsep(&test2, '=', 0);
    ast_test_validate(test, 0 == strcmp("ghi", test3));
 
    test3 = ast_strsep(&test2, '=', 0);
    ast_test_validate(test, 0 == strcmp("jkl", test3));
 
    test2 = ast_strsep(&test1, ',', 0);
    ast_test_validate(test, 0 == strcmp("mno='pqr,stu'", test2));
 
    test3 = ast_strsep(&test2, '=', 0);
    ast_test_validate(test, 0 == strcmp("mno", test3));
 
    test3 = ast_strsep(&test2, '=', 0);
    ast_test_validate(test, 0 == strcmp("'pqr,stu'", test3));
 
    test2 = ast_strsep(&test1, ',', 0);
    ast_test_validate(test, 0 == strcmp("abc=def", test2));
 
    test2 = ast_strsep(&test1, ',', 0);
    ast_test_validate(test, 0 == strcmp(" vwx = yz1 ", test2));
 
    test2 = ast_strsep(&test1, ',', AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("vwx = yz1", test2));
 
    test2 = ast_strsep(&test1, ',', AST_STRSEP_STRIP);
    ast_test_validate(test, 0 == strcmp(" vwx = yz1 ", test2));
 
    test2 = ast_strsep(&test1, ',', AST_STRSEP_STRIP | AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("vwx , yz1", test2));
 
    test2 = ast_strsep(&test1, ',', AST_STRSEP_STRIP | AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("v\"w\"x", test2));
 
    test2 = ast_strsep(&test1, ',', AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("'\"x,v\",\"x\"'", test2));
 
    test2 = ast_strsep(&test1, ',', AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("\" i\\'m a test\"", test2));
 
    test2 = ast_strsep(&test1, ',', AST_STRSEP_TRIM | AST_STRSEP_UNESCAPE);
    ast_test_validate(test, 0 == strcmp("\" i'm a, test\"", test2));
 
    test2 = ast_strsep(&test1, ',', AST_STRSEP_ALL);
    ast_test_validate(test, 0 == strcmp("i'm a, test", test2));
 
    test2 = ast_strsep(&test1, ',', AST_STRSEP_TRIM | AST_STRSEP_UNESCAPE);
    ast_test_validate(test, 0 == strcmp("e,nd", test2));
 
    test2 = ast_strsep(&test1, ',', AST_STRSEP_TRIM | AST_STRSEP_UNESCAPE);
    ast_test_validate(test, 0 == strcmp("end", test2));
 
    // nothing failed; we're all good!
    return AST_TEST_PASS;
}
 
AST_TEST_DEFINE(strsep_quoted_test)
{
    char *test1, *test2, *test3;
 
    switch (cmd) {
    case TEST_INIT:
        info->name = "strsep_quoted";
        info->category = "/main/strings/";
        info->summary = "Test ast_strsep_quoted";
        info->description = "Test ast_strsep_quoted";
        return AST_TEST_NOT_RUN;
    case TEST_EXECUTE:
        break;
    }
 
    test1 = ast_strdupa("ghi=jkl,mno=\"pqr,stu\",abc=def, vwx = yz1 ,  vwx = yz1 ,  "
        "\" vwx = yz1 \" ,  \" vwx , yz1 \",v'w'x, \"'x,v','x'\" , \" i\\'m a test\""
        ", \" i\\'m a, test\", \" i\\'m a, test\", e\\,nd, end\\");
 
    test2 = ast_strsep_quoted(&test1, ',', '"', 0);
    ast_test_validate(test, 0 == strcmp("ghi=jkl", test2));
 
    test3 = ast_strsep_quoted(&test2, '=', '"', 0);
    ast_test_validate(test, 0 == strcmp("ghi", test3));
 
    test3 = ast_strsep_quoted(&test2, '=', '"', 0);
    ast_test_validate(test, 0 == strcmp("jkl", test3));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', 0);
    ast_test_validate(test, 0 == strcmp("mno=\"pqr,stu\"", test2));
 
    test3 = ast_strsep_quoted(&test2, '=', '"', 0);
    ast_test_validate(test, 0 == strcmp("mno", test3));
 
    test3 = ast_strsep_quoted(&test2, '=', '"', 0);
    ast_test_validate(test, 0 == strcmp("\"pqr,stu\"", test3));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', 0);
    ast_test_validate(test, 0 == strcmp("abc=def", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', 0);
    ast_test_validate(test, 0 == strcmp(" vwx = yz1 ", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("vwx = yz1", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', AST_STRSEP_STRIP);
    ast_test_validate(test, 0 == strcmp(" vwx = yz1 ", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', AST_STRSEP_STRIP | AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("vwx , yz1", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', AST_STRSEP_STRIP | AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("v'w'x", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("\"'x,v','x'\"", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("\" i\\'m a test\"", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', AST_STRSEP_TRIM | AST_STRSEP_UNESCAPE);
    ast_test_validate(test, 0 == strcmp("\" i'm a, test\"", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', AST_STRSEP_ALL);
    ast_test_validate(test, 0 == strcmp("i'm a, test", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', AST_STRSEP_TRIM | AST_STRSEP_UNESCAPE);
    ast_test_validate(test, 0 == strcmp("e,nd", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '"', AST_STRSEP_TRIM | AST_STRSEP_UNESCAPE);
    ast_test_validate(test, 0 == strcmp("end", test2));
 
    // Now use '|' as the quote character
    test1 = ast_strdupa("ghi=jkl,mno=|pqr,stu|,abc=def, vwx = yz1 ,  vwx = yz1 ,  "
        "| vwx = yz1 | ,  | vwx , yz1 |,v'w'x, |'x,v','x'| , | i\\'m a test|"
        ", | i\\'m a, test|, | i\\'m a, test|, e\\,nd, end\\");
 
    test2 = ast_strsep_quoted(&test1, ',', '|', 0);
    ast_test_validate(test, 0 == strcmp("ghi=jkl", test2));
 
    test3 = ast_strsep_quoted(&test2, '=', '|', 0);
    ast_test_validate(test, 0 == strcmp("ghi", test3));
 
    test3 = ast_strsep_quoted(&test2, '=', '|', 0);
    ast_test_validate(test, 0 == strcmp("jkl", test3));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', 0);
    ast_test_validate(test, 0 == strcmp("mno=|pqr,stu|", test2));
 
    test3 = ast_strsep_quoted(&test2, '=', '|', 0);
    ast_test_validate(test, 0 == strcmp("mno", test3));
 
    test3 = ast_strsep_quoted(&test2, '=', '|', 0);
    ast_test_validate(test, 0 == strcmp("|pqr,stu|", test3));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', 0);
    ast_test_validate(test, 0 == strcmp("abc=def", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', 0);
    ast_test_validate(test, 0 == strcmp(" vwx = yz1 ", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("vwx = yz1", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', AST_STRSEP_STRIP);
    ast_test_validate(test, 0 == strcmp(" vwx = yz1 ", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', AST_STRSEP_STRIP | AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("vwx , yz1", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', AST_STRSEP_STRIP | AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("v'w'x", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("|'x,v','x'|", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', AST_STRSEP_TRIM);
    ast_test_validate(test, 0 == strcmp("| i\\'m a test|", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', AST_STRSEP_TRIM | AST_STRSEP_UNESCAPE);
    ast_test_validate(test, 0 == strcmp("| i'm a, test|", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', AST_STRSEP_ALL);
    ast_test_validate(test, 0 == strcmp("i'm a, test", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', AST_STRSEP_TRIM | AST_STRSEP_UNESCAPE);
    ast_test_validate(test, 0 == strcmp("e,nd", test2));
 
    test2 = ast_strsep_quoted(&test1, ',', '|', AST_STRSEP_TRIM | AST_STRSEP_UNESCAPE);
    ast_test_validate(test, 0 == strcmp("end", test2));
 
 
    // nothing failed; we're all good!
    return AST_TEST_PASS;
}
 
static int test_semi(char *string1, char *string2, int test_len)
{
    char *test2 = NULL;
 
    if (test_len > 0) {
        test2 = ast_alloca(test_len);
        *test2 = '\0';
    } else if (test_len == 0) {
        test2 = "";
    }
    ast_escape_semicolons(string1, test2, test_len);
    if (test2 != NULL && strcmp(string2, test2) == 0) {
        return 1;
    } else {
        return 0;
    }
}
 
AST_TEST_DEFINE(escape_semicolons_test)
{
    switch (cmd) {
    case TEST_INIT:
        info->name = "escape_semicolons";
        info->category = "/main/strings/";
        info->summary = "Test ast_escape_semicolons";
        info->description = "Test ast_escape_semicolons";
        return AST_TEST_NOT_RUN;
    case TEST_EXECUTE:
        break;
    }
 
 
    ast_test_validate(test, test_semi("this is a ;test", "this is a \\;test", 18));
    ast_test_validate(test, test_semi(";", "\\;", 3));
 
    /* The following tests should return empty because there's not enough room to output
     * an escaped ; or even a single character.
     */
    ast_test_validate(test, test_semi(";", "", 0));
    ast_test_validate(test, test_semi(";", "", 1));
    ast_test_validate(test, test_semi(";", "", 2));
    ast_test_validate(test, test_semi("x", "", 0));
    ast_test_validate(test, test_semi("x", "", 1));
 
    /* At least some output should be produced now. */
    ast_test_validate(test, test_semi("xx;xx", "x", 2));
    ast_test_validate(test, test_semi("xx;xx", "xx", 3));
 
    /* There's still not enough room to output \; so
     * don't even print the \
     */
    ast_test_validate(test, test_semi("xx;xx", "xx", 4));
 
    ast_test_validate(test, test_semi("xx;xx", "xx\\;", 5));
    ast_test_validate(test, test_semi("xx;xx", "xx\\;x", 6));
    ast_test_validate(test, test_semi("xx;xx", "xx\\;xx", 7));
    ast_test_validate(test, test_semi("xx;xx", "xx\\;xx", 8));
 
    /* Random stuff */
    ast_test_validate(test, test_semi("xx;xx;this is a test", "xx\\;xx\\;this is a test", 32));
    ast_test_validate(test, test_semi(";;;;;", "\\;\\;\\;\\;\\;", 32));
    ast_test_validate(test, test_semi(";;;;;", "\\;\\;\\;\\;", 10));
    ast_test_validate(test, test_semi(";;;;;", "\\;\\;\\;\\;\\;", 11));
    ast_test_validate(test, test_semi(";;\\;;;", "\\;\\;\\\\;\\;\\;", 32));
 
    return AST_TEST_PASS;
}
 
AST_TEST_DEFINE(escape_test)
{
    char buf[128];
 
#define TEST_ESCAPE(s, to_escape, expected) \
    !strcmp(ast_escape(buf, s, ARRAY_LEN(buf), to_escape), expected)
 
#define TEST_ESCAPE_C(s, expected) \
    !strcmp(ast_escape_c(buf, s, ARRAY_LEN(buf)), expected)
 
#define TEST_ESCAPE_ALLOC(s, to_escape, expected)       \
    ({                                                  \
        int res = 0;                                    \
        char *a_buf = ast_escape_alloc(s, to_escape);   \
        if (a_buf) {                                    \
            res = !strcmp(a_buf, expected);             \
            ast_free(a_buf);                            \
        }                                               \
        res;                                            \
    })
 
#define TEST_ESCAPE_C_ALLOC(s, expected)                \
    ({                                                  \
        int res = 0;                                    \
        char *a_buf = ast_escape_c_alloc(s);            \
        if (a_buf) {                                    \
            res = !strcmp(a_buf, expected);             \
            ast_free(a_buf);                            \
        }                                               \
        res;                                            \
    })
 
    switch (cmd) {
    case TEST_INIT:
        info->name = "escape";
        info->category = "/main/strings/";
        info->summary = "Test ast_escape";
        info->description = "Test escaping values in a string";
        return AST_TEST_NOT_RUN;
    case TEST_EXECUTE:
        break;
    }
 
    ast_test_validate(test, TEST_ESCAPE("null escape", NULL, "null escape"));
    ast_test_validate(test, TEST_ESCAPE("empty escape", "", "empty escape"));
    ast_test_validate(test, TEST_ESCAPE("", "Z", ""));
    ast_test_validate(test, TEST_ESCAPE("no matching escape", "Z", "no matching escape"));
    ast_test_validate(test, TEST_ESCAPE("escape Z", "Z", "escape \\Z"));
    ast_test_validate(test, TEST_ESCAPE("Z", "Z", "\\Z"));
    ast_test_validate(test, TEST_ESCAPE(";;", ";", "\\;\\;"));
    ast_test_validate(test, TEST_ESCAPE("escape \n", "\n", "escape \\n"));
    ast_test_validate(test, TEST_ESCAPE("escape \n again \n", "\n", "escape \\n again \\n"));
 
    ast_test_validate(test, TEST_ESCAPE_C("", ""));
    ast_test_validate(test, TEST_ESCAPE_C("escape \a\b\f\n\r\t\v\\\'\"\?",
        "escape \\a\\b\\f\\n\\r\\t\\v\\\\\\\'\\\"\\?"));
 
    ast_test_validate(test, TEST_ESCAPE_ALLOC("", "Z", ""));
    ast_test_validate(test, TEST_ESCAPE_ALLOC("Z", "Z", "\\Z"));
    ast_test_validate(test, TEST_ESCAPE_ALLOC("a", "Z", "a"));
 
    ast_test_validate(test, TEST_ESCAPE_C_ALLOC("", ""));
    ast_test_validate(test, TEST_ESCAPE_C_ALLOC("\n", "\\n"));
    ast_test_validate(test, TEST_ESCAPE_C_ALLOC("a", "a"));
 
    return AST_TEST_PASS;
}
 
AST_TEST_DEFINE(strings_match)
{
    switch (cmd) {
    case TEST_INIT:
        info->name = "strings_match";
        info->category = "/main/strings/";
        info->summary = "Test ast_strings_match";
        info->description = "Test ast_strings_match";
        return AST_TEST_NOT_RUN;
    case TEST_EXECUTE:
        break;
    }
 
    ast_test_validate(test, ast_strings_match("aaa", NULL, "aaa"));
    ast_test_validate(test, ast_strings_match("aaa", "", "aaa"));
    ast_test_validate(test, ast_strings_match("aaa", "=", "aaa"));
    ast_test_validate(test, !ast_strings_match("aaa", "!=", "aaa"));
    ast_test_validate(test, !ast_strings_match("aaa", NULL, "aba"));
    ast_test_validate(test, !ast_strings_match("aaa", "", "aba"));
    ast_test_validate(test, !ast_strings_match("aaa", "=", "aba"));
    ast_test_validate(test, ast_strings_match("aaa", "!=", "aba"));
 
    ast_test_validate(test, ast_strings_match("aaa", "<=", "aba"));
    ast_test_validate(test, ast_strings_match("aaa", "<=", "aaa"));
    ast_test_validate(test, !ast_strings_match("aaa", "<", "aaa"));
 
    ast_test_validate(test, !ast_strings_match("aaa", ">=", "aba"));
    ast_test_validate(test, ast_strings_match("aaa", ">=", "aaa"));
    ast_test_validate(test, !ast_strings_match("aaa", ">", "aaa"));
 
    ast_test_validate(test, !ast_strings_match("aaa", "=", "aa"));
    ast_test_validate(test, ast_strings_match("aaa", ">", "aa"));
    ast_test_validate(test, !ast_strings_match("aaa", "<", "aa"));
 
    ast_test_validate(test, ast_strings_match("1", "=", "1"));
    ast_test_validate(test, !ast_strings_match("1", "!=", "1"));
    ast_test_validate(test, !ast_strings_match("2", "=", "1"));
    ast_test_validate(test, ast_strings_match("2", ">", "1"));
    ast_test_validate(test, ast_strings_match("2", ">=", "1"));
    ast_test_validate(test, ast_strings_match("2", ">", "1.9888"));
    ast_test_validate(test, ast_strings_match("2.9", ">", "1"));
    ast_test_validate(test, ast_strings_match("2", ">", "1"));
    ast_test_validate(test, ast_strings_match("2.999", "<", "3"));
    ast_test_validate(test, ast_strings_match("2", ">", "#"));
 
    ast_test_validate(test, ast_strings_match("abcccc", "like", "%a%c"));
    ast_test_validate(test, !ast_strings_match("abcccx", "like", "%a%c"));
    ast_test_validate(test, ast_strings_match("abcccc", "regex", "a[bc]+c"));
    ast_test_validate(test, !ast_strings_match("abcccx", "regex", "^a[bxdfgtc]+c$"));
 
    ast_test_validate(test, !ast_strings_match("neener-93joe", "LIKE", "%blah-%"));
    ast_test_validate(test, ast_strings_match("blah-93joe", "LIKE", "%blah-%"));
 
    ast_test_validate(test, !ast_strings_match("abcccx", "regex", NULL));
    ast_test_validate(test, !ast_strings_match("abcccx", NULL, NULL));
    ast_test_validate(test, !ast_strings_match(NULL, "regex", NULL));
    ast_test_validate(test, !ast_strings_match(NULL, NULL, "abc"));
    ast_test_validate(test, !ast_strings_match(NULL, NULL, NULL));
 
    return AST_TEST_PASS;
}
 
/*!
 * \brief Function that needs a temporary ast_str
 */
static const char *str_appender(struct ast_str**buf, char *a)
{
    ast_str_append(buf, 0, "<%s>", a);
    return ast_str_buffer(*buf);
}
 
AST_TEST_DEFINE(temp_strings)
{
    char *return_buffer = ast_malloc(128);
    switch (cmd) {
    case TEST_INIT:
        info->name = "temp_strings";
        info->category = "/main/strings/";
        info->summary = "Test ast_str_temp_buffer";
        info->description = "Test ast_str_temp_buffer";
        return AST_TEST_NOT_RUN;
    case TEST_EXECUTE:
        break;
    }
 
    snprintf(return_buffer, 128, "%s %s %s %s %s",
    ast_str_tmp(12, str_appender(&STR_TMP, "str1")),
    ast_str_tmp(12, str_appender(&STR_TMP, "str2")),
    ast_str_tmp(12, str_appender(&STR_TMP, "B")),
    "ccccccccccccc",
    ast_str_tmp(12, str_appender(&STR_TMP, "ww"))
    );
 
    ast_test_validate(test, ast_strings_match(return_buffer, "=", "<str1> <str2> <B> ccccccccccccc <ww>"));
 
    ast_free(return_buffer);
    return AST_TEST_PASS;
}
 
AST_TEST_DEFINE(in_delimited_string)
{
    switch (cmd) {
    case TEST_INIT:
        info->name = "in_delimited_string";
        info->category = "/main/strings/";
        info->summary = "Test ast_in_delimited_string";
        info->description = info->summary;
        return AST_TEST_NOT_RUN;
    case TEST_EXECUTE:
        break;
    }
 
    /* Single letter */
    ast_test_validate(test, ast_in_delimited_string("a", "a,b", ','));
    ast_test_validate(test, ast_in_delimited_string("b", "a,b", ','));
 
    ast_test_validate(test, !ast_in_delimited_string("c", "a,b", ','));
    ast_test_validate(test, !ast_in_delimited_string("aa", "a,b", ','));
    ast_test_validate(test, !ast_in_delimited_string("bb", "a,b", ','));
    ast_test_validate(test, !ast_in_delimited_string("a,", "a,b", ','));
    ast_test_validate(test, !ast_in_delimited_string(",b", "a,b", ','));
    ast_test_validate(test, !ast_in_delimited_string("a,b", "a,b", ','));
 
    /* Bad delimiter (ends up being just a strcmp) */
    ast_test_validate(test, !ast_in_delimited_string("a", "a,b", '#'));
    ast_test_validate(test, !ast_in_delimited_string("b", "a,b", '#'));
 
    ast_test_validate(test, !ast_in_delimited_string("c", "a,b", '#'));
    ast_test_validate(test, !ast_in_delimited_string("aa", "a,b", '#'));
    ast_test_validate(test, !ast_in_delimited_string("bb", "a,b", '#'));
    ast_test_validate(test, !ast_in_delimited_string("a,", "a,b", '#'));
    ast_test_validate(test, !ast_in_delimited_string(",b", "a,b", '#'));
 
    ast_test_validate(test, ast_in_delimited_string("a,b", "a,b", '#'));
 
    /* Multi letter */
    ast_test_validate(test, ast_in_delimited_string("abc", "abc,def", ','));
    ast_test_validate(test, ast_in_delimited_string("def", "abc,def", ','));
 
    ast_test_validate(test, !ast_in_delimited_string("a", "abc,def", ','));
    ast_test_validate(test, !ast_in_delimited_string("b", "abc,def", ','));
    ast_test_validate(test, !ast_in_delimited_string("c", "abc,def", ','));
 
    ast_test_validate(test, !ast_in_delimited_string("d", "abc,def", ','));
    ast_test_validate(test, !ast_in_delimited_string("e", "abc,def", ','));
    ast_test_validate(test, !ast_in_delimited_string("f", "abc,def", ','));
 
    ast_test_validate(test, !ast_in_delimited_string("abc,", "abc,def", ','));
    ast_test_validate(test, !ast_in_delimited_string(",def", "abc,def", ','));
    ast_test_validate(test, !ast_in_delimited_string("abc,def", "abc,def", ','));
 
    /* Embedded */
    ast_test_validate(test, ast_in_delimited_string("abc", "abcdef,abc", ','));
    ast_test_validate(test, ast_in_delimited_string("abcdef", "abcdef,abc", ','));
 
    ast_test_validate(test, !ast_in_delimited_string("abc", "abcdef,def", ','));
    ast_test_validate(test, !ast_in_delimited_string("def", "abcdef,abc", ','));
    ast_test_validate(test, !ast_in_delimited_string("def", "abcdefghi,abc", ','));
 
    /* NULL and empty values */
    ast_test_validate(test, !ast_in_delimited_string(NULL, "abc,def", ','));
 
    ast_test_validate(test, ast_in_delimited_string("abc", ",abc,def", ','));
    ast_test_validate(test, ast_in_delimited_string("abc", "abc,def,", ','));
    ast_test_validate(test, ast_in_delimited_string("abc", "abc,,def,", ','));
    ast_test_validate(test, ast_in_delimited_string("def", "abc,,def", ','));
    ast_test_validate(test, ast_in_delimited_string("def", ",abc,,def,", ','));
 
    ast_test_validate(test, ast_in_delimited_string("", ",abc,def", ','));
    ast_test_validate(test, ast_in_delimited_string("", "abc,def,", ','));
    ast_test_validate(test, ast_in_delimited_string("", "abc,,def,", ','));
    ast_test_validate(test, !ast_in_delimited_string("", "abc,def", ','));
 
    /* Multi word */
    ast_test_validate(test, ast_in_delimited_string("abc", "abc,def,ghi", ','));
    ast_test_validate(test, ast_in_delimited_string("def", "abc,def,ghi", ','));
    ast_test_validate(test, ast_in_delimited_string("ghi", "abc,def,ghi", ','));
 
    ast_test_validate(test, !ast_in_delimited_string("a", "abc,def,ghi", ','));
    ast_test_validate(test, !ast_in_delimited_string("d", "abc,def,ghi", ','));
    ast_test_validate(test, !ast_in_delimited_string("g", "abc,def,ghi", ','));
 
    ast_test_validate(test, !ast_in_delimited_string("ab", "abc,def,ghi", ','));
    ast_test_validate(test, !ast_in_delimited_string("de", "abc,def,ghi", ','));
    ast_test_validate(test, !ast_in_delimited_string("gh", "abc,def,ghi", ','));
 
 
    /* With leading spaces */
    ast_test_validate(test, ast_in_delimited_string("abc", " abc", ','));
    ast_test_validate(test, ast_in_delimited_string("abc", " abc, def", ','));
    ast_test_validate(test, ast_in_delimited_string("def", " abc, def", ','));
    ast_test_validate(test, ast_in_delimited_string("abc", " abc, def, ghi", ','));
    ast_test_validate(test, ast_in_delimited_string("def", " abc, def, ghi", ','));
    ast_test_validate(test, ast_in_delimited_string("ghi", " abc, def, ghi", ','));
 
    ast_test_validate(test, ast_in_delimited_string("abc", "   abc", ','));
    ast_test_validate(test, ast_in_delimited_string("abc", "   abc,   def", ','));
    ast_test_validate(test, ast_in_delimited_string("def", "   abc,   def", ','));
    ast_test_validate(test, ast_in_delimited_string("abc", "   abc,   def,   ghi", ','));
    ast_test_validate(test, ast_in_delimited_string("def", "   abc,   def,   ghi", ','));
    ast_test_validate(test, ast_in_delimited_string("ghi", "   abc,   def,   ghi", ','));
 
    /* With leading spaces and space as a delimiter */
    ast_test_validate(test, ast_in_delimited_string("abc", "   abc", ' '));
    ast_test_validate(test, ast_in_delimited_string("abc", "   abc   def", ' '));
    ast_test_validate(test, ast_in_delimited_string("def", "   abc   def", ' '));
    ast_test_validate(test, ast_in_delimited_string("abc", "   abc   def   ghi", ' '));
    ast_test_validate(test, ast_in_delimited_string("def", "   abc   def   ghi", ' '));
    ast_test_validate(test, ast_in_delimited_string("ghi", "   abc   def   ghi", ' '));
 
    return AST_TEST_PASS;
}
 
static int unload_module(void)
{
    AST_TEST_UNREGISTER(str_test);
    AST_TEST_UNREGISTER(begins_with_test);
    AST_TEST_UNREGISTER(ends_with_test);
    AST_TEST_UNREGISTER(strsep_test);
    AST_TEST_UNREGISTER(strsep_quoted_test);
    AST_TEST_UNREGISTER(escape_semicolons_test);
    AST_TEST_UNREGISTER(escape_test);
    AST_TEST_UNREGISTER(strings_match);
    AST_TEST_UNREGISTER(temp_strings);
    AST_TEST_UNREGISTER(in_delimited_string);
    return 0;
}
 
static int load_module(void)
{
    AST_TEST_REGISTER(str_test);
    AST_TEST_REGISTER(begins_with_test);
    AST_TEST_REGISTER(ends_with_test);
    AST_TEST_REGISTER(strsep_test);
    AST_TEST_REGISTER(strsep_quoted_test);
    AST_TEST_REGISTER(escape_semicolons_test);
    AST_TEST_REGISTER(escape_test);
    AST_TEST_REGISTER(strings_match);
    AST_TEST_REGISTER(temp_strings);
    AST_TEST_REGISTER(in_delimited_string);
    return AST_MODULE_LOAD_SUCCESS;
}
 
AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "Dynamic string test module");