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

Subversion リポジトリの参照

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

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

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