peerUser(Index, PeerServer) ->
    timer:sleep(2000),
    Index ! {getCatalog, self()},
    receive
        {ok, Catalog} ->
            RandIndex = rand:uniform(length(Catalog)),
            {Id, Owners} = lists:nth(RandIndex, Catalog),
            RandOwner = rand:uniform(length(Owners)),
            Owner = lists:nth(RandOwner, Owners),
            Owner ! {request, Id, self()},

            receive
                {found, Id, Content} ->
                        PeerServer ! {add, Id, Content},
                        peerUser(Index, PeerServer);
                {notfound} ->

                        peerUser(Index, PeerServer)

        end
    end.