1 /* ***********************************************************
 2    *                                                         *
 3    * Copyright, (C) Honeywell Bull Inc., 1987                *
 4    *                                                         *
 5    * Copyright, (C) Honeywell Information Systems Inc., 1986 *
 6    *                                                         *
 7    *********************************************************** */
 8 
 9 /* HISTORY COMMENTS:
10   1) change(86-07-08,Westcott), approve(87-07-13,MCR7580),
11      audit(87-07-13,Leskiw), install(87-08-07,MR12.1-1072):
12      Created.
13                                                    END HISTORY COMMENTS */
14 
15 /* : PROCEDURE FUNCTION (disresp)
16 
17 Sends a "DISCONNECT_REPONSE" minor capability message to the addressed major
18 capability. This message is used by the major capability to inform the caller
19 whether the request has been accepted or rejected.
20 */
21 
22 #include <stdio.h>
23 #include <ws.h>
24 #include <wsmincap.h>
25 #include <ws_mcb.h>
26 #include <ws_error.h>
27 
28 disresp (p_status, p_cap_num, p_mcb_ptr)
29 
30 int p_status;                          /* WSACCEPT/WSREJECT */
31 int p_cap_num;                         /* Capability to send response to */
32 mcb *p_mcb_ptr;                        /* Caller's MCB */
33 {
34    if ((p_status != WSACCEPT) && (p_status != WSREJECT))
35       return (WSINVCON);
36 
37    if (p_mcb_ptr == NULL)
38       return (WSINVMCB);
39 
40 /* : Send the message out through MOWSE */
41 
42    return (execap (p_cap_num, RESPONSE_DISCONNECT, &p_status, 1, p_mcb_ptr));
43 }
44 ^Z