Return to grind2a-2a.c CVS log

Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / doc / manual

Annotation of 43BSDReno/contrib/isode-beta/doc/manual/grind2a-2a.c, revision 1.1

1.1     ! root        1: #include <stdio.h>
        !             2: #include "generic.h"           /* defines OPERATIONS and ERRORS */
        !             3: #include <isode/rosap.h>
        !             4: #include <isode/tsap.h>                /* for listening */
        !             5: #include <setjmp.h>
        !             6: 
        !             7: 
        !             8: static char *myservice = "service";
        !             9: static char *mycontext = "context";
        !            10: 
        !            11: static jmp_buf toplevel;
        !            12: 
        !            13: 
        !            14: int    ros_init (), ros_work (), ros_lose ();
        !            15: 
        !            16: 
        !            17: main (argc, argv, envp)
        !            18: int    argc;
        !            19: char  **argv,
        !            20:       **envp;
        !            21: {
        !            22:     AEI            aei;
        !            23:     struct TSAPdisconnect tds;
        !            24:     register struct TSAPdisconnect *td = &tds;
        !            25: 
        !            26:     if ((aei = _str2aei (PLocalHostName (), myservice, mycontext, 0))
        !            27:            == NULLAEI)
        !            28:        fatal ("unable to resolve service: %s", PY_pepy);
        !            29: 
        !            30:     if (isodeserver (argc, argv, aei, ros_init, ros_work, ros_lose, td)
        !            31:            == NOTOK) {
        !            32:        if (td -> td_cc > 0)
        !            33:            fatal ("isodeserver: [%s] %*.*s", TErrString (td -> td_reason),
        !            34:                    td -> td_cc, td -> td_cc, td -> td_data);
        !            35:        else
        !            36:            fatal ("isodeserver: [%s]", TErrString (td -> td_reason));
        !            37:     }
        !            38: 
        !            39:     exit (0);
        !            40: }
        !            41: 
        !            42: ...

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