オープンソース・ソフトウェアの開発とダウンロード

Subversion リポジトリの参照

Diff of /trunk/1.8.x/ccs-patch/security/ccsecurity/policy_io.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

branches/ccs-patch/security/ccsecurity/policy_io.c revision 2922 by kumaneko, Wed Aug 19 04:26:56 2009 UTC trunk/1.8.x/ccs-patch/security/ccsecurity/policy_io.c revision 4280 by kumaneko, Fri Dec 31 02:05:48 2010 UTC
# Line 1  Line 1 
1  /*  /*
2   * security/ccsecurity/policy_io.c   * security/ccsecurity/policy_io.c
3   *   *
4   * Copyright (C) 2005-2009  NTT DATA CORPORATION   * Copyright (C) 2005-2010  NTT DATA CORPORATION
5   *   *
6   * Version: 1.7.0-pre   2009/08/08   * Version: 1.8.0+   2010/12/31
7     */
8    
9    #include "internal.h"
10    
11    #if LINUX_VERSION_CODE < KERNEL_VERSION(2, 5, 0)
12    
13    /**
14     * __wait_event_interruptible_timeout - Sleep until a condition gets true or a timeout elapses.
15   *   *
16   * This file is applicable to both 2.4.30 and 2.6.11 and later.   * @wq:        The waitqueue to wait on.
17   * See README.ccs for ChangeLog.   * @condition: A C expression for the event to wait for.
18     * @ret:       Timeout, in jiffies.
19     *
20     * Returns 0 if the @timeout elapsed, -ERESTARTSYS if it was interrupted by a
21     * signal, and the remaining jiffies otherwise if the condition evaluated to
22     * true before the timeout elapsed.
23     *
24     * This is for compatibility with older kernels.
25     */
26    #define __wait_event_interruptible_timeout(wq, condition, ret)          \
27    do {                                                                    \
28            wait_queue_t __wait;                                            \
29            init_waitqueue_entry(&__wait, current);                         \
30                                                                            \
31            add_wait_queue(&wq, &__wait);                                   \
32            for (;;) {                                                      \
33                    set_current_state(TASK_INTERRUPTIBLE);                  \
34                    if (condition)                                          \
35                            break;                                          \
36                    if (!signal_pending(current)) {                         \
37                            ret = schedule_timeout(ret);                    \
38                            if (!ret)                                       \
39                                    break;                                  \
40                            continue;                                       \
41                    }                                                       \
42                    ret = -ERESTARTSYS;                                     \
43                    break;                                                  \
44            }                                                               \
45            current->state = TASK_RUNNING;                                  \
46            remove_wait_queue(&wq, &__wait);                                \
47    } while (0)
48    
49    /**
50     * wait_event_interruptible_timeout - Sleep until a condition gets true or a timeout elapses.
51     *
52     * @wq:        The waitqueue to wait on.
53     * @condition: A C expression for the event to wait for.
54     * @timeout:   Timeout, in jiffies.
55     *
56     * Returns 0 if the @timeout elapsed, -ERESTARTSYS if it was interrupted by a
57     * signal, and the remaining jiffies otherwise if the condition evaluated to
58     * true before the timeout elapsed.
59     *
60     * This is for compatibility with older kernels.
61     */
62    #define wait_event_interruptible_timeout(wq, condition, timeout)        \
63    ({                                                                      \
64            long __ret = timeout;                                           \
65            if (!(condition))                                               \
66                    __wait_event_interruptible_timeout(wq, condition, __ret); \
67            __ret;                                                          \
68    })
69    
70    #endif
71    
72    /**
73     * list_for_each_cookie - iterate over a list with cookie.
74   *   *
75     * @pos:  Pointer to "struct list_head".
76     * @head: Pointer to "struct list_head".
77   */   */
78    #define list_for_each_cookie(pos, head)                                 \
79            for (pos = pos ? pos : srcu_dereference((head)->next, &ccs_ss); \
80                 pos != (head); pos = srcu_dereference(pos->next, &ccs_ss))
81    
 #include "internal.h"  
82    
83  /* Lock for protecting ccs_profile->comment  */  /* Profile version. Currently only 20100903 is defined. */
84  static DEFINE_SPINLOCK(ccs_profile_comment_lock);  static unsigned int ccs_profile_version;
85    
86    /* Profile table. Memory is allocated as needed. */
87    static struct ccs_profile *ccs_profile_ptr[CCS_MAX_PROFILES];
88    
89  /* String table for functionality that takes 2 modes. */  /* String table for operation mode. */
90  static const char *ccs_mode_2[2] = {  const char * const ccs_mode[CCS_CONFIG_MAX_MODE] = {
91          "disabled", "enabled"          [CCS_CONFIG_DISABLED]   = "disabled",
92            [CCS_CONFIG_LEARNING]   = "learning",
93            [CCS_CONFIG_PERMISSIVE] = "permissive",
94            [CCS_CONFIG_ENFORCING]  = "enforcing"
95  };  };
96    
97  static const char *ccs_keyword_mode[4] = {  /* String table for /proc/ccs/profile interface. */
98          "MAC_MODE_DISABLED", "MAC_MODE_LEARNING",  const char * const ccs_mac_keywords[CCS_MAX_MAC_INDEX
99          "MAC_MODE_PERMISSIVE", "MAC_MODE_ENFORCING"                                      + CCS_MAX_MAC_CATEGORY_INDEX] = {
100            /* CONFIG::file group */
101            [CCS_MAC_FILE_EXECUTE]    = "execute",
102            [CCS_MAC_FILE_OPEN]       = "open",
103            [CCS_MAC_FILE_CREATE]     = "create",
104            [CCS_MAC_FILE_UNLINK]     = "unlink",
105            [CCS_MAC_FILE_GETATTR]    = "getattr",
106            [CCS_MAC_FILE_MKDIR]      = "mkdir",
107            [CCS_MAC_FILE_RMDIR]      = "rmdir",
108            [CCS_MAC_FILE_MKFIFO]     = "mkfifo",
109            [CCS_MAC_FILE_MKSOCK]     = "mksock",
110            [CCS_MAC_FILE_TRUNCATE]   = "truncate",
111            [CCS_MAC_FILE_SYMLINK]    = "symlink",
112            [CCS_MAC_FILE_MKBLOCK]    = "mkblock",
113            [CCS_MAC_FILE_MKCHAR]     = "mkchar",
114            [CCS_MAC_FILE_LINK]       = "link",
115            [CCS_MAC_FILE_RENAME]     = "rename",
116            [CCS_MAC_FILE_CHMOD]      = "chmod",
117            [CCS_MAC_FILE_CHOWN]      = "chown",
118            [CCS_MAC_FILE_CHGRP]      = "chgrp",
119            [CCS_MAC_FILE_IOCTL]      = "ioctl",
120            [CCS_MAC_FILE_CHROOT]     = "chroot",
121            [CCS_MAC_FILE_MOUNT]      = "mount",
122            [CCS_MAC_FILE_UMOUNT]     = "unmount",
123            [CCS_MAC_FILE_PIVOT_ROOT] = "pivot_root",
124            /* CONFIG::misc group */
125            [CCS_MAC_ENVIRON] = "env",
126            /* CONFIG::network group */
127            [CCS_MAC_NETWORK_INET_STREAM_BIND]       = "inet_stream_bind",
128            [CCS_MAC_NETWORK_INET_STREAM_LISTEN]     = "inet_stream_listen",
129            [CCS_MAC_NETWORK_INET_STREAM_CONNECT]    = "inet_stream_connect",
130            [CCS_MAC_NETWORK_INET_STREAM_ACCEPT]     = "inet_stream_accept",
131            [CCS_MAC_NETWORK_INET_DGRAM_BIND]        = "inet_dgram_bind",
132            [CCS_MAC_NETWORK_INET_DGRAM_SEND]        = "inet_dgram_send",
133            [CCS_MAC_NETWORK_INET_DGRAM_RECV]        = "inet_dgram_recv",
134            [CCS_MAC_NETWORK_INET_RAW_BIND]          = "inet_raw_bind",
135            [CCS_MAC_NETWORK_INET_RAW_SEND]          = "inet_raw_send",
136            [CCS_MAC_NETWORK_INET_RAW_RECV]          = "inet_raw_recv",
137            [CCS_MAC_NETWORK_UNIX_STREAM_BIND]       = "unix_stream_bind",
138            [CCS_MAC_NETWORK_UNIX_STREAM_LISTEN]     = "unix_stream_listen",
139            [CCS_MAC_NETWORK_UNIX_STREAM_CONNECT]    = "unix_stream_connect",
140            [CCS_MAC_NETWORK_UNIX_STREAM_ACCEPT]     = "unix_stream_accept",
141            [CCS_MAC_NETWORK_UNIX_DGRAM_BIND]        = "unix_dgram_bind",
142            [CCS_MAC_NETWORK_UNIX_DGRAM_SEND]        = "unix_dgram_send",
143            [CCS_MAC_NETWORK_UNIX_DGRAM_RECV]        = "unix_dgram_recv",
144            [CCS_MAC_NETWORK_UNIX_SEQPACKET_BIND]    = "unix_seqpacket_bind",
145            [CCS_MAC_NETWORK_UNIX_SEQPACKET_LISTEN]  = "unix_seqpacket_listen",
146            [CCS_MAC_NETWORK_UNIX_SEQPACKET_CONNECT] = "unix_seqpacket_connect",
147            [CCS_MAC_NETWORK_UNIX_SEQPACKET_ACCEPT]  = "unix_seqpacket_accept",
148            /* CONFIG::ipc group */
149            [CCS_MAC_SIGNAL] = "signal",
150            /* CONFIG::capability group */
151            [CCS_MAC_CAPABILITY_USE_ROUTE_SOCKET]  = "use_route",
152            [CCS_MAC_CAPABILITY_USE_PACKET_SOCKET] = "use_packet",
153            [CCS_MAC_CAPABILITY_SYS_REBOOT]        = "SYS_REBOOT",
154            [CCS_MAC_CAPABILITY_SYS_VHANGUP]       = "SYS_VHANGUP",
155            [CCS_MAC_CAPABILITY_SYS_SETTIME]       = "SYS_TIME",
156            [CCS_MAC_CAPABILITY_SYS_NICE]          = "SYS_NICE",
157            [CCS_MAC_CAPABILITY_SYS_SETHOSTNAME]   = "SYS_SETHOSTNAME",
158            [CCS_MAC_CAPABILITY_USE_KERNEL_MODULE] = "use_kernel_module",
159            [CCS_MAC_CAPABILITY_SYS_KEXEC_LOAD]    = "SYS_KEXEC_LOAD",
160            [CCS_MAC_CAPABILITY_SYS_PTRACE]        = "SYS_PTRACE",
161            /* CONFIG group */
162            [CCS_MAX_MAC_INDEX + CCS_MAC_CATEGORY_FILE]       = "file",
163            [CCS_MAX_MAC_INDEX + CCS_MAC_CATEGORY_NETWORK]    = "network",
164            [CCS_MAX_MAC_INDEX + CCS_MAC_CATEGORY_MISC]       = "misc",
165            [CCS_MAX_MAC_INDEX + CCS_MAC_CATEGORY_IPC]        = "ipc",
166            [CCS_MAX_MAC_INDEX + CCS_MAC_CATEGORY_CAPABILITY] = "capability",
167  };  };
168    
169  static const char *ccs_keyword_audit[2] = {  /* String table for path operation. */
170          "NO_AUDIT_GRANT_LOG", "NO_AUDIT_REJECT_LOG"  const char * const ccs_path_keyword[CCS_MAX_PATH_OPERATION] = {
171            [CCS_TYPE_EXECUTE]    = "execute",
172            [CCS_TYPE_READ]       = "read",
173            [CCS_TYPE_WRITE]      = "write",
174            [CCS_TYPE_APPEND]     = "append",
175            [CCS_TYPE_UNLINK]     = "unlink",
176            [CCS_TYPE_GETATTR]    = "getattr",
177            [CCS_TYPE_RMDIR]      = "rmdir",
178            [CCS_TYPE_TRUNCATE]   = "truncate",
179            [CCS_TYPE_SYMLINK]    = "symlink",
180            [CCS_TYPE_CHROOT]     = "chroot",
181            [CCS_TYPE_UMOUNT]     = "unmount",
182  };  };
183    
184  static const char *ccs_mac_keywords[CCS_MAX_MAC_INDEX +  /* String table for categories. */
185                                      CCS_MAX_CAPABILITY_INDEX] = {  static const char * const ccs_category_keywords[CCS_MAX_MAC_CATEGORY_INDEX] = {
186          [CCS_MAC_EXECUTE]    = "execute",          [CCS_MAC_CATEGORY_FILE]       = "file",
187          [CCS_MAC_OPEN]       = "open",          [CCS_MAC_CATEGORY_NETWORK]    = "network",
188          [CCS_MAC_CREATE]     = "create",          [CCS_MAC_CATEGORY_MISC]       = "misc",
189          [CCS_MAC_UNLINK]     = "unlink",          [CCS_MAC_CATEGORY_IPC]        = "ipc",
190          [CCS_MAC_MKDIR]      = "mkdir",          [CCS_MAC_CATEGORY_CAPABILITY] = "capability",
         [CCS_MAC_RMDIR]      = "rmdir",  
         [CCS_MAC_MKFIFO]     = "mkfifo",  
         [CCS_MAC_MKSOCK]     = "mksock",  
         [CCS_MAC_TRUNCATE]   = "truncate",  
         [CCS_MAC_SYMLINK]    = "symlink",  
         [CCS_MAC_REWRITE]    = "rewrite",  
         [CCS_MAC_MKBLOCK]    = "mkblock",  
         [CCS_MAC_MKCHAR]     = "mkchar",  
         [CCS_MAC_LINK]       = "link",  
         [CCS_MAC_RENAME]     = "rename",  
         [CCS_MAC_CHMOD]      = "chmod",  
         [CCS_MAC_CHOWN]      = "chown",  
         [CCS_MAC_CHGRP]      = "chgrp",  
         [CCS_MAC_IOCTL]      = "ioctl",  
         [CCS_MAC_CHROOT]     = "chroot",  
         [CCS_MAC_MOUNT]      = "mount",  
         [CCS_MAC_UMOUNT]     = "umount",  
         [CCS_MAC_PIVOT_ROOT] = "pivot_root",  
         [CCS_MAC_ENVIRON]    = "env",  
         [CCS_MAC_NETWORK]    = "network",  
         [CCS_MAC_SIGNAL]     = "signal",  
         [CCS_MAX_MAC_INDEX + CCS_INET_STREAM_SOCKET_CREATE]  
         = "inet_tcp_create",  
         [CCS_MAX_MAC_INDEX + CCS_INET_STREAM_SOCKET_LISTEN]  
         = "inet_tcp_listen",  
         [CCS_MAX_MAC_INDEX + CCS_INET_STREAM_SOCKET_CONNECT]  
         = "inet_tcp_connect",  
         [CCS_MAX_MAC_INDEX + CCS_USE_INET_DGRAM_SOCKET] = "use_inet_udp",  
         [CCS_MAX_MAC_INDEX + CCS_USE_INET_RAW_SOCKET]   = "use_inet_ip",  
         [CCS_MAX_MAC_INDEX + CCS_USE_ROUTE_SOCKET]      = "use_route",  
         [CCS_MAX_MAC_INDEX + CCS_USE_PACKET_SOCKET]     = "use_packet",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_MOUNT]             = "SYS_MOUNT",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_UMOUNT]            = "SYS_UMOUNT",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_REBOOT]            = "SYS_REBOOT",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_CHROOT]            = "SYS_CHROOT",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_KILL]              = "SYS_KILL",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_VHANGUP]           = "SYS_VHANGUP",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_SETTIME]           = "SYS_TIME",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_NICE]              = "SYS_NICE",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_SETHOSTNAME]       = "SYS_SETHOSTNAME",  
         [CCS_MAX_MAC_INDEX + CCS_USE_KERNEL_MODULE]     = "use_kernel_module",  
         [CCS_MAX_MAC_INDEX + CCS_CREATE_FIFO]           = "create_fifo",  
         [CCS_MAX_MAC_INDEX + CCS_CREATE_BLOCK_DEV]      = "create_block_dev",  
         [CCS_MAX_MAC_INDEX + CCS_CREATE_CHAR_DEV]       = "create_char_dev",  
         [CCS_MAX_MAC_INDEX + CCS_CREATE_UNIX_SOCKET]    = "create_unix_socket",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_LINK]              = "SYS_LINK",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_SYMLINK]           = "SYS_SYMLINK",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_RENAME]            = "SYS_RENAME",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_UNLINK]            = "SYS_UNLINK",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_CHMOD]             = "SYS_CHMOD",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_CHOWN]             = "SYS_CHOWN",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_IOCTL]             = "SYS_IOCTL",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_KEXEC_LOAD]        = "SYS_KEXEC_LOAD",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_PIVOT_ROOT]        = "SYS_PIVOT_ROOT",  
         [CCS_MAX_MAC_INDEX + CCS_SYS_PTRACE]            = "SYS_PTRACE",  
         [CCS_MAX_MAC_INDEX + CCS_CONCEAL_MOUNT]         = "conceal_mount"  
