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
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
|
/*
* $LynxId: LYUpload.c,v 1.41 2021/07/29 20:32:26 tom Exp $
*
* Routines to upload files to the local filesystem.
* Created by: Rick Mallett, Carleton University
* Report problems to rmallett@ccs.carleton.ca
* Modified 15-Dec-95 George Lindholm (lindholm@ucs.ubc.ca):
* Reread the upload menu page every time, in case the "upload" directory
* has changed (make the current directory that for the upload process).
* Prompt for the upload file name if there is no "%s" in the command
* string. Most protocols allow the user to specify the file name
* from the client side. Xmodem appears to be the only that can't
* figure out the filename from the transfer data so it needs the
* information from lynx (or an upload script which prompts for it).
* On the other hand, zmodem aborts when you give it a filename on
* the command line (great way of bypassing the nodotfile code :=( ).
*/
#include <HTUtils.h>
#include <HTFile.h>
#include <HTParse.h>
#include <HTAlert.h>
#include <LYCurses.h>
#include <LYUtils.h>
#include <LYGlobalDefs.h>
#include <LYStrings.h>
#include <LYClean.h>
#include <LYGetFile.h>
#include <LYUpload.h>
#include <LYLocal.h>
#include <LYexit.h>
#include <LYLeaks.h>
#define SUBDIR_COMMAND "cd %s ; "
/*
* LYUpload uploads a file to a given location using a specified upload method.
* It parses an incoming link that looks like:
* LYNXDIRED://UPLOAD=<#>/TO=<STRING>
*/
int LYUpload(char *line)
{
char *method, *directory;
int method_number;
int count;
char *the_upload = 0;
char tmpbuf[LY_MAXPATH];
char *filename = NULL;
lynx_list_item_type *upload_command = 0;
char *the_command = 0;
/*
* Use configured upload commands.
*/
if ((directory = LYstrstr(line, "TO=")) == NULL)
goto failed;
*(directory - 1) = '\0';
/* go past "TO=" */
directory += 3;
if ((method = LYstrstr(line, "UPLOAD=")) == NULL)
goto failed;
/*
* Go past "UPLOAD=".
*/
method += 7;
method_number = atoi(method);
for (count = 0, upload_command = uploaders; count < method_number;
count++, upload_command = upload_command->next) ; /* null body */
/*
* Parsed out the Method and the Location?
*/
if (upload_command->command == NULL) {
HTAlert(gettext("ERROR! - upload command is misconfigured"));
goto failed;
}
/*
* Care about the local name?
*/
if (HTCountCommandArgs(upload_command->command)) {
/*
* Commands have the form "command %s [etc]" where %s is the filename.
*/
_statusline(FILENAME_PROMPT);
retry:
*tmpbuf = '\0';
if (LYGetStr(tmpbuf, FALSE, sizeof(tmpbuf), NORECALL) < 0)
goto cancelled;
if (*tmpbuf == '\0')
goto cancelled;
if (strstr(tmpbuf, "../") != NULL) {
HTAlert(gettext("Illegal redirection \"../\" found! Request ignored."));
goto cancelled;
} else if (StrChr(tmpbuf, '/') != NULL) {
HTAlert(gettext("Illegal character \"/\" found! Request ignored."));
goto cancelled;
} else if (tmpbuf[0] == '~') {
HTAlert(gettext("Illegal redirection using \"~\" found! Request ignored."));
goto cancelled;
}
HTSprintf0(&filename, "%s/%s", directory, tmpbuf);
#ifdef HAVE_POPEN
if (LYIsPipeCommand(filename)) {
HTAlert(CANNOT_WRITE_TO_FILE);
_statusline(NEW_FILENAME_PROMPT);
goto retry;
}
#endif
switch (LYValidateOutput(filename)) {
case 'Y':
break;
case 'N':
goto retry;
default:
goto cancelled;
}
/*
* See if we can write to it.
*/
CTRACE((tfp, "LYUpload: filename is %s", filename));
HTAddParam(&the_upload, upload_command->command, 1, filename);
HTEndParam(&the_upload, upload_command->command, 1);
} else { /* No substitution, no changes */
StrAllocCopy(the_upload, upload_command->command);
}
HTAddParam(&the_command, SUBDIR_COMMAND, 1, directory);
HTEndParam(&the_command, SUBDIR_COMMAND, 1);
StrAllocCat(the_command, the_upload);
CTRACE((tfp, "command: %s\n", the_command));
stop_curses();
LYSystem(the_command);
start_curses();
FREE(the_command);
FREE(the_upload);
#if defined(MULTI_USER_UNIX)
if (filename != 0)
chmod(filename, HIDE_CHMOD);
#endif /* UNIX */
FREE(filename);
return 1;
failed:
HTAlert(gettext("Unable to upload file."));
return 0;
cancelled:
HTInfoMsg(CANCELLING);
return 0;
}
/*
* LYUpload_options writes out the current upload choices to a file so that the
* user can select printers in the same way that they select all other links.
* Upload links look like:
* LYNXDIRED://UPLOAD=<#>/TO=<STRING>
*/
int LYUpload_options(char **newfile,
char *directory)
{
static char tempfile[LY_MAXPATH];
FILE *fp0;
lynx_list_item_type *cur_upload;
int count;
char *curloc = NULL;
if ((fp0 = InternalPageFP(tempfile, TRUE)) == 0)
return (-1);
#ifdef VMS
StrAllocCopy(curloc, "/sys$login");
#else
StrAllocCopy(curloc, HTfullURL_toFile(directory));
LYTrimPathSep(curloc);
#endif /* VMS */
LYLocalFileToURL(newfile, tempfile);
LYRegisterUIPage(*newfile, UIP_UPLOAD_OPTIONS);
BeginInternalPage(fp0, UPLOAD_OPTIONS_TITLE, UPLOAD_OPTIONS_HELP);
fprintf(fp0, "<pre>\n");
fprintf(fp0, " <em>%s</em> %s\n", gettext("Upload To:"), curloc);
fprintf(fp0, "\n%s\n", gettext("Upload options:"));
if (uploaders != NULL) {
for (count = 0, cur_upload = uploaders;
cur_upload != NULL;
cur_upload = cur_upload->next, count++) {
fprintf(fp0, " <a href=\"LYNXDIRED://UPLOAD=%d/TO=%s\">",
count, curloc);
fprintf(fp0, "%s", (cur_upload->name ?
cur_upload->name : gettext("No Name Given")));
fprintf(fp0, "</a>\n");
}
} else {
fprintf(fp0, " <NONE>\n");
}
fprintf(fp0, "</pre>\n");
EndInternalPage(fp0);
LYCloseTempFP(fp0);
LYforce_no_cache = TRUE;
FREE(curloc);
return (0);
}
|
