anchor.diff:  -export([parse/2, parse_packet/1, parse_packet/2, parseheader/1, parserequest/1]).
   
   -include("sipsocket.hrl").
  +-include("siprecords.hrl").
   
   parse_packet(Packet) ->
       parse_packet(Packet, none).
  
positive.code: request({Method, URI}, Header, Body) ->
  %    io:format("Request:~p~n", [{Method, URI}]),
      URL = sipurl:parse(URI),
      {request, Method, URL, Header, Body}.
  
  response({Status, Reason}, Header, Body) ->
  %    io:format("Response:~p~n", [Status]),
      {response, list_to_integer(Status), Reason, Header, Body}.
  
negative.code:     case sipserver:origin2str(Origin, none) of
  	none -> true;
  	S ->
  	    %% Extract receiver pid if present
  	    RStr = case Origin of
  		       _ when record(Origin, siporigin) ->
  			   "(receiver: " ++ pid_to_list(Origin#siporigin.receiver) ++ ") ";
  		       _ ->
  			   ""
  		   end,
  	    logger:log(debug, "Packet from ~s ~s:~n~s", [S, RStr, Packet])
      end,
      Packetfixed = siputil:linefix(Packet),
  