191  };  };
192    
193  /* Table for profile. */  /* String table for conditions. */
194  static struct {  const char * const ccs_condition_keyword[CCS_MAX_CONDITION_KEYWORD] = {
195          const char *keyword;          [CCS_TASK_UID]             = "task.uid",
196          unsigned int current_value;          [CCS_TASK_EUID]            = "task.euid",
197          const unsigned int max_value;          [CCS_TASK_SUID]            = "task.suid",
198  } ccs_control_array[CCS_MAX_CONTROL_INDEX] = {          [CCS_TASK_FSUID]           = "task.fsuid",
199          [CCS_AUTOLEARN_EXEC_REALPATH] = { "AUTOLEARN_EXEC_REALPATH", 0, 1 },          [CCS_TASK_GID]             = "task.gid",
200          [CCS_AUTOLEARN_EXEC_ARGV0] = { "AUTOLEARN_EXEC_ARGV0", 0, 1 },          [CCS_TASK_EGID]            = "task.egid",
201          [CCS_MAX_ACCEPT_ENTRY]          [CCS_TASK_SGID]            = "task.sgid",
202          = { "MAX_ACCEPT_ENTRY", CONFIG_CCSECURITY_MAX_ACCEPT_ENTRY, INT_MAX },          [CCS_TASK_FSGID]           = "task.fsgid",
203  #ifdef CONFIG_CCSECURITY_AUDIT          [CCS_TASK_PID]             = "task.pid",
204          [CCS_MAX_GRANT_LOG]          [CCS_TASK_PPID]            = "task.ppid",
205          = { "MAX_GRANT_LOG", CONFIG_CCSECURITY_MAX_GRANT_LOG, INT_MAX },          [CCS_EXEC_ARGC]            = "exec.argc",
206          [CCS_MAX_REJECT_LOG]          [CCS_EXEC_ENVC]            = "exec.envc",
207          = { "MAX_REJECT_LOG", CONFIG_CCSECURITY_MAX_REJECT_LOG, INT_MAX },          [CCS_TYPE_IS_SOCKET]       = "socket",
208  #endif          [CCS_TYPE_IS_SYMLINK]      = "symlink",
209          [CCS_VERBOSE] = { "PRINT_VIOLATION",      1, 1 },          [CCS_TYPE_IS_FILE]         = "file",
210          [CCS_SLEEP_PERIOD] = { "SLEEP_PERIOD", 0, 3000 }, /* in 0.1 second */          [CCS_TYPE_IS_BLOCK_DEV]    = "block",
211            [CCS_TYPE_IS_DIRECTORY]    = "directory",
212            [CCS_TYPE_IS_CHAR_DEV]     = "char",
213            [CCS_TYPE_IS_FIFO]         = "fifo",
214            [CCS_MODE_SETUID]          = "setuid",
215            [CCS_MODE_SETGID]          = "setgid",
216            [CCS_MODE_STICKY]          = "sticky",
217            [CCS_MODE_OWNER_READ]      = "owner_read",
218            [CCS_MODE_OWNER_WRITE]     = "owner_write",
219            [CCS_MODE_OWNER_EXECUTE]   = "owner_execute",
220            [CCS_MODE_GROUP_READ]      = "group_read",
221            [CCS_MODE_GROUP_WRITE]     = "group_write",
222            [CCS_MODE_GROUP_EXECUTE]   = "group_execute",
223            [CCS_MODE_OTHERS_READ]     = "others_read",
224            [CCS_MODE_OTHERS_WRITE]    = "others_write",
225            [CCS_MODE_OTHERS_EXECUTE]  = "others_execute",
226            [CCS_TASK_TYPE]            = "task.type",
227            [CCS_TASK_EXECUTE_HANDLER] = "execute_handler",
228            [CCS_EXEC_REALPATH]        = "exec.realpath",
229            [CCS_SYMLINK_TARGET]       = "symlink.target",
230            [CCS_PATH1_UID]            = "path1.uid",
231            [CCS_PATH1_GID]            = "path1.gid",
232            [CCS_PATH1_INO]            = "path1.ino",
233            [CCS_PATH1_MAJOR]          = "path1.major",
234            [CCS_PATH1_MINOR]          = "path1.minor",
235            [CCS_PATH1_PERM]           = "path1.perm",
236            [CCS_PATH1_TYPE]           = "path1.type",
237            [CCS_PATH1_DEV_MAJOR]      = "path1.dev_major",
238            [CCS_PATH1_DEV_MINOR]      = "path1.dev_minor",
239            [CCS_PATH2_UID]            = "path2.uid",
240            [CCS_PATH2_GID]            = "path2.gid",
241            [CCS_PATH2_INO]            = "path2.ino",
242            [CCS_PATH2_MAJOR]          = "path2.major",
243            [CCS_PATH2_MINOR]          = "path2.minor",
244            [CCS_PATH2_PERM]           = "path2.perm",
245            [CCS_PATH2_TYPE]           = "path2.type",
246            [CCS_PATH2_DEV_MAJOR]      = "path2.dev_major",
247            [CCS_PATH2_DEV_MINOR]      = "path2.dev_minor",
248            [CCS_PATH1_PARENT_UID]     = "path1.parent.uid",
249            [CCS_PATH1_PARENT_GID]     = "path1.parent.gid",
250            [CCS_PATH1_PARENT_INO]     = "path1.parent.ino",
251            [CCS_PATH1_PARENT_PERM]    = "path1.parent.perm",
252            [CCS_PATH2_PARENT_UID]     = "path2.parent.uid",
253            [CCS_PATH2_PARENT_GID]     = "path2.parent.gid",
254            [CCS_PATH2_PARENT_INO]     = "path2.parent.ino",
255            [CCS_PATH2_PARENT_PERM]    = "path2.parent.perm",
256    };
257    
258    /* String table for PREFERENCE keyword. */
259    static const char * const ccs_pref_keywords[CCS_MAX_PREF] = {
260            [CCS_PREF_MAX_AUDIT_LOG]      = "max_audit_log",
261            [CCS_PREF_MAX_LEARNING_ENTRY] = "max_learning_entry",
262            [CCS_PREF_ENFORCING_PENALTY]  = "enforcing_penalty",
263  };  };
264    
265  /* Permit policy management by non-root user? */  /* Permit policy management by non-root user? */
266  static bool ccs_manage_by_non_root;  static bool ccs_manage_by_non_root;
267    
268  /**  /**
269   * ccs_cap2keyword - Convert capability operation to capability name.   * ccs_yesno - Return "yes" or "no".
270   *   *
271   * @operation: The capability index.   * @value: Bool value.
272   *   *
273   * Returns the name of the specified capability's name.   * Returns "yes" if @value is not 0, "no" otherwise.
274   */   */
275  const char *ccs_cap2keyword(const u8 operation)  const char *ccs_yesno(const unsigned int value)
276  {  {
277          return operation < CCS_MAX_CAPABILITY_INDEX          return value ? "yes" : "no";
                 ? ccs_mac_keywords[CCS_MAX_MAC_INDEX + operation] : NULL;  
278  }  }
279    
280    /* Prototype fpr ccs_addprintf(). */
281    static void ccs_addprintf(char *buffer, int len, const char *fmt, ...)
282            __attribute__ ((format(printf, 3, 4)));
283    
284  /**  /**
285   * ccs_quiet_setup - Set CCS_VERBOSE=0 by default.   * ccs_addprintf - strncat()-like-snprintf().
286   *   *
287   * @str: Unused.   * @buffer: Buffer to write to. Must be '\0'-terminated.
288     * @len:    Size of @buffer.
289     * @fmt:    The printf()'s format string, followed by parameters.
290   *   *
291   * Returns 0.   * Returns nothing.
292   */   */
293  static int __init ccs_quiet_setup(char *str)  static void ccs_addprintf(char *buffer, int len, const char *fmt, ...)
294  {  {
295          ccs_control_array[CCS_VERBOSE].current_value = 0;          va_list args;
296          return 0;          const int pos = strlen(buffer);
297            va_start(args, fmt);
298            vsnprintf(buffer + pos, len - pos - 1, fmt, args);
299            va_end(args);
300    }
301    
302    /**
303     * ccs_flush - Flush queued string to userspace's buffer.
304     *
305     * @head: Pointer to "struct ccs_io_buffer".
306     *
307     * Returns true if all data was flushed, false otherwise.
308     */
309    static bool ccs_flush(struct ccs_io_buffer *head)
310    {
311            while (head->r.w_pos) {
312                    const char *w = head->r.w[0];
313                    int len = strlen(w);
314                    if (len) {
315                            if (len > head->read_user_buf_avail)
316                                    len = head->read_user_buf_avail;
317                            if (!len)
318                                    return false;
319                            if (copy_to_user(head->read_user_buf, w, len))
320                                    return false;
321                            head->read_user_buf_avail -= len;
322                            head->read_user_buf += len;
323                            w += len;
324                    }
325                    if (*w) {
326                            head->r.w[0] = w;
327                            return false;
328                    }
329                    /* Add '\0' for audit logs and query. */
330                    if (head->poll) {
331                            if (!head->read_user_buf_avail ||
332                                copy_to_user(head->read_user_buf, "", 1))
333                                    return false;
334                            head->read_user_buf_avail--;
335                            head->read_user_buf++;
336                    }
337                    head->r.w_pos--;
338                    for (len = 0; len < head->r.w_pos; len++)
339                            head->r.w[len] = head->r.w[len + 1];
340            }
341            head->r.avail = 0;
342            return true;
343  }  }
344    
345  __setup("CCS_QUIET", ccs_quiet_setup);  /**
346     * ccs_set_string - Queue string to "struct ccs_io_buffer" structure.
347     *
348     * @head:   Pointer to "struct ccs_io_buffer".
349     * @string: String to print.
350     *
351     * Returns nothing.
352     *
353     * Note that @string has to be kept valid until @head is kfree()d.
354     * This means that char[] allocated on stack memory cannot be passed to
355     * this function. Use ccs_io_printf() for char[] allocated on stack memory.
356     */
357    static void ccs_set_string(struct ccs_io_buffer *head, const char *string)
358    {
359            if (head->r.w_pos < CCS_MAX_IO_READ_QUEUE) {
360                    head->r.w[head->r.w_pos++] = string;
361                    ccs_flush(head);
362            } else
363                    printk(KERN_WARNING "Too many words in a line.\n");
364    }
365    
366  /**  /**
367   * ccs_io_printf - Transactional printf() to "struct ccs_io_buffer" structure.   * ccs_io_printf - printf() to "struct ccs_io_buffer" structure.
368   *   *
369   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
370   * @fmt:  The printf()'s format string, followed by parameters.   * @fmt:  The printf()'s format string, followed by parameters.
371   *   *
372   * Returns true on success, false otherwise.   * Returns nothing.
  *  
  * The snprintf() will truncate, but ccs_io_printf() won't.  
373   */   */
374  bool ccs_io_printf(struct ccs_io_buffer *head, const char *fmt, ...)  void ccs_io_printf(struct ccs_io_buffer *head, const char *fmt, ...)
375  {  {
376          va_list args;          va_list args;
377          int len;          int len;
378          int pos = head->read_avail;          int pos = head->r.avail;
379          int size = head->readbuf_size - pos;          int size = head->readbuf_size - pos;
380          if (size <= 0)          if (size <= 0)
381                  return false;                  return;
382          va_start(args, fmt);          va_start(args, fmt);
383          len = vsnprintf(head->read_buf + pos, size, fmt, args);          len = vsnprintf(head->read_buf + pos, size, fmt, args) + 1;
384          va_end(args);          va_end(args);
385          if (pos + len >= head->readbuf_size)          if (pos + len >= head->readbuf_size) {
386                  return false;                  printk(KERN_WARNING "Too many words in a line.\n");
387          head->read_avail += len;                  return;
388          return true;          }
389            head->r.avail += len;
390            ccs_set_string(head, head->read_buf + pos);
391    }
392    
393    /**
394     * ccs_set_space - Put a space to "struct ccs_io_buffer" structure.
395     *
396     * @head: Pointer to "struct ccs_io_buffer".
397     *
398     * Returns nothing.
399     */
400    static void ccs_set_space(struct ccs_io_buffer *head)
401    {
402            ccs_set_string(head, " ");
403  }  }
404    
405  /**  /**
406   * ccs_find_or_assign_new_profile - Create a new profile.   * ccs_set_lf - Put a line feed to "struct ccs_io_buffer" structure.
407     *
408     * @head: Pointer to "struct ccs_io_buffer".
409     *
410     * Returns nothing.
411     */
412    static bool ccs_set_lf(struct ccs_io_buffer *head)
413    {
414            ccs_set_string(head, "\n");
415            return !head->r.w_pos;
416    }
417    
418    /**
419     * ccs_assign_profile - Create a new profile.
420   *   *
421   * @profile: Profile number to create.   * @profile: Profile number to create.
422   *   *
423   * Returns pointer to "struct ccs_profile" on success, NULL otherwise.   * Returns pointer to "struct ccs_profile" on success, NULL otherwise.
424   */   */
425  static struct ccs_profile *ccs_find_or_assign_new_profile(const unsigned int  static struct ccs_profile *ccs_assign_profile(const unsigned int profile)
                                                           profile)  
426  {  {
427          struct ccs_profile *ptr;          struct ccs_profile *ptr;
428          struct ccs_profile *entry;          struct ccs_profile *entry;
         int i;  
429          if (profile >= CCS_MAX_PROFILES)          if (profile >= CCS_MAX_PROFILES)
430                  return NULL;                  return NULL;
431          ptr = ccs_profile_ptr[profile];          ptr = ccs_profile_ptr[profile];
432          if (ptr)          if (ptr)
433                  return ptr;                  return ptr;
434          entry = kzalloc(sizeof(*entry), GFP_KERNEL);          entry = kzalloc(sizeof(*entry), CCS_GFP_FLAGS);
435          mutex_lock(&ccs_policy_lock);          if (mutex_lock_interruptible(&ccs_policy_lock))
436                    goto out;
437          ptr = ccs_profile_ptr[profile];          ptr = ccs_profile_ptr[profile];
438          if (!ptr && ccs_memory_ok(entry, sizeof(*entry))) {          if (!ptr && ccs_memory_ok(entry, sizeof(*entry))) {
439                  ptr = entry;                  ptr = entry;
440                  for (i = 0; i < CCS_MAX_CONTROL_INDEX; i++)                  ptr->default_config = CCS_CONFIG_DISABLED |
441                          ptr->value[i] = ccs_control_array[i].current_value;                          CCS_CONFIG_WANT_GRANT_LOG | CCS_CONFIG_WANT_REJECT_LOG;
442                    memset(ptr->config, CCS_CONFIG_USE_DEFAULT,
443                           sizeof(ptr->config));
444                    ptr->pref[CCS_PREF_MAX_AUDIT_LOG] =
445                            CONFIG_CCSECURITY_MAX_AUDIT_LOG;
446                    ptr->pref[CCS_PREF_MAX_LEARNING_ENTRY] =
447                            CONFIG_CCSECURITY_MAX_ACCEPT_ENTRY;
448                  mb(); /* Avoid out-of-order execution. */                  mb(); /* Avoid out-of-order execution. */
449                  ccs_profile_ptr[profile] = ptr;                  ccs_profile_ptr[profile] = ptr;
450                  entry = NULL;                  entry = NULL;
451          }          }
452          mutex_unlock(&ccs_policy_lock);          mutex_unlock(&ccs_policy_lock);
453    out:
454          kfree(entry);          kfree(entry);
455          return ptr;          return ptr;
456  }  }
457    
458  static int ccs_find_match(char *str)  /**
459     * ccs_check_profile - Check all profiles currently assigned to domains are defined.
460     *
461     * Returns nothing.
462     */
463    static void ccs_check_profile(void)
464  {  {
465          int i;          struct ccs_domain_info *domain;
466          if (ccs_str_starts(&str, CCS_KEYWORD_CAPABILITY))          const int idx = ccs_read_lock();
467                  for (i = 0; i < CCS_MAX_CAPABILITY_INDEX; i++) {          ccs_policy_loaded = true;
468                          if (strcmp(str,          list_for_each_entry_srcu(domain, &ccs_domain_list, list, &ccs_ss) {
469                                     ccs_mac_keywords[CCS_MAX_MAC_INDEX + i]))                  const u8 profile = domain->profile;
470                    if (ccs_profile_ptr[profile])
471                            continue;
472                    printk(KERN_ERR "Profile %u must be defined before using it.\n",
473                           profile);
474                    printk(KERN_ERR "Please see http://tomoyo.sourceforge.jp/1.8/ "
475                           "for more information.\n");
476                    panic("Profile %u (used by '%s') not defined.\n",
477                          profile, domain->domainname->name);
478            }
479            ccs_read_unlock(idx);
480            if (ccs_profile_version != 20100903) {
481                    printk(KERN_ERR "Userland tools must be installed for "
482                           "TOMOYO 1.8, and policy must be initialized.\n");
483                    printk(KERN_ERR "Please see http://tomoyo.sourceforge.jp/1.8/ "
484                           "for more information.\n");
485                    panic("Profile version %u is not supported.\n",
486                          ccs_profile_version);
487            }
488            printk(KERN_INFO "CCSecurity: 1.8.0+   2010/12/31\n");
489            printk(KERN_INFO "Mandatory Access Control activated.\n");
490    }
491    
492    /**
493     * ccs_profile - Find a profile.
494     *
495     * @profile: Profile number to find.
496     *
497     * Returns pointer to "struct ccs_profile".
498     */
499    struct ccs_profile *ccs_profile(const u8 profile)
500    {
501            static struct ccs_profile ccs_null_profile;
502            struct ccs_profile *ptr = ccs_profile_ptr[profile];
503            if (!ptr)
504                    ptr = &ccs_null_profile;
505            return ptr;
506    }
507    
508    /**
509     * ccs_find_yesno - Find values for specified keyword.
510     *
511     * @string: String to check.
512     * @find:   Name of keyword.
513     *
514     * Returns 1 if "@find=yes" was found, 0 if "@find=no" was found, -1 otherwise.
515     */
516    static s8 ccs_find_yesno(const char *string, const char *find)
517    {
518            const char *cp = strstr(string, find);
519            if (cp) {
520                    cp += strlen(find);
521                    if (!strncmp(cp, "=yes", 4))
522                            return 1;
523                    else if (!strncmp(cp, "=no", 3))
524                            return 0;
525            }
526            return -1;
527    }
528    
529    /**
530     * ccs_set_uint - Set value for specified preference.
531     *
532     * @i:      Pointer to "unsigned int".
533     * @string: String to check.
534     * @find:   Name of keyword.
535     *
536     * Returns nothing.
537     */
538    static void ccs_set_uint(unsigned int *i, const char *string, const char *find)
539    {
540            const char *cp = strstr(string, find);
541            if (cp)
542                    sscanf(cp + strlen(find), "=%u", i);
543    }
544    
545    /**
546     * ccs_set_mode - Set mode for specified profile.
547     *
548     * @name:    Name of functionality.
549     * @value:   Mode for @name.
550     * @profile: Pointer to "struct ccs_profile".
551     *
552     * Returns 0 on success, negative value otherwise.
553     */
554    static int ccs_set_mode(char *name, const char *value,
555                            struct ccs_profile *profile)
556    {
557            u8 i;
558            u8 config;
559            if (!strcmp(name, "CONFIG")) {
560                    i = CCS_MAX_MAC_INDEX + CCS_MAX_MAC_CATEGORY_INDEX;
561                    config = profile->default_config;
562            } else if (ccs_str_starts(&name, "CONFIG::")) {
563                    config = 0;
564                    for (i = 0; i < CCS_MAX_MAC_INDEX + CCS_MAX_MAC_CATEGORY_INDEX;
565                         i++) {
566                            int len = 0;
567                            if (i < CCS_MAX_MAC_INDEX) {
568                                    const u8 c = ccs_index2category[i];
569                                    const char *category =
570                                            ccs_category_keywords[c];
571                                    len = strlen(category);
572                                    if (strncmp(name, category, len) ||
573                                        name[len++] != ':' || name[len++] != ':')
574                                            continue;
575                            }
576                            if (strcmp(name + len, ccs_mac_keywords[i]))
577                                  continue;                                  continue;
578                          return CCS_MAX_MAC_INDEX + i;                          config = profile->config[i];
579                            break;
580                  }                  }
581          else                  if (i == CCS_MAX_MAC_INDEX + CCS_MAX_MAC_CATEGORY_INDEX)
582                  for (i = 0; i < CCS_MAX_MAC_INDEX; i++) {                          return -EINVAL;
583                          if (strcmp(str, ccs_mac_keywords[i]))          } else {
584                                  continue;                  return -EINVAL;
585                          return i;          }
586            if (strstr(value, "use_default")) {
587                    config = CCS_CONFIG_USE_DEFAULT;
588            } else {
589                    u8 mode;
590                    for (mode = 0; mode < CCS_CONFIG_MAX_MODE; mode++)
591                            if (strstr(value, ccs_mode[mode]))
592                                    /*
593                                     * Update lower 3 bits in order to distinguish
594                                     * 'config' from 'CCS_CONFIG_USE_DEAFULT'.
595                                     */
596                                    config = (config & ~7) | mode;
597                    if (config != CCS_CONFIG_USE_DEFAULT) {
598                            switch (ccs_find_yesno(value, "grant_log")) {
599                            case 1:
600                                    config |= CCS_CONFIG_WANT_GRANT_LOG;
601                                    break;
602                            case 0:
603                                    config &= ~CCS_CONFIG_WANT_GRANT_LOG;
604                                    break;
605                            }
606                            switch (ccs_find_yesno(value, "reject_log")) {
607                            case 1:
608                                    config |= CCS_CONFIG_WANT_REJECT_LOG;
609                                    break;
610                            case 0:
611                                    config &= ~CCS_CONFIG_WANT_REJECT_LOG;
612                                    break;
613                            }
614                  }                  }
615          return -1;          }
616            if (i < CCS_MAX_MAC_INDEX + CCS_MAX_MAC_CATEGORY_INDEX)
617                    profile->config[i] = config;
618            else if (config != CCS_CONFIG_USE_DEFAULT)
619                    profile->default_config = config;
620            return 0;
621  }  }
622    
623  /**  /**
# Line 236  static int ccs_write_profile(struct ccs_ Line 631  static int ccs_write_profile(struct ccs_
631  {  {
632          char *data = head->write_buf;          char *data = head->write_buf;
633          unsigned int i;          unsigned int i;
         unsigned int value;  
         int mode;  
634          char *cp;          char *cp;
635          struct ccs_profile *ccs_profile;          struct ccs_profile *profile;
636            if (sscanf(data, "PROFILE_VERSION=%u", &ccs_profile_version) == 1)
637                    return 0;
638          i = simple_strtoul(data, &cp, 10);          i = simple_strtoul(data, &cp, 10);
639          if (data != cp) {          if (*cp != '-')
640                  if (*cp != '-')                  return -EINVAL;
641                          return -EINVAL;          data = cp + 1;
642                  data = cp + 1;          profile = ccs_assign_profile(i);
643          }          if (!profile)
         ccs_profile = ccs_find_or_assign_new_profile(i);  
         if (!ccs_profile)  
644                  return -EINVAL;                  return -EINVAL;
645          cp = strchr(data, '=');          cp = strchr(data, '=');
646          if (!cp)          if (!cp)
647                  return -EINVAL;                  return -EINVAL;
648          *cp = '\0';          *cp++ = '\0';
649          if (!strcmp(data, "COMMENT")) {          if (!strcmp(data, "COMMENT")) {
650                  const struct ccs_path_info *new_comment                  const struct ccs_path_info *old_comment = profile->comment;
651                          = ccs_get_name(cp + 1);                  profile->comment = ccs_get_name(cp);
                 const struct ccs_path_info *old_comment;  
                 /* Protect reader from ccs_put_name(). */  
                 /***** CRITICAL SECTION START *****/  
                 spin_lock(&ccs_profile_comment_lock);  
                 old_comment = ccs_profile->comment;  
                 ccs_profile->comment = new_comment;  
                 spin_unlock(&ccs_profile_comment_lock);  
                 /***** CRITICAL SECTION END *****/  
