security/integrity/evm/evm_main.c

   1 /*
   2  * Copyright (C) 2005-2010 IBM Corporation
   3  *
   4  * Author:
   5  * Mimi Zohar <zohar@us.ibm.com>
   6  * Kylene Hall <kjhall@us.ibm.com>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation, version 2 of the License.
  11  *
  12  * File: evm_main.c
  13  *      implements evm_inode_setxattr, evm_inode_post_setxattr,
  14  *      evm_inode_removexattr, and evm_verifyxattr
  15  */
  16
  17 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  18
  19 #include <linux/init.h>
  20 #include <linux/crypto.h>
  21 #include <linux/audit.h>
  22 #include <linux/xattr.h>
  23 #include <linux/integrity.h>
  24 #include <linux/evm.h>
  25 #include <linux/magic.h>
  26
  27 #include <crypto/hash.h>
  28 #include <crypto/hash_info.h>
  29 #include <crypto/algapi.h>
  30 #include "evm.h"
  31
  32 int evm_initialized;
  33
  34 static const char * const integrity_status_msg[] = {
  35         "pass", "pass_immutable", "fail", "no_label", "no_xattrs", "unknown"
  36 };
  37 int evm_hmac_attrs;
  38
  39 static struct xattr_list evm_config_default_xattrnames[] = {
  40 #ifdef CONFIG_SECURITY_SELINUX
  41         {.name = XATTR_NAME_SELINUX},
  42 #endif
  43 #ifdef CONFIG_SECURITY_SMACK
  44         {.name = XATTR_NAME_SMACK},
  45 #ifdef CONFIG_EVM_EXTRA_SMACK_XATTRS
  46         {.name = XATTR_NAME_SMACKEXEC},
  47         {.name = XATTR_NAME_SMACKTRANSMUTE},
  48         {.name = XATTR_NAME_SMACKMMAP},
  49 #endif
  50 #endif
  51 #ifdef CONFIG_SECURITY_APPARMOR
  52         {.name = XATTR_NAME_APPARMOR},
  53 #endif
  54 #ifdef CONFIG_IMA_APPRAISE
  55         {.name = XATTR_NAME_IMA},
  56 #endif
  57         {.name = XATTR_NAME_CAPS},
  58 };
  59
  60 LIST_HEAD(evm_config_xattrnames);
  61
  62 static int evm_fixmode;
  63 static int __init evm_set_fixmode(char *str)
  64 {
  65         if (strncmp(str, "fix", 3) == 0)
  66                 evm_fixmode = 1;
  67         return 0;
  68 }
  69 __setup("evm=", evm_set_fixmode);
  70
  71 static void __init evm_init_config(void)
  72 {
  73         int i, xattrs;
  74
  75         xattrs = ARRAY_SIZE(evm_config_default_xattrnames);
  76
  77         pr_info("Initialising EVM extended attributes:\n");
  78         for (i = 0; i < xattrs; i++) {
  79                 pr_info("%s\n", evm_config_default_xattrnames[i].name);
  80                 list_add_tail(&evm_config_default_xattrnames[i].list,
  81                               &evm_config_xattrnames);
  82         }
  83
  84 #ifdef CONFIG_EVM_ATTR_FSUUID
  85         evm_hmac_attrs |= EVM_ATTR_FSUUID;
  86 #endif
  87         pr_info("HMAC attrs: 0x%x\n", evm_hmac_attrs);
  88 }
  89
  90 static bool evm_key_loaded(void)
  91 {
  92         return (bool)(evm_initialized & EVM_KEY_MASK);
  93 }
  94
  95 static int evm_find_protected_xattrs(struct dentry *dentry)
  96 {
  97         struct inode *inode = d_backing_inode(dentry);
  98         struct xattr_list *xattr;
  99         int error;
 100         int count = 0;
 101
 102         if (!(inode->i_opflags & IOP_XATTR))
 103                 return -EOPNOTSUPP;
 104
 105         list_for_each_entry_rcu(xattr, &evm_config_xattrnames, list) {
 106                 error = __vfs_getxattr(dentry, inode, xattr->name, NULL, 0);
 107                 if (error < 0) {
 108                         if (error == -ENODATA)
 109                                 continue;
 110                         return error;
 111                 }
 112                 count++;
 113         }
 114
 115         return count;
 116 }
 117
 118 /*
 119  * evm_verify_hmac - calculate and compare the HMAC with the EVM xattr
 120  *
 121  * Compute the HMAC on the dentry's protected set of extended attributes
 122  * and compare it against the stored security.evm xattr.
 123  *
 124  * For performance:
 125  * - use the previoulsy retrieved xattr value and length to calculate the
 126  *   HMAC.)
 127  * - cache the verification result in the iint, when available.
 128  *
 129  * Returns integrity status
 130  */
 131 static enum integrity_status evm_verify_hmac(struct dentry *dentry,
 132                                              const char *xattr_name,
 133                                              char *xattr_value,
 134                                              size_t xattr_value_len,
 135                                              struct integrity_iint_cache *iint)
 136 {
 137         struct evm_ima_xattr_data *xattr_data = NULL;
 138         struct signature_v2_hdr *hdr;
 139         enum integrity_status evm_status = INTEGRITY_PASS;
 140         struct evm_digest digest;
 141         struct inode *inode;
 142         int rc, xattr_len;
 143
 144         if (iint && (iint->evm_status == INTEGRITY_PASS ||
 145                      iint->evm_status == INTEGRITY_PASS_IMMUTABLE))
 146                 return iint->evm_status;
 147
 148         /* if status is not PASS, try to check again - against -ENOMEM */
 149
 150         /* first need to know the sig type */
 151         rc = vfs_getxattr_alloc(dentry, XATTR_NAME_EVM, (char **)&xattr_data, 0,
 152                                 GFP_NOFS);
 153         if (rc <= 0) {
 154                 evm_status = INTEGRITY_FAIL;
 155                 if (rc == -ENODATA) {
 156                         rc = evm_find_protected_xattrs(dentry);
 157                         if (rc > 0)
 158                                 evm_status = INTEGRITY_NOLABEL;
 159                         else if (rc == 0)
 160                                 evm_status = INTEGRITY_NOXATTRS; /* new file */
 161                 } else if (rc == -EOPNOTSUPP) {
 162                         evm_status = INTEGRITY_UNKNOWN;
 163                 }
 164                 goto out;
 165         }
 166
 167         xattr_len = rc;
 168
 169         /* check value type */
 170         switch (xattr_data->type) {
 171         case EVM_XATTR_HMAC:
 172                 if (xattr_len != sizeof(struct evm_ima_xattr_data)) {
 173                         evm_status = INTEGRITY_FAIL;
 174                         goto out;
 175                 }
 176
 177                 digest.hdr.algo = HASH_ALGO_SHA1;
 178                 rc = evm_calc_hmac(dentry, xattr_name, xattr_value,
 179                                    xattr_value_len, &digest);
 180                 if (rc)
 181                         break;
 182                 rc = crypto_memneq(xattr_data->digest, digest.digest,
 183                                    SHA1_DIGEST_SIZE);
 184                 if (rc)
 185                         rc = -EINVAL;
 186                 break;
 187         case EVM_IMA_XATTR_DIGSIG:
 188         case EVM_XATTR_PORTABLE_DIGSIG:
 189                 hdr = (struct signature_v2_hdr *)xattr_data;
 190                 digest.hdr.algo = hdr->hash_algo;
 191                 rc = evm_calc_hash(dentry, xattr_name, xattr_value,
 192                                    xattr_value_len, xattr_data->type, &digest);
 193                 if (rc)
 194                         break;
 195                 rc = integrity_digsig_verify(INTEGRITY_KEYRING_EVM,
 196                                         (const char *)xattr_data, xattr_len,
 197                                         digest.digest, digest.hdr.length);
 198                 if (!rc) {
 199                         inode = d_backing_inode(dentry);
 200
 201                         if (xattr_data->type == EVM_XATTR_PORTABLE_DIGSIG) {
 202                                 if (iint)
 203                                         iint->flags |= EVM_IMMUTABLE_DIGSIG;
 204                                 evm_status = INTEGRITY_PASS_IMMUTABLE;
 205                         } else if (!IS_RDONLY(inode) &&
 206                                    !(inode->i_sb->s_readonly_remount) &&
 207                                    !IS_IMMUTABLE(inode)) {
 208                                 evm_update_evmxattr(dentry, xattr_name,
 209                                                     xattr_value,
 210                                                     xattr_value_len);
 211                         }
 212                 }
 213                 break;
 214         default:
 215                 rc = -EINVAL;
 216                 break;
 217         }
 218
 219         if (rc)
 220                 evm_status = (rc == -ENODATA) ?
 221                                 INTEGRITY_NOXATTRS : INTEGRITY_FAIL;
 222 out:
 223         if (iint)
 224                 iint->evm_status = evm_status;
 225         kfree(xattr_data);
 226         return evm_status;
 227 }
 228
 229 static int evm_protected_xattr(const char *req_xattr_name)
 230 {
 231         int namelen;
 232         int found = 0;
 233         struct xattr_list *xattr;
 234
 235         namelen = strlen(req_xattr_name);
 236         list_for_each_entry_rcu(xattr, &evm_config_xattrnames, list) {
 237                 if ((strlen(xattr->name) == namelen)
 238                     && (strncmp(req_xattr_name, xattr->name, namelen) == 0)) {
 239                         found = 1;
 240                         break;
 241                 }
 242                 if (strncmp(req_xattr_name,
 243                             xattr->name + XATTR_SECURITY_PREFIX_LEN,
 244                             strlen(req_xattr_name)) == 0) {
 245                         found = 1;
 246                         break;
 247                 }
 248         }
 249
 250         return found;
 251 }
 252
 253 /**
 254  * evm_verifyxattr - verify the integrity of the requested xattr
 255  * @dentry: object of the verify xattr
 256  * @xattr_name: requested xattr
 257  * @xattr_value: requested xattr value
 258  * @xattr_value_len: requested xattr value length
 259  *
 260  * Calculate the HMAC for the given dentry and verify it against the stored
 261  * security.evm xattr. For performance, use the xattr value and length
 262  * previously retrieved to calculate the HMAC.
 263  *
 264  * Returns the xattr integrity status.
 265  *
 266  * This function requires the caller to lock the inode's i_mutex before it
 267  * is executed.
 268  */
 269 enum integrity_status evm_verifyxattr(struct dentry *dentry,
 270                                       const char *xattr_name,
 271                                       void *xattr_value, size_t xattr_value_len,
 272                                       struct integrity_iint_cache *iint)
 273 {
 274         if (!evm_key_loaded() || !evm_protected_xattr(xattr_name))
 275                 return INTEGRITY_UNKNOWN;
 276
 277         if (!iint) {
 278                 iint = integrity_iint_find(d_backing_inode(dentry));
 279                 if (!iint)
 280                         return INTEGRITY_UNKNOWN;
 281         }
 282         return evm_verify_hmac(dentry, xattr_name, xattr_value,
 283                                  xattr_value_len, iint);
 284 }
 285 EXPORT_SYMBOL_GPL(evm_verifyxattr);
 286
 287 /*
 288  * evm_verify_current_integrity - verify the dentry's metadata integrity
 289  * @dentry: pointer to the affected dentry
 290  *
 291  * Verify and return the dentry's metadata integrity. The exceptions are
 292  * before EVM is initialized or in 'fix' mode.
 293  */
 294 static enum integrity_status evm_verify_current_integrity(struct dentry *dentry)
 295 {
 296         struct inode *inode = d_backing_inode(dentry);
 297
 298         if (!evm_key_loaded() || !S_ISREG(inode->i_mode) || evm_fixmode)
 299                 return 0;
 300         return evm_verify_hmac(dentry, NULL, NULL, 0, NULL);
 301 }
 302
 303 /*
 304  * evm_protect_xattr - protect the EVM extended attribute
 305  *
 306  * Prevent security.evm from being modified or removed without the
 307  * necessary permissions or when the existing value is invalid.
 308  *
 309  * The posix xattr acls are 'system' prefixed, which normally would not
 310  * affect security.evm.  An interesting side affect of writing posix xattr
 311  * acls is their modifying of the i_mode, which is included in security.evm.
 312  * For posix xattr acls only, permit security.evm, even if it currently
 313  * doesn't exist, to be updated unless the EVM signature is immutable.
 314  */
 315 static int evm_protect_xattr(struct dentry *dentry, const char *xattr_name,
 316                              const void *xattr_value, size_t xattr_value_len)
 317 {
 318         enum integrity_status evm_status;
 319
 320         if (strcmp(xattr_name, XATTR_NAME_EVM) == 0) {
 321                 if (!capable(CAP_SYS_ADMIN))
 322                         return -EPERM;
 323         } else if (!evm_protected_xattr(xattr_name)) {
 324                 if (!posix_xattr_acl(xattr_name))
 325                         return 0;
 326                 evm_status = evm_verify_current_integrity(dentry);
 327                 if ((evm_status == INTEGRITY_PASS) ||
 328                     (evm_status == INTEGRITY_NOXATTRS))
 329                         return 0;
 330                 goto out;
 331         }
 332
 333         evm_status = evm_verify_current_integrity(dentry);
 334         if (evm_status == INTEGRITY_NOXATTRS) {
 335                 struct integrity_iint_cache *iint;
 336
 337                 iint = integrity_iint_find(d_backing_inode(dentry));
 338                 if (iint && (iint->flags & IMA_NEW_FILE))
 339                         return 0;
 340
 341                 /* exception for pseudo filesystems */
 342                 if (dentry->d_sb->s_magic == TMPFS_MAGIC
 343                     || dentry->d_sb->s_magic == SYSFS_MAGIC)
 344                         return 0;
 345
 346                 integrity_audit_msg(AUDIT_INTEGRITY_METADATA,
 347                                     dentry->d_inode, dentry->d_name.name,
 348                                     "update_metadata",
 349                                     integrity_status_msg[evm_status],
 350                                     -EPERM, 0);
 351         }
 352 out:
 353         if (evm_status != INTEGRITY_PASS)
 354                 integrity_audit_msg(AUDIT_INTEGRITY_METADATA, d_backing_inode(dentry),
 355                                     dentry->d_name.name, "appraise_metadata",
 356                                     integrity_status_msg[evm_status],
 357                                     -EPERM, 0);
 358         return evm_status == INTEGRITY_PASS ? 0 : -EPERM;
 359 }
 360
 361 /**
 362  * evm_inode_setxattr - protect the EVM extended attribute
 363  * @dentry: pointer to the affected dentry
 364  * @xattr_name: pointer to the affected extended attribute name
 365  * @xattr_value: pointer to the new extended attribute value
 366  * @xattr_value_len: pointer to the new extended attribute value length
 367  *
 368  * Before allowing the 'security.evm' protected xattr to be updated,
 369  * verify the existing value is valid.  As only the kernel should have
 370  * access to the EVM encrypted key needed to calculate the HMAC, prevent
 371  * userspace from writing HMAC value.  Writing 'security.evm' requires
 372  * requires CAP_SYS_ADMIN privileges.
 373  */
 374 int evm_inode_setxattr(struct dentry *dentry, const char *xattr_name,
 375                        const void *xattr_value, size_t xattr_value_len)
 376 {
 377         const struct evm_ima_xattr_data *xattr_data = xattr_value;
 378
 379         /* Policy permits modification of the protected xattrs even though
 380          * there's no HMAC key loaded
 381          */
 382         if (evm_initialized & EVM_ALLOW_METADATA_WRITES)
 383                 return 0;
 384
 385         if (strcmp(xattr_name, XATTR_NAME_EVM) == 0) {
 386                 if (!xattr_value_len)
 387                         return -EINVAL;
 388                 if (xattr_data->type != EVM_IMA_XATTR_DIGSIG &&
 389                     xattr_data->type != EVM_XATTR_PORTABLE_DIGSIG)
 390                         return -EPERM;
 391         }
 392         return evm_protect_xattr(dentry, xattr_name, xattr_value,
 393                                  xattr_value_len);
 394 }
 395
 396 /**
 397  * evm_inode_removexattr - protect the EVM extended attribute
 398  * @dentry: pointer to the affected dentry
 399  * @xattr_name: pointer to the affected extended attribute name
 400  *
 401  * Removing 'security.evm' requires CAP_SYS_ADMIN privileges and that
 402  * the current value is valid.
 403  */
 404 int evm_inode_removexattr(struct dentry *dentry, const char *xattr_name)
 405 {
 406         /* Policy permits modification of the protected xattrs even though
 407          * there's no HMAC key loaded
 408          */
 409         if (evm_initialized & EVM_ALLOW_METADATA_WRITES)
 410                 return 0;
 411
 412         return evm_protect_xattr(dentry, xattr_name, NULL, 0);
 413 }
 414
 415 static void evm_reset_status(struct inode *inode)
 416 {
 417         struct integrity_iint_cache *iint;
 418
 419         iint = integrity_iint_find(inode);
 420         if (iint)
 421                 iint->evm_status = INTEGRITY_UNKNOWN;
 422 }
 423
 424 /**
 425  * evm_inode_post_setxattr - update 'security.evm' to reflect the changes
 426  * @dentry: pointer to the affected dentry
 427  * @xattr_name: pointer to the affected extended attribute name
 428  * @xattr_value: pointer to the new extended attribute value
 429  * @xattr_value_len: pointer to the new extended attribute value length
 430  *
 431  * Update the HMAC stored in 'security.evm' to reflect the change.
 432  *
 433  * No need to take the i_mutex lock here, as this function is called from
 434  * __vfs_setxattr_noperm().  The caller of which has taken the inode's
 435  * i_mutex lock.
 436  */
 437 void evm_inode_post_setxattr(struct dentry *dentry, const char *xattr_name,
 438                              const void *xattr_value, size_t xattr_value_len)
 439 {
 440         if (!evm_key_loaded() || (!evm_protected_xattr(xattr_name)
 441                                   && !posix_xattr_acl(xattr_name)))
 442                 return;
 443
 444         evm_reset_status(dentry->d_inode);
 445
 446         evm_update_evmxattr(dentry, xattr_name, xattr_value, xattr_value_len);
 447 }
 448
 449 /**
 450  * evm_inode_post_removexattr - update 'security.evm' after removing the xattr
 451  * @dentry: pointer to the affected dentry
 452  * @xattr_name: pointer to the affected extended attribute name
 453  *
 454  * Update the HMAC stored in 'security.evm' to reflect removal of the xattr.
 455  *
 456  * No need to take the i_mutex lock here, as this function is called from
 457  * vfs_removexattr() which takes the i_mutex.
 458  */
 459 void evm_inode_post_removexattr(struct dentry *dentry, const char *xattr_name)
 460 {
 461         if (!evm_key_loaded() || !evm_protected_xattr(xattr_name))
 462                 return;
 463
 464         evm_reset_status(dentry->d_inode);
 465
 466         evm_update_evmxattr(dentry, xattr_name, NULL, 0);
 467 }
 468
 469 /**
 470  * evm_inode_setattr - prevent updating an invalid EVM extended attribute
 471  * @dentry: pointer to the affected dentry
 472  *
 473  * Permit update of file attributes when files have a valid EVM signature,
 474  * except in the case of them having an immutable portable signature.
 475  */
 476 int evm_inode_setattr(struct dentry *dentry, struct iattr *attr)
 477 {
 478         unsigned int ia_valid = attr->ia_valid;
 479         enum integrity_status evm_status;
 480
 481         /* Policy permits modification of the protected attrs even though
 482          * there's no HMAC key loaded
 483          */
 484         if (evm_initialized & EVM_ALLOW_METADATA_WRITES)
 485                 return 0;
 486
 487         if (!(ia_valid & (ATTR_MODE | ATTR_UID | ATTR_GID)))
 488                 return 0;
 489         evm_status = evm_verify_current_integrity(dentry);
 490         if ((evm_status == INTEGRITY_PASS) ||
 491             (evm_status == INTEGRITY_NOXATTRS))
 492                 return 0;
 493         integrity_audit_msg(AUDIT_INTEGRITY_METADATA, d_backing_inode(dentry),
 494                             dentry->d_name.name, "appraise_metadata",
 495                             integrity_status_msg[evm_status], -EPERM, 0);
 496         return -EPERM;
 497 }
 498
 499 /**
 500  * evm_inode_post_setattr - update 'security.evm' after modifying metadata
 501  * @dentry: pointer to the affected dentry
 502  * @ia_valid: for the UID and GID status
 503  *
 504  * For now, update the HMAC stored in 'security.evm' to reflect UID/GID
 505  * changes.
 506  *
 507  * This function is called from notify_change(), which expects the caller
 508  * to lock the inode's i_mutex.
 509  */
 510 void evm_inode_post_setattr(struct dentry *dentry, int ia_valid)
 511 {
 512         if (!evm_key_loaded())
 513                 return;
 514
 515         if (ia_valid & (ATTR_MODE | ATTR_UID | ATTR_GID))
 516                 evm_update_evmxattr(dentry, NULL, NULL, 0);
 517 }
 518
 519 /*
 520  * evm_inode_init_security - initializes security.evm
 521  */
 522 int evm_inode_init_security(struct inode *inode,
 523                                  const struct xattr *lsm_xattr,
 524                                  struct xattr *evm_xattr)
 525 {
 526         struct evm_ima_xattr_data *xattr_data;
 527         int rc;
 528
 529         if (!evm_key_loaded() || !evm_protected_xattr(lsm_xattr->name))
 530                 return 0;
 531
 532         xattr_data = kzalloc(sizeof(*xattr_data), GFP_NOFS);
 533         if (!xattr_data)
 534                 return -ENOMEM;
 535
 536         xattr_data->type = EVM_XATTR_HMAC;
 537         rc = evm_init_hmac(inode, lsm_xattr, xattr_data->digest);
 538         if (rc < 0)
 539                 goto out;
 540
 541         evm_xattr->value = xattr_data;
 542         evm_xattr->value_len = sizeof(*xattr_data);
 543         evm_xattr->name = XATTR_EVM_SUFFIX;
 544         return 0;
 545 out:
 546         kfree(xattr_data);
 547         return rc;
 548 }
 549 EXPORT_SYMBOL_GPL(evm_inode_init_security);
 550
 551 #ifdef CONFIG_EVM_LOAD_X509
 552 void __init evm_load_x509(void)
 553 {
 554         int rc;
 555
 556         rc = integrity_load_x509(INTEGRITY_KEYRING_EVM, CONFIG_EVM_X509_PATH);
 557         if (!rc)
 558                 evm_initialized |= EVM_INIT_X509;
 559 }
 560 #endif
 561
 562 static int __init init_evm(void)
 563 {
 564         int error;
 565         struct list_head *pos, *q;
 566
 567         evm_init_config();
 568
 569         error = integrity_init_keyring(INTEGRITY_KEYRING_EVM);
 570         if (error)
 571                 goto error;
 572
 573         error = evm_init_secfs();
 574         if (error < 0) {
 575                 pr_info("Error registering secfs\n");
 576                 goto error;
 577         }
 578
 579 error:
 580         if (error != 0) {
 581                 if (!list_empty(&evm_config_xattrnames)) {
 582                         list_for_each_safe(pos, q, &evm_config_xattrnames)
 583                                 list_del(pos);
 584                 }
 585         }
 586
 587         return error;
 588 }
 589
 590 late_initcall(init_evm);