blob: 6cf2455000458ee6db3870e4939630144ea6a753 (
plain) (
blame)
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
|
/***
*makepath.c - create path name from components
*
* Copyright (c) 1987-1991, Microsoft Corporation. All rights reserved.
*
*Purpose:
* To provide support for creation of full path names from components
*
*Revision History:
* 06-13-87 DFW initial version
* 08-05-87 JCR Changed appended directory delimeter from '/' to '\'.
* 09-24-87 JCR Removed 'const' from declarations (caused cl warnings).
* 12-11-87 JCR Added "_LOAD_DS" to declaration
* 11-20-89 GJF Fixed copyright, indents. Added const to types of
* appropriate args.
* 03-14-90 GJF Replaced _LOAD_DS with _CALLTYPE1 and added #include
* <cruntime.h>.
* 10-04-90 GJF New-style function declarator.
* 06-09-93 KRS Add _MBCS support.
*
*******************************************************************************/
#include <cruntime.h>
#include <stdlib.h>
#ifdef _MBCS
#include <mbdata.h>
#include <mbstring.h>
#endif
/***
*void _makepath() - build path name from components
*
*Purpose:
* create a path name from its individual components
*
*Entry:
* char *path - pointer to buffer for constructed path
* char *drive - pointer to drive component, may or may not contain
* trailing ':'
* char *dir - pointer to subdirectory component, may or may not include
* leading and/or trailing '/' or '\' characters
* char *fname - pointer to file base name component
* char *ext - pointer to extension component, may or may not contain
* a leading '.'.
*
*Exit:
* path - pointer to constructed path name
*
*Exceptions:
*
*******************************************************************************/
void _CALLTYPE1 _makepath (
register char *path,
const char *drive,
const char *dir,
const char *fname,
const char *ext
)
{
register const char *p;
/* we assume that the arguments are in the following form (although we
* do not diagnose invalid arguments or illegal filenames (such as
* names longer than 8.3 or with illegal characters in them)
*
* drive:
* A ; or
* A:
* dir:
* \top\next\last\ ; or
* /top/next/last/ ; or
* either of the above forms with either/both the leading
* and trailing / or \ removed. Mixed use of '/' and '\' is
* also tolerated
* fname:
* any valid file name
* ext:
* any valid extension (none if empty or null )
*/
/* copy drive */
if (drive && *drive) {
*path++ = *drive;
*path++ = ':';
}
/* copy dir */
if ((p = dir) && *p) {
do {
*path++ = *p++;
}
while (*p);
#ifdef _MBCS
if (*(p=_mbsdec(dir,p)) != '/' && *p != '\\') {
#else
if (*(p-1) != '/' && *(p-1) != '\\') {
#endif
*path++ = '\\';
}
}
/* copy fname */
if (p = fname) {
while (*p) {
*path++ = *p++;
}
}
/* copy ext, including 0-terminator - check to see if a '.' needs
* to be inserted.
*/
if (p = ext) {
if (*p && *p != '.') {
*path++ = '.';
}
while (*path++ = *p++)
;
}
else {
/* better add the 0-terminator */
*path = '\0';
}
}
|
