4 * This file defines the kernel API for the NetLabel system. The NetLabel
5 * system manages static and dynamic label mappings for network protocols such
8 * Author: Paul Moore <paul@paul-moore.com>
13 * (c) Copyright Hewlett-Packard Development Company, L.P., 2006, 2008
15 * This program is free software; you can redistribute it and/or modify
16 * it under the terms of the GNU General Public License as published by
17 * the Free Software Foundation; either version 2 of the License, or
18 * (at your option) any later version.
20 * This program is distributed in the hope that it will be useful,
21 * but WITHOUT ANY WARRANTY; without even the implied warranty of
22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
23 * the GNU General Public License for more details.
25 * You should have received a copy of the GNU General Public License
26 * along with this program; if not, see <http://www.gnu.org/licenses/>.
30 #include <linux/init.h>
31 #include <linux/types.h>
32 #include <linux/slab.h>
33 #include <linux/audit.h>
35 #include <linux/in6.h>
38 #include <net/netlabel.h>
39 #include <net/cipso_ipv4.h>
40 #include <net/calipso.h>
42 #include <linux/atomic.h>
44 #include "netlabel_domainhash.h"
45 #include "netlabel_unlabeled.h"
46 #include "netlabel_cipso_v4.h"
47 #include "netlabel_calipso.h"
48 #include "netlabel_user.h"
49 #include "netlabel_mgmt.h"
50 #include "netlabel_addrlist.h"
53 * Configuration Functions
57 * netlbl_cfg_map_del - Remove a NetLabel/LSM domain mapping
58 * @domain: the domain mapping to remove
59 * @family: address family
61 * @mask: IP address mask
62 * @audit_info: NetLabel audit information
65 * Removes a NetLabel/LSM domain mapping. A @domain value of NULL causes the
66 * default domain mapping to be removed. Returns zero on success, negative
70 int netlbl_cfg_map_del(const char *domain,
74 struct netlbl_audit *audit_info)
76 if (addr == NULL && mask == NULL) {
77 return netlbl_domhsh_remove(domain, family, audit_info);
78 } else if (addr != NULL && mask != NULL) {
81 return netlbl_domhsh_remove_af4(domain, addr, mask,
83 #if IS_ENABLED(CONFIG_IPV6)
85 return netlbl_domhsh_remove_af6(domain, addr, mask,
96 * netlbl_cfg_unlbl_map_add - Add a new unlabeled mapping
97 * @domain: the domain mapping to add
98 * @family: address family
100 * @mask: IP address mask
101 * @audit_info: NetLabel audit information
104 * Adds a new unlabeled NetLabel/LSM domain mapping. A @domain value of NULL
105 * causes a new default domain mapping to be added. Returns zero on success,
106 * negative values on failure.
109 int netlbl_cfg_unlbl_map_add(const char *domain,
113 struct netlbl_audit *audit_info)
115 int ret_val = -ENOMEM;
116 struct netlbl_dom_map *entry;
117 struct netlbl_domaddr_map *addrmap = NULL;
118 struct netlbl_domaddr4_map *map4 = NULL;
119 struct netlbl_domaddr6_map *map6 = NULL;
121 entry = kzalloc(sizeof(*entry), GFP_ATOMIC);
124 if (domain != NULL) {
125 entry->domain = kstrdup(domain, GFP_ATOMIC);
126 if (entry->domain == NULL)
127 goto cfg_unlbl_map_add_failure;
129 entry->family = family;
131 if (addr == NULL && mask == NULL)
132 entry->def.type = NETLBL_NLTYPE_UNLABELED;
133 else if (addr != NULL && mask != NULL) {
134 addrmap = kzalloc(sizeof(*addrmap), GFP_ATOMIC);
136 goto cfg_unlbl_map_add_failure;
137 INIT_LIST_HEAD(&addrmap->list4);
138 INIT_LIST_HEAD(&addrmap->list6);
142 const struct in_addr *addr4 = addr;
143 const struct in_addr *mask4 = mask;
144 map4 = kzalloc(sizeof(*map4), GFP_ATOMIC);
146 goto cfg_unlbl_map_add_failure;
147 map4->def.type = NETLBL_NLTYPE_UNLABELED;
148 map4->list.addr = addr4->s_addr & mask4->s_addr;
149 map4->list.mask = mask4->s_addr;
150 map4->list.valid = 1;
151 ret_val = netlbl_af4list_add(&map4->list,
154 goto cfg_unlbl_map_add_failure;
157 #if IS_ENABLED(CONFIG_IPV6)
159 const struct in6_addr *addr6 = addr;
160 const struct in6_addr *mask6 = mask;
161 map6 = kzalloc(sizeof(*map6), GFP_ATOMIC);
163 goto cfg_unlbl_map_add_failure;
164 map6->def.type = NETLBL_NLTYPE_UNLABELED;
165 map6->list.addr = *addr6;
166 map6->list.addr.s6_addr32[0] &= mask6->s6_addr32[0];
167 map6->list.addr.s6_addr32[1] &= mask6->s6_addr32[1];
168 map6->list.addr.s6_addr32[2] &= mask6->s6_addr32[2];
169 map6->list.addr.s6_addr32[3] &= mask6->s6_addr32[3];
170 map6->list.mask = *mask6;
171 map6->list.valid = 1;
172 ret_val = netlbl_af6list_add(&map6->list,
175 goto cfg_unlbl_map_add_failure;
180 goto cfg_unlbl_map_add_failure;
183 entry->def.addrsel = addrmap;
184 entry->def.type = NETLBL_NLTYPE_ADDRSELECT;
187 goto cfg_unlbl_map_add_failure;
190 ret_val = netlbl_domhsh_add(entry, audit_info);
192 goto cfg_unlbl_map_add_failure;
196 cfg_unlbl_map_add_failure:
197 kfree(entry->domain);
207 * netlbl_cfg_unlbl_static_add - Adds a new static label
208 * @net: network namespace
209 * @dev_name: interface name
210 * @addr: IP address in network byte order (struct in[6]_addr)
211 * @mask: address mask in network byte order (struct in[6]_addr)
212 * @family: address family
213 * @secid: LSM secid value for the entry
214 * @audit_info: NetLabel audit information
217 * Adds a new NetLabel static label to be used when protocol provided labels
218 * are not present on incoming traffic. If @dev_name is NULL then the default
219 * interface will be used. Returns zero on success, negative values on failure.
222 int netlbl_cfg_unlbl_static_add(struct net *net,
223 const char *dev_name,
228 struct netlbl_audit *audit_info)
234 addr_len = sizeof(struct in_addr);
236 #if IS_ENABLED(CONFIG_IPV6)
238 addr_len = sizeof(struct in6_addr);
242 return -EPFNOSUPPORT;
245 return netlbl_unlhsh_add(net,
246 dev_name, addr, mask, addr_len,
251 * netlbl_cfg_unlbl_static_del - Removes an existing static label
252 * @net: network namespace
253 * @dev_name: interface name
254 * @addr: IP address in network byte order (struct in[6]_addr)
255 * @mask: address mask in network byte order (struct in[6]_addr)
256 * @family: address family
257 * @audit_info: NetLabel audit information
260 * Removes an existing NetLabel static label used when protocol provided labels
261 * are not present on incoming traffic. If @dev_name is NULL then the default
262 * interface will be used. Returns zero on success, negative values on failure.
265 int netlbl_cfg_unlbl_static_del(struct net *net,
266 const char *dev_name,
270 struct netlbl_audit *audit_info)
276 addr_len = sizeof(struct in_addr);
278 #if IS_ENABLED(CONFIG_IPV6)
280 addr_len = sizeof(struct in6_addr);
284 return -EPFNOSUPPORT;
287 return netlbl_unlhsh_remove(net,
288 dev_name, addr, mask, addr_len,
293 * netlbl_cfg_cipsov4_add - Add a new CIPSOv4 DOI definition
294 * @doi_def: CIPSO DOI definition
295 * @audit_info: NetLabel audit information
298 * Add a new CIPSO DOI definition as defined by @doi_def. Returns zero on
299 * success and negative values on failure.
302 int netlbl_cfg_cipsov4_add(struct cipso_v4_doi *doi_def,
303 struct netlbl_audit *audit_info)
305 return cipso_v4_doi_add(doi_def, audit_info);
309 * netlbl_cfg_cipsov4_del - Remove an existing CIPSOv4 DOI definition
311 * @audit_info: NetLabel audit information
314 * Remove an existing CIPSO DOI definition matching @doi. Returns zero on
315 * success and negative values on failure.
318 void netlbl_cfg_cipsov4_del(u32 doi, struct netlbl_audit *audit_info)
320 cipso_v4_doi_remove(doi, audit_info);
324 * netlbl_cfg_cipsov4_map_add - Add a new CIPSOv4 DOI mapping
325 * @doi: the CIPSO DOI
326 * @domain: the domain mapping to add
328 * @mask: IP address mask
329 * @audit_info: NetLabel audit information
332 * Add a new NetLabel/LSM domain mapping for the given CIPSO DOI to the NetLabel
333 * subsystem. A @domain value of NULL adds a new default domain mapping.
334 * Returns zero on success, negative values on failure.
337 int netlbl_cfg_cipsov4_map_add(u32 doi,
339 const struct in_addr *addr,
340 const struct in_addr *mask,
341 struct netlbl_audit *audit_info)
343 int ret_val = -ENOMEM;
344 struct cipso_v4_doi *doi_def;
345 struct netlbl_dom_map *entry;
346 struct netlbl_domaddr_map *addrmap = NULL;
347 struct netlbl_domaddr4_map *addrinfo = NULL;
349 doi_def = cipso_v4_doi_getdef(doi);
353 entry = kzalloc(sizeof(*entry), GFP_ATOMIC);
356 entry->family = AF_INET;
357 if (domain != NULL) {
358 entry->domain = kstrdup(domain, GFP_ATOMIC);
359 if (entry->domain == NULL)
363 if (addr == NULL && mask == NULL) {
364 entry->def.cipso = doi_def;
365 entry->def.type = NETLBL_NLTYPE_CIPSOV4;
366 } else if (addr != NULL && mask != NULL) {
367 addrmap = kzalloc(sizeof(*addrmap), GFP_ATOMIC);
370 INIT_LIST_HEAD(&addrmap->list4);
371 INIT_LIST_HEAD(&addrmap->list6);
373 addrinfo = kzalloc(sizeof(*addrinfo), GFP_ATOMIC);
374 if (addrinfo == NULL)
376 addrinfo->def.cipso = doi_def;
377 addrinfo->def.type = NETLBL_NLTYPE_CIPSOV4;
378 addrinfo->list.addr = addr->s_addr & mask->s_addr;
379 addrinfo->list.mask = mask->s_addr;
380 addrinfo->list.valid = 1;
381 ret_val = netlbl_af4list_add(&addrinfo->list, &addrmap->list4);
383 goto cfg_cipsov4_map_add_failure;
385 entry->def.addrsel = addrmap;
386 entry->def.type = NETLBL_NLTYPE_ADDRSELECT;
392 ret_val = netlbl_domhsh_add(entry, audit_info);
394 goto cfg_cipsov4_map_add_failure;
398 cfg_cipsov4_map_add_failure:
403 kfree(entry->domain);
407 cipso_v4_doi_putdef(doi_def);
412 * netlbl_cfg_calipso_add - Add a new CALIPSO DOI definition
413 * @doi_def: CALIPSO DOI definition
414 * @audit_info: NetLabel audit information
417 * Add a new CALIPSO DOI definition as defined by @doi_def. Returns zero on
418 * success and negative values on failure.
421 int netlbl_cfg_calipso_add(struct calipso_doi *doi_def,
422 struct netlbl_audit *audit_info)
424 #if IS_ENABLED(CONFIG_IPV6)
425 return calipso_doi_add(doi_def, audit_info);
432 * netlbl_cfg_calipso_del - Remove an existing CALIPSO DOI definition
434 * @audit_info: NetLabel audit information
437 * Remove an existing CALIPSO DOI definition matching @doi. Returns zero on
438 * success and negative values on failure.
441 void netlbl_cfg_calipso_del(u32 doi, struct netlbl_audit *audit_info)
443 #if IS_ENABLED(CONFIG_IPV6)
444 calipso_doi_remove(doi, audit_info);
449 * netlbl_cfg_calipso_map_add - Add a new CALIPSO DOI mapping
450 * @doi: the CALIPSO DOI
451 * @domain: the domain mapping to add
453 * @mask: IP address mask
454 * @audit_info: NetLabel audit information
457 * Add a new NetLabel/LSM domain mapping for the given CALIPSO DOI to the
458 * NetLabel subsystem. A @domain value of NULL adds a new default domain
459 * mapping. Returns zero on success, negative values on failure.
462 int netlbl_cfg_calipso_map_add(u32 doi,
464 const struct in6_addr *addr,
465 const struct in6_addr *mask,
466 struct netlbl_audit *audit_info)
468 #if IS_ENABLED(CONFIG_IPV6)
469 int ret_val = -ENOMEM;
470 struct calipso_doi *doi_def;
471 struct netlbl_dom_map *entry;
472 struct netlbl_domaddr_map *addrmap = NULL;
473 struct netlbl_domaddr6_map *addrinfo = NULL;
475 doi_def = calipso_doi_getdef(doi);
479 entry = kzalloc(sizeof(*entry), GFP_ATOMIC);
482 entry->family = AF_INET6;
483 if (domain != NULL) {
484 entry->domain = kstrdup(domain, GFP_ATOMIC);
485 if (entry->domain == NULL)
489 if (addr == NULL && mask == NULL) {
490 entry->def.calipso = doi_def;
491 entry->def.type = NETLBL_NLTYPE_CALIPSO;
492 } else if (addr != NULL && mask != NULL) {
493 addrmap = kzalloc(sizeof(*addrmap), GFP_ATOMIC);
496 INIT_LIST_HEAD(&addrmap->list4);
497 INIT_LIST_HEAD(&addrmap->list6);
499 addrinfo = kzalloc(sizeof(*addrinfo), GFP_ATOMIC);
500 if (addrinfo == NULL)
502 addrinfo->def.calipso = doi_def;
503 addrinfo->def.type = NETLBL_NLTYPE_CALIPSO;
504 addrinfo->list.addr = *addr;
505 addrinfo->list.addr.s6_addr32[0] &= mask->s6_addr32[0];
506 addrinfo->list.addr.s6_addr32[1] &= mask->s6_addr32[1];
507 addrinfo->list.addr.s6_addr32[2] &= mask->s6_addr32[2];
508 addrinfo->list.addr.s6_addr32[3] &= mask->s6_addr32[3];
509 addrinfo->list.mask = *mask;
510 addrinfo->list.valid = 1;
511 ret_val = netlbl_af6list_add(&addrinfo->list, &addrmap->list6);
513 goto cfg_calipso_map_add_failure;
515 entry->def.addrsel = addrmap;
516 entry->def.type = NETLBL_NLTYPE_ADDRSELECT;
522 ret_val = netlbl_domhsh_add(entry, audit_info);
524 goto cfg_calipso_map_add_failure;
528 cfg_calipso_map_add_failure:
533 kfree(entry->domain);
537 calipso_doi_putdef(doi_def);
545 * Security Attribute Functions
548 #define _CM_F_NONE 0x00000000
549 #define _CM_F_ALLOC 0x00000001
550 #define _CM_F_WALK 0x00000002
553 * _netlbl_catmap_getnode - Get a individual node from a catmap
554 * @catmap: pointer to the category bitmap
555 * @offset: the requested offset
556 * @cm_flags: catmap flags, see _CM_F_*
557 * @gfp_flags: memory allocation flags
560 * Iterate through the catmap looking for the node associated with @offset.
561 * If the _CM_F_ALLOC flag is set in @cm_flags and there is no associated node,
562 * one will be created and inserted into the catmap. If the _CM_F_WALK flag is
563 * set in @cm_flags and there is no associated node, the next highest node will
564 * be returned. Returns a pointer to the node on success, NULL on failure.
567 static struct netlbl_lsm_catmap *_netlbl_catmap_getnode(
568 struct netlbl_lsm_catmap **catmap,
570 unsigned int cm_flags,
573 struct netlbl_lsm_catmap *iter = *catmap;
574 struct netlbl_lsm_catmap *prev = NULL;
577 goto catmap_getnode_alloc;
578 if (offset < iter->startbit)
579 goto catmap_getnode_walk;
580 while (iter && offset >= (iter->startbit + NETLBL_CATMAP_SIZE)) {
584 if (iter == NULL || offset < iter->startbit)
585 goto catmap_getnode_walk;
590 if (cm_flags & _CM_F_WALK)
592 catmap_getnode_alloc:
593 if (!(cm_flags & _CM_F_ALLOC))
596 iter = netlbl_catmap_alloc(gfp_flags);
599 iter->startbit = offset & ~(NETLBL_CATMAP_SIZE - 1);
602 iter->next = *catmap;
605 iter->next = prev->next;
613 * netlbl_catmap_walk - Walk a LSM secattr catmap looking for a bit
614 * @catmap: the category bitmap
615 * @offset: the offset to start searching at, in bits
618 * This function walks a LSM secattr category bitmap starting at @offset and
619 * returns the spot of the first set bit or -ENOENT if no bits are set.
622 int netlbl_catmap_walk(struct netlbl_lsm_catmap *catmap, u32 offset)
624 struct netlbl_lsm_catmap *iter = catmap;
627 NETLBL_CATMAP_MAPTYPE bitmap;
629 iter = _netlbl_catmap_getnode(&catmap, offset, _CM_F_WALK, 0);
632 if (offset > iter->startbit) {
633 offset -= iter->startbit;
634 idx = offset / NETLBL_CATMAP_MAPSIZE;
635 bit = offset % NETLBL_CATMAP_MAPSIZE;
640 bitmap = iter->bitmap[idx] >> bit;
644 while ((bitmap & NETLBL_CATMAP_BIT) == 0) {
648 return iter->startbit +
649 (NETLBL_CATMAP_MAPSIZE * idx) + bit;
651 if (++idx >= NETLBL_CATMAP_MAPCNT) {
652 if (iter->next != NULL) {
658 bitmap = iter->bitmap[idx];
664 EXPORT_SYMBOL(netlbl_catmap_walk);
667 * netlbl_catmap_walkrng - Find the end of a string of set bits
668 * @catmap: the category bitmap
669 * @offset: the offset to start searching at, in bits
672 * This function walks a LSM secattr category bitmap starting at @offset and
673 * returns the spot of the first cleared bit or -ENOENT if the offset is past
674 * the end of the bitmap.
677 int netlbl_catmap_walkrng(struct netlbl_lsm_catmap *catmap, u32 offset)
679 struct netlbl_lsm_catmap *iter;
680 struct netlbl_lsm_catmap *prev = NULL;
683 NETLBL_CATMAP_MAPTYPE bitmask;
684 NETLBL_CATMAP_MAPTYPE bitmap;
686 iter = _netlbl_catmap_getnode(&catmap, offset, _CM_F_WALK, 0);
689 if (offset > iter->startbit) {
690 offset -= iter->startbit;
691 idx = offset / NETLBL_CATMAP_MAPSIZE;
692 bit = offset % NETLBL_CATMAP_MAPSIZE;
697 bitmask = NETLBL_CATMAP_BIT << bit;
700 bitmap = iter->bitmap[idx];
701 while (bitmask != 0 && (bitmap & bitmask) != 0) {
706 if (prev && idx == 0 && bit == 0)
707 return prev->startbit + NETLBL_CATMAP_SIZE - 1;
708 else if (bitmask != 0)
709 return iter->startbit +
710 (NETLBL_CATMAP_MAPSIZE * idx) + bit - 1;
711 else if (++idx >= NETLBL_CATMAP_MAPCNT) {
712 if (iter->next == NULL)
713 return iter->startbit + NETLBL_CATMAP_SIZE - 1;
718 bitmask = NETLBL_CATMAP_BIT;
726 * netlbl_catmap_getlong - Export an unsigned long bitmap
727 * @catmap: pointer to the category bitmap
728 * @offset: pointer to the requested offset
729 * @bitmap: the exported bitmap
732 * Export a bitmap with an offset greater than or equal to @offset and return
733 * it in @bitmap. The @offset must be aligned to an unsigned long and will be
734 * updated on return if different from what was requested; if the catmap is
735 * empty at the requested offset and beyond, the @offset is set to (u32)-1.
736 * Returns zero on sucess, negative values on failure.
739 int netlbl_catmap_getlong(struct netlbl_lsm_catmap *catmap,
741 unsigned long *bitmap)
743 struct netlbl_lsm_catmap *iter;
747 /* only allow aligned offsets */
748 if ((off & (BITS_PER_LONG - 1)) != 0)
751 /* a null catmap is equivalent to an empty one */
757 if (off < catmap->startbit) {
758 off = catmap->startbit;
761 iter = _netlbl_catmap_getnode(&catmap, off, _CM_F_WALK, 0);
767 if (off < iter->startbit) {
768 *offset = iter->startbit;
771 off -= iter->startbit;
772 idx = off / NETLBL_CATMAP_MAPSIZE;
773 *bitmap = iter->bitmap[idx] >> (off % NETLBL_CATMAP_MAPSIZE);
779 * netlbl_catmap_setbit - Set a bit in a LSM secattr catmap
780 * @catmap: pointer to the category bitmap
781 * @bit: the bit to set
782 * @flags: memory allocation flags
785 * Set the bit specified by @bit in @catmap. Returns zero on success,
786 * negative values on failure.
789 int netlbl_catmap_setbit(struct netlbl_lsm_catmap **catmap,
793 struct netlbl_lsm_catmap *iter;
796 iter = _netlbl_catmap_getnode(catmap, bit, _CM_F_ALLOC, flags);
800 bit -= iter->startbit;
801 idx = bit / NETLBL_CATMAP_MAPSIZE;
802 iter->bitmap[idx] |= NETLBL_CATMAP_BIT << (bit % NETLBL_CATMAP_MAPSIZE);
806 EXPORT_SYMBOL(netlbl_catmap_setbit);
809 * netlbl_catmap_setrng - Set a range of bits in a LSM secattr catmap
810 * @catmap: pointer to the category bitmap
811 * @start: the starting bit
812 * @end: the last bit in the string
813 * @flags: memory allocation flags
816 * Set a range of bits, starting at @start and ending with @end. Returns zero
817 * on success, negative values on failure.
820 int netlbl_catmap_setrng(struct netlbl_lsm_catmap **catmap,
828 while (rc == 0 && spot <= end) {
829 if (((spot & (BITS_PER_LONG - 1)) == 0) &&
830 ((end - spot) > BITS_PER_LONG)) {
831 rc = netlbl_catmap_setlong(catmap,
835 spot += BITS_PER_LONG;
837 rc = netlbl_catmap_setbit(catmap, spot++, flags);
844 * netlbl_catmap_setlong - Import an unsigned long bitmap
845 * @catmap: pointer to the category bitmap
846 * @offset: offset to the start of the imported bitmap
847 * @bitmap: the bitmap to import
848 * @flags: memory allocation flags
851 * Import the bitmap specified in @bitmap into @catmap, using the offset
852 * in @offset. The offset must be aligned to an unsigned long. Returns zero
853 * on success, negative values on failure.
856 int netlbl_catmap_setlong(struct netlbl_lsm_catmap **catmap,
858 unsigned long bitmap,
861 struct netlbl_lsm_catmap *iter;
864 /* only allow aligned offsets */
865 if ((offset & (BITS_PER_LONG - 1)) != 0)
868 iter = _netlbl_catmap_getnode(catmap, offset, _CM_F_ALLOC, flags);
872 offset -= iter->startbit;
873 idx = offset / NETLBL_CATMAP_MAPSIZE;
874 iter->bitmap[idx] |= (NETLBL_CATMAP_MAPTYPE)bitmap
875 << (offset % NETLBL_CATMAP_MAPSIZE);
884 * netlbl_bitmap_walk - Walk a bitmap looking for a bit
885 * @bitmap: the bitmap
886 * @bitmap_len: length in bits
887 * @offset: starting offset
888 * @state: if non-zero, look for a set (1) bit else look for a cleared (0) bit
891 * Starting at @offset, walk the bitmap from left to right until either the
892 * desired bit is found or we reach the end. Return the bit offset, -1 if
893 * not found, or -2 if error.
895 int netlbl_bitmap_walk(const unsigned char *bitmap, u32 bitmap_len,
896 u32 offset, u8 state)
900 unsigned char bitmask;
903 byte_offset = offset / 8;
904 byte = bitmap[byte_offset];
906 bitmask = 0x80 >> (offset % 8);
908 while (bit_spot < bitmap_len) {
909 if ((state && (byte & bitmask) == bitmask) ||
910 (state == 0 && (byte & bitmask) == 0))
913 if (++bit_spot >= bitmap_len)
917 byte = bitmap[++byte_offset];
924 EXPORT_SYMBOL(netlbl_bitmap_walk);
927 * netlbl_bitmap_setbit - Sets a single bit in a bitmap
928 * @bitmap: the bitmap
930 * @state: if non-zero, set the bit (1) else clear the bit (0)
933 * Set a single bit in the bitmask. Returns zero on success, negative values
936 void netlbl_bitmap_setbit(unsigned char *bitmap, u32 bit, u8 state)
941 /* gcc always rounds to zero when doing integer division */
943 bitmask = 0x80 >> (bit % 8);
945 bitmap[byte_spot] |= bitmask;
947 bitmap[byte_spot] &= ~bitmask;
949 EXPORT_SYMBOL(netlbl_bitmap_setbit);
956 * netlbl_enabled - Determine if the NetLabel subsystem is enabled
959 * The LSM can use this function to determine if it should use NetLabel
960 * security attributes in it's enforcement mechanism. Currently, NetLabel is
961 * considered to be enabled when it's configuration contains a valid setup for
962 * at least one labeled protocol (i.e. NetLabel can understand incoming
963 * labeled packets of at least one type); otherwise NetLabel is considered to
967 int netlbl_enabled(void)
969 /* At some point we probably want to expose this mechanism to the user
970 * as well so that admins can toggle NetLabel regardless of the
972 return (atomic_read(&netlabel_mgmt_protocount) > 0);
976 * netlbl_sock_setattr - Label a socket using the correct protocol
977 * @sk: the socket to label
978 * @family: protocol family
979 * @secattr: the security attributes
982 * Attach the correct label to the given socket using the security attributes
983 * specified in @secattr. This function requires exclusive access to @sk,
984 * which means it either needs to be in the process of being created or locked.
985 * Returns zero on success, -EDESTADDRREQ if the domain is configured to use
986 * network address selectors (can't blindly label the socket), and negative
987 * values on all other failures.
990 int netlbl_sock_setattr(struct sock *sk,
992 const struct netlbl_lsm_secattr *secattr)
995 struct netlbl_dom_map *dom_entry;
998 dom_entry = netlbl_domhsh_getentry(secattr->domain, family);
999 if (dom_entry == NULL) {
1001 goto socket_setattr_return;
1005 switch (dom_entry->def.type) {
1006 case NETLBL_NLTYPE_ADDRSELECT:
1007 ret_val = -EDESTADDRREQ;
1009 case NETLBL_NLTYPE_CIPSOV4:
1010 ret_val = cipso_v4_sock_setattr(sk,
1011 dom_entry->def.cipso,
1014 case NETLBL_NLTYPE_UNLABELED:
1021 #if IS_ENABLED(CONFIG_IPV6)
1023 switch (dom_entry->def.type) {
1024 case NETLBL_NLTYPE_ADDRSELECT:
1025 ret_val = -EDESTADDRREQ;
1027 case NETLBL_NLTYPE_CALIPSO:
1028 ret_val = calipso_sock_setattr(sk,
1029 dom_entry->def.calipso,
1032 case NETLBL_NLTYPE_UNLABELED:
1041 ret_val = -EPROTONOSUPPORT;
1044 socket_setattr_return:
1050 * netlbl_sock_delattr - Delete all the NetLabel labels on a socket
1054 * Remove all the NetLabel labeling from @sk. The caller is responsible for
1055 * ensuring that @sk is locked.
1058 void netlbl_sock_delattr(struct sock *sk)
1060 switch (sk->sk_family) {
1062 cipso_v4_sock_delattr(sk);
1064 #if IS_ENABLED(CONFIG_IPV6)
1066 calipso_sock_delattr(sk);
1073 * netlbl_sock_getattr - Determine the security attributes of a sock
1075 * @secattr: the security attributes
1078 * Examines the given sock to see if any NetLabel style labeling has been
1079 * applied to the sock, if so it parses the socket label and returns the
1080 * security attributes in @secattr. Returns zero on success, negative values
1084 int netlbl_sock_getattr(struct sock *sk,
1085 struct netlbl_lsm_secattr *secattr)
1089 switch (sk->sk_family) {
1091 ret_val = cipso_v4_sock_getattr(sk, secattr);
1093 #if IS_ENABLED(CONFIG_IPV6)
1095 ret_val = calipso_sock_getattr(sk, secattr);
1099 ret_val = -EPROTONOSUPPORT;
1106 * netlbl_conn_setattr - Label a connected socket using the correct protocol
1107 * @sk: the socket to label
1108 * @addr: the destination address
1109 * @secattr: the security attributes
1112 * Attach the correct label to the given connected socket using the security
1113 * attributes specified in @secattr. The caller is responsible for ensuring
1114 * that @sk is locked. Returns zero on success, negative values on failure.
1117 int netlbl_conn_setattr(struct sock *sk,
1118 struct sockaddr *addr,
1119 const struct netlbl_lsm_secattr *secattr)
1122 struct sockaddr_in *addr4;
1123 #if IS_ENABLED(CONFIG_IPV6)
1124 struct sockaddr_in6 *addr6;
1126 struct netlbl_dommap_def *entry;
1129 switch (addr->sa_family) {
1131 addr4 = (struct sockaddr_in *)addr;
1132 entry = netlbl_domhsh_getentry_af4(secattr->domain,
1133 addr4->sin_addr.s_addr);
1134 if (entry == NULL) {
1136 goto conn_setattr_return;
1138 switch (entry->type) {
1139 case NETLBL_NLTYPE_CIPSOV4:
1140 ret_val = cipso_v4_sock_setattr(sk,
1141 entry->cipso, secattr);
1143 case NETLBL_NLTYPE_UNLABELED:
1144 /* just delete the protocols we support for right now
1145 * but we could remove other protocols if needed */
1146 netlbl_sock_delattr(sk);
1153 #if IS_ENABLED(CONFIG_IPV6)
1155 addr6 = (struct sockaddr_in6 *)addr;
1156 entry = netlbl_domhsh_getentry_af6(secattr->domain,
1158 if (entry == NULL) {
1160 goto conn_setattr_return;
1162 switch (entry->type) {
1163 case NETLBL_NLTYPE_CALIPSO:
1164 ret_val = calipso_sock_setattr(sk,
1165 entry->calipso, secattr);
1167 case NETLBL_NLTYPE_UNLABELED:
1168 /* just delete the protocols we support for right now
1169 * but we could remove other protocols if needed */
1170 netlbl_sock_delattr(sk);
1179 ret_val = -EPROTONOSUPPORT;
1182 conn_setattr_return:
1188 * netlbl_req_setattr - Label a request socket using the correct protocol
1189 * @req: the request socket to label
1190 * @secattr: the security attributes
1193 * Attach the correct label to the given socket using the security attributes
1194 * specified in @secattr. Returns zero on success, negative values on failure.
1197 int netlbl_req_setattr(struct request_sock *req,
1198 const struct netlbl_lsm_secattr *secattr)
1201 struct netlbl_dommap_def *entry;
1202 struct inet_request_sock *ireq = inet_rsk(req);
1205 switch (req->rsk_ops->family) {
1207 entry = netlbl_domhsh_getentry_af4(secattr->domain,
1209 if (entry == NULL) {
1211 goto req_setattr_return;
1213 switch (entry->type) {
1214 case NETLBL_NLTYPE_CIPSOV4:
1215 ret_val = cipso_v4_req_setattr(req,
1216 entry->cipso, secattr);
1218 case NETLBL_NLTYPE_UNLABELED:
1219 netlbl_req_delattr(req);
1226 #if IS_ENABLED(CONFIG_IPV6)
1228 entry = netlbl_domhsh_getentry_af6(secattr->domain,
1229 &ireq->ir_v6_rmt_addr);
1230 if (entry == NULL) {
1232 goto req_setattr_return;
1234 switch (entry->type) {
1235 case NETLBL_NLTYPE_CALIPSO:
1236 ret_val = calipso_req_setattr(req,
1237 entry->calipso, secattr);
1239 case NETLBL_NLTYPE_UNLABELED:
1240 netlbl_req_delattr(req);
1249 ret_val = -EPROTONOSUPPORT;
1258 * netlbl_req_delattr - Delete all the NetLabel labels on a socket
1262 * Remove all the NetLabel labeling from @req.
1265 void netlbl_req_delattr(struct request_sock *req)
1267 switch (req->rsk_ops->family) {
1269 cipso_v4_req_delattr(req);
1271 #if IS_ENABLED(CONFIG_IPV6)
1273 calipso_req_delattr(req);
1280 * netlbl_skbuff_setattr - Label a packet using the correct protocol
1282 * @family: protocol family
1283 * @secattr: the security attributes
1286 * Attach the correct label to the given packet using the security attributes
1287 * specified in @secattr. Returns zero on success, negative values on failure.
1290 int netlbl_skbuff_setattr(struct sk_buff *skb,
1292 const struct netlbl_lsm_secattr *secattr)
1296 #if IS_ENABLED(CONFIG_IPV6)
1297 struct ipv6hdr *hdr6;
1299 struct netlbl_dommap_def *entry;
1305 entry = netlbl_domhsh_getentry_af4(secattr->domain,
1307 if (entry == NULL) {
1309 goto skbuff_setattr_return;
1311 switch (entry->type) {
1312 case NETLBL_NLTYPE_CIPSOV4:
1313 ret_val = cipso_v4_skbuff_setattr(skb, entry->cipso,
1316 case NETLBL_NLTYPE_UNLABELED:
1317 /* just delete the protocols we support for right now
1318 * but we could remove other protocols if needed */
1319 ret_val = cipso_v4_skbuff_delattr(skb);
1325 #if IS_ENABLED(CONFIG_IPV6)
1327 hdr6 = ipv6_hdr(skb);
1328 entry = netlbl_domhsh_getentry_af6(secattr->domain,
1330 if (entry == NULL) {
1332 goto skbuff_setattr_return;
1334 switch (entry->type) {
1335 case NETLBL_NLTYPE_CALIPSO:
1336 ret_val = calipso_skbuff_setattr(skb, entry->calipso,
1339 case NETLBL_NLTYPE_UNLABELED:
1340 /* just delete the protocols we support for right now
1341 * but we could remove other protocols if needed */
1342 ret_val = calipso_skbuff_delattr(skb);
1350 ret_val = -EPROTONOSUPPORT;
1353 skbuff_setattr_return:
1359 * netlbl_skbuff_getattr - Determine the security attributes of a packet
1361 * @family: protocol family
1362 * @secattr: the security attributes
1365 * Examines the given packet to see if a recognized form of packet labeling
1366 * is present, if so it parses the packet label and returns the security
1367 * attributes in @secattr. Returns zero on success, negative values on
1371 int netlbl_skbuff_getattr(const struct sk_buff *skb,
1373 struct netlbl_lsm_secattr *secattr)
1379 ptr = cipso_v4_optptr(skb);
1380 if (ptr && cipso_v4_getattr(ptr, secattr) == 0)
1383 #if IS_ENABLED(CONFIG_IPV6)
1385 ptr = calipso_optptr(skb);
1386 if (ptr && calipso_getattr(ptr, secattr) == 0)
1392 return netlbl_unlabel_getattr(skb, family, secattr);
1396 * netlbl_skbuff_err - Handle a LSM error on a sk_buff
1398 * @family: the family
1399 * @error: the error code
1400 * @gateway: true if host is acting as a gateway, false otherwise
1403 * Deal with a LSM problem when handling the packet in @skb, typically this is
1404 * a permission denied problem (-EACCES). The correct action is determined
1405 * according to the packet's labeling protocol.
1408 void netlbl_skbuff_err(struct sk_buff *skb, u16 family, int error, int gateway)
1412 if (cipso_v4_optptr(skb))
1413 cipso_v4_error(skb, error, gateway);
1419 * netlbl_cache_invalidate - Invalidate all of the NetLabel protocol caches
1422 * For all of the NetLabel protocols that support some form of label mapping
1423 * cache, invalidate the cache. Returns zero on success, negative values on
1427 void netlbl_cache_invalidate(void)
1429 cipso_v4_cache_invalidate();
1430 #if IS_ENABLED(CONFIG_IPV6)
1431 calipso_cache_invalidate();
1436 * netlbl_cache_add - Add an entry to a NetLabel protocol cache
1438 * @family: the family
1439 * @secattr: the packet's security attributes
1442 * Add the LSM security attributes for the given packet to the underlying
1443 * NetLabel protocol's label mapping cache. Returns zero on success, negative
1447 int netlbl_cache_add(const struct sk_buff *skb, u16 family,
1448 const struct netlbl_lsm_secattr *secattr)
1452 if ((secattr->flags & NETLBL_SECATTR_CACHE) == 0)
1457 ptr = cipso_v4_optptr(skb);
1459 return cipso_v4_cache_add(ptr, secattr);
1461 #if IS_ENABLED(CONFIG_IPV6)
1463 ptr = calipso_optptr(skb);
1465 return calipso_cache_add(ptr, secattr);
1473 * Protocol Engine Functions
1477 * netlbl_audit_start - Start an audit message
1478 * @type: audit message type
1479 * @audit_info: NetLabel audit information
1482 * Start an audit message using the type specified in @type and fill the audit
1483 * message with some fields common to all NetLabel audit messages. This
1484 * function should only be used by protocol engines, not LSMs. Returns a
1485 * pointer to the audit buffer on success, NULL on failure.
1488 struct audit_buffer *netlbl_audit_start(int type,
1489 struct netlbl_audit *audit_info)
1491 return netlbl_audit_start_common(type, audit_info);
1493 EXPORT_SYMBOL(netlbl_audit_start);
1500 * netlbl_init - Initialize NetLabel
1503 * Perform the required NetLabel initialization before first use.
1506 static int __init netlbl_init(void)
1510 printk(KERN_INFO "NetLabel: Initializing\n");
1511 printk(KERN_INFO "NetLabel: domain hash size = %u\n",
1512 (1 << NETLBL_DOMHSH_BITSIZE));
1513 printk(KERN_INFO "NetLabel: protocols = UNLABELED CIPSOv4 CALIPSO\n");
1515 ret_val = netlbl_domhsh_init(NETLBL_DOMHSH_BITSIZE);
1519 ret_val = netlbl_unlabel_init(NETLBL_UNLHSH_BITSIZE);
1523 ret_val = netlbl_netlink_init();
1527 ret_val = netlbl_unlabel_defconf();
1530 printk(KERN_INFO "NetLabel: unlabeled traffic allowed by default\n");
1535 panic("NetLabel: failed to initialize properly (%d)\n", ret_val);
1538 subsys_initcall(netlbl_init);