anchor.diff:  		Result :: {proceed, #mod{}}.
   handle_auth(#mod{data = Data, config_db = ConfigDb} = Info,
   		Directory, DirectoryData, _AuthType) ->
  +erlang:display({?MODULE, ?LINE}),
   	case require(Info, Directory, DirectoryData) of
   		authorized ->
  +erlang:display({?MODULE, ?LINE}),
   			{proceed, Data};
   		{authorized, User} ->
  +erlang:display({?MODULE, ?LINE}),
   			{proceed, [{remote_user, User} | Data]};
   		{authorization_required, Realm} ->
  +erlang:display({?MODULE, ?LINE}),
   			Message = httpd_util:message(401, none, ConfigDb),
   			{proceed,
   					[{response, {401, ["WWW-Authenticate: Bearer realm=\"",Realm,
  
positive.code: require1(Info, Directory, DirectoryData, ValidUsers, ValidGroups,
  		EncodedHeader, EncodedPayload, EncodedSignature)
  		when is_list(EncodedHeader), is_list(EncodedPayload), is_list(EncodedSignature) ->
  	case validate_header(EncodedHeader) of
  	{valid, _DecodedHeader} ->
  		case validate_payload(EncodedPayload) of
  		{valid, DecodedPayload} ->
  			case validate_cert(EncodedHeader, EncodedPayload, EncodedSignature) of
  					authenticated ->
  						validate_user(Info, Directory, DirectoryData,
  								ValidUsers, ValidGroups, DecodedPayload);
  					{error, _Reason} ->
  						authorization_required(DirectoryData)
  			end;
  		{error, _Reason} ->
  
negative.code: 	end.
  
  require(#mod{parsed_header = ParsedHeader} = Info, Directory, DirectoryData) ->
  erlang:display({?MODULE, ?LINE}),
  erlang:display({?MODULE, ?LINE, lists:keyfind(require_user, 1, DirectoryData)}),
  	ValidUsers  = proplists:get_value(require_user, DirectoryData),
  	ValidGroups = proplists:get_value(require_group, DirectoryData),
  erlang:display({?MODULE, ?LINE}),
  	case ValidGroups of
  		undefined when ValidUsers =:= undefined ->
  			authorized;
  		_ ->
  erlang:display({?MODULE, ?LINE}),
  			case proplists:get_value("authorization", ParsedHeader) of
  				false ->
  erlang:display({?MODULE, ?LINE}),
  					authorization_required(DirectoryData);
  				"Bearer" ++ EncodedString = Credentials ->
  					case string:tokens(EncodedString, ".") of
  						[EncodedHeader, EncodedPayload, EncodedSignature] ->
  erlang:display({?MODULE, ?LINE}),
  							require1(Info, Directory, DirectoryData, ValidUsers, ValidGroups,
  									EncodedHeader, EncodedPayload, EncodedSignature);
  						_ ->
  