Return to snd.c CVS log

Up to [Research Unix] / researchv9 / jtools / src / sunlib

Annotation of researchv9/jtools/src/sunlib/snd.c, revision 1.1

1.1     ! root        1: #include "jerq.h"
        !             2: #include <errno.h>
        !             3: 
        !             4: sendchar(c)
        !             5: char c;
        !             6: {
        !             7:        sendnchars(1, &c);
        !             8: }
        !             9: 
        !            10: sendnchars (n, p)
        !            11: char *p;
        !            12: int n;
        !            13: {
        !            14:        int i;
        !            15:        int maxfd, rmask, wmask;
        !            16: 
        !            17:        maxfd = displayfd + 1;
        !            18:        while(n){
        !            19:                i = write(1, p, n);
        !            20:                if(i > 0){
        !            21:                        n -= i;
        !            22:                        p += i;
        !            23:                        continue;
        !            24:                }
        !            25: #ifdef BSD
        !            26:                if(i < 0 && errno == EWOULDBLOCK){
        !            27: #else  /* V9 */
        !            28:                if(i < 0 && errno == EBUSY){
        !            29: #endif
        !            30:                        do{
        !            31: #ifdef X11
        !            32:                                while (XPending(dpy))
        !            33:                                        handleinput();
        !            34: #endif X11
        !            35:                                rmask = (1 << displayfd) | jerqrcvmask;
        !            36:                                wmask = 2;
        !            37: #ifdef BSD
        !            38:                                select(maxfd, &rmask, &wmask, 0, 0);
        !            39: #else
        !            40:                                select(maxfd, &rmask, &wmask, 0x6fffffff);
        !            41: #endif
        !            42:                                if (rmask & jerqrcvmask)
        !            43:                                        rcvfill();
        !            44:                                if (rmask & (1 << displayfd))
        !            45:                                        handleinput();
        !            46:                        } while(!wmask);
        !            47:                }
        !            48:                else
        !            49:                        exit(1);
        !            50:        }
        !            51: }

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