DataMuseum.dk

top - metrics - download

    Length: 1357 (0x54d)
    Types: TextFile
    Names: »grind2c-2.c«

└─⟦3d0c2be1b⟧ Bits:30001254 ISODE-5.0 Tape
    └─⟦eba4602b1⟧ »./isode-5.0.tar.Z« 
        └─⟦d3ac74d73⟧ 
            └─⟦this⟧ »isode-5.0/doc/manual/grind2c-2.c« 
└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0
    └─⟦35176feda⟧ »EurOpenD22/isode/isode-6.tar.Z« 
        └─⟦de7628f85⟧ 
            └─⟦this⟧ »isode-6.0/doc/manual/grind2c-2.c« 

TextFile

#include <stdio.h>
#include <isode/rtsap.h>


main (argc, argv, envp)
int	argc;
char  **argv,
      **envp;
{
    int	    result,
	    sd;
    struct RoSAPindication  rois;
    register struct RoSAPindication *roi = &rois;
    register struct RoSAPpreject   *rop = &roi -> roi_preject;
    struct RtSAPstart   rtss;
    register struct RtSAPstart *rts = &rtss;
    struct AcSAPstart *acs = &rts -> rts_start;
    strut PSAPstart *ps = &acs -> acs_start;
    struct RtSAPindication  rtis;
    register struct RtSAPindication *rti = &rtis;
    register struct RtSAPabort   *rta = &rti -> rti_abort;

    if (RtInit (argc, argv, rts, rti) == NOTOK)
	error ("initialization fails: %s", RtErrString (rta -> rta_reason));

    sd = rts -> rts_sd;
    RTSFREE (rts);
    
/* read command line arguments here... */

    if (RtOpenResponse (sd, ACS_ACCEPT, NULLOID, NULLAEI,
		&ps -> ps_called, NULLPC, ps -> ps_defctxresult,
		NULLPE, rti) == NOTOK)
	error ("RT-OPEN.RESPONSE: %s", RtErrString (rta -> rta_reason));

    if (RoSetService (sd, RoRtService, roi) == NOTOK)
	error ("RoSetService: %s", RoErrString (rop -> rop_reason));

    for (;;)
	switch (result = RoWaitRequest (sd, NOTOK, roi)) {
	    case NOTOK: 
	    case OK: 
	    case DONE: 
		ros_indication (sd, roi);
		break;

	    default: 
		error ("unknown return from RoWaitRequest=%d", result);
	}
}