1 // SPDX-License-Identifier: GPL-2.0 2 /* 3 * Deliver z/VM CP special messages (SMSG) as uevents. 4 * 5 * The driver registers for z/VM CP special messages with the 6 * "APP" prefix. Incoming messages are delivered to user space 7 * as uevents. 8 * 9 * Copyright IBM Corp. 2010 10 * Author(s): Hendrik Brueckner <brueckner@linux.vnet.ibm.com> 11 * 12 */ 13 #define KMSG_COMPONENT "smsgiucv_app" 14 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt 15 16 #include <linux/ctype.h> 17 #include <linux/err.h> 18 #include <linux/device.h> 19 #include <linux/list.h> 20 #include <linux/kobject.h> 21 #include <linux/module.h> 22 #include <linux/slab.h> 23 #include <linux/spinlock.h> 24 #include <linux/workqueue.h> 25 #include <net/iucv/iucv.h> 26 #include "smsgiucv.h" 27 28 /* prefix used for SMSG registration */ 29 #define SMSG_PREFIX "APP" 30 31 /* SMSG related uevent environment variables */ 32 #define ENV_SENDER_STR "SMSG_SENDER=" 33 #define ENV_SENDER_LEN (strlen(ENV_SENDER_STR) + 8 + 1) 34 #define ENV_PREFIX_STR "SMSG_ID=" 35 #define ENV_PREFIX_LEN (strlen(ENV_PREFIX_STR) + \ 36 strlen(SMSG_PREFIX) + 1) 37 #define ENV_TEXT_STR "SMSG_TEXT=" 38 #define ENV_TEXT_LEN(msg) (strlen(ENV_TEXT_STR) + strlen((msg)) + 1) 39 40 /* z/VM user ID which is permitted to send SMSGs 41 * If the value is undefined or empty (""), special messages are 42 * accepted from any z/VM user ID. */ 43 static char *sender; 44 module_param(sender, charp, 0400); 45 MODULE_PARM_DESC(sender, "z/VM user ID from which CP SMSGs are accepted"); 46 47 /* SMSG device representation */ 48 static struct device *smsg_app_dev; 49 50 /* list element for queuing received messages for delivery */ 51 struct smsg_app_event { 52 struct list_head list; 53 char *buf; 54 char *envp[4]; 55 }; 56 57 /* queue for outgoing uevents */ 58 static LIST_HEAD(smsg_event_queue); 59 static DEFINE_SPINLOCK(smsg_event_queue_lock); 60 61 static void smsg_app_event_free(struct smsg_app_event *ev) 62 { 63 kfree(ev->buf); 64 kfree(ev); 65 } 66 67 static struct smsg_app_event *smsg_app_event_alloc(const char *from, 68 const char *msg) 69 { 70 struct smsg_app_event *ev; 71 72 ev = kzalloc(sizeof(*ev), GFP_ATOMIC); 73 if (!ev) 74 return NULL; 75 76 ev->buf = kzalloc(ENV_SENDER_LEN + ENV_PREFIX_LEN + 77 ENV_TEXT_LEN(msg), GFP_ATOMIC); 78 if (!ev->buf) { 79 kfree(ev); 80 return NULL; 81 } 82 83 /* setting up environment pointers into buf */ 84 ev->envp[0] = ev->buf; 85 ev->envp[1] = ev->envp[0] + ENV_SENDER_LEN; 86 ev->envp[2] = ev->envp[1] + ENV_PREFIX_LEN; 87 ev->envp[3] = NULL; 88 89 /* setting up environment: sender, prefix name, and message text */ 90 snprintf(ev->envp[0], ENV_SENDER_LEN, ENV_SENDER_STR "%s", from); 91 snprintf(ev->envp[1], ENV_PREFIX_LEN, ENV_PREFIX_STR "%s", SMSG_PREFIX); 92 snprintf(ev->envp[2], ENV_TEXT_LEN(msg), ENV_TEXT_STR "%s", msg); 93 94 return ev; 95 } 96 97 static void smsg_event_work_fn(struct work_struct *work) 98 { 99 LIST_HEAD(event_queue); 100 struct smsg_app_event *p, *n; 101 struct device *dev; 102 103 dev = get_device(smsg_app_dev); 104 if (!dev) 105 return; 106 107 spin_lock_bh(&smsg_event_queue_lock); 108 list_splice_init(&smsg_event_queue, &event_queue); 109 spin_unlock_bh(&smsg_event_queue_lock); 110 111 list_for_each_entry_safe(p, n, &event_queue, list) { 112 list_del(&p->list); 113 kobject_uevent_env(&dev->kobj, KOBJ_CHANGE, p->envp); 114 smsg_app_event_free(p); 115 } 116 117 put_device(dev); 118 } 119 static DECLARE_WORK(smsg_event_work, smsg_event_work_fn); 120 121 static void smsg_app_callback(const char *from, char *msg) 122 { 123 struct smsg_app_event *se; 124 125 /* check if the originating z/VM user ID matches 126 * the configured sender. */ 127 if (sender && strlen(sender) > 0 && strcmp(from, sender) != 0) 128 return; 129 130 /* get start of message text (skip prefix and leading blanks) */ 131 msg += strlen(SMSG_PREFIX); 132 while (*msg && isspace(*msg)) 133 msg++; 134 if (*msg == '\0') 135 return; 136 137 /* allocate event list element and its environment */ 138 se = smsg_app_event_alloc(from, msg); 139 if (!se) 140 return; 141 142 /* queue event and schedule work function */ 143 spin_lock(&smsg_event_queue_lock); 144 list_add_tail(&se->list, &smsg_event_queue); 145 spin_unlock(&smsg_event_queue_lock); 146 147 schedule_work(&smsg_event_work); 148 return; 149 } 150 151 static int __init smsgiucv_app_init(void) 152 { 153 struct device_driver *smsgiucv_drv; 154 int rc; 155 156 if (!MACHINE_IS_VM) 157 return -ENODEV; 158 159 smsg_app_dev = kzalloc(sizeof(*smsg_app_dev), GFP_KERNEL); 160 if (!smsg_app_dev) 161 return -ENOMEM; 162 163 smsgiucv_drv = driver_find(SMSGIUCV_DRV_NAME, &iucv_bus); 164 if (!smsgiucv_drv) { 165 kfree(smsg_app_dev); 166 return -ENODEV; 167 } 168 169 rc = dev_set_name(smsg_app_dev, KMSG_COMPONENT); 170 if (rc) { 171 kfree(smsg_app_dev); 172 goto fail; 173 } 174 smsg_app_dev->bus = &iucv_bus; 175 smsg_app_dev->parent = iucv_root; 176 smsg_app_dev->release = (void (*)(struct device *)) kfree; 177 smsg_app_dev->driver = smsgiucv_drv; 178 rc = device_register(smsg_app_dev); 179 if (rc) { 180 put_device(smsg_app_dev); 181 goto fail; 182 } 183 184 /* convert sender to uppercase characters */ 185 if (sender) { 186 int len = strlen(sender); 187 while (len--) 188 sender[len] = toupper(sender[len]); 189 } 190 191 /* register with the smsgiucv device driver */ 192 rc = smsg_register_callback(SMSG_PREFIX, smsg_app_callback); 193 if (rc) { 194 device_unregister(smsg_app_dev); 195 goto fail; 196 } 197 198 rc = 0; 199 fail: 200 return rc; 201 } 202 module_init(smsgiucv_app_init); 203 204 static void __exit smsgiucv_app_exit(void) 205 { 206 /* unregister callback */ 207 smsg_unregister_callback(SMSG_PREFIX, smsg_app_callback); 208 209 /* cancel pending work and flush any queued event work */ 210 cancel_work_sync(&smsg_event_work); 211 smsg_event_work_fn(&smsg_event_work); 212 213 device_unregister(smsg_app_dev); 214 } 215 module_exit(smsgiucv_app_exit); 216 217 MODULE_LICENSE("GPL v2"); 218 MODULE_DESCRIPTION("Deliver z/VM CP SMSG as uevents"); 219 MODULE_AUTHOR("Hendrik Brueckner <brueckner@linux.vnet.ibm.com>"); 220