[Tarantool-patches] [PATCHv3 0/2] lua: fix tarantool -e always enters interactive mode

[Tarantool-patches] [PATCHv3 0/2] lua: fix tarantool -e always enters interactive mode

[Artem Starshov via Tarantool-patches]

Issue: https://github.com/tarantool/tarantool/issues/5040
Branch: https://github.com/tarantool/tarantool/tree/artemreyt/gh-5040-interactive-mode-bug
CI: https://github.com/tarantool/tarantool/runs/2029377964

Changes in v3:
  * core:
    - add case-insensetive value for boolean error injection;
    - add more tests for setting error injections;
    - few refactored things (80 line width, alignment and etc.);
    - add release_disable for test;
    - add reference to test-run issue in commit message;
    - now, it is able to set errinjs via env ONLY in Debug mode.
  * lua:
    - some refactoring (name of variables, 80 line-width..);
    - add release_disable for test;
    - add reference to test-run issue in commit message;
    - add "errinj" to the name of the test;
    - add comments to source code.

Artem Starshov (2):
  core: add setting error injections via env
  lua: fix tarantool -e always enters interactive mode

 src/lib/core/errinj.c                         |  30 +++++
 src/lib/core/errinj.h                         |   6 +
 src/lua/init.c                                |  27 +++-
 src/main.cc                                   |   3 +
 ...5040-inter-mode-isatty-via-errinj.test.lua | 126 ++++++++++++++++++
 test/app-tap/suite.ini                        |   1 +
 .../errinj_set_with_enviroment_vars.test.lua  |  29 ++++
 ...errinj_set_with_enviroment_vars_script.lua |  34 +++++
 test/box-tap/suite.ini                        |   1 +
 test/box/errinj.result                        |   1 +
 10 files changed, 254 insertions(+), 4 deletions(-)
 create mode 100755 test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua
 create mode 100755 test/box-tap/errinj_set_with_enviroment_vars.test.lua
 create mode 100644 test/box-tap/errinj_set_with_enviroment_vars_script.lua

-- 
2.28.0

[Tarantool-patches] [PATCHv3 1/2] core: add setting error injections via env

[Artem Starshov via Tarantool-patches]

Sometimes, it's useful to set error injections via environment
variables and this commit adds this opportunity.

e.g: `ERRINJ_WAL_WRITE=true tarantool` will be launched with
ERRINJ_WAL_WRITE setted to true.

Errinjs with bool parameters can be set to "true", "false",
"True", "False", "TRUE", "FALSE", etc. (case-insensitive variable).

Errinjs with int or double parameters should be whole valid ("123s" is invalid).
e.g. for int or double: "123", "-1", "2.34", "+2.34".

NOTE: errinjs should work only in debug mode, so added `release_disabled` in
suite.ini. But there is a bug in test-run: `release_disable` disables tests at
each build type. Partially this problem is descripted in tarantool/test-run#199.

Part of #5040
---
 src/lib/core/errinj.c                         | 30 ++++++++++++++++
 src/lib/core/errinj.h                         |  5 +++
 src/main.cc                                   |  3 ++
 .../errinj_set_with_enviroment_vars.test.lua  | 29 ++++++++++++++++
 ...errinj_set_with_enviroment_vars_script.lua | 34 +++++++++++++++++++
 test/box-tap/suite.ini                        |  1 +
 6 files changed, 102 insertions(+)
 create mode 100755 test/box-tap/errinj_set_with_enviroment_vars.test.lua
 create mode 100644 test/box-tap/errinj_set_with_enviroment_vars_script.lua

diff --git a/src/lib/core/errinj.c b/src/lib/core/errinj.c
index d3aa0ca4f..8f76bfac1 100644
--- a/src/lib/core/errinj.c
+++ b/src/lib/core/errinj.c
@@ -28,9 +28,11 @@
  * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  * SUCH DAMAGE.
  */
+#include <ctype.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
+#include <strings.h>
 #include <stdbool.h>
 
 #include "trivia/config.h"
@@ -66,3 +68,31 @@ int errinj_foreach(errinj_cb cb, void *cb_ctx) {
 	}
 	return 0;
 }
+
+void errinj_set_with_environment_vars(void) {
+    for (enum errinj_id i = 0; i < errinj_id_MAX; i++) {
+        struct errinj *inj = &errinjs[i];
+        const char *env_value = getenv(inj->name);
+        if (env_value == NULL || *env_value == '\0')
+            continue;
+
+        if (inj->type == ERRINJ_INT) {
+            char *end;
+            int64_t int_value = strtoll(env_value, &end, 10);
+            if (*end == '\0')
+                inj->iparam = int_value;
+        } else if (inj->type == ERRINJ_BOOL) {
+            if (strcasecmp(env_value, "false") == 0)
+                inj->bparam = false;
+            else if (strcasecmp(env_value, "true") == 0)
+                inj->bparam = true;
+        } else if (inj->type == ERRINJ_DOUBLE) {
+            char *end;
+            double double_value = strtod(env_value, &end);
+            if (*end == '\0')
+                inj->dparam = double_value;
+        } else {
+            panic("Unknown errinj type received");
+        }
+    }
+}
diff --git a/src/lib/core/errinj.h b/src/lib/core/errinj.h
index 814c57c2e..10edbe2b9 100644
--- a/src/lib/core/errinj.h
+++ b/src/lib/core/errinj.h
@@ -168,6 +168,11 @@ typedef int (*errinj_cb)(struct errinj *e, void *cb_ctx);
 int
 errinj_foreach(errinj_cb cb, void *cb_ctx);
 
+/**
+ * Set injections by scanning ERRINJ_$(NAME) in environment variables
+ */
+void errinj_set_with_environment_vars(void);
+
 #ifdef NDEBUG
 #  define ERROR_INJECT(ID, CODE)
 #  define ERROR_INJECT_WHILE(ID, CODE)
diff --git a/src/main.cc b/src/main.cc
index 2fce81bb3..718180b80 100644
--- a/src/main.cc
+++ b/src/main.cc
@@ -710,6 +710,9 @@ main(int argc, char **argv)
 	memtx_tx_manager_init();
 	crypto_init();
 	systemd_init();
+#ifndef NDEBUG
+	errinj_set_with_environment_vars();
+#endif
 	tarantool_lua_init(tarantool_bin, main_argc, main_argv);
 
 	start_time = ev_monotonic_time();
diff --git a/test/box-tap/errinj_set_with_enviroment_vars.test.lua b/test/box-tap/errinj_set_with_enviroment_vars.test.lua
new file mode 100755
index 000000000..8d4ecaedd
--- /dev/null
+++ b/test/box-tap/errinj_set_with_enviroment_vars.test.lua
@@ -0,0 +1,29 @@
+#!/usr/bin/env tarantool
+local fio = require('fio')
+
+-- Execute errinj_set_with_enviroment_vars_script.lua
+-- via tarantool with presetted environment variables.
+local TARANTOOL_PATH = arg[-1]
+local bool_env     =    'ERRINJ_TESTING=true ' ..
+                        'ERRINJ_WAL_IO=True ' ..
+                        'ERRINJ_WAL_SYNC=TRUE ' ..
+                        'ERRINJ_WAL_WRITE=false ' ..
+                        'ERRINJ_INDEX_ALLOC=False ' ..
+                        'ERRINJ_WAL_WRITE_DISK=FALSE'
+local integer_env  =    'ERRINJ_WAL_WRITE_PARTIAL=2 ' ..
+                        'ERRINJ_WAL_FALLOCATE=+2 ' ..
+                        'ERRINJ_WAL_WRITE_COUNT=-2'
+local double_env   =    'ERRINJ_VY_READ_PAGE_TIMEOUT=2.5 ' ..
+                        'ERRINJ_VY_SCHED_TIMEOUT=+2.5 ' ..
+                        'ERRINJ_RELAY_TIMEOUT=-2.5'
+local set_env_str = ('%s %s %s'):format(bool_env, integer_env, double_env)
+local path_to_test_file = fio.pathjoin(
+        os.getenv('PWD'),
+        'box-tap',
+        'errinj_set_with_enviroment_vars_script.lua')
+local shell_command = ('%s %s %s'):format(
+                set_env_str,
+                TARANTOOL_PATH,
+                path_to_test_file)
+
+os.exit(os.execute(shell_command))
diff --git a/test/box-tap/errinj_set_with_enviroment_vars_script.lua b/test/box-tap/errinj_set_with_enviroment_vars_script.lua
new file mode 100644
index 000000000..f15085aa0
--- /dev/null
+++ b/test/box-tap/errinj_set_with_enviroment_vars_script.lua
@@ -0,0 +1,34 @@
+-- Script for box-tap/errinj_set_with_enviroment_vars.test.lua test.
+
+local tap = require('tap')
+local errinj = box.error.injection
+
+local test = tap.test('set errinjs via environment variables')
+
+test:plan(3)
+
+test:test('Set boolean error injections', function(test)
+    test:plan(6)
+    test:is(errinj.get('ERRINJ_TESTING'), true, 'true')
+    test:is(errinj.get('ERRINJ_WAL_IO'), true, 'True')
+    test:is(errinj.get('ERRINJ_WAL_SYNC'), true, 'TRUE')
+    test:is(errinj.get('ERRINJ_WAL_WRITE'), false, 'false')
+    test:is(errinj.get('ERRINJ_INDEX_ALLOC'), false, 'False')
+    test:is(errinj.get('ERRINJ_WAL_WRITE_DISK'), false, 'FALSE')
+end)
+
+test:test('Set integer error injections', function(test)
+    test:plan(3)
+    test:is(errinj.get('ERRINJ_WAL_WRITE_PARTIAL'), 2, '2')
+    test:is(errinj.get('ERRINJ_WAL_FALLOCATE'), 2, '+2')
+    test:is(errinj.get('ERRINJ_WAL_WRITE_COUNT'), -2, '-2')
+end)
+
+test:test('Set double error injections', function(test)
+    test:plan(3)
+    test:is(errinj.get('ERRINJ_VY_READ_PAGE_TIMEOUT'), 2.5, "2.5")
+    test:is(errinj.get('ERRINJ_VY_SCHED_TIMEOUT'), 2.5, "+2.5")
+    test:is(errinj.get('ERRINJ_RELAY_TIMEOUT'), -2.5, "-2.5")
+end)
+
+os.exit(test:check() and 0 or 1)
diff --git a/test/box-tap/suite.ini b/test/box-tap/suite.ini
index a7c03baa8..8ed7fffb9 100644
--- a/test/box-tap/suite.ini
+++ b/test/box-tap/suite.ini
@@ -4,6 +4,7 @@ description = Database tests with #! using TAP
 is_parallel = True
 pretest_clean = True
 use_unix_sockets_iproto = True
