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
|
/* Compiler implementation of the D programming language
* Copyright (C) 1999-2018 by The D Language Foundation, All Rights Reserved
* written by Walter Bright
* http://www.digitalmars.com
* Distributed under the Boost Software License, Version 1.0.
* http://www.boost.org/LICENSE_1_0.txt
*/
#include <string.h>
#include "mars.h"
#include "globals.h"
#include "root/file.h"
#include "root/filename.h"
#include "root/outbuffer.h"
/**
* Normalize path by turning forward slashes into backslashes
*
* Params:
* src = Source path, using unix-style ('/') path separators
*
* Returns:
* A newly-allocated string with '/' turned into backslashes
*/
const char * toWinPath(const char *src)
{
if (src == NULL)
return NULL;
char *result = strdup(src);
char *p = result;
while (*p != '\0')
{
if (*p == '/')
*p = '\\';
p++;
}
return result;
}
/**
* Reads a file, terminate the program on error
*
* Params:
* loc = The line number information from where the call originates
* f = a `ddmd.root.file.File` handle to read
*/
void readFile(Loc loc, File *f)
{
if (f->read())
{
error(loc, "Error reading file '%s'", f->name->toChars());
fatal();
}
}
/**
* Writes a file, terminate the program on error
*
* Params:
* loc = The line number information from where the call originates
* f = a `ddmd.root.file.File` handle to write
*/
void writeFile(Loc loc, File *f)
{
if (f->write())
{
error(loc, "Error writing file '%s'", f->name->toChars());
fatal();
}
}
/**
* Ensure the root path (the path minus the name) of the provided path
* exists, and terminate the process if it doesn't.
*
* Params:
* loc = The line number information from where the call originates
* name = a path to check (the name is stripped)
*/
void ensurePathToNameExists(Loc loc, const char *name)
{
const char *pt = FileName::path(name);
if (*pt)
{
if (FileName::ensurePathExists(pt))
{
error(loc, "cannot create directory %s", pt);
fatal();
}
}
FileName::free(pt);
}
/**
* Takes a path, and escapes '(', ')' and backslashes
*
* Params:
* buf = Buffer to write the escaped path to
* fname = Path to escape
*/
void escapePath(OutBuffer *buf, const char *fname)
{
while (1)
{
switch (*fname)
{
case 0:
return;
case '(':
case ')':
case '\\':
buf->writeByte('\\');
/* fall through */
default:
buf->writeByte(*fname);
break;
}
fname++;
}
}
|
