Subversion Repositories HelenOS-historic

Rev

Rev 1486 | Rev 1518 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
447 decky 1
/*
2
 * Copyright (C) 2005 Martin Decky
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
 
713 decky 29
#include "version.h"
1353 jermar 30
#include <ipc/ipc.h>
31
#include <ipc/services.h>
32
#include <ipc/ns.h>
988 palkovsky 33
#include <stdio.h>
34
#include <unistd.h>
35
#include <stdlib.h>
1065 jermar 36
#include <thread.h>
1175 jermar 37
#include <task.h>
1113 palkovsky 38
#include <psthread.h>
1111 jermar 39
#include <futex.h>
1250 jermar 40
#include <as.h>
1279 palkovsky 41
#include <ddi.h>
1330 palkovsky 42
#include <string.h>
1343 jermar 43
#include <errno.h>
1339 cejka 44
#include <kbd.h>
1363 vana 45
#include <ipc/fb.h>
1427 palkovsky 46
#include <async.h>
1449 palkovsky 47
#include <sys/time.h>
999 palkovsky 48
 
1089 palkovsky 49
int a;
1111 jermar 50
atomic_t ftx;
1089 palkovsky 51
 
1152 jermar 52
int __thread stage;
1129 palkovsky 53
 
1065 jermar 54
extern void utest(void *arg);
55
void utest(void *arg)
56
{
1081 jermar 57
    printf("Uspace thread started.\n");
1111 jermar 58
    if (futex_down(&ftx) < 0)
59
        printf("Futex failed.\n");
60
    if (futex_up(&ftx) < 0)
61
        printf("Futex failed.\n");
62
 
63
    printf("%s in good condition.\n", __FUNCTION__);
64
 
1065 jermar 65
    for (;;)
66
        ;
67
}
1049 cejka 68
 
1197 cejka 69
/* test different parameters types and modifiers */
995 cejka 70
static void test_printf(void)
71
{
72
    printf("Simple text.\n");
73
    printf("Now insert '%s' string.\n","this");
1073 cejka 74
    printf("Signed formats on uns. numbers: '%d', '%+d', '% d', '%u' (,+, ,u)\n", 321, 321, 321, 321);
75
    printf("Signed formats on sig. numbers: '%d', '%+d', '% d', '%u' (,+, ,u)\n", -321, -321, -321, -321);
76
    printf("Signed with different sized: '%hhd', '%hd', '%d', '%ld', %lld;\n", -3, -32, -321, -32101l, -3210123ll);
77
    printf("And now... '%hhd' byte! '%hd' word! '%d' int! \n", 11, 11111, 1111111111);
78
    printf("Different bases: %#hx, %#hu, %#ho and %#hb\n", 123, 123, 123, 123);
79
    printf("Different bases signed: %#hx, %#hu, %#ho and %#hb\n", -123, -123, -123, -123);
80
    printf("'%llX' llX! Another '%llx' llx! \n", 0x1234567887654321ll, 0x1234567887654321ll);
81
    printf("'%llX' with 64bit value and '%x' with 32 bit value. \n", 0x1234567887654321ll, 0x12345678 );
82
    printf("'%llx' 64bit, '%x' 32bit, '%hhx' 8bit, '%hx' 16bit, '%llX' 64bit and '%s' string.\n", 0x1234567887654321ll, 0x12345678, 0x12, 0x1234, 0x1234567887654321ull, "Lovely string" );
1049 cejka 83
 
995 cejka 84
    printf("Thats all, folks!\n");
85
}
999 palkovsky 86
 
1197 cejka 87
/* test width and precision modifiers */
88
static void test_printf2(void)
89
{
90
    printf(" text 10.8s %*.*s \n", 5, 3, "text");
91
    printf(" very long text 10.8s %10.8s \n", "very long text");
92
    printf(" text 8.10s %8.10s \n", "text");
93
    printf(" very long text 8.10s %8.10s \n", "very long text");
1049 cejka 94
 
1197 cejka 95
    printf(" char: c '%c', 3.2c '%3.2c', -3.2c '%-3.2c', 2.3c '%2.3c', -2.3c '%-2.3c' \n",'a', 'b', 'c', 'd', 'e' );
96
    printf(" int: d '%d', 3.2d '%3.2d', -3.2d '%-3.2d', 2.3d '%2.3d', -2.3d '%-2.3d' \n",1, 1, 1, 1, 1 );
97
    printf(" -int: d '%d', 3.2d '%3.2d', -3.2d '%-3.2d', 2.3d '%2.3d', -2.3d '%-2.3d' \n",-1, -1, -1, -1, -1 );
98
    printf(" 0xint: x '%x', 5.3x '%#5.3x', -5.3x '%#-5.3x', 3.5x '%#3.5x', -3.5x '%#-3.5x' \n",17, 17, 17, 17, 17 );
99
 
100
}
101
 
