anchor.diff: +%%%
  +%%% D-Bus outgoing connection authenticator
  +%%%
  +
   -module(dberl.auth).
   
   -import(crypto).
  
positive.code: 	 }).
  
  -define(SERVER, ?MODULE).
  -define(PORT, 1236).
  -define(HOST, "localhost").
  
  start_link() ->
      DbusHost = ?HOST,
      DbusPort = ?PORT,
      start_link(DbusHost, DbusPort).
  
  start_link(DbusHost, DbusPort) ->
      gen_server:start_link({local, ?SERVER}, ?MODULE, [DbusHost, DbusPort, self()], []).
  
negative.code: -behaviour(gen_server).
  
  %% api
  -export([start_link/2, stop/0]).
  
  %% gen_server callbacks
  -export([init/1,
  