Subversion Repositories HelenOS

Rev

Rev 4420 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
596 jermar 1
/*
2071 jermar 2
 * Copyright (c) 2005 Jakub Jermar
596 jermar 3
 * All rights reserved.
4
 *
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
7
 * are met:
8
 *
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - Redistributions in binary form must reproduce the above copyright
12
 *   notice, this list of conditions and the following disclaimer in the
13
 *   documentation and/or other materials provided with the distribution.
14
 * - The name of the author may not be used to endorse or promote products
15
 *   derived from this software without specific prior written permission.
16
 *
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 */
28
 
1888 jermar 29
/** @addtogroup genericconsole
1702 cejka 30
 * @{
31
 */
32
 
596 jermar 33
/**
4296 trochtova 34
 * @file  cmd.c
35
 * @brief Kernel console command wrappers.
1264 jermar 36
 *
596 jermar 37
 * This file is meant to contain all wrapper functions for
38
 * all kconsole commands. The point is in separating
39
 * kconsole specific wrappers from kconsole-unaware functions
40
 * from other subsystems.
41
 */
42
 
43
#include <console/cmd.h>
1474 palkovsky 44
#include <console/console.h>
596 jermar 45
#include <console/kconsole.h>
46
#include <print.h>
47
#include <panic.h>
48
#include <arch/types.h>
788 jermar 49
#include <adt/list.h>
596 jermar 50
#include <arch.h>
2227 decky 51
#include <config.h>
596 jermar 52
#include <func.h>
4055 trochtova 53
#include <string.h>
596 jermar 54
#include <macros.h>
55
#include <debug.h>
673 jermar 56
#include <cpu.h>
596 jermar 57
#include <mm/tlb.h>
58
#include <arch/mm/tlb.h>
668 bondari 59
#include <mm/frame.h>
673 jermar 60
#include <main/version.h>
759 palkovsky 61
#include <mm/slab.h>
775 palkovsky 62
#include <proc/scheduler.h>
777 palkovsky 63
#include <proc/thread.h>
1060 palkovsky 64
#include <proc/task.h>
1573 palkovsky 65
#include <ipc/ipc.h>
1712 palkovsky 66
#include <ipc/irq.h>
4296 trochtova 67
#include <ipc/event.h>
4156 trochtova 68
#include <symtab.h>
69
#include <errno.h>
596 jermar 70
 
2019 decky 71
#ifdef CONFIG_TEST
72
#include <test.h>
73
#endif
74
 
1702 cejka 75
/* Data and methods for 'help' command. */
596 jermar 76
static int cmd_help(cmd_arg_t *argv);
77
static cmd_info_t help_info = {
78
    .name = "help",
79
    .description = "List of supported commands.",
80
    .func = cmd_help,
81
    .argc = 0
82
};
83
 
2227 decky 84
static int cmd_reboot(cmd_arg_t *argv);
85
static cmd_info_t reboot_info = {
86
    .name = "reboot",
87
    .description = "Reboot.",
88
    .func = cmd_reboot,
89
    .argc = 0
90
};
91
 
2275 decky 92
static int cmd_uptime(cmd_arg_t *argv);
93
static cmd_info_t uptime_info = {
94
    .name = "uptime",
95
    .description = "Print uptime information.",
96
    .func = cmd_uptime,
97
    .argc = 0
98
};
99
 
1474 palkovsky 100
static int cmd_continue(cmd_arg_t *argv);
101
static cmd_info_t continue_info = {
102
    .name = "continue",
2019 decky 103
    .description = "Return console back to userspace.",
1474 palkovsky 104
    .func = cmd_continue,
105
    .argc = 0
106
};
107
 
2019 decky 108
#ifdef CONFIG_TEST
109
static int cmd_tests(cmd_arg_t *argv);
110
static cmd_info_t tests_info = {
111
    .name = "tests",
112
    .description = "Print available kernel tests.",
113
    .func = cmd_tests,
114
    .argc = 0
115
};
116
 
117
static char test_buf[MAX_CMDLINE + 1];
118
static int cmd_test(cmd_arg_t *argv);
119
static cmd_arg_t test_argv[] = {
120
    {
121
        .type = ARG_TYPE_STRING,
122
        .buffer = test_buf,
123
        .len = sizeof(test_buf)
124
    }
125
};
126
static cmd_info_t test_info = {
127
    .name = "test",
128
    .description = "Run kernel test.",
129
    .func = cmd_test,
130
    .argc = 1,
131
    .argv = test_argv
132
};
2050 decky 133
 
134
static int cmd_bench(cmd_arg_t *argv);
135
static cmd_arg_t bench_argv[] = {
136
    {
137
        .type = ARG_TYPE_STRING,
138
        .buffer = test_buf,
139
        .len = sizeof(test_buf)
140
    },
141
    {
142
        .type = ARG_TYPE_INT,
143
    }
144
};
145
static cmd_info_t bench_info = {
146
    .name = "bench",
147
    .description = "Run kernel test as benchmark.",
148
    .func = cmd_bench,
149
    .argc = 2,
150
    .argv = bench_argv
151
};
2019 decky 152
#endif
153
 
