[infer] make the censor reason an option field in the analysis report

Reviewed By: mbouaziz

Differential Revision: D15077671

fbshipit-source-id: 5a22429f9

infer/src/atd/jsonbug.atd

@@ -44,7 +44,7 @@ type jsonbug = {
   bug_type_hum: string;
   ?linters_def_file: string option;
   ?traceview_id: int option;
-  censored_reason : string;
+  ?censored_reason : string option;
   ?access : string option;
   ?extras : extra option;
 }

infer/src/backend/InferPrint.ml

@@ -193,7 +193,7 @@ let censored_reason (issue_type : IssueType.t) source_file =
     in
     Option.some_if (not accepted) reason
   in
-  Option.value ~default:"" (List.find_map Config.filter_report ~f:rejected_by)
+  List.find_map Config.filter_report ~f:rejected_by
 
 
 let potential_exception_message = "potential exception at line"
@@ -449,7 +449,7 @@ module IssuesTxt = struct
     in
     if
       error_filter source_file key.err_name
-      && ((not Config.filtering) || String.is_empty (censored_reason key.err_name source_file))
+      && ((not Config.filtering) || Option.is_none (censored_reason key.err_name source_file))
     then Exceptions.pp_err err_data.loc key.severity key.err_name key.err_desc None fmt ()
 
 

infer/src/backend/InferPrint.mli

@@ -10,6 +10,6 @@ open! IStd
 val loc_trace_to_jsonbug_record :
   Errlog.loc_trace_elem list -> Exceptions.severity -> Jsonbug_t.json_trace_item list
 
-val censored_reason : IssueType.t -> SourceFile.t -> string
+val censored_reason : IssueType.t -> SourceFile.t -> string option
 
 val main : report_json:string option -> unit

infer/src/unit/DifferentialTestsUtils.ml

@@ -31,7 +31,7 @@ let create_fake_jsonbug ?(bug_type = "bug_type") ?(qualifier = "qualifier")
   ; linters_def_file
   ; doc_url
   ; traceview_id= None
-  ; censored_reason= ""
+  ; censored_reason= None
   ; access= None
   ; extras= None }