diff options
| author | Raimo Niskanen <[email protected]> | 2018-06-08 15:49:06 +0200 |
|---|---|---|
| committer | Raimo Niskanen <[email protected]> | 2018-06-08 16:24:40 +0200 |
| commit | 794df8cbba8d7942dcb3bf2cbdfa526b04d41dd3 (patch) | |
| tree | 3289c1016bb354e22f6d0f1ce94b7401197ec33f /lib/kernel/src/net_kernel.erl | |
| parent | 9ae2044073e6433030ce30756658b103ce67c3c1 (diff) | |
| download | otp-794df8cbba8d7942dcb3bf2cbdfa526b04d41dd3.tar.gz otp-794df8cbba8d7942dcb3bf2cbdfa526b04d41dd3.tar.bz2 otp-794df8cbba8d7942dcb3bf2cbdfa526b04d41dd3.zip | |
Use public_key to verify client hostname
Diffstat (limited to 'lib/kernel/src/net_kernel.erl')
| -rw-r--r-- | lib/kernel/src/net_kernel.erl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lib/kernel/src/net_kernel.erl b/lib/kernel/src/net_kernel.erl index 669adefdf8..c4e1a0ce1e 100644 --- a/lib/kernel/src/net_kernel.erl +++ b/lib/kernel/src/net_kernel.erl @@ -53,7 +53,7 @@ %% Documented API functions. --export([allow/1, +-export([allow/1, allowed/0, connect_node/1, monitor_nodes/1, monitor_nodes/2, @@ -171,6 +171,8 @@ kernel_apply(M,F,A) -> request({apply,M,F,A}). Nodes :: [node()]. allow(Nodes) -> request({allow, Nodes}). +allowed() -> request(allowed). + longnames() -> request(longnames). -spec stop() -> ok | {error, Reason} when @@ -528,6 +530,9 @@ handle_call({allow, Nodes}, From, State) -> async_reply({reply,error,State}, From) end; +handle_call(allowed, From, #state{allowed = Allowed} = State) -> + async_reply({reply,{ok,Allowed},State}, From); + %% %% authentication, used by auth. Simply works as this: %% if the message comes through, the other node IS authorized. |