/*
* Function: cio_debug_init
* Initializes three debug logs (under /proc/s390dbf) for common I/O:
* - cio_msg logs the messages which are printk'ed when CONFIG_DEBUG_IO is on
* - cio_trace logs the calling of different functions
* - cio_crw logs the messages which are printk'ed when CONFIG_DEBUG_CRW is on
* debug levels depend on CONFIG_DEBUG_IO resp. CONFIG_DEBUG_CRW
*/
static int __init
cio_debug_init (void)
{
cio_debug_msg_id = debug_register ("cio_msg", 16, 4, 16*sizeof (long));
if (!cio_debug_msg_id)
goto out_unregister;
debug_register_view (cio_debug_msg_id, &debug_sprintf_view);
debug_set_level (cio_debug_msg_id, 2);
cio_debug_trace_id = debug_register ("cio_trace", 16, 4, 16);
if (!cio_debug_trace_id)
goto out_unregister;
debug_register_view (cio_debug_trace_id, &debug_hex_ascii_view);
debug_set_level (cio_debug_trace_id, 2);
cio_debug_crw_id = debug_register ("cio_crw", 4, 4, 16*sizeof (long));
if (!cio_debug_crw_id)
goto out_unregister;
debug_register_view (cio_debug_crw_id, &debug_sprintf_view);
debug_set_level (cio_debug_crw_id, 2);
pr_debug("debugging initialized\n");
return 0;
out_unregister:
if (cio_debug_msg_id)
debug_unregister (cio_debug_msg_id);
if (cio_debug_trace_id)
debug_unregister (cio_debug_trace_id);
if (cio_debug_crw_id)
debug_unregister (cio_debug_crw_id);
pr_debug("could not initialize debugging\n");
return -1;
}
/*
* Function: cio_debug_init
* Initializes three debug logs for common I/O:
* - cio_msg logs generic cio messages
* - cio_trace logs the calling of different functions
* - cio_crw logs machine check related cio messages
*/
static int __init cio_debug_init(void)
{
cio_debug_msg_id = debug_register("cio_msg", 16, 1, 16 * sizeof(long));
if (!cio_debug_msg_id)
goto out_unregister;
debug_register_view(cio_debug_msg_id, &debug_sprintf_view);
debug_set_level(cio_debug_msg_id, 2);
cio_debug_trace_id = debug_register("cio_trace", 16, 1, 16);
if (!cio_debug_trace_id)
goto out_unregister;
debug_register_view(cio_debug_trace_id, &debug_hex_ascii_view);
debug_set_level(cio_debug_trace_id, 2);
cio_debug_crw_id = debug_register("cio_crw", 16, 1, 16 * sizeof(long));
if (!cio_debug_crw_id)
goto out_unregister;
debug_register_view(cio_debug_crw_id, &debug_sprintf_view);
debug_set_level(cio_debug_crw_id, 4);
return 0;
out_unregister:
if (cio_debug_msg_id)
debug_unregister(cio_debug_msg_id);
if (cio_debug_trace_id)
debug_unregister(cio_debug_trace_id);
if (cio_debug_crw_id)
debug_unregister(cio_debug_crw_id);
return -1;
}
/**
* zfcp_adapter_debug_register - registers debug feature for an adapter
* @adapter: pointer to adapter for which debug features should be registered
* return: -ENOMEM on error, 0 otherwise
*/
int zfcp_adapter_debug_register(struct zfcp_adapter *adapter)
{
char dbf_name[DEBUG_MAX_NAME_LEN];
/* debug feature area which records recovery activity */
sprintf(dbf_name, "zfcp_%s_rec", dev_name(&adapter->ccw_device->dev));
adapter->rec_dbf = debug_register(dbf_name, dbfsize, 1,
sizeof(struct zfcp_rec_dbf_record));
if (!adapter->rec_dbf)
goto failed;
debug_register_view(adapter->rec_dbf, &debug_hex_ascii_view);
debug_register_view(adapter->rec_dbf, &zfcp_rec_dbf_view);
debug_set_level(adapter->rec_dbf, 3);
/* debug feature area which records HBA (FSF and QDIO) conditions */
sprintf(dbf_name, "zfcp_%s_hba", dev_name(&adapter->ccw_device->dev));
adapter->hba_dbf = debug_register(dbf_name, dbfsize, 1,
sizeof(struct zfcp_hba_dbf_record));
if (!adapter->hba_dbf)
goto failed;
debug_register_view(adapter->hba_dbf, &debug_hex_ascii_view);
debug_register_view(adapter->hba_dbf, &zfcp_hba_dbf_view);
debug_set_level(adapter->hba_dbf, 3);
/* debug feature area which records SAN command failures and recovery */
sprintf(dbf_name, "zfcp_%s_san", dev_name(&adapter->ccw_device->dev));
adapter->san_dbf = debug_register(dbf_name, dbfsize, 1,
sizeof(struct zfcp_san_dbf_record));
if (!adapter->san_dbf)
goto failed;
debug_register_view(adapter->san_dbf, &debug_hex_ascii_view);
debug_register_view(adapter->san_dbf, &zfcp_san_dbf_view);
debug_set_level(adapter->san_dbf, 6);
/* debug feature area which records SCSI command failures and recovery */
sprintf(dbf_name, "zfcp_%s_scsi", dev_name(&adapter->ccw_device->dev));
adapter->scsi_dbf = debug_register(dbf_name, dbfsize, 1,
sizeof(struct zfcp_scsi_dbf_record));
if (!adapter->scsi_dbf)
goto failed;
debug_register_view(adapter->scsi_dbf, &debug_hex_ascii_view);
debug_register_view(adapter->scsi_dbf, &zfcp_scsi_dbf_view);
debug_set_level(adapter->scsi_dbf, 3);
return 0;
failed:
zfcp_adapter_debug_unregister(adapter);
return -ENOMEM;
}
int __init qdio_debug_init(void)
{
debugfs_root = debugfs_create_dir("qdio", NULL);
qdio_dbf_setup = debug_register("qdio_setup", 16, 1, 16);
debug_register_view(qdio_dbf_setup, &debug_hex_ascii_view);
debug_set_level(qdio_dbf_setup, DBF_INFO);
DBF_EVENT("dbf created\n");
qdio_dbf_error = debug_register("qdio_error", 4, 1, 16);
debug_register_view(qdio_dbf_error, &debug_hex_ascii_view);
debug_set_level(qdio_dbf_error, DBF_INFO);
DBF_ERROR("dbf created\n");
return 0;
}
void qdio_allocate_dbf(struct qdio_initialize *init_data,
struct qdio_irq *irq_ptr)
{
char text[20];
DBF_EVENT("qfmt:%1d", init_data->q_format);
DBF_HEX(init_data->adapter_name, 8);
DBF_EVENT("qpff%4x", init_data->qib_param_field_format);
DBF_HEX(&init_data->qib_param_field, sizeof(void *));
DBF_HEX(&init_data->input_slib_elements, sizeof(void *));
DBF_HEX(&init_data->output_slib_elements, sizeof(void *));
DBF_EVENT("niq:%1d noq:%1d", init_data->no_input_qs,
init_data->no_output_qs);
DBF_HEX(&init_data->input_handler, sizeof(void *));
DBF_HEX(&init_data->output_handler, sizeof(void *));
DBF_HEX(&init_data->int_parm, sizeof(long));
DBF_HEX(&init_data->input_sbal_addr_array, sizeof(void *));
DBF_HEX(&init_data->output_sbal_addr_array, sizeof(void *));
DBF_EVENT("irq:%8lx", (unsigned long)irq_ptr);
/* allocate trace view for the interface */
snprintf(text, 20, "qdio_%s", dev_name(&init_data->cdev->dev));
irq_ptr->debug_area = debug_register(text, 2, 1, 16);
debug_register_view(irq_ptr->debug_area, &debug_hex_ascii_view);
debug_set_level(irq_ptr->debug_area, DBF_WARN);
DBF_DEV_EVENT(DBF_ERR, irq_ptr, "dbf created");
}
void
main (void)
{
volatile int i;
SystemInit ();
debug_init ();
#ifdef DEBUG_LEVEL
debug_set_level (DEBUG_LEVEL);
#endif
/* configure LED output */
Chip_IOCON_PinMuxSet (LPC_IOCON, LED_STATUS_PIO, IOCON_MODE_INACT | IOCON_FUNC0);
Chip_GPIO_SetPinDIROutput (LPC_GPIO, LED_STATUS_PORT, LED_STATUS_PIN);
Chip_GPIO_SetPinState (LPC_GPIO, LED_STATUS_PORT, LED_STATUS_PIN, false);
DBG_NEWLINE (DBG_LEVEL_INFO);
DBG (DBG_LEVEL_INFO, "Debug test firmware (" __GIT_SHA1__ ")");
DBG (DBG_LEVEL_INFO, "Compiled " __DATE__ " at " __TIME__ " on " __BUILD_HOSTNAME__ " using GCC " __VERSION__ " (%d.%d-%d)", __CS_SOURCERYGXX_MAJ__, __CS_SOURCERYGXX_MIN__, __CS_SOURCERYGXX_REV__);
DBG (DBG_LEVEL_INFO, "MCU running at %d MHz", SystemCoreClock / 1000000);
for (i = 0; i < 0x800000; i++);
while (1) {
/* toggle LED */
Chip_GPIO_SetPinToggle (LPC_GPIO, LED_STATUS_PORT, LED_STATUS_PIN);
DBG (DBG_LEVEL_INFO, "Hello world !!!");
for (i = 0; i < 0x400000; i++);
}
}
int __init zpci_debug_init(void)
{
/* event trace buffer */
pci_debug_msg_id = debug_register("pci_msg", 16, 1, 16 * sizeof(long));
if (!pci_debug_msg_id)
return -EINVAL;
debug_register_view(pci_debug_msg_id, &debug_sprintf_view);
debug_set_level(pci_debug_msg_id, 3);
/* error log */
pci_debug_err_id = debug_register("pci_error", 2, 1, 16);
if (!pci_debug_err_id)
return -EINVAL;
debug_register_view(pci_debug_err_id, &debug_hex_ascii_view);
debug_set_level(pci_debug_err_id, 6);
debugfs_root = debugfs_create_dir("pci", NULL);
return 0;
}
static debug_info_t *zfcp_dbf_reg(const char *name, int size, int rec_size)
{
struct debug_info *d;
d = debug_register(name, size, 1, rec_size);
if (!d)
return NULL;
debug_register_view(d, &debug_hex_ascii_view);
debug_set_level(d, dbflevel);
return d;
}
static int
debug_input_level_fn(debug_info_t * id, struct debug_view *view,
struct file *file, const char __user *user_buf,
size_t user_len, loff_t * offset)
{
char *str;
int rc,new_level;
if (user_len > 0x10000)
user_len = 0x10000;
if (*offset != 0){
rc = -EPIPE;
goto out;
}
str = debug_get_user_string(user_buf,user_len);
if(IS_ERR(str)){
rc = PTR_ERR(str);
goto out;
}
if(str[0] == '-'){
debug_set_level(id, DEBUG_OFF_LEVEL);
rc = user_len;
goto free_str;
} else {
new_level = debug_get_uint(str);
}
if(new_level < 0) {
printk(KERN_INFO "debug: level `%s` is not valid\n", str);
rc = -EINVAL;
} else {
debug_set_level(id, new_level);
rc = user_len;
}
free_str:
kfree(str);
out:
*offset += user_len;
return rc; /* number of input characters */
}
int __init sclp_sdias_init(void)
{
int rc;
if (ipl_info.type != IPL_TYPE_FCP_DUMP)
return 0;
sdias_dbf = debug_register("dump_sdias", 4, 1, 4 * sizeof(long));
debug_register_view(sdias_dbf, &debug_sprintf_view);
debug_set_level(sdias_dbf, 6);
rc = sclp_register(&sclp_sdias_register);
if (rc)
return rc;
init_waitqueue_head(&sdias_wq);
TRACE("init done\n");
return 0;
}
int ctcm_register_dbf_views(void)
{
int x;
for (x = 0; x < CTCM_DBF_INFOS; x++) {
/* register the areas */
ctcm_dbf[x].id = debug_register(ctcm_dbf[x].name,
ctcm_dbf[x].pages,
ctcm_dbf[x].areas,
ctcm_dbf[x].len);
if (ctcm_dbf[x].id == NULL) {
ctcm_unregister_dbf_views();
return -ENOMEM;
}
/* register a view */
debug_register_view(ctcm_dbf[x].id, &debug_hex_ascii_view);
/* set a passing level */
debug_set_level(ctcm_dbf[x].id, ctcm_dbf[x].level);
}
return 0;
}
int
main (void)
{
SystemInit ();
debug_init ();
#ifdef DEBUG_LEVEL
debug_set_level (DEBUG_LEVEL);
#endif
DBG_NEWLINE (DBG_LEVEL_INFO);
DBG (DBG_LEVEL_INFO, "HAM relay firmware v" VERSION_STR " (" __GIT_SHA1__ ")");
DBG (DBG_LEVEL_INFO, "Compiled " __DATE__ " at " __TIME__ " on " __BUILD_HOSTNAME__ " using GCC " __VERSION__ " (%d.%d-%d)", __CS_SOURCERYGXX_MAJ__, __CS_SOURCERYGXX_MIN__, __CS_SOURCERYGXX_REV__);
DBG (DBG_LEVEL_INFO, "MCU running at %d MHz", SystemCoreClock / 1000000);
inputs_init ();
systick_init ();
tx_init ();
tone_init ();
roger_beep_init ();
call_init ();
call_transmit_delay (5);
while (1) {
if (!tx_is_enabled ()) {
roger_beep_transmit_if_needed ();
call_transmit_if_needed ();
}
__WFI ();
}
return 0;
}
/* @Test */
void test_pop3(void)
{
struct list pop3_list;
struct account *ac;
struct pop3_server *pop3_server;
struct pop3_dl_options dl_options = {0};
char *profile_path;
char *pwd;
debug_init();
debug_set_level(25);
pwd = realpath(".", NULL);
CU_ASSERT(pwd != NULL);
profile_path = mycombinepath(pwd, "test-account-profile");
CU_ASSERT(profile_path != NULL);
config_set_user_profile_directory(profile_path);
CU_ASSERT(codesets_init() != 0);
CU_ASSERT(progmon_init() != 0);
CU_ASSERT(init_threads() != 0);
CU_ASSERT(load_config() != 0);
CU_ASSERT(init_folders() != 0);
ac = account_malloc();
CU_ASSERT(ac != NULL);
CU_ASSERT(ac->imap != NULL);
CU_ASSERT(ac->pop != NULL);
ac->recv_type = 0;
if (ac->pop->name) free(ac->pop->name);
ac->pop->name = mystrdup("localhost");
CU_ASSERT(ac->pop->name != NULL);
if (ac->pop->login) free(ac->pop->login);
ac->pop->login = mystrdup("test");
CU_ASSERT(ac->pop->login != NULL);
if (ac->pop->passwd) free(ac->pop->passwd);
ac->pop->passwd = mystrdup("test");
CU_ASSERT(ac->pop->passwd != NULL);
ac->pop->ssl = 0;
ac->pop->port = 10110;
insert_config_account(ac);
mails_test_account(ac, mails_test_account_callback);
sleep(3);
account_free(ac);
cleanup_threads();
del_folders();
free_config();
progmon_deinit();
codesets_cleanup();
free(profile_path);
free(pwd);
}
static void __init pkey_debug_init(void)
{
debug_info = debug_register("pkey", 1, 1, 4 * sizeof(long));
debug_register_view(debug_info, &debug_sprintf_view);
debug_set_level(debug_info, 3);
}
int config_parse_args(config_t *cfg, int argc, char *argv[])
{
int i;
int saw_dump_file = 0;
if (argc < 2) {
debug_printf(CONFIG, WARNING,
"Processors tend to be unhappy with nothing on their bus.\n"
"(Run \"%s --help\" for more info.)\n", argv[0]);
}
for (i = 1; i < argc; ) {
if (!strcmp(argv[i], "--region") || !strcmp(argv[i], "-r")) {
uint32_t base, size;
char *end;
if (argc - i < 4) {
debug_print(CONFIG, FATAL,
"--region: expected <base> <size> <readmemh-file>\n");
return 1;
}
base = strtoul(argv[i + 1], &end, 16);
if (*end != '\0') {
debug_printf(CONFIG, FATAL,
"--region: invalid base \"%s\"\n", argv[i + 1]);
return 1;
}
size = strtoul(argv[i + 2], &end, 16);
if (*end != '\0') {
debug_printf(CONFIG, FATAL,
"--region: invalid size \"%s\"\n", argv[i + 2]);
return 1;
}
if (do_region(cfg->mem, base, size, argv[i + 3])) {
return 1;
}
i += 4;
} else if (!strcmp(argv[i], "--pc") || !strcmp(argv[i], "-p")) {
uint32_t pc;
char *end;
if (argc - i < 2) {
debug_print(CONFIG, FATAL, "--pc: expected <initial-pc>\n");
return 1;
}
pc = strtoul(argv[i + 1], &end, 16);
if (*end != '\0') {
debug_printf(CONFIG, FATAL,
"--pc: invalid pc \"%s\"\n", argv[i + 1]);
return 1;
}
cfg->pc = pc;
i += 2;
} else if (!strcmp(argv[i], "--dump") || !strcmp(argv[i], "-d")) {
if (argc - i < 1) {
debug_print(CONFIG, FATAL, "--dump: expected <dump-file>\n");
return 1;
}
if (saw_dump_file) {
debug_print(CONFIG, FATAL,
"--dump: may not be specified multiple times\n");
return 1;
}
cfg->dump_file = fopen(argv[i + 1], "w");
if (!cfg->dump_file) {
debug_printf(CONFIG, FATAL,
"%s: %s\n", argv[i + 1], strerror(errno));
return 1;
}
saw_dump_file = 1;
i += 2;
} else if (!strcmp(argv[i], "--console") || !strcmp(argv[i], "-c")) {
uint32_t addr;
char *end;
if (argc - i < 2) {
debug_print(CONFIG, FATAL, "--console: expected <addr>\n");
return 1;
}
addr = strtoul(argv[i + 1], &end, 16);
if (*end != '\0') {
debug_printf(CONFIG, FATAL,
"--console: invalid addr \"%s\"\n", argv[i + 1]);
return 1;
}
mem_map(cfg->mem, addr, serial_create(0, 1));
i += 2;
} else if (!strcmp(argv[i], "--filter") || !strcmp(argv[i], "-f")) {
if (argc - i < 2) {
debug_print(CONFIG, FATAL, "--filter: expected <filter>\n");
return 1;
}
cfg->filter = filter_find(argv[i + 1]);
if (!cfg->filter) {
debug_printf(CONFIG, FATAL,
"--filter: unknown filter \"%s\"\n", argv[i + 1]);
return 1;
}
i += 2;
} else if (!strncmp(argv[i], "--filter=", 9)) {
cfg->filter = filter_find(argv[i] + 9);
if (!cfg->filter) {
debug_printf(CONFIG, FATAL,
"--filter: unknown filter \"%s\"\n", argv[i] + 9);
return 1;
}
i += 1;
} else if (!strcmp(argv[i], "--step") || !strcmp(argv[i], "-s")) {
cfg->step = 1;
i += 1;
} else if (!strcmp(argv[i], "--help") || !strcmp(argv[i], "-h")) {
usage(argv[0]);
return 1;
} else if (!strcmp(argv[i], "--quiet") || !strcmp(argv[i], "-q")) {
if (cfg->debug > 0) {
debug_set_level(--cfg->debug);
}
i += 1;
} else if (!strcmp(argv[i], "--verbose") || !strcmp(argv[i], "-v")) {
if (cfg->debug < NUM_DEBUG_LEVELS - 1) {
debug_set_level(++cfg->debug);
}
i += 1;
} else if (!strcmp(argv[i], "--version") || !strcmp(argv[i], "-V")) {
version();
return 1;
} else {
debug_printf(CONFIG, FATAL, "Invalid argument \"%s\"\n", argv[i]);
return 1;
}
}
return 0;
}