misc.c


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


#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include "misc.h"

char *read_file(const char *filename, long *size) {
	/* Open the file. */
	FILE *fp = fopen(filename, "r");
	/* Size of the file, in bytes. */
	long filesize = 0;
	/* Buffer of the file contents. */
	char *buf;

	/* Return NULL, if we couldn't open the file. */
	if (fp == NULL) {
		return NULL;
	}

	/* Return NULL, if we couldn't seek to the end of the file. */
	if (fseek(fp, 0L, SEEK_END)) {
		fclose(fp);
		return NULL;
	}

	/* Get the size of the file, in bytes. */
	filesize = ftell(fp);

	/* Return NULL, if the returned size is negative. */
	if (filesize < 0) {
		fclose(fp);
		return NULL;
	}

	/* Allocate enough space for the entire file, plus one. */
	buf = calloc(filesize+1, sizeof(char));

	/* Return NULL, if the buffer wasn't allocated. */
	if (buf == NULL) {
		fclose(fp);
		return NULL;
	}

	/* Seek back to the start of the file. */
	rewind(fp);
	/* Read the entire file contents into the buffer. */
	fread(buf, sizeof(char), filesize, fp);
	/* Close the file. */
	fclose(fp);

	/* Return the filesize, in bytes. */
	*size = filesize;
	/* Return the buffer. */
	return buf;
}

char *get_line(char **str) {
	char *s;
	size_t i;
	char *tmp = *str;

	for (i = 0; tmp[i] != '\n' && tmp[i] != '\0'; i++);

	s = calloc(i+1, sizeof(char));
	memcpy(s, *str, i);

	*str += (i+1);
	return s;
}

char *make_str(const char *str) {
	const size_t length = strlen(str);
	char *s = calloc(length+1, sizeof(char));
	memcpy(s, str, length+1);
	return s;
}

char *dir_path_num(const char *root, int num) {
	/* Get the length of the path. */
	int len = snprintf(NULL, 0, "%s/%i", root, num);
	/* Create the directory path. */
	char *dir = calloc(len+1, sizeof(char));
	sprintf(dir, "%s/%i", root, num);
	return dir;
}

char *dir_path_name(const char *root, char *name) {
	/* Get the length of the path. */
	int len = snprintf(NULL, 0, "%s/%s", root, name);
	/* Create the directory path. */
	char *dir = calloc(len+1, sizeof(char));
	sprintf(dir, "%s/%s", root, name);
	return dir;
}

int delm_span(char *str, const char delm) {
	int i;
	for (i = 0; str[i] == delm; i++);
	return i;
}

int sanitize_strlen(char *str) {
	int len = 0;
	while (*str != '\0') {
		const int tok_len = strcspn(str, " .");
		const char delm = str[tok_len];
		const int span_len = (delm != '\0') ? delm_span(&str[tok_len+1], delm) : 0;
		str += (tok_len + span_len);
		len += tok_len;
	}
	return len;
}

char *sanitize_str(char *str) {
	const int len = sanitize_strlen(str);
	char *san_str = calloc(len+1, sizeof(char));
	char *tmp = san_str;
	while (*str != '\0' && tmp < &san_str[len]) {
		const int tok_len = strcspn(str, " .");
		const char delm = str[tok_len];
		const int span_len = (delm != '\0') ? delm_span(&str[tok_len+1], delm) : 0;
		memcpy(tmp, str, tok_len);
		tmp += tok_len;
		str += (tok_len + span_len);
		*tmp = (delm == ' ') ? '-' : delm;
	}
	return san_str;
}