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