s3-build: only include "fake_file.h" where needed.
[metze/samba/wip.git] / source3 / utils / smbcquotas.c
1 /* 
2    Unix SMB/CIFS implementation.
3    QUOTA get/set utility
4    
5    Copyright (C) Andrew Tridgell                2000
6    Copyright (C) Tim Potter                     2000
7    Copyright (C) Jeremy Allison                 2000
8    Copyright (C) Stefan (metze) Metzmacher      2003
9    
10    This program is free software; you can redistribute it and/or modify
11    it under the terms of the GNU General Public License as published by
12    the Free Software Foundation; either version 3 of the License, or
13    (at your option) any later version.
14    
15    This program is distributed in the hope that it will be useful,
16    but WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18    GNU General Public License for more details.
19    
20    You should have received a copy of the GNU General Public License
21    along with this program.  If not, see <http://www.gnu.org/licenses/>.
22 */
23
24 #include "includes.h"
25 #include "popt_common.h"
26 #include "../librpc/gen_ndr/ndr_lsa.h"
27 #include "rpc_client/cli_lsarpc.h"
28 #include "fake_file.h"
29
30 static char *server;
31
32 /* numeric is set when the user wants numeric SIDs and ACEs rather
33    than going via LSA calls to resolve them */
34 static bool numeric;
35 static bool verbose;
36
37 enum todo_values {NOOP_QUOTA=0,FS_QUOTA,USER_QUOTA,LIST_QUOTA,SET_QUOTA};
38 enum exit_values {EXIT_OK, EXIT_FAILED, EXIT_PARSE_ERROR};
39
40 static struct cli_state *cli_ipc;
41 static struct rpc_pipe_client *global_pipe_hnd;
42 static struct policy_handle pol;
43 static bool got_policy_hnd;
44 static struct user_auth_info *smbcquotas_auth_info;
45
46 static struct cli_state *connect_one(const char *share);
47
48 /* Open cli connection and policy handle */
49
50 static bool cli_open_policy_hnd(void)
51 {
52         /* Initialise cli LSA connection */
53
54         if (!cli_ipc) {
55                 NTSTATUS ret;
56                 cli_ipc = connect_one("IPC$");
57                 ret = cli_rpc_pipe_open_noauth(cli_ipc,
58                                                &ndr_table_lsarpc.syntax_id,
59                                                &global_pipe_hnd);
60                 if (!NT_STATUS_IS_OK(ret)) {
61                                 return False;
62                 }
63         }
64
65         /* Open policy handle */
66
67         if (!got_policy_hnd) {
68
69                 /* Some systems don't support SEC_FLAG_MAXIMUM_ALLOWED,
70                    but NT sends 0x2000000 so we might as well do it too. */
71
72                 if (!NT_STATUS_IS_OK(rpccli_lsa_open_policy(global_pipe_hnd, talloc_tos(), True, 
73                                                          GENERIC_EXECUTE_ACCESS, &pol))) {
74                         return False;
75                 }
76
77                 got_policy_hnd = True;
78         }
79         
80         return True;
81 }
82
83 /* convert a SID to a string, either numeric or username/group */
84 static void SidToString(fstring str, struct dom_sid *sid, bool _numeric)
85 {
86         char **domains = NULL;
87         char **names = NULL;
88         enum lsa_SidType *types = NULL;
89
90         sid_to_fstring(str, sid);
91
92         if (_numeric) return;
93
94         /* Ask LSA to convert the sid to a name */
95
96         if (!cli_open_policy_hnd() ||
97             !NT_STATUS_IS_OK(rpccli_lsa_lookup_sids(global_pipe_hnd, talloc_tos(),
98                                                  &pol, 1, sid, &domains, 
99                                                  &names, &types)) ||
100             !domains || !domains[0] || !names || !names[0]) {
101                 return;
102         }
103
104         /* Converted OK */
105
106         slprintf(str, sizeof(fstring) - 1, "%s%s%s",
107                  domains[0], lp_winbind_separator(),
108                  names[0]);
109         
110 }
111
112 /* convert a string to a SID, either numeric or username/group */
113 static bool StringToSid(struct dom_sid *sid, const char *str)
114 {
115         enum lsa_SidType *types = NULL;
116         struct dom_sid *sids = NULL;
117         bool result = True;
118
119         if (strncmp(str, "S-", 2) == 0) {
120                 return string_to_sid(sid, str);
121         }
122
123         if (!cli_open_policy_hnd() ||
124             !NT_STATUS_IS_OK(rpccli_lsa_lookup_names(global_pipe_hnd, talloc_tos(),
125                                                   &pol, 1, &str, NULL, 1, &sids, 
126                                                   &types))) {
127                 result = False;
128                 goto done;
129         }
130
131         sid_copy(sid, &sids[0]);
132  done:
133
134         return result;
135 }
136
137 #define QUOTA_GET 1
138 #define QUOTA_SETLIM 2
139 #define QUOTA_SETFLAGS 3
140 #define QUOTA_LIST 4
141
142 enum {PARSE_FLAGS,PARSE_LIM};
143
144 static int parse_quota_set(TALLOC_CTX *ctx,
145                         char *set_str,
146                         char **pp_username_str,
147                         enum SMB_QUOTA_TYPE *qtype,
148                         int *cmd,
149                         SMB_NTQUOTA_STRUCT *pqt)
150 {
151         char *p = set_str,*p2;
152         int todo;
153         bool stop = False;
154         bool enable = False;
155         bool deny = False;
156
157         *pp_username_str = NULL;
158         if (strnequal(set_str,"UQLIM:",6)) {
159                 p += 6;
160                 *qtype = SMB_USER_QUOTA_TYPE;
161                 *cmd = QUOTA_SETLIM;
162                 todo = PARSE_LIM;
163                 if ((p2=strstr(p,":"))==NULL) {
164                         return -1;
165                 }
166
167                 *p2 = '\0';
168                 p2++;
169
170                 *pp_username_str = talloc_strdup(ctx, p);
171                 p = p2;
172         } else if (strnequal(set_str,"FSQLIM:",7)) {
173                 p +=7;
174                 *qtype = SMB_USER_FS_QUOTA_TYPE;
175                 *cmd = QUOTA_SETLIM;
176                 todo = PARSE_LIM;
177         } else if (strnequal(set_str,"FSQFLAGS:",9)) {
178                 p +=9;
179                 todo = PARSE_FLAGS;
180                 *qtype = SMB_USER_FS_QUOTA_TYPE;
181                 *cmd = QUOTA_SETFLAGS;
182         } else {
183                 return -1;
184         }
185
186         switch (todo) {
187                 case PARSE_LIM:
188                         if (sscanf(p,"%"PRIu64"/%"PRIu64,&pqt->softlim,&pqt->hardlim)!=2) {
189                                 return -1;
190                         }
191
192                         break;
193                 case PARSE_FLAGS:
194                         while (!stop) {
195
196                                 if ((p2=strstr(p,"/"))==NULL) {
197                                         stop = True;
198                                 } else {
199                                         *p2 = '\0';
200                                         p2++;
201                                 }
202
203                                 if (strnequal(p,"QUOTA_ENABLED",13)) {
204                                         enable = True;
205                                 } else if (strnequal(p,"DENY_DISK",9)) {
206                                         deny = True;
207                                 } else if (strnequal(p,"LOG_SOFTLIMIT",13)) {
208                                         pqt->qflags |= QUOTAS_LOG_THRESHOLD;
209                                 } else if (strnequal(p,"LOG_HARDLIMIT",13)) {
210                                         pqt->qflags |= QUOTAS_LOG_LIMIT;
211                                 } else {
212                                         return -1;
213                                 }
214
215                                 p=p2;
216                         }
217
218                         if (deny) {
219                                 pqt->qflags |= QUOTAS_DENY_DISK;
220                         } else if (enable) {
221                                 pqt->qflags |= QUOTAS_ENABLED;
222                         }
223
224                         break;
225         }
226
227         return 0;
228 }
229
230 static int do_quota(struct cli_state *cli,
231                 enum SMB_QUOTA_TYPE qtype,
232                 uint16 cmd,
233                 const char *username_str,
234                 SMB_NTQUOTA_STRUCT *pqt)
235 {
236         uint32 fs_attrs = 0;
237         uint16_t quota_fnum = 0;
238         SMB_NTQUOTA_LIST *qtl = NULL;
239         SMB_NTQUOTA_STRUCT qt;
240         ZERO_STRUCT(qt);
241
242         if (!NT_STATUS_IS_OK(cli_get_fs_attr_info(cli, &fs_attrs))) {
243                 d_printf("Failed to get the filesystem attributes %s.\n",
244                         cli_errstr(cli));
245                 return -1;
246         }
247
248         if (!(fs_attrs & FILE_VOLUME_QUOTAS)) {
249                 d_printf("Quotas are not supported by the server.\n");
250                 return 0;
251         }
252
253         if (!NT_STATUS_IS_OK(cli_get_quota_handle(cli, &quota_fnum))) {
254                 d_printf("Quotas are not enabled on this share.\n");
255                 d_printf("Failed to open %s  %s.\n",
256                         FAKE_FILE_NAME_QUOTA_WIN32,cli_errstr(cli));
257                 return -1;
258         }
259
260         switch(qtype) {
261                 case SMB_USER_QUOTA_TYPE:
262                         if (!StringToSid(&qt.sid, username_str)) {
263                                 d_printf("StringToSid() failed for [%s]\n",username_str);
264                                 return -1;
265                         }
266
267                         switch(cmd) {
268                                 case QUOTA_GET:
269                                         if (!cli_get_user_quota(cli, quota_fnum, &qt)) {
270                                                 d_printf("%s cli_get_user_quota %s\n",
271                                                          cli_errstr(cli),username_str);
272                                                 return -1;
273                                         }
274                                         dump_ntquota(&qt,verbose,numeric,SidToString);
275                                         break;
276                                 case QUOTA_SETLIM:
277                                         pqt->sid = qt.sid;
278                                         if (!cli_set_user_quota(cli, quota_fnum, pqt)) {
279                                                 d_printf("%s cli_set_user_quota %s\n",
280                                                          cli_errstr(cli),username_str);
281                                                 return -1;
282                                         }
283                                         if (!cli_get_user_quota(cli, quota_fnum, &qt)) {
284                                                 d_printf("%s cli_get_user_quota %s\n",
285                                                          cli_errstr(cli),username_str);
286                                                 return -1;
287                                         }
288                                         dump_ntquota(&qt,verbose,numeric,SidToString);
289                                         break;
290                                 case QUOTA_LIST:
291                                         if (!cli_list_user_quota(cli, quota_fnum, &qtl)) {
292                                                 d_printf("%s cli_set_user_quota %s\n",
293                                                          cli_errstr(cli),username_str);
294                                                 return -1;
295                                         }
296                                         dump_ntquota_list(&qtl,verbose,numeric,SidToString);
297                                         free_ntquota_list(&qtl);
298                                         break;
299                                 default:
300                                         d_printf("Unknown Error\n");
301                                         return -1;
302                         }
303                         break;
304                 case SMB_USER_FS_QUOTA_TYPE:
305                         switch(cmd) {
306                                 case QUOTA_GET:
307                                         if (!cli_get_fs_quota_info(cli, quota_fnum, &qt)) {
308                                                 d_printf("%s cli_get_fs_quota_info\n",
309                                                          cli_errstr(cli));
310                                                 return -1;
311                                         }
312                                         dump_ntquota(&qt,True,numeric,NULL);
313                                         break;
314                                 case QUOTA_SETLIM:
315                                         if (!cli_get_fs_quota_info(cli, quota_fnum, &qt)) {
316                                                 d_printf("%s cli_get_fs_quota_info\n",
317                                                          cli_errstr(cli));
318                                                 return -1;
319                                         }
320                                         qt.softlim = pqt->softlim;
321                                         qt.hardlim = pqt->hardlim;
322                                         if (!cli_set_fs_quota_info(cli, quota_fnum, &qt)) {
323                                                 d_printf("%s cli_set_fs_quota_info\n",
324                                                          cli_errstr(cli));
325                                                 return -1;
326                                         }
327                                         if (!cli_get_fs_quota_info(cli, quota_fnum, &qt)) {
328                                                 d_printf("%s cli_get_fs_quota_info\n",
329                                                          cli_errstr(cli));
330                                                 return -1;
331                                         }
332                                         dump_ntquota(&qt,True,numeric,NULL);
333                                         break;
334                                 case QUOTA_SETFLAGS:
335                                         if (!cli_get_fs_quota_info(cli, quota_fnum, &qt)) {
336                                                 d_printf("%s cli_get_fs_quota_info\n",
337                                                          cli_errstr(cli));
338                                                 return -1;
339                                         }
340                                         qt.qflags = pqt->qflags;
341                                         if (!cli_set_fs_quota_info(cli, quota_fnum, &qt)) {
342                                                 d_printf("%s cli_set_fs_quota_info\n",
343                                                          cli_errstr(cli));
344                                                 return -1;
345                                         }
346                                         if (!cli_get_fs_quota_info(cli, quota_fnum, &qt)) {
347                                                 d_printf("%s cli_get_fs_quota_info\n",
348                                                          cli_errstr(cli));
349                                                 return -1;
350                                         }
351                                         dump_ntquota(&qt,True,numeric,NULL);
352                                         break;
353                                 default:
354                                         d_printf("Unknown Error\n");
355                                         return -1;
356                         }
357                         break;
358                 default:
359                         d_printf("Unknown Error\n");
360                         return -1;
361         }
362
363         cli_close(cli, quota_fnum);
364
365         return 0;
366 }
367
368 /*****************************************************
369  Return a connection to a server.
370 *******************************************************/
371
372 static struct cli_state *connect_one(const char *share)
373 {
374         struct cli_state *c;
375         struct sockaddr_storage ss;
376         NTSTATUS nt_status;
377         uint32_t flags = 0;
378
379         zero_sockaddr(&ss);
380
381         if (get_cmdline_auth_info_use_machine_account(smbcquotas_auth_info) &&
382             !set_cmdline_auth_info_machine_account_creds(smbcquotas_auth_info)) {
383                 return NULL;
384         }
385
386         if (get_cmdline_auth_info_use_kerberos(smbcquotas_auth_info)) {
387                 flags |= CLI_FULL_CONNECTION_USE_KERBEROS |
388                          CLI_FULL_CONNECTION_FALLBACK_AFTER_KERBEROS;
389
390         }
391
392         set_cmdline_auth_info_getpass(smbcquotas_auth_info);
393
394         nt_status = cli_full_connection(&c, global_myname(), server, 
395                                             &ss, 0,
396                                             share, "?????",
397                                             get_cmdline_auth_info_username(smbcquotas_auth_info),
398                                             lp_workgroup(),
399                                             get_cmdline_auth_info_password(smbcquotas_auth_info),
400                                             flags,
401                                             get_cmdline_auth_info_signing_state(smbcquotas_auth_info),
402                                             NULL);
403         if (!NT_STATUS_IS_OK(nt_status)) {
404                 DEBUG(0,("cli_full_connection failed! (%s)\n", nt_errstr(nt_status)));
405                 return NULL;
406         }
407
408         if (get_cmdline_auth_info_smb_encrypt(smbcquotas_auth_info)) {
409                 nt_status = cli_cm_force_encryption(c,
410                                         get_cmdline_auth_info_username(smbcquotas_auth_info),
411                                         get_cmdline_auth_info_password(smbcquotas_auth_info),
412                                         lp_workgroup(),
413                                         share);
414                 if (!NT_STATUS_IS_OK(nt_status)) {
415                         cli_shutdown(c);
416                         return NULL;
417                 }
418         }
419
420         return c;
421 }
422
423 /****************************************************************************
424   main program
425 ****************************************************************************/
426  int main(int argc, const char *argv[])
427 {
428         char *share;
429         int opt;
430         int result;
431         int todo = 0;
432         char *username_str = NULL;
433         char *path = NULL;
434         char *set_str = NULL;
435         enum SMB_QUOTA_TYPE qtype = SMB_INVALID_QUOTA_TYPE;
436         int cmd = 0;
437         static bool test_args = False;
438         struct cli_state *cli;
439         bool fix_user = False;
440         SMB_NTQUOTA_STRUCT qt;
441         TALLOC_CTX *frame = talloc_stackframe();
442         poptContext pc;
443         struct poptOption long_options[] = {
444                 POPT_AUTOHELP
445                 { "user", 'u', POPT_ARG_STRING, NULL, 'u', "Show quotas for user", "user" },
446                 { "list", 'L', POPT_ARG_NONE, NULL, 'L', "List user quotas" },
447                 { "fs", 'F', POPT_ARG_NONE, NULL, 'F', "Show filesystem quotas" },
448                 { "set", 'S', POPT_ARG_STRING, NULL, 'S', "Set acls\n\
449 SETSTRING:\n\
450 UQLIM:<username>/<softlimit>/<hardlimit> for user quotas\n\
451 FSQLIM:<softlimit>/<hardlimit> for filesystem defaults\n\
452 FSQFLAGS:QUOTA_ENABLED/DENY_DISK/LOG_SOFTLIMIT/LOG_HARD_LIMIT", "SETSTRING" },
453                 { "numeric", 'n', POPT_ARG_NONE, NULL, 'n', "Don't resolve sids or limits to names" },
454                 { "verbose", 'v', POPT_ARG_NONE, NULL, 'v', "be verbose" },
455                 { "test-args", 't', POPT_ARG_NONE, NULL, 'r', "Test arguments"},
456                 POPT_COMMON_SAMBA
457                 POPT_COMMON_CREDENTIALS
458                 { NULL }
459         };
460
461         load_case_tables();
462
463         ZERO_STRUCT(qt);
464
465         /* set default debug level to 1 regardless of what smb.conf sets */
466         setup_logging( "smbcquotas", True );
467         DEBUGLEVEL_CLASS[DBGC_ALL] = 1;
468         dbf = x_stderr;
469         x_setbuf( x_stderr, NULL );
470
471         setlinebuf(stdout);
472
473         fault_setup(NULL);
474
475         lp_load(get_dyn_CONFIGFILE(),True,False,False,True);
476         load_interfaces();
477
478         smbcquotas_auth_info = user_auth_info_init(frame);
479         if (smbcquotas_auth_info == NULL) {
480                 exit(1);
481         }
482         popt_common_set_auth_info(smbcquotas_auth_info);
483
484         pc = poptGetContext("smbcquotas", argc, argv, long_options, 0);
485
486         poptSetOtherOptionHelp(pc, "//server1/share1");
487
488         while ((opt = poptGetNextOpt(pc)) != -1) {
489                 switch (opt) {
490                 case 'n':
491                         numeric = true;
492                         break;
493                 case 'v':
494                         verbose = true;
495                         break;
496                 case 't':
497                         test_args = true;
498                         break;
499                 case 'L':
500                         if (todo != 0) {
501                                 d_printf("Please specify only one option of <-L|-F|-S|-u>\n");
502                                 exit(EXIT_PARSE_ERROR);
503                         }
504                         todo = LIST_QUOTA;
505                         break;
506
507                 case 'F':
508                         if (todo != 0) {
509                                 d_printf("Please specify only one option of <-L|-F|-S|-u>\n");
510                                 exit(EXIT_PARSE_ERROR);
511                         }
512                         todo = FS_QUOTA;
513                         break;
514
515                 case 'u':
516                         if (todo != 0) {
517                                 d_printf("Please specify only one option of <-L|-F|-S|-u>\n");
518                                 exit(EXIT_PARSE_ERROR);
519                         }
520                         username_str = talloc_strdup(frame, poptGetOptArg(pc));
521                         if (!username_str) {
522                                 exit(EXIT_PARSE_ERROR);
523                         }
524                         todo = USER_QUOTA;
525                         fix_user = True;
526                         break;
527
528                 case 'S':
529                         if (todo != 0) {
530                                 d_printf("Please specify only one option of <-L|-F|-S|-u>\n");
531                                 exit(EXIT_PARSE_ERROR);
532                         }
533                         set_str = talloc_strdup(frame, poptGetOptArg(pc));
534                         if (!set_str) {
535                                 exit(EXIT_PARSE_ERROR);
536                         }
537                         todo = SET_QUOTA;
538                         break;
539                 }
540         }
541
542         if (todo == 0)
543                 todo = USER_QUOTA;
544
545         if (!fix_user) {
546                 username_str = talloc_strdup(
547                         frame, get_cmdline_auth_info_username(smbcquotas_auth_info));
548                 if (!username_str) {
549                         exit(EXIT_PARSE_ERROR);
550                 }
551         }
552
553         /* Make connection to server */
554         if(!poptPeekArg(pc)) {
555                 poptPrintUsage(pc, stderr, 0);
556                 exit(EXIT_PARSE_ERROR);
557         }
558
559         path = talloc_strdup(frame, poptGetArg(pc));
560         if (!path) {
561                 printf("Out of memory\n");
562                 exit(EXIT_PARSE_ERROR);
563         }
564
565         string_replace(path, '/', '\\');
566
567         server = SMB_STRDUP(path+2);
568         if (!server) {
569                 printf("Out of memory\n");
570                 exit(EXIT_PARSE_ERROR);
571         }
572         share = strchr_m(server,'\\');
573         if (!share) {
574                 printf("Invalid argument: %s\n", share);
575                 exit(EXIT_PARSE_ERROR);
576         }
577
578         *share = 0;
579         share++;
580
581         if (todo == SET_QUOTA) {
582                 if (parse_quota_set(talloc_tos(), set_str, &username_str, &qtype, &cmd, &qt)) {
583                         printf("Invalid argument: -S %s\n", set_str);
584                         exit(EXIT_PARSE_ERROR);
585                 }
586         }
587
588         if (!test_args) {
589                 cli = connect_one(share);
590                 if (!cli) {
591                         exit(EXIT_FAILED);
592                 }
593         } else {
594                 exit(EXIT_OK);
595         }
596
597
598         /* Perform requested action */
599
600         switch (todo) {
601                 case FS_QUOTA:
602                         result = do_quota(cli,SMB_USER_FS_QUOTA_TYPE, QUOTA_GET, username_str, NULL);
603                         break;
604                 case LIST_QUOTA:
605                         result = do_quota(cli,SMB_USER_QUOTA_TYPE, QUOTA_LIST, username_str, NULL);
606                         break;
607                 case USER_QUOTA:
608                         result = do_quota(cli,SMB_USER_QUOTA_TYPE, QUOTA_GET, username_str, NULL);
609                         break;
610                 case SET_QUOTA:
611                         result = do_quota(cli, qtype, cmd, username_str, &qt);
612                         break;
613                 default: 
614                         
615                         result = EXIT_FAILED;
616                         break;
617         }
618
619         talloc_free(frame);
620
621         return result;
622 }