anchor.diff:  -define(HELLO, hello).
   -define(CONNECTED, connected).
   -define(STOP, stop).
  --define(SOCKS_PORT,1090).
  +-define(SOCKS_PORT,1080).
   -define(CONNECTION_TIMEOUT, 20000).
  +-define(CACHE_EXPIRED,3600).
   
   -type state() :: init|hello|connected.
   
  
positive.code: %% Start a server to listen on port 1080, which later will establish connection from  SOCKS client
  
  
  %% T represent the state of the sock connection, init -> hello -> reply
  
  %% Todo: Add cache for the domain host
  %% Add expired time to the IP cache
  
  -module(entry).
  -export([start_socks/0,start_socks/1]).
  
negative.code:         {Pid, {IP, Time}} ->
              CurrentTime = tis(),
              if 
                  CurrentTime - Time > CACHE_EXPIRED ->
                      Pid ! {'remove', Host},
                      undefined;
                 true -> IP
  