r24780: More work allowing libutil to be used by external users.
[kai/samba.git] / source4 / libcli / smb2 / create.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    SMB2 client tree handling
5
6    Copyright (C) Andrew Tridgell 2005
7    
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 3 of the License, or
11    (at your option) any later version.
12    
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
20 */
21
22 #include "includes.h"
23 #include "libcli/raw/libcliraw.h"
24 #include "libcli/smb2/smb2.h"
25 #include "libcli/smb2/smb2_calls.h"
26
27 #define CREATE_TAG_EXTA 0x41747845 /* "ExtA" */
28 #define CREATE_TAG_MXAC 0x6341784D /* "MxAc" */
29
30 /*
31   add a blob to a smb2_create attribute blob
32 */
33 NTSTATUS smb2_create_blob_add(TALLOC_CTX *mem_ctx, DATA_BLOB *blob, 
34                               uint32_t tag,
35                               DATA_BLOB add, BOOL last)
36 {
37         uint32_t ofs = blob->length;
38         uint8_t pad = smb2_padding_size(add.length, 8);
39         if (!data_blob_realloc(mem_ctx, blob, blob->length + 0x18 + add.length + pad))
40                 return NT_STATUS_NO_MEMORY;
41         
42         if (last) {
43                 SIVAL(blob->data, ofs+0x00, 0);
44         } else {
45                 SIVAL(blob->data, ofs+0x00, 0x18 + add.length + pad);
46         }
47         SSVAL(blob->data, ofs+0x04, 0x10); /* offset of tag */
48         SIVAL(blob->data, ofs+0x06, 0x04); /* tag length */
49         SSVAL(blob->data, ofs+0x0A, 0x18); /* offset of data */
50         SIVAL(blob->data, ofs+0x0C, add.length);
51         SIVAL(blob->data, ofs+0x10, tag);
52         SIVAL(blob->data, ofs+0x14, 0); /* pad? */
53         memcpy(blob->data+ofs+0x18, add.data, add.length);
54         memset(blob->data+ofs+0x18+add.length, 0, pad);
55
56         return NT_STATUS_OK;
57 }
58
59 /*
60   send a create request
61 */
62 struct smb2_request *smb2_create_send(struct smb2_tree *tree, struct smb2_create *io)
63 {
64         struct smb2_request *req;
65         NTSTATUS status;
66         DATA_BLOB blob = data_blob(NULL, 0);
67
68         req = smb2_request_init_tree(tree, SMB2_OP_CREATE, 0x38, True, 0);
69         if (req == NULL) return NULL;
70
71         SSVAL(req->out.body, 0x02, io->in.oplock_flags);
72         SIVAL(req->out.body, 0x04, io->in.impersonation);
73         SIVAL(req->out.body, 0x08, io->in.unknown3[0]);
74         SIVAL(req->out.body, 0x0C, io->in.unknown3[1]);
75         SIVAL(req->out.body, 0x10, io->in.unknown3[2]);
76         SIVAL(req->out.body, 0x14, io->in.unknown3[3]);
77         SIVAL(req->out.body, 0x18, io->in.access_mask);
78         SIVAL(req->out.body, 0x1C, io->in.file_attr);
79         SIVAL(req->out.body, 0x20, io->in.share_access);
80         SIVAL(req->out.body, 0x24, io->in.open_disposition);
81         SIVAL(req->out.body, 0x28, io->in.create_options);
82
83         status = smb2_push_o16s16_string(&req->out, 0x2C, io->in.fname);
84         if (!NT_STATUS_IS_OK(status)) {
85                 talloc_free(req);
86                 return NULL;
87         }
88
89         if (io->in.eas.num_eas != 0) {
90                 DATA_BLOB b = data_blob_talloc(req, NULL, 
91                                                ea_list_size_chained(io->in.eas.num_eas, io->in.eas.eas));
92                 ea_put_list_chained(b.data, io->in.eas.num_eas, io->in.eas.eas);
93                 status = smb2_create_blob_add(req, &blob, CREATE_TAG_EXTA, b, False);
94                 if (!NT_STATUS_IS_OK(status)) {
95                         talloc_free(req);
96                         return NULL;
97                 }
98                 data_blob_free(&b);
99         }
100
101         /* an empty MxAc tag seems to be used to ask the server to
102            return the maximum access mask allowed on the file */
103         status = smb2_create_blob_add(req, &blob, CREATE_TAG_MXAC, data_blob(NULL, 0), True);
104
105         if (!NT_STATUS_IS_OK(status)) {
106                 talloc_free(req);
107                 return NULL;
108         }
109         status = smb2_push_o32s32_blob(&req->out, 0x30, blob);
110         if (!NT_STATUS_IS_OK(status)) {
111                 talloc_free(req);
112                 return NULL;
113         }
114
115         smb2_transport_send(req);
116
117         return req;
118 }
119
120
121 /*
122   recv a create reply
123 */
124 NTSTATUS smb2_create_recv(struct smb2_request *req, TALLOC_CTX *mem_ctx, struct smb2_create *io)
125 {
126         NTSTATUS status;
127
128         if (!smb2_request_receive(req) || 
129             !smb2_request_is_ok(req)) {
130                 return smb2_request_destroy(req);
131         }
132
133         SMB2_CHECK_PACKET_RECV(req, 0x58, True);
134
135         io->out.oplock_flags   = SVAL(req->in.body, 0x02);
136         io->out.create_action  = IVAL(req->in.body, 0x04);
137         io->out.create_time    = smbcli_pull_nttime(req->in.body, 0x08);
138         io->out.access_time    = smbcli_pull_nttime(req->in.body, 0x10);
139         io->out.write_time     = smbcli_pull_nttime(req->in.body, 0x18);
140         io->out.change_time    = smbcli_pull_nttime(req->in.body, 0x20);
141         io->out.alloc_size     = BVAL(req->in.body, 0x28);
142         io->out.size           = BVAL(req->in.body, 0x30);
143         io->out.file_attr      = IVAL(req->in.body, 0x38);
144         io->out._pad           = IVAL(req->in.body, 0x3C);
145         smb2_pull_handle(req->in.body+0x40, &io->out.file.handle);
146         status = smb2_pull_o32s32_blob(&req->in, mem_ctx, req->in.body+0x50, &io->out.blob);
147         if (!NT_STATUS_IS_OK(status)) {
148                 smb2_request_destroy(req);
149                 return status;
150         }
151
152         return smb2_request_destroy(req);
153 }
154
155 /*
156   sync create request
157 */
158 NTSTATUS smb2_create(struct smb2_tree *tree, TALLOC_CTX *mem_ctx, struct smb2_create *io)
159 {
160         struct smb2_request *req = smb2_create_send(tree, io);
161         return smb2_create_recv(req, mem_ctx, io);
162 }