Преглед изворни кода

Add logger header validation

terry-xiaoyu пре 6 година
родитељ
комит
09dd65b9fa
1 измењених фајлова са 1 додато и 0 уклоњено
  1. 1 0
      src/emqx_logger.erl

+ 1 - 0
src/emqx_logger.erl

@@ -173,6 +173,7 @@ trans([{eof, L} | AST], LogHeader, ResAST) ->
 trans([{attribute, _, module, _Mod} = M | AST], Header, ResAST) ->
 trans([{attribute, _, module, _Mod} = M | AST], Header, ResAST) ->
     trans(AST, Header, [export_header_fun(), M | ResAST]);
     trans(AST, Header, [export_header_fun(), M | ResAST]);
 trans([{attribute, _, logger_header, Header} | AST], _, ResAST) ->
 trans([{attribute, _, logger_header, Header} | AST], _, ResAST) ->
+    io_lib:printable_list(Header) orelse error({invalid_string, Header}),
     trans(AST, Header, ResAST);
     trans(AST, Header, ResAST);
 trans([F | AST], LogHeader, ResAST) ->
 trans([F | AST], LogHeader, ResAST) ->
     trans(AST, LogHeader, [F | ResAST]).
     trans(AST, LogHeader, [F | ResAST]).