getservice.c 4.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178
  1. /*
  2. ** services.c /etc/services access functions
  3. **
  4. ** This file is part of the NYS Library.
  5. **
  6. ** The NYS Library is free software; you can redistribute it and/or
  7. ** modify it under the terms of the GNU Library General Public License as
  8. ** published by the Free Software Foundation; either version 2 of the
  9. ** License, or (at your option) any later version.
  10. **
  11. ** The NYS Library is distributed in the hope that it will be useful,
  12. ** but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14. ** Library General Public License for more details.
  15. **
  16. ** You should have received a copy of the GNU Library General Public
  17. ** License along with the NYS Library; see the file COPYING.LIB. If
  18. ** not, write to the Free Software Foundation, Inc., 675 Mass Ave,
  19. ** Cambridge, MA 02139, USA.
  20. **
  21. **
  22. ** Copyright (c) 1983 Regents of the University of California.
  23. ** All rights reserved.
  24. **
  25. ** Redistribution and use in source and binary forms, with or without
  26. ** modification, are permitted provided that the following conditions
  27. ** are met:
  28. ** 1. Redistributions of source code must retain the above copyright
  29. ** notice, this list of conditions and the following disclaimer.
  30. ** 2. Redistributions in binary form must reproduce the above copyright
  31. ** notice, this list of conditions and the following disclaimer in the
  32. ** documentation and/or other materials provided with the distribution.
  33. ** 3. All advertising materials mentioning features or use of this software
  34. ** must display the following acknowledgement:
  35. ** This product includes software developed by the University of
  36. ** California, Berkeley and its contributors.
  37. ** 4. Neither the name of the University nor the names of its contributors
  38. ** may be used to endorse or promote products derived from this software
  39. ** without specific prior written permission.
  40. **
  41. ** THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  42. ** ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  43. ** IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  44. ** ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  45. ** FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  46. ** DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  47. ** OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  48. ** HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  49. ** LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  50. ** OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  51. ** SUCH DAMAGE.
  52. */
  53. #define __FORCE_GLIBC__
  54. #include <features.h>
  55. #include <sys/types.h>
  56. #include <sys/socket.h>
  57. #include <netdb.h>
  58. #include <stdio.h>
  59. #include <string.h>
  60. #include <stdlib.h>
  61. #include <netinet/in.h>
  62. #include <arpa/inet.h>
  63. #define MAXALIASES 35
  64. static FILE *servf = NULL;
  65. static char line[BUFSIZ+1];
  66. static struct servent serv;
  67. static char *serv_aliases[MAXALIASES];
  68. static int serv_stayopen;
  69. void setservent(int f)
  70. {
  71. if (servf == NULL)
  72. servf = fopen(_PATH_SERVICES, "r" );
  73. else
  74. rewind(servf);
  75. serv_stayopen |= f;
  76. }
  77. void endservent(void)
  78. {
  79. if (servf) {
  80. fclose(servf);
  81. servf = NULL;
  82. }
  83. serv_stayopen = 0;
  84. }
  85. struct servent * getservent(void)
  86. {
  87. char *p;
  88. register char *cp, **q;
  89. if (servf == NULL && (servf = fopen(_PATH_SERVICES, "r" )) == NULL)
  90. return (NULL);
  91. again:
  92. if ((p = fgets(line, BUFSIZ, servf)) == NULL)
  93. return (NULL);
  94. if (*p == '#')
  95. goto again;
  96. cp = strpbrk(p, "#\n");
  97. if (cp == NULL)
  98. goto again;
  99. *cp = '\0';
  100. serv.s_name = p;
  101. p = strpbrk(p, " \t");
  102. if (p == NULL)
  103. goto again;
  104. *p++ = '\0';
  105. while (*p == ' ' || *p == '\t')
  106. p++;
  107. cp = strpbrk(p, ",/");
  108. if (cp == NULL)
  109. goto again;
  110. *cp++ = '\0';
  111. serv.s_port = htons((u_short)atoi(p));
  112. serv.s_proto = cp;
  113. q = serv.s_aliases = serv_aliases;
  114. cp = strpbrk(cp, " \t");
  115. if (cp != NULL)
  116. *cp++ = '\0';
  117. while (cp && *cp) {
  118. if (*cp == ' ' || *cp == '\t') {
  119. cp++;
  120. continue;
  121. }
  122. if (q < &serv_aliases[MAXALIASES - 1])
  123. *q++ = cp;
  124. cp = strpbrk(cp, " \t");
  125. if (cp != NULL)
  126. *cp++ = '\0';
  127. }
  128. *q = NULL;
  129. return (&serv);
  130. }
  131. struct servent *getservbyname(const char *name, const char *proto)
  132. {
  133. register struct servent *p;
  134. register char **cp;
  135. setservent(serv_stayopen);
  136. while ((p = getservent()) != NULL) {
  137. if (strcmp(name, p->s_name) == 0)
  138. goto gotname;
  139. for (cp = p->s_aliases; *cp; cp++)
  140. if (strcmp(name, *cp) == 0)
  141. goto gotname;
  142. continue;
  143. gotname:
  144. if (proto == 0 || strcmp(p->s_proto, proto) == 0)
  145. break;
  146. }
  147. if (!serv_stayopen)
  148. endservent();
  149. return (p);
  150. }
  151. struct servent * getservbyport(int port, const char *proto)
  152. {
  153. register struct servent *p;
  154. setservent(serv_stayopen);
  155. while ((p = getservent()) != NULL) {
  156. if (p->s_port != port)
  157. continue;
  158. if (proto == 0 || strcmp(p->s_proto, proto) == 0)
  159. break;
  160. }
  161. if (!serv_stayopen)
  162. endservent();
  163. return (p);
  164. }