|
|
1.1 ! root 1: /* rtsaptrans.c - RTPM: transfer */ ! 2: ! 3: #ifndef lint ! 4: static char *rcsid = "$Header: /f/osi/rtsap/RCS/rtsaptrans.c,v 6.0 89/03/18 23:43:32 mrose Rel $"; ! 5: #endif ! 6: ! 7: /* ! 8: * $Header: /f/osi/rtsap/RCS/rtsaptrans.c,v 6.0 89/03/18 23:43:32 mrose Rel $ ! 9: * ! 10: * ! 11: * $Log: rtsaptrans.c,v $ ! 12: * Revision 6.0 89/03/18 23:43:32 mrose ! 13: * Release 5.0 ! 14: * ! 15: */ ! 16: ! 17: /* ! 18: * NOTICE ! 19: * ! 20: * Acquisition, use, and distribution of this module and related ! 21: * materials are subject to the restrictions of a license agreement. ! 22: * Consult the Preface in the User's Manual for the full terms of ! 23: * this agreement. ! 24: * ! 25: */ ! 26: ! 27: ! 28: /* LINTLIBRARY */ ! 29: ! 30: #include <stdio.h> ! 31: #include <signal.h> ! 32: #include "rtpkt.h" ! 33: ! 34: /* RT-TRANSFER.REQUEST */ ! 35: ! 36: int RtTransferRequest (sd, data, secs, rti) ! 37: int sd; ! 38: PE data; ! 39: int secs; ! 40: struct RtSAPindication *rti; ! 41: { ! 42: SBV smask; ! 43: int result; ! 44: register struct assocblk *acb; ! 45: ! 46: missingP (rti); ! 47: ! 48: smask = sigioblock (); ! 49: ! 50: rtsapPsig (acb, sd); ! 51: ! 52: if (data == NULLPE && acb -> acb_downtrans == NULLIFP) { ! 53: (void) sigiomask (smask); ! 54: return rtsaplose (rti, RTS_PARAMETER, NULLCP, ! 55: "mandatory parameter \"data\" missing"); ! 56: } ! 57: ! 58: result = (*acb -> acb_transferequest) (acb, data, secs, rti); ! 59: ! 60: (void) sigiomask (smask); ! 61: ! 62: return result; ! 63: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.