summaryrefslogtreecommitdiff
path: root/app/bin/directory.c
blob: b0a2b2317e406374f48ea381c64140a21864b056 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
/** \file directory.c
 * Directory Management
 */

/*  XTrkCad - Model Railroad CAD
 *  Copyright (C) 2018 Adam Richards and Martin Fischer
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

#include "directory.h"
#include "dynstring.h"
#include "misc.h"
#include "common-ui.h"

/*****************************************************************************
 * Safe Create Dir
 * \param IN dir The directory path to create
 *
 * \return TRUE if ok
 *
 */

BOOL_T SafeCreateDir(const char *dir)
{
	int err;

	err = mkdir(dir, 0755);
	if (err < 0) {
		if (errno != EEXIST) {
			NoticeMessage(MSG_DIR_CREATE_FAIL,
			              _("Continue"), NULL, dir, strerror(errno));
			perror(dir);
			return FALSE;
		}
	}
	return TRUE;
}

/************************************************
 * DeleteDirectory empties and removes a directory recursively
 *
 * \param IN dir_path The Directory to empty and remove
 *
 * \return TRUE if ok
 *
 */
BOOL_T DeleteDirectory(const char *dir_path)
{
	size_t path_len;
	char *full_path = NULL;
	DIR *dir;
	struct stat stat_path, stat_entry;
	struct dirent *entry;
	DynString path;

	// stat for the path
	int resp = stat(dir_path, &stat_path);

	if (resp != 0 && errno == ENOENT) {
		return TRUE;    //Does not Exist
	}

	// if path is not dir - exit
	if (!(S_ISDIR(stat_path.st_mode))) {
		NoticeMessage(MSG_NOT_DIR_FAIL,
		              _("Continue"), NULL, dir_path);
		return FALSE;
	}

	// if not possible to read the directory for this user
	if ((dir = opendir(dir_path)) == NULL) {
		NoticeMessage(MSG_DIR_OPEN_FAIL,
		              _("Continue"), NULL, dir_path);
		return FALSE;
	}

	// the length of the path
	path_len = strlen(dir_path) + 1;
	DynStringMalloc(&path, path_len + 16);	//guessing the total path length

	// iteration through entries in the directory
	while ((entry = readdir(dir)) != NULL) {

		// skip entries "." and ".."
		if (!strcmp(entry->d_name, ".") || !strcmp(entry->d_name, "..")) {
			continue;
		}

		// determinate a full path of an entry
		DynStringReset(&path);
		DynStringCatCStrs(&path, dir_path, FILE_SEP_CHAR, entry->d_name, NULL);
		full_path = DynStringToCStr(&path);
		// stat for the entry
		stat(full_path, &stat_entry);

		// recursively remove a nested directory
		if (S_ISDIR(stat_entry.st_mode) != 0) {
			DeleteDirectory(full_path);
			continue;
		}

		// remove a file object
		if (unlink(full_path)) {
			NoticeMessage(MSG_UNLINK_FAIL, _("Continue"), NULL, full_path);
			DynStringFree(&path);
			closedir(dir);
			return FALSE;
		} else {
#if DEBUG
			printf("Removed a file: %s \n", full_path);
#endif
		}
	}

	closedir(dir);
	DynStringFree(&path);

	// remove the devastated directory and close the object of it
	if (rmdir(dir_path)) {
		NoticeMessage(MSG_RMDIR_FAIL, _("Continue"), NULL, dir_path);
		return FALSE;
	} else {
#if DEBUG
		printf("Removed a directory: %s \n", dir_path);
#endif
	}
	return TRUE;
}