LICENSE.
[egate.git] / util / gipc.c
1 /*
2  * Copyright (c) 1995, the EUROPAGATE consortium (see below).
3  *
4  * The EUROPAGATE consortium members are:
5  *
6  *    University College Dublin
7  *    Danmarks Teknologiske Videnscenter
8  *    An Chomhairle Leabharlanna
9  *    Consejo Superior de Investigaciones Cientificas
10  *
11  * Permission to use, copy, modify, distribute, and sell this software and
12  * its documentation, in whole or in part, for any purpose, is hereby granted,
13  * provided that:
14  *
15  * 1. This copyright and permission notice appear in all copies of the
16  * software and its documentation. Notices of copyright or attribution
17  * which appear at the beginning of any file must remain unchanged.
18  *
19  * 2. The names of EUROPAGATE or the project partners may not be used to
20  * endorse or promote products derived from this software without specific
21  * prior written permission.
22  *
23  * 3. Users of this software (implementors and gateway operators) agree to
24  * inform the EUROPAGATE consortium of their use of the software. This
25  * information will be used to evaluate the EUROPAGATE project and the
26  * software, and to plan further developments. The consortium may use
27  * the information in later publications.
28  * 
29  * 4. Users of this software agree to make their best efforts, when
30  * documenting their use of the software, to acknowledge the EUROPAGATE
31  * consortium, and the role played by the software in their work.
32  *
33  * THIS SOFTWARE IS PROVIDED "AS IS" AND WITHOUT WARRANTY OF ANY KIND,
34  * EXPRESS, IMPLIED, OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY
35  * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
36  * IN NO EVENT SHALL THE EUROPAGATE CONSORTIUM OR ITS MEMBERS BE LIABLE
37  * FOR ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF
38  * ANY KIND, OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA
39  * OR PROFITS, WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND
40  * ON ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
41  * USE OR PERFORMANCE OF THIS SOFTWARE.
42  *
43  */
44 /* Gateway kernel
45  * Europagate, 1995
46  *
47  * $Log: gipc.c,v $
48  * Revision 1.7  1995/05/16 09:40:52  adam
49  * LICENSE.
50  *
51  * Revision 1.6  1995/05/01  16:27:29  adam
52  * Various improvements. Close-on-exec and close on failure on either
53  * read or write FIFO.
54  *
55  * Revision 1.5  1995/04/21  16:38:07  adam
56  * Added more debugging logs.
57  *
58  * Revision 1.4  1995/04/20  15:12:45  adam
59  * Minor hacks really.
60  *
61  * Revision 1.3  1995/04/19  16:02:06  adam
62  * Some hacks to get the FIFO communication work!! Isn't reliable.
63  *
64  * Revision 1.2  1995/03/28  08:03:46  adam
65  * Non-blocking open used when sync is set.
66  *
67  * Revision 1.1  1995/03/27  08:24:59  adam
68  * New module gip: Gateway IPc module.
69  * New module gw-db: Gateway hash-db module (user information table).
70  *
71  */
72
73 #include <stdio.h>
74 #include <stdlib.h>
75 #include <assert.h>
76 #include <string.h>
77 #include <unistd.h>
78 #include <fcntl.h>
79
80 #include <gw-log.h>
81 #include <gip.h>
82
83 GIP gipc_initialize (const char *name)
84 {
85     return gip_initialize (name);
86 }
87
88 int gipc_destroy (GIP gip)
89 {
90     return gip_destroy (gip);
91 }
92
93 int gipc_open (GIP gip, const char *server, int sync)
94 {
95     if (sync) 
96     {
97         gw_log (GW_LOG_DEBUG, "gipc", "Open sync writeonly of %s", server);
98         gip->wfd = open (server, O_WRONLY);
99         gw_log (GW_LOG_DEBUG, "gipc", "got wfd %d", gip->wfd);
100
101         gw_log (GW_LOG_DEBUG, "gipc", "Open sync readonly of %s", gip->name);
102         gip->rfd = open (gip->name, O_RDONLY);
103         gw_log (GW_LOG_DEBUG, "gipc", "got rfd %d", gip->rfd);
104     }
105     else
106     {
107         gw_log (GW_LOG_DEBUG, "gipc", "Open readonly of %s", gip->name);
108         gip->rfd = open (gip->name, O_RDONLY|O_NONBLOCK);
109         gw_log (GW_LOG_DEBUG, "gipc", "got rfd %d", gip->rfd);
110
111         gw_log (GW_LOG_DEBUG, "gipc", "Open witeonly of %s", server);
112         gip->wfd = open (server, O_WRONLY|O_NONBLOCK);
113         gw_log (GW_LOG_DEBUG, "gipc", "got wfd %d", gip->wfd);
114     }
115     if (gip->rfd == -1)
116     {
117         gw_log (GW_LOG_DEBUG, "gipc", "Cannot open %s", gip->name);
118         if (gip->wfd != -1)
119         {
120             close (gip->wfd);
121             gip->wfd = -1;
122         }
123         return -1;
124     }
125     if (gip->wfd == -1)
126     {
127         gw_log (GW_LOG_DEBUG, "gipc", "Cannot open %s", server);
128         close (gip->rfd);
129         gip->rfd = -1;
130         return -2;
131     }
132     fcntl (gip->wfd, F_SETFL, 0);
133     fcntl (gip->rfd, F_SETFL, 0);
134     fcntl (gip->wfd, F_SETFD, FD_CLOEXEC);
135     fcntl (gip->rfd, F_SETFD, FD_CLOEXEC);
136     return 0;
137 }
138
139 int gipc_close (GIP gip)
140 {
141     if (gip->rfd != -1)
142     {
143         close (gip->rfd);
144         gip->rfd = -1;
145     }
146     if (gip->wfd != -1)
147     {
148         close (gip->wfd);
149         gip->wfd = -1;
150     }
151     return 0;
152 }