Bug fix.
[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.8  1995/05/17 10:51:43  adam
49  * Bug fix.
50  *
51  * Revision 1.7  1995/05/16  09:40:52  adam
52  * LICENSE.
53  *
54  * Revision 1.6  1995/05/01  16:27:29  adam
55  * Various improvements. Close-on-exec and close on failure on either
56  * read or write FIFO.
57  *
58  * Revision 1.5  1995/04/21  16:38:07  adam
59  * Added more debugging logs.
60  *
61  * Revision 1.4  1995/04/20  15:12:45  adam
62  * Minor hacks really.
63  *
64  * Revision 1.3  1995/04/19  16:02:06  adam
65  * Some hacks to get the FIFO communication work!! Isn't reliable.
66  *
67  * Revision 1.2  1995/03/28  08:03:46  adam
68  * Non-blocking open used when sync is set.
69  *
70  * Revision 1.1  1995/03/27  08:24:59  adam
71  * New module gip: Gateway IPc module.
72  * New module gw-db: Gateway hash-db module (user information table).
73  *
74  */
75
76 #include <stdio.h>
77 #include <stdlib.h>
78 #include <assert.h>
79 #include <string.h>
80 #include <unistd.h>
81 #include <fcntl.h>
82
83 #include <gw-log.h>
84 #include <gip.h>
85
86 GIP gipc_initialize (const char *name)
87 {
88     return gip_initialize (name);
89 }
90
91 int gipc_destroy (GIP gip)
92 {
93     return gip_destroy (gip);
94 }
95
96 int gipc_open (GIP gip, const char *server, int sync)
97 {
98     if (sync) 
99     {
100         gw_log (GW_LOG_DEBUG, "gipc", "Open sync writeonly of %s", server);
101         gip->wfd = open (server, O_WRONLY);
102         gw_log (GW_LOG_DEBUG, "gipc", "got wfd %d", gip->wfd);
103
104         if (gip->wfd == -1)
105         {
106             gw_log (GW_LOG_DEBUG|GW_LOG_ERRNO, "gipc", "Cannot open %s",
107                     server);
108             return -2;
109         }
110         gw_log (GW_LOG_DEBUG, "gipc", "Open sync readonly of %s", gip->name);
111         gip->rfd = open (gip->name, O_RDONLY);
112         gw_log (GW_LOG_DEBUG, "gipc", "got rfd %d", gip->rfd);
113     }
114     else
115     {
116         gw_log (GW_LOG_DEBUG, "gipc", "Open readonly of %s", gip->name);
117         gip->rfd = open (gip->name, O_RDONLY|O_NONBLOCK);
118         gw_log (GW_LOG_DEBUG, "gipc", "got rfd %d", gip->rfd);
119
120         gw_log (GW_LOG_DEBUG, "gipc", "Open witeonly of %s", server);
121         gip->wfd = open (server, O_WRONLY|O_NONBLOCK);
122         gw_log (GW_LOG_DEBUG, "gipc", "got wfd %d", gip->wfd);
123     }
124     if (gip->rfd == -1)
125     {
126         gw_log (GW_LOG_DEBUG|GW_LOG_ERRNO, "gipc", "Cannot open %s",
127                 gip->name);
128         if (gip->wfd != -1)
129         {
130             close (gip->wfd);
131             gip->wfd = -1;
132         }
133         return -1;
134     }
135     if (gip->wfd == -1)
136     {
137         gw_log (GW_LOG_DEBUG|GW_LOG_ERRNO, "gipc", "Cannot open %s", server);
138         close (gip->rfd);
139         gip->rfd = -1;
140         return -2;
141     }
142     fcntl (gip->wfd, F_SETFL, 0);
143     fcntl (gip->rfd, F_SETFL, 0);
144     fcntl (gip->wfd, F_SETFD, FD_CLOEXEC);
145     fcntl (gip->rfd, F_SETFD, FD_CLOEXEC);
146     return 0;
147 }
148
149 int gipc_close (GIP gip)
150 {
151     if (gip->rfd != -1)
152     {
153         close (gip->rfd);
154         gip->rfd = -1;
155     }
156     if (gip->wfd != -1)
157     {
158         close (gip->wfd);
159         gip->wfd = -1;
160     }
161     return 0;
162 }