Files
oceanbase/src/sql/engine/expr/ob_expr_substr.cpp
2023-12-19 21:18:20 +00:00

840 lines
33 KiB
C++

/**
* Copyright (c) 2021 OceanBase
* OceanBase CE is licensed under Mulan PubL v2.
* You can use this software according to the terms and conditions of the Mulan PubL v2.
* You may obtain a copy of Mulan PubL v2 at:
* http://license.coscl.org.cn/MulanPubL-2.0
* THIS SOFTWARE IS PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OF ANY KIND,
* EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO NON-INFRINGEMENT,
* MERCHANTABILITY OR FIT FOR A PARTICULAR PURPOSE.
* See the Mulan PubL v2 for more details.
*/
#define USING_LOG_PREFIX SQL_ENG
#include "lib/oblog/ob_log.h"
#include "share/object/ob_obj_cast.h"
#include "sql/engine/expr/ob_expr_substr.h"
#include "objit/common/ob_item_type.h"
#include "sql/engine/expr/ob_expr_util.h"
#include "sql/session/ob_sql_session_info.h"
#include "storage/ob_storage_util.h"
#include "sql/engine/expr/ob_expr_lob_utils.h"
namespace oceanbase
{
using namespace common;
namespace sql
{
ObExprSubstr::ObExprSubstr(ObIAllocator &alloc)
: ObStringExprOperator(alloc, T_FUN_SYS_SUBSTR, N_SUBSTR, TWO_OR_THREE, VALID_FOR_GENERATED_COL)
{
}
ObExprSubstr::~ObExprSubstr()
{
}
//计算substr结果的长度
int ObExprSubstr::calc_result_length(ObExprResType *types_array,
int64_t param_num,
ObCollationType cs_type,
int64_t &res_len) const
{
int ret = OB_SUCCESS;
ObString str_text;
int64_t start_pos = 1;
int64_t result_len = types_array[0].get_length(); //最大长度
int64_t substr_len = result_len;
const bool is_oracle_mode = lib::is_oracle_mode();
ObExprCtx expr_ctx;
ObArenaAllocator allocator(common::ObModIds::OB_SQL_EXPR_CALC);
expr_ctx.calc_buf_ = &allocator;
res_len = result_len;
if (OB_UNLIKELY(2 != param_num && 3 != param_num)) {
ret = OB_INVALID_ARGUMENT;
LOG_WARN("substr should have two or three arguments", K(param_num), K(ret));
} else {
const ObObj &start_obj = types_array[1].get_param();
if (!start_obj.is_null()) {
if (is_oracle_mode) {
if (OB_FAIL(ObExprUtil::get_trunc_int64(start_obj, expr_ctx, start_pos))) {
ret = OB_SUCCESS;
LOG_WARN("ignore failure when calc result type length oracle mode", K(ret));
}
if (0 == start_pos) {
start_pos = 1;
}
} else if (start_obj.is_int()) {
start_pos = start_obj.get_int();
}
}
if (OB_SUCC(ret) && 3 == param_num && !types_array[2].get_param().is_null()) {
const ObObj &len_obj = types_array[2].get_param();
if (is_oracle_mode && OB_FAIL(ObExprUtil::get_trunc_int64(len_obj, expr_ctx, substr_len))) {
ret = OB_SUCCESS;
LOG_WARN("ignore failure when calc result type length oracle mode", K(ret));
} else if (!is_oracle_mode && len_obj.is_int()) {
substr_len = len_obj.get_int();
}
}
}
if (OB_SUCC(ret)) {
LOG_DEBUG("substr calc len", K(result_len), K(substr_len), K(start_pos), K(types_array[0].get_param()));
if (0 >= result_len || 0 >= substr_len || start_pos > result_len) {
res_len = 0;
} else {
const ObObj &text_obj = types_array[0].get_param();
//根据参数0是否为常量区别计算
if (ob_is_string_type(text_obj.get_type()) && OB_SUCC(text_obj.get_string(str_text))) {
int64_t mb_len = ObCharset::strlen_char(cs_type, str_text.ptr(), str_text.length());
start_pos = (start_pos >= 0) ? start_pos - 1 : start_pos + mb_len;
if (OB_UNLIKELY(start_pos < 0 || start_pos >= mb_len)) {
res_len = 0;
} else {
res_len = min(substr_len, mb_len - start_pos);
int64_t offset = ObCharset::charpos(cs_type, str_text.ptr(), str_text.length(), start_pos);
res_len = ObCharset::charpos(cs_type, str_text.ptr() + offset,
(offset == 0) ? str_text.length() : str_text.length() - offset + 1, res_len);
}
} else {
int64_t mbmaxlen = 0;
if (OB_FAIL(ObCharset::get_mbmaxlen_by_coll(cs_type, mbmaxlen))) {
SQL_RESV_LOG(WARN, "fail to get mbmaxlen", K(ret), K(cs_type));
} else if (0 == mbmaxlen) {
ret = OB_ERR_UNEXPECTED;
SQL_RESV_LOG(ERROR, "mbmaxlen can not be 0", K(ret));
} else {
if (LS_CHAR == types_array[0].get_length_semantics()) {
mbmaxlen = 1;
}
if (start_pos > 0 && substr_len > 0) {
if (start_pos + substr_len <= result_len + 1) {
if (is_oracle_mode) {
res_len = substr_len * mbmaxlen;
} else {
res_len = substr_len;
}
} else {
if (is_oracle_mode) {
res_len = (result_len - start_pos + 1) * mbmaxlen;
} else {
res_len = result_len - start_pos + 1;
}
}
} else if (is_oracle_mode) {
res_len *= mbmaxlen;
}
if (types_array[0].is_lob() && res_len > OB_MAX_LONGTEXT_LENGTH / mbmaxlen) {
res_len = OB_MAX_LONGTEXT_LENGTH / mbmaxlen;
}
}
}
}
}
return ret;
}
int ObExprSubstr::calc_result_length_oracle(const ObExprResType *types_array,
int64_t param_num,
const ObExprResType &result_type,
int64_t &res_len) const
{
int ret = OB_SUCCESS;
ObString str_text;
int64_t start_pos = 1;
int64_t result_len = types_array[0].get_calc_length(); //最大长度
int64_t substr_len = result_len;
ObExprCtx expr_ctx;
ObArenaAllocator allocator(common::ObModIds::OB_SQL_EXPR_CALC);
expr_ctx.calc_buf_ = &allocator;
res_len = result_len;
const ObObj start_obj = types_array[1].get_param();
if (!start_obj.is_null()) {
if (OB_FAIL(ObExprUtil::get_trunc_int64(start_obj, expr_ctx, start_pos))) {
ret = OB_SUCCESS;
LOG_WARN("ignore failure when calc result type length oracle mode", K(ret));
}
if (0 == start_pos) {
start_pos = 1;
}
}
if (OB_SUCC(ret) && 3 == param_num && !types_array[2].get_param().is_null()) {
const ObObj len_obj = types_array[2].get_param();
if (OB_FAIL(ObExprUtil::get_trunc_int64(len_obj, expr_ctx, substr_len))) {
ret = OB_SUCCESS;
LOG_WARN("ignore failure when calc result type length oracle mode", K(ret));
}
}
if (OB_SUCC(ret)) {
LOG_DEBUG("substr calc len", K(result_len), K(substr_len), K(start_pos));
if (0 >= result_len || 0 >= substr_len || start_pos > result_len) {
res_len = 0;
} else {
int64_t mbmaxlen = 0;
ObCollationType cs_type = result_type.get_collation_type();
if (OB_FAIL(ObCharset::get_mbmaxlen_by_coll(cs_type, mbmaxlen))) {
SQL_RESV_LOG(WARN, "fail to get mbmaxlen", K(ret), K(cs_type));
} else {
if (start_pos > 0 && substr_len > 0) {
if (start_pos + substr_len <= result_len + 1) {
res_len = substr_len;
} else {
res_len = result_len - start_pos + 1;
}
if (result_type.is_varchar_or_char() && LS_BYTE == result_type.get_length_semantics()) {
res_len *= mbmaxlen;
}
}
}
}
}
return ret;
}
int ObExprSubstr::calc_result_typeN(ObExprResType &type,
ObExprResType *types_array,
int64_t param_num,
ObExprTypeCtx &type_ctx) const
{
int ret = OB_SUCCESS;
int64_t len = 0;
CK(NULL != type_ctx.get_session());
CK(2 == param_num || 3 == param_num);
if (lib::is_oracle_mode()) {
auto str_params = make_const_carray(&types_array[0]);
OZ(aggregate_string_type_and_charset_oracle(*type_ctx.get_session(),
str_params,
type,
PREFER_VAR_LEN_CHAR));
OZ(deduce_string_param_calc_type_and_charset(*type_ctx.get_session(), type, str_params));
bool all_decint_params = true;
for (int i = 1; all_decint_params && i < param_num; i++) {
all_decint_params = (types_array[i].get_type() == ObDecimalIntType);
}
if (all_decint_params) {
// do nothing
} else {
for (int i = 1; OB_SUCC(ret) && i < param_num; i++) {
types_array[i].set_calc_type(ObNumberType);
types_array[i].set_calc_scale(NUMBER_SCALE_UNKNOWN_YET);
}
}
OZ(calc_result_length_oracle(types_array, param_num, type, len));
CK(len <= INT32_MAX);
OX(type.set_length(static_cast<ObLength>(len)));
} else {
const int32_t mbmaxlen = 4;
if (ObTextType == types_array[0].get_type()
|| ObMediumTextType == types_array[0].get_type()
|| ObLongTextType == types_array[0].get_type()) {
type.set_type(ObLongTextType);
type.set_length(OB_MAX_LONGTEXT_LENGTH / mbmaxlen);
} else if (ObTinyTextType == types_array[0].get_type()) {
type.set_type(ObTextType);
type.set_length(OB_MAX_TEXT_LENGTH / mbmaxlen);
} else {
type.set_varchar();
}
if (OB_SUCC(ret)
&& ob_is_text_tc(type.get_type())
&& 3 == param_num
&& !types_array[2].get_param().is_null()
// Compatible with mixing running different versions of observer, the result type is
// varchar only when all observer versions are higher than 4.2.0, otherwise is blob,
// which is not compatible with mysql
&& GET_MIN_CLUSTER_VERSION() >= CLUSTER_VERSION_4_2_0_0) {
const ObObj &len_obj = types_array[2].get_param();
int64_t substr_len = len_obj.is_int() ? len_obj.get_int() : 0;
if (substr_len > 0 && substr_len <= OB_MAX_CAST_CHAR_VARCHAR_LENGTH) {
type.set_varchar();
}
}
OZ(aggregate_charsets_for_string_result(type, types_array, 1, type_ctx.get_coll_type()));
if (OB_SUCC(ret)) {
if (is_mysql_mode() && (types_array[0].is_text() || types_array[0].is_blob())) {
// do nothing
} else {
types_array[0].set_calc_type(ObVarcharType);
}
types_array[0].set_calc_collation_level(type.get_calc_collation_level());
types_array[0].set_calc_collation_type(type.get_collation_type());
}
if (OB_SUCC(ret)) {
for (int i = 1; i < param_num; i++) {
types_array[i].set_calc_type(ObIntType);
}
}
if (OB_SUCC(ret) && !ob_is_text_tc(type.get_type())) {
// Set cast mode for integer parameters, truncate string to integer.
// see: ObExprSubstr::cast_param_type_for_mysql
OX(type_ctx.set_cast_mode(type_ctx.get_cast_mode() | CM_STRING_INTEGER_TRUNC));
OX(len = types_array[0].get_length());
// deduce max length.
OZ(calc_result_length(types_array, param_num, type.get_collation_type(), len));
CK(len <= INT32_MAX);
OX(type.set_length(static_cast<ObLength>(len)));
}
}
return ret;
}
// to make "select substr('abcd', '1.9')" compatible with mysql
int ObExprSubstr::cast_param_type_for_mysql(const ObObj& in,
ObExprCtx& expr_ctx,
ObObj& out) const
{
int ret = OB_SUCCESS;
ObCastMode cast_mode = CM_NONE;
EXPR_DEFINE_CAST_CTX(expr_ctx, cast_mode);
LOG_DEBUG("ObExprSubstr cast_param_type_for_mysql in.get_type(): ", K(in.get_type()));
// select substr('abcd', '1.9')中,MySQL对'1.9'进行trunc操作
// select substr('abcd', 1.9)中,MySQL对1.9进行round操作
if (ObVarcharType == in.get_type()) {
int64_t tmp = 0;
if (OB_FAIL(ObExprUtil::get_trunc_int64(in, expr_ctx, tmp))) {
LOG_WARN("ObExprSubstr get_trunc_int64 failed", K(in.get_type()));
} else if (INT_MAX < tmp) {
out.set_int(INT_MAX);
} else if (INT_MIN > tmp) {
out.set_int(INT_MIN);
} else {
out.set_int(static_cast<int>(tmp));
}
} else if (OB_FAIL(ObObjCaster::to_type(ObIntType, cast_ctx, in, out))) {
LOG_WARN("ObExprSubstr to_type failed", K(in.get_type()));
}
return ret;
}
int ObExprSubstr::calc_result2_for_mysql(ObObj &result,
const ObObj &text,
const ObObj &start_pos,
ObExprCtx &expr_ctx) const
{
int ret = OB_SUCCESS;
ObObj trunced_start_pos;
if (OB_FAIL(cast_param_type_for_mysql(start_pos, expr_ctx, trunced_start_pos))) {
LOG_WARN("ObExprSubstr cast_param_type_for_mysql failed", K(start_pos.get_type()));
} else {
ObObj length;
// text maybe lob types, but no modifications, since cannot find the caller of this function
length.set_int(text.get_string().length() - trunced_start_pos.get_int() + 1);
ret = calc_result3_for_mysql(result, text, trunced_start_pos, length, expr_ctx);
}
return ret;
}
int ObExprSubstr::calc_result2_for_oracle(ObObj &result,
const ObObj &text,
const ObObj &start_pos,
ObExprCtx &expr_ctx) const
{
int ret = OB_SUCCESS;
bool is_clob = text.is_clob() ? true : false;
ObCollationType cs_type = result_type_.get_collation_type();
if (OB_ISNULL(expr_ctx.calc_buf_)) {
LOG_WARN("varchar buffer not init");
ret = OB_NOT_INIT;
} else if (text.is_null() || start_pos.is_null()) {
result.set_null();
} else {
TYPE_CHECK(start_pos, ObNumberType);
// text maybe lob types, but no modifications, since cannot find the caller of this function
const ObString &str_val = text.get_varchar();
int64_t start_pos_val = 0;
LOG_DEBUG("ObExprSubstr", K(ret), K(str_val), K(start_pos));
if (OB_FAIL(ObExprUtil::get_trunc_int64(start_pos, expr_ctx, start_pos_val))) {
LOG_WARN("get int value failed", K(ret));
} else if (OB_FAIL(calc(result, str_val, start_pos_val, text.get_string().length() - start_pos_val + 1, cs_type, is_clob))) {
LOG_WARN("failed to calc for substr", K(str_val), K(start_pos), K(ret));
} else {
if (!result.is_null()) {
result.set_meta_type(result_type_);
}
}
}
return ret;
}
int ObExprSubstr::calc_result3_for_mysql(ObObj &result,
const ObObj &text,
const ObObj &start_pos,
const ObObj &length,
ObExprCtx &expr_ctx) const
{
int ret = OB_SUCCESS;
ObObj trunced_start_pos;
ObObj trunced_length;
ObCollationType cs_type = result_type_.get_collation_type();
if (OB_ISNULL(expr_ctx.calc_buf_)) {
LOG_WARN("varchar buffer not init");
ret = OB_NOT_INIT;
} else if (text.is_null() || start_pos.is_null() || length.is_null()) {
result.set_null();
} else {
if (OB_FAIL(cast_param_type_for_mysql(start_pos, expr_ctx, trunced_start_pos))) {
LOG_WARN("ObExprSubstr cast_param_type_for_mysql failed", K(start_pos.get_type()));
} else if (OB_FAIL(cast_param_type_for_mysql(length, expr_ctx, trunced_length))){
LOG_WARN("ObExprSubstr cast_param_type_for_mysql failed", K(length.get_type()));
} else {
// text param can be varchar or any type in text tc
TYPE_CHECK(trunced_start_pos, ObIntType);
TYPE_CHECK(trunced_length, ObIntType);
const ObString &str_val = text.get_varchar();
int64_t start_pos_val = trunced_start_pos.get_int();
int64_t length_val = trunced_length.get_int();
if (OB_FAIL(calc(result, str_val, start_pos_val, length_val, cs_type, false))) {
LOG_WARN("failed to calc for substr", K(text), K(trunced_start_pos),
K(trunced_length), K(ret));
} else {
if (!result.is_null()) {
result.set_collation(result_type_);
}
}
}
}
return ret;
}
int ObExprSubstr::calc_result3_for_oracle(ObObj &result,
const ObObj &text,
const ObObj &start_pos,
const ObObj &length,
ObExprCtx &expr_ctx) const
{
int ret = OB_SUCCESS;
bool is_clob = text.is_clob() ? true : false;
ObCollationType cs_type = result_type_.get_collation_type();
if (OB_ISNULL(expr_ctx.calc_buf_)) {
LOG_WARN("varchar buffer not init");
ret = OB_NOT_INIT;
} else if (text.is_null() || start_pos.is_null() || length.is_null()) {
result.set_null();
} else {
TYPE_CHECK(start_pos, ObNumberType);
TYPE_CHECK(length, ObNumberType);
const ObString &str_val = text.get_varchar();
int64_t start_pos_val = 0;
int64_t length_val = 0;
LOG_DEBUG("ObExprSubstr", K(lib::is_oracle_mode()), K(ret), K(str_val), K(start_pos), K(length));
if (OB_FAIL(ObExprUtil::get_trunc_int64(start_pos, expr_ctx, start_pos_val))
|| ObExprUtil::get_trunc_int64(length, expr_ctx, length_val)) {
LOG_WARN("get int value failed", K(ret), K(start_pos), K(length));
} else if (OB_FAIL(calc(result, str_val, start_pos_val, length_val, cs_type, is_clob))) {
LOG_WARN("failed to calc for substr", K(text), K(start_pos), K(length), K(ret));
} else {
if (!result.is_null()) {
result.set_meta_type(result_type_);
}
}
}
return ret;
}
int ObExprSubstr::substr(common::ObString &varchar,
const common::ObString &text,
const int64_t start_pos,
const int64_t length,
common::ObCollationType cs_type,
const bool do_ascii_optimize_check)
{
int ret = OB_SUCCESS;
varchar = text;
if (OB_UNLIKELY(0 >= varchar.length() || 0 >= length)) {
varchar.assign(NULL, 0);
} else {
int64_t start = start_pos;
int64_t res_len = 0;
bool is_ascii = false;
if (lib::is_oracle_mode() && 0 == start_pos) {
start = 1;
}
start = (start >= 0) ? start - 1 : start + varchar.length();
if (OB_UNLIKELY(start < 0 || start >= varchar.length())) {
varchar.assign(NULL, 0);
} else {
if (do_ascii_optimize_check) { // ObCharsetType is CHARSET_UTF8MB4 or CHARSET_GBK
res_len = min(length, varchar.length() - start);
is_ascii = storage::is_ascii_str(varchar.ptr(), start + res_len);
}
if (is_ascii) {
varchar.assign_ptr(varchar.ptr() + start, static_cast<int32_t>(res_len));
} else { // If not all the front chars in param is ascii, rollback to original method.
start = start_pos;
res_len = 0;
int64_t mb_len = ObCharset::strlen_char(cs_type, varchar.ptr(), varchar.length());
if (lib::is_oracle_mode() && 0 == start_pos) {
start = 1;
}
start = (start >= 0) ? start - 1 : start + mb_len;
if (OB_UNLIKELY(start < 0 || start >= mb_len)) {
varchar.assign(NULL, 0);
} else {
//It holds that 0<=start<mb_len && length > 0
res_len = min(length, mb_len - start);
int64_t offset = ObCharset::charpos(cs_type, varchar.ptr(), varchar.length(), start);
res_len = ObCharset::charpos(cs_type, varchar.ptr() + offset,
(offset == 0) ? varchar.length() : varchar.length() - offset, res_len);
varchar.assign_ptr(varchar.ptr() + offset, static_cast<int32_t>(res_len));
}
}
}
}
return ret;
}
int ObExprSubstr::calc(ObObj &result,
const ObString &text,
const int64_t start_pos,
const int64_t length,
ObCollationType cs_type,
const bool is_clob)
{
int ret = OB_SUCCESS;
ObString varchar;
if (OB_FAIL(substr(varchar, text, start_pos, length, cs_type, storage::can_do_ascii_optimize(cs_type)))) {
LOG_WARN("get substr failed", K(ret));
} else {
if (varchar.length() <= 0 && lib::is_oracle_mode() && !is_clob) {
result.set_null();
} else {
if (is_clob) {
result.set_lob_value(ObLongTextType, varchar.ptr(), varchar.length());
} else {
result.set_varchar(varchar);
}
}
}
return ret;
}
int ObExprSubstr::cg_expr(ObExprCGCtx &op_cg_ctx,
const ObRawExpr &raw_expr,
ObExpr &rt_expr) const
{
int ret = OB_SUCCESS;
UNUSED(op_cg_ctx);
UNUSED(raw_expr);
CK(2 == rt_expr.arg_cnt_ || 3 == rt_expr.arg_cnt_);
if (OB_SUCC(ret)) {
rt_expr.eval_func_ = eval_substr;
if (2 == rt_expr.arg_cnt_
&& rt_expr.args_[0]->is_batch_result()
&& !rt_expr.args_[1]->is_batch_result()) {
rt_expr.eval_batch_func_ = eval_substr_batch;
} else if (3 == rt_expr.arg_cnt_
&& rt_expr.args_[0]->is_batch_result()
&& !rt_expr.args_[1]->is_batch_result()
&& !rt_expr.args_[2]->is_batch_result()) {
rt_expr.eval_batch_func_ = eval_substr_batch;
}
}
return ret;
}
static int eval_substr_text(const ObCollationType &cs_type,
ObTextStringIter &input_iter,
ObTextStringDatumResult &output_result,
int64_t &total_byte_len,
int64_t &pos,
int64_t &len,
bool is_batch = false,
int64_t batch_idx = 0)
{
int ret = OB_SUCCESS;
int64_t mbmaxlen = 1;
int64_t result_byte_len = 0;
int64_t total_char_len = 0;
if (OB_FAIL(ObCharset::get_mbmaxlen_by_coll(cs_type, mbmaxlen))) {
LOG_WARN("fail to get mbmaxlen", K(cs_type), K(ret));
} else if (OB_FAIL(input_iter.get_char_len(total_char_len))) {
LOG_WARN("get input char len failed", K(ret));
} else if (FALSE_IT(result_byte_len = MIN((pos >= 0 ? total_byte_len - pos + 1 : -pos * mbmaxlen), (MIN((len), (total_char_len)) * mbmaxlen)))) {
} else if (len <= 0 && lib::is_oracle_mode()) {
output_result.set_result_null();
} else if (pos > total_char_len || len <= 0) {
if (!is_batch) {
ret = output_result.init(0); // fill empty lob result
} else {
ret = output_result.init_with_batch_idx(0, batch_idx);
}
if (OB_FAIL(ret)) {
LOG_WARN("init stringtext result failed", K(ret));
} else {
output_result.set_result();
}
} else {
if (!is_batch) {
ret = output_result.init(result_byte_len);
} else {
ret = output_result.init_with_batch_idx(result_byte_len, batch_idx);
}
if (OB_FAIL(ret)) {
LOG_WARN("init stringtext result failed", K(ret));
} else {
if (lib::is_oracle_mode() && 0 == pos) {
pos = 1;
}
// iter settings only effective to outrow lobs
uint64_t start_offset = (pos >= 0 ? pos - 1 : total_char_len + pos);
if (start_offset >= total_char_len) {
output_result.set_result();
} else {
input_iter.set_start_offset((pos >= 0 ? pos - 1 : total_char_len + pos));
input_iter.set_access_len(len);
ObTextStringIterState state;
ObString src_block_data;
while (OB_SUCC(ret)
&& (state = input_iter.get_next_block(src_block_data)) == TEXTSTRING_ITER_NEXT) {
if (!input_iter.is_outrow_lob()) {
ObString inrow_result;
if (OB_FAIL(ObExprSubstr::substr(inrow_result, src_block_data, pos, len,
cs_type,
storage::can_do_ascii_optimize(cs_type)))) {
LOG_WARN("get substr failed", K(ret));
} else if (OB_FAIL(output_result.append(inrow_result))) {
LOG_WARN("append result failed", K(ret), K(output_result), K(src_block_data));
}
} else if (OB_FAIL(output_result.append(src_block_data))) {
LOG_WARN("append result failed", K(ret), K(output_result), K(src_block_data));
}
}
if (OB_FAIL(ret)) {
} else if (state != TEXTSTRING_ITER_NEXT && state != TEXTSTRING_ITER_END) {
ret = (input_iter.get_inner_ret() != OB_SUCCESS) ?
input_iter.get_inner_ret() : OB_INVALID_DATA;
LOG_WARN("iter state invalid", K(ret), K(state), K(input_iter));
} else {
output_result.set_result();
}
}
}
}
return ret;
}
int ObExprSubstr::eval_substr(const ObExpr &expr, ObEvalCtx &ctx, ObDatum &expr_datum)
{
int ret = OB_SUCCESS;
if (OB_FAIL(expr.eval_param_value(ctx))) {
LOG_WARN("evaluate parameters failed", K(ret));
} else {
ObDatum *str_datum = &expr.locate_param_datum(ctx, 0);
ObDatum *pos_datum = &expr.locate_param_datum(ctx, 1);
ObDatum *len_datum = NULL;
if (expr.arg_cnt_ > 2) {
len_datum = &expr.locate_param_datum(ctx, 2);
}
if (str_datum->is_null() || pos_datum->is_null()
|| (NULL != len_datum && len_datum->is_null())) {
expr_datum.set_null();
} else {
ObString input = str_datum->get_string();
int64_t pos = 0;
int64_t len = input.length();
if (lib::is_oracle_mode()) {
if (OB_FAIL(ora_get_integer(*pos_datum, *expr.args_[1], pos))
|| (NULL != len_datum && OB_FAIL(ora_get_integer(*len_datum, *expr.args_[2], len)))) {
LOG_WARN("get integer value failed", K(ret));
}
} else {
pos = pos_datum->get_int();
len = NULL == len_datum ? len : len_datum->get_int();
}
const ObDatumMeta &input_meta = expr.args_[0]->datum_meta_;
if (OB_FAIL(ret)) {
} else if (!ob_is_text_tc(input_meta.type_)) {
ObString output;
if (OB_FAIL(substr(output, input, pos, len,
expr.datum_meta_.cs_type_,
storage::can_do_ascii_optimize(expr.datum_meta_.cs_type_)))) {
LOG_WARN("get substr failed", K(ret));
} else {
if (OB_UNLIKELY(output.length() <= 0)
&& lib::is_oracle_mode() && !input_meta.is_clob()) {
expr_datum.set_null();
} else {
expr_datum.set_string(output);
}
}
} else { // text tc
ObEvalCtx::TempAllocGuard alloc_guard(ctx);
ObIAllocator &calc_alloc = alloc_guard.get_allocator();
const bool has_lob_header = expr.args_[0]->obj_meta_.has_lob_header();
ObTextStringIter input_iter(input_meta.type_, input_meta.cs_type_, str_datum->get_string(), has_lob_header);
ObTextStringDatumResult output_result(expr.datum_meta_.type_, &expr, &ctx, &expr_datum);
int64_t total_byte_len = 0;
if (OB_FAIL(input_iter.init(0, NULL, &calc_alloc))) {
LOG_WARN("init input_iter failed ", K(ret), K(input_iter));
} else if (OB_FAIL(input_iter.get_byte_len(total_byte_len))) {
LOG_WARN("get input byte len failed", K(ret));
} else {
len = NULL == len_datum ? total_byte_len : len;
}
if (OB_FAIL(ret)) {
} else if (OB_FAIL(eval_substr_text(expr.datum_meta_.cs_type_,
input_iter,
output_result,
total_byte_len,
pos,
len))) {
LOG_WARN("eval substr text failed", K(ret));
}
}
}
}
return ret;
}
int ObExprSubstr::eval_substr_batch(const ObExpr &expr, ObEvalCtx &ctx,
const ObBitVector &skip, const int64_t batch_size)
{
LOG_DEBUG("eval substr in batch mode", K(batch_size));
int ret = OB_SUCCESS;
ObDatum *results = expr.locate_batch_datums(ctx);
if (OB_ISNULL(results)) {
ret = OB_ERR_UNEXPECTED;
LOG_WARN("expr results frame is not init", K(ret));
} else {
ObBitVector &eval_flags = expr.get_evaluated_flags(ctx);
const bool has_len_param = expr.arg_cnt_ > 2 ? true : false;
if (OB_FAIL(expr.args_[0]->eval_batch(ctx, skip, batch_size))) {
LOG_WARN("failed to eval batch result args0", K(ret));
} else {
ObDatum *datum_array = expr.args_[0]->locate_batch_datums(ctx);
ObString output;
ObString input;
ObDatum *pos_datum = NULL;
ObDatum *len_datum = NULL;
int64_t pos = 0;
int64_t len = INT_MAX64;
bool is_text_params_all_null = true; // used for mark if all the first params are all null
bool is_result_all_null = false;
for (int64_t j = 0; is_text_params_all_null && j < batch_size; ++j) {
if (skip.at(j) || eval_flags.at(j)) {
continue;
} else if (!datum_array[j].is_null()) {
is_text_params_all_null = false;
}
}
if (is_text_params_all_null) {
is_result_all_null = true;
} else if (OB_FAIL(expr.args_[1]->eval(ctx, pos_datum))) {
LOG_WARN("eval pos_datum failed", K(ret));
} else if (pos_datum->is_null()) {
is_result_all_null = true;
} else if (has_len_param && OB_FAIL(expr.args_[2]->eval(ctx, len_datum))) {
LOG_WARN("eval len_datum failed", K(ret));
} else if (has_len_param && len_datum->is_null()) {
is_result_all_null = true;
}
if (OB_FAIL(ret)) {
} else if (is_result_all_null) { // any param is null, result is null
for (int64_t j = 0; OB_SUCC(ret) && j < batch_size; ++j) {
if (skip.at(j) || eval_flags.at(j)) {
continue;
} else {
results[j].set_null();
eval_flags.set(j);
}
}
} else {
if (is_oracle_mode()) {
if (OB_FAIL(ora_get_integer(*pos_datum, *expr.args_[1], pos))
|| (NULL != len_datum && OB_FAIL(ora_get_integer(*len_datum, *expr.args_[2], len)))) {
LOG_WARN("get integer value failed", K(ret));
}
} else {
pos = pos_datum->get_int();
len = has_len_param ? len_datum->get_int() : len;
}
bool do_ascii_optimize_check = storage::can_do_ascii_optimize(expr.datum_meta_.cs_type_);
for (int64_t j = 0; OB_SUCC(ret) && (j < batch_size); ++j) {
if (skip.at(j) || eval_flags.at(j)) {
continue;
} else if (datum_array[j].is_null()) {
results[j].set_null();
eval_flags.set(j);
} else if(!ob_is_text_tc(expr.args_[0]->datum_meta_.type_)) {
if (OB_FAIL(substr(output,
datum_array[j].get_string(),
pos,
min(len, datum_array[j].get_string().length()),
expr.datum_meta_.cs_type_, do_ascii_optimize_check))) {
LOG_WARN("get substr failed", K(ret));
} else {
if (OB_UNLIKELY(output.length() <= 0)
&& lib::is_oracle_mode() && !expr.args_[0]->datum_meta_.is_clob()) {
results[j].set_null();
} else {
results[j].set_string(output);
}
eval_flags.set(j);
}
} else { // text tc
const ObDatumMeta &input_meta = expr.args_[0]->datum_meta_;
const bool has_lob_header = expr.args_[0]->obj_meta_.has_lob_header();
ObEvalCtx::TempAllocGuard alloc_guard(ctx);
ObIAllocator &calc_alloc = alloc_guard.get_allocator();
ObTextStringIter input_iter(input_meta.type_, input_meta.cs_type_, datum_array[j].get_string(), has_lob_header);
ObTextStringDatumResult output_result(expr.datum_meta_.type_, &expr, &ctx, &results[j]);
int64_t total_byte_len = 0;
if (OB_FAIL(input_iter.init(0, NULL, &calc_alloc))) {
LOG_WARN("init input_iter failed ", K(ret), K(input_iter));
} else if (OB_FAIL(input_iter.get_byte_len(total_byte_len))) {
LOG_WARN("get input byte len failed", K(ret), K(j));
} else if (OB_FAIL(eval_substr_text(expr.datum_meta_.cs_type_,
input_iter,
output_result,
total_byte_len,
pos, len,
true, j))) {
LOG_WARN("eval substr text failed", K(ret));
} else {
eval_flags.set(j);
}
}
}
}
}
}
return ret;
}
DEF_SET_LOCAL_SESSION_VARS(ObExprSubstr, raw_expr) {
int ret = OB_SUCCESS;
SET_LOCAL_SYSVAR_CAPACITY(1);
EXPR_ADD_LOCAL_SYSVAR(share::SYS_VAR_COLLATION_CONNECTION);
return ret;
}
int ObExprSubstr::ora_get_integer(const ObDatum &int_datum, const ObExpr &expr, int64_t &v)
{
int ret = OB_SUCCESS;
if (ob_is_decimal_int(expr.datum_meta_.type_)) {
if (OB_FAIL(ObExprUtil::trunc_decint2int64(
int_datum.get_decimal_int(), int_datum.get_int_bytes(), expr.datum_meta_.scale_, v))) {
LOG_WARN("get integer failed", K(ret));
}
} else if (ob_is_number_tc(expr.datum_meta_.type_)) {
if (OB_FAIL(ObExprUtil::trunc_num2int64(int_datum, v))) {
LOG_WARN("get integer failed", K(ret));
}
} else {
ret = OB_ERR_UNEXPECTED;
LOG_WARN("unexpected datum", K(int_datum), K(expr));
}
return ret;
}
} /* sql */
} /* oceanbase */