]>
Commit | Line | Data |
---|---|---|
b24c88b3 RC |
1 | /* |
2 | * Copyright (c) 2001, Robert Collins. | |
3 | * | |
4 | * This program is free software; you can redistribute it and/or modify | |
5 | * it under the terms of the GNU General Public License as published by | |
6 | * the Free Software Foundation; either version 2 of the License, or | |
7 | * (at your option) any later version. | |
8 | * | |
9 | * A copy of the GNU General Public License can be found at | |
10 | * http://www.gnu.org/ | |
11 | * | |
12 | * Written by Robert Collins <rbtcollins@hotmail.com> | |
13 | * | |
14 | */ | |
15 | ||
16 | #if 0 | |
17 | static const char *cvsid = | |
18 | "\n%%% $Id$\n"; | |
19 | #endif | |
20 | ||
21 | #include "win32.h" | |
22 | #include <stdio.h> | |
23 | #include <stdlib.h> | |
24 | #include <unistd.h> | |
25 | #include "log.h" | |
26 | #include "port.h" | |
27 | #include "mklink2.h" | |
28 | ||
29 | #include "io_stream.h" | |
30 | #include "io_stream_file.h" | |
31 | ||
32 | /* for set_mtime */ | |
33 | #define FACTOR (0x19db1ded53ea710LL) | |
34 | #define NSPERSEC 10000000LL | |
35 | ||
36 | io_stream_file::io_stream_file (const char *name, const char *mode) | |
37 | { | |
38 | fname = NULL; | |
39 | fp = NULL; | |
40 | errno = 0; | |
41 | if (!name || IsBadStringPtr (name, MAX_PATH) || !name[0] || | |
42 | !mode || IsBadStringPtr (mode, 5) || !mode[0]) | |
43 | return; | |
44 | lmode = strdup (mode); | |
45 | fname = strdup (name); | |
46 | fp = fopen (name, mode); | |
47 | if (!fp) | |
48 | lasterr = errno; | |
49 | } | |
50 | ||
51 | io_stream_file::~io_stream_file () | |
52 | { | |
53 | if (fname) | |
54 | free (fname); | |
55 | if (fp) | |
56 | fclose (fp); | |
57 | } | |
58 | ||
59 | int | |
60 | io_stream_file::exists (const char *path) | |
61 | { | |
62 | if (_access (path, 0) == 0) | |
63 | return 1; | |
64 | return 0; | |
65 | } | |
66 | ||
67 | int | |
68 | io_stream_file::remove (const char *path) | |
69 | { | |
70 | if (!path) | |
71 | return 1; | |
72 | ||
73 | unsigned long w = GetFileAttributes (path); | |
74 | if (w != 0xffffffff && w & FILE_ATTRIBUTE_DIRECTORY) | |
75 | { | |
76 | char *tmp = (char *) malloc (strlen (path) + 10); | |
77 | int i = 0; | |
78 | do | |
79 | { | |
80 | i++; | |
81 | sprintf (tmp, "%s.old-%d", path, i); | |
82 | } | |
83 | while (GetFileAttributes (tmp) != 0xffffffff); | |
84 | fprintf (stderr, "warning: moving directory \"%s\" out of the way.\n", | |
85 | path); | |
86 | MoveFile (path, tmp); | |
87 | free (tmp); | |
88 | } | |
89 | return !DeleteFileA (path); | |
90 | ||
91 | } | |
92 | ||
93 | int | |
94 | io_stream_file::mklink (const char *from, const char *to, | |
95 | io_stream_link_t linktype) | |
96 | { | |
97 | /* FIXME: badstring check */ | |
98 | if (!from || !to) | |
99 | return 1; | |
100 | switch (linktype) | |
101 | { | |
102 | case IO_STREAM_SYMLINK: | |
103 | return mkcygsymlink (from, to); | |
104 | case IO_STREAM_HARDLINK: | |
105 | return 1; | |
106 | } | |
107 | return 1; | |
108 | } | |
109 | ||
110 | /* virtuals */ | |
111 | ||
112 | ||
113 | ssize_t io_stream_file::read (void *buffer, size_t len) | |
114 | { | |
115 | if (fp) | |
116 | return fread (buffer, 1, len, fp); | |
117 | return 0; | |
118 | } | |
119 | ||
120 | ssize_t io_stream_file::write (void *buffer, size_t len) | |
121 | { | |
122 | if (fp) | |
123 | return fwrite (buffer, 1, len, fp); | |
124 | return 0; | |
125 | } | |
126 | ||
127 | ssize_t io_stream_file::peek (void *buffer, size_t len) | |
128 | { | |
129 | log (LOG_TIMESTAMP, "io_stream_file::peek called"); | |
130 | if (fp) | |
131 | { | |
132 | int | |
133 | pos = ftell (fp); | |
134 | ssize_t | |
135 | rv = fread (buffer, 1, len, fp); | |
136 | fseek (fp, pos, SEEK_SET); | |
137 | return rv; | |
138 | } | |
139 | return 0; | |
140 | } | |
141 | ||
142 | long | |
143 | io_stream_file::tell () | |
144 | { | |
145 | if (fp) | |
146 | { | |
147 | return ftell (fp); | |
148 | } | |
149 | return 0; | |
150 | } | |
151 | ||
152 | int | |
153 | io_stream_file::error () | |
154 | { | |
155 | if (fp) | |
156 | return ferror (fp); | |
157 | return lasterr; | |
158 | } | |
159 | ||
160 | int | |
161 | io_stream_file::set_mtime (int mtime) | |
162 | { | |
163 | if (!fname) | |
164 | return 1; | |
165 | if (fp) | |
166 | fclose (fp); | |
167 | long long ftimev = mtime * NSPERSEC + FACTOR; | |
168 | FILETIME ftime; | |
169 | ftime.dwHighDateTime = ftimev >> 32; | |
170 | ftime.dwLowDateTime = ftimev; | |
171 | HANDLE h = | |
172 | CreateFileA (fname, GENERIC_WRITE, FILE_SHARE_READ | FILE_SHARE_WRITE, | |
173 | 0, OPEN_EXISTING, | |
174 | FILE_ATTRIBUTE_NORMAL | FILE_FLAG_BACKUP_SEMANTICS, 0); | |
175 | if (h) | |
176 | { | |
177 | SetFileTime (h, 0, 0, &ftime); | |
178 | CloseHandle (h); | |
179 | fp = fopen (fname, lmode); | |
180 | if (!fp) | |
181 | lasterr = errno; | |
182 | return 0; | |
183 | } | |
184 | fp = fopen (fname, lmode); | |
185 | if (!fp) | |
186 | lasterr = errno; | |
187 | return 1; | |
188 | } |