1028 palkovsky 102
extern char _heap;
994 jermar 103
static void test_mremap(void)
988 palkovsky 104
{
105
    printf("Writing to good memory\n");
1228 jermar 106
    as_area_resize(&_heap, 120000, 0);
988 palkovsky 107
    printf("%P\n", ((char *)&_heap));
108
    printf("%P\n", ((char *)&_heap) + 80000);
109
    *(((char *)&_heap) + 80000) = 10;
110
    printf("Making small\n");
1228 jermar 111
    as_area_resize(&_heap, 16000, 0);
988 palkovsky 112
    printf("Failing..\n");
113
    *((&_heap) + 80000) = 10;
114
 
115
    printf("memory done\n");
116
}
117
/*
118
static void test_sbrk(void)
119
{
120
    printf("Writing to good memory\n");
121
    printf("Got: %P\n", sbrk(120000));
122
    printf("%P\n", ((char *)&_heap));
123
    printf("%P\n", ((char *)&_heap) + 80000);
124
    *(((char *)&_heap) + 80000) = 10;
125
    printf("Making small, got: %P\n",sbrk(-120000));
126
    printf("Testing access to heap\n");
127
    _heap = 10;
128
    printf("Failing..\n");
129
    *((&_heap) + 80000) = 10;
130
 
131
    printf("memory done\n");
132
}
133
*/
134
/*
135
static void test_malloc(void)
136
{
137
    char *data;
138
 
139
    data = malloc(10);
140
    printf("Heap: %P, data: %P\n", &_heap, data);
141
    data[0] = 'a';
142
    free(data);
143
}
144
*/
145
 
1028 palkovsky 146
 
147
static void test_ping(void)
148
{
149
    ipcarg_t result;
150
    int retval;
151
 
1091 palkovsky 152
    printf("Pinging\n");
1028 palkovsky 153
    retval = ipc_call_sync(PHONE_NS, NS_PING, 0xbeef,&result);
154
    printf("Retval: %d - received: %P\n", retval, result);
155
}
156
 
1091 palkovsky 157
static void got_answer(void *private, int retval, ipc_call_t *data)
999 palkovsky 158
{
1073 cejka 159
    printf("Retval: %d...%s...%zX, %zX\n", retval, private,
999 palkovsky 160
           IPC_GET_ARG1(*data), IPC_GET_ARG2(*data));
161
}
162
static void test_async_ipc(void)
163
{
1028 palkovsky 164
    ipc_call_t data;
999 palkovsky 165
    int i;
166
 
167
    printf("Sending ping\n");
168
    ipc_call_async_2(PHONE_NS, NS_PING, 1, 0xbeefbee2,
169
             "Pong1", got_answer);
170
    ipc_call_async_2(PHONE_NS, NS_PING, 2, 0xbeefbee4,
171
             "Pong2", got_answer);
172
    ipc_call_async_2(PHONE_NS, NS_PING, 3, 0xbeefbee4,
173
             "Pong3", got_answer);
174
    ipc_call_async_2(PHONE_NS, NS_PING, 4, 0xbeefbee4,
175
             "Pong4", got_answer);
176
    ipc_call_async_2(PHONE_NS, NS_PING, 5, 0xbeefbee4,
177
             "Pong5", got_answer);
178
    ipc_call_async_2(PHONE_NS, NS_PING, 6, 0xbeefbee4,
179
             "Pong6", got_answer);
180
    printf("Waiting forever...\n");
181
    for (i=0; i<100;i++)
182
        printf(".");
183
    printf("\n");
1365 jermar 184
    ipc_wait_for_call(&data);
999 palkovsky 185
    printf("Received call???\n");
186
}
187
 
1028 palkovsky 188
 
