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