diff options
| author | Micael Karlberg <[email protected]> | 2011-04-15 12:09:27 +0200 |
|---|---|---|
| committer | Micael Karlberg <[email protected]> | 2011-04-15 12:09:27 +0200 |
| commit | 0dd3ff7f7e7c15e912645b1d4cc42fcef25ee29d (patch) | |
| tree | c5d11f86a863b00cb651224a3125e7810e1ad52b /lib/snmp/src/agent/snmpa_usm.erl | |
| parent | f5cb2e252f789ed9fc99f638772b9292a2df7c44 (diff) | |
| parent | 293cb2901b3f559c5cf50c1fc4798091edd540a0 (diff) | |
| download | otp-0dd3ff7f7e7c15e912645b1d4cc42fcef25ee29d.tar.gz otp-0dd3ff7f7e7c15e912645b1d4cc42fcef25ee29d.tar.bz2 otp-0dd3ff7f7e7c15e912645b1d4cc42fcef25ee29d.zip | |
Merge branch 'bmk/snmp/snmp420_integration' of super:bmk_otp into bmk/snmp/snmp420_integration
Diffstat (limited to 'lib/snmp/src/agent/snmpa_usm.erl')
| -rw-r--r-- | lib/snmp/src/agent/snmpa_usm.erl | 17 |
1 files changed, 7 insertions, 10 deletions
diff --git a/lib/snmp/src/agent/snmpa_usm.erl b/lib/snmp/src/agent/snmpa_usm.erl index f35d1f1916..6f54307f9f 100644 --- a/lib/snmp/src/agent/snmpa_usm.erl +++ b/lib/snmp/src/agent/snmpa_usm.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1999-2010. All Rights Reserved. +%% Copyright Ericsson AB 1999-2011. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -330,7 +330,6 @@ non_authoritative(SecName, end end. - is_auth(?usmNoAuthProtocol, _, _, _, SecName, _, _, _, _) -> % 3.2.5 error(usmStatsUnsupportedSecLevels, ?usmStatsUnsupportedSecLevels_instance, SecName); % OTP-5464 @@ -613,8 +612,7 @@ authenticate_outgoing(Message, UsmSecParams, end, ?vtrace("authenticate_outgoing -> encode message only",[]), snmp_pdus:enc_message_only(Message2). - - + %%----------------------------------------------------------------- %% Auth and priv algorithms @@ -753,14 +751,19 @@ set_engine_latest_time(SnmpEngineID, EngineTime) -> %%----------------------------------------------------------------- %% Utility functions %%----------------------------------------------------------------- +-spec error(term()) -> no_return(). error(Reason) -> throw({error, Reason}). +-spec error(term(), term()) -> no_return(). error(Reason, ErrorInfo) -> throw({error, Reason, ErrorInfo}). +-spec error(term(), term(), term()) -> no_return(). error(Variable, Oid, SecName) -> error(Variable, Oid, SecName, []). + +-spec error(term(), term(), term(), [term()]) -> no_return(). error(Variable, Oid, SecName, Opts) -> Val = inc(Variable), ErrorInfo = {#varbind{oid = Oid, @@ -772,7 +775,6 @@ error(Variable, Oid, SecName, Opts) -> inc(Name) -> ets:update_counter(snmp_agent_table, Name, 1). - get_counter(Name) -> case (catch ets:lookup(snmp_agent_table, Name)) of [{_, Val}] -> @@ -780,8 +782,3 @@ get_counter(Name) -> _ -> 0 end. - - - - - |