1091 palkovsky 189
static void got_answer_2(void *private, int retval, ipc_call_t *data)
1028 palkovsky 190
{
191
    printf("Pong\n");
192
}
193
static void test_advanced_ipc(void)
194
{
195
    int res;
1091 palkovsky 196
    ipcarg_t phonead;
1028 palkovsky 197
    ipc_callid_t callid;
198
    ipc_call_t data;
1061 palkovsky 199
    int i;
1028 palkovsky 200
 
201
    printf("Asking 0 to connect to me...\n");
1091 palkovsky 202
    res = ipc_connect_to_me(0, 1, 2, &phonead);
203
    printf("Result: %d - phonead: %llu\n", res, phonead);
1061 palkovsky 204
    for (i=0; i < 100; i++) {
1028 palkovsky 205
        printf("----------------\n");
206
        ipc_call_async(PHONE_NS, NS_PING_SVC, 0, "prov",
207
                   got_answer_2);
1365 jermar 208
        callid = ipc_wait_for_call(&data);
1028 palkovsky 209
        printf("Received ping\n");
1343 jermar 210
        ipc_answer_fast(callid, 0, 0, 0);
1061 palkovsky 211
    }
1089 palkovsky 212
//  callid = ipc_wait_for_call(&data, NULL);
1028 palkovsky 213
}
214
 
1061 palkovsky 215
static void test_connection_ipc(void)
216
{
217
    int res;
218
    ipcarg_t result;
1091 palkovsky 219
    int phoneid;
1061 palkovsky 220
 
221
    printf("Starting connect...\n");
222
    res = ipc_connect_me_to(PHONE_NS, 10, 20);
223
    printf("Connected: %d\n", res);
224
    printf("pinging.\n");
225
    res = ipc_call_sync(res, NS_PING, 0xbeef,&result);
1089 palkovsky 226
    printf("Retval: %d - received: %X\n", res, result);
1061 palkovsky 227
 
228
}
229
 
1089 palkovsky 230
static void test_hangup(void)
231
{
232
    int phoneid;
233
    ipc_call_t data;
234
    ipc_callid_t callid;
235
    int i;
236
 
237
    printf("Starting connect...\n");
238
    phoneid = ipc_connect_me_to(PHONE_NS, 10, 20);
239
    printf("Phoneid: %d, pinging\n", phoneid);
240
    ipc_call_async_2(PHONE_NS, NS_PING, 1, 0xbeefbee2,
241
             "Pong1", got_answer);
242
    printf("Hangin up\n");
243
    ipc_hangup(phoneid);
244
    printf("Connecting\n");
245
    phoneid = ipc_connect_me_to(PHONE_NS, 10, 20);
246
    printf("Newphid: %d\n", phoneid);
247
    for (i=0; i < 1000; i++) {
1365 jermar 248
        if ((callid=ipc_trywait_for_call(&data)))
1089 palkovsky 249
            printf("callid: %d\n");
250
    }
251
    printf("New new phoneid: %d\n", ipc_connect_me_to(PHONE_NS, 10, 20));
252
}
253
 
254
static void test_slam(void)
255
{
256
    int i;
257
    ipc_call_t data;
258
    ipc_callid_t callid;
259
 
260
    printf("ping");
261
    ipc_call_async_2(PHONE_NS, NS_PING, 1, 0xbeefbee2,
262
             "Pong1", got_answer);
263
    printf("slam");
264
    ipc_call_async_2(PHONE_NS, NS_HANGUP, 1, 0xbeefbee2,
265
             "Hang", got_answer);
266
    printf("ping2\n");
267
    ipc_call_async_2(PHONE_NS, NS_PING, 1, 0xbeefbee2,
268
             "Ping2", got_answer);
269
 
270
    for (i=0; i < 1000; i++) {
1365 jermar 271
        if ((callid=ipc_trywait_for_call(&data)))
1089 palkovsky 272
            printf("callid: %d\n");
273
    }
274
    ipc_call_async_2(PHONE_NS, NS_PING, 1, 0xbeefbee2,
275
             "Pong1", got_answer);
276
    printf("Closing file\n");
277
    ipc_hangup(PHONE_NS);
278
    ipc_call_async_2(PHONE_NS, NS_PING, 1, 0xbeefbee2,
279
             "Pong1", got_answer);
1365 jermar 280
    ipc_wait_for_call(&data);
1089 palkovsky 281
}
282
 
