acl.c
上传用户:zibowangxu
上传日期:2007-01-04
资源大小:331k
文件大小:5k
源码类别:

Ftp客户端

开发平台:

Unix_Linux

  1. /****************************************************************************  
  2.  
  3.   Copyright (c) 1999 WU-FTPD Development Group.  
  4.   All rights reserved.
  5.   
  6.   Portions Copyright (c) 1980, 1985, 1988, 1989, 1990, 1991, 1993, 1994
  7.     The Regents of the University of California.
  8.   Portions Copyright (c) 1993, 1994 Washington University in Saint Louis.
  9.   Portions Copyright (c) 1996, 1998 Berkeley Software Design, Inc.
  10.   Portions Copyright (c) 1989 Massachusetts Institute of Technology.
  11.   Portions Copyright (c) 1998 Sendmail, Inc.
  12.   Portions Copyright (c) 1983, 1995, 1996, 1997 Eric P.  Allman.
  13.   Portions Copyright (c) 1997 by Stan Barber.
  14.   Portions Copyright (c) 1997 by Kent Landfield.
  15.   Portions Copyright (c) 1991, 1992, 1993, 1994, 1995, 1996, 1997
  16.     Free Software Foundation, Inc.  
  17.  
  18.   Use and distribution of this software and its source code are governed 
  19.   by the terms and conditions of the WU-FTPD Software License ("LICENSE").
  20.  
  21.   If you did not receive a copy of the license, it may be obtained online
  22.   at http://www.wu-ftpd.org/license.html.
  23.  
  24.   $Id: acl.c,v 1.8 1999/09/22 09:57:12 wuftpd Exp $
  25.  
  26. ****************************************************************************/
  27. #include "config.h"
  28. #include <stdio.h>
  29. #include <errno.h>
  30. #include <string.h>
  31. #ifdef HAVE_SYS_SYSLOG_H
  32. #include <sys/syslog.h>
  33. #endif
  34. #if defined(HAVE_SYSLOG_H) || (!defined(AUTOCONF) && !defined(HAVE_SYS_SYSLOG_H))
  35. #include <syslog.h>
  36. #endif
  37. #include <sys/types.h>
  38. #include <sys/stat.h>
  39. #include <sys/file.h>
  40. #ifdef HAVE_PATHS_H
  41. #include <paths.h>
  42. #endif
  43. #include "pathnames.h"
  44. #include "extensions.h"
  45. #include "proto.h"
  46. char *aclbuf = NULL;
  47. static struct aclmember *aclmembers;
  48. /*************************************************************************/
  49. /* FUNCTION  : getaclentry                                               */
  50. /* PURPOSE   : Retrieve a named entry from the ACL                       */
  51. /* ARGUMENTS : pointer to the keyword and a handle to the acl members    */
  52. /* RETURNS   : pointer to the acl member containing the keyword or NULL  */
  53. /*************************************************************************/
  54. struct aclmember *getaclentry(char *keyword, struct aclmember **next)
  55. {
  56.     do {
  57. if (!*next)
  58.     *next = aclmembers;
  59. else
  60.     *next = (*next)->next;
  61.     } while (*next && strcasecmp((*next)->keyword, keyword));
  62.     return (*next);
  63. }
  64. /*************************************************************************/
  65. /* FUNCTION  : parseacl                                                  */
  66. /* PURPOSE   : Parse the acl buffer into its components                  */
  67. /* ARGUMENTS : A pointer to the acl file                                 */
  68. /* RETURNS   : nothing                                                   */
  69. /*************************************************************************/
  70. void parseacl(void)
  71. {
  72.     char *ptr, *aclptr = aclbuf, *line;
  73.     int cnt;
  74.     struct aclmember *member, *acltail;
  75.     if (!aclbuf || !(*aclbuf))
  76. return;
  77.     aclmembers = (struct aclmember *) NULL;
  78.     acltail = (struct aclmember *) NULL;
  79.     while (*aclptr != '') {
  80. line = aclptr;
  81. while (*aclptr && *aclptr != 'n')
  82.     aclptr++;
  83. *aclptr++ = (char) NULL;
  84. /* deal with comments */
  85. if ((ptr = strchr(line, '#')) != NULL)
  86.     /* allowed escaped '#' chars for path-filter (DiB) */
  87.     if ((ptr > aclbuf) && (*(ptr - 1) != '\'))
  88. *ptr = '';
  89. ptr = strtok(line, " t");
  90. if (ptr) {
  91.     member = (struct aclmember *) calloc(1, sizeof(struct aclmember));
  92.     if (member == NULL) {
  93. syslog(LOG_ERR, "calloc error parsing acl");
  94. exit(0);
  95.     }
  96.     (void) strcpy(member->keyword, ptr);
  97.     cnt = 0;
  98.     while ((ptr = strtok(NULL, " t")) != NULL) {
  99. if (cnt >= MAXARGS) {
  100.     syslog(LOG_ERR,
  101.      "Too many args (>%d) in ftpaccess: %s %s %s %s %s ...",
  102.    MAXARGS - 1, member->keyword, member->arg[0],
  103.    member->arg[1], member->arg[2], member->arg[3]);
  104.     break;
  105. }
  106. member->arg[cnt++] = ptr;
  107.     }
  108.     if (acltail)
  109. acltail->next = member;
  110.     acltail = member;
  111.     if (!aclmembers)
  112. aclmembers = member;
  113. }
  114.     }
  115. }
  116. /*************************************************************************/
  117. /* FUNCTION  : readacl                                                   */
  118. /* PURPOSE   : Read the acl into memory                                  */
  119. /* ARGUMENTS : The pathname of the acl                                   */
  120. /* RETURNS   : 0 if error, 1 if no error                                 */
  121. /*************************************************************************/
  122. int readacl(char *aclpath)
  123. {
  124.     FILE *aclfile;
  125.     struct stat finfo;
  126.     extern int use_accessfile;
  127.     if (!use_accessfile)
  128. return (0);
  129.     if ((aclfile = fopen(aclpath, "r")) == NULL) {
  130. syslog(LOG_ERR, "cannot open access file %s: %s", aclpath,
  131.        strerror(errno));
  132. return (0);
  133.     }
  134.     if (fstat(fileno(aclfile), &finfo) != 0) {
  135. syslog(LOG_ERR, "cannot fstat access file %s: %s", aclpath,
  136.        strerror(errno));
  137. (void) fclose(aclfile);
  138. return (0);
  139.     }
  140.     if (finfo.st_size == 0) {
  141. aclbuf = (char *) calloc(1, 1);
  142.     }
  143.     else {
  144. if (!(aclbuf = (char *) malloc((unsigned) finfo.st_size + 1))) {
  145.     syslog(LOG_ERR, "could not malloc aclbuf (%d bytes)", finfo.st_size + 1);
  146.     (void) fclose(aclfile);
  147.     return (0);
  148. }
  149. if (!fread(aclbuf, (size_t) finfo.st_size, 1, aclfile)) {
  150.     syslog(LOG_ERR, "error reading acl file %s: %s", aclpath,
  151.    strerror(errno));
  152.     free(aclbuf);
  153.     aclbuf = NULL;
  154.     (void) fclose(aclfile);
  155.     return (0);
  156. }
  157. *(aclbuf + finfo.st_size) = '';
  158.     }
  159.     (void) fclose(aclfile);
  160.     return (1);
  161. }