pycredentials: Add support for netr_crypt_password
[samba.git] / auth / credentials / credentials.c
index 7f4c15fee18ede2976477f3b051c0df654b1ebed..2342d7253cc456107a764fbe038a5a3da55d31b4 100644 (file)
@@ -193,7 +193,7 @@ _PUBLIC_ const char *cli_credentials_get_bind_dn(struct cli_credentials *cred)
  * @retval The username set on this context.
  * @note Return value will never be NULL except by programmer error.
  */
-_PUBLIC_ const char *cli_credentials_get_principal_and_obtained(struct cli_credentials *cred, TALLOC_CTX *mem_ctx, enum credentials_obtained *obtained)
+_PUBLIC_ char *cli_credentials_get_principal_and_obtained(struct cli_credentials *cred, TALLOC_CTX *mem_ctx, enum credentials_obtained *obtained)
 {
        if (cred->machine_account_pending) {
                cli_credentials_set_machine_account(cred,
@@ -213,16 +213,37 @@ _PUBLIC_ const char *cli_credentials_get_principal_and_obtained(struct cli_crede
 
        if (cred->principal_obtained < cred->username_obtained
            || cred->principal_obtained < MAX(cred->domain_obtained, cred->realm_obtained)) {
+               const char *effective_username = NULL;
+               const char *effective_realm = NULL;
+               enum credentials_obtained effective_obtained;
+
+               effective_username = cli_credentials_get_username(cred);
+               if (effective_username == NULL || strlen(effective_username) == 0) {
+                       *obtained = cred->username_obtained;
+                       return NULL;
+               }
+
                if (cred->domain_obtained > cred->realm_obtained) {
-                       *obtained = MIN(cred->domain_obtained, cred->username_obtained);
-                       return talloc_asprintf(mem_ctx, "%s@%s", 
-                                              cli_credentials_get_username(cred),
-                                              cli_credentials_get_domain(cred));
+                       effective_realm = cli_credentials_get_domain(cred);
+                       effective_obtained = MIN(cred->domain_obtained,
+                                                cred->username_obtained);
                } else {
-                       *obtained = MIN(cred->realm_obtained, cred->username_obtained);
+                       effective_realm = cli_credentials_get_realm(cred);
+                       effective_obtained = MIN(cred->realm_obtained,
+                                                cred->username_obtained);
+               }
+
+               if (effective_realm == NULL || strlen(effective_realm) == 0) {
+                       effective_realm = cli_credentials_get_domain(cred);
+                       effective_obtained = MIN(cred->domain_obtained,
+                                                cred->username_obtained);
+               }
+
+               if (effective_realm != NULL && strlen(effective_realm) != 0) {
+                       *obtained = effective_obtained;
                        return talloc_asprintf(mem_ctx, "%s@%s", 
-                                              cli_credentials_get_username(cred),
-                                              cli_credentials_get_realm(cred));
+                                              effective_username,
+                                              effective_realm);
                }
        }
        *obtained = cred->principal_obtained;
@@ -235,7 +256,7 @@ _PUBLIC_ const char *cli_credentials_get_principal_and_obtained(struct cli_crede
  * @retval The username set on this context.
  * @note Return value will never be NULL except by programmer error.
  */
-_PUBLIC_ const char *cli_credentials_get_principal(struct cli_credentials *cred, TALLOC_CTX *mem_ctx)
+_PUBLIC_ char *cli_credentials_get_principal(struct cli_credentials *cred, TALLOC_CTX *mem_ctx)
 {
        enum credentials_obtained obtained;
        return cli_credentials_get_principal_and_obtained(cred, mem_ctx, &obtained);
@@ -247,7 +268,11 @@ _PUBLIC_ bool cli_credentials_set_principal(struct cli_credentials *cred,
 {
        if (obtained >= cred->principal_obtained) {
                cred->principal = talloc_strdup(cred, val);
+               if (cred->principal == NULL) {
+                       return false;
+               }
                cred->principal_obtained = obtained;
+
                cli_credentials_invalidate_ccache(cred, cred->principal_obtained);
                return true;
        }
@@ -318,7 +343,8 @@ _PUBLIC_ const char *cli_credentials_get_password(struct cli_credentials *cred)
        }
 
        if (cred->password_obtained == CRED_CALLBACK && 
-           !cred->callback_running) {
+           !cred->callback_running &&
+           !cred->password_will_be_nt_hash) {
                cred->callback_running = true;
                cred->password = cred->password_cb(cred);
                cred->callback_running = false;
@@ -339,18 +365,54 @@ _PUBLIC_ bool cli_credentials_set_password(struct cli_credentials *cred,
                                  enum credentials_obtained obtained)
 {
        if (obtained >= cred->password_obtained) {
+
+               cred->lm_response = data_blob_null;
+               cred->nt_response = data_blob_null;
+               cred->nt_hash = NULL;
+               cred->password = NULL;
+
+               cli_credentials_invalidate_ccache(cred, obtained);
+
                cred->password_tries = 0;
+
+               if (val == NULL) {
+                       cred->password_obtained = obtained;
+                       return true;
+               }
+
+               if (cred->password_will_be_nt_hash) {
+                       struct samr_Password *nt_hash = NULL;
+                       size_t val_len = strlen(val);
+                       size_t converted;
+
+                       nt_hash = talloc(cred, struct samr_Password);
+                       if (nt_hash == NULL) {
+                               return false;
+                       }
+
+                       converted = strhex_to_str((char *)nt_hash->hash,
+                                                 sizeof(nt_hash->hash),
+                                                 val, val_len);
+                       if (converted != sizeof(nt_hash->hash)) {
+                               TALLOC_FREE(nt_hash);
+                               return false;
+                       }
+
+                       cred->nt_hash = nt_hash;
+                       cred->password_obtained = obtained;
+                       return true;
+               }
+
                cred->password = talloc_strdup(cred, val);
-               if (cred->password) {
-                       /* Don't print the actual password in talloc memory dumps */
-                       talloc_set_name_const(cred->password, "password set via cli_credentials_set_password");
+               if (cred->password == NULL) {
+                       return false;
                }
+
+               /* Don't print the actual password in talloc memory dumps */
+               talloc_set_name_const(cred->password,
+                       "password set via cli_credentials_set_password");
                cred->password_obtained = obtained;
-               cli_credentials_invalidate_ccache(cred, cred->password_obtained);
 
-               cred->nt_hash = NULL;
-               cred->lm_response = data_blob(NULL, 0);
-               cred->nt_response = data_blob(NULL, 0);
                return true;
        }
 
@@ -411,32 +473,85 @@ _PUBLIC_ bool cli_credentials_set_old_password(struct cli_credentials *cred,
 _PUBLIC_ struct samr_Password *cli_credentials_get_nt_hash(struct cli_credentials *cred,
                                                           TALLOC_CTX *mem_ctx)
 {
+       enum credentials_obtained password_obtained;
+       enum credentials_obtained ccache_threshold;
+       enum credentials_obtained client_gss_creds_threshold;
+       bool password_is_nt_hash;
        const char *password = NULL;
+       struct samr_Password *nt_hash = NULL;
 
        if (cred->nt_hash != NULL) {
-               struct samr_Password *nt_hash = talloc(mem_ctx, struct samr_Password);
-               if (!nt_hash) {
-                       return NULL;
-               }
+               /*
+                * If we already have a hash it's easy.
+                */
+               goto return_hash;
+       }
 
-               *nt_hash = *cred->nt_hash;
+       /*
+        * This is a bit tricky, with password_will_be_nt_hash
+        * we still need to get the value via the password_callback
+        * but if we did that we should not remember it's state
+        * in the long run so we need to undo it.
+        */
 
-               return nt_hash;
-       }
+       password_obtained = cred->password_obtained;
+       ccache_threshold = cred->ccache_threshold;
+       client_gss_creds_threshold = cred->client_gss_creds_threshold;
+       password_is_nt_hash = cred->password_will_be_nt_hash;
 
+       cred->password_will_be_nt_hash = false;
        password = cli_credentials_get_password(cred);
-       if (password) {
-               struct samr_Password *nt_hash = talloc(mem_ctx, struct samr_Password);
-               if (!nt_hash) {
-                       return NULL;
-               }
 
+       cred->password_will_be_nt_hash = password_is_nt_hash;
+       if (password_is_nt_hash && password_obtained == CRED_CALLBACK) {
+               /*
+                * We got the nt_hash as string via the callback,
+                * so we need to undo the state change.
+                *
+                * And also don't remember it as plaintext password.
+                */
+               cred->client_gss_creds_threshold = client_gss_creds_threshold;
+               cred->ccache_threshold = ccache_threshold;
+               cred->password_obtained = password_obtained;
+               cred->password = NULL;
+       }
+
+       if (password == NULL) {
+               return NULL;
+       }
+
+       nt_hash = talloc(cred, struct samr_Password);
+       if (nt_hash == NULL) {
+               return NULL;
+       }
+
+       if (password_is_nt_hash) {
+               size_t password_len = strlen(password);
+               size_t converted;
+
+               converted = strhex_to_str((char *)nt_hash->hash,
+                                         sizeof(nt_hash->hash),
+                                         password, password_len);
+               if (converted != sizeof(nt_hash->hash)) {
+                       TALLOC_FREE(nt_hash);
+                       return false;
+               }
+       } else {
                E_md4hash(password, nt_hash->hash);
+       }
 
-               return nt_hash;
+       cred->nt_hash = nt_hash;
+       nt_hash = NULL;
+
+return_hash:
+       nt_hash = talloc(mem_ctx, struct samr_Password);
+       if (nt_hash == NULL) {
+               return NULL;
        }
 
-       return NULL;
+       *nt_hash = *cred->nt_hash;
+
+       return nt_hash;
 }
 
 /**
@@ -670,6 +785,14 @@ _PUBLIC_ void cli_credentials_parse_string(struct cli_credentials *credentials,
        }
 
        if ((p = strchr_m(uname,'@'))) {
+               /*
+                * We also need to set username and domain
+                * in order to undo the effect of
+                * cli_credentials_guess().
+                */
+               cli_credentials_set_username(credentials, uname, obtained);
+               cli_credentials_set_domain(credentials, "", obtained);
+
                cli_credentials_set_principal(credentials, uname, obtained);
                *p = 0;
                cli_credentials_set_realm(credentials, p+1, obtained);
@@ -678,9 +801,40 @@ _PUBLIC_ void cli_credentials_parse_string(struct cli_credentials *credentials,
                   || (p = strchr_m(uname, '/'))
                   || (p = strchr_m(uname, credentials->winbind_separator)))
        {
+               const char *domain = NULL;
+
+               domain = uname;
                *p = 0;
-               cli_credentials_set_domain(credentials, uname, obtained);
                uname = p+1;
+
+               if (obtained == credentials->realm_obtained &&
+                   !strequal_m(credentials->domain, domain))
+               {
+                       /*
+                        * We need to undo a former set with the same level
+                        * in order to get the expected result from
+                        * cli_credentials_get_principal().
+                        *
+                        * But we only need to do that if the domain
+                        * actually changes.
+                        */
+                       cli_credentials_set_realm(credentials, domain, obtained);
+               }
+               cli_credentials_set_domain(credentials, domain, obtained);
+       }
+       if (obtained == credentials->principal_obtained &&
+           !strequal_m(credentials->username, uname))
+       {
+               /*
+                * We need to undo a former set with the same level
+                * in order to get the expected result from
+                * cli_credentials_get_principal().
+                *
+                * But we only need to do that if the username
+                * actually changes.
+                */
+               credentials->principal_obtained = CRED_UNINITIALISED;
+               credentials->principal = NULL;
        }
        cli_credentials_set_username(credentials, uname, obtained);
 }
@@ -694,12 +848,12 @@ _PUBLIC_ void cli_credentials_parse_string(struct cli_credentials *credentials,
  * @param mem_ctx The memory context to place the result on
  */
 
-_PUBLIC_ const char *cli_credentials_get_unparsed_name(struct cli_credentials *credentials, TALLOC_CTX *mem_ctx)
+_PUBLIC_ char *cli_credentials_get_unparsed_name(struct cli_credentials *credentials, TALLOC_CTX *mem_ctx)
 {
        const char *bind_dn = cli_credentials_get_bind_dn(credentials);
-       const char *domain;
-       const char *username;
-       const char *name;
+       const char *domain = NULL;
+       const char *username = NULL;
+       char *name = NULL;
 
        if (bind_dn) {
                name = talloc_strdup(mem_ctx, bind_dn);
@@ -726,6 +880,7 @@ _PUBLIC_ void cli_credentials_set_conf(struct cli_credentials *cred,
                              struct loadparm_context *lp_ctx)
 {
        const char *sep = NULL;
+       const char *realm = lpcfg_realm(lp_ctx);
 
        cli_credentials_set_username(cred, "", CRED_UNINITIALISED);
        if (lpcfg_parm_is_cmdline(lp_ctx, "workgroup")) {
@@ -738,10 +893,13 @@ _PUBLIC_ void cli_credentials_set_conf(struct cli_credentials *cred,
        } else {
                cli_credentials_set_workstation(cred, lpcfg_netbios_name(lp_ctx), CRED_UNINITIALISED);
        }
+       if (realm != NULL && strlen(realm) == 0) {
+               realm = NULL;
+       }
        if (lpcfg_parm_is_cmdline(lp_ctx, "realm")) {
-               cli_credentials_set_realm(cred, lpcfg_realm(lp_ctx), CRED_SPECIFIED);
+               cli_credentials_set_realm(cred, realm, CRED_SPECIFIED);
        } else {
-               cli_credentials_set_realm(cred, lpcfg_realm(lp_ctx), CRED_UNINITIALISED);
+               cli_credentials_set_realm(cred, realm, CRED_UNINITIALISED);
        }
 
        sep = lpcfg_winbind_separator(lp_ctx);
@@ -963,6 +1121,10 @@ _PUBLIC_ bool cli_credentials_parse_file(struct cli_credentials *cred, const cha
        char *ptr, *val, *param;
        char **lines;
        int i, numlines;
+       const char *realm = NULL;
+       const char *domain = NULL;
+       const char *password = NULL;
+       const char *username = NULL;
 
        lines = file_lines_load(file, &numlines, 0, NULL);
 
@@ -993,17 +1155,57 @@ _PUBLIC_ bool cli_credentials_parse_file(struct cli_credentials *cred, const cha
                        val++;
 
                if (strwicmp("password", param) == 0) {
-                       cli_credentials_set_password(cred, val, obtained);
+                       password = val;
                } else if (strwicmp("username", param) == 0) {
-                       cli_credentials_set_username(cred, val, obtained);
+                       username = val;
                } else if (strwicmp("domain", param) == 0) {
-                       cli_credentials_set_domain(cred, val, obtained);
+                       domain = val;
                } else if (strwicmp("realm", param) == 0) {
-                       cli_credentials_set_realm(cred, val, obtained);
+                       realm = val;
                }
-               memset(lines[i], 0, len);
+
+               /*
+                * We need to readd '=' in order to let
+                * the strlen() work in the last loop
+                * that clears the memory.
+                */
+               *ptr = '=';
        }
 
+       if (realm != NULL && strlen(realm) != 0) {
+               /*
+                * only overwrite with a valid string
+                */
+               cli_credentials_set_realm(cred, realm, obtained);
+       }
+
+       if (domain != NULL && strlen(domain) != 0) {
+               /*
+                * only overwrite with a valid string
+                */
+               cli_credentials_set_domain(cred, domain, obtained);
+       }
+
+       if (password != NULL) {
+               /*
+                * Here we allow "".
+                */
+               cli_credentials_set_password(cred, password, obtained);
+       }
+
+       if (username != NULL) {
+               /*
+                * The last "username" line takes preference
+                * if the string also contains domain, realm or
+                * password.
+                */
+               cli_credentials_parse_string(cred, username, obtained);
+       }
+
+       for (i = 0; i < numlines; i++) {
+               len = strlen(lines[i]);
+               memset(lines[i], 0, len);
+       }
        talloc_free(lines);
 
        return true;
@@ -1081,3 +1283,43 @@ _PUBLIC_ bool cli_credentials_parse_password_fd(struct cli_credentials *credenti
 }
 
 
+/**
+ * Encrypt a data blob using the session key and the negotiated encryption
+ * algorithm
+ *
+ * @param state Credential state, contains the session key and algorithm
+ * @param data Data blob containing the data to be encrypted.
+ *
+ */
+_PUBLIC_ NTSTATUS netlogon_creds_session_encrypt(
+       struct netlogon_creds_CredentialState *state,
+       DATA_BLOB data)
+{
+       if (data.data == NULL || data.length == 0) {
+               DBG_ERR("Nothing to encrypt "
+                       "data.data == NULL or data.length == 0");
+               return NT_STATUS_INVALID_PARAMETER;
+       }
+       /*
+        * Don't crypt an all-zero password it will give away the
+        * NETLOGON pipe session key .
+        */
+       if (all_zero(data.data, data.length)) {
+               DBG_ERR("Supplied data all zeros, could leak session key");
+               return NT_STATUS_INVALID_PARAMETER;
+       }
+       if (state->negotiate_flags & NETLOGON_NEG_SUPPORTS_AES) {
+               netlogon_creds_aes_encrypt(state,
+                                          data.data,
+                                          data.length);
+       } else if (state->negotiate_flags & NETLOGON_NEG_ARCFOUR) {
+               netlogon_creds_arcfour_crypt(state,
+                                            data.data,
+                                            data.length);
+       } else {
+               DBG_ERR("Unsupported encryption option negotiated");
+               return NT_STATUS_NOT_SUPPORTED;
+       }
+       return NT_STATUS_OK;
+}
+