Imported Upstream version 4.0.18
[platform/upstream/mtools.git] / mdel.c
1 /*  Copyright 1986-1992 Emmet P. Gray.
2  *  Copyright 1996-2002,2005,2008,2009 Alain Knaff.
3  *  This file is part of mtools.
4  *
5  *  Mtools is free software: you can redistribute it and/or modify
6  *  it under the terms of the GNU General Public License as published by
7  *  the Free Software Foundation, either version 3 of the License, or
8  *  (at your option) any later version.
9  *
10  *  Mtools is distributed in the hope that it will be useful,
11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  *  GNU General Public License for more details.
14  *
15  *  You should have received a copy of the GNU General Public License
16  *  along with Mtools.  If not, see <http://www.gnu.org/licenses/>.
17  *
18  * mdel.c
19  * Delete an MSDOS file
20  *
21  */
22
23 #include "sysincludes.h"
24 #include "msdos.h"
25 #include "mtools.h"
26 #include "stream.h"
27 #include "mainloop.h"
28 #include "fs.h"
29 #include "file.h"
30 #include "file_name.h"
31
32 typedef struct Arg_t {
33         int deltype;
34         int verbose;
35 } Arg_t;
36
37 /**
38  * Wiped the given entry
39  */
40 void wipeEntry(direntry_t *entry)
41 {
42         direntry_t longNameEntry;
43         int i;
44         initializeDirentry(&longNameEntry, entry->Dir);
45         for(i=entry->beginSlot; i< entry->endSlot; i++) {
46             int error;
47             longNameEntry.entry=i;
48             dir_read(&longNameEntry, &error);
49             if(error)
50                 break;
51             longNameEntry.dir.name[0] = (char) DELMARK;
52             dir_write(&longNameEntry);
53         }
54         entry->dir.name[0] = (char) DELMARK;
55         dir_write(entry);
56 }
57
58 static int del_entry(direntry_t *entry, MainParam_t *mp)
59 {
60         Arg_t *arg=(Arg_t *) mp->arg;
61
62         if(got_signal)
63                 return ERROR_ONE;
64
65         if(entry->entry == -3) {
66                 fprintf(stderr, "Cannot remove root directory\n");
67                 return ERROR_ONE;
68         }
69
70         if (arg->verbose) {
71                 fprintf(stderr,"Removing ");
72                 fprintPwd(stderr, entry,0);
73                 fputc('\n', stderr);
74         }
75
76         if (entry->dir.attr & (ATTR_READONLY | ATTR_SYSTEM)) {
77                 char tmp[4*MAX_VNAMELEN+1];
78                 wchar_to_native(entry->name,tmp,MAX_VNAMELEN);
79                 if (ask_confirmation("%s: \"%s\" is read only, erase anyway (y/n) ? ",
80                                      progname, tmp))
81                         return ERROR_ONE;
82         }
83         if (fatFreeWithDirentry(entry)) 
84                 return ERROR_ONE;
85
86         wipeEntry(entry);
87         return GOT_ONE;
88 }
89
90 static int del_file(direntry_t *entry, MainParam_t *mp)
91 {
92         char shortname[13];
93         direntry_t subEntry;
94         Stream_t *SubDir;
95         Arg_t *arg = (Arg_t *) mp->arg;
96         MainParam_t sonmp;
97         int ret;
98         int r;  
99
100         sonmp = *mp;
101         sonmp.arg = mp->arg;
102
103         r = 0;
104         if (IS_DIR(entry)){
105                 /* a directory */               
106                 SubDir = OpenFileByDirentry(entry);
107                 initializeDirentry(&subEntry, SubDir);
108                 ret = 0;
109                 while((r=vfat_lookup(&subEntry, "*", 1,
110                                      ACCEPT_DIR | ACCEPT_PLAIN,
111                                      shortname, NULL)) == 0 ){
112                         if(shortname[0] != DELMARK &&
113                            shortname[0] &&
114                            shortname[0] != '.' ){
115                                 if(arg->deltype != 2){
116                                         fprintf(stderr,
117                                                 "Directory ");
118                                         fprintPwd(stderr, entry,0);
119                                         fprintf(stderr," non empty\n");
120                                         ret = ERROR_ONE;
121                                         break;
122                                 }
123                                 if(got_signal) {
124                                         ret = ERROR_ONE;
125                                         break;
126                                 }
127                                 ret = del_file(&subEntry, &sonmp);
128                                 if( ret & ERROR_ONE)
129                                         break;
130                                 ret = 0;
131                         }
132                 }
133                 FREE(&SubDir);
134                 if (r == -2)
135                         return ERROR_ONE;
136                 if(ret)
137                         return ret;
138         }
139         return del_entry(entry, mp);
140 }
141
142 static void usage(int ret) NORETURN;
143 static void usage(int ret)
144 {
145         fprintf(stderr, 
146                 "Mtools version %s, dated %s\n", mversion, mdate);
147         fprintf(stderr, 
148                 "Usage: %s [-v] msdosfile [msdosfiles...]\n", progname);
149         exit(ret);
150 }
151
152 void mdel(int argc, char **argv, int deltype)
153 {
154         Arg_t arg;
155         MainParam_t mp;
156         int c,i;
157
158         arg.verbose = 0;
159         if(helpFlag(argc, argv))
160                 usage(0);
161         while ((c = getopt(argc, argv, "i:vh")) != EOF) {
162                 switch (c) {
163                         case 'i':
164                                 set_cmd_line_image(optarg);
165                                 break;
166                         case 'v':
167                                 arg.verbose = 1;
168                                 break;
169                         case 'h':
170                                 usage(0);
171                         default:
172                                 usage(1);
173                 }
174         }
175
176         if(argc == optind)
177                 usage(1);
178
179         init_mp(&mp);
180         mp.callback = del_file;
181         mp.arg = (void *) &arg;
182         mp.openflags = O_RDWR;
183         arg.deltype = deltype;
184         switch(deltype){
185         case 0:
186                 mp.lookupflags = ACCEPT_PLAIN; /* mdel */
187                 break;
188         case 1:
189                 mp.lookupflags = ACCEPT_DIR; /* mrd */
190                 break;
191         case 2:
192                 mp.lookupflags = ACCEPT_DIR | ACCEPT_PLAIN; /* mdeltree */
193                 break;
194         }
195         mp.lookupflags |= NO_DOTS;
196         for(i=optind;i<argc;i++) {
197                 int b,l;
198                 if(argv[i][0] && argv[i][1] == ':')
199                         b = 2;
200                 else
201                         b = 0;
202                 l = strlen(argv[i]+b);
203                 if(l > 1 && argv[i][b+l-1] == '/')
204                         argv[i][b+l-1] = '\0';
205         }
206                 
207         exit(main_loop(&mp, argv + optind, argc - optind));
208 }