1113 palkovsky 283
static int ptest(void *arg)
284
{
1152 jermar 285
    stage = 1;
286
    printf("Pseudo thread stage%d.\n", stage);
287
    stage++;
1128 jermar 288
    psthread_schedule_next();
1152 jermar 289
    printf("Pseudo thread stage%d.\n", stage);
290
    stage++;
1128 jermar 291
    psthread_schedule_next();
1152 jermar 292
    printf("Pseudo thread stage%d.\n", stage);
1128 jermar 293
    psthread_schedule_next();
1152 jermar 294
    stage++;
295
    printf("Pseudo thread stage%d.\n", stage);
1128 jermar 296
    psthread_schedule_next();
297
    printf("Pseudo thread exiting.\n");
1113 palkovsky 298
    return 0;  
299
}
1111 jermar 300
 
1339 cejka 301
static void test_kbd()
302
{
303
    int res;
304
    ipcarg_t result;
305
    int phoneid;
306
 
307
    printf("Test: Starting connect...\n");
1445 cejka 308
    while ((phoneid = ipc_connect_me_to(PHONE_NS, SERVICE_CONSOLE, 0)) < 0) {
1339 cejka 309
    };
310
 
311
    printf("Test: Connected: %d\n", res);
312
    printf("Test: pinging.\n");
1445 cejka 313
/*  while (1) {
314
 
1339 cejka 315
        res = ipc_call_sync(phoneid, KBD_GETCHAR, 0xbeef,&result);
316
//      printf("Test: Retval: %d - received: %c\n", res, result);
317
        printf("%c", result);
318
    }
1445 cejka 319
*/ 
1339 cejka 320
    printf("Test: Hangin up\n");
321
    ipc_hangup(phoneid);
322
}
323
 
1427 palkovsky 324
static void test_async_kbd()
325
{
326
    int res;
327
    ipcarg_t result;
328
    ipc_call_t kbddata;
329
    int phoneid;
330
    aid_t aid;
331
 
332
    printf("Test: Starting connect...\n");
333
    while ((phoneid = ipc_connect_me_to(PHONE_NS, SERVICE_KEYBOARD, 0)) < 0) {
334
    };
335
 
336
    printf("Test: Connected: %d\n", res);
337
    printf("Test: pinging.\n");
1441 palkovsky 338
 
1445 cejka 339
 
1427 palkovsky 340
    while (1) {
341
    }
342
 
343
    printf("Test: Hangin up\n");
344
    ipc_hangup(phoneid);
345
}
346
 
1343 jermar 347
static void test_pci()
348
{
349
    int phone;
350
    while ((phone = ipc_connect_me_to(PHONE_NS, SERVICE_PCI, 0)) < 0)
351
        ;
352
    printf("Connected to PCI service through phone %d.\n", phone);
353
}
354
 
1360 jermar 355
static int test_as_area_send()
1330 palkovsky 356
{
1360 jermar 357
    char *as_area;
1330 palkovsky 358
    int retval;
359
    ipcarg_t result;
360
 
1360 jermar 361
    as_area = as_area_create((void *)(1024*1024), 16384, AS_AREA_READ | AS_AREA_WRITE);
362
    if (!as_area) {
363
        printf("Error creating as_area.\n");
1330 palkovsky 364
        return 0;
365
    }
366
 
1360 jermar 367
    memcpy(as_area, "Hello world.\n", 14);
1330 palkovsky 368
 
1418 jermar 369
    retval = ipc_call_sync_3(PHONE_NS, IPC_M_AS_AREA_SEND, (sysarg_t) as_area, 0, AS_AREA_READ,
370
        NULL, NULL, NULL);
1330 palkovsky 371
    if (retval) {
1360 jermar 372
        printf("AS_AREA_SEND failed.\n");
1330 palkovsky 373
        return 0;
374
    }
375
    printf("Done\n");
376
}
377
 
1363 vana 378
static void test_fb()
379
{
380
    int res;
381
    ipcarg_t result;
382
    int phoneid;
1486 palkovsky 383
    int vp;
1363 vana 384
 
385
//  printf("Test: Starting connect...\n");
386
 
387
    while ((phoneid = ipc_connect_me_to(PHONE_NS, SERVICE_VIDEO, 0)) < 0) {
388
        volatile int a;
389
        for(a=0;a<1048576;a++);
390
    };
391
 
1486 palkovsky 392
    usleep(100000);
393
    vp = ipc_call_sync_3(phoneid, FB_VIEWPORT_CREATE, (200 << 16) | 300, (200 << 16) | 150,0,NULL,NULL,NULL);
394
    if (! ipc_call_sync(phoneid, FB_VIEWPORT_SWITCH, vp, NULL)) {
395
        ipc_call_sync_2(phoneid, FB_SET_STYLE, 0, 0xffffff, NULL, NULL);
396
        ipc_call_sync(phoneid, FB_CLEAR, 0, NULL);
397
        ipc_call_sync_3(phoneid, FB_PUTCHAR, 'X', 0,0, NULL, NULL, NULL);
1363 vana 398
    }
1486 palkovsky 399
 
1363 vana 400
    ipc_hangup(phoneid);
401
}
402
 