1702 cejka 154
/* Data and methods for 'description' command. */
596 jermar 155
static int cmd_desc(cmd_arg_t *argv);
156
static void desc_help(void);
157
static char desc_buf[MAX_CMDLINE+1];
158
static cmd_arg_t desc_argv = {
159
    .type = ARG_TYPE_STRING,
160
    .buffer = desc_buf,
161
    .len = sizeof(desc_buf)
162
};
163
static cmd_info_t desc_info = {
164
    .name = "describe",
165
    .description = "Describe specified command.",
166
    .help = desc_help,
167
    .func = cmd_desc,
168
    .argc = 1,
169
    .argv = &desc_argv
170
};
171
 
1702 cejka 172
/* Data and methods for 'symaddr' command. */
596 jermar 173
static int cmd_symaddr(cmd_arg_t *argv);
174
static char symaddr_buf[MAX_CMDLINE+1];
175
static cmd_arg_t symaddr_argv = {
176
    .type = ARG_TYPE_STRING,
177
    .buffer = symaddr_buf,
178
    .len = sizeof(symaddr_buf)
179
};
180
static cmd_info_t symaddr_info = {
181
    .name = "symaddr",
182
    .description = "Return symbol address.",
183
    .func = cmd_symaddr,
184
    .argc = 1,
185
    .argv = &symaddr_argv
186
};
187
 
603 palkovsky 188
static char set_buf[MAX_CMDLINE+1];
189
static int cmd_set4(cmd_arg_t *argv);
190
static cmd_arg_t set4_argv[] = {
191
    {
192
        .type = ARG_TYPE_STRING,
193
        .buffer = set_buf,
194
        .len = sizeof(set_buf)
195
    },
196
    {
197
        .type = ARG_TYPE_INT
198
    }
199
};
200
static cmd_info_t set4_info = {
201
    .name = "set4",
202
    .description = "set <dest_addr> <value> - 4byte version",
203
    .func = cmd_set4,
204
    .argc = 2,
205
    .argv = set4_argv
206
};
207
 
1702 cejka 208
/* Data and methods for 'call0' command. */
2223 decky 209
static char call0_buf[MAX_CMDLINE + 1];
210
static char carg1_buf[MAX_CMDLINE + 1];
211
static char carg2_buf[MAX_CMDLINE + 1];
212
static char carg3_buf[MAX_CMDLINE + 1];
596 jermar 213
 
214
static int cmd_call0(cmd_arg_t *argv);
215
static cmd_arg_t call0_argv = {
216
    .type = ARG_TYPE_STRING,
217
    .buffer = call0_buf,
218
    .len = sizeof(call0_buf)
219
};
220
static cmd_info_t call0_info = {
221
    .name = "call0",
222
    .description = "call0 <function> -> call function().",
223
    .func = cmd_call0,
224
    .argc = 1,
225
    .argv = &call0_argv
226
};
227
 
2223 decky 228
/* Data and methods for 'mcall0' command. */
229
static int cmd_mcall0(cmd_arg_t *argv);
230
static cmd_arg_t mcall0_argv = {
231
    .type = ARG_TYPE_STRING,
232
    .buffer = call0_buf,
233
    .len = sizeof(call0_buf)
234
};
235
static cmd_info_t mcall0_info = {
236
    .name = "mcall0",
237
    .description = "mcall0 <function> -> call function() on each CPU.",
238
    .func = cmd_mcall0,
239
    .argc = 1,
240
    .argv = &mcall0_argv
241
};
242
 
1702 cejka 243
/* Data and methods for 'call1' command. */
596 jermar 244
static int cmd_call1(cmd_arg_t *argv);
245
static cmd_arg_t call1_argv[] = {
246
    {
247
        .type = ARG_TYPE_STRING,
248
        .buffer = call0_buf,
249
        .len = sizeof(call0_buf)
250
    },
251
    {
252
        .type = ARG_TYPE_VAR,
253
        .buffer = carg1_buf,
254
        .len = sizeof(carg1_buf)
255
    }
256
};
257
static cmd_info_t call1_info = {
258
    .name = "call1",
259
    .description = "call1 <function> <arg1> -> call function(arg1).",
260
    .func = cmd_call1,
261
    .argc = 2,
262
    .argv = call1_argv
263
};
264
 
1702 cejka 265
/* Data and methods for 'call2' command. */
596 jermar 266
static int cmd_call2(cmd_arg_t *argv);
267
static cmd_arg_t call2_argv[] = {
268
    {
269
        .type = ARG_TYPE_STRING,
270
        .buffer = call0_buf,
271
        .len = sizeof(call0_buf)
272
    },
273
    {
274
        .type = ARG_TYPE_VAR,
275
        .buffer = carg1_buf,
276
        .len = sizeof(carg1_buf)
277
    },
278
    {
279
        .type = ARG_TYPE_VAR,
280
        .buffer = carg2_buf,
281
        .len = sizeof(carg2_buf)
282
    }
283
};
284
static cmd_info_t call2_info = {
285
    .name = "call2",
286
    .description = "call2 <function> <arg1> <arg2> -> call function(arg1,arg2).",
287
    .func = cmd_call2,
288
    .argc = 3,
289
    .argv = call2_argv
290
};
291
 
1702 cejka 292
/* Data and methods for 'call3' command. */
596 jermar 293
static int cmd_call3(cmd_arg_t *argv);
294
static cmd_arg_t call3_argv[] = {
295
    {
296
        .type = ARG_TYPE_STRING,
297
        .buffer = call0_buf,
298
        .len = sizeof(call0_buf)
299
    },
300
    {
301
        .type = ARG_TYPE_VAR,
302
        .buffer = carg1_buf,
303
        .len = sizeof(carg1_buf)
304
    },
305
    {
306
        .type = ARG_TYPE_VAR,
307
        .buffer = carg2_buf,
308
        .len = sizeof(carg2_buf)
309
    },
310
    {
311
        .type = ARG_TYPE_VAR,
312
        .buffer = carg3_buf,
313
        .len = sizeof(carg3_buf)
314
    }
315
 
316
};
317
static cmd_info_t call3_info = {
318
    .name = "call3",
319
    .description = "call3 <function> <arg1> <arg2> <arg3> -> call function(arg1,arg2,arg3).",
320
    .func = cmd_call3,
321
    .argc = 4,
322
    .argv = call3_argv
323
};
324
 
1702 cejka 325
/* Data and methods for 'halt' command. */
596 jermar 326
static int cmd_halt(cmd_arg_t *argv);
327
static cmd_info_t halt_info = {
328
    .name = "halt",
329
    .description = "Halt the kernel.",
330
    .func = cmd_halt,
331
    .argc = 0
332
};
333
 
2721 decky 334
/* Data and methods for 'physmem' command. */
335
static int cmd_physmem(cmd_arg_t *argv);
336
cmd_info_t physmem_info = {
337
    .name = "physmem",
338
    .description = "Print physical memory configuration.",
339
    .help = NULL,
340
    .func = cmd_physmem,
341
    .argc = 0,
342
    .argv = NULL
343
};
344
 
1702 cejka 345
/* Data and methods for 'tlb' command. */
673 jermar 346
static int cmd_tlb(cmd_arg_t *argv);
347
cmd_info_t tlb_info = {
348
    .name = "tlb",
596 jermar 349
    .description = "Print TLB of current processor.",
350
    .help = NULL,
673 jermar 351
    .func = cmd_tlb,
596 jermar 352
    .argc = 0,
353
    .argv = NULL
354
};
355
 
777 palkovsky 356
static int cmd_threads(cmd_arg_t *argv);
357
static cmd_info_t threads_info = {
358
    .name = "threads",
1695 jermar 359
    .description = "List all threads.",
777 palkovsky 360
    .func = cmd_threads,
361
    .argc = 0
362
};
668 bondari 363
 
1060 palkovsky 364
static int cmd_tasks(cmd_arg_t *argv);
365
static cmd_info_t tasks_info = {
366
    .name = "tasks",
1695 jermar 367
    .description = "List all tasks.",
1060 palkovsky 368
    .func = cmd_tasks,
369
    .argc = 0
370
};
777 palkovsky 371
 
1060 palkovsky 372
 
775 palkovsky 373
static int cmd_sched(cmd_arg_t *argv);
374
static cmd_info_t sched_info = {
375
    .name = "scheduler",
1695 jermar 376
    .description = "List all scheduler information.",
775 palkovsky 377
    .func = cmd_sched,
378
    .argc = 0
379
};
380
 
759 palkovsky 381
static int cmd_slabs(cmd_arg_t *argv);
382
static cmd_info_t slabs_info = {
383
    .name = "slabs",
1695 jermar 384
    .description = "List slab caches.",
759 palkovsky 385
    .func = cmd_slabs,
386
    .argc = 0
387
};
388
 
1702 cejka 389
/* Data and methods for 'zones' command */
668 bondari 390
static int cmd_zones(cmd_arg_t *argv);
391
static cmd_info_t zones_info = {
392
    .name = "zones",
393
    .description = "List of memory zones.",
394
    .func = cmd_zones,
395
    .argc = 0
396
};
397
 
4055 trochtova 398
/* Data and methods for 'ipc' command */
399
static int cmd_ipc(cmd_arg_t *argv);
400
static cmd_arg_t ipc_argv = {
1573 palkovsky 401
    .type = ARG_TYPE_INT,
402
};
4055 trochtova 403
static cmd_info_t ipc_info = {
404
    .name = "ipc",
405
    .description = "ipc <taskid> Show IPC information of given task.",
406
    .func = cmd_ipc,
1573 palkovsky 407
    .argc = 1,
4055 trochtova 408
    .argv = &ipc_argv
1573 palkovsky 409
};
410
 
1702 cejka 411
/* Data and methods for 'zone' command */
668 bondari 412
static int cmd_zone(cmd_arg_t *argv);
413
static cmd_arg_t zone_argv = {
414
    .type = ARG_TYPE_INT,
415
};
416
 
417
static cmd_info_t zone_info = {
418
    .name = "zone",
419
    .description = "Show memory zone structure.",
420
    .func = cmd_zone,
421
    .argc = 1,
422
    .argv = &zone_argv
423
};
424
 
1702 cejka 425
/* Data and methods for 'cpus' command. */
673 jermar 426
static int cmd_cpus(cmd_arg_t *argv);
427
cmd_info_t cpus_info = {
428
    .name = "cpus",
429
    .description = "List all processors.",
430
    .help = NULL,
431
    .func = cmd_cpus,
432
    .argc = 0,
433
    .argv = NULL
434
};
668 bondari 435
 
1702 cejka 436
/* Data and methods for 'version' command. */
673 jermar 437
static int cmd_version(cmd_arg_t *argv);
438
cmd_info_t version_info = {
439
    .name = "version",
440
    .description = "Print version information.",
441
    .help = NULL,
442
    .func = cmd_version,
443
    .argc = 0,
444
    .argv = NULL
445
};
668 bondari 446
 
775 palkovsky 447
static cmd_info_t *basic_commands[] = {
448
    &call0_info,
2223 decky 449
    &mcall0_info,
775 palkovsky 450
    &call1_info,
451
    &call2_info,
452
    &call3_info,
1474 palkovsky 453
    &continue_info,
775 palkovsky 454
    &cpus_info,
455
    &desc_info,
2227 decky 456
    &reboot_info,
2275 decky 457
    &uptime_info,
775 palkovsky 458
    &halt_info,
459
    &help_info,
4055 trochtova 460
    &ipc_info,
775 palkovsky 461
    &set4_info,
462
    &slabs_info,
463
    &symaddr_info,
464
    &sched_info,
777 palkovsky 465
    &threads_info,
1060 palkovsky 466
    &tasks_info,
2721 decky 467
    &physmem_info,
775 palkovsky 468
    &tlb_info,
469
    &version_info,
470
    &zones_info,
471
    &zone_info,
2019 decky 472
#ifdef CONFIG_TEST
473
    &tests_info,
474
    &test_info,
2050 decky 475
    &bench_info,
2019 decky 476
#endif
775 palkovsky 477
    NULL
478
};
673 jermar 479
 
480
 
596 jermar 481
/** Initialize command info structure.
482
 *
483
 * @param cmd Command info structure.
484
 *
485
 */
486
void cmd_initialize(cmd_info_t *cmd)
487
{
488
    spinlock_initialize(&cmd->lock, "cmd");
489
    link_initialize(&cmd->link);
490
}
491
 
492
/** Initialize and register commands. */
493
void cmd_init(void)
494
{
2721 decky 495
    unsigned int i;
596 jermar 496
 
2721 decky 497
    for (i = 0; basic_commands[i]; i++) {
775 palkovsky 498
        cmd_initialize(basic_commands[i]);
499
        if (!cmd_register(basic_commands[i]))
4055 trochtova 500
            printf("Cannot register command %s\n", basic_commands[i]->name);
775 palkovsky 501
    }
596 jermar 502
}
503
 
504
 
505
/** List supported commands.
506
 *
507
 * @param argv Argument vector.
508
 *
509
 * @return 0 on failure, 1 on success.
510
 */
511
int cmd_help(cmd_arg_t *argv)
512
{
513
    spinlock_lock(&cmd_lock);
514
 
4055 trochtova 515
    link_t *cur;
4537 trochtova 516
    size_t len = 0;
596 jermar 517
    for (cur = cmd_head.next; cur != &cmd_head; cur = cur->next) {
518
        cmd_info_t *hlp;
4055 trochtova 519
        hlp = list_get_instance(cur, cmd_info_t, link);
596 jermar 520
 
4055 trochtova 521
        spinlock_lock(&hlp->lock);
4296 trochtova 522
        if (str_length(hlp->name) > len)
523
            len = str_length(hlp->name);
4055 trochtova 524
        spinlock_unlock(&hlp->lock);
525
    }
526
 
527
    for (cur = cmd_head.next; cur != &cmd_head; cur = cur->next) {
528
        cmd_info_t *hlp;
596 jermar 529
        hlp = list_get_instance(cur, cmd_info_t, link);
4055 trochtova 530
 
596 jermar 531
        spinlock_lock(&hlp->lock);
4055 trochtova 532
        printf("%-*s %s\n", len, hlp->name, hlp->description);
596 jermar 533
        spinlock_unlock(&hlp->lock);
534
    }
535
 
4055 trochtova 536
    spinlock_unlock(&cmd_lock);
537
 
596 jermar 538
    return 1;
539
}
540
 
2227 decky 541
 
542
/** Reboot the system.
543
 *
544
 * @param argv Argument vector.
545
 *
546
 * @return 0 on failure, 1 on success.
547
 */
548
int cmd_reboot(cmd_arg_t *argv)
549
{
550
    reboot();
551
 
552
    /* Not reached */
553
    return 1;
554
}
555
 
2275 decky 556
 
557
/** Print system uptime information.
558
 *
559
 * @param argv Argument vector.
560
 *
561
 * @return 0 on failure, 1 on success.
562
 */
563
int cmd_uptime(cmd_arg_t *argv)
564
{
565
    ASSERT(uptime);
566
 
567
    /* This doesn't have to be very accurate */
568
    unative_t sec = uptime->seconds1;
569
 
4055 trochtova 570
    printf("Up %" PRIun " days, %" PRIun " hours, %" PRIun " minutes, %" PRIun " seconds\n",
2275 decky 571
        sec / 86400, (sec % 86400) / 3600, (sec % 3600) / 60, sec % 60);
572
 
573
    return 1;
574
}
575
 
596 jermar 576
/** Describe specified command.
577
 *
578
 * @param argv Argument vector.
579
 *
580
 * @return 0 on failure, 1 on success.
581
 */
582
int cmd_desc(cmd_arg_t *argv)
583
{
584
    link_t *cur;
4296 trochtova 585
 
596 jermar 586
    spinlock_lock(&cmd_lock);
587
 
588
    for (cur = cmd_head.next; cur != &cmd_head; cur = cur->next) {
589
        cmd_info_t *hlp;
590
 
591
        hlp = list_get_instance(cur, cmd_info_t, link);
592
        spinlock_lock(&hlp->lock);
4296 trochtova 593
 
594
        if (str_lcmp(hlp->name, (const char *) argv->buffer, str_length(hlp->name)) == 0) {
596 jermar 595
            printf("%s - %s\n", hlp->name, hlp->description);
596
            if (hlp->help)
597
                hlp->help();
598
            spinlock_unlock(&hlp->lock);
599
            break;
600
        }
4296 trochtova 601
 
596 jermar 602
        spinlock_unlock(&hlp->lock);
603
    }
604
 
605
    spinlock_unlock(&cmd_lock);
4296 trochtova 606
 
596 jermar 607
    return 1;
608
}
609
 
610
/** Search symbol table */
611
int cmd_symaddr(cmd_arg_t *argv)
612
{
2114 decky 613
    symtab_print_search((char *) argv->buffer);
596 jermar 614
 
615
    return 1;
616
}
617
 
618
/** Call function with zero parameters */
619
int cmd_call0(cmd_arg_t *argv)
620
{
1780 jermar 621
    uintptr_t symaddr;
596 jermar 622
    char *symbol;
4055 trochtova 623
    unative_t (*fnc)(void);
624
    fncptr_t fptr;
4156 trochtova 625
    int rc;
626
 
627
    symbol = (char *) argv->buffer;
628
    rc = symtab_addr_lookup(symbol, &symaddr);
629
 
630
    if (rc == ENOENT)
631
        printf("Symbol %s not found.\n", symbol);
632
    else if (rc == EOVERFLOW) {
633
        symtab_print_search(symbol);
596 jermar 634
        printf("Duplicate symbol, be more specific.\n");
4156 trochtova 635
    } else if (rc == EOK) {
636
        fnc = (unative_t (*)(void)) arch_construct_function(&fptr,
637
            (void *) symaddr, (void *) cmd_call0);
4055 trochtova 638
        printf("Calling %s() (%p)\n", symbol, symaddr);
639
        printf("Result: %#" PRIxn "\n", fnc());
4156 trochtova 640
    } else {
641
        printf("No symbol information available.\n");
596 jermar 642
    }
643
    return 1;
644
}
645
 
2223 decky 646
/** Call function with zero parameters on each CPU */
647
int cmd_mcall0(cmd_arg_t *argv)
648
{
649
    /*
650
     * For each CPU, create a thread which will
651
     * call the function.
652
     */
653
 
4537 trochtova 654
    size_t i;
2223 decky 655
    for (i = 0; i < config.cpu_count; i++) {
2319 decky 656
        if (!cpus[i].active)
657
            continue;
658
 
2223 decky 659
        thread_t *t;
660
        if ((t = thread_create((void (*)(void *)) cmd_call0, (void *) argv, TASK, THREAD_FLAG_WIRED, "call0", false))) {
661
            spinlock_lock(&t->lock);
662
            t->cpu = &cpus[i];
663
            spinlock_unlock(&t->lock);
664
            printf("cpu%u: ", i);
665
            thread_ready(t);
666
            thread_join(t);
2224 decky 667
            thread_detach(t);
2223 decky 668
        } else
669
            printf("Unable to create thread for cpu%u\n", i);
670
    }
671
 
672
    return 1;
673
}
674
 
596 jermar 675
/** Call function with one parameter */
676
int cmd_call1(cmd_arg_t *argv)
677
{
1780 jermar 678
    uintptr_t symaddr;
596 jermar 679
    char *symbol;
4055 trochtova 680
    unative_t (*fnc)(unative_t, ...);
1780 jermar 681
    unative_t arg1 = argv[1].intval;
4055 trochtova 682
    fncptr_t fptr;
4156 trochtova 683
    int rc;
684
 
685
    symbol = (char *) argv->buffer;
686
    rc = symtab_addr_lookup(symbol, &symaddr);
687
 
688
    if (rc == ENOENT) {
689
        printf("Symbol %s not found.\n", symbol);
690
    } else if (rc == EOVERFLOW) {
691
        symtab_print_search(symbol);
596 jermar 692
        printf("Duplicate symbol, be more specific.\n");
4156 trochtova 693
    } else if (rc == EOK) {
4055 trochtova 694
        fnc = (unative_t (*)(unative_t, ...)) arch_construct_function(&fptr, (void *) symaddr, (void *) cmd_call1);
695
        printf("Calling f(%#" PRIxn "): %p: %s\n", arg1, symaddr, symbol);
696
        printf("Result: %#" PRIxn "\n", fnc(arg1));
4156 trochtova 697
    } else {
698
        printf("No symbol information available.\n");
596 jermar 699
    }
4156 trochtova 700
 
596 jermar 701
    return 1;
702
}
703
 
704
/** Call function with two parameters */
705
int cmd_call2(cmd_arg_t *argv)
706
{
1780 jermar 707
    uintptr_t symaddr;
596 jermar 708
    char *symbol;
4055 trochtova 709
    unative_t (*fnc)(unative_t, unative_t, ...);
1780 jermar 710
    unative_t arg1 = argv[1].intval;
711
    unative_t arg2 = argv[2].intval;
4055 trochtova 712
    fncptr_t fptr;
4156 trochtova 713
    int rc;
714
 
715
    symbol = (char *) argv->buffer;
716
    rc = symtab_addr_lookup(symbol, &symaddr);
717
 
718
    if (rc == ENOENT) {
719
        printf("Symbol %s not found.\n", symbol);
720
    } else if (rc == EOVERFLOW) {
721
        symtab_print_search(symbol);
596 jermar 722
        printf("Duplicate symbol, be more specific.\n");
4156 trochtova 723
    } else if (rc == EOK) {
4055 trochtova 724
        fnc = (unative_t (*)(unative_t, unative_t, ...)) arch_construct_function(&fptr, (void *) symaddr, (void *) cmd_call2);
725
        printf("Calling f(%#" PRIxn ", %#" PRIxn "): %p: %s\n",
726
               arg1, arg2, symaddr, symbol);
727
        printf("Result: %#" PRIxn "\n", fnc(arg1, arg2));
4156 trochtova 728
    } else {
729
        printf("No symbol information available.\n");
596 jermar 730
    }
731
    return 1;
732
}
733
 
734
/** Call function with three parameters */
735
int cmd_call3(cmd_arg_t *argv)
736
{
1780 jermar 737
    uintptr_t symaddr;
596 jermar 738
    char *symbol;
4055 trochtova 739
    unative_t (*fnc)(unative_t, unative_t, unative_t, ...);
1780 jermar 740
    unative_t arg1 = argv[1].intval;
741
    unative_t arg2 = argv[2].intval;
742
    unative_t arg3 = argv[3].intval;
4055 trochtova 743
    fncptr_t fptr;
4156 trochtova 744
    int rc;
4055 trochtova 745
 
4156 trochtova 746
    symbol = (char *) argv->buffer;
747
    rc = symtab_addr_lookup(symbol, &symaddr);
748
 
749
    if (rc == ENOENT) {
750
        printf("Symbol %s not found.\n", symbol);
751
    } else if (rc == EOVERFLOW) {
752
        symtab_print_search(symbol);
596 jermar 753
        printf("Duplicate symbol, be more specific.\n");
4156 trochtova 754
    } else if (rc == EOK) {
4055 trochtova 755
        fnc = (unative_t (*)(unative_t, unative_t, unative_t, ...)) arch_construct_function(&fptr, (void *) symaddr, (void *) cmd_call3);
756
        printf("Calling f(%#" PRIxn ",%#" PRIxn ", %#" PRIxn "): %p: %s\n",
757
               arg1, arg2, arg3, symaddr, symbol);
758
        printf("Result: %#" PRIxn "\n", fnc(arg1, arg2, arg3));
4156 trochtova 759
    } else {
760
        printf("No symbol information available.\n");
596 jermar 761
    }
762
    return 1;
763
}
764
 
765
 
766
/** Print detailed description of 'describe' command. */
767
void desc_help(void)
768
{
769
    printf("Syntax: describe command_name\n");
770
}
771
 
772
/** Halt the kernel.
773
 *
774
 * @param argv Argument vector (ignored).
775
 *
776
 * @return 0 on failure, 1 on success (never returns).
777
 */
778
int cmd_halt(cmd_arg_t *argv)
779
{
780
    halt();
781
    return 1;
782
}
783
 
784
/** Command for printing TLB contents.
785
 *
786
 * @param argv Not used.
787
 *
788
 * @return Always returns 1.
789
 */
673 jermar 790
int cmd_tlb(cmd_arg_t *argv)
596 jermar 791
{
792
    tlb_print();
793
    return 1;
794
}
603 palkovsky 795
 
2721 decky 796
/** Command for printing physical memory configuration.
797
 *
798
 * @param argv Not used.
799
 *
800
 * @return Always returns 1.
801
 */
802
int cmd_physmem(cmd_arg_t *argv)
803
{
804
    physmem_print();
805
    return 1;
806
}
807
 
603 palkovsky 808
/** Write 4 byte value to address */
809
int cmd_set4(cmd_arg_t *argv)
810
{
4156 trochtova 811
    uintptr_t addr;
1780 jermar 812
    uint32_t arg1 = argv[1].intval;
603 palkovsky 813
    bool pointer = false;
4156 trochtova 814
    int rc;
603 palkovsky 815
 
816
    if (((char *)argv->buffer)[0] == '*') {
4156 trochtova 817
        rc = symtab_addr_lookup((char *) argv->buffer + 1, &addr);
603 palkovsky 818
        pointer = true;
2114 decky 819
    } else if (((char *) argv->buffer)[0] >= '0' &&
4156 trochtova 820
           ((char *)argv->buffer)[0] <= '9') {
821
        rc = EOK;
822
        addr = atoi((char *)argv->buffer);
823
    } else {
824
        rc = symtab_addr_lookup((char *) argv->buffer, &addr);
825
    }
603 palkovsky 826
 
4156 trochtova 827
    if (rc == ENOENT)
603 palkovsky 828
        printf("Symbol %s not found.\n", argv->buffer);
4156 trochtova 829
    else if (rc == EOVERFLOW) {
2114 decky 830
        symtab_print_search((char *) argv->buffer);
603 palkovsky 831
        printf("Duplicate symbol, be more specific.\n");
4156 trochtova 832
    } else if (rc == EOK) {
603 palkovsky 833
        if (pointer)
4156 trochtova 834
            addr = *(uintptr_t *) addr;
4055 trochtova 835
        printf("Writing %#" PRIx64 " -> %p\n", arg1, addr);
4156 trochtova 836
        *(uint32_t *) addr = arg1;
837
    } else {
838
        printf("No symbol information available.\n");
603 palkovsky 839
    }
840
 
841
    return 1;
842
}
668 bondari 843
 
759 palkovsky 844
/** Command for listings SLAB caches
845
 *
846
 * @param argv Ignores
847
 *
848
 * @return Always 1
849
 */
850
int cmd_slabs(cmd_arg_t * argv) {
851
    slab_print_list();
852
    return 1;
853
}
854
 