652                  ccs_put_name(old_comment);                  ccs_put_name(old_comment);
653                  return 0;                  return 0;
654          }          }
655          for (mode = 0; mode < 4; mode++) {          if (!strcmp(data, "PREFERENCE")) {
656                  if (strcmp(data, ccs_keyword_mode[mode]))                  for (i = 0; i < CCS_MAX_PREF; i++)
657                          continue;                          ccs_set_uint(&profile->pref[i], cp,
658                  cp++;                                       ccs_pref_keywords[i]);
                 while (1) {  
                         int index;  
                         char *cp2 = strchr(cp, ' ');  
                         if (cp2)  
                                 *cp2 = '\0';  
                         index = ccs_find_match(cp);  
                         if (index >= 0)  
                                 ccs_profile->mac_mode[index] = mode;  
                         if (!cp2)  
                                 break;  
                         cp = cp2 + 1;  
                 }  
659                  return 0;                  return 0;
660          }          }
661          for (mode = 0; mode < 2; mode++) {          return ccs_set_mode(data, cp, profile);
                 if (strcmp(data, ccs_keyword_audit[mode]))  
                         continue;  
                 memset(ccs_profile->dont_audit[mode], 0,  
                        sizeof(ccs_profile->dont_audit[mode]));  
                 cp++;  
                 while (1) {  
                         int index;  
                         char *cp2 = strchr(cp, ' ');  
                         if (cp2)  
                                 *cp2 = '\0';  
                         index = ccs_find_match(cp);  
                         if (index >= 0)  
                                 ccs_profile->dont_audit[mode][index] = true;  
                         if (!cp2)  
                                 break;  
                         cp = cp2 + 1;  
                 }  
                 return 0;  
         }  
         for (i = 0; i < CCS_MAX_CONTROL_INDEX; i++) {  
                 if (strcmp(data, ccs_control_array[i].keyword))  
                         continue;  
                 if (sscanf(cp + 1, "%u", &value) != 1) {  
                         int j;  
                         for (j = 0; j < 2; j++) {  
                                 if (strcmp(cp + 1, ccs_mode_2[j]))  
                                         continue;  
                                 value = j;  
                                 break;  
                         }  
                         if (j == 4)  
                                 return -EINVAL;  
                 } else if (value > ccs_control_array[i].max_value) {  
                         value = ccs_control_array[i].max_value;  
                 }  
                 ccs_profile->value[i] = value;  
                 return 0;  
         }  
         return -EINVAL;  
