Zabbix

/*

** Copyright (C) 2001-2025 Zabbix SIA

**

** This program is free software: you can redistribute it and/or modify it under the terms of

** the GNU Affero General Public License as published by the Free Software Foundation, version 3.

**

** 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 Affero General Public License for more details.

**

** You should have received a copy of the GNU Affero General Public License along with this program.

** If not, see <https://www.gnu.org/licenses/>.

**/

​

#include "embed_xml.h"

​

#include "zbxvariant.h"

#include "embed.h"

#include "zbxxml.h"

​

/******************************************************************************

 *                                                                            *

 * Purpose: XML constructor                                                   *

 *                                                                            *

 ******************************************************************************/

static duk_ret_t    es_xml_ctor(duk_context *ctx)

{

    if (!duk_is_constructor_call(ctx))

        return DUK_RET_TYPE_ERROR;

​

    duk_push_this(ctx);

​

    duk_set_finalizer(ctx, -1);

​

    return 0;

}

​

/******************************************************************************

 *                                                                            *

 * Purpose: XML.query method                                                  *

 *                                                                            *

 ******************************************************************************/

static duk_ret_t    es_xml_query(duk_context *ctx)

{

    int     err_index = -1;

    char        *err = NULL;

    zbx_variant_t   value;

    zbx_es_env_t    *env;

​

    if (NULL == (env = zbx_es_get_env(ctx)))

        return duk_error(ctx, DUK_RET_TYPE_ERROR, "cannot access internal environment");

​

    ZBX_ES_CHECK_TIMEOUT(ctx, env);

​

    zbx_variant_set_str(&value, zbx_strdup(NULL, duk_safe_to_string(ctx, 0)));

​

    if (FAIL == zbx_query_xpath(&value, duk_safe_to_string(ctx, 1), &err))

    {

        err_index = duk_push_error_object(ctx, DUK_RET_EVAL_ERROR, err);

        goto out;

    }

    es_push_result_string(ctx, value.data.str, strlen(value.data.str));

out: