MB-47505 Add try catch block around io_lib:format/3

To get a balance between performance gains acheived via log truncation
and bugs in io_lib:format/3 ... adding a try catch block and defaulting
to printing the entire term if io_lib:format/3 fails for any reason.

I have also added ~n at the end of each line in the generated code.
dynamic_compile:load_from_string is very finicky (atleast for me)
and the error messages are hard to decipher since the compiler cann't
point exactly where in the "loooong string" did the error occur, due to
the obvious lack of line numbers you would otherwise generally find in a
source file.

Change-Id: I1f6a54c3f3457a651c38d46923e133d306a908b5
Reviewed-on: http://review.couchbase.org/c/ns_server/+/159449
Well-Formed: Build Bot <[email protected]>
Tested-by: Build Bot <[email protected]>
Tested-by: <[email protected]>
Reviewed-by: Meni Hillel <[email protected]>

Author: hareen-kancharla

deps/ale/src/ale_codegen.erl

@@ -126,12 +126,21 @@ generic_loglevel(LoggerName, LogLevel, Formatter, Preformatted, Raw) ->
          true ->
              io_lib:format(
                "Info = ale_utils:assemble_info(~s, ~p, M, F, L, Data),"
-               "UserMsg = case Args =/= [] of"
-               "              true ->"
-               "                  CharsLimit = proplists:get_value(chars_limit, Opts, ~B),"
-               "                  io_lib:format(Fmt, Args, [{chars_limit, CharsLimit}]);"
-               "              false -> Fmt"
-               "          end,",
+               "UserMsg = case Args =/= [] of~n"
+               "              true ->~n"
+               "                  CharsLimit = proplists:get_value(chars_limit, Opts, ~B),~n"
+               "                  %% io_lib:format/3 has had bugs and therefore~n"
+               "                  %% to avoid any logging errors, the following~n"
+               "                  %% try catch block has been added.~n"
+               "                  %% https://github.com/erlang/otp/issues/5053~n"
+               "                  try~n"
+               "                    io_lib:format(Fmt, Args, [{chars_limit, CharsLimit}])~n"
+               "                  catch~n"
+               "                    _:_ ->~n"
+               "                      io_lib:format(Fmt, Args)~n"
+               "                  end;~n"
+               "              false -> Fmt~n"
+               "          end,~n",
                [LoggerName, LogLevel, ?CHARS_LIMIT_DEFAULT]);
          false ->
              ""