662  }  }
663    
664  static bool ccs_print_mac_mode(struct ccs_io_buffer *head, u8 index)  /**
665     * ccs_print_config - Print mode for specified functionality.
666     *
667     * @head:   Pointer to "struct ccs_io_buffer".
668     * @config: Mode for that functionality.
669     *
670     * Returns nothing.
671     *
672     * Caller prints functionality's name.
673     */
674    static void ccs_print_config(struct ccs_io_buffer *head, const u8 config)
675  {  {
676          const int pos = head->read_avail;          ccs_io_printf(head, "={ mode=%s grant_log=%s reject_log=%s }\n",
677          int i;                        ccs_mode[config & 3],
678          int mode;                        ccs_yesno(config & CCS_CONFIG_WANT_GRANT_LOG),
679          const struct ccs_profile *ccs_profile = ccs_profile_ptr[index];                        ccs_yesno(config & CCS_CONFIG_WANT_REJECT_LOG));
         for (mode = 0; mode < 4; mode++) {  
                 if (!ccs_io_printf(head, "%u-%s={", index,  
                                    ccs_keyword_mode[mode]))  
                         goto out;  
                 for (i = 0; i < CCS_MAX_MAC_INDEX + CCS_MAX_CAPABILITY_INDEX;  
                      i++) {  
                         if (ccs_profile->mac_mode[i] != mode)  
                                 continue;  
                         if (!ccs_io_printf(head, " %s%s",  
                                            i >= CCS_MAX_MAC_INDEX ?  
                                            CCS_KEYWORD_CAPABILITY : "",  
                                            ccs_mac_keywords[i]))  
                                 goto out;  
                 }  
                 if (!ccs_io_printf(head, " }\n"))  
                         goto out;  
         }  
         return true;  
  out:  
         head->read_avail = pos;  
         return false;  
 }  
   
 static bool ccs_print_audit_mode(struct ccs_io_buffer *head, u8 index)  
 {  
         const int pos = head->read_avail;  
         int i;  
         int mode;  
         const struct ccs_profile *ccs_profile = ccs_profile_ptr[index];  
         for (mode = 0; mode < 2; mode++) {  
                 if (!ccs_io_printf(head, "%u-%s={", index,  
                                    ccs_keyword_audit[mode]))  
                         goto out;  
                 for (i = 0; i < CCS_MAX_MAC_INDEX + CCS_MAX_CAPABILITY_INDEX;  
                      i++) {  
                         if (!ccs_profile->dont_audit[mode][i])  
                                 continue;  
                         if (!ccs_io_printf(head, " %s%s",  
                                            i >= CCS_MAX_MAC_INDEX ?  
                                            CCS_KEYWORD_CAPABILITY : "",  
                                            ccs_mac_keywords[i]))  
                                 goto out;  
                 }  
                 if (!ccs_io_printf(head, " }\n"))  
                         goto out;  
         }  
         return true;  
  out:  
         head->read_avail = pos;  
         return false;  
680  }  }
681    
682  /**  /**
# Line 390  static bool ccs_print_audit_mode(struct Line 684  static bool ccs_print_audit_mode(struct
684   *   *
685   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
686   *   *
687   * Returns 0.   * Returns nothing.
688   */   */
689  static int ccs_read_profile(struct ccs_io_buffer *head)  static void ccs_read_profile(struct ccs_io_buffer *head)
690  {  {
691          static const int ccs_total = CCS_MAX_CONTROL_INDEX + 2;          u8 index;
692          int step;          const struct ccs_profile *profile;
693          if (head->read_eof)  next:
694                  return 0;          index = head->r.index;
695          for (step = head->read_step; step < CCS_MAX_PROFILES * ccs_total;          profile = ccs_profile_ptr[index];
696               step++) {          switch (head->r.step) {
697                  const u8 index = step / ccs_total;          case 0:
698                  u8 type = step % ccs_total;                  ccs_io_printf(head, "PROFILE_VERSION=%s\n", "20100903");
699                  const struct ccs_profile *ccs_profile = ccs_profile_ptr[index];                  head->r.step++;
700                  head->read_step = step;                  break;
701                  if (!ccs_profile)          case 1:
702                          continue;                  for ( ; head->r.index < CCS_MAX_PROFILES;
703                  if (!type) { /* Print profile' comment tag. */                        head->r.index++)
704                          bool done;                          if (ccs_profile_ptr[head->r.index])
                         /***** CRITICAL SECTION START *****/  
                         spin_lock(&ccs_profile_comment_lock);  
                         done = ccs_io_printf(head, "%u-COMMENT=%s\n",  
                                              index, ccs_profile->comment ?  
                                              ccs_profile->comment->name : "");  
                         spin_unlock(&ccs_profile_comment_lock);  
                         /***** CRITICAL SECTION END *****/  
                         if (!done)  
                                 break;  
                         continue;  
                 } else if (type == 1) {  
                         if (!ccs_print_mac_mode(head, index))  
                                 break;  
                         continue;  
                 } else if (type == 2) {  
                         if (!ccs_print_audit_mode(head, index))  
705                                  break;                                  break;
706                          continue;                  if (head->r.index == CCS_MAX_PROFILES)
707                            return;
708                    head->r.step++;
709                    break;
710            case 2:
711                    {
712                            u8 i;
713                            const struct ccs_path_info *comment = profile->comment;
714                            ccs_io_printf(head, "%u-COMMENT=", index);
715                            ccs_set_string(head, comment ? comment->name : "");
716                            ccs_set_lf(head);
717                            ccs_io_printf(head, "%u-PREFERENCE={ ", index);
718                            for (i = 0; i < CCS_MAX_PREF; i++)
719                                    ccs_io_printf(head, "%s=%u ",
720                                                  ccs_pref_keywords[i],
721                                                  profile->pref[i]);
722                            ccs_set_string(head, " }\n");
723                            head->r.step++;
724                  }                  }
725                  type -= 3;                  break;
726            case 3:
727                  {                  {
728                          const unsigned int value = ccs_profile->value[type];                          ccs_io_printf(head, "%u-%s", index, "CONFIG");
729                          const char *keyword = ccs_control_array[type].keyword;                          ccs_print_config(head, profile->default_config);
730                          if (ccs_control_array[type].max_value == 1) {                          head->r.bit = 0;
731                                  if (!ccs_io_printf(head, "%u-%s=%s\n", index,                          head->r.step++;
732                                                     keyword, ccs_mode_2[value]))                  }
733                                          break;                  break;
734                          } else {          case 4:
735                                  if (!ccs_io_printf(head, "%u-%s=%u\n", index,                  for ( ; head->r.bit < CCS_MAX_MAC_INDEX
736                                                     keyword, value))                                + CCS_MAX_MAC_CATEGORY_INDEX; head->r.bit++) {
737                                          break;                          const u8 i = head->r.bit;
738                          }                          const u8 config = profile->config[i];
739                            if (config == CCS_CONFIG_USE_DEFAULT)
740                                    continue;
741                            if (i < CCS_MAX_MAC_INDEX)
742                                    ccs_io_printf(head, "%u-CONFIG::%s::%s", index,
743                                                  ccs_category_keywords
744                                                  [ccs_index2category[i]],
745                                                  ccs_mac_keywords[i]);
746                            else
747                                    ccs_io_printf(head, "%u-CONFIG::%s", index,
748                                                  ccs_mac_keywords[i]);
749                            ccs_print_config(head, config);
750                            head->r.bit++;
751                            break;
752                    }
753                    if (head->r.bit == CCS_MAX_MAC_INDEX
754                        + CCS_MAX_MAC_CATEGORY_INDEX) {
755                            head->r.index++;
756                            head->r.step = 1;
757                  }                  }
758                    break;
759          }          }
760          if (step == CCS_MAX_PROFILES * ccs_total)          if (ccs_flush(head))
761                  head->read_eof = true;                  goto next;
         return 0;  
762  }  }
763    
764  /* The list for "struct ccs_policy_manager_entry". */  /**
765  LIST_HEAD(ccs_policy_manager_list);   * ccs_same_manager - Check for duplicated "struct ccs_manager" entry.
766     *
767     * @a: Pointer to "struct ccs_acl_head".
768     * @b: Pointer to "struct ccs_acl_head".
769     *
770     * Returns true if @a == @b, false otherwise.
771     */
772    static bool ccs_same_manager(const struct ccs_acl_head *a,
773                                 const struct ccs_acl_head *b)
774    {
775            return container_of(a, struct ccs_manager, head)->manager
776                    == container_of(b, struct ccs_manager, head)->manager;
777    }
778    
779  /**  /**
780   * ccs_update_manager_entry - Add a manager entry.   * ccs_update_manager_entry - Add a manager entry.
# Line 460  LIST_HEAD(ccs_policy_manager_list); Line 786  LIST_HEAD(ccs_policy_manager_list);
786   */   */
787  static int ccs_update_manager_entry(const char *manager, const bool is_delete)  static int ccs_update_manager_entry(const char *manager, const bool is_delete)
788  {  {
789          struct ccs_policy_manager_entry *entry = NULL;          struct ccs_manager e = { };
         struct ccs_policy_manager_entry *ptr;  
         struct ccs_policy_manager_entry e = { };  
790          int error = is_delete ? -ENOENT : -ENOMEM;          int error = is_delete ? -ENOENT : -ENOMEM;
791          if (ccs_is_domain_def(manager)) {          if (ccs_domain_def(manager)) {
792                  if (!ccs_is_correct_domain(manager))                  if (!ccs_correct_domain(manager))
793                          return -EINVAL;                          return -EINVAL;
794                  e.is_domain = true;                  e.is_domain = true;
795          } else {          } else {
796                  if (!ccs_is_correct_path(manager, 1, -1, -1))                  if (!ccs_correct_path(manager))
797                          return -EINVAL;                          return -EINVAL;
798          }          }
799          e.manager = ccs_get_name(manager);          e.manager = ccs_get_name(manager);
800          if (!e.manager)          if (!e.manager)
801                  return -ENOMEM;                  return error;
802          if (!is_delete)          error = ccs_update_policy(&e.head, sizeof(e), is_delete,
803                  entry = kmalloc(sizeof(e), GFP_KERNEL);                                    &ccs_policy_list[CCS_ID_MANAGER],
804          mutex_lock(&ccs_policy_lock);                                    ccs_same_manager);
         list_for_each_entry_rcu(ptr, &ccs_policy_manager_list, list) {  
                 if (ptr->manager != e.manager)  
                         continue;  
                 ptr->is_deleted = is_delete;  
                 error = 0;  
                 break;  
         }  
         if (!is_delete && error && ccs_commit_ok(entry, &e, sizeof(e))) {  
                 list_add_tail_rcu(&entry->list, &ccs_policy_manager_list);  
                 entry = NULL;  
                 error = 0;  
         }  
         mutex_unlock(&ccs_policy_lock);  
805          ccs_put_name(e.manager);          ccs_put_name(e.manager);
         kfree(entry);  
806          return error;          return error;
807  }  }
808    
809  /**  /**
810   * ccs_write_manager_policy - Write manager policy.   * ccs_write_manager - Write manager policy.
811   *   *
812   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
813   *   *
814   * Returns 0 on success, negative value otherwise.   * Returns 0 on success, negative value otherwise.
815   */   */
816  static int ccs_write_manager_policy(struct ccs_io_buffer *head)  static int ccs_write_manager(struct ccs_io_buffer *head)
817  {  {
818          char *data = head->write_buf;          char *data = head->write_buf;
819          bool is_delete = ccs_str_starts(&data, CCS_KEYWORD_DELETE);          bool is_delete = ccs_str_starts(&data, "delete ");
820          if (!strcmp(data, "manage_by_non_root")) {          if (!strcmp(data, "manage_by_non_root")) {
821                  ccs_manage_by_non_root = !is_delete;                  ccs_manage_by_non_root = !is_delete;
822                  return 0;                  return 0;
# Line 515  static int ccs_write_manager_policy(stru Line 825  static int ccs_write_manager_policy(stru
825  }  }
826    
827  /**  /**
828   * ccs_read_manager_policy - Read manager policy.   * ccs_read_manager - Read manager policy.
829   *   *
830   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
831   *   *
832   * Returns 0.   * Returns nothing.
833   *   *
834   * Caller holds ccs_read_lock().   * Caller holds ccs_read_lock().
835   */   */
836  static int ccs_read_manager_policy(struct ccs_io_buffer *head)  static void ccs_read_manager(struct ccs_io_buffer *head)
837  {  {
838          struct list_head *pos;          if (head->r.eof)
839          ccs_assert_read_lock();                  return;
840          if (head->read_eof)          list_for_each_cookie(head->r.acl, &ccs_policy_list[CCS_ID_MANAGER]) {
841                  return 0;                  struct ccs_manager *ptr =
842          list_for_each_cookie(pos, head->read_var2, &ccs_policy_manager_list) {                          list_entry(head->r.acl, typeof(*ptr), head.list);
843                  struct ccs_policy_manager_entry *ptr;                  if (ptr->head.is_deleted)
                 ptr = list_entry(pos, struct ccs_policy_manager_entry, list);  
                 if (ptr->is_deleted)  
844                          continue;                          continue;
845                  if (!ccs_io_printf(head, "%s\n", ptr->manager->name))                  if (!ccs_flush(head))
846                          return 0;                          return;
847                    ccs_set_string(head, ptr->manager->name);
848                    ccs_set_lf(head);
849          }          }
850          head->read_eof = true;          head->r.eof = true;
         return 0;  
851  }  }
852    
853  /**  /**
854   * ccs_is_policy_manager - Check whether the current process is a policy manager.   * ccs_manager - Check whether the current process is a policy manager.
855   *   *
856   * Returns true if the current process is permitted to modify policy   * Returns true if the current process is permitted to modify policy
857   * via /proc/ccs/ interface.   * via /proc/ccs/ interface.
858   *   *
859   * Caller holds ccs_read_lock().   * Caller holds ccs_read_lock().
860   */   */
861  static bool ccs_is_policy_manager(void)  static bool ccs_manager(void)
862  {  {
863          struct ccs_policy_manager_entry *ptr;          struct ccs_manager *ptr;
864          const char *exe;          const char *exe;
865          struct task_struct *task = current;          struct ccs_security *task = ccs_current_security();
866          const struct ccs_path_info *domainname          const struct ccs_path_info *domainname
867                  = ccs_current_domain()->domainname;                  = ccs_current_domain()->domainname;
868          bool found = false;          bool found = false;
         ccs_assert_read_lock();  
869          if (!ccs_policy_loaded)          if (!ccs_policy_loaded)
870                  return true;                  return true;
871          if (task->ccs_flags & CCS_TASK_IS_POLICY_MANAGER)          if (task->ccs_flags & CCS_TASK_IS_MANAGER)
872                  return true;                  return true;
873          if (!ccs_manage_by_non_root && (current_uid() || current_euid()))          if (!ccs_manage_by_non_root && (current_uid() || current_euid()))
874                  return false;                  return false;
         list_for_each_entry_rcu(ptr, &ccs_policy_manager_list, list) {  
                 if (!ptr->is_deleted && ptr->is_domain  
                     && !ccs_pathcmp(domainname, ptr->manager)) {  
                         /* Set manager flag. */  
                         task->ccs_flags |= CCS_TASK_IS_POLICY_MANAGER;  
                         return true;  
                 }  
         }  
875          exe = ccs_get_exe();          exe = ccs_get_exe();
876          if (!exe)          list_for_each_entry_srcu(ptr, &ccs_policy_list[CCS_ID_MANAGER],
877                  return false;                                   head.list, &ccs_ss) {
878          list_for_each_entry_rcu(ptr, &ccs_policy_manager_list, list) {                  if (ptr->head.is_deleted)
879                  if (!ptr->is_deleted && !ptr->is_domain                          continue;
880                      && !strcmp(exe, ptr->manager->name)) {                  if (ptr->is_domain) {
881                          found = true;                          if (ccs_pathcmp(domainname, ptr->manager))
882                          /* Set manager flag. */                                  continue;
883                          task->ccs_flags |= CCS_TASK_IS_POLICY_MANAGER;                  } else {
884                          break;                          if (!exe || strcmp(exe, ptr->manager->name))
885                                    continue;
886                  }                  }
887                    /* Set manager flag. */
888                    task->ccs_flags |= CCS_TASK_IS_MANAGER;
889                    found = true;
890                    break;
891          }          }
892          if (!found) { /* Reduce error messages. */          if (!found) { /* Reduce error messages. */
893                  static pid_t ccs_last_pid;                  static pid_t ccs_last_pid;
# Line 598  static bool ccs_is_policy_manager(void) Line 903  static bool ccs_is_policy_manager(void)
903  }  }
904    
905  /**  /**
906   * ccs_find_condition_part - Find condition part from the statement.   * ccs_select_one - Parse select command.
  *  
  * @data: String to parse.  
  *  
  * Returns pointer to the condition part if it was found in the statement,  
  * NULL otherwise.  
  */  
 static char *ccs_find_condition_part(char *data)  
 {  
         char *cp = strstr(data, " if ");  
         if (cp) {  
                 while (1) {  
                         char *cp2 = strstr(cp + 3, " if ");  
                         if (!cp2)  
                                 break;  
                         cp = cp2;  
                 }  
                 *cp++ = '\0';  
         } else {  
                 cp = strstr(data, " ; set ");  
                 if (cp)  
                         *cp++ = '\0';  
         }  
         return cp;  
 }  
   
 /**  
  * ccs_is_select_one - Parse select command.  
907   *   *
908   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
909   * @data: String to parse.   * @data: String to parse.
# Line 634  static char *ccs_find_condition_part(cha Line 912  static char *ccs_find_condition_part(cha
912   *   *
913   * Caller holds ccs_read_lock().   * Caller holds ccs_read_lock().
914   */   */
915  static bool ccs_is_select_one(struct ccs_io_buffer *head, const char *data)  static bool ccs_select_one(struct ccs_io_buffer *head, const char *data)
916  {  {
917          unsigned int pid;          unsigned int pid;
918          struct ccs_domain_info *domain = NULL;          struct ccs_domain_info *domain = NULL;
919          ccs_assert_read_lock();          bool global_pid = false;
920          if (!strcmp(data, "allow_execute")) {          if (!strcmp(data, "execute")) {
921                  head->read_execute_only = true;                  head->r.print_execute_only = true;
922                  return true;                  return true;
923          }          }
924          if (sscanf(data, "pid=%u", &pid) == 1) {          if (sscanf(data, "pid=%u", &pid) == 1 ||
925                (global_pid = true, sscanf(data, "global-pid=%u", &pid) == 1)) {
926                  struct task_struct *p;                  struct task_struct *p;
927                  /***** CRITICAL SECTION START *****/                  ccs_tasklist_lock();
928                  read_lock(&tasklist_lock);  #if LINUX_VERSION_CODE >= KERNEL_VERSION(2, 6, 24)
929                    if (global_pid)
930                            p = ccsecurity_exports.find_task_by_pid_ns(pid,
931                                                                   &init_pid_ns);
932                    else
933                            p = ccsecurity_exports.find_task_by_vpid(pid);
934    #else
935                  p = find_task_by_pid(pid);                  p = find_task_by_pid(pid);
936    #endif
937                  if (p)                  if (p)
938                          domain = ccs_task_domain(p);                          domain = ccs_task_domain(p);
939                  read_unlock(&tasklist_lock);                  ccs_tasklist_unlock();
                 /***** CRITICAL SECTION END *****/  
940          } else if (!strncmp(data, "domain=", 7)) {          } else if (!strncmp(data, "domain=", 7)) {
941                  if (ccs_is_domain_def(data + 7))                  if (ccs_domain_def(data + 7))
942                          domain = ccs_find_domain(data + 7);                          domain = ccs_find_domain(data + 7);
943          } else          } else
944                  return false;                  return false;
945          head->write_var1 = domain;          head->w.domain = domain;
946          /* Accessing read_buf is safe because head->io_sem is held. */          /* Accessing read_buf is safe because head->io_sem is held. */
947          if (!head->read_buf)          if (!head->read_buf)
948                  return true; /* Do nothing if open(O_WRONLY). */                  return true; /* Do nothing if open(O_WRONLY). */
949          head->read_avail = 0;          memset(&head->r, 0, sizeof(head->r));
950            head->r.print_this_domain_only = true;
951            if (domain)
952                    head->r.domain = &domain->list;
953            else
954                    head->r.eof = true;
955          ccs_io_printf(head, "# select %s\n", data);          ccs_io_printf(head, "# select %s\n", data);
956          head->read_single_domain = true;          if (domain && domain->is_deleted)
957          head->read_eof = !domain;                  ccs_set_string(head, "# This is a deleted domain.\n");
         if (domain) {  
                 struct ccs_domain_info *d;  
                 head->read_var1 = NULL;  
                 list_for_each_entry_rcu(d, &ccs_domain_list, list) {  
                         if (d == domain)  
                                 break;  
                         head->read_var1 = &d->list;  
                 }  
                 head->read_var2 = NULL;  
                 head->read_bit = 0;  
                 head->read_step = 0;  
                 if (domain->is_deleted)  
                         ccs_io_printf(head, "# This is a deleted domain.\n");  
         }  
958          return true;          return true;
959  }  }
960    
961  static int ccs_write_domain_policy2(char *data, struct ccs_domain_info *domain,  /**
962                                      struct ccs_condition *cond,   * ccs_same_handler_acl - Check for duplicated "struct ccs_handler_acl" entry.
963                                      const bool is_delete)   *
964  {   * @a: Pointer to "struct ccs_acl_info".
965          if (ccs_str_starts(&data, CCS_KEYWORD_ALLOW_CAPABILITY))   * @b: Pointer to "struct ccs_acl_info".
966                  return ccs_write_capability_policy(data, domain, cond,   *
967                                                     is_delete);   * Returns true if @a == @b, false otherwise.
968          if (ccs_str_starts(&data, CCS_KEYWORD_ALLOW_NETWORK))   */
969                  return ccs_write_network_policy(data, domain, cond, is_delete);  static bool ccs_same_handler_acl(const struct ccs_acl_info *a,
970          if (ccs_str_starts(&data, CCS_KEYWORD_ALLOW_SIGNAL))                                   const struct ccs_acl_info *b)
971                  return ccs_write_signal_policy(data, domain, cond, is_delete);  {
972          if (ccs_str_starts(&data, CCS_KEYWORD_ALLOW_ENV))          const struct ccs_handler_acl *p1 = container_of(a, typeof(*p1), head);
973                  return ccs_write_env_policy(data, domain, cond, is_delete);          const struct ccs_handler_acl *p2 = container_of(b, typeof(*p2), head);
974          if (ccs_str_starts(&data, CCS_KEYWORD_ALLOW_MOUNT))          return p1->handler == p2->handler;
                 return ccs_write_mount_policy(data, domain, cond, is_delete);  
         if (ccs_str_starts(&data, CCS_KEYWORD_ALLOW_UNMOUNT))  
                 return ccs_write_umount_policy(data, domain, cond, is_delete);  
         if (ccs_str_starts(&data, CCS_KEYWORD_ALLOW_CHROOT))  
                 return ccs_write_chroot_policy(data, domain, cond, is_delete);  
         if (ccs_str_starts(&data, CCS_KEYWORD_ALLOW_PIVOT_ROOT))  
                 return ccs_write_pivot_root_policy(data, domain, cond,  
                                                    is_delete);  
         return ccs_write_file_policy(data, domain, cond, is_delete);  
975  }  }
976    
977  /**  /**
978   * ccs_write_domain_policy - Write domain policy.   * ccs_same_task_acl - Check for duplicated "struct ccs_task_acl" entry.
979     *
980     * @a: Pointer to "struct ccs_acl_info".
981     * @b: Pointer to "struct ccs_acl_info".
982     *
983     * Returns true if @a == @b, false otherwise.
984     */
985    static bool ccs_same_task_acl(const struct ccs_acl_info *a,
986                                  const struct ccs_acl_info *b)
987    {
988            const struct ccs_task_acl *p1 = container_of(a, typeof(*p1), head);
989            const struct ccs_task_acl *p2 = container_of(b, typeof(*p2), head);
990            return p1->domainname == p2->domainname;
991    }
992    
993    /**
994     * ccs_write_task - Update task related list.
995     *
996     * @param: Pointer to "struct ccs_acl_param".
997     *
998     * Returns 0 on success, negative value otherwise.
999     */
1000    static int ccs_write_task(struct ccs_acl_param *param)
1001    {
1002            int error;
1003            const bool is_auto = ccs_str_starts(&param->data,
1004                                                "auto_domain_transition ");
1005            if (!is_auto && !ccs_str_starts(&param->data,
1006                                            "manual_domain_transition ")) {
1007                    struct ccs_handler_acl e = { };
1008                    char *handler;
1009                    if (ccs_str_starts(&param->data, "auto_execute_handler "))
1010                            e.head.type = CCS_TYPE_AUTO_EXECUTE_HANDLER;
1011                    else if (ccs_str_starts(&param->data,
1012                                            "denied_execute_handler "))
1013                            e.head.type = CCS_TYPE_DENIED_EXECUTE_HANDLER;
1014                    else
1015                            return -EINVAL;
1016                    handler = ccs_read_token(param);
1017                    if (!ccs_correct_path(handler))
1018                            return -EINVAL;
1019                    e.handler = ccs_get_name(handler);
1020                    if (!e.handler)
1021                            return -ENOMEM;
1022                    if (e.handler->is_patterned)
1023                            error = -EINVAL; /* No patterns allowed. */
1024                    else
1025                            error = ccs_update_domain(&e.head, sizeof(e), param,
1026                                                      ccs_same_handler_acl, NULL);
1027                    ccs_put_name(e.handler);
1028            } else {
1029                    struct ccs_task_acl e = {
1030                            .head.type = is_auto ?
1031                            CCS_TYPE_AUTO_TASK_ACL : CCS_TYPE_MANUAL_TASK_ACL,
1032                            .domainname = ccs_get_domainname(param),
1033                    };
1034                    if (!e.domainname)
1035                            error = -EINVAL;
1036                    else
1037                            error = ccs_update_domain(&e.head, sizeof(e), param,
1038                                                      ccs_same_task_acl, NULL);
1039                    ccs_put_name(e.domainname);
1040            }
1041            return error;
1042    }
1043    
1044    /**
1045     * ccs_write_domain2 - Write domain policy.
1046     *
1047     * @data:      Policy to be interpreted.
1048     * @domain:    Pointer to "struct ccs_domain_info".
1049     * @is_delete: True if it is a delete request.
1050     *
1051     * Returns 0 on success, negative value otherwise.
1052     */
1053    static int ccs_write_domain2(char *data, struct ccs_domain_info *domain,
1054                                 const bool is_delete)
1055    {
1056            struct ccs_acl_param param = {
1057                    .data = data,
1058                    .domain = domain,
1059                    .is_delete = is_delete,
1060            };
1061            static const struct {
1062                    const char *keyword;
1063                    int (*write) (struct ccs_acl_param *);
1064            } ccs_callback[7] = {
1065                    { "file ", ccs_write_file },
1066                    { "network inet ", ccs_write_inet_network },
1067                    { "network unix ", ccs_write_unix_network },
1068                    { "misc ", ccs_write_misc },
1069                    { "capability ", ccs_write_capability },
1070                    { "ipc ", ccs_write_ipc },
1071                    { "task ", ccs_write_task },
1072            };
1073            u8 i;
1074            for (i = 0; i < 7; i++) {
1075                    if (!ccs_str_starts(&param.data, ccs_callback[i].keyword))
1076                            continue;
1077                    return ccs_callback[i].write(&param);
1078            }
1079            return -EINVAL;
1080    }
1081    
1082    /* String table for domain flags. */
1083    const char * const ccs_dif[CCS_MAX_DOMAIN_INFO_FLAGS] = {
1084            [CCS_DIF_QUOTA_WARNED]      = "quota_exceeded\n",
1085            [CCS_DIF_TRANSITION_FAILED] = "transition_failed\n",
1086    };
1087    
1088    /**
1089     * ccs_write_domain - Write domain policy.
1090   *   *
1091   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
1092   *   *
1093   * Returns 0 on success, negative value otherwise.   * Returns 0 on success, negative value otherwise.
1094   */   */
1095  static int ccs_write_domain_policy(struct ccs_io_buffer *head)  static int ccs_write_domain(struct ccs_io_buffer *head)
1096  {  {
1097          char *data = head->write_buf;          char *data = head->write_buf;
1098          struct ccs_domain_info *domain = head->write_var1;          struct ccs_domain_info *domain = head->w.domain;
1099          bool is_delete = false;          bool is_delete = false;
1100          bool is_select = false;          bool is_select = false;
1101          unsigned int profile;          unsigned int profile;
1102          struct ccs_condition *cond = NULL;          if (ccs_str_starts(&data, "delete "))
         char *cp;  
         int error;  
         if (ccs_str_starts(&data, CCS_KEYWORD_DELETE))  
1103                  is_delete = true;                  is_delete = true;
1104          else if (ccs_str_starts(&data, CCS_KEYWORD_SELECT))          else if (ccs_str_starts(&data, "select "))
1105                  is_select = true;                  is_select = true;
1106          if (is_select && ccs_is_select_one(head, data))          if (is_select && ccs_select_one(head, data))
1107                  return 0;                  return 0;
1108          /* Don't allow updating policies by non manager programs. */          /* Don't allow updating policies by non manager programs. */
1109          if (!ccs_is_policy_manager())          if (!ccs_manager())
1110                  return -EPERM;                  return -EPERM;
1111          if (ccs_is_domain_def(data)) {          if (ccs_domain_def(data)) {
1112                  domain = NULL;                  domain = NULL;
1113                  if (is_delete)                  if (is_delete)
1114                          ccs_delete_domain(data);                          ccs_delete_domain(data);
1115                  else if (is_select)                  else if (is_select)
1116                          domain = ccs_find_domain(data);                          domain = ccs_find_domain(data);
1117                  else                  else
1118                          domain = ccs_find_or_assign_new_domain(data, 0);                          domain = ccs_assign_domain(data, 0, 0, false);
1119                  head->write_var1 = domain;                  head->w.domain = domain;
1120                  return 0;                  return 0;
1121          }          }
1122          if (!domain)          if (!domain)
1123                  return -EINVAL;                  return -EINVAL;
1124    
1125          if (sscanf(data, CCS_KEYWORD_USE_PROFILE "%u", &profile) == 1          if (sscanf(data, "use_profile %u\n", &profile) == 1
1126              && profile < CCS_MAX_PROFILES) {              && profile < CCS_MAX_PROFILES) {
1127                  if (ccs_profile_ptr[profile] || !ccs_policy_loaded)                  if (!ccs_policy_loaded || ccs_profile_ptr[(u8) profile])
1128                          domain->profile = (u8) profile;                          if (!is_delete)
1129                                    domain->profile = (u8) profile;
1130                  return 0;                  return 0;
1131          }          }
1132          if (!strcmp(data, CCS_KEYWORD_IGNORE_GLOBAL_ALLOW_READ)) {          if (sscanf(data, "use_group %u\n", &profile) == 1
1133                  domain->ignore_global_allow_read = !is_delete;              && profile < CCS_MAX_ACL_GROUPS) {
1134                    if (!is_delete)
1135                            domain->group = (u8) profile;
1136                  return 0;                  return 0;
1137          }          }
1138          if (!strcmp(data, CCS_KEYWORD_IGNORE_GLOBAL_ALLOW_ENV)) {          for (profile = 0; profile < CCS_MAX_DOMAIN_INFO_FLAGS; profile++) {
1139                  domain->ignore_global_allow_env = !is_delete;                  const char *cp = ccs_dif[profile];
1140                    if (strncmp(data, cp, strlen(cp) - 1))
1141                            continue;
1142                    domain->flags[profile] = !is_delete;
1143                  return 0;                  return 0;
1144          }          }
1145          cp = ccs_find_condition_part(data);          return ccs_write_domain2(data, domain, is_delete);
         if (cp) {  
                 cond = ccs_get_condition(cp);  
                 if (!cond)  
                         return -EINVAL;  
         }  
         error = ccs_write_domain_policy2(data, domain, cond, is_delete);  
         if (cond)  
                 ccs_put_condition(cond);  
         return error;  
 }  
   
 static bool ccs_print_name_union(struct ccs_io_buffer *head,  
                                  const struct ccs_name_union *ptr)  
 {  
         int pos = head->read_avail;  
         if (pos && head->read_buf[pos - 1] == ' ')  
                 head->read_avail--;  
         if (ptr->is_group)  
                 return ccs_io_printf(head, " @%s",  
                                      ptr->group->group_name->name);  
         return ccs_io_printf(head, " %s", ptr->filename->name);  
 }  
   
 static bool ccs_print_name_union_quoted(struct ccs_io_buffer *head,  
                                         const struct ccs_name_union *ptr)  
 {  
         if (ptr->is_group)  
                 return ccs_io_printf(head, "@%s",  
                                      ptr->group->group_name->name);  
         return ccs_io_printf(head, "\"%s\"", ptr->filename->name);  
 }  
   
 static bool ccs_print_number_union_common(struct ccs_io_buffer *head,  
                                           const struct ccs_number_union *ptr,  
                                           const bool need_space)  
 {  
         unsigned long min;  
         unsigned long max;  
         u8 min_type;  
         u8 max_type;  
         if (need_space && !ccs_io_printf(head, " "))  
                 return false;  
         if (ptr->is_group)  
                 return ccs_io_printf(head, "@%s",  
                                      ptr->group->group_name->name);  
         min_type = ptr->min_type;  
         max_type = ptr->max_type;  
         min = ptr->values[0];  
         max = ptr->values[1];  
         switch (min_type) {  
         case CCS_VALUE_TYPE_HEXADECIMAL:  
                 if (!ccs_io_printf(head, "0x%lX", min))  
                         return false;  
                 break;  
         case CCS_VALUE_TYPE_OCTAL:  
                 if (!ccs_io_printf(head, "0%lo", min))  
                         return false;  
                 break;  
         default:  
                 if (!ccs_io_printf(head, "%lu", min))  
                         return false;  
                 break;  
         }  
         if (min == max && min_type == max_type)  
                 return true;  
         switch (max_type) {  
         case CCS_VALUE_TYPE_HEXADECIMAL:  
                 return ccs_io_printf(head, "-0x%lX", max);  
         case CCS_VALUE_TYPE_OCTAL:  
                 return ccs_io_printf(head, "-0%lo", max);  
         default:  
                 return ccs_io_printf(head, "-%lu", max);  
         }  
 }  
   
 bool ccs_print_number_union(struct ccs_io_buffer *head,  
                             const struct ccs_number_union *ptr)  
 {  
         return ccs_print_number_union_common(head, ptr, true);  
 }  
   
 static bool ccs_print_number_union_nospace(struct ccs_io_buffer *head,  
                                            const struct ccs_number_union *ptr)  
 {  
         return ccs_print_number_union_common(head, ptr, false);  
1146  }  }
1147    
1148  /**  /**
1149   * ccs_print_condition - Print condition part.   * ccs_print_name_union - Print a ccs_name_union.
1150   *   *
1151   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
1152   * @cond: Pointer to "struct ccs_condition". May be NULL.   * @ptr:  Pointer to "struct ccs_name_union".
1153   *   *
1154   * Returns true on success, false otherwise.   * Returns nothing.
1155   */   */
1156  static bool ccs_print_condition(struct ccs_io_buffer *head,  static void ccs_print_name_union(struct ccs_io_buffer *head,
1157                                  const struct ccs_condition *cond)                                   const struct ccs_name_union *ptr)
1158  {  {
1159          const struct ccs_condition_element *condp;          const bool cond = head->r.print_cond_part;
         const struct ccs_number_union *numbers_p;  
         const struct ccs_name_union *names_p;  
         const struct ccs_argv_entry *argv;  
         const struct ccs_envp_entry *envp;  
         u16 condc;  
         u16 i;  
         u16 j;  
         char buffer[32];  
1160          if (!cond)          if (!cond)
1161                  goto no_condition;                  ccs_set_space(head);
1162          condc = cond->condc;          if (ptr->is_group) {
1163          condp = (const struct ccs_condition_element *) (cond + 1);                  ccs_set_string(head, "@");
1164          numbers_p = (const struct ccs_number_union *) (condp + condc);                  ccs_set_string(head, ptr->group->group_name->name);
1165          names_p = (const struct ccs_name_union *)          } else {
1166                  (numbers_p + cond->numbers_count);                  if (cond)
1167          argv = (const struct ccs_argv_entry *) (names_p + cond->names_count);                          ccs_set_string(head, "\"");
1168          envp = (const struct ccs_envp_entry *) (argv + cond->argc);                  ccs_set_string(head, ptr->filename->name);
1169          memset(buffer, 0, sizeof(buffer));                  if (cond)
1170          if (condc && !ccs_io_printf(head, "%s", " if"))                          ccs_set_string(head, "\"");
                 goto out;  
         for (i = 0; i < condc; i++) {  
                 const u8 match = condp->equals;  
                 const u8 left = condp->left;  
                 const u8 right = condp->right;  
                 condp++;  
                 switch (left) {  
                 case CCS_ARGV_ENTRY:  
                         if (!ccs_io_printf(head, " exec.argv[%u]%s\"%s\"",  
                                            argv->index, argv->is_not ?  
                                            "!=" : "=", argv->value->name))  
                                 goto out;  
                         argv++;  
                         continue;  
                 case CCS_ENVP_ENTRY:  
                         if (!ccs_io_printf(head, " exec.envp[\"%s\"]%s",  
                                            envp->name->name, envp->is_not ?  
                                            "!=" : "="))  
                                 goto out;  
                         if (envp->value) {  
                                 if (!ccs_io_printf(head, "\"%s\"",  
                                                    envp->value->name))  
                                         goto out;  
                         } else {  
                                 if (!ccs_io_printf(head, "NULL"))  
                                         goto out;  
                         }  
                         envp++;  
                         continue;  
                 case CCS_NUMBER_UNION:  
                         if (!ccs_print_number_union(head, numbers_p++))  
                                 goto out;  
                         break;  
                 default:  
                         if (left >= CCS_MAX_CONDITION_KEYWORD)  
                                 goto out;  
                         if (!ccs_io_printf(head, " %s",  
                                            ccs_condition_keyword[left]))  
                                 goto out;  
                         break;  
                 }  
                 if (!ccs_io_printf(head, "%s", match ? "=" : "!="))  
                         goto out;  
                 switch (right) {  
                 case CCS_NAME_UNION:  
                         if (!ccs_print_name_union_quoted(head, names_p++))  
                                 goto out;  
                         break;  
                 case CCS_NUMBER_UNION:  
                         if (!ccs_print_number_union_nospace(head, numbers_p++))  
                                 goto out;  
                         break;  
                 default:  
                         if (right >= CCS_MAX_CONDITION_KEYWORD)  
                                 goto out;  
                         if (!ccs_io_printf(head, "%s",  
                                            ccs_condition_keyword[right]))  
                                 goto out;  
                         break;  
                 }  
         }  
         i = cond->post_state[3];  
         if (!i)  
                 goto no_condition;  
         if (!ccs_io_printf(head, " ; set"))  
                 goto out;  
         for (j = 0; j < 3; j++) {  
                 if (!(i & (1 << j)))  
                         continue;  
                 if (!ccs_io_printf(head, " task.state[%u]=%u", j,  
                                    cond->post_state[j]))  
                         goto out;  
1171          }          }
  no_condition:  
         if (ccs_io_printf(head, "\n"))  
                 return true;  
  out:  
         return false;  
1172  }  }
1173    
1174  /**  /**
1175   * ccs_print_path_acl - Print a single path ACL entry.   * ccs_print_number_union - Print a ccs_number_union.
1176   *   *
1177   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
1178   * @ptr:  Pointer to "struct ccs_path_acl".   * @ptr:  Pointer to "struct ccs_number_union".
  * @cond: Pointer to "struct ccs_condition". May be NULL.  
1179   *   *
1180   * Returns true on success, false otherwise.   * Returns nothing.
1181   */   */
1182  static bool ccs_print_path_acl(struct ccs_io_buffer *head,  static void ccs_print_number_union(struct ccs_io_buffer *head,
1183                                        struct ccs_path_acl *ptr,                                     const struct ccs_number_union *ptr)
                                       const struct ccs_condition *cond)  
1184  {  {
1185          int pos;          if (!head->r.print_cond_part)
1186          u8 bit;                  ccs_set_space(head);
1187          const u16 perm = ptr->perm;          if (ptr->is_group) {
1188          for (bit = head->read_bit; bit < CCS_MAX_PATH_OPERATION; bit++) {                  ccs_set_string(head, "@");
1189                  if (!(perm & (1 << bit)))                  ccs_set_string(head, ptr->group->group_name->name);
1190                          continue;          } else {
1191                  if (head->read_execute_only && bit != CCS_TYPE_EXECUTE)                  int i;
1192                          continue;                  unsigned long min = ptr->values[0];
1193                  /* Print "read/write" instead of "read" and "write". */                  const unsigned long max = ptr->values[1];
1194                  if ((bit == CCS_TYPE_READ || bit == CCS_TYPE_WRITE)                  u8 min_type = ptr->value_type[0];
1195                      && (perm & (1 << CCS_TYPE_READ_WRITE)))                  const u8 max_type = ptr->value_type[1];
1196                          continue;                  char buffer[128];
1197                  pos = head->read_avail;                  buffer[0] = '\0';
1198                  if (!ccs_io_printf(head, "allow_%s", ccs_path2keyword(bit)) ||                  for (i = 0; i < 2; i++) {
1199                      !ccs_print_name_union(head, &ptr->name) ||                          switch (min_type) {
1200                      !ccs_print_condition(head, cond)) {                          case CCS_VALUE_TYPE_HEXADECIMAL:
1201                          head->read_bit = bit;                                  ccs_addprintf(buffer, sizeof(buffer), "0x%lX",
1202                          head->read_avail = pos;                                                min);
1203                          return false;                                  break;
1204                            case CCS_VALUE_TYPE_OCTAL:
1205                                    ccs_addprintf(buffer, sizeof(buffer), "0%lo",
1206                                                  min);
1207                                    break;
1208                            default:
1209                                    ccs_addprintf(buffer, sizeof(buffer), "%lu",
1210                                                  min);
1211                                    break;
1212                            }
1213                            if (min == max && min_type == max_type)
1214                                    break;
1215                            ccs_addprintf(buffer, sizeof(buffer), "-");
1216                            min_type = max_type;
1217                            min = max;
1218                  }                  }
1219                    ccs_io_printf(head, "%s", buffer);
1220          }          }
         head->read_bit = 0;  
         return true;  
1221  }  }
1222    
1223  /**  /**
1224   * ccs_print_path_number3_acl - Print a path_number3 ACL entry.   * ccs_print_condition - Print condition part.
1225   *   *
1226   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
1227   * @ptr:  Pointer to "struct ccs_path_number3_acl".   * @cond: Pointer to "struct ccs_condition".
  * @cond: Pointer to "struct ccs_condition". May be NULL.  
1228   *   *
1229   * Returns true on success, false otherwise.   * Returns true on success, false otherwise.
1230   */   */
1231  static bool ccs_print_path_number3_acl(struct ccs_io_buffer *head,  static bool ccs_print_condition(struct ccs_io_buffer *head,
                                 struct ccs_path_number3_acl *ptr,  
1232                                  const struct ccs_condition *cond)                                  const struct ccs_condition *cond)
1233  {  {
1234          int pos;          switch (head->r.cond_step) {
1235          u8 bit;          case 0:
1236          const u16 perm = ptr->perm;                  head->r.cond_index = 0;
1237          for (bit = head->read_bit; bit < CCS_MAX_PATH_NUMBER3_OPERATION;                  head->r.cond_step++;
1238               bit++) {                  /* fall through */
1239                  if (!(perm & (1 << bit)))          case 1:
1240                          continue;                  {
1241                  pos = head->read_avail;                          const u16 condc = cond->condc;
1242                  if (!ccs_io_printf(head, "allow_%s",                          const struct ccs_condition_element *condp =
1243                                     ccs_path_number32keyword(bit)) ||                                  (typeof(condp)) (cond + 1);
1244                      !ccs_print_name_union(head, &ptr->name) ||                          const struct ccs_number_union *numbers_p =
1245                      !ccs_print_number_union(head, &ptr->mode) ||                                  (typeof(numbers_p)) (condp + condc);
1246                      !ccs_print_number_union(head, &ptr->major) ||                          const struct ccs_name_union *names_p =
1247                      !ccs_print_number_union(head, &ptr->minor) ||                                  (typeof(names_p))
1248                      !ccs_print_condition(head, cond)) {                                  (numbers_p + cond->numbers_count);
1249                          head->read_bit = bit;                          const struct ccs_argv *argv =
1250                          head->read_avail = pos;                                  (typeof(argv)) (names_p + cond->names_count);
1251                          return false;                          const struct ccs_envp *envp =
1252                  }                                  (typeof(envp)) (argv + cond->argc);
1253          }                          u16 skip;
1254          head->read_bit = 0;                          for (skip = 0; skip < head->r.cond_index; skip++) {
1255          return true;                                  const u8 left = condp->left;
1256  }                                  const u8 right = condp->right;
1257                                    condp++;
1258  /**                                  switch (left) {
1259   * ccs_print_path2_acl - Print a double path ACL entry.                                  case CCS_ARGV_ENTRY:
1260   *                                          argv++;
1261   * @head: Pointer to "struct ccs_io_buffer".                                          continue;
1262   * @ptr:  Pointer to "struct ccs_path2_acl".                                  case CCS_ENVP_ENTRY:
1263   * @cond: Pointer to "struct ccs_condition". May be NULL.                                          envp++;
1264   *                                          continue;
1265   * Returns true on success, false otherwise.                                  case CCS_NUMBER_UNION:
1266   */                                          numbers_p++;
1267  static bool ccs_print_path2_acl(struct ccs_io_buffer *head,                                          break;
1268                                        struct ccs_path2_acl *ptr,                                  }
1269                                        const struct ccs_condition *cond)                                  switch (right) {
1270  {                                  case CCS_NAME_UNION:
1271          int pos;                                          names_p++;
1272          u8 bit;                                          break;
1273          const u8 perm = ptr->perm;                                  case CCS_NUMBER_UNION:
1274          for (bit = head->read_bit; bit < CCS_MAX_PATH2_OPERATION; bit++) {                                          numbers_p++;
1275                  if (!(perm & (1 << bit)))                                          break;
1276                          continue;                                  }
1277                  pos = head->read_avail;                          }
1278                  if (!ccs_io_printf(head, "allow_%s",                          while (head->r.cond_index < condc) {
1279                                     ccs_path22keyword(bit)) ||                                  const u8 match = condp->equals;
1280                      !ccs_print_name_union(head, &ptr->name1) ||                                  const u8 left = condp->left;
1281                      !ccs_print_name_union(head, &ptr->name2) ||                                  const u8 right = condp->right;
1282                      !ccs_print_condition(head, cond)) {                                  if (!ccs_flush(head))
1283                          head->read_bit = bit;                                          return false;
1284                          head->read_avail = pos;                                  condp++;
1285                          return false;                                  head->r.cond_index++;
1286                                    ccs_set_space(head);
1287                                    switch (left) {
1288                                    case CCS_ARGV_ENTRY:
1289                                            ccs_io_printf(head,
1290                                                          "exec.argv[%u]%s\"%s\"",
1291                                                          argv->index,
1292                                                          argv->is_not ?
1293                                                          "!=" : "=",
1294                                                          argv->value->name);
1295                                            argv++;
1296                                            continue;
1297                                    case CCS_ENVP_ENTRY:
1298                                            ccs_io_printf(head,
1299                                                          "exec.envp[\"%s\"]%s",
1300                                                          envp->name->name,
1301                                                          envp->is_not ?
1302                                                          "!=" : "=");
1303                                            if (envp->value) {
1304                                                    ccs_set_string(head, "\"");
1305                                                    ccs_set_string(head, envp->
1306                                                                   value->name);
1307                                                    ccs_set_string(head, "\"");
1308                                            } else {
1309                                                    ccs_set_string(head, "NULL");
1310                                            }
1311                                            envp++;
1312                                            continue;
1313                                    case CCS_NUMBER_UNION:
1314                                            ccs_print_number_union(head,
1315                                                                   numbers_p++);
1316                                            break;
1317                                    default:
1318                                            ccs_set_string(head,
1319                                                   ccs_condition_keyword[left]);
1320                                            break;
1321                                    }
1322                                    ccs_set_string(head, match ? "=" : "!=");
1323                                    switch (right) {
1324                                    case CCS_NAME_UNION:
1325                                            ccs_print_name_union(head, names_p++);
1326                                            break;
1327                                    case CCS_NUMBER_UNION:
1328                                            ccs_print_number_union(head,
1329                                                                   numbers_p++);
1330                                            break;
1331                                    default:
1332                                            ccs_set_string(head,
1333                                                   ccs_condition_keyword[right]);
1334                                            break;
1335                                    }
1336                            }
1337                  }                  }
1338          }                  head->r.cond_step++;
1339          head->read_bit = 0;                  /* fall through */
1340          return true;          case 2:
1341  }                  if (!ccs_flush(head))
1342                            break;
1343  /**                  head->r.cond_step++;
1344   * ccs_print_path_number_acl - Print an ioctl/chmod/chown/chgrp ACL entry.                  /* fall through */
1345   *          case 3:
1346   * @head: Pointer to "struct ccs_io_buffer".                  if (cond->grant_log != CCS_GRANTLOG_AUTO)
1347   * @ptr:  Pointer to "struct ccs_path_number_acl".                          ccs_io_printf(head, " grant_log=%s",
1348   * @cond: Pointer to "struct ccs_condition". May be NULL.                                        ccs_yesno(cond->grant_log ==
1349   *                                                  CCS_GRANTLOG_YES));
1350   * Returns true on success, false otherwise.                  if (cond->transit) {
1351   */                          ccs_set_string(head, " auto_domain_transition=\"");
1352  static bool ccs_print_path_number_acl(struct ccs_io_buffer *head,                          ccs_set_string(head, cond->transit->name);
1353                                        struct ccs_path_number_acl *ptr,                          ccs_set_string(head, "\"");
                                       const struct ccs_condition *cond)  
 {  
         int pos;  
         u8 bit;  
         const u8 perm = ptr->perm;  
         for (bit = head->read_bit; bit < CCS_MAX_PATH_NUMBER_OPERATION;  
              bit++) {  
                 if (!(perm & (1 << bit)))  
                         continue;  
                 pos = head->read_avail;  
                 if (!ccs_io_printf(head, "allow_%s",  
                                    ccs_path_number2keyword(bit)) ||  
                     !ccs_print_name_union(head, &ptr->name) ||  
                     !ccs_print_number_union(head, &ptr->number) ||  
                     !ccs_print_condition(head, cond)) {  
                         head->read_bit = bit;  
                         head->read_avail = pos;  
                         return false;  
1354                  }                  }
1355                    ccs_set_lf(head);
1356                    return true;
1357          }          }
1358          head->read_bit = 0;          return false;
         return true;  
 }  
   
 /**  
  * ccs_print_env_acl - Print an evironment variable name's ACL entry.  
  *  
  * @head: Pointer to "struct ccs_io_buffer".  
  * @ptr:  Pointer to "struct ccs_env_acl".  
  * @cond: Pointer to "struct ccs_condition". May be NULL.  
  *  
  * Returns true on success, false otherwise.  
  */  
 static bool ccs_print_env_acl(struct ccs_io_buffer *head,  
                               struct ccs_env_acl *ptr,  
                               const struct ccs_condition *cond)  
 {  
         const int pos = head->read_avail;  
         if (!ccs_io_printf(head, CCS_KEYWORD_ALLOW_ENV "%s", ptr->env->name) ||  
             !ccs_print_condition(head, cond)) {  
                 head->read_avail = pos;  
                 return false;  
         }  
         return true;  
 }  
   
 /**  
  * ccs_print_capability_acl - Print a capability ACL entry.  
  *  
  * @head: Pointer to "struct ccs_io_buffer".  
  * @ptr:  Pointer to "struct ccs_capability_acl".  
  * @cond: Pointer to "struct ccs_condition". May be NULL.  
  *  
  * Returns true on success, false otherwise.  
  */  
 static bool ccs_print_capability_acl(struct ccs_io_buffer *head,  
                                      struct ccs_capability_acl *ptr,  
                                      const struct ccs_condition *cond)  
 {  
         const int pos = head->read_avail;  
         if (!ccs_io_printf(head, CCS_KEYWORD_ALLOW_CAPABILITY "%s",  
                            ccs_cap2keyword(ptr->operation)) ||  
             !ccs_print_condition(head, cond)) {  
                 head->read_avail = pos;  
                 return false;  
         }  
         return true;  
1359  }  }
1360    
1361  /**  /**
1362   * ccs_print_ipv4_entry - Print IPv4 address of a network ACL entry.   * ccs_fns - Find next set bit.
1363   *   *
1364   * @head: Pointer to "struct ccs_io_buffer".   * @perm: 8 bits value.
1365   * @ptr:  Pointer to "struct ccs_ip_network_acl".   * @bit:  First bit to find.
1366   *   *
1367   * Returns true on success, false otherwise.   * Returns next set bit on success, 8 otherwise.
1368   */   */
1369  static bool ccs_print_ipv4_entry(struct ccs_io_buffer *head,  static u8 ccs_fns(const u8 perm, u8 bit)
                                  struct ccs_ip_network_acl *ptr)  
1370  {  {
1371          const u32 min_address = ptr->address.ipv4.min;          for ( ; bit < 8; bit++)
1372          const u32 max_address = ptr->address.ipv4.max;                  if (perm & (1 << bit))
1373          if (!ccs_io_printf(head, "%u.%u.%u.%u", HIPQUAD(min_address)))                          break;
1374                  return false;          return bit;
         if (min_address != max_address  
             && !ccs_io_printf(head, "-%u.%u.%u.%u", HIPQUAD(max_address)))  
                 return false;  
         return true;  
1375  }  }
1376    
1377  /**  /**
1378   * ccs_print_ipv6_entry - Print IPv6 address of a network ACL entry.   * ccs_set_group - Print "acl_group " header keyword.
1379   *   *
1380   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
  * @ptr:  Pointer to "struct ccs_ip_network_acl".  
1381   *   *
1382   * Returns true on success, false otherwise.   * Returns nothing.
1383   */   */
1384  static bool ccs_print_ipv6_entry(struct ccs_io_buffer *head,  static void ccs_set_group(struct ccs_io_buffer *head)
                                  struct ccs_ip_network_acl *ptr)  
1385  {  {
1386          char buf[64];          if (head->type == CCS_EXCEPTIONPOLICY)
1387          const struct in6_addr *min_address = ptr->address.ipv6.min;                  ccs_io_printf(head, "acl_group %u ", head->r.group_index);
         const struct in6_addr *max_address = ptr->address.ipv6.max;  
         ccs_print_ipv6(buf, sizeof(buf), min_address);  
         if (!ccs_io_printf(head, "%s", buf))  
                 return false;  
         if (min_address != max_address) {  
                 ccs_print_ipv6(buf, sizeof(buf), max_address);  
                 if (!ccs_io_printf(head, "-%s", buf))  
                         return false;  
         }  
         return true;  
1388  }  }
1389    
1390  /**  /**
1391   * ccs_print_network_acl - Print a network ACL entry.   * ccs_print_entry - Print an ACL entry.
1392   *   *
1393   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
1394   * @ptr:  Pointer to "struct ccs_ip_network_acl".   * @acl:  Pointer to an ACL entry.
  * @cond: Pointer to "struct ccs_condition". May be NULL.  
1395   *   *
1396   * Returns true on success, false otherwise.   * Returns true on success, false otherwise.
1397   */   */
1398  static bool ccs_print_network_acl(struct ccs_io_buffer *head,  static bool ccs_print_entry(struct ccs_io_buffer *head,
1399                                    struct ccs_ip_network_acl *ptr,                              const struct ccs_acl_info *acl)
                                   const struct ccs_condition *cond)  
1400  {  {
1401          int pos;          const u8 acl_type = acl->type;
1402          u8 bit;          u8 bit;
1403          const u16 perm = ptr->perm;          if (head->r.print_cond_part)
1404          for (bit = head->read_bit; bit < CCS_MAX_NETWORK_OPERATION; bit++) {                  goto print_cond_part;
1405                  if (!(perm & (1 << bit)))          if (acl->is_deleted)
1406                          continue;                  return true;
1407                  pos = head->read_avail;  next:
1408                  if (!ccs_io_printf(head, CCS_KEYWORD_ALLOW_NETWORK "%s ",          bit = head->r.bit;
1409                                     ccs_net2keyword(bit)))          if (!ccs_flush(head))
1410                          goto out;                  return false;
1411            else if (acl_type == CCS_TYPE_PATH_ACL) {
1412                    struct ccs_path_acl *ptr
1413                            = container_of(acl, typeof(*ptr), head);
1414                    const u16 perm = ptr->perm;
1415                    for ( ; bit < CCS_MAX_PATH_OPERATION; bit++) {
1416                            if (!(perm & (1 << bit)))
1417                                    continue;
1418                            if (head->r.print_execute_only &&
1419                                bit != CCS_TYPE_EXECUTE
1420                                /* && bit != CCS_TYPE_TRANSIT */)
1421                                    continue;
1422                            break;
1423                    }
1424                    if (bit >= CCS_MAX_PATH_OPERATION)
1425                            goto done;
1426                    ccs_set_group(head);
1427                    ccs_set_string(head, "file ");
1428                    ccs_set_string(head, ccs_path_keyword[bit]);
1429                    ccs_print_name_union(head, &ptr->name);
1430            } else if (acl_type == CCS_TYPE_AUTO_EXECUTE_HANDLER ||
1431                       acl_type == CCS_TYPE_DENIED_EXECUTE_HANDLER) {
1432                    struct ccs_handler_acl *ptr
1433                            = container_of(acl, typeof(*ptr), head);
1434                    ccs_set_group(head);
1435                    ccs_set_string(head, "task ");
1436                    ccs_set_string(head, acl_type == CCS_TYPE_AUTO_EXECUTE_HANDLER
1437                                   ? "auto_execute_handler " :
1438                                   "denied_execute_handler ");
1439                    ccs_set_string(head, ptr->handler->name);
1440            } else if (acl_type == CCS_TYPE_AUTO_TASK_ACL ||
1441                       acl_type == CCS_TYPE_MANUAL_TASK_ACL) {
1442                    struct ccs_task_acl *ptr =
1443                            container_of(acl, typeof(*ptr), head);
1444                    ccs_set_group(head);
1445                    ccs_set_string(head, "task ");
1446                    ccs_set_string(head, acl_type == CCS_TYPE_AUTO_TASK_ACL ?
1447                                   "auto_domain_transition " :
1448                                   "manual_domain_transition ");
1449                    ccs_set_string(head, ptr->domainname->name);
1450            } else if (head->r.print_execute_only) {
1451                    return true;
1452            } else if (acl_type == CCS_TYPE_MKDEV_ACL) {
1453                    struct ccs_mkdev_acl *ptr =
1454                            container_of(acl, typeof(*ptr), head);
1455                    bit = ccs_fns(ptr->perm, bit);
1456                    if (bit >= CCS_MAX_MKDEV_OPERATION)
1457                            goto done;
1458                    ccs_set_group(head);
1459                    ccs_set_string(head, "file ");
1460                    ccs_set_string(head, ccs_mac_keywords[ccs_pnnn2mac[bit]]);
1461                    ccs_print_name_union(head, &ptr->name);
1462                    ccs_print_number_union(head, &ptr->mode);
1463                    ccs_print_number_union(head, &ptr->major);
1464                    ccs_print_number_union(head, &ptr->minor);
1465            } else if (acl_type == CCS_TYPE_PATH2_ACL) {
1466                    struct ccs_path2_acl *ptr =
1467                            container_of(acl, typeof(*ptr), head);
1468                    bit = ccs_fns(ptr->perm, bit);
1469                    if (bit >= CCS_MAX_PATH2_OPERATION)
1470                            goto done;
1471                    ccs_set_group(head);
1472                    ccs_set_string(head, "file ");
1473                    ccs_set_string(head, ccs_mac_keywords[ccs_pp2mac[bit]]);
1474                    ccs_print_name_union(head, &ptr->name1);
1475                    ccs_print_name_union(head, &ptr->name2);
1476            } else if (acl_type == CCS_TYPE_PATH_NUMBER_ACL) {
1477                    struct ccs_path_number_acl *ptr =
1478                            container_of(acl, typeof(*ptr), head);
1479                    bit = ccs_fns(ptr->perm, bit);
1480                    if (bit >= CCS_MAX_PATH_NUMBER_OPERATION)
1481                            goto done;
1482                    ccs_set_group(head);
1483                    ccs_set_string(head, "file ");
1484                    ccs_set_string(head, ccs_mac_keywords[ccs_pn2mac[bit]]);
1485                    ccs_print_name_union(head, &ptr->name);
1486                    ccs_print_number_union(head, &ptr->number);
1487            } else if (acl_type == CCS_TYPE_ENV_ACL) {
1488                    struct ccs_env_acl *ptr =
1489                            container_of(acl, typeof(*ptr), head);
1490                    ccs_set_group(head);
1491                    ccs_set_string(head, "misc env ");
1492                    ccs_set_string(head, ptr->env->name);
1493            } else if (acl_type == CCS_TYPE_CAPABILITY_ACL) {
1494                    struct ccs_capability_acl *ptr =
1495                            container_of(acl, typeof(*ptr), head);
1496                    ccs_set_group(head);
1497                    ccs_set_string(head, "capability ");
1498                    ccs_set_string(head,
1499                                   ccs_mac_keywords[ccs_c2mac[ptr->operation]]);
1500            } else if (acl_type == CCS_TYPE_INET_ACL) {
1501                    struct ccs_inet_acl *ptr =
1502                            container_of(acl, typeof(*ptr), head);
1503                    bit = ccs_fns(ptr->perm, bit);
1504                    if (bit >= CCS_MAX_NETWORK_OPERATION)
1505                            goto done;
1506                    ccs_set_group(head);
1507                    ccs_set_string(head, "network inet ");
1508                    ccs_set_string(head, ccs_proto_keyword[ptr->protocol]);
1509                    ccs_set_space(head);
1510                    ccs_set_string(head, ccs_socket_keyword[bit]);
1511                    ccs_set_space(head);
1512                  switch (ptr->address_type) {                  switch (ptr->address_type) {
1513                            char buf[128];
1514                  case CCS_IP_ADDRESS_TYPE_ADDRESS_GROUP:                  case CCS_IP_ADDRESS_TYPE_ADDRESS_GROUP:
1515                          if (!ccs_io_printf(head, "@%s", ptr->address.group->                          ccs_set_string(head, "@");
1516                                             group_name->name))                          ccs_set_string(head,
1517                                  goto out;                                         ptr->address.group->group_name->name);
1518                          break;                          break;
1519                  case CCS_IP_ADDRESS_TYPE_IPv4:                  case CCS_IP_ADDRESS_TYPE_IPv4:
1520                          if (!ccs_print_ipv4_entry(head, ptr))                          ccs_print_ipv4(buf, sizeof(buf), ptr->address.ipv4.min,
1521                                  goto out;                                         ptr->address.ipv4.max);
1522                            ccs_io_printf(head, "%s", buf);
1523                          break;                          break;
1524                  case CCS_IP_ADDRESS_TYPE_IPv6:                  case CCS_IP_ADDRESS_TYPE_IPv6:
1525                          if (!ccs_print_ipv6_entry(head, ptr))                          ccs_print_ipv6(buf, sizeof(buf), ptr->address.ipv6.min,
1526                                  goto out;                                         ptr->address.ipv6.max);
1527                            ccs_io_printf(head, "%s", buf);
1528                          break;                          break;
1529                  }                  }
1530                  if (!ccs_print_number_union(head, &ptr->port) ||                  ccs_print_number_union(head, &ptr->port);
1531                      !ccs_print_condition(head, cond))          } else if (acl_type == CCS_TYPE_UNIX_ACL) {
1532                          goto out;                  struct ccs_unix_acl *ptr =
1533          }                          container_of(acl, typeof(*ptr), head);
1534          head->read_bit = 0;                  bit = ccs_fns(ptr->perm, bit);
1535          return true;                  if (bit >= CCS_MAX_NETWORK_OPERATION)
1536   out:                          goto done;
1537          head->read_bit = bit;                  ccs_set_group(head);
1538          head->read_avail = pos;                  ccs_set_string(head, "network unix ");
1539          return false;                  ccs_set_string(head, ccs_proto_keyword[ptr->protocol]);
1540  }                  ccs_set_space(head);
1541                    ccs_set_string(head, ccs_socket_keyword[bit]);
1542  /**                  ccs_print_name_union(head, &ptr->name);
1543   * ccs_print_signal_acl - Print a signal ACL entry.          } else if (acl_type == CCS_TYPE_SIGNAL_ACL) {
1544   *                  struct ccs_signal_acl *ptr =
1545   * @head: Pointer to "struct ccs_io_buffer".                          container_of(acl, typeof(*ptr), head);
1546   * @ptr:  Pointer to "struct signale_acl".                  ccs_set_group(head);
1547   * @cond: Pointer to "struct ccs_condition". May be NULL.                  ccs_set_string(head, "ipc signal ");
1548   *                  ccs_io_printf(head, "%u ", ptr->sig);
1549   * Returns true on success, false otherwise.                  ccs_set_string(head, ptr->domainname->name);
1550   */          } else if (acl_type == CCS_TYPE_MOUNT_ACL) {
1551  static bool ccs_print_signal_acl(struct ccs_io_buffer *head,                  struct ccs_mount_acl *ptr =
1552                                   struct ccs_signal_acl *ptr,                          container_of(acl, typeof(*ptr), head);
1553                                   const struct ccs_condition *cond)                  ccs_set_group(head);
1554  {                  ccs_io_printf(head, "file mount");
1555          const int pos = head->read_avail;                  ccs_print_name_union(head, &ptr->dev_name);
1556          if (!ccs_io_printf(head, CCS_KEYWORD_ALLOW_SIGNAL "%u %s",                  ccs_print_name_union(head, &ptr->dir_name);
1557                             ptr->sig, ptr->domainname->name) ||                  ccs_print_name_union(head, &ptr->fs_type);
1558              !ccs_print_condition(head, cond)) {                  ccs_print_number_union(head, &ptr->flags);
1559                  head->read_avail = pos;          }
1560                  return false;          head->r.bit = bit + 1;
1561          }          if (acl->cond) {
1562          return true;                  head->r.print_cond_part = true;
1563  }                  head->r.cond_step = 0;
1564                    if (!ccs_flush(head))
1565  /**                          return false;
1566   * ccs_print_execute_handler_record - Print an execute handler ACL entry.  print_cond_part:
1567   *                  if (!ccs_print_condition(head, acl->cond))
1568   * @head:    Pointer to "struct ccs_io_buffer".                          return false;
1569   * @keyword: Name of the keyword.                  head->r.print_cond_part = false;
1570   * @ptr:     Pointer to "struct ccs_execute_handler_record".          } else {
1571   *                  ccs_set_lf(head);
  * Returns true on success, false otherwise.  
  */  
 static bool ccs_print_execute_handler_record(struct ccs_io_buffer *head,  
                                              const char *keyword,  
                                              struct ccs_execute_handler_record *  
                                              ptr)  
 {  
         return ccs_io_printf(head, "%s %s\n", keyword, ptr->handler->name);  
 }  
   
 /**  
  * ccs_print_mount_acl - Print a mount ACL entry.  
  *  
  * @head: Pointer to "struct ccs_io_buffer".  
  * @ptr:  Pointer to "struct ccs_mount_acl".  
  * @cond: Pointer to "struct ccs_condition". May be NULL.  
  *  
  * Returns true on success, false otherwise.  
  */  
 static bool ccs_print_mount_acl(struct ccs_io_buffer *head,  
                                 struct ccs_mount_acl *ptr,  
                                 const struct ccs_condition *cond)  
 {  
         const int pos = head->read_avail;  
         if (!ccs_io_printf(head, CCS_KEYWORD_ALLOW_MOUNT) ||  
             !ccs_print_name_union(head, &ptr->dev_name) ||  
             !ccs_print_name_union(head, &ptr->dir_name) ||  
             !ccs_print_name_union(head, &ptr->fs_type) ||  
             !ccs_print_number_union(head, &ptr->flags) ||  
             !ccs_print_condition(head, cond)) {  
                 head->read_avail = pos;  
                 return false;  
1572          }          }
1573          return true;          switch (acl_type) {
1574  }          case CCS_TYPE_PATH_ACL:
1575            case CCS_TYPE_MKDEV_ACL:
1576  /**          case CCS_TYPE_PATH2_ACL:
1577   * ccs_print_umount_acl - Print a mount ACL entry.          case CCS_TYPE_PATH_NUMBER_ACL:
1578   *          case CCS_TYPE_INET_ACL:
1579   * @head: Pointer to "struct ccs_io_buffer".          case CCS_TYPE_UNIX_ACL:
1580   * @ptr:  Pointer to "struct ccs_umount_acl".                  goto next;
  * @cond: Pointer to "struct ccs_condition". May be NULL.  
  *  
  * Returns true on success, false otherwise.  
  */  
 static bool ccs_print_umount_acl(struct ccs_io_buffer *head,  
                                  struct ccs_umount_acl *ptr,  
                                  const struct ccs_condition *cond)  
 {  
         const int pos = head->read_avail;  
         if (!ccs_io_printf(head, CCS_KEYWORD_ALLOW_UNMOUNT) ||  
             !ccs_print_name_union(head, &ptr->dir) ||  
             !ccs_print_condition(head, cond)) {  
                 head->read_avail = pos;  
                 return false;  
1581          }          }
1582    done:
1583            head->r.bit = 0;
1584          return true;          return true;
1585  }  }
1586    
1587  /**  /**
1588   * ccs_print_chroot_acl - Print a chroot ACL entry.   * ccs_read_domain2 - Read domain policy.
1589   *   *
1590   * @head: Pointer to "struct ccs_io_buffer".   * @head:   Pointer to "struct ccs_io_buffer".
1591   * @ptr:  Pointer to "struct ccs_chroot_acl".   * @domain: Pointer to "struct ccs_domain_info".
1592   * @cond: Pointer to "struct ccs_condition". May be NULL.   * @index:  Index number.
1593   *   *
1594   * Returns true on success, false otherwise.   * Returns true on success, false otherwise.
  */  
 static bool ccs_print_chroot_acl(struct ccs_io_buffer *head,  
                                  struct ccs_chroot_acl *ptr,  
                                  const struct ccs_condition *cond)  
 {  
         const int pos = head->read_avail;  
         if (!ccs_io_printf(head, CCS_KEYWORD_ALLOW_CHROOT) ||  
             !ccs_print_name_union(head, &ptr->dir) ||  
             !ccs_print_condition(head, cond)) {  
                 head->read_avail = pos;  
                 return false;  
         }  
         return true;  
 }  
   
 /**  
  * ccs_print_pivot_root_acl - Print a pivot_root ACL entry.  
1595   *   *
1596   * @head: Pointer to "struct ccs_io_buffer".   * Caller holds ccs_read_lock().
  * @ptr:  Pointer to "struct ccs_pivot_root_acl".  
  * @cond: Pointer to "struct ccs_condition". May be NULL.  
  *  
  * Returns true on success, false otherwise.  
1597   */   */
1598  static bool ccs_print_pivot_root_acl(struct ccs_io_buffer *head,  static bool ccs_read_domain2(struct ccs_io_buffer *head,
1599                                       struct ccs_pivot_root_acl *ptr,                               struct ccs_domain_info *domain,
1600                                       const struct ccs_condition *cond)                               const u8 index)
1601  {  {
1602          const int pos = head->read_avail;          list_for_each_cookie(head->r.acl, &domain->acl_info_list[index]) {
1603          if (!ccs_io_printf(head, CCS_KEYWORD_ALLOW_PIVOT_ROOT) ||                  struct ccs_acl_info *ptr =
1604              !ccs_print_name_union(head, &ptr->new_root) ||                          list_entry(head->r.acl, typeof(*ptr), list);
1605              !ccs_print_name_union(head, &ptr->old_root) ||                  if (!ccs_print_entry(head, ptr))
1606              !ccs_print_condition(head, cond)) {                          return false;
                 head->read_avail = pos;  
                 return false;  
1607          }          }
1608            head->r.acl = NULL;
1609          return true;          return true;
1610  }  }
1611    
1612  /**  /**
1613   * ccs_print_entry - Print an ACL entry.   * ccs_read_domain - Read domain policy.
1614   *   *
1615   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
  * @ptr:  Pointer to an ACL entry.  
1616   *   *
1617   * Returns true on success, false otherwise.   * Returns nothing.
  */  
 static bool ccs_print_entry(struct ccs_io_buffer *head,  
                             struct ccs_acl_info *ptr)  
 {  
         const struct ccs_condition *cond = ptr->cond;  
         const u8 acl_type = ptr->type;  
         if (ptr->is_deleted)  
                 return true;  
         if (acl_type == CCS_TYPE_PATH_ACL) {  
                 struct ccs_path_acl *acl  
                         = container_of(ptr, struct ccs_path_acl,  
                                        head);  
                 return ccs_print_path_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_EXECUTE_HANDLER) {  
                 struct ccs_execute_handler_record *acl  
                         = container_of(ptr, struct ccs_execute_handler_record,  
                                        head);  
                 const char *keyword = CCS_KEYWORD_EXECUTE_HANDLER;  
                 return ccs_print_execute_handler_record(head, keyword, acl);  
         }  
         if (acl_type == CCS_TYPE_DENIED_EXECUTE_HANDLER) {  
                 struct ccs_execute_handler_record *acl  
                         = container_of(ptr, struct ccs_execute_handler_record,  
                                        head);  
                 const char *keyword = CCS_KEYWORD_DENIED_EXECUTE_HANDLER;  
                 return ccs_print_execute_handler_record(head, keyword, acl);  
         }  
         if (head->read_execute_only)  
                 return true;  
         if (acl_type == CCS_TYPE_PATH_NUMBER3_ACL) {  
                 struct ccs_path_number3_acl *acl  
                         = container_of(ptr, struct ccs_path_number3_acl, head);  
                 return ccs_print_path_number3_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_PATH2_ACL) {  
                 struct ccs_path2_acl *acl  
                         = container_of(ptr, struct ccs_path2_acl,  
                                        head);  
                 return ccs_print_path2_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_PATH_NUMBER_ACL) {  
                 struct ccs_path_number_acl *acl  
                         = container_of(ptr, struct ccs_path_number_acl,  
                                        head);  
                 return ccs_print_path_number_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_ENV_ACL) {  
                 struct ccs_env_acl *acl  
                         = container_of(ptr, struct ccs_env_acl, head);  
                 return ccs_print_env_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_CAPABILITY_ACL) {  
                 struct ccs_capability_acl *acl  
                         = container_of(ptr, struct ccs_capability_acl,  
                                        head);  
                 return ccs_print_capability_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_IP_NETWORK_ACL) {  
                 struct ccs_ip_network_acl *acl  
                         = container_of(ptr, struct ccs_ip_network_acl,  
                                        head);  
                 return ccs_print_network_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_SIGNAL_ACL) {  
                 struct ccs_signal_acl *acl  
                         = container_of(ptr, struct ccs_signal_acl, head);  
                 return ccs_print_signal_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_MOUNT_ACL) {  
                 struct ccs_mount_acl *acl  
                         = container_of(ptr, struct ccs_mount_acl, head);  
                 return ccs_print_mount_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_UMOUNT_ACL) {  
                 struct ccs_umount_acl *acl  
                         = container_of(ptr, struct ccs_umount_acl, head);  
                 return ccs_print_umount_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_CHROOT_ACL) {  
                 struct ccs_chroot_acl *acl  
                         = container_of(ptr, struct ccs_chroot_acl, head);  
                 return ccs_print_chroot_acl(head, acl, cond);  
         }  
         if (acl_type == CCS_TYPE_PIVOT_ROOT_ACL) {  
                 struct ccs_pivot_root_acl *acl  
                         = container_of(ptr, struct ccs_pivot_root_acl,  
                                        head);  
                 return ccs_print_pivot_root_acl(head, acl, cond);  
         }  
         BUG(); /* This must not happen. */  
         return false;  
 }  
   
 /**  
  * ccs_read_domain_policy - Read domain policy.  
  *  
  * @head: Pointer to "struct ccs_io_buffer".  
  *  
  * Returns 0.  
1618   *   *
1619   * Caller holds ccs_read_lock().   * Caller holds ccs_read_lock().
1620   */   */
1621  static int ccs_read_domain_policy(struct ccs_io_buffer *head)  static void ccs_read_domain(struct ccs_io_buffer *head)
1622  {  {
1623          struct list_head *dpos;          if (head->r.eof)
1624          struct list_head *apos;                  return;
1625          ccs_assert_read_lock();          list_for_each_cookie(head->r.domain, &ccs_domain_list) {
1626          if (head->read_eof)                  struct ccs_domain_info *domain =
1627                  return 0;                          list_entry(head->r.domain, typeof(*domain), list);
1628          if (head->read_step == 0)                  switch (head->r.step) {
1629                  head->read_step = 1;                          u8 i;
1630          list_for_each_cookie(dpos, head->read_var1, &ccs_domain_list) {                  case 0:
1631                  struct ccs_domain_info *domain;                          if (domain->is_deleted &&
1632                  const char *quota_exceeded = "";                              !head->r.print_this_domain_only)
1633                  const char *transition_failed = "";                                  continue;
1634                  const char *ignore_global_allow_read = "";                          /* Print domainname and flags. */
1635                  const char *ignore_global_allow_env = "";                          ccs_set_string(head, domain->domainname->name);
1636                  domain = list_entry(dpos, struct ccs_domain_info, list);                          ccs_set_lf(head);
1637                  if (head->read_step != 1)                          ccs_io_printf(head, "use_profile %u\n",
1638                          goto acl_loop;                                        domain->profile);
1639                  if (domain->is_deleted && !head->read_single_domain)                          ccs_io_printf(head, "use_group %u\n", domain->group);
1640                          continue;                          for (i = 0; i < CCS_MAX_DOMAIN_INFO_FLAGS; i++)
1641                  /* Print domainname and flags. */                                  if (domain->flags[i])
1642                  if (domain->quota_warned)                                          ccs_set_string(head, ccs_dif[i]);
1643                          quota_exceeded = "quota_exceeded\n";                          head->r.step++;
1644                  if (domain->domain_transition_failed)                          ccs_set_lf(head);
1645                          transition_failed = "transition_failed\n";                          /* fall through */
1646                  if (domain->ignore_global_allow_read)                  case 1:
1647                          ignore_global_allow_read                          if (!ccs_read_domain2(head, domain, 0))
1648                                  = CCS_KEYWORD_IGNORE_GLOBAL_ALLOW_READ "\n";                                  return;
1649                  if (domain->ignore_global_allow_env)                          head->r.step++;
1650                          ignore_global_allow_env                          /* fall through */
1651                                  = CCS_KEYWORD_IGNORE_GLOBAL_ALLOW_ENV "\n";                  case 2:
1652                  if (!ccs_io_printf(head, "%s\n" CCS_KEYWORD_USE_PROFILE "%u\n"                          if (!ccs_read_domain2(head, domain, 1))
1653                                     "%s%s%s%s\n", domain->domainname->name,                                  return;
1654                                     domain->profile, quota_exceeded,                          head->r.step++;
1655                                     transition_failed,                          if (!ccs_set_lf(head))
1656                                     ignore_global_allow_read,                                  return;
1657                                     ignore_global_allow_env))                          /* fall through */
1658                          return 0;                  case 3:
1659                  head->read_step = 2;                          head->r.step = 0;
1660   acl_loop:                          if (head->r.print_this_domain_only)
1661                  if (head->read_step == 3)                                  goto done;
1662                          goto tail_mark;                  }
                 /* Print ACL entries in the domain. */  
                 list_for_each_cookie(apos, head->read_var2,  
                                      &domain->acl_info_list) {  
                         struct ccs_acl_info *ptr  
                                 = list_entry(apos, struct ccs_acl_info, list);  
                         if (!ccs_print_entry(head, ptr))  
                                 return 0;  
                 }  
                 head->read_step = 3;  
  tail_mark:  
                 if (!ccs_io_printf(head, "\n"))  
                         return 0;  
                 head->read_step = 1;  
                 if (head->read_single_domain)  
                         break;  
1663          }          }
1664          head->read_eof = true;  done:
1665          return 0;          head->r.eof = true;
1666  }  }
1667    
1668  /**  /**
# Line 1563  static int ccs_read_domain_policy(struct Line 1675  static int ccs_read_domain_policy(struct
1675   * This is equivalent to doing   * This is equivalent to doing
1676   *   *
1677   *     ( echo "select " $domainname; echo "use_profile " $profile ) |   *     ( echo "select " $domainname; echo "use_profile " $profile ) |
1678   *     /usr/lib/ccs/loadpolicy -d   *     /usr/sbin/ccs-loadpolicy -d
1679   *   *
1680   * Caller holds ccs_read_lock().   * Caller holds ccs_read_lock().
1681   */   */
# Line 1573  static int ccs_write_domain_profile(stru Line 1685  static int ccs_write_domain_profile(stru
1685          char *cp = strchr(data, ' ');          char *cp = strchr(data, ' ');
1686          struct ccs_domain_info *domain;          struct ccs_domain_info *domain;
1687          unsigned int profile;          unsigned int profile;
         ccs_assert_read_lock();  
1688          if (!cp)          if (!cp)
1689                  return -EINVAL;                  return -EINVAL;
1690          *cp = '\0';          *cp = '\0';
# Line 1581  static int ccs_write_domain_profile(stru Line 1692  static int ccs_write_domain_profile(stru
1692          if (profile >= CCS_MAX_PROFILES)          if (profile >= CCS_MAX_PROFILES)
1693                  return -EINVAL;                  return -EINVAL;
1694          domain = ccs_find_domain(cp + 1);          domain = ccs_find_domain(cp + 1);
1695          if (domain && (ccs_profile_ptr[profile] || !ccs_policy_loaded))          if (domain && (!ccs_policy_loaded || ccs_profile_ptr[(u8) profile]))
1696                  domain->profile = (u8) profile;                  domain->profile = (u8) profile;
1697          return 0;          return 0;
1698  }  }
# Line 1591  static int ccs_write_domain_profile(stru Line 1702  static int ccs_write_domain_profile(stru
1702   *   *
1703   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
1704   *   *
1705   * Returns list of profile number and domainname pairs.   * Returns nothing.
1706   *   *
1707   * This is equivalent to doing   * This is equivalent to doing
1708   *   *
# Line 1602  static int ccs_write_domain_profile(stru Line 1713  static int ccs_write_domain_profile(stru
1713   *   *
1714   * Caller holds ccs_read_lock().   * Caller holds ccs_read_lock().
1715   */   */
1716  static int ccs_read_domain_profile(struct ccs_io_buffer *head)  static void ccs_read_domain_profile(struct ccs_io_buffer *head)
1717  {  {
1718          struct list_head *pos;          if (head->r.eof)
1719          ccs_assert_read_lock();                  return;
1720          if (head->read_eof)          list_for_each_cookie(head->r.domain, &ccs_domain_list) {
1721                  return 0;                  struct ccs_domain_info *domain =
1722          list_for_each_cookie(pos, head->read_var1, &ccs_domain_list) {                          list_entry(head->r.domain, typeof(*domain), list);
                 struct ccs_domain_info *domain;  
                 domain = list_entry(pos, struct ccs_domain_info, list);  
1723                  if (domain->is_deleted)                  if (domain->is_deleted)
1724                          continue;                          continue;
1725                  if (!ccs_io_printf(head, "%u %s\n", domain->profile,                  if (!ccs_flush(head))
1726                                     domain->domainname->name))                          return;
1727                          return 0;                  ccs_io_printf(head, "%u ", domain->profile);
1728                    ccs_set_string(head, domain->domainname->name);
1729                    ccs_set_lf(head);
1730          }          }
1731          head->read_eof = true;          head->r.eof = true;
         return 0;  
1732  }  }
1733    
1734  /**  /**
1735   * ccs_write_pid: Specify PID to obtain domainname.   * ccs_write_pid - Specify PID to obtain domainname.
1736   *   *
1737   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
1738   *   *
# Line 1630  static int ccs_read_domain_profile(struc Line 1740  static int ccs_read_domain_profile(struc
1740   */   */
1741  static int ccs_write_pid(struct ccs_io_buffer *head)  static int ccs_write_pid(struct ccs_io_buffer *head)
1742  {  {
1743          head->read_eof = false;          head->r.eof = false;
1744          return 0;          return 0;
1745  }  }
1746    
# Line 1645  static int ccs_write_pid(struct ccs_io_b Line 1755  static int ccs_write_pid(struct ccs_io_b
1755   *   *
1756   * Caller holds ccs_read_lock().   * Caller holds ccs_read_lock().
1757   */   */
1758  static int ccs_read_pid(struct ccs_io_buffer *head)  static void ccs_read_pid(struct ccs_io_buffer *head)
1759  {  {
1760          char *buf = head->write_buf;          char *buf = head->write_buf;
1761          bool task_info = false;          bool task_info = false;
1762            bool global_pid = false;
1763          unsigned int pid;          unsigned int pid;
1764          struct task_struct *p;          struct task_struct *p;
1765          struct ccs_domain_info *domain = NULL;          struct ccs_domain_info *domain = NULL;
1766          u32 ccs_flags = 0;          u32 ccs_flags = 0;
         ccs_assert_read_lock();  
1767          /* Accessing write_buf is safe because head->io_sem is held. */          /* Accessing write_buf is safe because head->io_sem is held. */
1768          if (!buf)          if (!buf) {
1769                  goto done; /* Do nothing if open(O_RDONLY). */                  head->r.eof = true;
1770          if (head->read_avail || head->read_eof)                  return; /* Do nothing if open(O_RDONLY). */
1771                  goto done;          }
1772          head->read_eof = true;          if (head->r.w_pos || head->r.eof)
1773                    return;
1774            head->r.eof = true;
1775          if (ccs_str_starts(&buf, "info "))          if (ccs_str_starts(&buf, "info "))
1776                  task_info = true;                  task_info = true;
1777            if (ccs_str_starts(&buf, "global-pid "))
1778                    global_pid = true;
1779          pid = (unsigned int) simple_strtoul(buf, NULL, 10);          pid = (unsigned int) simple_strtoul(buf, NULL, 10);
1780          /***** CRITICAL SECTION START *****/          ccs_tasklist_lock();
1781          read_lock(&tasklist_lock);  #if LINUX_VERSION_CODE >= KERNEL_VERSION(2, 6, 24)
1782            if (global_pid)
1783                    p = ccsecurity_exports.find_task_by_pid_ns(pid, &init_pid_ns);
1784            else
1785                    p = ccsecurity_exports.find_task_by_vpid(pid);
1786    #else
1787          p = find_task_by_pid(pid);          p = find_task_by_pid(pid);
1788    #endif
1789          if (p) {          if (p) {
1790                  domain = ccs_task_domain(p);                  domain = ccs_task_domain(p);
1791                  ccs_flags = p->ccs_flags;                  ccs_flags = ccs_task_flags(p);
1792          }          }
1793          read_unlock(&tasklist_lock);          ccs_tasklist_unlock();
         /***** CRITICAL SECTION END *****/  
1794          if (!domain)          if (!domain)
1795                  goto done;                  return;
1796          if (!task_info)          if (!task_info) {
1797                  ccs_io_printf(head, "%u %u %s", pid, domain->profile,                  ccs_io_printf(head, "%u %u ", pid, domain->profile);
1798                                domain->domainname->name);                  ccs_set_string(head, domain->domainname->name);
1799          else          } else {
1800                  ccs_io_printf(head, "%u manager=%s execute_handler=%s "                  ccs_io_printf(head, "%u manager=%s execute_handler=%s ", pid,
1801                                "state[0]=%u state[1]=%u state[2]=%u", pid,                                ccs_yesno(ccs_flags &
1802                                ccs_flags & CCS_TASK_IS_POLICY_MANAGER ?                                          CCS_TASK_IS_MANAGER),
1803                                "yes" : "no",                                ccs_yesno(ccs_flags &
1804                                ccs_flags & CCS_TASK_IS_EXECUTE_HANDLER ?                                          CCS_TASK_IS_EXECUTE_HANDLER));
1805                                "yes" : "no",          }
                               (u8) (ccs_flags >> 24),  
                               (u8) (ccs_flags >> 16),  
                               (u8) (ccs_flags >> 8));  
  done:  
         return 0;  
1806  }  }
1807    
1808    /* String table for domain transition control keywords. */
1809    static const char * const ccs_transition_type[CCS_MAX_TRANSITION_TYPE] = {
1810            [CCS_TRANSITION_CONTROL_NO_INITIALIZE] = "no_initialize_domain ",
1811            [CCS_TRANSITION_CONTROL_INITIALIZE]    = "initialize_domain ",
1812            [CCS_TRANSITION_CONTROL_NO_KEEP]       = "no_keep_domain ",
1813            [CCS_TRANSITION_CONTROL_KEEP]          = "keep_domain ",
1814    };
1815    
1816    /* String table for grouping keywords. */
1817    static const char * const ccs_group_name[CCS_MAX_GROUP] = {
1818            [CCS_PATH_GROUP]    = "path_group ",
1819            [CCS_NUMBER_GROUP]  = "number_group ",
1820            [CCS_ADDRESS_GROUP] = "address_group ",
1821    };
1822    
1823  /**  /**
1824   * ccs_write_exception_policy - Write exception policy.   * ccs_write_exception - Write exception policy.
1825   *   *
1826   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
1827   *   *
1828   * Returns 0 on success, negative value otherwise.   * Returns 0 on success, negative value otherwise.
1829   */   */
1830  static int ccs_write_exception_policy(struct ccs_io_buffer *head)  static int ccs_write_exception(struct ccs_io_buffer *head)
1831  {  {
1832          char *data = head->write_buf;          char *data = head->write_buf;
1833          bool is_delete = ccs_str_starts(&data, CCS_KEYWORD_DELETE);          const bool is_delete = ccs_str_starts(&data, "delete ");
1834          if (ccs_str_starts(&data, CCS_KEYWORD_KEEP_DOMAIN))          u8 i;
1835                  return ccs_write_domain_keeper_policy(data, false, is_delete);          static const struct {
1836          if (ccs_str_starts(&data, CCS_KEYWORD_NO_KEEP_DOMAIN))                  const char *keyword;
1837                  return ccs_write_domain_keeper_policy(data, true, is_delete);                  int (*write) (char *, const bool);
1838          if (ccs_str_starts(&data, CCS_KEYWORD_INITIALIZE_DOMAIN))          } ccs_callback[2] = {
1839                  return ccs_write_domain_initializer_policy(data, false,                  { "aggregator ",    ccs_write_aggregator },
1840                                                             is_delete);                  { "deny_autobind ", ccs_write_reserved_port },
1841          if (ccs_str_starts(&data, CCS_KEYWORD_NO_INITIALIZE_DOMAIN))          };
1842                  return ccs_write_domain_initializer_policy(data, true,          for (i = 0; i < 2; i++)
1843                                                             is_delete);                  if (ccs_str_starts(&data, ccs_callback[i].keyword))
1844          if (ccs_str_starts(&data, CCS_KEYWORD_AGGREGATOR))                          return ccs_callback[i].write(data, is_delete);
1845                  return ccs_write_aggregator_policy(data, is_delete);          for (i = 0; i < CCS_MAX_TRANSITION_TYPE; i++)
1846          if (ccs_str_starts(&data, CCS_KEYWORD_ALLOW_READ))                  if (ccs_str_starts(&data, ccs_transition_type[i]))
1847                  return ccs_write_globally_readable_policy(data, is_delete);                          return ccs_write_transition_control(data, is_delete,
1848          if (ccs_str_starts(&data, CCS_KEYWORD_ALLOW_ENV))                                                              i);
1849                  return ccs_write_globally_usable_env_policy(data, is_delete);          for (i = 0; i < CCS_MAX_GROUP; i++)
1850          if (ccs_str_starts(&data, CCS_KEYWORD_FILE_PATTERN))                  if (ccs_str_starts(&data, ccs_group_name[i]))
1851                  return ccs_write_pattern_policy(data, is_delete);                          return ccs_write_group(data, is_delete, i);
1852          if (ccs_str_starts(&data, CCS_KEYWORD_PATH_GROUP))          if (ccs_str_starts(&data, "acl_group ")) {
1853                  return ccs_write_path_group_policy(data, is_delete);                  unsigned int group;
1854          if (ccs_str_starts(&data, CCS_KEYWORD_NUMBER_GROUP))                  if (sscanf(data, "%u", &group) == 1 &&
1855                  return ccs_write_number_group_policy(data, is_delete);                      group < CCS_MAX_ACL_GROUPS) {
1856          if (ccs_str_starts(&data, CCS_KEYWORD_DENY_REWRITE))                          data = strchr(data, ' ');
1857                  return ccs_write_no_rewrite_policy(data, is_delete);                          if (data)
1858          if (ccs_str_starts(&data, CCS_KEYWORD_ADDRESS_GROUP))                                  return ccs_write_domain2(data + 1,
1859                  return ccs_write_address_group_policy(data, is_delete);                                                           &ccs_acl_group[group],
1860          if (ccs_str_starts(&data, CCS_KEYWORD_DENY_AUTOBIND))                                                           is_delete);
1861                  return ccs_write_reserved_port_policy(data, is_delete);                  }
1862            }
1863          return -EINVAL;          return -EINVAL;
1864  }  }
1865    
1866  /**  /**
1867   * ccs_read_exception_policy - Read exception policy.   * ccs_read_group - Read "struct ccs_path_group"/"struct ccs_number_group"/"struct ccs_address_group" list.
1868   *   *
1869   * @head: Pointer to "struct ccs_io_buffer".   * @head: Pointer to "struct ccs_io_buffer".
1870     * @idx:  Index number.
1871   *   *
1872   * Returns 0 on success, -EINVAL otherwise.   * Returns true on success, false otherwise.
1873   *   *
1874   * Caller holds ccs_read_lock().   * Caller holds ccs_read_lock().
1875   */   */
1876  static int ccs_read_exception_policy(struct ccs_io_buffer *head)  static bool ccs_read_group(struct ccs_io_buffer *head, const int idx)
1877  {  {
1878          ccs_assert_read_lock();          list_for_each_cookie(head->r.group, &ccs_group_list[idx]) {
1879          if (!head->read_eof) {                  struct ccs_group *group =
1880                  switch (head->read_step) {                          list_entry(head->r.group, typeof(*group), head.list);
1881                  case 0:                  list_for_each_cookie(head->r.acl, &group->member_list) {
1882                          head->read_var2 = NULL;                          struct ccs_acl_head *ptr =
1883                          head->read_step = 1;                                  list_entry(head->r.acl, typeof(*ptr), list);
1884                  case 1:                          if (ptr->is_deleted)
1885                          if (!ccs_read_domain_keeper_policy(head))                                  continue;
1886                                  break;                          if (!ccs_flush(head))
1887                          head->read_var2 = NULL;                                  return false;
1888                          head->read_step = 2;                          ccs_set_string(head, ccs_group_name[idx]);
1889                  case 2:                          ccs_set_string(head, group->group_name->name);
1890                          if (!ccs_read_globally_readable_policy(head))                          if (idx == CCS_PATH_GROUP) {
1891                                  break;                                  ccs_set_space(head);
1892                          head->read_var2 = NULL;                                  ccs_set_string(head, container_of
1893                          head->read_step = 3;                                                 (ptr, struct ccs_path_group,
1894                  case 3:                                                  head)->member_name->name);
1895                          if (!ccs_read_globally_usable_env_policy(head))                          } else if (idx == CCS_NUMBER_GROUP) {
1896                                  break;                                  ccs_print_number_union(head, &container_of
1897                          head->read_var2 = NULL;                                                 (ptr, struct ccs_number_group,
1898                          head->read_step = 4;                                                  head)->number);
1899                  case 4:                          } else if (idx == CCS_ADDRESS_GROUP) {
1900                          if (!ccs_read_domain_initializer_policy(head))                                  char buffer[128];
1901                                  break;                                  struct ccs_address_group *member =
1902                          head->read_var2 = NULL;                                          container_of(ptr, typeof(*member),
1903                          head->read_step = 6;                                                       head);
1904                  case 6:                                  if (member->is_ipv6)
1905                          if (!ccs_read_aggregator_policy(head))                                          ccs_print_ipv6(buffer, sizeof(buffer),
1906                                  break;                                                         member->min.ipv6,
1907                          head->read_var2 = NULL;                                                         member->max.ipv6);
1908                          head->read_step = 7;                                  else
1909                  case 7:                                          ccs_print_ipv4(buffer, sizeof(buffer),
1910                          if (!ccs_read_file_pattern(head))                                                         member->min.ipv4,
1911                                  break;                                                         member->max.ipv4);
1912                          head->read_var2 = NULL;                                  ccs_io_printf(head, " %s", buffer);
1913                          head->read_step = 8;                          }
1914                  case 8:                          ccs_set_lf(head);
                         if (!ccs_read_no_rewrite_policy(head))  
                                 break;  
                         head->read_var2 = NULL;  
                         head->read_step = 9;  
                 case 9:  
                         if (!ccs_read_path_group_policy(head))  
                                 break;  
                         head->read_var1 = NULL;  
                         head->read_var2 = NULL;  
                         head->read_step = 10;  
                 case 10:  
                         if (!ccs_read_number_group_policy(head))  
                                 break;  
                         head->read_var1 = NULL;  
                         head->read_var2 = NULL;  
                         head->read_step = 11;  
                 case 11:  
                         if (!ccs_read_address_group_policy(head))  
                                 break;  
                         head->read_var2 = NULL;  
                         head->read_step = 12;  
                 case 12:  
                         if (!ccs_read_reserved_port_policy(head))  
                                 break;  
                         head->read_eof = true;  
                         break;  
                 default:  
                         return -EINVAL;  
1915                  }                  }
1916                    head->r.acl = NULL;
1917          }          }
1918          return 0;          head->r.group = NULL;
1919            return true;
1920  }  }
1921    
1922  /**  /**
1923   * ccs_get_argv0 - Get argv[0].   * ccs_read_policy - Read "struct ccs_..._entry" list.
1924   *   *
1925   * @ee: Pointer to "struct ccs_execve_entry".   * @head: Pointer to "struct ccs_io_buffer".
1926     * @idx:  Index number.
1927   *   *
1928   * Returns true on success, false otherwise.   * Returns true on success, false otherwise.
1929     *
1930     * Caller holds ccs_read_lock().
1931   */   */
1932  static bool ccs_get_argv0(struct ccs_execve_entry *ee)  static bool ccs_read_policy(struct ccs_io_buffer *head, const int idx)
1933  {  {
1934          struct linux_binprm *bprm = ee->bprm;          list_for_each_cookie(head->r.acl, &ccs_policy_list[idx]) {
1935          char *arg_ptr = ee->tmp;                  struct ccs_acl_head *acl =
1936          int arg_len = 0;                          container_of(head->r.acl, typeof(*acl), list);
1937          unsigned long pos = bprm->p;                  if (acl->is_deleted)
1938          int offset = pos % PAGE_SIZE;                          continue;
1939          bool done = false;                  if (!ccs_flush(head))
1940          if (!bprm->argc)                          return false;
1941                  goto out;                  switch (idx) {
1942          while (1) {                  case CCS_ID_TRANSITION_CONTROL:
1943                  if (!ccs_dump_page(bprm, pos, &ee->dump))                          {
1944                          goto out;                                  struct ccs_transition_control *ptr =
1945                  pos += PAGE_SIZE - offset;                                          container_of(acl, typeof(*ptr), head);
1946                  /* Read. */                                  ccs_set_string(head,
1947                  while (offset < PAGE_SIZE) {                                                 ccs_transition_type[ptr->type]);
1948                          const char *kaddr = ee->dump.data;                                  ccs_set_string(head, ptr->program ?
1949                          const unsigned char c = kaddr[offset++];                                                 ptr->program->name : "any");
1950                          if (c && arg_len < CCS_MAX_PATHNAME_LEN - 10) {                                  ccs_set_string(head, " from ");
1951                                  if (c == '\\') {                                  ccs_set_string(head, ptr->domainname ?
1952                                          arg_ptr[arg_len++] = '\\';                                                 ptr->domainname->name : "any");
                                         arg_ptr[arg_len++] = '\\';  
                                 } else if (c == '/') {  
                                         arg_len = 0;  
                                 } else if (c > ' ' && c < 127) {  
                                         arg_ptr[arg_len++] = c;  
                                 } else {  
                                         arg_ptr[arg_len++] = '\\';  
                                         arg_ptr[arg_len++] = (c >> 6) + '0';  
                                         arg_ptr[arg_len++]  
                                                 = ((c >> 3) & 7) + '0';  
                                         arg_ptr[arg_len++] = (c & 7) + '0';  
                                 }  
                         } else {  
                                 arg_ptr[arg_len] = '\0';  
                                 done = true;  
                                 break;  
1953                          }                          }
                 }  
                 offset = 0;  
                 if (done)  
1954                          break;                          break;
1955                    case CCS_ID_AGGREGATOR:
1956                            {
1957                                    struct ccs_aggregator *ptr =
1958                                            container_of(acl, typeof(*ptr), head);
1959                                    ccs_set_string(head, "aggregator ");
1960                                    ccs_set_string(head, ptr->original_name->name);
1961                                    ccs_set_space(head);
1962                                    ccs_set_string(head,
1963                                                   ptr->aggregated_name->name);
1964                            }
1965                            break;
1966                    case CCS_ID_RESERVEDPORT:
1967                            {
1968                                    struct ccs_reserved *ptr =
1969                                            container_of(acl, typeof(*ptr), head);
1970                                    const u16 min_port = ptr->min_port;
1971                                    const u16 max_port = ptr->max_port;
1972                                    ccs_set_string(head, "deny_autobind ");
1973                                    ccs_io_printf(head, "%u", min_port);
1974                                    if (min_port != max_port)
1975                                            ccs_io_printf(head, "-%u", max_port);
1976                            }
1977                            break;
1978                    default:
1979                            continue;
1980                    }
1981                    ccs_set_lf(head);
1982          }          }
1983            head->r.acl = NULL;
1984          return true;          return true;
  out:  
         return false;  
1985  }  }
1986    
1987  static struct ccs_condition *ccs_get_execute_condition(struct ccs_execve_entry  /**
1988                                                         *ee)   * ccs_read_exception - Read exception policy.
1989     *
1990     * @head: Pointer to "struct ccs_io_buffer".
1991     *
1992     * Returns nothing.
1993     *
1994     * Caller holds ccs_read_lock().
1995     */
1996    static void ccs_read_exception(struct ccs_io_buffer *head)
1997  {  {
1998          struct ccs_condition *cond;          if (head->r.eof)
1999          char *buf;                  return;
2000          int len = 256;          while (head->r.step < CCS_MAX_POLICY &&
2001          char *realpath = NULL;                 ccs_read_policy(head, head->r.step))
2002          char *argv0 = NULL;                  head->r.step++;
2003          if (ccs_flags(NULL, CCS_AUTOLEARN_EXEC_REALPATH)) {          if (head->r.step < CCS_MAX_POLICY)
2004                  struct file *file = ee->bprm->file;                  return;
2005  #if LINUX_VERSION_CODE < KERNEL_VERSION(2, 6, 20)          while (head->r.step < CCS_MAX_POLICY + CCS_MAX_GROUP &&
2006                  struct path path = { file->f_vfsmnt, file->f_dentry };                 ccs_read_group(head, head->r.step - CCS_MAX_POLICY))
2007                  realpath = ccs_realpath_from_path(&path);                  head->r.step++;
2008  #else          if (head->r.step < CCS_MAX_POLICY + CCS_MAX_GROUP)
2009                  realpath = ccs_realpath_from_path(&file->f_path);                  return;
2010  #endif          while (head->r.step < CCS_MAX_POLICY + CCS_MAX_GROUP
2011                  if (realpath)                 + CCS_MAX_ACL_GROUPS * 2) {
2012                          len += strlen(realpath) + 17;                  head->r.group_index = (head->r.step - CCS_MAX_POLICY
2013          }                                         - CCS_MAX_GROUP) / 2;
2014          if (ccs_flags(NULL, CCS_AUTOLEARN_EXEC_REALPATH)) {                  if (!ccs_read_domain2(head,
2015                  if (ccs_get_argv0(ee)) {                                        &ccs_acl_group[head->r.group_index],
2016                          argv0 = ee->tmp;                                        head->r.step & 1))
2017                          len += strlen(argv0) + 16;                          return;
2018                  }                  head->r.step++;
2019          }          }
2020          buf = kmalloc(len, GFP_KERNEL);          head->r.eof = true;
         if (!buf)  
                 return NULL;  
         snprintf(buf, len - 1, "if");  
         if (current->ccs_flags & CCS_TASK_IS_EXECUTE_HANDLER) {  
                 const int pos = strlen(buf);  
                 snprintf(buf + pos, len - pos - 1,  
                          " task.type=execute_handler");  
         }  
         if (realpath) {  
                 const int pos = strlen(buf);  
                 snprintf(buf + pos, len - pos - 1, " exec.realpath=\"%s\"",  
                          realpath);  
                 kfree(realpath);  
         }  
         if (argv0) {  
                 const int pos = strlen(buf);  
                 snprintf(buf + pos, len - pos - 1, " exec.argv[0]=\"%s\"",  
                          argv0);  
         }  
         cond = ccs_get_condition(buf);  
         kfree(buf);  
         return cond;  
2021  }  }
2022    
2023  /* Wait queue for ccs_query_list. */  /* Wait queue for kernel -> userspace notification. */
2024  static DECLARE_WAIT_QUEUE_HEAD(ccs_query_wait);  static DECLARE_WAIT_QUEUE_HEAD(ccs_query_wait);
2025    /* Wait queue for userspace -> kernel notification. */
2026  /* Lock for manipulating ccs_query_list. */  static DECLARE_WAIT_QUEUE_HEAD(ccs_answer_wait);
 static DEFINE_SPINLOCK(ccs_query_list_lock);  