+release_disabled = errinj_set_with_enviroment_vars.test.lua
 config = suite.cfg
 fragile = {
     "retries": 10,
-- 
2.28.0

[Tarantool-patches] [PATCHv3 2/2] lua: fix tarantool -e always enters interactive mode

[Artem Starshov via Tarantool-patches]

The reason why tarantool -e always enters interactive mode is that
statement after option -e isn't considered as a script.

In man PUC-Rio lua there are different names for statement -e (stat)
and script, but they have the same behavior regarding interactive
mode. (Also cases, when interpreter loads stdin, have the same behaviour).

NOTE: test for this code fix uses errinjs, and the last one  should work only
in debug mode, so added `release_disabled` in suite.ini. But there is a bug in
test-run: `release_disable` disables tests at each build type. Partially this
problem is descripted in tarantool/test-run#199.

Fixes #5040
---
@ChangeLog: Fixed -e option, when tarantool always entered interactive mode when
stdin is a tty. Now, `tarantool -e 'print"Hello"'` doesn't enter interactive mode
as it was before.

 src/lib/core/errinj.h                         |   1 +
 src/lua/init.c                                |  27 +++-
 ...5040-inter-mode-isatty-via-errinj.test.lua | 126 ++++++++++++++++++
 test/app-tap/suite.ini                        |   1 +
 test/box/errinj.result                        |   1 +
 5 files changed, 152 insertions(+), 4 deletions(-)
 create mode 100755 test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua

diff --git a/src/lib/core/errinj.h b/src/lib/core/errinj.h
index 10edbe2b9..f131a5cf6 100644
--- a/src/lib/core/errinj.h
+++ b/src/lib/core/errinj.h
@@ -149,6 +149,7 @@ struct errinj {
 	_(ERRINJ_AUTO_UPGRADE, ERRINJ_BOOL, {.bparam = false})\
 	_(ERRINJ_COIO_WRITE_CHUNK, ERRINJ_BOOL, {.bparam = false}) \
 	_(ERRINJ_APPLIER_SLOW_ACK, ERRINJ_BOOL, {.bparam = false}) \
+	_(ERRINJ_STDIN_ISATTY, ERRINJ_INT, {.iparam = -1}) \
 
 ENUM0(errinj_id, ERRINJ_LIST);
 extern struct errinj errinjs[];
diff --git a/src/lua/init.c b/src/lua/init.c
index 25e8884a6..4729ad7a2 100644
--- a/src/lua/init.c
+++ b/src/lua/init.c
@@ -62,6 +62,7 @@
 #include "lua/swim.h"
 #include "lua/decimal.h"
 #include "digest.h"
+#include "errinj.h"
 #include <small/ibuf.h>
 
 #include <ctype.h>
@@ -583,6 +584,7 @@ run_script_f(va_list ap)
 	 */
 	struct diag *diag = va_arg(ap, struct diag *);
 	bool aux_loop_is_run = false;
+	bool is_option_e_ran = false;
 
 	/*
 	 * Load libraries and execute chunks passed by -l and -e
@@ -613,6 +615,7 @@ run_script_f(va_list ap)
 			if (luaT_call(L, 0, 0) != 0)
 				goto error;
 			lua_settop(L, 0);
+			is_option_e_ran = true;
 			break;
 		default:
 			unreachable(); /* checked by getopt() in main() */
@@ -627,25 +630,41 @@ run_script_f(va_list ap)
 	fiber_sleep(0.0);
 	aux_loop_is_run = true;
 
+	/*
+	 * Override return value of isatty(STDIN_FILENO) if
+	 * ERRINJ_STDIN_ISATTY enabled (iparam not set to default).
+	 * Use iparam in such case, standard return value otherwise.
+	 * Integer param of errinj is used in order to set different
+	 * return values.
+	*/
+	int is_a_tty;
+	struct errinj *inj = errinj(ERRINJ_STDIN_ISATTY, ERRINJ_INT);
+	if (inj != NULL && inj->iparam >= 0) {
+		is_a_tty = inj->iparam;
+	} else {
+		is_a_tty = isatty(STDIN_FILENO);
+	}
+
 	if (path && strcmp(path, "-") != 0 && access(path, F_OK) == 0) {
 		/* Execute script. */
 		if (luaL_loadfile(L, path) != 0)
 			goto luajit_error;
 		if (lua_main(L, argc, argv) != 0)
 			goto error;
-	} else if (!isatty(STDIN_FILENO) || (path && strcmp(path, "-") == 0)) {
+	} else if (!is_a_tty || (path && strcmp(path, "-") == 0)) {
 		/* Execute stdin */
 		if (luaL_loadfile(L, NULL) != 0)
 			goto luajit_error;
 		if (lua_main(L, argc, argv) != 0)
 			goto error;
-	} else {
+	} else if (!is_option_e_ran) {
 		interactive = true;
 	}
 
 	/*
-	 * Start interactive mode when it was explicitly requested
-	 * by "-i" option or stdin is TTY or there are no script.
+	 * Start interactive mode in any of the cases:
+	 * - it was explicitly requested by "-i" option;
+	 * - stdin is TTY and there are no script (-e is considered as a script).
 	 */
 	if (interactive) {
 		say_crit("%s %s\ntype 'help' for interactive help",
diff --git a/test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua b/test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua
new file mode 100755
index 000000000..25e2bbc5e
--- /dev/null
+++ b/test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua
@@ -0,0 +1,126 @@
+#!/usr/bin/env tarantool
+
+local process_timeout = require('process_timeout')
+local ffi = require('ffi')
+local tap = require('tap')
+local fio = require('fio')
+
+--
+-- Tests to check if the tarantool binary enters
+-- interactive mode or not using error injections
+-- to change return value of isatty(stdin).
+--
+
+local TARANTOOL_PATH = arg[-1]
+local output_file = fio.abspath('out.txt')
+local cmd_end = (' >%s & echo $!'):format(output_file)
+
+-- Like a default timeout for `cond_wait` in test-run
+local process_waiting_timeout = 60.0
+local file_read_timeout = 60.0
+local file_read_interval = 0.2
+local file_open_timeout = 60.0
+
+-- Each testcase consists of:
+--  * cmd_args - command line arguments for tarantool binary
+--  * stdin - stdin for tarantool
+--  * interactive - true if interactive mode expected
+--  * empty_output - true if command should have empty output
+local testcases = {
+    {
+        cmd_args = '',
+        stdin = 'tty',
+        interactive = true
+    },
+    {
+        cmd_args = '',
+        stdin = '/dev/null',
+        interactive = false,
+        empty_output = true
+    },
+
+    {
+        cmd_args = ' -e "print(_VERSION)"',
+        stdin = 'tty',
+        interactive = false
+    },
+    {
+        cmd_args = ' -e "print(_VERSION)"',
+        stdin = '/dev/null',
+        interactive = false
+    },
+
+    {
+        cmd_args = ' -i -e "print(_VERSION)"',
+        stdin = 'tty',
+        interactive = true
+    },
+    {
+        cmd_args = ' -i -e "print(_VERSION)"',
+        stdin = '/dev/null',
+        interactive = true
+    }
+}
+
+local test = tap.test('gh-5040')
+
+test:plan(#testcases)
+for _, cmd in pairs(testcases) do
+    local full_cmd = ''
+    if cmd.stdin == 'tty' then
+        cmd.stdin = ''
+        full_cmd = 'ERRINJ_STDIN_ISATTY=1 '
+    else
+        cmd.stdin = '< ' .. cmd.stdin
+    end
+
+    local full_cmd = full_cmd .. ('%s %s %s %s'):format(
+            TARANTOOL_PATH,
+            cmd.cmd_args,
+            cmd.stdin,
+            cmd_end
+    )
+    test:test(full_cmd, function(test)
+        test:plan(cmd.interactive and 1 or 2)
+
+        local pid = tonumber(io.popen(full_cmd):read("*line"))
+        assert(pid, "pipe error for: " .. cmd.cmd_args)
+
+        local fh = process_timeout.open_with_timeout(output_file,
+                file_open_timeout)
+        assert(fh, 'error while opening ' .. output_file)
+
+        if cmd.interactive then
+            local data = process_timeout.read_with_timeout(fh,
+                    file_read_timeout,
+                    file_read_interval)
+            test:like(data, 'tarantool>', 'interactive mode detected')
+        else
+            local process_completed = process_timeout.wait_process_completion(
+                    pid,
+                    process_waiting_timeout)
+            test:ok(process_completed, 'process completed')
+
+            -- If empty output expected, then don't wait full file_read_timeout
+            -- for non-empty output_file, only a little time to be sure that
+            -- file is empty.
+            local read_timeout = cmd.empty_output and file_read_interval
+                    or file_read_timeout
+            local data = process_timeout.read_with_timeout(fh, read_timeout,
+                    file_read_interval)
+            if cmd.empty_output then
+                test:ok(#data == 0, 'output is empty')
+            else
+                test:unlike(data, 'tarantool>',
+                        'iteractive mode wasn\'t detected')
+            end
+        end
+        if process_timeout.process_is_alive(pid) then
+            ffi.C.kill(pid, 9)
+        end
+        fh:close()
+        os.remove(output_file)
+    end)
+end
+
+os.exit(test:check() and 0 or 1)
diff --git a/test/app-tap/suite.ini b/test/app-tap/suite.ini
index ccf828503..f791ddc5e 100644
--- a/test/app-tap/suite.ini
+++ b/test/app-tap/suite.ini
@@ -5,6 +5,7 @@ lua_libs = lua/require_mod.lua lua/serializer_test.lua lua/process_timeout.lua
 is_parallel = True
 pretest_clean = True
 use_unix_sockets_iproto = True
+release_disabled = gh-5040-inter-mode-isatty-via-errinj.test.lua
 fragile = {
     "retries": 10,
     "tests": {
diff --git a/test/box/errinj.result b/test/box/errinj.result
index b8c2476c3..a962dbe2d 100644
--- a/test/box/errinj.result
+++ b/test/box/errinj.result
@@ -74,6 +74,7 @@ evals
   - ERRINJ_SNAP_COMMIT_DELAY: false
   - ERRINJ_SNAP_WRITE_DELAY: false
   - ERRINJ_SQL_NAME_NORMALIZATION: false
+  - ERRINJ_STDIN_ISATTY: -1
   - ERRINJ_SWIM_FD_ONLY: false
   - ERRINJ_TESTING: false
   - ERRINJ_TUPLE_ALLOC: false
-- 
2.28.0

Re: [Tarantool-patches] [PATCHv3 1/2] core: add setting error injections via env

[Leonid Vasiliev via Tarantool-patches]

Hi! Thank you for the patch.

On 3/4/21 12:15 PM, Artem Starshov wrote:
> Sometimes, it's useful to set error injections via environment
> variables and this commit adds this opportunity.
> 
> e.g: `ERRINJ_WAL_WRITE=true tarantool` will be launched with
> ERRINJ_WAL_WRITE setted to true.
> 
> Errinjs with bool parameters can be set to "true", "false",
> "True", "False", "TRUE", "FALSE", etc. (case-insensitive variable).
> 
> Errinjs with int or double parameters should be whole valid ("123s" is invalid).
> e.g. for int or double: "123", "-1", "2.34", "+2.34".
> 
> NOTE: errinjs should work only in debug mode, so added `release_disabled` in
> suite.ini. But there is a bug in test-run: `release_disable` disables tests at
> each build type. Partially this problem is descripted in tarantool/test-run#199.
> 
> Part of #5040
> ---
>   src/lib/core/errinj.c                         | 30 ++++++++++++++++
>   src/lib/core/errinj.h                         |  5 +++
>   src/main.cc                                   |  3 ++
>   .../errinj_set_with_enviroment_vars.test.lua  | 29 ++++++++++++++++
>   ...errinj_set_with_enviroment_vars_script.lua | 34 +++++++++++++++++++
>   test/box-tap/suite.ini                        |  1 +
>   6 files changed, 102 insertions(+)
>   create mode 100755 test/box-tap/errinj_set_with_enviroment_vars.test.lua
>   create mode 100644 test/box-tap/errinj_set_with_enviroment_vars_script.lua
> 
> diff --git a/src/lib/core/errinj.c b/src/lib/core/errinj.c
> index d3aa0ca4f..8f76bfac1 100644
> --- a/src/lib/core/errinj.c
> +++ b/src/lib/core/errinj.c
> @@ -28,9 +28,11 @@
>    * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
>    * SUCH DAMAGE.
>    */
> +#include <ctype.h>
>   #include <stdio.h>
>   #include <stdlib.h>
>   #include <string.h>
> +#include <strings.h>
>   #include <stdbool.h>
>   
>   #include "trivia/config.h"
> @@ -66,3 +68,31 @@ int errinj_foreach(errinj_cb cb, void *cb_ctx) {
>   	}
>   	return 0;
>   }
> +
> +void errinj_set_with_environment_vars(void) {
> +    for (enum errinj_id i = 0; i < errinj_id_MAX; i++) {
> +        struct errinj *inj = &errinjs[i];
> +        const char *env_value = getenv(inj->name);
> +        if (env_value == NULL || *env_value == '\0')
> +            continue;
> +
> +        if (inj->type == ERRINJ_INT) {
> +            char *end;
> +            int64_t int_value = strtoll(env_value, &end, 10);
> +            if (*end == '\0')

"Seems like the `panic()` should be called in the case of `else()`. Here
and in other cases of parsing." is about this `if`.

> +                inj->iparam = int_value;
> +        } else if (inj->type == ERRINJ_BOOL) {
> +            if (strcasecmp(env_value, "false") == 0)


"Seems like the `panic()` should be called in the case of `else()`. Here
and in other cases of parsing." is about this `if`.

> +                inj->bparam = false;
> +            else if (strcasecmp(env_value, "true") == 0)
> +                inj->bparam = true;
> +        } else if (inj->type == ERRINJ_DOUBLE) {
> +            char *end;
> +            double double_value = strtod(env_value, &end);
> +            if (*end == '\0')


"Seems like the `panic()` should be called in the case of `else()`. Here
and in other cases of parsing." is about this `if`.

> +                inj->dparam = double_value;
> +        } else {

This `else` is unnecessary, because these structures are from a
hardcoded list.

> +            panic("Unknown errinj type received");
> +        }
> +    }
> +}
> diff --git a/src/lib/core/errinj.h b/src/lib/core/errinj.h
> index 814c57c2e..10edbe2b9 100644
> --- a/src/lib/core/errinj.h
> +++ b/src/lib/core/errinj.h
> @@ -168,6 +168,11 @@ typedef int (*errinj_cb)(struct errinj *e, void *cb_ctx);
>   int
>   errinj_foreach(errinj_cb cb, void *cb_ctx);
>   
> +/**
> + * Set injections by scanning ERRINJ_$(NAME) in environment variables
> + */
> +void errinj_set_with_environment_vars(void);
> +
>   #ifdef NDEBUG
>   #  define ERROR_INJECT(ID, CODE)
>   #  define ERROR_INJECT_WHILE(ID, CODE)
> diff --git a/src/main.cc b/src/main.cc
> index 2fce81bb3..718180b80 100644
> --- a/src/main.cc
> +++ b/src/main.cc
> @@ -710,6 +710,9 @@ main(int argc, char **argv)
>   	memtx_tx_manager_init();
>   	crypto_init();
>   	systemd_init();
> +#ifndef NDEBUG
> +	errinj_set_with_environment_vars();
> +#endif
>   	tarantool_lua_init(tarantool_bin, main_argc, main_argv);
>   
>   	start_time = ev_monotonic_time();
> diff --git a/test/box-tap/errinj_set_with_enviroment_vars.test.lua b/test/box-tap/errinj_set_with_enviroment_vars.test.lua
> new file mode 100755
> index 000000000..8d4ecaedd
> --- /dev/null
> +++ b/test/box-tap/errinj_set_with_enviroment_vars.test.lua
> @@ -0,0 +1,29 @@
> +#!/usr/bin/env tarantool
> +local fio = require('fio')
> +
> +-- Execute errinj_set_with_enviroment_vars_script.lua
> +-- via tarantool with presetted environment variables.
> +local TARANTOOL_PATH = arg[-1]
> +local bool_env     =    'ERRINJ_TESTING=true ' ..

I don't mind one `env` variable per line, but please do not tab-align
the variable (`bool_env`, `integer_env`, `double_env`) definition (use
one space before the `=` and one after).

> +                        'ERRINJ_WAL_IO=True ' ..
> +                        'ERRINJ_WAL_SYNC=TRUE ' ..
> +                        'ERRINJ_WAL_WRITE=false ' ..
> +                        'ERRINJ_INDEX_ALLOC=False ' ..
> +                        'ERRINJ_WAL_WRITE_DISK=FALSE'
> +local integer_env  =    'ERRINJ_WAL_WRITE_PARTIAL=2 ' ..
> +                        'ERRINJ_WAL_FALLOCATE=+2 ' ..
> +                        'ERRINJ_WAL_WRITE_COUNT=-2'
> +local double_env   =    'ERRINJ_VY_READ_PAGE_TIMEOUT=2.5 ' ..
> +                        'ERRINJ_VY_SCHED_TIMEOUT=+2.5 ' ..
> +                        'ERRINJ_RELAY_TIMEOUT=-2.5'
> +local set_env_str = ('%s %s %s'):format(bool_env, integer_env, double_env)
> +local path_to_test_file = fio.pathjoin(
> +        os.getenv('PWD'),
> +        'box-tap',
> +        'errinj_set_with_enviroment_vars_script.lua')
> +local shell_command = ('%s %s %s'):format(
> +                set_env_str,
> +                TARANTOOL_PATH,
> +                path_to_test_file)
> +
> +os.exit(os.execute(shell_command))
> diff --git a/test/box-tap/errinj_set_with_enviroment_vars_script.lua b/test/box-tap/errinj_set_with_enviroment_vars_script.lua
> new file mode 100644
> index 000000000..f15085aa0
> --- /dev/null
> +++ b/test/box-tap/errinj_set_with_enviroment_vars_script.lua
> @@ -0,0 +1,34 @@
> +-- Script for box-tap/errinj_set_with_enviroment_vars.test.lua test.
> +
> +local tap = require('tap')
> +local errinj = box.error.injection
> +
> +local test = tap.test('set errinjs via environment variables')
> +
> +test:plan(3)
> +
> +test:test('Set boolean error injections', function(test)
> +    test:plan(6)
> +    test:is(errinj.get('ERRINJ_TESTING'), true, 'true')
> +    test:is(errinj.get('ERRINJ_WAL_IO'), true, 'True')
> +    test:is(errinj.get('ERRINJ_WAL_SYNC'), true, 'TRUE')
> +    test:is(errinj.get('ERRINJ_WAL_WRITE'), false, 'false')
> +    test:is(errinj.get('ERRINJ_INDEX_ALLOC'), false, 'False')
> +    test:is(errinj.get('ERRINJ_WAL_WRITE_DISK'), false, 'FALSE')
> +end)
> +
> +test:test('Set integer error injections', function(test)
> +    test:plan(3)
> +    test:is(errinj.get('ERRINJ_WAL_WRITE_PARTIAL'), 2, '2')
> +    test:is(errinj.get('ERRINJ_WAL_FALLOCATE'), 2, '+2')
> +    test:is(errinj.get('ERRINJ_WAL_WRITE_COUNT'), -2, '-2')
> +end)
> +
> +test:test('Set double error injections', function(test)
> +    test:plan(3)
> +    test:is(errinj.get('ERRINJ_VY_READ_PAGE_TIMEOUT'), 2.5, "2.5")
> +    test:is(errinj.get('ERRINJ_VY_SCHED_TIMEOUT'), 2.5, "+2.5")
> +    test:is(errinj.get('ERRINJ_RELAY_TIMEOUT'), -2.5, "-2.5")
> +end)
> +
> +os.exit(test:check() and 0 or 1)
> diff --git a/test/box-tap/suite.ini b/test/box-tap/suite.ini
> index a7c03baa8..8ed7fffb9 100644
> --- a/test/box-tap/suite.ini
> +++ b/test/box-tap/suite.ini
> @@ -4,6 +4,7 @@ description = Database tests with #! using TAP
>   is_parallel = True
>   pretest_clean = True
>   use_unix_sockets_iproto = True
> +release_disabled = errinj_set_with_enviroment_vars.test.lua
>   config = suite.cfg
>   fragile = {
>       "retries": 10,
> 

Re: [Tarantool-patches] [PATCHv3 2/2] lua: fix tarantool -e always enters interactive mode

[Leonid Vasiliev via Tarantool-patches]

Hi! Thank you for the patch.
LGTM.

On 3/4/21 12:15 PM, Artem Starshov wrote:
> The reason why tarantool -e always enters interactive mode is that
> statement after option -e isn't considered as a script.
> 
> In man PUC-Rio lua there are different names for statement -e (stat)
> and script, but they have the same behavior regarding interactive
> mode. (Also cases, when interpreter loads stdin, have the same behaviour).
> 
> NOTE: test for this code fix uses errinjs, and the last one  should work only
> in debug mode, so added `release_disabled` in suite.ini. But there is a bug in
> test-run: `release_disable` disables tests at each build type. Partially this
> problem is descripted in tarantool/test-run#199.
> 
> Fixes #5040
> ---
> @ChangeLog: Fixed -e option, when tarantool always entered interactive mode when
> stdin is a tty. Now, `tarantool -e 'print"Hello"'` doesn't enter interactive mode
> as it was before.
> 
>   src/lib/core/errinj.h                         |   1 +
>   src/lua/init.c                                |  27 +++-
>   ...5040-inter-mode-isatty-via-errinj.test.lua | 126 ++++++++++++++++++
>   test/app-tap/suite.ini                        |   1 +
>   test/box/errinj.result                        |   1 +
>   5 files changed, 152 insertions(+), 4 deletions(-)
>   create mode 100755 test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua
> 
> diff --git a/src/lib/core/errinj.h b/src/lib/core/errinj.h
> index 10edbe2b9..f131a5cf6 100644
> --- a/src/lib/core/errinj.h
> +++ b/src/lib/core/errinj.h
> @@ -149,6 +149,7 @@ struct errinj {
>   	_(ERRINJ_AUTO_UPGRADE, ERRINJ_BOOL, {.bparam = false})\
>   	_(ERRINJ_COIO_WRITE_CHUNK, ERRINJ_BOOL, {.bparam = false}) \
>   	_(ERRINJ_APPLIER_SLOW_ACK, ERRINJ_BOOL, {.bparam = false}) \
> +	_(ERRINJ_STDIN_ISATTY, ERRINJ_INT, {.iparam = -1}) \
>   
>   ENUM0(errinj_id, ERRINJ_LIST);
>   extern struct errinj errinjs[];
> diff --git a/src/lua/init.c b/src/lua/init.c
> index 25e8884a6..4729ad7a2 100644
> --- a/src/lua/init.c
> +++ b/src/lua/init.c
> @@ -62,6 +62,7 @@
>   #include "lua/swim.h"
>   #include "lua/decimal.h"
>   #include "digest.h"
> +#include "errinj.h"
>   #include <small/ibuf.h>
>   
>   #include <ctype.h>
> @@ -583,6 +584,7 @@ run_script_f(va_list ap)
>   	 */
>   	struct diag *diag = va_arg(ap, struct diag *);
>   	bool aux_loop_is_run = false;
> +	bool is_option_e_ran = false;
>   
>   	/*
>   	 * Load libraries and execute chunks passed by -l and -e
> @@ -613,6 +615,7 @@ run_script_f(va_list ap)
>   			if (luaT_call(L, 0, 0) != 0)
>   				goto error;
>   			lua_settop(L, 0);
> +			is_option_e_ran = true;
>   			break;
>   		default:
>   			unreachable(); /* checked by getopt() in main() */
> @@ -627,25 +630,41 @@ run_script_f(va_list ap)
>   	fiber_sleep(0.0);
>   	aux_loop_is_run = true;
>   
> +	/*
> +	 * Override return value of isatty(STDIN_FILENO) if
> +	 * ERRINJ_STDIN_ISATTY enabled (iparam not set to default).
> +	 * Use iparam in such case, standard return value otherwise.
> +	 * Integer param of errinj is used in order to set different
> +	 * return values.
> +	*/
> +	int is_a_tty;
> +	struct errinj *inj = errinj(ERRINJ_STDIN_ISATTY, ERRINJ_INT);
> +	if (inj != NULL && inj->iparam >= 0) {
> +		is_a_tty = inj->iparam;
> +	} else {
> +		is_a_tty = isatty(STDIN_FILENO);
> +	}
> +
>   	if (path && strcmp(path, "-") != 0 && access(path, F_OK) == 0) {
>   		/* Execute script. */
>   		if (luaL_loadfile(L, path) != 0)
>   			goto luajit_error;
>   		if (lua_main(L, argc, argv) != 0)
>   			goto error;
> -	} else if (!isatty(STDIN_FILENO) || (path && strcmp(path, "-") == 0)) {
> +	} else if (!is_a_tty || (path && strcmp(path, "-") == 0)) {
>   		/* Execute stdin */
>   		if (luaL_loadfile(L, NULL) != 0)
>   			goto luajit_error;
>   		if (lua_main(L, argc, argv) != 0)
>   			goto error;
> -	} else {
> +	} else if (!is_option_e_ran) {
>   		interactive = true;
>   	}
>   
>   	/*
> -	 * Start interactive mode when it was explicitly requested
> -	 * by "-i" option or stdin is TTY or there are no script.
> +	 * Start interactive mode in any of the cases:
> +	 * - it was explicitly requested by "-i" option;
> +	 * - stdin is TTY and there are no script (-e is considered as a script).
>   	 */
>   	if (interactive) {
>   		say_crit("%s %s\ntype 'help' for interactive help",
> diff --git a/test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua b/test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua
> new file mode 100755
> index 000000000..25e2bbc5e
> --- /dev/null
> +++ b/test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua
> @@ -0,0 +1,126 @@
> +#!/usr/bin/env tarantool
> +
> +local process_timeout = require('process_timeout')
> +local ffi = require('ffi')
> +local tap = require('tap')
> +local fio = require('fio')
> +
> +--
> +-- Tests to check if the tarantool binary enters
> +-- interactive mode or not using error injections
> +-- to change return value of isatty(stdin).
> +--
> +
> +local TARANTOOL_PATH = arg[-1]
> +local output_file = fio.abspath('out.txt')
> +local cmd_end = (' >%s & echo $!'):format(output_file)
> +
> +-- Like a default timeout for `cond_wait` in test-run
> +local process_waiting_timeout = 60.0
> +local file_read_timeout = 60.0
> +local file_read_interval = 0.2
> +local file_open_timeout = 60.0
> +
> +-- Each testcase consists of:
> +--  * cmd_args - command line arguments for tarantool binary
> +--  * stdin - stdin for tarantool
> +--  * interactive - true if interactive mode expected
> +--  * empty_output - true if command should have empty output
> +local testcases = {
> +    {
> +        cmd_args = '',
> +        stdin = 'tty',
> +        interactive = true
> +    },
> +    {
> +        cmd_args = '',
> +        stdin = '/dev/null',
> +        interactive = false,
> +        empty_output = true
> +    },
> +
> +    {
> +        cmd_args = ' -e "print(_VERSION)"',
> +        stdin = 'tty',
> +        interactive = false
> +    },
> +    {
> +        cmd_args = ' -e "print(_VERSION)"',
> +        stdin = '/dev/null',
> +        interactive = false
> +    },
> +
> +    {
> +        cmd_args = ' -i -e "print(_VERSION)"',
> +        stdin = 'tty',
> +        interactive = true
> +    },
> +    {
> +        cmd_args = ' -i -e "print(_VERSION)"',
> +        stdin = '/dev/null',
> +        interactive = true
> +    }
> +}
> +
> +local test = tap.test('gh-5040')
> +
> +test:plan(#testcases)
> +for _, cmd in pairs(testcases) do
> +    local full_cmd = ''
> +    if cmd.stdin == 'tty' then
> +        cmd.stdin = ''
> +        full_cmd = 'ERRINJ_STDIN_ISATTY=1 '
> +    else
> +        cmd.stdin = '< ' .. cmd.stdin
> +    end
> +
> +    local full_cmd = full_cmd .. ('%s %s %s %s'):format(
> +            TARANTOOL_PATH,
> +            cmd.cmd_args,
> +            cmd.stdin,
> +            cmd_end
> +    )
> +    test:test(full_cmd, function(test)
> +        test:plan(cmd.interactive and 1 or 2)
> +
> +        local pid = tonumber(io.popen(full_cmd):read("*line"))
> +        assert(pid, "pipe error for: " .. cmd.cmd_args)
> +
> +        local fh = process_timeout.open_with_timeout(output_file,
> +                file_open_timeout)
> +        assert(fh, 'error while opening ' .. output_file)
> +
> +        if cmd.interactive then
> +            local data = process_timeout.read_with_timeout(fh,
> +                    file_read_timeout,
> +                    file_read_interval)
> +            test:like(data, 'tarantool>', 'interactive mode detected')
> +        else
> +            local process_completed = process_timeout.wait_process_completion(
> +                    pid,
> +                    process_waiting_timeout)
> +            test:ok(process_completed, 'process completed')
> +
> +            -- If empty output expected, then don't wait full file_read_timeout
> +            -- for non-empty output_file, only a little time to be sure that
> +            -- file is empty.
> +            local read_timeout = cmd.empty_output and file_read_interval
> +                    or file_read_timeout
> +            local data = process_timeout.read_with_timeout(fh, read_timeout,
> +                    file_read_interval)
> +            if cmd.empty_output then
> +                test:ok(#data == 0, 'output is empty')
> +            else
> +                test:unlike(data, 'tarantool>',
> +                        'iteractive mode wasn\'t detected')
> +            end
> +        end
> +        if process_timeout.process_is_alive(pid) then
> +            ffi.C.kill(pid, 9)
> +        end
> +        fh:close()
> +        os.remove(output_file)
> +    end)
> +end
> +
> +os.exit(test:check() and 0 or 1)
> diff --git a/test/app-tap/suite.ini b/test/app-tap/suite.ini
> index ccf828503..f791ddc5e 100644
> --- a/test/app-tap/suite.ini
> +++ b/test/app-tap/suite.ini
> @@ -5,6 +5,7 @@ lua_libs = lua/require_mod.lua lua/serializer_test.lua lua/process_timeout.lua
>   is_parallel = True
>   pretest_clean = True
>   use_unix_sockets_iproto = True
> +release_disabled = gh-5040-inter-mode-isatty-via-errinj.test.lua
>   fragile = {
>       "retries": 10,
>       "tests": {
> diff --git a/test/box/errinj.result b/test/box/errinj.result
> index b8c2476c3..a962dbe2d 100644
> --- a/test/box/errinj.result
> +++ b/test/box/errinj.result
> @@ -74,6 +74,7 @@ evals
>     - ERRINJ_SNAP_COMMIT_DELAY: false
>     - ERRINJ_SNAP_WRITE_DELAY: false
>     - ERRINJ_SQL_NAME_NORMALIZATION: false
> +  - ERRINJ_STDIN_ISATTY: -1
>     - ERRINJ_SWIM_FD_ONLY: false
>     - ERRINJ_TESTING: false
>     - ERRINJ_TUPLE_ALLOC: false
> 

Re: [Tarantool-patches] [PATCHv3 0/2] lua: fix tarantool -e always enters interactive mode

[Leonid Vasiliev via Tarantool-patches]

Hi!
Please, add changelogs according to `doc/changelogs.md`.

On 3/4/21 12:15 PM, Artem Starshov wrote:
> Issue: https://github.com/tarantool/tarantool/issues/5040
> Branch: https://github.com/tarantool/tarantool/tree/artemreyt/gh-5040-interactive-mode-bug
> CI: https://github.com/tarantool/tarantool/runs/2029377964
> 
> Changes in v3:
>    * core:
>      - add case-insensetive value for boolean error injection;
>      - add more tests for setting error injections;
>      - few refactored things (80 line width, alignment and etc.);
>      - add release_disable for test;
>      - add reference to test-run issue in commit message;
>      - now, it is able to set errinjs via env ONLY in Debug mode.
>    * lua:
>      - some refactoring (name of variables, 80 line-width..);
>      - add release_disable for test;
>      - add reference to test-run issue in commit message;
>      - add "errinj" to the name of the test;
>      - add comments to source code.
> 
> Artem Starshov (2):
>    core: add setting error injections via env
>    lua: fix tarantool -e always enters interactive mode
> 
>   src/lib/core/errinj.c                         |  30 +++++
>   src/lib/core/errinj.h                         |   6 +
>   src/lua/init.c                                |  27 +++-
>   src/main.cc                                   |   3 +
>   ...5040-inter-mode-isatty-via-errinj.test.lua | 126 ++++++++++++++++++
>   test/app-tap/suite.ini                        |   1 +
>   .../errinj_set_with_enviroment_vars.test.lua  |  29 ++++
>   ...errinj_set_with_enviroment_vars_script.lua |  34 +++++
>   test/box-tap/suite.ini                        |   1 +
>   test/box/errinj.result                        |   1 +
>   10 files changed, 254 insertions(+), 4 deletions(-)
>   create mode 100755 test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua
>   create mode 100755 test/box-tap/errinj_set_with_enviroment_vars.test.lua
>   create mode 100644 test/box-tap/errinj_set_with_enviroment_vars_script.lua
> 

Re: [Tarantool-patches] [PATCHv3 1/2] core: add setting error injections via env

[Artem via Tarantool-patches]

Hi, thank you for the review!

Created wiki for this new ability, see 
https://github.com/tarantool/tarantool/wiki/Error-injections .

Each your review comment is done (see below) and changes you can see on 
a branch.

05.03.2021 15:11, Leonid Vasiliev пишет:
> Hi! Thank you for the patch.
>
> On 3/4/21 12:15 PM, Artem Starshov wrote:
>> Sometimes, it's useful to set error injections via environment
>> variables and this commit adds this opportunity.
>>
>> e.g: `ERRINJ_WAL_WRITE=true tarantool` will be launched with
>> ERRINJ_WAL_WRITE setted to true.
>>
>> Errinjs with bool parameters can be set to "true", "false",
>> "True", "False", "TRUE", "FALSE", etc. (case-insensitive variable).
>>
>> Errinjs with int or double parameters should be whole valid ("123s" 
>> is invalid).
>> e.g. for int or double: "123", "-1", "2.34", "+2.34".
>>
>> NOTE: errinjs should work only in debug mode, so added 
>> `release_disabled` in
>> suite.ini. But there is a bug in test-run: `release_disable` disables 
>> tests at
>> each build type. Partially this problem is descripted in 
>> tarantool/test-run#199.
>>
>> Part of #5040
>> ---
>>   src/lib/core/errinj.c                         | 30 ++++++++++++++++
>>   src/lib/core/errinj.h                         |  5 +++
>>   src/main.cc                                   |  3 ++
>>   .../errinj_set_with_enviroment_vars.test.lua  | 29 ++++++++++++++++
>>   ...errinj_set_with_enviroment_vars_script.lua | 34 +++++++++++++++++++
>>   test/box-tap/suite.ini                        |  1 +
>>   6 files changed, 102 insertions(+)
>>   create mode 100755 
>> test/box-tap/errinj_set_with_enviroment_vars.test.lua
>>   create mode 100644 
>> test/box-tap/errinj_set_with_enviroment_vars_script.lua
>>
>> diff --git a/src/lib/core/errinj.c b/src/lib/core/errinj.c
>> index d3aa0ca4f..8f76bfac1 100644
>> --- a/src/lib/core/errinj.c
>> +++ b/src/lib/core/errinj.c
>> @@ -28,9 +28,11 @@
>>    * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
>>    * SUCH DAMAGE.
>>    */
>> +#include <ctype.h>
>>   #include <stdio.h>
>>   #include <stdlib.h>
>>   #include <string.h>
>> +#include <strings.h>
>>   #include <stdbool.h>
>>     #include "trivia/config.h"
>> @@ -66,3 +68,31 @@ int errinj_foreach(errinj_cb cb, void *cb_ctx) {
>>       }
>>       return 0;
>>   }
>> +
>> +void errinj_set_with_environment_vars(void) {
>> +    for (enum errinj_id i = 0; i < errinj_id_MAX; i++) {
>> +        struct errinj *inj = &errinjs[i];
>> +        const char *env_value = getenv(inj->name);
>> +        if (env_value == NULL || *env_value == '\0')
>> +            continue;
>> +
>> +        if (inj->type == ERRINJ_INT) {
>> +            char *end;
>> +            int64_t int_value = strtoll(env_value, &end, 10);
>> +            if (*end == '\0')
>
> "Seems like the `panic()` should be called in the case of `else()`. Here
> and in other cases of parsing." is about this `if`.
>
Done.
>> +                inj->iparam = int_value;
>> +        } else if (inj->type == ERRINJ_BOOL) {
>> +            if (strcasecmp(env_value, "false") == 0)
>
>
> "Seems like the `panic()` should be called in the case of `else()`. Here
> and in other cases of parsing." is about this `if`.
>
Done.
>> +                inj->bparam = false;
>> +            else if (strcasecmp(env_value, "true") == 0)
>> +                inj->bparam = true;
>> +        } else if (inj->type == ERRINJ_DOUBLE) {
>> +            char *end;
>> +            double double_value = strtod(env_value, &end);
>> +            if (*end == '\0')
>
>
> "Seems like the `panic()` should be called in the case of `else()`. Here
> and in other cases of parsing." is about this `if`.
>
Done.
>> +                inj->dparam = double_value;
>> +        } else {
>
> This `else` is unnecessary, because these structures are from a
> hardcoded list.
>
Done. Removed.
>> +            panic("Unknown errinj type received");
>> +        }
>> +    }
>> +}
>> diff --git a/src/lib/core/errinj.h b/src/lib/core/errinj.h
>> index 814c57c2e..10edbe2b9 100644
>> --- a/src/lib/core/errinj.h
>> +++ b/src/lib/core/errinj.h
>> @@ -168,6 +168,11 @@ typedef int (*errinj_cb)(struct errinj *e, void 
>> *cb_ctx);
>>   int
>>   errinj_foreach(errinj_cb cb, void *cb_ctx);
>>   +/**
>> + * Set injections by scanning ERRINJ_$(NAME) in environment variables
>> + */
>> +void errinj_set_with_environment_vars(void);
>> +
>>   #ifdef NDEBUG
>>   #  define ERROR_INJECT(ID, CODE)
>>   #  define ERROR_INJECT_WHILE(ID, CODE)
>> diff --git a/src/main.cc b/src/main.cc
>> index 2fce81bb3..718180b80 100644
>> --- a/src/main.cc
>> +++ b/src/main.cc
>> @@ -710,6 +710,9 @@ main(int argc, char **argv)
>>       memtx_tx_manager_init();
>>       crypto_init();
>>       systemd_init();
>> +#ifndef NDEBUG
>> +    errinj_set_with_environment_vars();
>> +#endif
>>       tarantool_lua_init(tarantool_bin, main_argc, main_argv);
>>         start_time = ev_monotonic_time();
>> diff --git a/test/box-tap/errinj_set_with_enviroment_vars.test.lua 
>> b/test/box-tap/errinj_set_with_enviroment_vars.test.lua
>> new file mode 100755
>> index 000000000..8d4ecaedd
>> --- /dev/null
>> +++ b/test/box-tap/errinj_set_with_enviroment_vars.test.lua
>> @@ -0,0 +1,29 @@
>> +#!/usr/bin/env tarantool
>> +local fio = require('fio')
>> +
>> +-- Execute errinj_set_with_enviroment_vars_script.lua
>> +-- via tarantool with presetted environment variables.
>> +local TARANTOOL_PATH = arg[-1]
>> +local bool_env     =    'ERRINJ_TESTING=true ' ..
>
> I don't mind one `env` variable per line, but please do not tab-align
> the variable (`bool_env`, `integer_env`, `double_env`) definition (use
> one space before the `=` and one after).
>
Done.
>> + 'ERRINJ_WAL_IO=True ' ..
>> +                        'ERRINJ_WAL_SYNC=TRUE ' ..
>> +                        'ERRINJ_WAL_WRITE=false ' ..
>> +                        'ERRINJ_INDEX_ALLOC=False ' ..
>> +                        'ERRINJ_WAL_WRITE_DISK=FALSE'
>> +local integer_env  =    'ERRINJ_WAL_WRITE_PARTIAL=2 ' ..
>> +                        'ERRINJ_WAL_FALLOCATE=+2 ' ..
>> +                        'ERRINJ_WAL_WRITE_COUNT=-2'
>> +local double_env   =    'ERRINJ_VY_READ_PAGE_TIMEOUT=2.5 ' ..
>> +                        'ERRINJ_VY_SCHED_TIMEOUT=+2.5 ' ..
>> +                        'ERRINJ_RELAY_TIMEOUT=-2.5'
>> +local set_env_str = ('%s %s %s'):format(bool_env, integer_env, 
>> double_env)
>> +local path_to_test_file = fio.pathjoin(
>> +        os.getenv('PWD'),
>> +        'box-tap',
>> +        'errinj_set_with_enviroment_vars_script.lua')
>> +local shell_command = ('%s %s %s'):format(
>> +                set_env_str,
>> +                TARANTOOL_PATH,
>> +                path_to_test_file)
>> +
>> +os.exit(os.execute(shell_command))
>> diff --git a/test/box-tap/errinj_set_with_enviroment_vars_script.lua 
>> b/test/box-tap/errinj_set_with_enviroment_vars_script.lua
>> new file mode 100644
>> index 000000000..f15085aa0
>> --- /dev/null
>> +++ b/test/box-tap/errinj_set_with_enviroment_vars_script.lua
>> @@ -0,0 +1,34 @@
>> +-- Script for box-tap/errinj_set_with_enviroment_vars.test.lua test.
>> +
>> +local tap = require('tap')
>> +local errinj = box.error.injection
>> +
>> +local test = tap.test('set errinjs via environment variables')
>> +
>> +test:plan(3)
>> +
>> +test:test('Set boolean error injections', function(test)
>> +    test:plan(6)
>> +    test:is(errinj.get('ERRINJ_TESTING'), true, 'true')
>> +    test:is(errinj.get('ERRINJ_WAL_IO'), true, 'True')
>> +    test:is(errinj.get('ERRINJ_WAL_SYNC'), true, 'TRUE')
>> +    test:is(errinj.get('ERRINJ_WAL_WRITE'), false, 'false')
>> +    test:is(errinj.get('ERRINJ_INDEX_ALLOC'), false, 'False')
>> +    test:is(errinj.get('ERRINJ_WAL_WRITE_DISK'), false, 'FALSE')
>> +end)
>> +
>> +test:test('Set integer error injections', function(test)
>> +    test:plan(3)
>> +    test:is(errinj.get('ERRINJ_WAL_WRITE_PARTIAL'), 2, '2')
>> +    test:is(errinj.get('ERRINJ_WAL_FALLOCATE'), 2, '+2')
>> +    test:is(errinj.get('ERRINJ_WAL_WRITE_COUNT'), -2, '-2')
>> +end)
>> +
>> +test:test('Set double error injections', function(test)
>> +    test:plan(3)
>> +    test:is(errinj.get('ERRINJ_VY_READ_PAGE_TIMEOUT'), 2.5, "2.5")
>> +    test:is(errinj.get('ERRINJ_VY_SCHED_TIMEOUT'), 2.5, "+2.5")
>> +    test:is(errinj.get('ERRINJ_RELAY_TIMEOUT'), -2.5, "-2.5")
>> +end)
>> +
>> +os.exit(test:check() and 0 or 1)
>> diff --git a/test/box-tap/suite.ini b/test/box-tap/suite.ini
>> index a7c03baa8..8ed7fffb9 100644
>> --- a/test/box-tap/suite.ini
>> +++ b/test/box-tap/suite.ini
>> @@ -4,6 +4,7 @@ description = Database tests with #! using TAP
>>   is_parallel = True
>>   pretest_clean = True
>>   use_unix_sockets_iproto = True
>> +release_disabled = errinj_set_with_enviroment_vars.test.lua
>>   config = suite.cfg
>>   fragile = {
>>       "retries": 10,
>>

Re: [Tarantool-patches] [PATCHv3 0/2] lua: fix tarantool -e always enters interactive mode

[Artem via Tarantool-patches]

[-- Attachment #1: Type: text/plain, Size: 2626 bytes --]

Hi, thank you for the review!

05.03.2021 15:44, Leonid Vasiliev пишет:
> Hi!
> Please, add changelogs according to `doc/changelogs.md`.
Done. Added changelogs/unreleased/fix-tarantool-e-option.md 
<https://github.com/tarantool/tarantool/commit/fe750e977b30ca41975af9b78e56f70202c3024c#diff-c7ab331bb2558e469c1851f9d09ea8be0157b129af12a2370d2fbe77a12a378d> 

>
> On 3/4/21 12:15 PM, Artem Starshov wrote:
>> Issue: https://github.com/tarantool/tarantool/issues/5040
>> Branch: 
>> https://github.com/tarantool/tarantool/tree/artemreyt/gh-5040-interactive-mode-bug
>> CI: https://github.com/tarantool/tarantool/runs/2029377964
>>
>> Changes in v3:
>>    * core:
>>      - add case-insensetive value for boolean error injection;
>>      - add more tests for setting error injections;
>>      - few refactored things (80 line width, alignment and etc.);
>>      - add release_disable for test;
>>      - add reference to test-run issue in commit message;
>>      - now, it is able to set errinjs via env ONLY in Debug mode.
>>    * lua:
>>      - some refactoring (name of variables, 80 line-width..);
>>      - add release_disable for test;
>>      - add reference to test-run issue in commit message;
>>      - add "errinj" to the name of the test;
>>      - add comments to source code.
>>
>> Artem Starshov (2):
>>    core: add setting error injections via env
>>    lua: fix tarantool -e always enters interactive mode
>>
>>   src/lib/core/errinj.c                         |  30 +++++
>>   src/lib/core/errinj.h                         |   6 +
>>   src/lua/init.c                                |  27 +++-
>>   src/main.cc                                   |   3 +
>>   ...5040-inter-mode-isatty-via-errinj.test.lua | 126 ++++++++++++++++++
>>   test/app-tap/suite.ini                        |   1 +
>>   .../errinj_set_with_enviroment_vars.test.lua  |  29 ++++
>>   ...errinj_set_with_enviroment_vars_script.lua |  34 +++++
>>   test/box-tap/suite.ini                        |   1 +
>>   test/box/errinj.result                        |   1 +
>>   10 files changed, 254 insertions(+), 4 deletions(-)
>>   create mode 100755 
>> test/app-tap/gh-5040-inter-mode-isatty-via-errinj.test.lua
>>   create mode 100755 
>> test/box-tap/errinj_set_with_enviroment_vars.test.lua
>>   create mode 100644 
>> test/box-tap/errinj_set_with_enviroment_vars_script.lua
>>

[-- Attachment #2: Type: text/html, Size: 4838 bytes --]