int
main(int argc, char **argv)
{
char fileext[4];
char *name_p = 0;
char *temp_p;
char *target = NULL;
char *fname;
#ifdef USING_GLFTPD
char *env_user, *env_group;
#else
char dirname[PATH_MAX];
#endif
char *inc_point[2];
int n, m, ftype = 0;
unsigned char empty_dir = 0;
unsigned char _incomplete = 0;
GLOBAL g;
DIR *dir, *parent;
#ifdef USING_GLFTPD
if (argc == 1) {
d_log("postdel: no param specified\n");
return 0;
}
if ((int)strlen(argv[1]) < 6 || strncmp(argv[1], "DELE ", 5)) {
printf("pzs-ng postdel script.\n");
printf(" - this is supposed to be run from glftpd.\n");
printf(" - if you wish to run it yourself from chroot, \n");
printf(" - use /bin/postdel \"DELE <filename>\"\n");
printf(" - thank you. (remember the quotes!)\n");
return 0;
}
fname = argv[1] + 5; /* This way we simply skip the required
* 'DELE'-part of the argument (so we get
* filename) */
#else
if (argc < 6) {
printf("[running in ftpd-agnostic mode]\n");
printf("Missing arguments! Syntax:\n");
printf(" %s <user> <group> <tagline> <section> <filepath>\n", argv[0]);
return 0;
}
fname = strrchr(argv[5], '/');
if (fname == NULL)
{
fname = argv[5];
strcpy(dirname, "./");
}
else
{
strlcpy(dirname, argv[5], fname - argv[5] + 1);
fname++;
}
chdir(dirname);
d_log("postdel: Got a 'DELE %s' in '%s'\n", fname, dirname);
#endif
d_log("postdel: Project-ZS Next Generation (pzs-ng) %s debug log for postdel.\n", ng_version);
d_log("postdel: Postdel executed by: (uid/gid) %d/%d\n", geteuid(), getegid());
#ifdef _ALT_MAX
d_log("postdel: PATH_MAX not found - using predefined settings! Please report to the devs!\n");
#endif
#ifdef USING_GLFTPD
d_log("postdel: Reading user name from env\n");
if ((env_user = getenv("USER")) == NULL) {
d_log("postdel: postdel: Could not find environment variable 'USER', setting value to 'Nobody'\n");
env_user = "******";
}
d_log("postdel: Reading group name from env\n");
if ((env_group = getenv("GROUP")) == NULL) {
d_log("postdel: Could not find environment variable 'GROUP', setting value to 'NoGroup'\n");
env_group = "NoGroup";
}
#endif
#if ( program_uid > 0 )
d_log("postdel: Trying to change effective gid\n");
setegid(program_gid);
d_log("postdel: Trying to change effective uid\n");
seteuid(program_uid);
#endif
if (!strcmp(fname, "debug"))
d_log("postdel: Reading directory structure\n");
dir = opendir(".");
parent = opendir("..");
if (fileexists(fname)) {
d_log("postdel: File (%s) still exists\n", fname);
#if (remove_dot_debug_on_delete == TRUE)
if (strcmp(fname, "debug"))
unlink(fname);
#endif
closedir(dir);
closedir(parent);
return 0;
}
umask(0666 & 000);
d_log("postdel: Clearing arrays\n");
bzero(&g.v.total, sizeof(struct race_total));
g.v.misc.slowest_user[0] = ULONG_MAX;
g.v.misc.fastest_user[0] = 0;
#ifdef USING_GLFTPD
/* YARR; THE PAIN OF MAGIC NUMBERS! */
d_log("postdel: Copying env/predefined username to g.v. (%s)\n", env_user);
strlcpy(g.v.user.name, env_user, sizeof(g.v.user.name));
d_log("postdel: Copying env/predefined groupname to g.v. (%s)\n", env_group);
strlcpy(g.v.user.group, env_group, sizeof(g.v.user.group));
#else
d_log("postdel: Copying argv[1] (username) to g.v. (%s)\n", argv[1]);
strlcpy(g.v.user.name, argv[1], sizeof(g.v.user.name));
d_log("postdel: Copying argv[2] (groupname) to g.v. (%s)\n", argv[2]);
strlcpy(g.v.user.group, argv[2], sizeof(g.v.user.group));
#endif
d_log("postdel: File to remove is: %s\n", fname);
if (!*g.v.user.group)
memcpy(g.v.user.group, "NoGroup", 8);
d_log("postdel: Allocating memory for variables\n");
g.ui = ng_realloc2(g.ui, sizeof(struct USERINFO *) * 30, 1, 1, 1);
g.gi = ng_realloc2(g.gi,sizeof(struct GROUPINFO *) * 30, 1, 1, 1);
if (!getcwd(g.l.path, PATH_MAX)) {
d_log("postdel: Failed to getcwd(): %s\n", strerror(errno));
}
if (subcomp(g.l.path, g.l.basepath) && (g.l.basepath[0] == '\0'))
strlcpy(g.l.basepath, g.l.path, PATH_MAX);
if (strncmp(g.l.path, g.l.basepath, PATH_MAX))
d_log("postdel: We are in subdir of %s\n", g.l.basepath);
strncpy(g.v.misc.current_path, g.l.path, sizeof(g.v.misc.current_path));
strncpy(g.v.misc.basepath, g.l.basepath, sizeof(g.v.misc.basepath));
d_log("postdel: Creating directory to store racedata in\n");
maketempdir(g.l.path);
d_log("postdel: Locking release\n");
while(1) {
if ((m = create_lock(&g.v, g.l.path, PROGTYPE_POSTDEL, 3, 0))) {
d_log("postdel: Failed to lock release.\n");
if (m == 1) {
d_log("postdel: version mismatch. Exiting.\n");
exit(EXIT_FAILURE);
}
if (m == PROGTYPE_RESCAN) {
d_log("postdel: Detected rescan running - will try to make it quit.\n");
update_lock(&g.v, 0, 0);
}
if (m == PROGTYPE_POSTDEL) {
n = (signed int)g.v.data_incrementor;
d_log("postdel: Detected postdel running - sleeping for one second.\n");
if (!create_lock(&g.v, g.l.path, PROGTYPE_POSTDEL, 0, g.v.data_queue))
break;
usleep(1000000);
if (!create_lock(&g.v, g.l.path, PROGTYPE_POSTDEL, 0, g.v.data_queue))
break;
if ( n == (signed int)g.v.data_incrementor) {
d_log("postdel: Failed to get lock. Forcing unlock.\n");
if (create_lock(&g.v, g.l.path, PROGTYPE_POSTDEL, 2, g.v.data_queue)) {
d_log("postdel: Failed to force a lock.\n");
d_log("postdel: Exiting with error.\n");
exit(EXIT_FAILURE);
}
break;
}
} else {
for ( n = 0; n <= max_seconds_wait_for_lock * 10; n++) {
d_log("postdel: sleeping for .1 second before trying to get a lock.\n");
usleep(100000);
if (!(m = create_lock(&g.v, g.l.path, PROGTYPE_POSTDEL, 0, g.v.data_queue)))
break;
}
if (n >= max_seconds_wait_for_lock * 10) {
if (m == PROGTYPE_RESCAN) {
d_log("postdel: Failed to get lock. Forcing unlock.\n");
if (create_lock(&g.v, g.l.path, PROGTYPE_POSTDEL, 2, g.v.data_queue))
d_log("postdel: Failed to force a lock.\n");
} else
d_log("postdel: Failed to get a lock.\n");
if (!g.v.data_in_use && !ignore_lock_timeout) {
d_log("postdel: Exiting with error.\n");
exit(EXIT_FAILURE);
}
}
}
rewinddir(dir);
rewinddir(parent);
}
usleep(10000);
if (update_lock(&g.v, 1, 0) != -1)
break;
}
g.l.race = ng_realloc(g.l.race, n = (int)strlen(g.l.path) + 12 + sizeof(storage), 1, 1, &g.v, 1);
g.l.sfv = ng_realloc(g.l.sfv, n, 1, 1, &g.v, 1);
g.l.sfvbackup = ng_realloc(g.l.sfvbackup, n, 1, 1, &g.v, 1);
g.l.leader = ng_realloc(g.l.leader, n, 1, 1, &g.v, 1);
target = ng_realloc(target, 4096, 1, 1, &g.v, 1);
if (getenv("SECTION") == NULL)
sprintf(g.v.sectionname, "DEFAULT");
else
snprintf(g.v.sectionname, 127, "%s", getenv("SECTION"));
d_log("postdel: Copying data &g.l into memory\n");
strlcpy(g.v.file.name, fname, NAME_MAX);
sprintf(g.l.sfv, storage "/%s/sfvdata", g.l.path);
sprintf(g.l.sfvbackup, storage "/%s/sfvbackup", g.l.path);
sprintf(g.l.leader, storage "/%s/leader", g.l.path);
sprintf(g.l.race, storage "/%s/racedata", g.l.path);
g.l.sfv_incomplete = 0;
d_log("postdel: Caching release name\n");
getrelname(&g);
d_log("postdel: DEBUG 0: incomplete: '%s', path: '%s'\n", g.l.incomplete, g.l.path);
if ((matchpath(nocheck_dirs, g.l.path) && rescan_nocheck_dirs_allowed == FALSE) || (!matchpath(zip_dirs, g.l.path) && !matchpath(sfv_dirs, g.l.path) && !matchpath(group_dirs, g.l.path))) {
d_log("postdel: Dir matched with nocheck_dirs, or is not in the zip/sfv/group-dirs\n");
d_log("postdel: Freeing memory, removing lock and exiting\n");
ng_free(g.ui);
ng_free(g.gi);
if (fileexists(g.l.race))
unlink(g.l.race);
if (fileexists(g.l.sfv))
unlink(g.l.sfv);
if (fileexists(g.l.sfvbackup))
unlink(g.l.sfvbackup);
if (fileexists(g.l.leader))
unlink(g.l.leader);
ng_free(g.l.race);
ng_free(g.l.sfv);
ng_free(g.l.sfvbackup);
ng_free(g.l.leader);
if (remove_dot_debug_on_delete)
unlink(".debug");
remove_lock(&g.v);
return 0;
}
d_log("postdel: Parsing file extension from filename...\n");
temp_p = find_last_of(g.v.file.name, ".");
if (*temp_p != '.') {
d_log("postdel: Got: no extension\n");
temp_p = name_p;
} else {
d_log("postdel: Got: %s\n", temp_p);
temp_p++;
}
name_p++;
if (temp_p) {
while ((signed)strlen(temp_p) - 4 > 0)
temp_p++;
snprintf(fileext, 4, "%s", temp_p);
} else
*fileext = '\0';
g.v.misc.release_type = read_headdata(&g.v);
switch (get_filetype_postdel(&g, fileext)) {
case 0:
ftype = g.v.misc.release_type;
d_log("postdel: File type is: ZIP\n");
if (matchpath(zip_dirs, g.l.path)) {
if (matchpath(group_dirs, g.l.path)) {
g.v.misc.write_log = 0;
} else {
g.v.misc.write_log = 1;
}
} else if (matchpath(sfv_dirs, g.l.path) && strict_path_match) {
if (matchpath(group_dirs, g.l.path)) {
g.v.misc.write_log = 0;
} else {
d_log("postdel: Directory matched with sfv_dirs\n");
break;
}
}
if (!fileexists("file_id.diz")) {
temp_p = findfileext(dir, ".zip");
if (temp_p != NULL) {
d_log("postdel: file_id.diz does not exist, trying to extract it from %s\n", temp_p);
sprintf(target, "%s -qqjnCLL \"%s\" file_id.diz", unzip_bin, temp_p);
execute(target);
if (chmod("file_id.diz", 0666))
d_log("postdel: Failed to chmod %s: %s\n", "file_id.diz", strerror(errno));
}
}
d_log("postdel: Reading diskcount from diz\n");
// g.v.total.files = read_diz("file_id.diz");
g.v.total.files = read_diz();
if (g.v.total.files == 0) {
d_log("postdel: Could not get diskcount from diz\n");
g.v.total.files = 1;
}
g.v.total.files_missing = g.v.total.files;
d_log("postdel: Reading race data from file to memory\n");
readrace(g.l.race, &g.v, g.ui, g.gi);
d_log("postdel: Caching progress bar\n");
buffer_progress_bar(&g.v);
d_log("postdel: Removing old complete bar, if any\n");
removecomplete(g.v.misc.release_type);
if (g.v.total.files_missing < 0) {
g.v.total.files -= g.v.total.files_missing;
g.v.total.files_missing = 0;
}
if (!g.v.total.files_missing) {
d_log("postdel: Creating complete bar\n");
createstatusbar(convert(&g.v, g.ui, g.gi, zip_completebar));
} else if (g.v.total.files_missing < g.v.total.files) {
if (g.v.total.files_missing == 1) {
d_log("postdel: Writing INCOMPLETE to %s\n", log);
writelog(&g, convert(&g.v, g.ui, g.gi, incompletemsg), general_incomplete_type);
}
_incomplete = 1;
} else {
empty_dir = 1;
}
remove_from_race(g.l.race, g.v.file.name, &g.v);
break;
case 1: /* SFV */
ftype = g.v.misc.release_type;
d_log("postdel: Reading file count from sfvdata\n");
readsfv(g.l.sfv, &g.v, 0);
if (fileexists(g.l.race)) {
d_log("postdel: Reading race data from file to memory\n");
readrace(g.l.race, &g.v, g.ui, g.gi);
}
d_log("postdel: Caching progress bar\n");
buffer_progress_bar(&g.v);
if (g.v.total.files_missing == g.v.total.files) {
empty_dir = 1;
}
d_log("postdel: SFV was removed - removing progressbar/completebar and -missing pointers.\n");
removecomplete(g.v.misc.release_type);
d_log("postdel: removing files created\n");
if (fileexists(g.l.sfv)) {
delete_sfv(g.l.sfv, &g.v);
unlink(g.l.sfv);
}
if (fileexists(g.l.sfvbackup))
unlink(g.l.sfvbackup);
if (g.l.nfo_incomplete)
unlink(g.l.nfo_incomplete);
if (g.l.sample_incomplete)
unlink(g.l.sample_incomplete);
if (g.l.incomplete)
unlink(g.l.incomplete);
d_log("postdel: removing progressbar, if any\n");
g.v.misc.release_type = ftype;
move_progress_bar(1, &g.v, g.ui, g.gi);
break;
case 3:
ftype = g.v.misc.release_type;
d_log("postdel: Removing old complete bar, if any\n");
removecomplete(g.v.misc.release_type);
g.v.misc.write_log = matchpath(sfv_dirs, g.l.path) > 0 ? 1 - matchpath(group_dirs, g.l.path) : 0;
if (fileexists(g.l.race)) {
d_log("postdel: Reading race data from file to memory\n");
readrace(g.l.race, &g.v, g.ui, g.gi);
} else {
empty_dir = 1;
}
if (fileexists(g.l.sfv)) {
#if ( create_missing_files == TRUE )
#if ( sfv_cleanup_lowercase == TRUE )
strtolower(g.v.file.name);
#endif
create_missing(g.v.file.name);
#endif
d_log("postdel: Reading file count from SFV\n");
readsfv(g.l.sfv, &g.v, 0);
d_log("postdel: Caching progress bar\n");
buffer_progress_bar(&g.v);
}
d_log("postdel: g.v.total.files_missing=%d, g.v.total.files=%d\n", g.v.total.files_missing, g.v.total.files);
if (g.v.total.files_missing < g.v.total.files) {
if (g.v.total.files_missing == 1) {
d_log("postdel: Writing INCOMPLETE to %s\n", log);
writelog(&g, convert(&g.v, g.ui, g.gi, incompletemsg), general_incomplete_type);
}
_incomplete = 1;
} else {
d_log("postdel: Removing old race data\n");
unlink(g.l.race);
if (findfileext(dir, ".sfv") == NULL) {
empty_dir = 1;
} else {
_incomplete = 1;
}
}
remove_from_race(g.l.race, g.v.file.name, &g.v);
break;
case 4:
ftype = g.v.misc.release_type;
if (!fileexists(g.l.race))
empty_dir = 1;
break;
case 255:
ftype = g.v.misc.release_type;
if (!fileexists(g.l.race))
empty_dir = 1;
break;
case 2:
ftype = g.v.misc.release_type;
if (!fileexists(g.l.race)) {
empty_dir = 1;
} else {
d_log("postdel: Reading race data from file to memory\n");
readrace(g.l.race, &g.v, g.ui, g.gi);
d_log("postdel: Caching progress bar\n");
buffer_progress_bar(&g.v);
if (g.v.total.files_missing == g.v.total.files)
empty_dir = 1;
}
break;
}
if (empty_dir == 1 && !findfileext(dir, ".sfv")) {
d_log("postdel: Removing all files and directories created by zipscript\n");
removecomplete(g.v.misc.release_type);
if (fileexists(g.l.sfv))
delete_sfv(g.l.sfv, &g.v);
if (g.l.nfo_incomplete)
unlink(g.l.nfo_incomplete);
if (g.l.incomplete)
unlink(g.l.incomplete);
if (fileexists("file_id.diz"))
unlink("file_id.diz");
if (fileexists(g.l.race))
unlink(g.l.race);
if (fileexists(g.l.sfv))
unlink(g.l.sfv);
if (fileexists(g.l.sfvbackup))
unlink(g.l.sfvbackup);
if (fileexists(g.l.leader))
unlink(g.l.leader);
g.v.misc.release_type = ftype;
move_progress_bar(1, &g.v, g.ui, g.gi);
#if (remove_dot_files_on_delete == TRUE)
removedotfiles(dir);
#endif
}
if (_incomplete == 1 && g.v.total.files > 0) {
g.v.misc.data_completed = 0;
getrelname(&g);
if (g.l.nfo_incomplete) {
if (findfileext(dir, ".nfo")) {
d_log("postdel: Removing missing-nfo indicator (if any)\n");
remove_nfo_indicator(&g);
} else if (matchpath(check_for_missing_nfo_dirs, g.l.path) && (!matchpath(group_dirs, g.l.path) || create_incomplete_links_in_group_dirs)) {
if (!g.l.in_cd_dir) {
d_log("postdel: Creating missing-nfo indicator %s.\n", g.l.nfo_incomplete);
if (create_incomplete_nfo()) {
d_log("postdel: Warning: create_incomplete_nfo() returned something.\n");
}
} else {
if (findfileextparent(parent, ".nfo")) {
d_log("postdel: Removing missing-nfo indicator (if any)\n");
remove_nfo_indicator(&g);
} else {
d_log("postdel: Creating missing-nfo indicator (base) %s.\n", g.l.nfo_incomplete);
/* This is not pretty, but should be functional. */
if ((inc_point[0] = find_last_of(g.l.path, "/")) != g.l.path)
*inc_point[0] = '\0';
if ((inc_point[1] = find_last_of(g.v.misc.release_name, "/")) != g.v.misc.release_name)
*inc_point[1] = '\0';
if (create_incomplete_nfo()) {
d_log("postdel: Warning: create_incomplete_nfo() returned something.\n");
}
if (*inc_point[0] == '\0')
*inc_point[0] = '/';
if (*inc_point[1] == '\0')
*inc_point[1] = '/';
}
}
}
}
#if (create_missing_sample_link)
if (g.l.sample_incomplete) {
if (findfileextsub(".", sample_types, sample_list) || matchpartialdirname(missing_sample_check_ignore_list, g.v.misc.release_name, missing_sample_check_ignore_dividers)) {
d_log("postdel: Removing missing-sample indicator (if any)\n");
remove_sample_indicator(&g);
} else if (matchpath(check_for_missing_sample_dirs, g.l.path) && (!matchpath(group_dirs, g.l.path) || create_incomplete_links_in_group_dirs)) {
if (!g.l.in_cd_dir) {
d_log("postdel: Creating missing-sample indicator %s.\n", g.l.sample_incomplete);
if (create_incomplete_sample()) {
d_log("postdel: Warning: create_incomplete_sample() returned something.\n");
}
} else {
if (findfileextsub("..", sample_types, sample_list)) {
d_log("postdel: Removing missing-sample indicator (if any)\n");
remove_sample_indicator(&g);
} else {
d_log("postdel: Creating missing-sample indicator (base) %s.\n", g.l.sample_incomplete);
/* This is not pretty, but should be functional. */
if ((inc_point[0] = find_last_of(g.l.path, "/")) != g.l.path)
*inc_point[0] = '\0';
if ((inc_point[1] = find_last_of(g.v.misc.release_name, "/")) != g.v.misc.release_name)
*inc_point[1] = '\0';
if (create_incomplete_sample()) {
d_log("postdel: Warning: create_incomplete_sample() returned something.\n");
}
if (*inc_point[0] == '\0')
*inc_point[0] = '/';
if (*inc_point[1] == '\0')
*inc_point[1] = '/';
}
}
}
}
#endif
if (!matchpath(group_dirs, g.l.path) || create_incomplete_links_in_group_dirs) {
d_log("postdel: Creating incomplete indicator\n");
d_log("postdel: incomplete: '%s', path: '%s'\n", g.l.incomplete, g.l.path);
if (create_incomplete()) {
d_log("postdel: Warning: create_incomplete() returned something.\n");
}
}
d_log("postdel: Moving progress bar (%d)\n", g.v.misc.release_type);
g.v.misc.release_type = ftype;
move_progress_bar(0, &g.v, g.ui, g.gi);
}
d_log("postdel: Releasing memory and removing lock.\n");
closedir(dir);
closedir(parent);
updatestats_free(&g);
ng_free(target);
ng_free(g.l.race);
ng_free(g.l.sfv);
ng_free(g.l.sfvbackup);
ng_free(g.l.leader);
remove_lock(&g.v);
if (empty_dir) {
d_log("postdel: Removing missing-sfv indicator (if any)\n");
unlink(g.l.sfv_incomplete);
if (fileexists(".debug") && remove_dot_debug_on_delete)
unlink(".debug");
}
d_log("postdel: Exit 0\n");
return 0;
}
/*
* Modified : 01.20.2002 Author : Dark0n3
*
* Description : Parses file entries from sfv file and store them in a file.
*
* Todo : Add dupefile remover.
*
* Totally rewritten by js on 08.02.2005
*/
int
copysfv(const char *source, const char *target, struct VARS *raceI)
{
int infd, outfd, i, retval = 0;
short int music, rars, video, others, type;
char *ptr, fbuf[2048];
FILE *insfv;
DIR *dir;
SFVDATA sd;
//#if ( sfv_dupecheck == TRUE )
int skip = 0;
SFVDATA tempsd;
//#endif
#if ( sfv_cleanup == TRUE )
int tmpfd;
char crctmp[16];
if ((tmpfd = open(".tmpsfv", O_CREAT | O_TRUNC | O_RDWR, 0644)) == -1)
d_log("copysfv: open(.tmpsfv): %s\n", strerror(errno));
#endif
if ((infd = open(source, O_RDONLY)) == -1) {
d_log("copysfv: open(%s): %s\n", source, strerror(errno));
remove_lock(raceI);
exit(EXIT_FAILURE);
}
if ((outfd = open(target, O_CREAT | O_TRUNC | O_RDWR, 0666)) == -1) {
d_log("copysfv: open(%s): %s\n", target, strerror(errno));
remove_lock(raceI);
exit(EXIT_FAILURE);
}
video = music = rars = others = type = 0;
dir = opendir(".");
if (!update_lock(raceI, 1, 0)) {
d_log("copysfv: Lock is suggested removed. Will comply and exit\n");
remove_lock(raceI);
exit(EXIT_FAILURE);
}
if ((insfv = fdopen(infd, "r")) == NULL) {
d_log("copysfv: Unable to fdopen %s: %s\n", source, strerror(errno));
remove_lock(raceI);
exit(EXIT_FAILURE);
}
while ((fgets(fbuf, sizeof(fbuf), insfv))) {
/* remove comment */
if ((ptr = find_first_of(fbuf, ";")))
*ptr = '\0';
tailstrip_chars(fbuf, WHITESPACE_STR);
ptr = prestrip_chars(fbuf, WHITESPACE_STR);
if (ptr != fbuf)
d_log("copysfv: prestripped whitespaces (%d chars)\n", ptr - fbuf);
if (strlen(ptr) == 0)
continue;
#if (sfv_cleanup_lowercase == TRUE)
for (; *ptr; ptr++)
*ptr = tolower(*ptr);
#endif
sd.crc32 = 0;
bzero(sd.fname, sizeof(sd.fname));
if ((ptr = find_last_of(fbuf, " \t"))) {
/* pass the " \t" */
ptr++;
/* what we have now is hopefully a crc */
for (i = 0; isxdigit(*ptr) != 0; i++)
ptr++;
ptr -= i;
if (i > 8 || i < 6) {
/* we didn't get an 8 digit crc number */
#if (sfv_cleanup == TRUE)
/* do stuff */
d_log("copysfv: We did not get a 8 digit crc number for %s - trying to continue anyway\n", sd.fname);
#else
retval = 1;
goto END;
#endif
} else {
sd.crc32 = hexstrtodec(ptr);
/* cut off crc string */
*ptr = '\0';
/* nobody should be stupid enough to have spaces
* at the end of the file name */
tailstrip_chars(fbuf, WHITESPACE_STR);
}
} else {
/* we have a filename only. */
#if (sfv_cleanup == TRUE)
/* do stuff */
d_log("copysfv: We did not find a crc number for %s - trying to continue anyway\n", sd.fname);
#else
retval = 1;
goto END;
#endif
}
/* we assume what's left is a filename */
ptr = prestrip_chars(fbuf, WHITESPACE_STR);
if (ptr != fbuf)
d_log("copysfv: prestripped whitespaces (%d chars)\n", ptr - fbuf);
#if (allow_slash_in_sfv == TRUE)
if (ptr != find_last_of(ptr, "/")) {
ptr = find_last_of(ptr, "/") + 1;
d_log("copysfv: found '/' in filename - adjusting.\n");
}
if (ptr != find_last_of(ptr, "\\")) {
ptr = find_last_of(ptr, "\\") + 1;
d_log("copysfv: found '\\' in filename - adjusting.\n");
}
#endif
if (strlen(ptr) > 0 && strlen(ptr) < NAME_MAX-9 ) {
strlcpy(sd.fname, ptr, NAME_MAX-9);
if (sd.fname != find_last_of(sd.fname, "\t") || sd.fname != find_last_of(sd.fname, "\\") || sd.fname != find_last_of(sd.fname, "/")) {
d_log("copysfv: found '/', '\\' or <TAB> as part of filename in sfv - logging file as bad.\n");
retval = 1;
break;
}
if (sd.crc32 == 0) {
#if (sfv_calc_single_fname == TRUE || create_missing_sfv == TRUE)
sd.crc32 = match_lenient(dir, sd.fname);
d_log("copysfv: Got filename (%s) without crc, calculated to %X.\n", sd.fname, sd.crc32);
#else
d_log("copysfv: Got filename (%s) without crc - ignoring file.\n", sd.fname);
continue;
#endif
}
/* get file extension */
ptr = find_last_of(fbuf, ".");
if (*ptr == '.')
ptr++;
if (!strcomp(ignored_types, ptr) && !(strcomp(allowed_types, ptr) && !matchpath(allowed_types_exemption_dirs, raceI->misc.current_path)) && !strcomp("sfv", ptr) && !strcomp("nfo", ptr)) {
skip = 0;
//#if ( sfv_dupecheck == TRUE )
/* read from sfvdata - no parsing */
lseek(outfd, 0L, SEEK_SET);
while (read(outfd, &tempsd, sizeof(SFVDATA)))
// if (!strcmp(sd.fname, tempsd.fname) || (sd.crc32 == tempsd.crc32 && sd.crc32))
if (!strcmp(sd.fname, tempsd.fname))
skip = 1;
lseek(outfd, 0L, SEEK_END);
#if ( sfv_dupecheck == TRUE )
if (skip)
continue;
#endif
d_log("copysfv: File in sfv: '%s' (%x)\n", sd.fname, sd.crc32);
#if ( sfv_cleanup == TRUE )
/* write good stuff to .tmpsfv */
if (tmpfd != -1) {
sprintf(crctmp, "%.8x", sd.crc32);
if (write(tmpfd, sd.fname, strlen(sd.fname)) != (int)strlen(sd.fname))
d_log("copysfv: write failed: %s\n", strerror(errno));
if (write(tmpfd, " ", 1) != 1)
d_log("copysfv: write failed: %s\n", strerror(errno));
if (write(tmpfd, crctmp, 8) != 8)
d_log("copysfv: write failed: %s\n", strerror(errno));
#if (sfv_cleanup_crlf == TRUE )
if (write(tmpfd, "\r", 1) != 1)
d_log("copysfv: write failed: %s\n", strerror(errno));
#endif
if (write(tmpfd, "\n", 1) != 1)
d_log("copysfv: write failed: %s\n", strerror(errno));
}
#endif
if (strcomp(audio_types, ptr))
music++;
else if (israr(ptr))
rars++;
else if (strcomp(video_types, ptr))
video++;
else
others++;
#if ( create_missing_files == TRUE )
if (!findfile(dir, sd.fname) && !(matchpath(allowed_types_exemption_dirs, raceI->misc.current_path) && strcomp(allowed_types, ptr)))
create_missing(sd.fname, raceI);
#endif
if (write(outfd, &sd, sizeof(SFVDATA)) != sizeof(SFVDATA))
d_log("copysfv: write failed: %s\n", strerror(errno));
}
}
}
if (music > rars) {
if (video > music)
type = (video >= others ? 4 : 2);
else
type = (music >= others ? 3 : 2);
} else {
if (video > rars)
type = (video >= others ? 4 : 2);
else
type = (rars >= others ? 1 : 2);
}
#if ( sfv_cleanup == FALSE )
END:
#endif
close(infd);
#if ( sfv_cleanup == TRUE )
if (tmpfd != -1) {
close(tmpfd);
unlink(source);
rename(".tmpsfv", source);
#ifdef USING_EBFTPD
if (ebftpd_chown(source, raceI->user.uid, raceI->user.gid) < 0)
d_log("copysfv: ebftpd_chown(%s,%i,%i): %s\n", source, raceI->user.uid, raceI->user.gid, strerror(errno));
#endif
}
#endif
closedir(dir);
close(outfd);
if (!update_lock(raceI, 1, type)) {
d_log("copysfv: Lock is suggested removed. Will comply and exit\n");
remove_lock(raceI);
exit(EXIT_FAILURE);
}
raceI->data_type = type;
return retval;
}
/*
* Modified : 01.18.2002 Author : Dark0n3
*
* Description : Writes stuff into race file.
*/
void
writerace(const char *path, struct VARS *raceI, unsigned int crc, unsigned char status)
{
int fd, count, ret;
RACEDATA rd;
d_log("writerace: writing racedata to file %s\n", path);
/* create file if it doesn't exist */
if ((fd = open(path, O_CREAT | O_RDWR, 0666)) == -1) {
if (errno != EEXIST) {
d_log("writerace: open(%s): %s\n", path, strerror(errno));
remove_lock(raceI);
exit(EXIT_FAILURE);
}
}
if (!update_lock(raceI, 1, 0)) {
d_log("writerace: Lock is suggested removed. Will comply and exit\n");
remove_lock(raceI);
exit(EXIT_FAILURE);
}
/* find an existing entry that we will overwrite */
count = 0;
while ((ret = read(fd, &rd, sizeof(RACEDATA)))) {
if (ret == -1) {
d_log("writerace: read(%s): %s\n", path, strerror(errno));
remove_lock(raceI);
exit(EXIT_FAILURE);
}
#if (sfv_cleanup_lowercase)
if (strncasecmp(rd.fname, raceI->file.name, NAME_MAX) == 0) {
#else
if (strncmp(rd.fname, raceI->file.name, NAME_MAX) == 0) {
#endif
lseek(fd, sizeof(RACEDATA) * count, SEEK_SET);
break;
}
count++;
}
bzero(&rd, sizeof(RACEDATA));
rd.status = status;
rd.crc32 = crc;
strlcpy(rd.fname, raceI->file.name, NAMEMAX);
strlcpy(rd.uname, raceI->user.name, 24);
strlcpy(rd.group, raceI->user.group, 24);
rd.size = raceI->file.size;
rd.speed = raceI->file.speed;
rd.start_time = raceI->total.start_time;
if (write(fd, &rd, sizeof(RACEDATA)) != sizeof(RACEDATA))
d_log("writerace: write failed: %s\n", strerror(errno));
close(fd);
}
/* remove file entry from racedata file */
void
remove_from_race(const char *path, const char *f, struct VARS *raceI)
{
int fd, i, max;
RACEDATA rd, *tmprd = 0;
if ((fd = open(path, O_RDONLY)) == -1) {
d_log("remove_from_race: open(%s): %s\n", path, strerror(errno));
return;
}
for (i = 0; (read(fd, &rd, sizeof(RACEDATA)));) {
#if (sfv_cleanup_lowercase)
if (strcasecmp(rd.fname, f) != 0) {
#else
if (strcmp(rd.fname, f) != 0) {
#endif
tmprd = ng_realloc(tmprd, sizeof(RACEDATA)*(i+1), 0, 1, raceI, 0);
memcpy(&tmprd[i], &rd, sizeof(RACEDATA));
i++;
}
}
close(fd);
if ((fd = open(path, O_TRUNC | O_WRONLY)) == -1) {
d_log("remove_from_race: open(%s): %s\n", path, strerror(errno));
ng_free(tmprd);
return;
}
max = i;
for (i = 0; i < max; i++)
if (write(fd, &tmprd[i], sizeof(RACEDATA)) != sizeof(RACEDATA))
d_log("remove_from_race: write failed: %s\n", strerror(errno));
close(fd);
ng_free(tmprd);
}
int
verify_racedata(const char *path, struct VARS *raceI)
{
int fd, i, ret, max;
RACEDATA rd, *tmprd = 0;
if ((fd = open(path, O_RDWR, 0666)) == -1) {
d_log("verify_racedata: open(%s): %s\n", path, strerror(errno));
return 0;
}
for (i = 0; (ret = read(fd, &rd, sizeof(RACEDATA)));) {
d_log(" verify_racedata: Verifying %s..\n", rd.fname);
if (!strlen(rd.fname)) {
d_log(" verify_racedata: ERROR! Something is wrong with the racedata!\n");
} else if (fileexists(rd.fname)) {
tmprd = ng_realloc(tmprd, sizeof(RACEDATA)*(i+1), 0, 1, raceI, 0);
memcpy(&tmprd[i], &rd, sizeof(RACEDATA));
i++;
} else {
d_log("verify_racedata: Oops! %s is missing - removing from racedata (ret=%d)\n", rd.fname, ret);
create_missing(rd.fname, raceI);
}
}
close(fd);
if ((fd = open(path, O_TRUNC | O_WRONLY)) == -1) {
d_log("verify_racedata: open(%s): %s\n", path, strerror(errno));
ng_free(tmprd);
return 0;
}
max = i;
d_log(" verify_racedata: write(%s)\n", path);
for (i = 0; i < max; i++) {
d_log(" verify_racedata: write (%i)\n", i);
if (write(fd, &tmprd[i], sizeof(RACEDATA)) != sizeof(RACEDATA))
d_log("remove_from_race: write failed: %s\n", strerror(errno));
d_log(" verify_racedata: write (%i) done.\n", i);
}
close(fd);
d_log(" verify_racedata: write(%s) done.\n", path);
ng_free(tmprd);
return 1;
}
/*
* Modified : 01.16.2002 Author : Dark0n3
*
* Description : Goes through all untested files and compares crc of file
* with one that is reported in sfv.
*
*/
void
testfiles(struct LOCATIONS *locations, struct VARS *raceI, int rstatus)
{
int fd, lret, count;
char *ext, target[PATH_MAX], real_file[PATH_MAX];
FILE *racefile;
unsigned int Tcrc;
struct stat filestat;
time_t timenow;
RACEDATA rd;
if ((fd = open(locations->race, O_CREAT | O_RDWR, 0666)) == -1) {
if (errno != EEXIST) {
d_log("testfiles: open(%s): %s\n", locations->race, strerror(errno));
remove_lock(raceI);
exit(EXIT_FAILURE);
}
}
close(fd);
if (!(racefile = fopen(locations->race, "r+"))) {
d_log("testfiles: fopen(%s) failed\n", locations->race);
exit(EXIT_FAILURE);
}
strlcpy(real_file, raceI->file.name, sizeof(real_file));
if (rstatus)
printf("\n");
count = 0;
rd.status = F_NOTCHECKED;
while ((fread(&rd, sizeof(RACEDATA), 1, racefile))) {
if (!update_lock(raceI, 1, 0)) {
d_log("testfiles: Lock is suggested removed. Will comply and exit\n");
remove_lock(raceI);
fclose(racefile);
exit(EXIT_FAILURE);
}
ext = find_last_of(raceI->file.name, ".");
if (*ext == '.')
ext++;
strlcpy(raceI->file.name, rd.fname, NAME_MAX);
Tcrc = readsfv(locations->sfv, raceI, 0);
timenow = time(NULL);
stat(rd.fname, &filestat);
if (fileexists(rd.fname)) {
d_log("testfiles: Processing %s\n", rd.fname);
if (S_ISDIR(filestat.st_mode))
rd.status = F_IGNORED;
else if (rd.crc32 != 0 && Tcrc == rd.crc32)
rd.status = F_CHECKED;
else if (rd.crc32 != 0 && strcomp(ignored_types, ext))
rd.status = F_IGNORED;
else if (rd.crc32 != 0 && Tcrc == 0 && (strcomp(allowed_types, ext) && !matchpath(allowed_types_exemption_dirs, locations->path)))
rd.status = F_IGNORED;
else if ((rd.crc32 != 0) && (Tcrc != rd.crc32) &&
(strcomp(allowed_types, ext) &&
!matchpath(allowed_types_exemption_dirs, locations->path)))
rd.status = F_IGNORED;
else if ((rd.crc32 == 0) && strcomp(allowed_types, ext))
rd.status = F_IGNORED;
else if ((timenow == filestat.st_ctime) && (filestat.st_mode & 0111)) {
d_log("testfiles: Looks like this file (%s) is in the process of being uploaded. Ignoring.\n", rd.fname);
rd.status = F_IGNORED;
create_missing(rd.fname, raceI);
}
} else if (snprintf(target, sizeof(target), "%s.bad", rd.fname) > 4 && fileexists(target)) {
d_log("testfiles: File doesnt exist (%s), bad version of it does, keeping it marked as bad.\n", rd.fname);
rd.status = F_BAD;
if (rstatus)
printf("File: %s BAD!\n", rd.fname);
} else {
d_log("testfiles: File doesnt exist (%s), marking as missing.\n", rd.fname);
rd.status = F_MISSING;
if (rstatus)
printf("File: %s MISSING!\n", rd.fname);
remove_from_race(locations->race, rd.fname, raceI);
--count;
}
if (rd.status == F_MISSING || rd.status == F_NOTCHECKED) {
if (rd.status == F_NOTCHECKED) {
d_log("testfiles: Marking file (%s) as bad and removing it.\n", rd.fname);
mark_as_bad(rd.fname);
if (rd.fname)
unlink(rd.fname);
rd.status = F_BAD;
if (rstatus)
printf("File: %s FAILED!\n", rd.fname);
}
#if ( create_missing_files )
if (Tcrc != 0)
create_missing(rd.fname, raceI);
#endif
#if (enable_unduper_script == TRUE)
if (!fileexists(unduper_script)) {
d_log("Failed to undupe '%s' - '%s' does not exist.\n", rd.fname, unduper_script);
} else {
sprintf(target, unduper_script " \"%s\"", rd.fname);
if (execute(target) == 0)
d_log("testfiles: undupe of %s successful (%s).\n", rd.fname, target);
else
d_log("testfiles: undupe of %s failed (%s).\n", rd.fname, target);
}
#endif
}
if (rd.status != F_MISSING) {
if ((lret = fseek(racefile, sizeof(RACEDATA) * count, SEEK_SET)) == -1) {
d_log("testfiles: fseek: %s\n", strerror(errno));
fclose(racefile);
remove_lock(raceI);
exit(EXIT_FAILURE);
}
if (fwrite(&rd, sizeof(RACEDATA), 1, racefile) == 0)
d_log("testfiles: write failed: %s\n", strerror(errno));
if (rd.status != F_BAD && !((timenow == filestat.st_ctime) && (filestat.st_mode & 0111)))
unlink_missing(rd.fname);
}
++count;
}
strlcpy(raceI->file.name, real_file, strlen(real_file)+1);
raceI->total.files = raceI->total.files_missing = 0;
fclose(racefile);
d_log("testfiles: finished checking\n");
}
