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

TOMOYO

Subversion リポジトリの参照

/[tomoyo]/trunk/1.8.x/ccs-patch/security/ccsecurity/policy_io.c

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