anchor.diff:  							"<service-unavailable xmlns='urn:ietf:params:xml:ns:xmpp-stanzas'/>",
   							"</error>"
   						 ]).
  +
  +
  +%%%===================================================================
  +%%% Getting callback function and arguments
  +%%%===================================================================
  +get_callback(#iq{
  +				q = {"query", "http://jabber.org/protocol/disco#info"},
  +				type = "get"
  +				}) ->
  +	{ok, disco_info};
  +
  +get_callback(#iq{
  +				q = {"query", "jabber:iq:register"},
  +				type = "get"
  +				}) ->
  +	{ok, register_info};
  +%	lager:debug("get jabber:iq:register"),
  +%	Reply = reply_success(Msg),
  +	%	{ok, Str} = reply(Msg,
  +	%										[
  +	%										 "<instructions>",
  +	%										 "Press any key."
  +	%										 "</instructions>"]),
  +%	{reply, Reply, State};
  +
  +%get_callback(#iq{
  +%				q = {"query", "http://jabber.org/protocol/disco#items"},
  +%				type = "get"
  +%				}) ->
  +%	{ok, disco_items};
  +
  +%get_callback(#iq{
  +%				from = From,
  +%				to = Name,
  +%				q = {"query", "jabber:iq:register"},
  +%				remove = undefined,
  +%				type = "set"
  +%				}) ->
  +%	{ok, register};
  +
  +%get_callback(#iq{
  +%				q = {"query","jabber:iq:gateway"},
  +%				type = "get"
  +%				} = Msg) ->
  +%	Reply = reply(Msg, [
  +%											"<desc>Enter skype login</desc>",
  +%											"<login>Skype login</login>",
  +%											"<email>Email</email>"
  +%										 ]),
  +%	{ok,  xmpp_address};
  +
  +%get_callback(#iq{
  +%							 q = {"prompt","jabber:iq:gateway"},
  +%							 type = "set"
  +%							} = Msg,
  +%						State) ->
  +%	Reply = reply(Msg, [
  +
  +%get_callback(#presence{
  +%				type = "subscribe",
  +%				from = From,
  +%				to = Name
  +%				}) ->
  +%	lager:debug("presence subscribe"),
  +%	Reply = [
  +%			"<presence type='subscribed' ",
  +%			"from='", Name, "' ",
  +%			"to='", From, "'/>"
  +%			],
  +%	{ok, presence};
  +
  +get_callback(#iq{q = {"vCard", _}} = Msg) ->
  +	reply(Msg, ["<NICKNAME>Skype transport</NICKNAME>"]),
  +	{ok, vcard}.
  
positive.code: %% @spec start_link() -> {ok, Pid} | ignore | {error, Error}
  %% @end
  %%--------------------------------------------------------------------
  start_link(Name, Host, Port, Passwd) ->
  	gen_server:start_link({local, ?MODULE}, ?MODULE, [Name, Host, Port, Passwd], []).
  
  %%%===================================================================
  %%% gen_server callbacks
  
negative.code: 
  %% API
  -export([start_link/4]).
  -export([start_link/3]).
  -export([behaviour_info/1]).
  -export([reply/2]).
  
  %% gen_server callbacks
  -export([
  	init/1,
  	handle_call/3,
  	handle_cast/2,
  	handle_info/2,
  	terminate/2,
  	code_change/3
  ]).
  
  -record(state, {socket, name, module, mod_state}).
  
  -include("messages.hrl").
  
  %%%===================================================================
  %%% API
  %%%===================================================================
  behaviour_info(callbacks) ->
  	[
  	 {init, 2}
  	].
  
  %%--------------------------------------------------------------------
  %% @doc
  