777 palkovsky 855
 
775 palkovsky 856
/** Command for listings Thread information
857
 *
858
 * @param argv Ignores
859
 *
860
 * @return Always 1
861
 */
777 palkovsky 862
int cmd_threads(cmd_arg_t * argv) {
863
    thread_print_list();
864
    return 1;
865
}
866
 
1060 palkovsky 867
/** Command for listings Task information
868
 *
869
 * @param argv Ignores
870
 *
871
 * @return Always 1
872
 */
873
int cmd_tasks(cmd_arg_t * argv) {
874
    task_print_list();
875
    return 1;
876
}
877
 
777 palkovsky 878
/** Command for listings Thread information
879
 *
880
 * @param argv Ignores
881
 *
882
 * @return Always 1
883
 */
775 palkovsky 884
int cmd_sched(cmd_arg_t * argv) {
885
    sched_print_list();
886
    return 1;
887
}
888
 
677 bondari 889
/** Command for listing memory zones
890
 *
891
 * @param argv Ignored
892
 *
893
 * return Always 1
894
 */
668 bondari 895
int cmd_zones(cmd_arg_t * argv) {
676 bondari 896
    zone_print_list();
668 bondari 897
    return 1;
898
}
673 jermar 899
 
677 bondari 900
/** Command for memory zone details
901
 *
902
 * @param argv Integer argument from cmdline expected
903
 *
904
 * return Always 1
905
 */
668 bondari 906
int cmd_zone(cmd_arg_t * argv) {
676 bondari 907
    zone_print_one(argv[0].intval);
668 bondari 908
    return 1;
909
}
910
 
1573 palkovsky 911
/** Command for printing task ipc details
912
 *
913
 * @param argv Integer argument from cmdline expected
914
 *
915
 * return Always 1
916
 */
4055 trochtova 917
int cmd_ipc(cmd_arg_t * argv) {
1573 palkovsky 918
    ipc_print_task(argv[0].intval);
919
    return 1;
920
}
921
 
922
 
673 jermar 923
/** Command for listing processors.
924
 *
925
 * @param argv Ignored.
926
 *
927
 * return Always 1.
928
 */
929
int cmd_cpus(cmd_arg_t *argv)
930
{
931
    cpu_list();
932
    return 1;
933
}
934
 
935
/** Command for printing kernel version.
936
 *
937
 * @param argv Ignored.
938
 *
939
 * return Always 1.
940
 */
941
int cmd_version(cmd_arg_t *argv)
942
{
943
    version_print();
944
    return 1;
945
}
1474 palkovsky 946
 
947
/** Command for returning console back to userspace.
948
 *
949
 * @param argv Ignored.
950
 *
951
 * return Always 1.
952
 */
953
int cmd_continue(cmd_arg_t *argv)
954
{
1695 jermar 955
    printf("The kernel will now relinquish the console.\n");
4055 trochtova 956
    release_console();
957
 
4201 trochtova 958
    event_notify_0(EVENT_KCONSOLE);
4420 trochtova 959
    indev_pop_character(stdin);
4055 trochtova 960
 
1474 palkovsky 961
    return 1;
962
}
1702 cejka 963
 
2020 decky 964
#ifdef CONFIG_TEST
2019 decky 965
/** Command for printing kernel tests list.
966
 *
967
 * @param argv Ignored.
968
 *
969
 * return Always 1.
970
 */
971
int cmd_tests(cmd_arg_t *argv)
972
{
4537 trochtova 973
    size_t len = 0;
2019 decky 974
    test_t *test;
4055 trochtova 975
    for (test = tests; test->name != NULL; test++) {
4296 trochtova 976
        if (str_length(test->name) > len)
977
            len = str_length(test->name);
4055 trochtova 978
    }
2019 decky 979
 
980
    for (test = tests; test->name != NULL; test++)
4055 trochtova 981
        printf("%-*s %s%s\n", len, test->name, test->desc, (test->safe ? "" : " (unsafe)"));
2019 decky 982
 
4055 trochtova 983
    printf("%-*s Run all safe tests\n", len, "*");
2019 decky 984
    return 1;
985
}
986
 
2042 decky 987
static bool run_test(const test_t *test)
2027 decky 988
{
4055 trochtova 989
    printf("%s (%s)\n", test->name, test->desc);
2030 decky 990
 
991
    /* Update and read thread accounting
992
       for benchmarking */
993
    ipl_t ipl = interrupts_disable();
2039 decky 994
    spinlock_lock(&TASK->lock);
995
    uint64_t t0 = task_get_accounting(TASK);
996
    spinlock_unlock(&TASK->lock);
2030 decky 997
    interrupts_restore(ipl);
998
 
999
    /* Execute the test */
4296 trochtova 1000
    test_quiet = false;
1001
    char *ret = test->entry();
2030 decky 1002
 
1003
    /* Update and read thread accounting */
1004
    ipl = interrupts_disable();
2039 decky 1005
    spinlock_lock(&TASK->lock);
1006
    uint64_t dt = task_get_accounting(TASK) - t0;
1007
    spinlock_unlock(&TASK->lock);
2030 decky 1008
    interrupts_restore(ipl);
1009
 
2050 decky 1010
    uint64_t cycles;
1011
    char suffix;
1012
    order(dt, &cycles, &suffix);
1013
 
4055 trochtova 1014
    printf("Time: %" PRIu64 "%c cycles\n", cycles, suffix);
2027 decky 1015
 
1016
    if (ret == NULL) {
1017
        printf("Test passed\n");
2042 decky 1018
        return true;
2027 decky 1019
    }
1020
 
1021
    printf("%s\n", ret);
2042 decky 1022
    return false;
2027 decky 1023
}
1024
 
