Return to test.c.ports CVS log

Up to [XINU] / xinu / sys / TEST

Annotation of xinu/sys/TEST/test.c.ports, revision 1.1.1.1

1.1       root        1: /* test.c - main */
                      2: 
                      3: #include <conf.h>
                      4: #include <kernel.h>
                      5: #include <mark.h>
                      6: #include <ports.h>
                      7: 
                      8: /*----------------------------------------------------------------------
                      9:  *  main  --  simple ports test
                     10:  *----------------------------------------------------------------------
                     11:  */
                     12: main()
                     13: {
                     14:        int     port1, port2, p();
                     15: 
                     16:        kprintf("Testing ports\n");
                     17:        kprintf("Pcreate(2) returns %d\n", port1=pcreate(2) );
                     18:        kprintf("Pcreate(3) returns %d\n", port2=pcreate(3) );
                     19:        kprintf("Psend(%d,100) = %d\n", port1, psend(port1,100) );
                     20:        kprintf("Preceive(%d) = %d\n", port1, preceive(port1) );
                     21:        kprintf("Psend(%d, 200) = %d\n", port1, psend(port1,200) );
                     22:        kprintf("Psend(%d, 300) = %d\n", port1, psend(port1,300) );
                     23:        kprintf("Psend(%d, 400) = %d\n", port2, psend(port2,400) );
                     24:        kprintf("Preceive(%d) = %d\n", port2, preceive(port2) );
                     25:        kprintf("Preceive(%d) = %d\n", port1, preceive(port1) );
                     26:        kprintf("Preceive(%d) = %d\n", port1, preceive(port1) );
                     27:        kprintf("Psend(%d, 500) = %d\n", port2, psend(port2,500) );
                     28:        kprintf("Psend(%d, 600) = %d\n", port2, psend(port2,600) );
                     29:        kprintf("Psend(%d, 700) = %d\n", port2, psend(port2,700) );
                     30:        kprintf("Creating process to read port %d\n", port2);
                     31:        resume(create(p,300,25,"ptest",1, port2));
                     32:        kprintf("Attempt to overflow port and cause wait\n");
                     33:        kprintf("Psend(%d, 800) = %d\n", port2, psend(port2,800) );
                     34:        kprintf("Psend(%d, 810) = %d\n", port2, psend(port2,810) );
                     35:        kprintf("Psend(%d, 820) = %d\n", port2, psend(port2,820) );
                     36:        kprintf("Psend(%d, 830) = %d\n", port2, psend(port2,830) );
                     37: 
                     38: }
                     39: p(port)
                     40: {
                     41:        int     msg;
                     42: 
                     43:        kprintf(" P:reading port %d every five seconds\n",port);
                     44:        for (msg=0 ; msg != 830 ; sleep10(50) )
                     45:            kprintf(" P: preceive(%d) = %d\n",port,msg=preceive(port));
                     46:        kprintf("End of port test\n");
                     47: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.