file_access: add a function header comment for can_access_file_acl().
[ira/wip.git] / source3 / smbd / file_access.c
1 /*
2    Unix SMB/CIFS implementation.
3    Check access to files based on security descriptors.
4    Copyright (C) Jeremy Allison 2005-2006.
5    Copyright (C) Michael Adam 2007.
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program.  If not, see <http://www.gnu.org/licenses/>.
19 */
20
21 #include "includes.h"
22
23 #undef  DBGC_CLASS
24 #define DBGC_CLASS DBGC_ACLS
25
26 /**
27  * Security descriptor / NT Token level access check function.
28  */
29 bool can_access_file_acl(struct connection_struct *conn,
30                                 const char * fname,
31                                 uint32_t access_mask)
32 {
33         bool result;
34         NTSTATUS status;
35         uint32_t access_granted;
36         struct security_descriptor *secdesc = NULL;
37
38         status = SMB_VFS_GET_NT_ACL(conn, fname,
39                                     (OWNER_SECURITY_INFORMATION |
40                                      GROUP_SECURITY_INFORMATION |
41                                      DACL_SECURITY_INFORMATION),
42                                     &secdesc);
43         if (!NT_STATUS_IS_OK(status)) {
44                 DEBUG(5, ("Could not get acl: %s\n", nt_errstr(status)));
45                 return false;
46         }
47
48         result = se_access_check(secdesc, conn->server_info->ptok,
49                                  access_mask, &access_granted, &status);
50         TALLOC_FREE(secdesc);
51         return result;
52 }
53
54 /****************************************************************************
55  Actually emulate the in-kernel access checking for delete access. We need
56  this to successfully return ACCESS_DENIED on a file open for delete access.
57 ****************************************************************************/
58
59 bool can_delete_file_in_directory(connection_struct *conn, const char *fname)
60 {
61         SMB_STRUCT_STAT sbuf;
62         TALLOC_CTX *ctx = talloc_tos();
63         char *dname = NULL;
64
65         if (!CAN_WRITE(conn)) {
66                 return False;
67         }
68
69         /* Get the parent directory permission mask and owners. */
70         if (!parent_dirname_talloc(ctx,
71                                 fname,
72                                 &dname,
73                                 NULL)) {
74                 return False;
75         }
76         if(SMB_VFS_STAT(conn, dname, &sbuf) != 0) {
77                 return False;
78         }
79
80         /* fast paths first */
81
82         if (!S_ISDIR(sbuf.st_mode)) {
83                 return False;
84         }
85         if (conn->server_info->uid == 0 || conn->admin_user) {
86                 /* I'm sorry sir, I didn't know you were root... */
87                 return True;
88         }
89
90         /* Check primary owner write access. */
91         if (conn->server_info->uid == sbuf.st_uid) {
92                 return (sbuf.st_mode & S_IWUSR) ? True : False;
93         }
94
95 #ifdef S_ISVTX
96         /* sticky bit means delete only by owner or root. */
97         if (sbuf.st_mode & S_ISVTX) {
98                 SMB_STRUCT_STAT sbuf_file;
99                 if(SMB_VFS_STAT(conn, fname, &sbuf_file) != 0) {
100                         if (errno == ENOENT) {
101                                 /* If the file doesn't already exist then
102                                  * yes we'll be able to delete it. */
103                                 return True;
104                         }
105                         return False;
106                 }
107                 /*
108                  * Patch from SATOH Fumiyasu <fumiyas@miraclelinux.com>
109                  * for bug #3348. Don't assume owning sticky bit
110                  * directory means write access allowed.
111                  */
112                 if (conn->server_info->uid != sbuf_file.st_uid) {
113                         return False;
114                 }
115         }
116 #endif
117
118         /* now for ACL checks */
119
120         return can_access_file_acl(conn, dname, FILE_WRITE_DATA);
121 }
122
123 /****************************************************************************
124  Actually emulate the in-kernel access checking for read/write access. We need
125  this to successfully check for ability to write for dos filetimes.
126  Note this doesn't take into account share write permissions.
127 ****************************************************************************/
128
129 bool can_access_file_data(connection_struct *conn, const char *fname, SMB_STRUCT_STAT *psbuf, uint32 access_mask)
130 {
131         if (!(access_mask & (FILE_READ_DATA|FILE_WRITE_DATA))) {
132                 return False;
133         }
134         access_mask &= (FILE_READ_DATA|FILE_WRITE_DATA);
135
136         /* some fast paths first */
137
138         DEBUG(10,("can_access_file_data: requesting 0x%x on file %s\n",
139                 (unsigned int)access_mask, fname ));
140
141         if (conn->server_info->uid == 0 || conn->admin_user) {
142                 /* I'm sorry sir, I didn't know you were root... */
143                 return True;
144         }
145
146         if (!VALID_STAT(*psbuf)) {
147                 /* Get the file permission mask and owners. */
148                 if(SMB_VFS_STAT(conn, fname, psbuf) != 0) {
149                         return False;
150                 }
151         }
152
153         /* Check primary owner access. */
154         if (conn->server_info->uid == psbuf->st_uid) {
155                 switch (access_mask) {
156                         case FILE_READ_DATA:
157                                 return (psbuf->st_mode & S_IRUSR) ? True : False;
158
159                         case FILE_WRITE_DATA:
160                                 return (psbuf->st_mode & S_IWUSR) ? True : False;
161
162                         default: /* FILE_READ_DATA|FILE_WRITE_DATA */
163
164                                 if ((psbuf->st_mode & (S_IWUSR|S_IRUSR)) == (S_IWUSR|S_IRUSR)) {
165                                         return True;
166                                 } else {
167                                         return False;
168                                 }
169                 }
170         }
171
172         /* now for ACL checks */
173
174         return can_access_file_acl(conn, fname, access_mask);
175 }
176
177 /****************************************************************************
178  Userspace check for write access.
179  Note this doesn't take into account share write permissions.
180 ****************************************************************************/
181
182 bool can_write_to_file(connection_struct *conn, const char *fname, SMB_STRUCT_STAT *psbuf)
183 {
184         return can_access_file_data(conn, fname, psbuf, FILE_WRITE_DATA);
185 }
186
187 /****************************************************************************
188  Check for an existing default Windows ACL on a directory.
189 ****************************************************************************/
190
191 bool directory_has_default_acl(connection_struct *conn, const char *fname)
192 {
193         /* returns talloced off tos. */
194         struct security_descriptor *secdesc = NULL;
195         unsigned int i;
196         NTSTATUS status = SMB_VFS_GET_NT_ACL(conn, fname,
197                                 DACL_SECURITY_INFORMATION, &secdesc);
198
199         if (!NT_STATUS_IS_OK(status) || secdesc == NULL) {
200                 return false;
201         }
202
203         for (i = 0; i < secdesc->dacl->num_aces; i++) {
204                 struct security_ace *psa = &secdesc->dacl->aces[i];
205                 if (psa->flags & (SEC_ACE_FLAG_OBJECT_INHERIT|
206                                 SEC_ACE_FLAG_CONTAINER_INHERIT)) {
207                         TALLOC_FREE(secdesc);
208                         return true;
209                 }
210         }
211         TALLOC_FREE(secdesc);
212         return false;
213 }