2005-04-16 22:20:36 +00:00
|
|
|
/*
|
|
|
|
* Character device driver for reading z/VM *MONITOR service records.
|
|
|
|
*
|
2009-06-16 08:30:50 +00:00
|
|
|
* Copyright IBM Corp. 2004, 2009
|
|
|
|
*
|
|
|
|
* Author: Gerald Schaefer <gerald.schaefer@de.ibm.com>
|
2005-04-16 22:20:36 +00:00
|
|
|
*/
|
|
|
|
|
2008-12-25 12:39:42 +00:00
|
|
|
#define KMSG_COMPONENT "monreader"
|
|
|
|
#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
#include <linux/module.h>
|
|
|
|
#include <linux/moduleparam.h>
|
|
|
|
#include <linux/init.h>
|
|
|
|
#include <linux/errno.h>
|
|
|
|
#include <linux/types.h>
|
|
|
|
#include <linux/kernel.h>
|
|
|
|
#include <linux/miscdevice.h>
|
|
|
|
#include <linux/ctype.h>
|
|
|
|
#include <linux/spinlock.h>
|
|
|
|
#include <linux/interrupt.h>
|
2008-07-14 07:59:35 +00:00
|
|
|
#include <linux/poll.h>
|
2009-06-16 08:30:50 +00:00
|
|
|
#include <linux/device.h>
|
include cleanup: Update gfp.h and slab.h includes to prepare for breaking implicit slab.h inclusion from percpu.h
percpu.h is included by sched.h and module.h and thus ends up being
included when building most .c files. percpu.h includes slab.h which
in turn includes gfp.h making everything defined by the two files
universally available and complicating inclusion dependencies.
percpu.h -> slab.h dependency is about to be removed. Prepare for
this change by updating users of gfp and slab facilities include those
headers directly instead of assuming availability. As this conversion
needs to touch large number of source files, the following script is
used as the basis of conversion.
http://userweb.kernel.org/~tj/misc/slabh-sweep.py
The script does the followings.
* Scan files for gfp and slab usages and update includes such that
only the necessary includes are there. ie. if only gfp is used,
gfp.h, if slab is used, slab.h.
* When the script inserts a new include, it looks at the include
blocks and try to put the new include such that its order conforms
to its surrounding. It's put in the include block which contains
core kernel includes, in the same order that the rest are ordered -
alphabetical, Christmas tree, rev-Xmas-tree or at the end if there
doesn't seem to be any matching order.
* If the script can't find a place to put a new include (mostly
because the file doesn't have fitting include block), it prints out
an error message indicating which .h file needs to be added to the
file.
The conversion was done in the following steps.
1. The initial automatic conversion of all .c files updated slightly
over 4000 files, deleting around 700 includes and adding ~480 gfp.h
and ~3000 slab.h inclusions. The script emitted errors for ~400
files.
2. Each error was manually checked. Some didn't need the inclusion,
some needed manual addition while adding it to implementation .h or
embedding .c file was more appropriate for others. This step added
inclusions to around 150 files.
3. The script was run again and the output was compared to the edits
from #2 to make sure no file was left behind.
4. Several build tests were done and a couple of problems were fixed.
e.g. lib/decompress_*.c used malloc/free() wrappers around slab
APIs requiring slab.h to be added manually.
5. The script was run on all .h files but without automatically
editing them as sprinkling gfp.h and slab.h inclusions around .h
files could easily lead to inclusion dependency hell. Most gfp.h
inclusion directives were ignored as stuff from gfp.h was usually
wildly available and often used in preprocessor macros. Each
slab.h inclusion directive was examined and added manually as
necessary.
6. percpu.h was updated not to include slab.h.
7. Build test were done on the following configurations and failures
were fixed. CONFIG_GCOV_KERNEL was turned off for all tests (as my
distributed build env didn't work with gcov compiles) and a few
more options had to be turned off depending on archs to make things
build (like ipr on powerpc/64 which failed due to missing writeq).
* x86 and x86_64 UP and SMP allmodconfig and a custom test config.
* powerpc and powerpc64 SMP allmodconfig
* sparc and sparc64 SMP allmodconfig
* ia64 SMP allmodconfig
* s390 SMP allmodconfig
* alpha SMP allmodconfig
* um on x86_64 SMP allmodconfig
8. percpu.h modifications were reverted so that it could be applied as
a separate patch and serve as bisection point.
Given the fact that I had only a couple of failures from tests on step
6, I'm fairly confident about the coverage of this conversion patch.
If there is a breakage, it's likely to be something in one of the arch
headers which should be easily discoverable easily on most builds of
the specific arch.
Signed-off-by: Tejun Heo <tj@kernel.org>
Guess-its-ok-by: Christoph Lameter <cl@linux-foundation.org>
Cc: Ingo Molnar <mingo@redhat.com>
Cc: Lee Schermerhorn <Lee.Schermerhorn@hp.com>
2010-03-24 08:04:11 +00:00
|
|
|
#include <linux/slab.h>
|
2008-07-14 07:59:35 +00:00
|
|
|
#include <net/iucv/iucv.h>
|
2005-04-16 22:20:36 +00:00
|
|
|
#include <asm/uaccess.h>
|
|
|
|
#include <asm/ebcdic.h>
|
|
|
|
#include <asm/extmem.h>
|
|
|
|
|
|
|
|
|
|
|
|
#define MON_COLLECT_SAMPLE 0x80
|
|
|
|
#define MON_COLLECT_EVENT 0x40
|
|
|
|
#define MON_SERVICE "*MONITOR"
|
|
|
|
#define MON_IN_USE 0x01
|
|
|
|
#define MON_MSGLIM 255
|
|
|
|
|
|
|
|
static char mon_dcss_name[9] = "MONDCSS\0";
|
|
|
|
|
|
|
|
struct mon_msg {
|
|
|
|
u32 pos;
|
|
|
|
u32 mca_offset;
|
2007-02-08 21:38:11 +00:00
|
|
|
struct iucv_message msg;
|
2005-04-16 22:20:36 +00:00
|
|
|
char msglim_reached;
|
|
|
|
char replied_msglim;
|
|
|
|
};
|
|
|
|
|
|
|
|
struct mon_private {
|
2007-02-08 21:38:11 +00:00
|
|
|
struct iucv_path *path;
|
2005-04-16 22:20:36 +00:00
|
|
|
struct mon_msg *msg_array[MON_MSGLIM];
|
|
|
|
unsigned int write_index;
|
|
|
|
unsigned int read_index;
|
|
|
|
atomic_t msglim_count;
|
|
|
|
atomic_t read_ready;
|
|
|
|
atomic_t iucv_connected;
|
|
|
|
atomic_t iucv_severed;
|
|
|
|
};
|
|
|
|
|
|
|
|
static unsigned long mon_in_use = 0;
|
|
|
|
|
|
|
|
static unsigned long mon_dcss_start;
|
|
|
|
static unsigned long mon_dcss_end;
|
|
|
|
|
|
|
|
static DECLARE_WAIT_QUEUE_HEAD(mon_read_wait_queue);
|
|
|
|
static DECLARE_WAIT_QUEUE_HEAD(mon_conn_wait_queue);
|
|
|
|
|
|
|
|
static u8 user_data_connect[16] = {
|
|
|
|
/* Version code, must be 0x01 for shared mode */
|
|
|
|
0x01,
|
|
|
|
/* what to collect */
|
|
|
|
MON_COLLECT_SAMPLE | MON_COLLECT_EVENT,
|
|
|
|
/* DCSS name in EBCDIC, 8 bytes padded with blanks */
|
|
|
|
0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
|
|
|
|
0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
|
|
|
|
};
|
|
|
|
|
|
|
|
static u8 user_data_sever[16] = {
|
|
|
|
0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
|
|
|
|
0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
|
|
|
|
};
|
|
|
|
|
2009-06-16 08:30:50 +00:00
|
|
|
static struct device *monreader_device;
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
/******************************************************************************
|
|
|
|
* helper functions *
|
|
|
|
*****************************************************************************/
|
|
|
|
/*
|
|
|
|
* Create the 8 bytes EBCDIC DCSS segment name from
|
|
|
|
* an ASCII name, incl. padding
|
|
|
|
*/
|
2007-05-10 13:45:44 +00:00
|
|
|
static void dcss_mkname(char *ascii_name, char *ebcdic_name)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
|
|
|
for (i = 0; i < 8; i++) {
|
|
|
|
if (ascii_name[i] == '\0')
|
|
|
|
break;
|
|
|
|
ebcdic_name[i] = toupper(ascii_name[i]);
|
|
|
|
};
|
|
|
|
for (; i < 8; i++)
|
|
|
|
ebcdic_name[i] = ' ';
|
|
|
|
ASCEBC(ebcdic_name, 8);
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static inline unsigned long mon_mca_start(struct mon_msg *monmsg)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
2007-02-08 21:38:11 +00:00
|
|
|
return *(u32 *) &monmsg->msg.rmmsg;
|
2005-04-16 22:20:36 +00:00
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static inline unsigned long mon_mca_end(struct mon_msg *monmsg)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
2007-02-08 21:38:11 +00:00
|
|
|
return *(u32 *) &monmsg->msg.rmmsg[4];
|
2005-04-16 22:20:36 +00:00
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static inline u8 mon_mca_type(struct mon_msg *monmsg, u8 index)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
return *((u8 *) mon_mca_start(monmsg) + monmsg->mca_offset + index);
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static inline u32 mon_mca_size(struct mon_msg *monmsg)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
return mon_mca_end(monmsg) - mon_mca_start(monmsg) + 1;
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static inline u32 mon_rec_start(struct mon_msg *monmsg)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
return *((u32 *) (mon_mca_start(monmsg) + monmsg->mca_offset + 4));
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static inline u32 mon_rec_end(struct mon_msg *monmsg)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
return *((u32 *) (mon_mca_start(monmsg) + monmsg->mca_offset + 8));
|
|
|
|
}
|
|
|
|
|
2007-05-10 13:45:44 +00:00
|
|
|
static int mon_check_mca(struct mon_msg *monmsg)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
if ((mon_rec_end(monmsg) <= mon_rec_start(monmsg)) ||
|
|
|
|
(mon_rec_start(monmsg) < mon_dcss_start) ||
|
|
|
|
(mon_rec_end(monmsg) > mon_dcss_end) ||
|
|
|
|
(mon_mca_type(monmsg, 0) == 0) ||
|
|
|
|
(mon_mca_size(monmsg) % 12 != 0) ||
|
|
|
|
(mon_mca_end(monmsg) <= mon_mca_start(monmsg)) ||
|
|
|
|
(mon_mca_end(monmsg) > mon_dcss_end) ||
|
|
|
|
(mon_mca_start(monmsg) < mon_dcss_start) ||
|
|
|
|
((mon_mca_type(monmsg, 1) == 0) && (mon_mca_type(monmsg, 2) == 0)))
|
|
|
|
return -EINVAL;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2007-05-10 13:45:44 +00:00
|
|
|
static int mon_send_reply(struct mon_msg *monmsg,
|
|
|
|
struct mon_private *monpriv)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
int rc;
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
rc = iucv_message_reply(monpriv->path, &monmsg->msg,
|
|
|
|
IUCV_IPRMDATA, NULL, 0);
|
2005-04-16 22:20:36 +00:00
|
|
|
atomic_dec(&monpriv->msglim_count);
|
|
|
|
if (likely(!monmsg->msglim_reached)) {
|
|
|
|
monmsg->pos = 0;
|
|
|
|
monmsg->mca_offset = 0;
|
|
|
|
monpriv->read_index = (monpriv->read_index + 1) %
|
|
|
|
MON_MSGLIM;
|
|
|
|
atomic_dec(&monpriv->read_ready);
|
|
|
|
} else
|
|
|
|
monmsg->replied_msglim = 1;
|
|
|
|
if (rc) {
|
2008-12-25 12:39:42 +00:00
|
|
|
pr_err("Reading monitor data failed with rc=%i\n", rc);
|
2005-04-16 22:20:36 +00:00
|
|
|
return -EIO;
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2007-05-10 13:45:44 +00:00
|
|
|
static void mon_free_mem(struct mon_private *monpriv)
|
2007-02-08 21:38:11 +00:00
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
|
|
|
for (i = 0; i < MON_MSGLIM; i++)
|
|
|
|
if (monpriv->msg_array[i])
|
|
|
|
kfree(monpriv->msg_array[i]);
|
|
|
|
kfree(monpriv);
|
|
|
|
}
|
|
|
|
|
2007-05-10 13:45:44 +00:00
|
|
|
static struct mon_private *mon_alloc_mem(void)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
2007-02-08 21:38:11 +00:00
|
|
|
int i;
|
2005-04-16 22:20:36 +00:00
|
|
|
struct mon_private *monpriv;
|
|
|
|
|
2006-03-24 11:15:31 +00:00
|
|
|
monpriv = kzalloc(sizeof(struct mon_private), GFP_KERNEL);
|
2008-07-14 07:59:35 +00:00
|
|
|
if (!monpriv)
|
2005-04-16 22:20:36 +00:00
|
|
|
return NULL;
|
|
|
|
for (i = 0; i < MON_MSGLIM; i++) {
|
2006-03-24 11:15:31 +00:00
|
|
|
monpriv->msg_array[i] = kzalloc(sizeof(struct mon_msg),
|
2005-04-16 22:20:36 +00:00
|
|
|
GFP_KERNEL);
|
|
|
|
if (!monpriv->msg_array[i]) {
|
2007-02-08 21:38:11 +00:00
|
|
|
mon_free_mem(monpriv);
|
2005-04-16 22:20:36 +00:00
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return monpriv;
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static inline void mon_next_mca(struct mon_msg *monmsg)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
if (likely((mon_mca_size(monmsg) - monmsg->mca_offset) == 12))
|
|
|
|
return;
|
|
|
|
monmsg->mca_offset += 12;
|
|
|
|
monmsg->pos = 0;
|
|
|
|
}
|
|
|
|
|
2007-05-10 13:45:44 +00:00
|
|
|
static struct mon_msg *mon_next_message(struct mon_private *monpriv)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
struct mon_msg *monmsg;
|
|
|
|
|
|
|
|
if (!atomic_read(&monpriv->read_ready))
|
|
|
|
return NULL;
|
|
|
|
monmsg = monpriv->msg_array[monpriv->read_index];
|
|
|
|
if (unlikely(monmsg->replied_msglim)) {
|
|
|
|
monmsg->replied_msglim = 0;
|
|
|
|
monmsg->msglim_reached = 0;
|
|
|
|
monmsg->pos = 0;
|
|
|
|
monmsg->mca_offset = 0;
|
|
|
|
monpriv->read_index = (monpriv->read_index + 1) %
|
|
|
|
MON_MSGLIM;
|
|
|
|
atomic_dec(&monpriv->read_ready);
|
|
|
|
return ERR_PTR(-EOVERFLOW);
|
|
|
|
}
|
|
|
|
return monmsg;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/******************************************************************************
|
|
|
|
* IUCV handler *
|
|
|
|
*****************************************************************************/
|
2007-02-08 21:38:11 +00:00
|
|
|
static void mon_iucv_path_complete(struct iucv_path *path, u8 ipuser[16])
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
2007-02-08 21:38:11 +00:00
|
|
|
struct mon_private *monpriv = path->private;
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
atomic_set(&monpriv->iucv_connected, 1);
|
|
|
|
wake_up(&mon_conn_wait_queue);
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static void mon_iucv_path_severed(struct iucv_path *path, u8 ipuser[16])
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
2007-02-08 21:38:11 +00:00
|
|
|
struct mon_private *monpriv = path->private;
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2008-12-25 12:39:42 +00:00
|
|
|
pr_err("z/VM *MONITOR system service disconnected with rc=%i\n",
|
|
|
|
ipuser[0]);
|
2007-02-08 21:38:11 +00:00
|
|
|
iucv_path_sever(path, NULL);
|
2005-04-16 22:20:36 +00:00
|
|
|
atomic_set(&monpriv->iucv_severed, 1);
|
|
|
|
wake_up(&mon_conn_wait_queue);
|
|
|
|
wake_up_interruptible(&mon_read_wait_queue);
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static void mon_iucv_message_pending(struct iucv_path *path,
|
|
|
|
struct iucv_message *msg)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
2007-02-08 21:38:11 +00:00
|
|
|
struct mon_private *monpriv = path->private;
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
memcpy(&monpriv->msg_array[monpriv->write_index]->msg,
|
|
|
|
msg, sizeof(*msg));
|
2005-04-16 22:20:36 +00:00
|
|
|
if (atomic_inc_return(&monpriv->msglim_count) == MON_MSGLIM) {
|
2008-12-25 12:39:42 +00:00
|
|
|
pr_warning("The read queue for monitor data is full\n");
|
2005-04-16 22:20:36 +00:00
|
|
|
monpriv->msg_array[monpriv->write_index]->msglim_reached = 1;
|
|
|
|
}
|
|
|
|
monpriv->write_index = (monpriv->write_index + 1) % MON_MSGLIM;
|
|
|
|
atomic_inc(&monpriv->read_ready);
|
|
|
|
wake_up_interruptible(&mon_read_wait_queue);
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static struct iucv_handler monreader_iucv_handler = {
|
|
|
|
.path_complete = mon_iucv_path_complete,
|
|
|
|
.path_severed = mon_iucv_path_severed,
|
|
|
|
.message_pending = mon_iucv_message_pending,
|
2005-04-16 22:20:36 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
/******************************************************************************
|
|
|
|
* file operations *
|
|
|
|
*****************************************************************************/
|
2007-02-08 21:38:11 +00:00
|
|
|
static int mon_open(struct inode *inode, struct file *filp)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
struct mon_private *monpriv;
|
2007-02-08 21:38:11 +00:00
|
|
|
int rc;
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* only one user allowed
|
|
|
|
*/
|
2007-02-08 21:38:11 +00:00
|
|
|
rc = -EBUSY;
|
2005-04-16 22:20:36 +00:00
|
|
|
if (test_and_set_bit(MON_IN_USE, &mon_in_use))
|
2007-02-08 21:38:11 +00:00
|
|
|
goto out;
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
rc = -ENOMEM;
|
2005-04-16 22:20:36 +00:00
|
|
|
monpriv = mon_alloc_mem();
|
|
|
|
if (!monpriv)
|
2007-02-08 21:38:11 +00:00
|
|
|
goto out_use;
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
/*
|
2007-02-08 21:38:11 +00:00
|
|
|
* Connect to *MONITOR service
|
2005-04-16 22:20:36 +00:00
|
|
|
*/
|
2007-02-08 21:38:11 +00:00
|
|
|
monpriv->path = iucv_path_alloc(MON_MSGLIM, IUCV_IPRMDATA, GFP_KERNEL);
|
|
|
|
if (!monpriv->path)
|
|
|
|
goto out_priv;
|
|
|
|
rc = iucv_path_connect(monpriv->path, &monreader_iucv_handler,
|
|
|
|
MON_SERVICE, NULL, user_data_connect, monpriv);
|
2005-04-16 22:20:36 +00:00
|
|
|
if (rc) {
|
2008-12-25 12:39:42 +00:00
|
|
|
pr_err("Connecting to the z/VM *MONITOR system service "
|
|
|
|
"failed with rc=%i\n", rc);
|
2005-04-16 22:20:36 +00:00
|
|
|
rc = -EIO;
|
2007-02-08 21:38:11 +00:00
|
|
|
goto out_path;
|
2005-04-16 22:20:36 +00:00
|
|
|
}
|
|
|
|
/*
|
|
|
|
* Wait for connection confirmation
|
|
|
|
*/
|
|
|
|
wait_event(mon_conn_wait_queue,
|
|
|
|
atomic_read(&monpriv->iucv_connected) ||
|
|
|
|
atomic_read(&monpriv->iucv_severed));
|
|
|
|
if (atomic_read(&monpriv->iucv_severed)) {
|
|
|
|
atomic_set(&monpriv->iucv_severed, 0);
|
|
|
|
atomic_set(&monpriv->iucv_connected, 0);
|
|
|
|
rc = -EIO;
|
2007-02-08 21:38:11 +00:00
|
|
|
goto out_path;
|
2005-04-16 22:20:36 +00:00
|
|
|
}
|
|
|
|
filp->private_data = monpriv;
|
2009-07-07 14:37:04 +00:00
|
|
|
dev_set_drvdata(monreader_device, monpriv);
|
2005-04-16 22:20:36 +00:00
|
|
|
return nonseekable_open(inode, filp);
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
out_path:
|
2009-06-16 08:30:50 +00:00
|
|
|
iucv_path_free(monpriv->path);
|
2007-02-08 21:38:11 +00:00
|
|
|
out_priv:
|
|
|
|
mon_free_mem(monpriv);
|
|
|
|
out_use:
|
2005-04-16 22:20:36 +00:00
|
|
|
clear_bit(MON_IN_USE, &mon_in_use);
|
2007-02-08 21:38:11 +00:00
|
|
|
out:
|
2005-04-16 22:20:36 +00:00
|
|
|
return rc;
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static int mon_close(struct inode *inode, struct file *filp)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
int rc, i;
|
|
|
|
struct mon_private *monpriv = filp->private_data;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Close IUCV connection and unregister
|
|
|
|
*/
|
2009-06-16 08:30:50 +00:00
|
|
|
if (monpriv->path) {
|
|
|
|
rc = iucv_path_sever(monpriv->path, user_data_sever);
|
|
|
|
if (rc)
|
|
|
|
pr_warning("Disconnecting the z/VM *MONITOR system "
|
|
|
|
"service failed with rc=%i\n", rc);
|
|
|
|
iucv_path_free(monpriv->path);
|
|
|
|
}
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
atomic_set(&monpriv->iucv_severed, 0);
|
|
|
|
atomic_set(&monpriv->iucv_connected, 0);
|
|
|
|
atomic_set(&monpriv->read_ready, 0);
|
|
|
|
atomic_set(&monpriv->msglim_count, 0);
|
|
|
|
monpriv->write_index = 0;
|
|
|
|
monpriv->read_index = 0;
|
2009-11-13 14:43:51 +00:00
|
|
|
dev_set_drvdata(monreader_device, NULL);
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
for (i = 0; i < MON_MSGLIM; i++)
|
|
|
|
kfree(monpriv->msg_array[i]);
|
|
|
|
kfree(monpriv);
|
|
|
|
clear_bit(MON_IN_USE, &mon_in_use);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static ssize_t mon_read(struct file *filp, char __user *data,
|
|
|
|
size_t count, loff_t *ppos)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
struct mon_private *monpriv = filp->private_data;
|
|
|
|
struct mon_msg *monmsg;
|
|
|
|
int ret;
|
|
|
|
u32 mce_start;
|
|
|
|
|
|
|
|
monmsg = mon_next_message(monpriv);
|
|
|
|
if (IS_ERR(monmsg))
|
|
|
|
return PTR_ERR(monmsg);
|
|
|
|
|
|
|
|
if (!monmsg) {
|
|
|
|
if (filp->f_flags & O_NONBLOCK)
|
|
|
|
return -EAGAIN;
|
|
|
|
ret = wait_event_interruptible(mon_read_wait_queue,
|
|
|
|
atomic_read(&monpriv->read_ready) ||
|
|
|
|
atomic_read(&monpriv->iucv_severed));
|
|
|
|
if (ret)
|
|
|
|
return ret;
|
|
|
|
if (unlikely(atomic_read(&monpriv->iucv_severed)))
|
|
|
|
return -EIO;
|
|
|
|
monmsg = monpriv->msg_array[monpriv->read_index];
|
|
|
|
}
|
|
|
|
|
2008-07-14 07:59:35 +00:00
|
|
|
if (!monmsg->pos)
|
2005-04-16 22:20:36 +00:00
|
|
|
monmsg->pos = mon_mca_start(monmsg) + monmsg->mca_offset;
|
|
|
|
if (mon_check_mca(monmsg))
|
|
|
|
goto reply;
|
|
|
|
|
|
|
|
/* read monitor control element (12 bytes) first */
|
|
|
|
mce_start = mon_mca_start(monmsg) + monmsg->mca_offset;
|
|
|
|
if ((monmsg->pos >= mce_start) && (monmsg->pos < mce_start + 12)) {
|
|
|
|
count = min(count, (size_t) mce_start + 12 - monmsg->pos);
|
|
|
|
ret = copy_to_user(data, (void *) (unsigned long) monmsg->pos,
|
|
|
|
count);
|
|
|
|
if (ret)
|
|
|
|
return -EFAULT;
|
|
|
|
monmsg->pos += count;
|
|
|
|
if (monmsg->pos == mce_start + 12)
|
|
|
|
monmsg->pos = mon_rec_start(monmsg);
|
|
|
|
goto out_copy;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* read records */
|
|
|
|
if (monmsg->pos <= mon_rec_end(monmsg)) {
|
|
|
|
count = min(count, (size_t) mon_rec_end(monmsg) - monmsg->pos
|
|
|
|
+ 1);
|
|
|
|
ret = copy_to_user(data, (void *) (unsigned long) monmsg->pos,
|
|
|
|
count);
|
|
|
|
if (ret)
|
|
|
|
return -EFAULT;
|
|
|
|
monmsg->pos += count;
|
|
|
|
if (monmsg->pos > mon_rec_end(monmsg))
|
|
|
|
mon_next_mca(monmsg);
|
|
|
|
goto out_copy;
|
|
|
|
}
|
|
|
|
reply:
|
|
|
|
ret = mon_send_reply(monmsg, monpriv);
|
|
|
|
return ret;
|
|
|
|
|
|
|
|
out_copy:
|
|
|
|
*ppos += count;
|
|
|
|
return count;
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static unsigned int mon_poll(struct file *filp, struct poll_table_struct *p)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
struct mon_private *monpriv = filp->private_data;
|
|
|
|
|
|
|
|
poll_wait(filp, &mon_read_wait_queue, p);
|
|
|
|
if (unlikely(atomic_read(&monpriv->iucv_severed)))
|
|
|
|
return POLLERR;
|
|
|
|
if (atomic_read(&monpriv->read_ready))
|
|
|
|
return POLLIN | POLLRDNORM;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2007-02-12 08:55:34 +00:00
|
|
|
static const struct file_operations mon_fops = {
|
2005-04-16 22:20:36 +00:00
|
|
|
.owner = THIS_MODULE,
|
|
|
|
.open = &mon_open,
|
|
|
|
.release = &mon_close,
|
|
|
|
.read = &mon_read,
|
|
|
|
.poll = &mon_poll,
|
|
|
|
};
|
|
|
|
|
|
|
|
static struct miscdevice mon_dev = {
|
|
|
|
.name = "monreader",
|
|
|
|
.fops = &mon_fops,
|
|
|
|
.minor = MISC_DYNAMIC_MINOR,
|
|
|
|
};
|
|
|
|
|
2009-06-16 08:30:50 +00:00
|
|
|
|
|
|
|
/******************************************************************************
|
|
|
|
* suspend / resume *
|
|
|
|
*****************************************************************************/
|
|
|
|
static int monreader_freeze(struct device *dev)
|
|
|
|
{
|
2009-07-07 14:37:04 +00:00
|
|
|
struct mon_private *monpriv = dev_get_drvdata(dev);
|
2009-06-16 08:30:50 +00:00
|
|
|
int rc;
|
|
|
|
|
|
|
|
if (!monpriv)
|
|
|
|
return 0;
|
|
|
|
if (monpriv->path) {
|
|
|
|
rc = iucv_path_sever(monpriv->path, user_data_sever);
|
|
|
|
if (rc)
|
|
|
|
pr_warning("Disconnecting the z/VM *MONITOR system "
|
|
|
|
"service failed with rc=%i\n", rc);
|
|
|
|
iucv_path_free(monpriv->path);
|
|
|
|
}
|
|
|
|
atomic_set(&monpriv->iucv_severed, 0);
|
|
|
|
atomic_set(&monpriv->iucv_connected, 0);
|
|
|
|
atomic_set(&monpriv->read_ready, 0);
|
|
|
|
atomic_set(&monpriv->msglim_count, 0);
|
|
|
|
monpriv->write_index = 0;
|
|
|
|
monpriv->read_index = 0;
|
|
|
|
monpriv->path = NULL;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int monreader_thaw(struct device *dev)
|
|
|
|
{
|
2009-06-22 10:08:19 +00:00
|
|
|
struct mon_private *monpriv = dev_get_drvdata(dev);
|
2009-06-16 08:30:50 +00:00
|
|
|
int rc;
|
|
|
|
|
|
|
|
if (!monpriv)
|
|
|
|
return 0;
|
|
|
|
rc = -ENOMEM;
|
|
|
|
monpriv->path = iucv_path_alloc(MON_MSGLIM, IUCV_IPRMDATA, GFP_KERNEL);
|
|
|
|
if (!monpriv->path)
|
|
|
|
goto out;
|
|
|
|
rc = iucv_path_connect(monpriv->path, &monreader_iucv_handler,
|
|
|
|
MON_SERVICE, NULL, user_data_connect, monpriv);
|
|
|
|
if (rc) {
|
|
|
|
pr_err("Connecting to the z/VM *MONITOR system service "
|
|
|
|
"failed with rc=%i\n", rc);
|
|
|
|
goto out_path;
|
|
|
|
}
|
|
|
|
wait_event(mon_conn_wait_queue,
|
|
|
|
atomic_read(&monpriv->iucv_connected) ||
|
|
|
|
atomic_read(&monpriv->iucv_severed));
|
|
|
|
if (atomic_read(&monpriv->iucv_severed))
|
|
|
|
goto out_path;
|
|
|
|
return 0;
|
|
|
|
out_path:
|
|
|
|
rc = -EIO;
|
|
|
|
iucv_path_free(monpriv->path);
|
|
|
|
monpriv->path = NULL;
|
|
|
|
out:
|
|
|
|
atomic_set(&monpriv->iucv_severed, 1);
|
|
|
|
return rc;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int monreader_restore(struct device *dev)
|
|
|
|
{
|
|
|
|
int rc;
|
|
|
|
|
|
|
|
segment_unload(mon_dcss_name);
|
|
|
|
rc = segment_load(mon_dcss_name, SEGMENT_SHARED,
|
|
|
|
&mon_dcss_start, &mon_dcss_end);
|
|
|
|
if (rc < 0) {
|
|
|
|
segment_warning(rc, mon_dcss_name);
|
|
|
|
panic("fatal monreader resume error: no monitor dcss\n");
|
|
|
|
}
|
|
|
|
return monreader_thaw(dev);
|
|
|
|
}
|
|
|
|
|
2009-12-15 02:00:08 +00:00
|
|
|
static const struct dev_pm_ops monreader_pm_ops = {
|
2009-06-16 08:30:50 +00:00
|
|
|
.freeze = monreader_freeze,
|
|
|
|
.thaw = monreader_thaw,
|
|
|
|
.restore = monreader_restore,
|
|
|
|
};
|
|
|
|
|
|
|
|
static struct device_driver monreader_driver = {
|
|
|
|
.name = "monreader",
|
|
|
|
.bus = &iucv_bus,
|
|
|
|
.pm = &monreader_pm_ops,
|
|
|
|
};
|
|
|
|
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
/******************************************************************************
|
|
|
|
* module init/exit *
|
|
|
|
*****************************************************************************/
|
2007-02-08 21:38:11 +00:00
|
|
|
static int __init mon_init(void)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
int rc;
|
|
|
|
|
|
|
|
if (!MACHINE_IS_VM) {
|
2008-12-25 12:39:42 +00:00
|
|
|
pr_err("The z/VM *MONITOR record device driver cannot be "
|
|
|
|
"loaded without z/VM\n");
|
2005-04-16 22:20:36 +00:00
|
|
|
return -ENODEV;
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
/*
|
|
|
|
* Register with IUCV and connect to *MONITOR service
|
|
|
|
*/
|
|
|
|
rc = iucv_register(&monreader_iucv_handler, 1);
|
|
|
|
if (rc) {
|
2008-12-25 12:39:42 +00:00
|
|
|
pr_err("The z/VM *MONITOR record device driver failed to "
|
|
|
|
"register with IUCV\n");
|
2007-02-08 21:38:11 +00:00
|
|
|
return rc;
|
|
|
|
}
|
|
|
|
|
2009-06-16 08:30:50 +00:00
|
|
|
rc = driver_register(&monreader_driver);
|
|
|
|
if (rc)
|
|
|
|
goto out_iucv;
|
|
|
|
monreader_device = kzalloc(sizeof(struct device), GFP_KERNEL);
|
|
|
|
if (!monreader_device)
|
|
|
|
goto out_driver;
|
|
|
|
dev_set_name(monreader_device, "monreader-dev");
|
|
|
|
monreader_device->bus = &iucv_bus;
|
|
|
|
monreader_device->parent = iucv_root;
|
|
|
|
monreader_device->driver = &monreader_driver;
|
|
|
|
monreader_device->release = (void (*)(struct device *))kfree;
|
|
|
|
rc = device_register(monreader_device);
|
|
|
|
if (rc) {
|
2009-09-11 08:28:38 +00:00
|
|
|
put_device(monreader_device);
|
2009-06-16 08:30:50 +00:00
|
|
|
goto out_driver;
|
|
|
|
}
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
rc = segment_type(mon_dcss_name);
|
|
|
|
if (rc < 0) {
|
2008-04-17 05:46:31 +00:00
|
|
|
segment_warning(rc, mon_dcss_name);
|
2009-06-16 08:30:50 +00:00
|
|
|
goto out_device;
|
2005-04-16 22:20:36 +00:00
|
|
|
}
|
|
|
|
if (rc != SEG_TYPE_SC) {
|
2008-12-25 12:39:42 +00:00
|
|
|
pr_err("The specified *MONITOR DCSS %s does not have the "
|
|
|
|
"required type SC\n", mon_dcss_name);
|
2007-02-08 21:38:11 +00:00
|
|
|
rc = -EINVAL;
|
2009-06-16 08:30:50 +00:00
|
|
|
goto out_device;
|
2005-04-16 22:20:36 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
rc = segment_load(mon_dcss_name, SEGMENT_SHARED,
|
|
|
|
&mon_dcss_start, &mon_dcss_end);
|
|
|
|
if (rc < 0) {
|
2008-04-17 05:46:31 +00:00
|
|
|
segment_warning(rc, mon_dcss_name);
|
2007-02-08 21:38:11 +00:00
|
|
|
rc = -EINVAL;
|
2009-06-16 08:30:50 +00:00
|
|
|
goto out_device;
|
2005-04-16 22:20:36 +00:00
|
|
|
}
|
|
|
|
dcss_mkname(mon_dcss_name, &user_data_connect[8]);
|
|
|
|
|
2009-12-07 11:52:17 +00:00
|
|
|
/*
|
|
|
|
* misc_register() has to be the last action in module_init(), because
|
|
|
|
* file operations will be available right after this.
|
|
|
|
*/
|
2005-04-16 22:20:36 +00:00
|
|
|
rc = misc_register(&mon_dev);
|
2008-07-14 07:59:35 +00:00
|
|
|
if (rc < 0 )
|
2005-04-16 22:20:36 +00:00
|
|
|
goto out;
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
out:
|
|
|
|
segment_unload(mon_dcss_name);
|
2009-06-16 08:30:50 +00:00
|
|
|
out_device:
|
|
|
|
device_unregister(monreader_device);
|
|
|
|
out_driver:
|
|
|
|
driver_unregister(&monreader_driver);
|
2007-02-08 21:38:11 +00:00
|
|
|
out_iucv:
|
|
|
|
iucv_unregister(&monreader_iucv_handler, 1);
|
2005-04-16 22:20:36 +00:00
|
|
|
return rc;
|
|
|
|
}
|
|
|
|
|
2007-02-08 21:38:11 +00:00
|
|
|
static void __exit mon_exit(void)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
|
|
|
segment_unload(mon_dcss_name);
|
|
|
|
WARN_ON(misc_deregister(&mon_dev) != 0);
|
2009-06-16 08:30:50 +00:00
|
|
|
device_unregister(monreader_device);
|
|
|
|
driver_unregister(&monreader_driver);
|
2007-02-08 21:38:11 +00:00
|
|
|
iucv_unregister(&monreader_iucv_handler, 1);
|
2005-04-16 22:20:36 +00:00
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
module_init(mon_init);
|
|
|
|
module_exit(mon_exit);
|
|
|
|
|
|
|
|
module_param_string(mondcss, mon_dcss_name, 9, 0444);
|
|
|
|
MODULE_PARM_DESC(mondcss, "Name of DCSS segment to be used for *MONITOR "
|
|
|
|
"service, max. 8 chars. Default is MONDCSS");
|
|
|
|
|
|
|
|
MODULE_AUTHOR("Gerald Schaefer <geraldsc@de.ibm.com>");
|
|
|
|
MODULE_DESCRIPTION("Character device driver for reading z/VM "
|
|
|
|
"monitor service records.");
|
|
|
|
MODULE_LICENSE("GPL");
|