lustre/ptlrpc/gss/lproc_gss.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.gnu.org/licenses/gpl-2.0.html
  19  *
  20  * GPL HEADER END
  21  */
  22 /*
  23  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Use is subject to license terms.
  25  *
  26  * Copyright (c) 2012, 2016, Intel Corporation.
  27  */
  28 /*
  29  * This file is part of Lustre, http://www.lustre.org/
  30  * Lustre is a trademark of Sun Microsystems, Inc.
  31  */
  32
  33 #define DEBUG_SUBSYSTEM S_SEC
  34 #include <linux/init.h>
  35 #include <linux/module.h>
  36 #include <linux/slab.h>
  37 #include <linux/dcache.h>
  38 #include <linux/fs.h>
  39 #include <linux/mutex.h>
  40
  41 #include <obd.h>
  42 #include <obd_class.h>
  43 #include <obd_support.h>
  44 #include <lustre_net.h>
  45 #include <lustre_import.h>
  46 #include <lprocfs_status.h>
  47 #include <lustre_sec.h>
  48
  49 #include "gss_err.h"
  50 #include "gss_internal.h"
  51 #include "gss_api.h"
  52
  53 static struct dentry *gss_debugfs_dir_lk;
  54 static struct dentry *gss_debugfs_dir;
  55 static struct proc_dir_entry *gss_lprocfs_dir;
  56
  57 /*
  58  * statistic of "out-of-sequence-window"
  59  */
  60 static struct {
  61         spinlock_t      oos_lock;
  62         atomic_t        oos_cli_count;          /* client occurrence */
  63         int             oos_cli_behind;         /* client max seqs behind */
  64         atomic_t        oos_svc_replay[3];      /* server replay detected */
  65         atomic_t        oos_svc_pass[3];        /* server verified ok */
  66 } gss_stat_oos = {
  67         .oos_cli_count  = ATOMIC_INIT(0),
  68         .oos_cli_behind = 0,
  69         .oos_svc_replay = { ATOMIC_INIT(0), },
  70         .oos_svc_pass   = { ATOMIC_INIT(0), },
  71 };
  72
  73 void gss_stat_oos_record_cli(int behind)
  74 {
  75         atomic_inc(&gss_stat_oos.oos_cli_count);
  76
  77         spin_lock(&gss_stat_oos.oos_lock);
  78         if (behind > gss_stat_oos.oos_cli_behind)
  79                 gss_stat_oos.oos_cli_behind = behind;
  80         spin_unlock(&gss_stat_oos.oos_lock);
  81 }
  82
  83 void gss_stat_oos_record_svc(int phase, int replay)
  84 {
  85         LASSERT(phase >= 0 && phase <= 2);
  86
  87         if (replay)
  88                 atomic_inc(&gss_stat_oos.oos_svc_replay[phase]);
  89         else
  90                 atomic_inc(&gss_stat_oos.oos_svc_pass[phase]);
  91 }
  92
  93 static int gss_proc_oos_seq_show(struct seq_file *m, void *v)
  94 {
  95         seq_printf(m, "seqwin:             %u\n"
  96                    "backwin:            %u\n"
  97                    "client fall behind seqwin\n"
  98                    "  occurrence:       %d\n"
  99                    "  max seq behind:   %d\n"
 100                    "server replay detected:\n"
 101                    "  phase 0:          %d\n"
 102                    "  phase 1:          %d\n"
 103                    "  phase 2:          %d\n"
 104                    "server verify ok:\n"
 105                    "  phase 2:          %d\n",
 106                    GSS_SEQ_WIN_MAIN,
 107                    GSS_SEQ_WIN_BACK,
 108                    atomic_read(&gss_stat_oos.oos_cli_count),
 109                    gss_stat_oos.oos_cli_behind,
 110                    atomic_read(&gss_stat_oos.oos_svc_replay[0]),
 111                    atomic_read(&gss_stat_oos.oos_svc_replay[1]),
 112                    atomic_read(&gss_stat_oos.oos_svc_replay[2]),
 113                    atomic_read(&gss_stat_oos.oos_svc_pass[2]));
 114         return 0;
 115 }
 116 LDEBUGFS_SEQ_FOPS_RO(gss_proc_oos);
 117
 118 static ssize_t
 119 gss_proc_write_secinit(struct file *file, const char *buffer,
 120                                   size_t count, loff_t *off)
 121 {
 122         int rc;
 123
 124         rc = gss_do_ctx_init_rpc((char *) buffer, count);
 125         if (rc) {
 126                 LASSERT(rc < 0);
 127                 return rc;
 128         }
 129         return count;
 130 }
 131
 132 static const struct file_operations gss_proc_secinit = {
 133         .write = gss_proc_write_secinit,
 134 };
 135
 136 int sptlrpc_krb5_allow_old_client_csum_seq_show(struct seq_file *m, void *data)
 137 {
 138         seq_printf(m, "%u\n", krb5_allow_old_client_csum);
 139         return 0;
 140 }
 141
 142 ssize_t sptlrpc_krb5_allow_old_client_csum_seq_write(struct file *file,
 143                                                      const char __user *buffer,
 144                                                      size_t count, loff_t *off)
 145 {
 146         bool val;
 147         int rc;
 148
 149         rc = kstrtobool_from_user(buffer, count, &val);
 150         if (rc)
 151                 return rc;
 152
 153         krb5_allow_old_client_csum = val;
 154         return count;
 155 }
 156 LPROC_SEQ_FOPS(sptlrpc_krb5_allow_old_client_csum);
 157
 158 static struct lprocfs_vars gss_debugfs_vars[] = {
 159         { .name =       "replays",
 160           .fops =       &gss_proc_oos_fops      },
 161         { .name =       "init_channel",
 162           .fops =       &gss_proc_secinit,
 163           .proc_mode =  0222                    },
 164         { NULL }
 165 };
 166
 167 static struct lprocfs_vars gss_lprocfs_vars[] = {
 168         { .name =       "krb5_allow_old_client_csum",
 169           .fops =       &sptlrpc_krb5_allow_old_client_csum_fops },
 170         { NULL }
 171 };
 172
 173 /*
 174  * for userspace helper lgss_keyring.
 175  *
 176  * debug_level: [0, 4], defined in utils/gss/lgss_utils.h
 177  */
 178 static int gss_lk_debug_level = 1;
 179
 180 static int gss_lk_proc_dl_seq_show(struct seq_file *m, void *v)
 181 {
 182         seq_printf(m, "%u\n", gss_lk_debug_level);
 183         return 0;
 184 }
 185
 186 static ssize_t
 187 gss_lk_proc_dl_seq_write(struct file *file, const char __user *buffer,
 188                                 size_t count, loff_t *off)
 189 {
 190         unsigned int val;
 191         int rc;
 192
 193         rc = kstrtouint_from_user(buffer, count, 0, &val);
 194         if (rc < 0)
 195                 return rc;
 196
 197         if (val > 4)
 198                 return -ERANGE;
 199
 200         gss_lk_debug_level = val;
 201
 202         return count;
 203 }
 204 LDEBUGFS_SEQ_FOPS(gss_lk_proc_dl);
 205
 206 static struct lprocfs_vars gss_lk_debugfs_vars[] = {
 207         { .name =       "debug_level",
 208           .fops =       &gss_lk_proc_dl_fops    },
 209         { NULL }
 210 };
 211
 212 void gss_exit_tunables(void)
 213 {
 214         if (!IS_ERR_OR_NULL(gss_debugfs_dir_lk))
 215                 ldebugfs_remove(&gss_debugfs_dir_lk);
 216
 217         if (!IS_ERR_OR_NULL(gss_debugfs_dir))
 218                 ldebugfs_remove(&gss_debugfs_dir);
 219
 220         if (!IS_ERR_OR_NULL(gss_lprocfs_dir))
 221                 lprocfs_remove(&gss_lprocfs_dir);
 222 }
 223
 224 int gss_init_tunables(void)
 225 {
 226         int     rc;
 227
 228         spin_lock_init(&gss_stat_oos.oos_lock);
 229
 230         gss_debugfs_dir = ldebugfs_register("gss", sptlrpc_debugfs_dir,
 231                                             gss_debugfs_vars, NULL);
 232         if (IS_ERR_OR_NULL(gss_debugfs_dir)) {
 233                 rc = gss_debugfs_dir ? PTR_ERR(gss_debugfs_dir) : -ENOMEM;
 234                 gss_debugfs_dir = NULL;
 235                 GOTO(out, rc);
 236         }
 237
 238         gss_debugfs_dir_lk = ldebugfs_register("lgss_keyring", gss_debugfs_dir,
 239                                                gss_lk_debugfs_vars, NULL);
 240         if (IS_ERR(gss_debugfs_dir_lk)) {
 241                 rc = gss_debugfs_dir_lk ? PTR_ERR(gss_debugfs_dir_lk)
 242                                           : -ENOMEM;
 243                 gss_debugfs_dir_lk = NULL;
 244                 GOTO(out, rc);
 245         }
 246
 247         gss_lprocfs_dir = lprocfs_register("gss", sptlrpc_lprocfs_dir,
 248                                            gss_lprocfs_vars, NULL);
 249         if (IS_ERR_OR_NULL(gss_lprocfs_dir)) {
 250                 rc = gss_lprocfs_dir ? PTR_ERR(gss_lprocfs_dir) : -ENOMEM;
 251                 gss_lprocfs_dir = NULL;
 252                 GOTO(out, rc);
 253         }
 254
 255         return 0;
 256
 257 out:
 258         CERROR("failed to initialize gss lproc entries: %d\n", rc);
 259         gss_exit_tunables();
 260         return rc;
 261 }