is_sane

function is_sane(

  test_string: PChar;

  source: PByte;

  length: Integer

):Integer; overload;

function is_sane(

  test_string: PChar;

  const source: TByteDynArray;

  length: Integer

):Integer; overload;

function is_sane(

  const AllowedChars: string;

  const ASource: string

):Integer; overload;