xref: /openbmc/linux/security/selinux/ss/sidtab.c (revision ba61bb17)
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * Implementation of the SID table type.
4  *
5  * Author : Stephen Smalley, <sds@tycho.nsa.gov>
6  */
7 #include <linux/kernel.h>
8 #include <linux/slab.h>
9 #include <linux/spinlock.h>
10 #include <linux/errno.h>
11 #include "flask.h"
12 #include "security.h"
13 #include "sidtab.h"
14 
15 #define SIDTAB_HASH(sid) \
16 (sid & SIDTAB_HASH_MASK)
17 
18 int sidtab_init(struct sidtab *s)
19 {
20 	int i;
21 
22 	s->htable = kmalloc_array(SIDTAB_SIZE, sizeof(*s->htable), GFP_ATOMIC);
23 	if (!s->htable)
24 		return -ENOMEM;
25 	for (i = 0; i < SIDTAB_SIZE; i++)
26 		s->htable[i] = NULL;
27 	s->nel = 0;
28 	s->next_sid = 1;
29 	s->shutdown = 0;
30 	spin_lock_init(&s->lock);
31 	return 0;
32 }
33 
34 int sidtab_insert(struct sidtab *s, u32 sid, struct context *context)
35 {
36 	int hvalue;
37 	struct sidtab_node *prev, *cur, *newnode;
38 
39 	if (!s)
40 		return -ENOMEM;
41 
42 	hvalue = SIDTAB_HASH(sid);
43 	prev = NULL;
44 	cur = s->htable[hvalue];
45 	while (cur && sid > cur->sid) {
46 		prev = cur;
47 		cur = cur->next;
48 	}
49 
50 	if (cur && sid == cur->sid)
51 		return -EEXIST;
52 
53 	newnode = kmalloc(sizeof(*newnode), GFP_ATOMIC);
54 	if (!newnode)
55 		return -ENOMEM;
56 
57 	newnode->sid = sid;
58 	if (context_cpy(&newnode->context, context)) {
59 		kfree(newnode);
60 		return -ENOMEM;
61 	}
62 
63 	if (prev) {
64 		newnode->next = prev->next;
65 		wmb();
66 		prev->next = newnode;
67 	} else {
68 		newnode->next = s->htable[hvalue];
69 		wmb();
70 		s->htable[hvalue] = newnode;
71 	}
72 
73 	s->nel++;
74 	if (sid >= s->next_sid)
75 		s->next_sid = sid + 1;
76 	return 0;
77 }
78 
79 static struct context *sidtab_search_core(struct sidtab *s, u32 sid, int force)
80 {
81 	int hvalue;
82 	struct sidtab_node *cur;
83 
84 	if (!s)
85 		return NULL;
86 
87 	hvalue = SIDTAB_HASH(sid);
88 	cur = s->htable[hvalue];
89 	while (cur && sid > cur->sid)
90 		cur = cur->next;
91 
92 	if (force && cur && sid == cur->sid && cur->context.len)
93 		return &cur->context;
94 
95 	if (!cur || sid != cur->sid || cur->context.len) {
96 		/* Remap invalid SIDs to the unlabeled SID. */
97 		sid = SECINITSID_UNLABELED;
98 		hvalue = SIDTAB_HASH(sid);
99 		cur = s->htable[hvalue];
100 		while (cur && sid > cur->sid)
101 			cur = cur->next;
102 		if (!cur || sid != cur->sid)
103 			return NULL;
104 	}
105 
106 	return &cur->context;
107 }
108 
109 struct context *sidtab_search(struct sidtab *s, u32 sid)
110 {
111 	return sidtab_search_core(s, sid, 0);
112 }
113 
114 struct context *sidtab_search_force(struct sidtab *s, u32 sid)
115 {
116 	return sidtab_search_core(s, sid, 1);
117 }
118 
119 int sidtab_map(struct sidtab *s,
120 	       int (*apply) (u32 sid,
121 			     struct context *context,
122 			     void *args),
123 	       void *args)
124 {
125 	int i, rc = 0;
126 	struct sidtab_node *cur;
127 
128 	if (!s)
129 		goto out;
130 
131 	for (i = 0; i < SIDTAB_SIZE; i++) {
132 		cur = s->htable[i];
133 		while (cur) {
134 			rc = apply(cur->sid, &cur->context, args);
135 			if (rc)
136 				goto out;
137 			cur = cur->next;
138 		}
139 	}
140 out:
141 	return rc;
142 }
143 
144 static void sidtab_update_cache(struct sidtab *s, struct sidtab_node *n, int loc)
145 {
146 	BUG_ON(loc >= SIDTAB_CACHE_LEN);
147 
148 	while (loc > 0) {
149 		s->cache[loc] = s->cache[loc - 1];
150 		loc--;
151 	}
152 	s->cache[0] = n;
153 }
154 
155 static inline u32 sidtab_search_context(struct sidtab *s,
156 						  struct context *context)
157 {
158 	int i;
159 	struct sidtab_node *cur;
160 
161 	for (i = 0; i < SIDTAB_SIZE; i++) {
162 		cur = s->htable[i];
163 		while (cur) {
164 			if (context_cmp(&cur->context, context)) {
165 				sidtab_update_cache(s, cur, SIDTAB_CACHE_LEN - 1);
166 				return cur->sid;
167 			}
168 			cur = cur->next;
169 		}
170 	}
171 	return 0;
172 }
173 
174 static inline u32 sidtab_search_cache(struct sidtab *s, struct context *context)
175 {
176 	int i;
177 	struct sidtab_node *node;
178 
179 	for (i = 0; i < SIDTAB_CACHE_LEN; i++) {
180 		node = s->cache[i];
181 		if (unlikely(!node))
182 			return 0;
183 		if (context_cmp(&node->context, context)) {
184 			sidtab_update_cache(s, node, i);
185 			return node->sid;
186 		}
187 	}
188 	return 0;
189 }
190 
191 int sidtab_context_to_sid(struct sidtab *s,
192 			  struct context *context,
193 			  u32 *out_sid)
194 {
195 	u32 sid;
196 	int ret = 0;
197 	unsigned long flags;
198 
199 	*out_sid = SECSID_NULL;
200 
201 	sid  = sidtab_search_cache(s, context);
202 	if (!sid)
203 		sid = sidtab_search_context(s, context);
204 	if (!sid) {
205 		spin_lock_irqsave(&s->lock, flags);
206 		/* Rescan now that we hold the lock. */
207 		sid = sidtab_search_context(s, context);
208 		if (sid)
209 			goto unlock_out;
210 		/* No SID exists for the context.  Allocate a new one. */
211 		if (s->next_sid == UINT_MAX || s->shutdown) {
212 			ret = -ENOMEM;
213 			goto unlock_out;
214 		}
215 		sid = s->next_sid++;
216 		if (context->len)
217 			printk(KERN_INFO
218 		       "SELinux:  Context %s is not valid (left unmapped).\n",
219 			       context->str);
220 		ret = sidtab_insert(s, sid, context);
221 		if (ret)
222 			s->next_sid--;
223 unlock_out:
224 		spin_unlock_irqrestore(&s->lock, flags);
225 	}
226 
227 	if (ret)
228 		return ret;
229 
230 	*out_sid = sid;
231 	return 0;
232 }
233 
234 void sidtab_hash_eval(struct sidtab *h, char *tag)
235 {
236 	int i, chain_len, slots_used, max_chain_len;
237 	struct sidtab_node *cur;
238 
239 	slots_used = 0;
240 	max_chain_len = 0;
241 	for (i = 0; i < SIDTAB_SIZE; i++) {
242 		cur = h->htable[i];
243 		if (cur) {
244 			slots_used++;
245 			chain_len = 0;
246 			while (cur) {
247 				chain_len++;
248 				cur = cur->next;
249 			}
250 
251 			if (chain_len > max_chain_len)
252 				max_chain_len = chain_len;
253 		}
254 	}
255 
256 	printk(KERN_DEBUG "%s:  %d entries and %d/%d buckets used, longest "
257 	       "chain length %d\n", tag, h->nel, slots_used, SIDTAB_SIZE,
258 	       max_chain_len);
259 }
260 
261 void sidtab_destroy(struct sidtab *s)
262 {
263 	int i;
264 	struct sidtab_node *cur, *temp;
265 
266 	if (!s)
267 		return;
268 
269 	for (i = 0; i < SIDTAB_SIZE; i++) {
270 		cur = s->htable[i];
271 		while (cur) {
272 			temp = cur;
273 			cur = cur->next;
274 			context_destroy(&temp->context);
275 			kfree(temp);
276 		}
277 		s->htable[i] = NULL;
278 	}
279 	kfree(s->htable);
280 	s->htable = NULL;
281 	s->nel = 0;
282 	s->next_sid = 1;
283 }
284 
285 void sidtab_set(struct sidtab *dst, struct sidtab *src)
286 {
287 	unsigned long flags;
288 	int i;
289 
290 	spin_lock_irqsave(&src->lock, flags);
291 	dst->htable = src->htable;
292 	dst->nel = src->nel;
293 	dst->next_sid = src->next_sid;
294 	dst->shutdown = 0;
295 	for (i = 0; i < SIDTAB_CACHE_LEN; i++)
296 		dst->cache[i] = NULL;
297 	spin_unlock_irqrestore(&src->lock, flags);
298 }
299 
300 void sidtab_shutdown(struct sidtab *s)
301 {
302 	unsigned long flags;
303 
304 	spin_lock_irqsave(&s->lock, flags);
305 	s->shutdown = 1;
306 	spin_unlock_irqrestore(&s->lock, flags);
307 }
308