2050 decky 1025
static bool run_bench(const test_t *test, const uint32_t cnt)
1026
{
1027
    uint32_t i;
1028
    bool ret = true;
1029
    uint64_t cycles;
1030
    char suffix;
1031
 
1032
    if (cnt < 1)
1033
        return true;
1034
 
2114 decky 1035
    uint64_t *data = (uint64_t *) malloc(sizeof(uint64_t) * cnt, 0);
2050 decky 1036
    if (data == NULL) {
1037
        printf("Error allocating memory for statistics\n");
1038
        return false;
1039
    }
1040
 
1041
    for (i = 0; i < cnt; i++) {
4055 trochtova 1042
        printf("%s (%u/%u) ... ", test->name, i + 1, cnt);
2050 decky 1043
 
1044
        /* Update and read thread accounting
1045
           for benchmarking */
1046
        ipl_t ipl = interrupts_disable();
1047
        spinlock_lock(&TASK->lock);
1048
        uint64_t t0 = task_get_accounting(TASK);
1049
        spinlock_unlock(&TASK->lock);
1050
        interrupts_restore(ipl);
1051
 
1052
        /* Execute the test */
4296 trochtova 1053
        test_quiet = true;
1054
        char * ret = test->entry();
2050 decky 1055
 
1056
        /* Update and read thread accounting */
1057
        ipl = interrupts_disable();
1058
        spinlock_lock(&TASK->lock);
1059
        uint64_t dt = task_get_accounting(TASK) - t0;
1060
        spinlock_unlock(&TASK->lock);
1061
        interrupts_restore(ipl);
1062
 
1063
        if (ret != NULL) {
1064
            printf("%s\n", ret);
1065
            ret = false;
1066
            break;
1067
        }
1068
 
1069
        data[i] = dt;
1070
        order(dt, &cycles, &suffix);
4055 trochtova 1071
        printf("OK (%" PRIu64 "%c cycles)\n", cycles, suffix);
2050 decky 1072
    }
1073
 
1074
    if (ret) {
1075
        printf("\n");
1076
 
1077
        uint64_t sum = 0;
1078
 
1079
        for (i = 0; i < cnt; i++) {
1080
            sum += data[i];
1081
        }
1082
 
1083
        order(sum / (uint64_t) cnt, &cycles, &suffix);
4055 trochtova 1084
        printf("Average\t\t%" PRIu64 "%c\n", cycles, suffix);
2050 decky 1085
    }
1086
 
1087
    free(data);
1088
 
1089
    return ret;
1090
}
1091
 
2019 decky 1092
/** Command for returning kernel tests
1093
 *
1094
 * @param argv Argument vector.
1095
 *
1096
 * return Always 1.
1097
 */
1098
int cmd_test(cmd_arg_t *argv)
1099
{
1100
    test_t *test;
1101
 
4296 trochtova 1102
    if (str_cmp((char *) argv->buffer, "*") == 0) {
2020 decky 1103
        for (test = tests; test->name != NULL; test++) {
1104
            if (test->safe) {
2027 decky 1105
                printf("\n");
1106
                if (!run_test(test))
1107
                    break;
2020 decky 1108
            }
2019 decky 1109
        }
2020 decky 1110
    } else {
1111
        bool fnd = false;
1112
 
1113
        for (test = tests; test->name != NULL; test++) {
4296 trochtova 1114
            if (str_cmp(test->name, (char *) argv->buffer) == 0) {
2020 decky 1115
                fnd = true;
2027 decky 1116
                run_test(test);
2020 decky 1117
                break;
1118
            }
1119
        }
1120
 
1121
        if (!fnd)
2027 decky 1122
            printf("Unknown test\n");
2019 decky 1123
    }
1124
 
1125
    return 1;
1126
}
2050 decky 1127
 
1128
/** Command for returning kernel tests as benchmarks
1129
 *
1130
 * @param argv Argument vector.
1131
 *
1132
 * return Always 1.
1133
 */
1134
int cmd_bench(cmd_arg_t *argv)
1135
{
1136
    test_t *test;
1137
    uint32_t cnt = argv[1].intval;
1138
 
4296 trochtova 1139
    if (str_cmp((char *) argv->buffer, "*") == 0) {
1140
        for (test = tests; test->name != NULL; test++) {
1141
            if (test->safe) {
1142
                if (!run_bench(test, cnt))
1143
                    break;
1144
            }
2050 decky 1145
        }
4296 trochtova 1146
    } else {
1147
        bool fnd = false;
1148
 
1149
        for (test = tests; test->name != NULL; test++) {
1150
            if (str_cmp(test->name, (char *) argv->buffer) == 0) {
1151
                fnd = true;
1152
 
1153
                if (test->safe)
1154
                    run_bench(test, cnt);
1155
                else
1156
                    printf("Unsafe test\n");
1157
 
1158
                break;
1159
            }
1160
        }
1161
 
1162
        if (!fnd)
1163
            printf("Unknown test\n");
2050 decky 1164
    }
4296 trochtova 1165
 
2050 decky 1166
    return 1;
1167
}
1168
 
2020 decky 1169
#endif
2019 decky 1170
 
1888 jermar 1171
/** @}
1702 cejka 1172
 */