got a lot of crypt32 stuff working
[reactos.git] / rosapps / mc / src / achown.c
1 /* Chown-advanced command -- for the Midnight Commander
2 Copyright (C) 1994, 1995 Radek Doulik
3
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
8
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
13
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17 */
18
19 #include <config.h>
20 /* Needed for the extern declarations of integer parameters */
21 #include <sys/types.h>
22 #include <sys/param.h>
23 #include <sys/stat.h>
24 #include <grp.h>
25 #include <pwd.h>
26 #ifdef HAVE_UNISTD_H
27 # include <unistd.h>
28 #endif
29 #include <string.h>
30 #include <stdio.h>
31 #include <stdlib.h> /* For malloc() */
32 #include <errno.h> /* For errno on SunOS systems */
33 #include "mad.h"
34 #include "tty.h"
35 #include "util.h" /* Needed for the externs */
36 #include "win.h"
37 #include "color.h"
38 #include "dlg.h"
39 #include "widget.h"
40 #include "dialog.h" /* For do_refresh() */
41 #include "wtools.h" /* For init_box_colors() */
42 #include "key.h" /* XCTRL and ALT macros */
43
44 #include "dir.h"
45 #include "panel.h" /* Needed for the externs */
46 #include "file.h"
47 #include "chmod.h"
48 #include "main.h"
49 #include "../vfs/vfs.h"
50
51 #define BX 5
52 #define BY 6
53
54 #define TX 50
55 #define TY 2
56
57 #define BUTTONS 9
58
59 #define B_SETALL B_USER
60 #define B_SKIP B_USER + 1
61
62 #define B_OWN B_USER + 3
63 #define B_GRP B_USER + 4
64 #define B_OTH B_USER + 5
65 #define B_OUSER B_USER + 6
66 #define B_OGROUP B_USER + 7
67
68 struct {
69 int ret_cmd, flags, y, x;
70 char *text;
71 } chown_advanced_but [BUTTONS] = {
72 { B_CANCEL, NORMAL_BUTTON, 4, 55, N_("&Cancel") },
73 { B_ENTER, DEFPUSH_BUTTON,4, 45, N_("&Set") },
74 { B_SKIP, NORMAL_BUTTON, 4, 36, N_("S&kip") },
75 { B_SETALL, NORMAL_BUTTON, 4, 24, N_("Set &all")},
76 { B_ENTER, NARROW_BUTTON, 0, 47, " "},
77 { B_ENTER, NARROW_BUTTON, 0, 29, " "},
78 { B_ENTER, NARROW_BUTTON, 0, 19, " "},
79 { B_ENTER, NARROW_BUTTON, 0, 11, " "},
80 { B_ENTER, NARROW_BUTTON, 0, 3, " "},
81 };
82
83 WButton *b_att[3]; /* permission */
84 WButton *b_user, *b_group; /* owner */
85
86 static int files_on_begin; /* Number of files at startup */
87 static int flag_pos;
88 static int x_toggle;
89 static char ch_flags[11];
90 static char *ch_perm = "rwx";
91 static umode_t ch_cmode;
92 struct stat *sf_stat;
93 static int need_update;
94 static int end_chown;
95 static int current_file;
96 static int single_set;
97 static char *fname;
98
99 static void get_ownership ()
100 { /* set buttons - ownership */
101 char *name_t;
102
103 name_t = name_trunc (get_owner (sf_stat->st_uid), 15);
104 memset (b_user->text, ' ', 15);
105 strncpy (b_user->text, name_t, strlen (name_t));
106 name_t = name_trunc (get_group (sf_stat->st_gid), 15);
107 memset (b_group->text, ' ', 15);
108 strncpy (b_group->text, name_t, strlen (name_t));
109 }
110
111
112 static int inc_flag_pos (int f_pos)
113 {
114 if (flag_pos == 10) {
115 flag_pos = 0;
116 return 0;
117 }
118 flag_pos++;
119 if (!(flag_pos % 3) || f_pos > 2)
120 return 0;
121 return 1;
122 }
123
124 static int dec_flag_pos (int f_pos)
125 {
126 if (!flag_pos) {
127 flag_pos = 10;
128 return 0;
129 }
130 flag_pos--;
131 if (!((flag_pos + 1) % 3) || f_pos > 2)
132 return 0;
133 return 1;
134 }
135
136 static void set_perm_by_flags (char *s, int f_p)
137 {
138 int i;
139
140 for (i = 0; i < 3; i++)
141 if (ch_flags[f_p + i] == '+')
142 s[i] = ch_perm[i];
143 else if (ch_flags[f_p + i] == '-')
144 s[i] = '-';
145 else
146 s[i] = (ch_cmode & (1 << (8 - f_p - i))) ? ch_perm[i] : '-';
147 }
148
149 static void set_perm (char *s, int p)
150 {
151 s[0] = (p & 4) ? 'r' : '-';
152 s[1] = (p & 2) ? 'w' : '-';
153 s[2] = (p & 1) ? 'x' : '-';
154 }
155
156 static umode_t get_perm (char *s, int base)
157 {
158 umode_t m;
159
160 m = 0;
161 m |= (s [0] == '-') ? 0 :
162 ((s[0] == '+') ? (1 << (base + 2)) : (1 << (base + 2)) & ch_cmode);
163
164 m |= (s [1] == '-') ? 0 :
165 ((s[1] == '+') ? (1 << (base + 1)) : (1 << (base + 1)) & ch_cmode);
166
167 m |= (s [2] == '-') ? 0 :
168 ((s[2] == '+') ? (1 << base) : (1 << base) & ch_cmode);
169
170 return m;
171 }
172
173 static umode_t get_mode ()
174 {
175 umode_t m;
176
177 m = ch_cmode ^ (ch_cmode & 0777);
178 m |= get_perm (ch_flags, 6);
179 m |= get_perm (ch_flags + 3, 3);
180 m |= get_perm (ch_flags + 6, 0);
181
182 return m;
183 }
184
185 static void print_flags (void)
186 {
187 int i;
188
189 attrset (COLOR_NORMAL);
190
191 for (i = 0; i < 3; i++){
192 dlg_move (ch_dlg, BY+1, 9+i);
193 addch (ch_flags [i]);
194 }
195
196 for (i = 0; i < 3; i++){
197 dlg_move (ch_dlg, BY + 1, 17 + i);
198 addch (ch_flags [i+3]);
199 }
200
201 for (i = 0; i < 3; i++){
202 dlg_move (ch_dlg, BY + 1, 25 + i);
203 addch (ch_flags [i+6]);
204 }
205
206 set_perm_by_flags (b_att[0]->text, 0);
207 set_perm_by_flags (b_att[1]->text, 3);
208 set_perm_by_flags (b_att[2]->text, 6);
209
210 for (i = 0; i < 15; i++){
211 dlg_move (ch_dlg, BY+1, 35+i);
212 addch (ch_flags[9]);
213 }
214 for (i = 0; i < 15; i++){
215 dlg_move (ch_dlg, BY + 1, 53 + i);
216 addch (ch_flags[10]);
217 }
218 }
219
220 static void update_mode (Dlg_head * h)
221 {
222 print_flags ();
223 attrset (COLOR_NORMAL);
224 dlg_move (h, BY + 2, 9);
225 printw ("%12o", get_mode ());
226 send_message (h, h->current->widget, WIDGET_FOCUS, 0);
227 }
228
229 static int l_call (void *data)
230 {
231 return 1;
232 }
233
234 static int chl_callback (Dlg_head * h, int Par, int Msg)
235 {
236 switch (Msg) {
237 case DLG_DRAW:
238 attrset (COLOR_NORMAL);
239 dlg_erase (h);
240 draw_box (h, 0, 0, 13, 17);
241 break;
242
243 case DLG_KEY:
244 switch (Par) {
245 case KEY_LEFT:
246 case KEY_RIGHT:
247 h->ret_value = Par;
248 dlg_stop (h);
249 }
250 }
251 return 0;
252 }
253
254 static void do_enter_key (Dlg_head *h, int f_pos)
255 {
256 Dlg_head *chl_dlg;
257 WListbox *chl_list;
258 struct passwd *chl_pass;
259 struct group *chl_grp;
260 WLEntry *fe;
261 int lxx, lyy, chl_end, b_pos;
262
263 do {
264 lxx = (COLS - 74) / 2 + ((f_pos == 3) ? 35 : 53);
265 lyy = (LINES - 13) / 2;
266 chl_end = 0;
267
268 chl_dlg = create_dlg (lyy, lxx, 13, 17, dialog_colors, chl_callback,
269 "[Chown-advanced]", "achown_enter", DLG_NONE);
270
271 /* get new listboxes */
272 chl_list = listbox_new (1, 1, 15, 11, 0, l_call, NULL);
273
274 listbox_add_item (chl_list, 0, 0, "<Unknown>", NULL);
275
276 if (f_pos == 3) {
277 /* get and put user names in the listbox */
278 setpwent ();
279 while ((chl_pass = getpwent ()))
280 listbox_add_item (chl_list, 0, 0, chl_pass->pw_name, NULL);
281 endpwent ();
282 fe = listbox_search_text (chl_list, get_owner (sf_stat->st_uid));
283 }
284 else
285 {
286 /* get and put group names in the listbox */
287 setgrent ();
288 while ((chl_grp = getgrent ())) {
289 listbox_add_item (chl_list, 0, 0, chl_grp->gr_name, NULL);
290 }
291 endgrent ();
292 fe = listbox_search_text (chl_list, get_group (sf_stat->st_gid));
293 }
294
295 if (fe)
296 listbox_select_entry (chl_list, fe);
297
298 b_pos = chl_list->pos;
299 add_widget (chl_dlg, chl_list);
300
301 run_dlg (chl_dlg);
302
303 if (b_pos != chl_list->pos){
304 int ok = 0;
305 if (f_pos == 3){
306 chl_pass = getpwnam (chl_list->current->text);
307 if (chl_pass){
308 ok = 1;
309 sf_stat->st_uid = chl_pass->pw_uid;
310 }
311 } else {
312 chl_grp = getgrnam (chl_list->current->text);
313 if (chl_grp){
314 sf_stat->st_gid = chl_grp->gr_gid;
315 ok = 1;
316 }
317 }
318 if (ok){
319 ch_flags [f_pos + 6] = '+';
320 get_ownership ();
321 }
322 dlg_focus (h);
323 if (ok)
324 print_flags ();
325 }
326 if (chl_dlg->ret_value == KEY_LEFT){
327 if (f_pos == 4)
328 chl_end = 1;
329 dlg_one_up (ch_dlg);
330 f_pos--;
331 } else if (chl_dlg->ret_value == KEY_RIGHT) {
332 if (f_pos == 3)
333 chl_end = 1;
334 dlg_one_down (ch_dlg);
335 f_pos++;
336 }
337 /* Here we used to redraw the window */
338 destroy_dlg (chl_dlg);
339 } while (chl_end);
340 }
341
342 static void chown_refresh (void)
343 {
344 attrset (COLOR_NORMAL);
345 dlg_erase (ch_dlg);
346
347 draw_box (ch_dlg, 1, 2, 11, 70);
348
349 dlg_move (ch_dlg, BY - 1, 8);
350 addstr (_("owner"));
351 dlg_move (ch_dlg, BY - 1, 16);
352 addstr (_("group"));
353 dlg_move (ch_dlg, BY - 1, 24);
354 addstr (_("other"));
355
356 dlg_move (ch_dlg, BY - 1, 35);
357 addstr (_("owner"));
358 dlg_move (ch_dlg, BY - 1, 53);
359 addstr (_("group"));
360
361 dlg_move (ch_dlg, 3, 4);
362 addstr (_("On"));
363 dlg_move (ch_dlg, BY + 1, 4);
364 addstr (_("Flag"));
365 dlg_move (ch_dlg, BY + 2, 4);
366 addstr (_("Mode"));
367
368
369 if (!single_set){
370 dlg_move (ch_dlg, 3, 54);
371 printw (_("%6d of %d"), files_on_begin - (cpanel->marked) + 1,
372 files_on_begin);
373 }
374
375 print_flags ();
376
377 attrset (COLOR_HOT_NORMAL);
378 dlg_move (ch_dlg, 1, 24);
379 addstr (_(" Chown advanced command "));
380 }
381
382 static void chown_info_update ()
383 {
384 /* display file info */
385 attrset (COLOR_NORMAL);
386
387 /* name && mode */
388 dlg_move (ch_dlg, 3, 8);
389 printw ("%s", name_trunc (fname, 45));
390 dlg_move (ch_dlg, BY + 2, 9);
391 printw ("%12o", get_mode ());
392
393 /* permissions */
394 set_perm (b_att[0]->text, sf_stat->st_mode >> 6);
395 set_perm (b_att[1]->text, sf_stat->st_mode >> 3);
396 set_perm (b_att[2]->text, sf_stat->st_mode);
397 }
398
399 static void b_setpos (int f_pos) {
400 b_att[0]->hotpos=-1;
401 b_att[1]->hotpos=-1;
402 b_att[2]->hotpos=-1;
403 b_att[f_pos]->hotpos = (flag_pos % 3);
404 }
405
406 static int advanced_chown_callback (Dlg_head * h, int Par, int Msg)
407 {
408 int i = 0, f_pos = BUTTONS - h->current->dlg_id - single_set - 1;
409
410 switch (Msg) {
411 case DLG_DRAW:
412 chown_refresh ();
413 chown_info_update ();
414 return 1;
415
416 case DLG_POST_KEY:
417 if (f_pos < 3)
418 b_setpos (f_pos);
419 break;
420
421 case DLG_FOCUS:
422 if (f_pos < 3) {
423 if ((flag_pos / 3) != f_pos)
424 flag_pos = f_pos * 3;
425 b_setpos (f_pos);
426 } else if (f_pos < 5)
427 flag_pos = f_pos + 6;
428 break;
429
430 case DLG_KEY:
431 switch (Par) {
432
433 case XCTRL('b'):
434 case KEY_LEFT:
435 if (f_pos < 5)
436 return (dec_flag_pos (f_pos));
437 break;
438
439 case XCTRL('f'):
440 case KEY_RIGHT:
441 if (f_pos < 5)
442 return (inc_flag_pos (f_pos));
443 break;
444
445 case ' ':
446 if (f_pos < 3)
447 return 1;
448 break;
449
450 case '\n':
451 case KEY_ENTER:
452 if (f_pos <= 2 || f_pos >= 5)
453 break;
454 do_enter_key (h, f_pos);
455 return 1;
456
457 case ALT ('x'):
458 i++;
459
460 case ALT ('w'):
461 i++;
462
463 case ALT ('r'):
464 Par = i + 3;
465 for (i = 0; i < 3; i++)
466 ch_flags[i * 3 + Par - 3] = (x_toggle & (1 << Par)) ? '-' : '+';
467 x_toggle ^= (1 << Par);
468 update_mode (h);
469 dlg_broadcast_msg (h, WIDGET_DRAW, 0);
470 send_message (h, h->current->widget, WIDGET_FOCUS, 0);
471 break;
472
473 case XCTRL ('x'):
474 i++;
475
476 case XCTRL ('w'):
477 i++;
478
479 case XCTRL ('r'):
480 Par = i;
481 for (i = 0; i < 3; i++)
482 ch_flags[i * 3 + Par] = (x_toggle & (1 << Par)) ? '-' : '+';
483 x_toggle ^= (1 << Par);
484 update_mode (h);
485 dlg_broadcast_msg (h, WIDGET_DRAW, 0);
486 send_message (h, h->current->widget, WIDGET_FOCUS, 0);
487 break;
488
489 case 'x':
490 i++;
491
492 case 'w':
493 i++;
494
495 case 'r':
496 if (f_pos > 2)
497 break;
498 flag_pos = f_pos * 3 + i; /* (strchr(ch_perm,Par)-ch_perm); */
499 if (((WButton *) h->current->widget)->text[(flag_pos % 3)] == '-')
500 ch_flags[flag_pos] = '+';
501 else
502 ch_flags[flag_pos] = '-';
503 update_mode (h);
504 break;
505
506 case '4':
507 i++;
508
509 case '2':
510 i++;
511
512 case '1':
513 if (f_pos > 2)
514 break;
515 flag_pos = i + f_pos * 3;
516 ch_flags[flag_pos] = '=';
517 update_mode (h);
518 break;
519
520 case '-':
521 if (f_pos > 2)
522 break;
523
524 case '*':
525 if (Par == '*')
526 Par = '=';
527
528 case '=':
529 case '+':
530 if (f_pos > 4)
531 break;
532 ch_flags[flag_pos] = Par;
533 update_mode (h);
534 advanced_chown_callback (h, KEY_RIGHT, DLG_KEY);
535 if (flag_pos>8 || !(flag_pos%3)) dlg_one_down (h);
536
537 break;
538 }
539 return 0;
540 }
541 return 0;
542 }
543
544 static void init_chown_advanced (void)
545 {
546 int i;
547
548 sf_stat = (struct stat *) malloc (sizeof (struct stat));
549 do_refresh ();
550 end_chown = need_update = current_file = 0;
551 single_set = (cpanel->marked < 2) ? 2 : 0;
552 memset (ch_flags, '=', 11);
553 flag_pos = 0;
554 x_toggle = 070;
555
556 ch_dlg = create_dlg (0, 0, 13, 74, dialog_colors, advanced_chown_callback,
557 "[Chown-advanced]", "achown", DLG_CENTER);
558
559 #define XTRACT(i) BY+chown_advanced_but[i].y, BX+chown_advanced_but[i].x, \
560 chown_advanced_but[i].ret_cmd, chown_advanced_but[i].flags, chown_advanced_but[i].text, \
561 0, 0, NULL
562
563 for (i = 0; i < BUTTONS - 5; i++)
564 if (!single_set || i < 2)
565 add_widget (ch_dlg, button_new (XTRACT (i)));
566
567 b_att[0] = button_new (XTRACT (8));
568 b_att[1] = button_new (XTRACT (7));
569 b_att[2] = button_new (XTRACT (6));
570 b_user = button_new (XTRACT (5));
571 b_group = button_new (XTRACT (4));
572
573 add_widget (ch_dlg, b_group);
574 add_widget (ch_dlg, b_user);
575 add_widget (ch_dlg, b_att[2]);
576 add_widget (ch_dlg, b_att[1]);
577 add_widget (ch_dlg, b_att[0]);
578 }
579
580 void chown_advanced_done (void)
581 {
582 free (sf_stat);
583 if (need_update)
584 update_panels (UP_OPTIMIZE, UP_KEEPSEL);
585 repaint_screen ();
586 }
587
588 #if 0
589 static inline void do_chown (uid_t u, gid_t g)
590 {
591 chown (cpanel->dir.list[current_file].fname, u, g);
592 file_mark (cpanel, current_file, 0);
593 }
594 #endif
595
596 static char *next_file (void)
597 {
598 while (!cpanel->dir.list[current_file].f.marked)
599 current_file++;
600
601 return cpanel->dir.list[current_file].fname;
602 }
603
604 static void apply_advanced_chowns (struct stat *sf)
605 {
606 char *fname;
607 gid_t a_gid = sf->st_gid;
608 uid_t a_uid = sf->st_uid;
609
610 fname = cpanel->dir.list[current_file].fname;
611 need_update = end_chown = 1;
612 if (mc_chmod (fname, get_mode ()) == -1)
613 message (1, MSG_ERROR, _(" Couldn't chmod \"%s\" \n %s "),
614 fname, unix_error_string (errno));
615 /* call mc_chown only, if mc_chmod didn't fail */
616 else if (mc_chown (fname, (ch_flags[9] == '+') ? sf->st_uid : -1,
617 (ch_flags[10] == '+') ? sf->st_gid : -1) == -1)
618 message (1, MSG_ERROR, _(" Couldn't chown \"%s\" \n %s "),
619 fname, unix_error_string (errno));
620 do_file_mark (cpanel, current_file, 0);
621
622 do {
623 fname = next_file ();
624
625 if (!stat_file (fname, sf))
626 break;
627 ch_cmode = sf->st_mode;
628 if (mc_chmod (fname, get_mode ()) == -1)
629 message (1, MSG_ERROR, _(" Couldn't chmod \"%s\" \n %s "),
630 fname, unix_error_string (errno));
631 /* call mc_chown only, if mc_chmod didn't fail */
632 else if (mc_chown (fname, (ch_flags[9] == '+') ? a_uid : -1, (ch_flags[10] == '+') ? a_gid : -1) == -1)
633 message (1, MSG_ERROR, _(" Couldn't chown \"%s\" \n %s "),
634 fname, unix_error_string (errno));
635
636 do_file_mark (cpanel, current_file, 0);
637 } while (cpanel->marked);
638 }
639
640 void chown_advanced_cmd (void)
641 {
642
643 files_on_begin = cpanel->marked;
644
645 if (!vfs_current_is_local ()) {
646 if (vfs_current_is_extfs ()) {
647 message (1, _(" Oops... "),
648 _(" I can't run the Advanced Chown command on an extfs "));
649 return;
650 } else if (vfs_current_is_tarfs ()) {
651 message (1, _(" Oops... "),
652 _(" I can't run the Advanced Chown command on a tarfs "));
653 return;
654 }
655 }
656
657 do { /* do while any files remaining */
658 init_chown_advanced ();
659
660 if (cpanel->marked)
661 fname = next_file (); /* next marked file */
662 else
663 fname = selection (cpanel)->fname; /* single file */
664
665 if (!stat_file (fname, sf_stat)){ /* get status of file */
666 destroy_dlg (ch_dlg);
667 break;
668 }
669 ch_cmode = sf_stat->st_mode;
670
671 chown_refresh ();
672
673 get_ownership ();
674
675 /* game can begin */
676 run_dlg (ch_dlg);
677
678 switch (ch_dlg->ret_value) {
679 case B_CANCEL:
680 end_chown = 1;
681 break;
682
683 case B_ENTER:
684 need_update = 1;
685 if (mc_chmod (fname, get_mode ()) == -1)
686 message (1, MSG_ERROR, _(" Couldn't chmod \"%s\" \n %s "),
687 fname, unix_error_string (errno));
688 /* call mc_chown only, if mc_chmod didn't fail */
689 else if (mc_chown (fname, (ch_flags[9] == '+') ? sf_stat->st_uid : -1, (ch_flags[10] == '+') ? sf_stat->st_gid : -1) == -1)
690 message (1, MSG_ERROR, _(" Couldn't chown \"%s\" \n %s "),
691 fname, unix_error_string (errno));
692 break;
693 case B_SETALL:
694 apply_advanced_chowns (sf_stat);
695 break;
696
697 case B_SKIP:
698 break;
699
700 }
701
702 if (cpanel->marked && ch_dlg->ret_value != B_CANCEL) {
703 do_file_mark (cpanel, current_file, 0);
704 need_update = 1;
705 }
706 destroy_dlg (ch_dlg);
707 } while (cpanel->marked && !end_chown);
708
709 chown_advanced_done ();
710 }