2 * IUCV special message driver
4 * Copyright IBM Corp. 2003, 2009
6 * Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com)
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; either version 2, or (at your option)
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 #include <linux/module.h>
24 #include <linux/init.h>
25 #include <linux/errno.h>
26 #include <linux/device.h>
27 #include <linux/slab.h>
28 #include <net/iucv/iucv.h>
29 #include <asm/cpcmd.h>
30 #include <asm/ebcdic.h>
33 struct smsg_callback {
34 struct list_head list;
37 void (*callback)(const char *from, char *str);
41 ("(C) 2003 IBM Corporation by Martin Schwidefsky (schwidefsky@de.ibm.com)");
42 MODULE_DESCRIPTION ("Linux for S/390 IUCV special message driver");
44 static struct iucv_path *smsg_path;
45 /* dummy device used as trigger for PM functions */
46 static struct device *smsg_dev;
48 static DEFINE_SPINLOCK(smsg_list_lock);
49 static LIST_HEAD(smsg_list);
51 static int smsg_path_pending(struct iucv_path *, u8 ipvmid[8], u8 ipuser[16]);
52 static void smsg_message_pending(struct iucv_path *, struct iucv_message *);
54 static struct iucv_handler smsg_handler = {
55 .path_pending = smsg_path_pending,
56 .message_pending = smsg_message_pending,
59 static int smsg_path_pending(struct iucv_path *path, u8 ipvmid[8],
62 if (strncmp(ipvmid, "*MSG ", sizeof(ipvmid)) != 0)
64 /* Path pending from *MSG. */
65 return iucv_path_accept(path, &smsg_handler, "SMSGIUCV ", NULL);
68 static void smsg_message_pending(struct iucv_path *path,
69 struct iucv_message *msg)
71 struct smsg_callback *cb;
72 unsigned char *buffer;
73 unsigned char sender[9];
76 buffer = kmalloc(msg->length + 1, GFP_ATOMIC | GFP_DMA);
78 iucv_message_reject(path, msg);
81 rc = iucv_message_receive(path, msg, 0, buffer, msg->length, NULL);
83 buffer[msg->length] = 0;
84 EBCASC(buffer, msg->length);
85 memcpy(sender, buffer, 8);
87 /* Remove trailing whitespace from the sender name. */
88 for (i = 7; i >= 0; i--) {
89 if (sender[i] != ' ' && sender[i] != '\t')
93 spin_lock(&smsg_list_lock);
94 list_for_each_entry(cb, &smsg_list, list)
95 if (strncmp(buffer + 8, cb->prefix, cb->len) == 0) {
96 cb->callback(sender, buffer + 8);
99 spin_unlock(&smsg_list_lock);
104 int smsg_register_callback(const char *prefix,
105 void (*callback)(const char *from, char *str))
107 struct smsg_callback *cb;
109 cb = kmalloc(sizeof(struct smsg_callback), GFP_KERNEL);
113 cb->len = strlen(prefix);
114 cb->callback = callback;
115 spin_lock_bh(&smsg_list_lock);
116 list_add_tail(&cb->list, &smsg_list);
117 spin_unlock_bh(&smsg_list_lock);
121 void smsg_unregister_callback(const char *prefix,
122 void (*callback)(const char *from,
125 struct smsg_callback *cb, *tmp;
127 spin_lock_bh(&smsg_list_lock);
129 list_for_each_entry(tmp, &smsg_list, list)
130 if (tmp->callback == callback &&
131 strcmp(tmp->prefix, prefix) == 0) {
136 spin_unlock_bh(&smsg_list_lock);
140 static int smsg_pm_freeze(struct device *dev)
142 #ifdef CONFIG_PM_DEBUG
143 printk(KERN_WARNING "smsg_pm_freeze\n");
146 iucv_path_sever(smsg_path, NULL);
150 static int smsg_pm_restore_thaw(struct device *dev)
154 #ifdef CONFIG_PM_DEBUG
155 printk(KERN_WARNING "smsg_pm_restore_thaw\n");
158 memset(smsg_path, 0, sizeof(*smsg_path));
159 smsg_path->msglim = 255;
160 smsg_path->flags = 0;
161 rc = iucv_path_connect(smsg_path, &smsg_handler, "*MSG ",
163 #ifdef CONFIG_PM_DEBUG
166 "iucv_path_connect returned with rc %i\n", rc);
168 cpcmd("SET SMSG IUCV", NULL, 0, NULL);
173 static const struct dev_pm_ops smsg_pm_ops = {
174 .freeze = smsg_pm_freeze,
175 .thaw = smsg_pm_restore_thaw,
176 .restore = smsg_pm_restore_thaw,
179 static struct device_driver smsg_driver = {
180 .owner = THIS_MODULE,
181 .name = SMSGIUCV_DRV_NAME,
186 static void __exit smsg_exit(void)
188 cpcmd("SET SMSG IUCV", NULL, 0, NULL);
189 device_unregister(smsg_dev);
190 iucv_unregister(&smsg_handler, 1);
191 driver_unregister(&smsg_driver);
194 static int __init smsg_init(void)
198 if (!MACHINE_IS_VM) {
199 rc = -EPROTONOSUPPORT;
202 rc = driver_register(&smsg_driver);
205 rc = iucv_register(&smsg_handler, 1);
208 smsg_path = iucv_path_alloc(255, 0, GFP_KERNEL);
213 rc = iucv_path_connect(smsg_path, &smsg_handler, "*MSG ",
217 smsg_dev = kzalloc(sizeof(struct device), GFP_KERNEL);
222 dev_set_name(smsg_dev, "smsg_iucv");
223 smsg_dev->bus = &iucv_bus;
224 smsg_dev->parent = iucv_root;
225 smsg_dev->release = (void (*)(struct device *))kfree;
226 smsg_dev->driver = &smsg_driver;
227 rc = device_register(smsg_dev);
231 cpcmd("SET SMSG IUCV", NULL, 0, NULL);
235 put_device(smsg_dev);
237 iucv_path_free(smsg_path);
240 iucv_unregister(&smsg_handler, 1);
242 driver_unregister(&smsg_driver);
247 module_init(smsg_init);
248 module_exit(smsg_exit);
249 MODULE_LICENSE("GPL");
251 EXPORT_SYMBOL(smsg_register_callback);
252 EXPORT_SYMBOL(smsg_unregister_callback);