429 строки
12 KiB
C
429 строки
12 KiB
C
/* SPDX-License-Identifier: GPL-2.0 */
|
|
/*
|
|
* S/390 debug facility
|
|
*
|
|
* Copyright IBM Corp. 1999, 2020
|
|
*/
|
|
#ifndef DEBUG_H
|
|
#define DEBUG_H
|
|
|
|
#include <linux/string.h>
|
|
#include <linux/spinlock.h>
|
|
#include <linux/kernel.h>
|
|
#include <linux/time.h>
|
|
#include <linux/refcount.h>
|
|
#include <linux/fs.h>
|
|
|
|
#define DEBUG_MAX_LEVEL 6 /* debug levels range from 0 to 6 */
|
|
#define DEBUG_OFF_LEVEL -1 /* level where debug is switched off */
|
|
#define DEBUG_FLUSH_ALL -1 /* parameter to flush all areas */
|
|
#define DEBUG_MAX_VIEWS 10 /* max number of views in proc fs */
|
|
#define DEBUG_MAX_NAME_LEN 64 /* max length for a debugfs file name */
|
|
#define DEBUG_DEFAULT_LEVEL 3 /* initial debug level */
|
|
|
|
#define DEBUG_DIR_ROOT "s390dbf" /* name of debug root directory in proc fs */
|
|
|
|
#define DEBUG_DATA(entry) (char *)(entry + 1) /* data is stored behind */
|
|
/* the entry information */
|
|
|
|
#define __DEBUG_FEATURE_VERSION 3 /* version of debug feature */
|
|
|
|
struct __debug_entry {
|
|
unsigned long clock : 60;
|
|
unsigned long exception : 1;
|
|
unsigned long level : 3;
|
|
void *caller;
|
|
unsigned short cpu;
|
|
} __packed;
|
|
|
|
typedef struct __debug_entry debug_entry_t;
|
|
|
|
struct debug_view;
|
|
|
|
typedef struct debug_info {
|
|
struct debug_info *next;
|
|
struct debug_info *prev;
|
|
refcount_t ref_count;
|
|
spinlock_t lock;
|
|
int level;
|
|
int nr_areas;
|
|
int pages_per_area;
|
|
int buf_size;
|
|
int entry_size;
|
|
debug_entry_t ***areas;
|
|
int active_area;
|
|
int *active_pages;
|
|
int *active_entries;
|
|
struct dentry *debugfs_root_entry;
|
|
struct dentry *debugfs_entries[DEBUG_MAX_VIEWS];
|
|
struct debug_view *views[DEBUG_MAX_VIEWS];
|
|
char name[DEBUG_MAX_NAME_LEN];
|
|
umode_t mode;
|
|
} debug_info_t;
|
|
|
|
typedef int (debug_header_proc_t) (debug_info_t *id,
|
|
struct debug_view *view,
|
|
int area,
|
|
debug_entry_t *entry,
|
|
char *out_buf);
|
|
|
|
typedef int (debug_format_proc_t) (debug_info_t *id,
|
|
struct debug_view *view, char *out_buf,
|
|
const char *in_buf);
|
|
typedef int (debug_prolog_proc_t) (debug_info_t *id,
|
|
struct debug_view *view,
|
|
char *out_buf);
|
|
typedef int (debug_input_proc_t) (debug_info_t *id,
|
|
struct debug_view *view,
|
|
struct file *file,
|
|
const char __user *user_buf,
|
|
size_t in_buf_size, loff_t *offset);
|
|
|
|
int debug_dflt_header_fn(debug_info_t *id, struct debug_view *view,
|
|
int area, debug_entry_t *entry, char *out_buf);
|
|
|
|
struct debug_view {
|
|
char name[DEBUG_MAX_NAME_LEN];
|
|
debug_prolog_proc_t *prolog_proc;
|
|
debug_header_proc_t *header_proc;
|
|
debug_format_proc_t *format_proc;
|
|
debug_input_proc_t *input_proc;
|
|
void *private_data;
|
|
};
|
|
|
|
extern struct debug_view debug_hex_ascii_view;
|
|
extern struct debug_view debug_sprintf_view;
|
|
|
|
/* do NOT use the _common functions */
|
|
|
|
debug_entry_t *debug_event_common(debug_info_t *id, int level,
|
|
const void *data, int length);
|
|
|
|
debug_entry_t *debug_exception_common(debug_info_t *id, int level,
|
|
const void *data, int length);
|
|
|
|
/* Debug Feature API: */
|
|
|
|
debug_info_t *debug_register(const char *name, int pages, int nr_areas,
|
|
int buf_size);
|
|
|
|
debug_info_t *debug_register_mode(const char *name, int pages, int nr_areas,
|
|
int buf_size, umode_t mode, uid_t uid,
|
|
gid_t gid);
|
|
|
|
void debug_unregister(debug_info_t *id);
|
|
|
|
void debug_set_level(debug_info_t *id, int new_level);
|
|
|
|
void debug_set_critical(void);
|
|
|
|
void debug_stop_all(void);
|
|
|
|
/**
|
|
* debug_level_enabled() - Returns true if debug events for the specified
|
|
* level would be logged. Otherwise returns false.
|
|
*
|
|
* @id: handle for debug log
|
|
* @level: debug level
|
|
*
|
|
* Return:
|
|
* - %true if level is less or equal to the current debug level.
|
|
*/
|
|
static inline bool debug_level_enabled(debug_info_t *id, int level)
|
|
{
|
|
return level <= id->level;
|
|
}
|
|
|
|
/**
|
|
* debug_event() - writes binary debug entry to active debug area
|
|
* (if level <= actual debug level)
|
|
*
|
|
* @id: handle for debug log
|
|
* @level: debug level
|
|
* @data: pointer to data for debug entry
|
|
* @length: length of data in bytes
|
|
*
|
|
* Return:
|
|
* - Address of written debug entry
|
|
* - %NULL if error
|
|
*/
|
|
static inline debug_entry_t *debug_event(debug_info_t *id, int level,
|
|
void *data, int length)
|
|
{
|
|
if ((!id) || (level > id->level) || (id->pages_per_area == 0))
|
|
return NULL;
|
|
return debug_event_common(id, level, data, length);
|
|
}
|
|
|
|
/**
|
|
* debug_int_event() - writes unsigned integer debug entry to active debug area
|
|
* (if level <= actual debug level)
|
|
*
|
|
* @id: handle for debug log
|
|
* @level: debug level
|
|
* @tag: integer value for debug entry
|
|
*
|
|
* Return:
|
|
* - Address of written debug entry
|
|
* - %NULL if error
|
|
*/
|
|
static inline debug_entry_t *debug_int_event(debug_info_t *id, int level,
|
|
unsigned int tag)
|
|
{
|
|
unsigned int t = tag;
|
|
|
|
if ((!id) || (level > id->level) || (id->pages_per_area == 0))
|
|
return NULL;
|
|
return debug_event_common(id, level, &t, sizeof(unsigned int));
|
|
}
|
|
|
|
/**
|
|
* debug_long_event() - writes unsigned long debug entry to active debug area
|
|
* (if level <= actual debug level)
|
|
*
|
|
* @id: handle for debug log
|
|
* @level: debug level
|
|
* @tag: long integer value for debug entry
|
|
*
|
|
* Return:
|
|
* - Address of written debug entry
|
|
* - %NULL if error
|
|
*/
|
|
static inline debug_entry_t *debug_long_event(debug_info_t *id, int level,
|
|
unsigned long tag)
|
|
{
|
|
unsigned long t = tag;
|
|
|
|
if ((!id) || (level > id->level) || (id->pages_per_area == 0))
|
|
return NULL;
|
|
return debug_event_common(id, level, &t, sizeof(unsigned long));
|
|
}
|
|
|
|
/**
|
|
* debug_text_event() - writes string debug entry in ascii format to active
|
|
* debug area (if level <= actual debug level)
|
|
*
|
|
* @id: handle for debug log
|
|
* @level: debug level
|
|
* @txt: string for debug entry
|
|
*
|
|
* Return:
|
|
* - Address of written debug entry
|
|
* - %NULL if error
|
|
*/
|
|
static inline debug_entry_t *debug_text_event(debug_info_t *id, int level,
|
|
const char *txt)
|
|
{
|
|
if ((!id) || (level > id->level) || (id->pages_per_area == 0))
|
|
return NULL;
|
|
return debug_event_common(id, level, txt, strlen(txt));
|
|
}
|
|
|
|
/*
|
|
* IMPORTANT: Use "%s" in sprintf format strings with care! Only pointers are
|
|
* stored in the s390dbf. See Documentation/s390/s390dbf.rst for more details!
|
|
*/
|
|
extern debug_entry_t *
|
|
__debug_sprintf_event(debug_info_t *id, int level, char *string, ...)
|
|
__attribute__ ((format(printf, 3, 4)));
|
|
|
|
/**
|
|
* debug_sprintf_event() - writes debug entry with format string
|
|
* and varargs (longs) to active debug area
|
|
* (if level $<=$ actual debug level).
|
|
*
|
|
* @_id: handle for debug log
|
|
* @_level: debug level
|
|
* @_fmt: format string for debug entry
|
|
* @...: varargs used as in sprintf()
|
|
*
|
|
* Return:
|
|
* - Address of written debug entry
|
|
* - %NULL if error
|
|
*
|
|
* floats and long long datatypes cannot be used as varargs.
|
|
*/
|
|
#define debug_sprintf_event(_id, _level, _fmt, ...) \
|
|
({ \
|
|
debug_entry_t *__ret; \
|
|
debug_info_t *__id = _id; \
|
|
int __level = _level; \
|
|
\
|
|
if ((!__id) || (__level > __id->level)) \
|
|
__ret = NULL; \
|
|
else \
|
|
__ret = __debug_sprintf_event(__id, __level, \
|
|
_fmt, ## __VA_ARGS__); \
|
|
__ret; \
|
|
})
|
|
|
|
/**
|
|
* debug_exception() - writes binary debug entry to active debug area
|
|
* (if level <= actual debug level)
|
|
* and switches to next debug area
|
|
*
|
|
* @id: handle for debug log
|
|
* @level: debug level
|
|
* @data: pointer to data for debug entry
|
|
* @length: length of data in bytes
|
|
*
|
|
* Return:
|
|
* - Address of written debug entry
|
|
* - %NULL if error
|
|
*/
|
|
static inline debug_entry_t *debug_exception(debug_info_t *id, int level,
|
|
void *data, int length)
|
|
{
|
|
if ((!id) || (level > id->level) || (id->pages_per_area == 0))
|
|
return NULL;
|
|
return debug_exception_common(id, level, data, length);
|
|
}
|
|
|
|
/**
|
|
* debug_int_exception() - writes unsigned int debug entry to active debug area
|
|
* (if level <= actual debug level)
|
|
* and switches to next debug area
|
|
*
|
|
* @id: handle for debug log
|
|
* @level: debug level
|
|
* @tag: integer value for debug entry
|
|
*
|
|
* Return:
|
|
* - Address of written debug entry
|
|
* - %NULL if error
|
|
*/
|
|
static inline debug_entry_t *debug_int_exception(debug_info_t *id, int level,
|
|
unsigned int tag)
|
|
{
|
|
unsigned int t = tag;
|
|
|
|
if ((!id) || (level > id->level) || (id->pages_per_area == 0))
|
|
return NULL;
|
|
return debug_exception_common(id, level, &t, sizeof(unsigned int));
|
|
}
|
|
|
|
/**
|
|
* debug_long_exception() - writes long debug entry to active debug area
|
|
* (if level <= actual debug level)
|
|
* and switches to next debug area
|
|
*
|
|
* @id: handle for debug log
|
|
* @level: debug level
|
|
* @tag: long integer value for debug entry
|
|
*
|
|
* Return:
|
|
* - Address of written debug entry
|
|
* - %NULL if error
|
|
*/
|
|
static inline debug_entry_t *debug_long_exception (debug_info_t *id, int level,
|
|
unsigned long tag)
|
|
{
|
|
unsigned long t = tag;
|
|
|
|
if ((!id) || (level > id->level) || (id->pages_per_area == 0))
|
|
return NULL;
|
|
return debug_exception_common(id, level, &t, sizeof(unsigned long));
|
|
}
|
|
|
|
/**
|
|
* debug_text_exception() - writes string debug entry in ascii format to active
|
|
* debug area (if level <= actual debug level)
|
|
* and switches to next debug area
|
|
* area
|
|
*
|
|
* @id: handle for debug log
|
|
* @level: debug level
|
|
* @txt: string for debug entry
|
|
*
|
|
* Return:
|
|
* - Address of written debug entry
|
|
* - %NULL if error
|
|
*/
|
|
static inline debug_entry_t *debug_text_exception(debug_info_t *id, int level,
|
|
const char *txt)
|
|
{
|
|
if ((!id) || (level > id->level) || (id->pages_per_area == 0))
|
|
return NULL;
|
|
return debug_exception_common(id, level, txt, strlen(txt));
|
|
}
|
|
|
|
/*
|
|
* IMPORTANT: Use "%s" in sprintf format strings with care! Only pointers are
|
|
* stored in the s390dbf. See Documentation/s390/s390dbf.rst for more details!
|
|
*/
|
|
extern debug_entry_t *
|
|
__debug_sprintf_exception(debug_info_t *id, int level, char *string, ...)
|
|
__attribute__ ((format(printf, 3, 4)));
|
|
|
|
|
|
/**
|
|
* debug_sprintf_exception() - writes debug entry with format string and
|
|
* varargs (longs) to active debug area
|
|
* (if level <= actual debug level)
|
|
* and switches to next debug area.
|
|
*
|
|
* @_id: handle for debug log
|
|
* @_level: debug level
|
|
* @_fmt: format string for debug entry
|
|
* @...: varargs used as in sprintf()
|
|
*
|
|
* Return:
|
|
* - Address of written debug entry
|
|
* - %NULL if error
|
|
*
|
|
* floats and long long datatypes cannot be used as varargs.
|
|
*/
|
|
#define debug_sprintf_exception(_id, _level, _fmt, ...) \
|
|
({ \
|
|
debug_entry_t *__ret; \
|
|
debug_info_t *__id = _id; \
|
|
int __level = _level; \
|
|
\
|
|
if ((!__id) || (__level > __id->level)) \
|
|
__ret = NULL; \
|
|
else \
|
|
__ret = __debug_sprintf_exception(__id, __level, \
|
|
_fmt, ## __VA_ARGS__);\
|
|
__ret; \
|
|
})
|
|
|
|
int debug_register_view(debug_info_t *id, struct debug_view *view);
|
|
|
|
int debug_unregister_view(debug_info_t *id, struct debug_view *view);
|
|
|
|
/*
|
|
define the debug levels:
|
|
- 0 No debugging output to console or syslog
|
|
- 1 Log internal errors to syslog, ignore check conditions
|
|
- 2 Log internal errors and check conditions to syslog
|
|
- 3 Log internal errors to console, log check conditions to syslog
|
|
- 4 Log internal errors and check conditions to console
|
|
- 5 panic on internal errors, log check conditions to console
|
|
- 6 panic on both, internal errors and check conditions
|
|
*/
|
|
|
|
#ifndef DEBUG_LEVEL
|
|
#define DEBUG_LEVEL 4
|
|
#endif
|
|
|
|
#define INTERNAL_ERRMSG(x,y...) "E" __FILE__ "%d: " x, __LINE__, y
|
|
#define INTERNAL_WRNMSG(x,y...) "W" __FILE__ "%d: " x, __LINE__, y
|
|
#define INTERNAL_INFMSG(x,y...) "I" __FILE__ "%d: " x, __LINE__, y
|
|
#define INTERNAL_DEBMSG(x,y...) "D" __FILE__ "%d: " x, __LINE__, y
|
|
|
|
#if DEBUG_LEVEL > 0
|
|
#define PRINT_DEBUG(x...) printk(KERN_DEBUG PRINTK_HEADER x)
|
|
#define PRINT_INFO(x...) printk(KERN_INFO PRINTK_HEADER x)
|
|
#define PRINT_WARN(x...) printk(KERN_WARNING PRINTK_HEADER x)
|
|
#define PRINT_ERR(x...) printk(KERN_ERR PRINTK_HEADER x)
|
|
#define PRINT_FATAL(x...) panic(PRINTK_HEADER x)
|
|
#else
|
|
#define PRINT_DEBUG(x...) printk(KERN_DEBUG PRINTK_HEADER x)
|
|
#define PRINT_INFO(x...) printk(KERN_DEBUG PRINTK_HEADER x)
|
|
#define PRINT_WARN(x...) printk(KERN_DEBUG PRINTK_HEADER x)
|
|
#define PRINT_ERR(x...) printk(KERN_DEBUG PRINTK_HEADER x)
|
|
#define PRINT_FATAL(x...) printk(KERN_DEBUG PRINTK_HEADER x)
|
|
#endif /* DASD_DEBUG */
|
|
|
|
#endif /* DEBUG_H */
|