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

TOMOYO

Subversion リポジトリの参照

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

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

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

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