|
|
1.1 ! root 1: /* psapreport.c - PPM: exception reports */ ! 2: ! 3: #ifndef lint ! 4: static char *rcsid = "$Header: /f/osi/psap2/RCS/psapreport.c,v 7.0 89/11/23 22:14:28 mrose Rel $"; ! 5: #endif ! 6: ! 7: /* ! 8: * $Header: /f/osi/psap2/RCS/psapreport.c,v 7.0 89/11/23 22:14:28 mrose Rel $ ! 9: * ! 10: * ! 11: * $Log: psapreport.c,v $ ! 12: * Revision 7.0 89/11/23 22:14:28 mrose ! 13: * Release 6.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 "ppkt.h" ! 33: ! 34: /* P-U-EXCEPTION-REPORT.REQUEST */ ! 35: ! 36: int PUReportRequest (sd, reason, data, ndata, pi) ! 37: int sd; ! 38: int reason, ! 39: ndata; ! 40: PE *data; ! 41: struct PSAPindication *pi; ! 42: { ! 43: SBV smask; ! 44: int len, ! 45: result; ! 46: char *base, ! 47: *realbase; ! 48: register struct psapblk *pb; ! 49: struct SSAPindication sis; ! 50: register struct SSAPabort *sa = &sis.si_abort; ! 51: ! 52: toomuchP (data, ndata, NPDATA, "report"); ! 53: missingP (pi); ! 54: ! 55: smask = sigioblock (); ! 56: ! 57: psapPsig (pb, sd); ! 58: ! 59: if ((result = info2ssdu (pb, pi, data, ndata, &realbase, &base, &len, ! 60: "P-U-EXCEPTION-REPORT user-data", PPDU_NONE)) ! 61: != OK) ! 62: goto out2; ! 63: ! 64: if ((result = SUReportRequest (sd, reason, base, len, &sis)) == NOTOK) ! 65: if (SC_FATAL (sa -> sa_reason)) ! 66: (void) ss2pslose (pb, pi, "SUReportRequest", sa); ! 67: else { ! 68: (void) ss2pslose (NULLPB, pi, "SUReportRequest", sa); ! 69: goto out1; ! 70: } ! 71: ! 72: out2: ; ! 73: if (result == NOTOK) ! 74: freepblk (pb); ! 75: else ! 76: if (result == DONE) ! 77: result = NOTOK; ! 78: out1: ; ! 79: if (realbase) ! 80: free (realbase); ! 81: else ! 82: if (base) ! 83: free (base); ! 84: ! 85: (void) sigiomask (smask); ! 86: ! 87: return result; ! 88: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.