2 * Copyright (C) 2005-2008 Andre Noll <maan@systemlinux.org>
4 * Licensed under the GPL v2. For licencing details see COPYING.
7 /** \file acl.c Access control lists for paraslash senders. */
16 * Describes one entry in the blacklist/whitelist of a paraslash sender.
19 /** The address to be black/whitelisted. */
21 /** The netmask for this entry. */
23 /** The position of this entry in the acl. */
24 struct list_head node;
28 * Return true if addr_1 matches addr_2 in the first `netmask' bits.
30 static int v4_addr_match(uint32_t addr_1, uint32_t addr_2, uint8_t netmask)
35 mask <<= (32 - netmask);
36 return (htonl(addr_1) & mask) == (htonl(addr_2) & mask);
40 * Find out whether the peer name of a given fd belongs to an acl.
42 * \param fd File descriptor.
43 * \param acl The access control list.
45 * \return One if \a fd belongs to \a acl, zero otherwise.
47 static int acl_lookup(int fd, struct list_head *acl)
49 struct access_info *ai, *tmp;
50 struct sockaddr_storage ss;
51 socklen_t sslen = sizeof(ss);
52 struct in_addr v4_addr;
54 if (getpeername(fd, (struct sockaddr *)&ss, &sslen) < 0) {
55 PARA_ERROR_LOG("Can not determine peer address: %s\n", strerror(errno));
58 v4_addr = extract_v4_addr(&ss);
62 list_for_each_entry_safe(ai, tmp, acl, node)
63 if (v4_addr_match(v4_addr.s_addr, ai->addr.s_addr, ai->netmask))
70 * Add an entry to an access control list.
72 * \param acl The access control list.
73 * \param addr The address to add.
74 * \param netmask The netmask to use for this entry.
76 static void acl_add_entry(struct list_head *acl, struct in_addr addr,
79 struct access_info *ai = para_malloc(sizeof(struct access_info));
81 ai->netmask = netmask;
82 PARA_INFO_LOG("adding %s/%i to access list\n", inet_ntoa(ai->addr),
84 para_list_add(&ai->node, acl);
88 * Delete an entry from an access control list.
90 * \param acl The access control list.
91 * \param addr The address to delete.
92 * \param netmask The netmask of the entry to be removed from the list.
94 static void acl_del_entry(struct list_head *acl, struct in_addr addr,
97 struct access_info *ai, *tmp;
99 list_for_each_entry_safe(ai, tmp, acl, node) {
100 char *nad = para_strdup(inet_ntoa(ai->addr));
101 if (!strcmp(nad, inet_ntoa(addr)) &&
102 ai->netmask == netmask) {
103 PARA_NOTICE_LOG("removing %s/%i from access list\n",
113 * Compute a string containing the contents of an acl.
115 * \param acl The access control list.
117 * \return A string containing the contents of \a acl, or \p NULL
118 * if \a acl is empty.
120 char *acl_get_contents(struct list_head *acl)
122 struct access_info *ai, *tmp_ai;
125 list_for_each_entry_safe(ai, tmp_ai, acl, node) {
126 char *tmp = make_message("%s%s/%d ", ret? ret : "",
127 inet_ntoa(ai->addr), ai->netmask);
135 * Initialize an access control list.
137 * \param acl The list to initialize.
138 * \param acl_info An array of strings of the form ip/netmask.
139 * \param num The number of strings in \a acl_info.
141 void acl_init(struct list_head *acl, char * const *acl_info, int num)
146 for (i = 0; i < num; i++) {
147 char *arg = para_strdup(acl_info[i]);
148 char *p = strchr(arg, '/');
155 if (!inet_pton(AF_INET, arg, &addr))
158 if (netmask < 0 || netmask > 32)
160 acl_add_entry(acl, addr, netmask);
163 PARA_CRIT_LOG("syntax error: %s\n", acl_info[i]);
171 * Check whether the peer name of a given fd is allowed by an acl.
173 * \param fd File descriptor.
174 * \param acl The access control list.
175 * \param default_deny Whether \a acl is a whitelist.
177 * \return Positive if the peer of \a fd is permitted by \a acl, \p -E_ACL_PERM
180 int acl_check_access(int fd, struct list_head *acl, int default_deny)
182 int match = acl_lookup(fd, acl);
184 return (!match || default_deny) && (match || !default_deny)?
189 * Permit access for a range of IP addresses.
191 * \param addr The address to permit.
192 * \param netmask The netmask of the entry to be permitted.
193 * \param acl The access control list.
194 * \param default_deny Whether \a acl is a whitelist.
196 void acl_allow(struct in_addr addr, int netmask,
197 struct list_head *acl, int default_deny)
200 acl_add_entry(acl, addr, netmask);
202 acl_del_entry(acl, addr, netmask);
206 * Deny access for a range of IP addresses.
208 * \param addr The address to permit.
209 * \param netmask The netmask of the entry to be permitted.
210 * \param acl The access control list.
211 * \param default_deny Whether \a acl is a whitelist.
213 void acl_deny(struct in_addr addr, int netmask,
214 struct list_head *acl, int default_deny)
216 acl_allow(addr, netmask, acl, !default_deny);