add Delete command.
This commit is contained in:
parent
f1a86519d2
commit
dd9a322717
|
@ -0,0 +1,101 @@
|
||||||
|
|
||||||
|
#ifdef __ORCAC__
|
||||||
|
#pragma optimize 79
|
||||||
|
#pragma noroot
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
|
||||||
|
#include "Delete-flags.h"
|
||||||
|
|
||||||
|
void FlagsHelp(void)
|
||||||
|
{
|
||||||
|
fputs("Delete [options] name...\n", stdout);
|
||||||
|
fputs("-y delete directory contents (avoids dialog)\n", stdout);
|
||||||
|
fputs("-n don't delete directory contents (avoids dialog)\n", stdout);
|
||||||
|
fputs("-c cancel if a directory is to be deleted (avoids dialog)\n", stdout);
|
||||||
|
fputs("-i ignore errors (no diagnostics)\n", stdout);
|
||||||
|
fputs("-p write progress information to diagnostics\n", stdout);
|
||||||
|
fputs("\n", stdout);
|
||||||
|
exit(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
struct Flags flags;
|
||||||
|
int FlagsParse(int argc, char **argv)
|
||||||
|
{
|
||||||
|
char *cp;
|
||||||
|
char *optarg;
|
||||||
|
|
||||||
|
char c;
|
||||||
|
int i;
|
||||||
|
int j;
|
||||||
|
int eof; // end-of-flags
|
||||||
|
int mindex; // mutation index.
|
||||||
|
|
||||||
|
memset(&flags, 0, sizeof(flags));
|
||||||
|
|
||||||
|
for (i = 1, mindex = 1, eof = 0; i < argc; ++i)
|
||||||
|
{
|
||||||
|
cp = argv[i];
|
||||||
|
c = cp[0];
|
||||||
|
|
||||||
|
if (c != '-' || eof)
|
||||||
|
{
|
||||||
|
if (i != mindex) argv[mindex] = argv[i];
|
||||||
|
mindex++;
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
// -- = end of options.
|
||||||
|
if (cp[1] == '-' && cp[2] == 0)
|
||||||
|
{
|
||||||
|
eof = 1;
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
// now scan all the flags in the string...
|
||||||
|
optarg = NULL;
|
||||||
|
for (j = 1; ; ++j)
|
||||||
|
{
|
||||||
|
c = cp[j];
|
||||||
|
if (c == 0) break;
|
||||||
|
|
||||||
|
switch (c)
|
||||||
|
{
|
||||||
|
case 'h':
|
||||||
|
FlagsHelp();
|
||||||
|
break;
|
||||||
|
case 'y':
|
||||||
|
case 'Y':
|
||||||
|
flags._y = 1;
|
||||||
|
break;
|
||||||
|
case 'n':
|
||||||
|
case 'N':
|
||||||
|
flags._n = 1;
|
||||||
|
break;
|
||||||
|
case 'c':
|
||||||
|
case 'C':
|
||||||
|
flags._c = 1;
|
||||||
|
break;
|
||||||
|
case 'i':
|
||||||
|
case 'I':
|
||||||
|
flags._i = 1;
|
||||||
|
break;
|
||||||
|
case 'p':
|
||||||
|
case 'P':
|
||||||
|
flags._p = 1;
|
||||||
|
break;
|
||||||
|
|
||||||
|
default:
|
||||||
|
fprintf(stderr, "illegal option -- %c\n", c);
|
||||||
|
exit(1);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (optarg) break;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return mindex;
|
||||||
|
}
|
|
@ -0,0 +1,23 @@
|
||||||
|
|
||||||
|
#ifndef __flags_h__
|
||||||
|
#define __flags_h__
|
||||||
|
|
||||||
|
typedef struct Flags {
|
||||||
|
|
||||||
|
unsigned _y:1;
|
||||||
|
unsigned _n:1;
|
||||||
|
unsigned _c:1;
|
||||||
|
unsigned _i:1;
|
||||||
|
unsigned _p:1;
|
||||||
|
|
||||||
|
} Flags;
|
||||||
|
|
||||||
|
|
||||||
|
extern struct Flags flags;
|
||||||
|
|
||||||
|
int FlagsParse(int argc, char **argv);
|
||||||
|
|
||||||
|
void FlagsHelp(void);
|
||||||
|
|
||||||
|
#endif
|
||||||
|
|
|
@ -0,0 +1,118 @@
|
||||||
|
/*
|
||||||
|
* Delete # delete files and directories
|
||||||
|
* Delete [-y | -n | -c] [-i] [-p] name...
|
||||||
|
* -y # delete directory contents (avoids dialog)
|
||||||
|
* -n # don't delete directory contents (avoids dialog)
|
||||||
|
* -c # cancel if a directory is to be deleted (avoids dialog)
|
||||||
|
* -i # ignore errors (no diagnostics)
|
||||||
|
* -p # write progress information to diagnostics
|
||||||
|
*/
|
||||||
|
|
||||||
|
/*
|
||||||
|
* return value:
|
||||||
|
* 0 - all ok
|
||||||
|
* 1 - syntax error
|
||||||
|
* 2 - delete error
|
||||||
|
* 4 - canceled.
|
||||||
|
*/
|
||||||
|
|
||||||
|
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <Files.h>
|
||||||
|
#include <ErrMgr.h>
|
||||||
|
|
||||||
|
#include "Delete-flags.h"
|
||||||
|
|
||||||
|
char *c2p(const char *cp)
|
||||||
|
{
|
||||||
|
int length;
|
||||||
|
char *p;
|
||||||
|
|
||||||
|
if (!cp) return NULL;
|
||||||
|
length = strlen(cp);
|
||||||
|
if (length > 255)
|
||||||
|
{
|
||||||
|
fprintf(stderr, "Error: Pathname is too long.\n");
|
||||||
|
exit(1);
|
||||||
|
return NULL;
|
||||||
|
}
|
||||||
|
|
||||||
|
p = malloc(length + 2); // + 2 for \0 and length.
|
||||||
|
if (!p)
|
||||||
|
{
|
||||||
|
fprintf(stderr, "Error: unable to allocate memory.\n");
|
||||||
|
exit(1);
|
||||||
|
return NULL;
|
||||||
|
}
|
||||||
|
|
||||||
|
p[0] = length;
|
||||||
|
memcpy(p + 1, cp, length + 1);
|
||||||
|
return p;
|
||||||
|
}
|
||||||
|
|
||||||
|
// -1 - error.
|
||||||
|
// 0 - no file
|
||||||
|
// 1 - regular file
|
||||||
|
// 2 - directory.
|
||||||
|
int mode(const char *path)
|
||||||
|
{
|
||||||
|
char *pname;
|
||||||
|
CInfoPBRec rec;
|
||||||
|
OSErr status;
|
||||||
|
|
||||||
|
memset(&rec, 0, sizeof(rec));
|
||||||
|
|
||||||
|
pname = c2p(path);
|
||||||
|
if (!pname) return -1;
|
||||||
|
|
||||||
|
rec.hFileInfo.ioNamePtr = (unsigned char *)pname;
|
||||||
|
status = PBGetCatInfo(&rec, false);
|
||||||
|
free(pname);
|
||||||
|
|
||||||
|
if (status) return 0;
|
||||||
|
if (rec.hFileInfo.ioFlAttrib & kioFlAttribDirMask)
|
||||||
|
return 2;
|
||||||
|
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
static char error_message[255];
|
||||||
|
|
||||||
|
int main(int argc, char **argv) {
|
||||||
|
int i;
|
||||||
|
int status = 0;
|
||||||
|
|
||||||
|
argc = FlagsParse(argc, argv);
|
||||||
|
|
||||||
|
if (argc == 1)
|
||||||
|
{
|
||||||
|
FlagsHelp();
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
pascalStrings = false;
|
||||||
|
InitErrMgr(NULL, NULL, true);
|
||||||
|
|
||||||
|
for (i = 1 ; i < argc; ++i) {
|
||||||
|
OSErr err;
|
||||||
|
char *file = argv[i];
|
||||||
|
char *p = c2p(file);
|
||||||
|
// todo -- y/n/c flags.
|
||||||
|
|
||||||
|
err = FSDelete((unsigned char *)p, 0);
|
||||||
|
if (err && !flags._i) {
|
||||||
|
fprintf(stderr, "### Delete - unable to delete %s\n", file);
|
||||||
|
fprintf(stderr, "# %s\n", GetSysErrText(err, error_message));
|
||||||
|
status = 2;
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
if (!err && flags._p) {
|
||||||
|
fprintf(stderr, "%s deleted.\n", file);
|
||||||
|
}
|
||||||
|
free(p);
|
||||||
|
}
|
||||||
|
CloseErrMgr();
|
||||||
|
return status;
|
||||||
|
}
|
4
makefile
4
makefile
|
@ -49,6 +49,10 @@ Duplicate: Duplicate.c.o
|
||||||
$(MPW) Link $(LDFLAGS) -o $@ $^ $(LIBS)
|
$(MPW) Link $(LDFLAGS) -o $@ $^ $(LIBS)
|
||||||
|
|
||||||
|
|
||||||
|
Delete: Delete.c.o Delete-flags.c.o
|
||||||
|
$(MPW) Link $(LDFLAGS) -o $@ $^ $(LIBS)
|
||||||
|
|
||||||
|
|
||||||
SetFile: SetFile.c.o SetFile-flags.c.o
|
SetFile: SetFile.c.o SetFile-flags.c.o
|
||||||
$(MPW) Link $(LDFLAGS) -o $@ $^ $(LIBS)
|
$(MPW) Link $(LDFLAGS) -o $@ $^ $(LIBS)
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue