Added testcase to verify admin user restriction

Added testcase:
    - Verify SSH Login Access With Admin User

Change-Id: Ie6b8d84e2864e2cff2074621b0867d9c7a8009ab
Signed-off-by: manashsarma <manashsarma@in.ibm.com>
diff --git a/redfish/account_service/test_user_account.robot b/redfish/account_service/test_user_account.robot
index d18b541..d38492a 100644
--- a/redfish/account_service/test_user_account.robot
+++ b/redfish/account_service/test_user_account.robot
@@ -6,6 +6,8 @@
 Resource         ../../lib/openbmc_ffdc.robot
 Resource         ../../lib/bmc_redfish_utils.robot
 
+Library          SSHLibrary
+
 Test Setup       Redfish.Login
 Test Teardown    Test Teardown Execution
 
@@ -337,6 +339,19 @@
     Redfish.Delete  /redfish/v1/AccountService/Accounts/root  valid_status_codes=[${HTTP_FORBIDDEN}]
 
 
+Verify SSH Login Access With Admin User
+    [Documentation]  Verify that admin user does not have SSH login access.
+    [Tags]  Verify_SSH_Login_Access_With_Admin_User
+
+    # Create an admin User.
+    Redfish Create User  new_admin  TestPwd1  Administrator  ${True}
+
+    # Attempt SSH login with admin user.
+    SSHLibrary.Open Connection  ${OPENBMC_HOST}
+    ${status}=  Run Keyword And Return Status  SSHLibrary.Login  new_admin  TestPwd1
+    Should Be Equal  ${status}  ${False}
+
+
 *** Keywords ***
 
 Test Teardown Execution