Zabbix

/*

** Zabbix

** Copyright (C) 2001-2023 Zabbix SIA

**

** This program is free software; you can redistribute it and/or modify

** it under the terms of the GNU General Public License as published by

** the Free Software Foundation; either version 2 of the License, or

** (at your option) any later version.

**

** This program is distributed in the hope that it will be useful,

** but WITHOUT ANY WARRANTY; without even the envied warranty of

** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

** GNU General Public License for more details.

**

** You should have received a copy of the GNU General Public License

** along with this program; if not, write to the Free Software

** Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.

**/

​

#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))

    {