1435 palkovsky 403
static void test_time(void)
404
{
405
    int rc;
406
    struct timeval tv;
407
    struct timezone tz;
1363 vana 408
 
1435 palkovsky 409
    while (1) {
410
        rc = gettimeofday(&tv, &tz);
411
        printf("Rc: %d, Secs: %d, Usecs: %d\n", rc, tv.tv_sec,
412
               tv.tv_usec);
413
    }
414
}
415
 
1465 cejka 416
static void test_console(void)
417
{
418
    int c;
419
 
420
    while ((c = getchar()) != EOF)
421
        putchar(c);
422
}
423
 
424
 
447 decky 425
int main(int argc, char *argv[])
426
{
1113 palkovsky 427
    pstid_t ptid;
1065 jermar 428
    int tid;
1197 cejka 429
 
1363 vana 430
//  version_print();
954 palkovsky 431
 
1465 cejka 432
    printf("Hello\nThis is Init\n");
433
 
1125 jermar 434
//  test_printf();
1197 cejka 435
//  test_printf2();
1028 palkovsky 436
//  test_ping();
437
//  test_async_ipc();
1061 palkovsky 438
//  test_advanced_ipc();
1089 palkovsky 439
//  test_connection_ipc();
440
//  test_hangup();
1091 palkovsky 441
//  test_slam();
1427 palkovsky 442
//  test_as_area_send();
1347 palkovsky 443
//  test_pci();
1427 palkovsky 444
//  test_kbd();
1441 palkovsky 445
//  test_time();
1453 palkovsky 446
//  test_async_kbd();
1363 vana 447
//  test_fb();
1489 palkovsky 448
    test_console();
1339 cejka 449
 
1465 cejka 450
    printf("\nBye.\n");
1363 vana 451
 
1330 palkovsky 452
/* 
1228 jermar 453
    printf("Userspace task, taskid=%llX\n", task_get_id());
1175 jermar 454
 
1111 jermar 455
    futex_initialize(&ftx, 1);
456
    if (futex_down(&ftx) < 0)
457
        printf("Futex failed.\n");
458
    if (futex_up(&ftx) < 0)
459
        printf("Futex failed.\n");
1089 palkovsky 460
 
1111 jermar 461
    if (futex_down(&ftx) < 0)
462
        printf("Futex failed.\n");
1152 jermar 463
 
1125 jermar 464
    if ((tid = thread_create(utest, NULL, "utest")) != -1) {
1091 palkovsky 465
        printf("Created thread tid=%d\n", tid);
466
    }
1111 jermar 467
 
1125 jermar 468
    if ((tid = thread_create(utest, NULL, "utest")) != -1) {
469
        printf("Created thread tid=%d\n", tid);
470
    }
1152 jermar 471
 
1111 jermar 472
    int i;
1343 jermar 473
 
1125 jermar 474
    for (i = 0; i < 50000000; i++)
1111 jermar 475
        ;
476
 
477
    if (futex_up(&ftx) < 0)
478
        printf("Futex failed.\n");
479
 
1129 palkovsky 480
 
1152 jermar 481
    printf("Creating pseudo thread.\n");
482
    stage = 1;
1113 palkovsky 483
    ptid = psthread_create(ptest, NULL);
1152 jermar 484
    printf("Main thread stage%d.\n", stage);
485
    stage++;
1128 jermar 486
    psthread_schedule_next();;
1152 jermar 487
    printf("Main thread stage%d.\n", stage);
488
    stage++;
1128 jermar 489
    psthread_schedule_next();;
1152 jermar 490
    printf("Main thread stage%d.\n", stage);
1113 palkovsky 491
 
1128 jermar 492
    psthread_join(ptid);
1113 palkovsky 493
 
1111 jermar 494
    printf("Main thread exiting.\n");
1330 palkovsky 495
*/
1343 jermar 496
 
447 decky 497
    return 0;
498
}