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

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