2027    
2028  /* Structure for query. */  /* Structure for query. */
2029  struct ccs_query_entry {  struct ccs_query {
2030          struct list_head list;          struct list_head list;
2031          char *query;          char *query;
2032          int query_len;          int query_len;
2033          unsigned int serial;          unsigned int serial;
2034          int timer;          int timer;
2035          int answer;          int answer;
2036            u8 retry;
2037  };  };
2038    
2039  /* The list for "struct ccs_query_entry". */  /* The list for "struct ccs_query". */
2040  static LIST_HEAD(ccs_query_list);  static LIST_HEAD(ccs_query_list);
2041    
2042    /* Lock for manipulating ccs_query_list. */
2043    static DEFINE_SPINLOCK(ccs_query_list_lock);
2044    
2045  /* Number of "struct file" referring /proc/ccs/query interface. */  /* Number of "struct file" referring /proc/ccs/query interface. */
2046  static atomic_t ccs_query_observers = ATOMIC_INIT(0);  static atomic_t ccs_query_observers = ATOMIC_INIT(0);
2047    
2048  /**  /**
2049     * ccs_truncate - Truncate a line.
2050     *
2051     * @str: String to truncate.
2052     *
2053     * Returns length of truncated @str.
2054     */
2055    static int ccs_truncate(char *str)
2056    {
2057            char *start = str;
2058            while (*(unsigned char *) str > (unsigned char) ' ')
2059                    str++;
2060            *str = '\0';
2061            return strlen(start) + 1;
2062    }
2063    
2064    /**
2065     * ccs_add_entry - Add an ACL to current thread's domain. Used by learning mode.
2066     *
2067     * @header: Lines containing ACL.
2068     *
2069     * Returns nothing.
2070     */
2071    static void ccs_add_entry(char *header)
2072    {
2073            char *buffer;
2074            char *realpath = NULL;
2075            char *argv0 = NULL;
2076            char *symlink = NULL;
2077            char *handler;
2078            char *cp = strchr(header, '\n');
2079            int len;
2080            if (!cp)
2081                    return;
2082            cp = strchr(cp + 1, '\n');
2083            if (!cp)
2084                    return;
2085            *cp++ = '\0';
2086            len = strlen(cp) + 1;
2087            /* strstr() will return NULL if ordering is wrong. */
2088            if (*cp == 'f') {
2089                    argv0 = strstr(header, " argv[]={ \"");
2090                    if (argv0) {
2091                            argv0 += 10;
2092                            len += ccs_truncate(argv0) + 14;
2093                    }
2094                    realpath = strstr(header, " exec={ realpath=\"");
2095                    if (realpath) {
2096                            realpath += 8;
2097                            len += ccs_truncate(realpath) + 6;
2098                    }
2099                    symlink = strstr(header, " symlink.target=\"");
2100                    if (symlink)
2101                            len += ccs_truncate(symlink + 1) + 1;
2102            }
2103            handler = strstr(header, "type=execute_handler");
2104            if (handler)
2105                    len += ccs_truncate(handler) + 6;
2106            buffer = kmalloc(len, CCS_GFP_FLAGS);
2107            if (!buffer)
2108                    return;
2109            snprintf(buffer, len - 1, "%s", cp);
2110            if (handler)
2111                    ccs_addprintf(buffer, len, " task.%s", handler);
2112            if (realpath)
2113                    ccs_addprintf(buffer, len, " exec.%s", realpath);
2114            if (argv0)
2115                    ccs_addprintf(buffer, len, " exec.argv[0]=%s", argv0);
2116            if (symlink)
2117                    ccs_addprintf(buffer, len, "%s", symlink);
2118            ccs_normalize_line(buffer);
2119            if (!ccs_write_domain2(buffer, ccs_current_domain(), false))
2120                    ccs_update_stat(CCS_STAT_POLICY_UPDATES);
2121            kfree(buffer);
2122    }
2123    
2124    /**
2125   * ccs_supervisor - Ask for the supervisor's decision.   * ccs_supervisor - Ask for the supervisor's decision.
2126   *   *
2127   * @r:       Pointer to "struct ccs_request_info".   * @r:   Pointer to "struct ccs_request_info".
2128   * @fmt:     The printf()'s format string, followed by parameters.   * @fmt: The printf()'s format string, followed by parameters.
2129   *   *
2130   * Returns 0 if the supervisor decided to permit the access request which   * Returns 0 if the supervisor decided to permit the access request which
2131   * violated the policy in enforcing mode, 1 if the supervisor decided to   * violated the policy in enforcing mode, CCS_RETRY_REQUEST if the supervisor
2132   * retry the access request which violated the policy in enforcing mode,   * decided to retry the access request which violated the policy in enforcing
2133   * 0 if it is not in enforcing mode, -EPERM otherwise.   * mode, 0 if it is not in enforcing mode, -EPERM otherwise.
2134   */   */
2135  int ccs_supervisor(struct ccs_request_info *r, const char *fmt, ...)  int ccs_supervisor(struct ccs_request_info *r, const char *fmt, ...)
2136  {  {
2137          va_list args;          va_list args;
2138          int error = -EPERM;          int error;
         int pos;  
2139          int len;          int len;
2140          static unsigned int ccs_serial;          static unsigned int ccs_serial;
2141          struct ccs_query_entry *ccs_query_entry = NULL;          struct ccs_query entry = { };
2142          bool quota_exceeded = false;          bool quota_exceeded = false;
2143          char *header;          va_start(args, fmt);
2144          if (!r->domain)          len = vsnprintf((char *) &len, 1, fmt, args) + 1;
2145                  r->domain = ccs_current_domain();          va_end(args);
2146          switch (r->mode) {          /* Write /proc/ccs/audit. */
2147                  char *buffer;          va_start(args, fmt);
2148                  struct ccs_condition *cond;          ccs_write_log2(r, len, fmt, args);
2149          case 1:          va_end(args);
2150                  if (!ccs_domain_quota_ok(r))          /* Nothing more to do if granted. */
2151                          return 0;          if (r->granted)
                 va_start(args, fmt);  
                 len = vsnprintf((char *) &pos, sizeof(pos) - 1, fmt, args) + 4;  
                 va_end(args);  
                 buffer = kmalloc(len, GFP_KERNEL);  
                 if (!buffer)  
                         return 0;  
                 va_start(args, fmt);  
                 vsnprintf(buffer, len - 1, fmt, args);  
                 va_end(args);  
                 ccs_normalize_line(buffer);  
                 if (r->ee && !strncmp(buffer, "allow_execute ", 14))  
                         cond = ccs_get_execute_condition(r->ee);  
                 else if ((current->ccs_flags & CCS_TASK_IS_EXECUTE_HANDLER)) {  
                         char str[] = "if task.type=execute_handler";  
                         cond = ccs_get_condition(str);  
                 } else  
                         cond = NULL;  
                 ccs_write_domain_policy2(buffer, r->domain, cond, false);  
                 ccs_put_condition(cond);  
                 kfree(buffer);  
                 /* fall through */  
         case 2:  
2152                  return 0;                  return 0;
2153          }          if (r->mode)
2154          if (!atomic_read(&ccs_query_observers)) {                  ccs_update_stat(r->mode);
2155            switch (r->mode) {
2156                  int i;                  int i;
2157                  if (current->ccs_flags & CCS_DONT_SLEEP_ON_ENFORCE_ERROR)                  struct ccs_profile *p;
2158                          return -EPERM;          case CCS_CONFIG_ENFORCING:
2159                  for (i = 0; i < ccs_flags(r->domain, CCS_SLEEP_PERIOD);                  error = -EPERM;
2160                       i++) {                  if (atomic_read(&ccs_query_observers))
2161                            break;
2162                    if (r->dont_sleep_on_enforce_error)
2163                            goto out;
2164                    p = ccs_profile(r->profile);
2165                    /* Check enforcing_penalty parameter. */
2166                    for (i = 0; i < p->pref[CCS_PREF_ENFORCING_PENALTY]; i++) {
2167                          set_current_state(TASK_INTERRUPTIBLE);                          set_current_state(TASK_INTERRUPTIBLE);
2168                          schedule_timeout(HZ / 10);                          schedule_timeout(HZ / 10);
2169                  }                  }
2170                  return -EPERM;                  goto out;
2171            case CCS_CONFIG_LEARNING:
2172                    error = 0;
2173                    /* Check mac_learning_entry parameter. */
2174                    if (ccs_domain_quota_ok(r))
2175                            break;
2176                    /* fall through */
2177            default:
2178                    return 0;
2179          }          }
2180            /* Get message. */
2181          va_start(args, fmt);          va_start(args, fmt);
2182          len = vsnprintf((char *) &pos, sizeof(pos) - 1, fmt, args) + 32;          entry.query = ccs_init_log(r, len, fmt, args);
2183          va_end(args);          va_end(args);
2184          header = ccs_init_audit_log(&len, r);          if (!entry.query)
         if (!header)  
                 goto out;  
         ccs_query_entry = kzalloc(sizeof(*ccs_query_entry), GFP_KERNEL);  
         if (!ccs_query_entry)  
2185                  goto out;                  goto out;
2186          len = ccs_round2(len);          entry.query_len = strlen(entry.query) + 1;