2000-10-13 00:09:31 +00:00
|
|
|
/*
|
|
|
|
+----------------------------------------------------------------------+
|
2001-12-11 15:32:16 +00:00
|
|
|
| PHP Version 4 |
|
2000-10-13 00:09:31 +00:00
|
|
|
+----------------------------------------------------------------------+
|
2001-12-11 15:32:16 +00:00
|
|
|
| Copyright (c) 1997-2002 The PHP Group |
|
2000-10-13 00:09:31 +00:00
|
|
|
+----------------------------------------------------------------------+
|
|
|
|
| This source file is subject to version 2.02 of the PHP license, |
|
|
|
|
| that is bundled with this package in the file LICENSE, and is |
|
|
|
|
| available at through the world-wide-web at |
|
|
|
|
| http://www.php.net/license/2_02.txt. |
|
|
|
|
| If you did not receive a copy of the PHP license and are unable to |
|
|
|
|
| obtain it through the world-wide-web, please send a note to |
|
|
|
|
| license@php.net so we can mail you a copy immediately. |
|
|
|
|
+----------------------------------------------------------------------+
|
2002-02-28 08:29:35 +00:00
|
|
|
| Authors: Rasmus Lerdorf <rasmus@php.net> |
|
2000-10-13 00:09:31 +00:00
|
|
|
| Jim Winstead <jimw@php.net> |
|
|
|
|
| Hartmut Holzgraefe <hholzgra@php.net> |
|
|
|
|
+----------------------------------------------------------------------+
|
|
|
|
*/
|
|
|
|
/* $Id$ */
|
|
|
|
|
|
|
|
#include "php.h"
|
|
|
|
#include "php_globals.h"
|
2000-10-13 09:13:01 +00:00
|
|
|
#include "php_network.h"
|
2000-10-13 00:09:31 +00:00
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <errno.h>
|
|
|
|
#include <sys/types.h>
|
|
|
|
#include <sys/stat.h>
|
|
|
|
#include <fcntl.h>
|
|
|
|
|
|
|
|
#ifdef PHP_WIN32
|
|
|
|
#include <windows.h>
|
|
|
|
#include <winsock.h>
|
|
|
|
#define O_RDONLY _O_RDONLY
|
|
|
|
#include "win32/param.h"
|
|
|
|
#else
|
|
|
|
#include <sys/param.h>
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#include "php_standard.h"
|
|
|
|
|
|
|
|
#include <sys/types.h>
|
|
|
|
#if HAVE_SYS_SOCKET_H
|
|
|
|
#include <sys/socket.h>
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef PHP_WIN32
|
|
|
|
#include <winsock.h>
|
|
|
|
#else
|
|
|
|
#include <netinet/in.h>
|
|
|
|
#include <netdb.h>
|
2001-01-21 17:29:15 +00:00
|
|
|
#if HAVE_ARPA_INET_H
|
2000-10-13 00:09:31 +00:00
|
|
|
#include <arpa/inet.h>
|
|
|
|
#endif
|
2001-01-21 17:29:15 +00:00
|
|
|
#endif
|
2000-10-13 00:09:31 +00:00
|
|
|
|
2001-12-23 00:46:13 +00:00
|
|
|
#if defined(PHP_WIN32) || defined(__riscos__)
|
2000-10-13 00:09:31 +00:00
|
|
|
#undef AF_UNIX
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#if defined(AF_UNIX)
|
|
|
|
#include <sys/un.h>
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#include "php_fopen_wrappers.h"
|
|
|
|
|
|
|
|
|
2002-04-10 22:42:32 +00:00
|
|
|
static inline int get_ftp_result(php_stream *stream, char *buffer, size_t buffer_size TSRMLS_DC)
|
|
|
|
{
|
|
|
|
while (php_stream_gets(stream, buffer, buffer_size-1) &&
|
|
|
|
!(isdigit((int) buffer[0]) && isdigit((int) buffer[1]) &&
|
|
|
|
isdigit((int) buffer[2]) && buffer[3] == ' '));
|
2000-10-13 00:09:31 +00:00
|
|
|
|
2002-04-10 22:42:32 +00:00
|
|
|
return strtol(buffer, NULL, 10);
|
2000-10-13 00:09:31 +00:00
|
|
|
}
|
2002-04-10 22:42:32 +00:00
|
|
|
#define GET_FTP_RESULT(stream) get_ftp_result((stream), tmp_line, sizeof(tmp_line) TSRMLS_CC)
|
2000-10-13 00:09:31 +00:00
|
|
|
|
2002-03-28 00:49:00 +00:00
|
|
|
static int php_stream_ftp_stream_stat(php_stream_wrapper *wrapper,
|
|
|
|
php_stream *stream,
|
|
|
|
php_stream_statbuf *ssb
|
|
|
|
TSRMLS_DC)
|
|
|
|
{
|
|
|
|
/* For now, we return with a failure code to prevent the underlying
|
|
|
|
* file's details from being used instead. */
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2002-03-24 18:05:49 +00:00
|
|
|
static php_stream_wrapper_ops ftp_stream_wops = {
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_url_wrap_ftp,
|
2002-03-28 00:49:00 +00:00
|
|
|
NULL,
|
|
|
|
php_stream_ftp_stream_stat,
|
2002-03-24 18:05:49 +00:00
|
|
|
NULL
|
|
|
|
};
|
|
|
|
|
|
|
|
php_stream_wrapper php_stream_ftp_wrapper = {
|
|
|
|
&ftp_stream_wops,
|
2002-04-16 22:14:27 +00:00
|
|
|
NULL,
|
|
|
|
1 /* is_url */
|
2002-03-15 21:03:08 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
|
2001-06-06 13:06:12 +00:00
|
|
|
/* {{{ php_fopen_url_wrap_ftp
|
|
|
|
*/
|
2002-04-10 22:42:32 +00:00
|
|
|
php_stream * php_stream_url_wrap_ftp(php_stream_wrapper *wrapper, char *path, char *mode, int options, char **opened_path, php_stream_context *context STREAMS_DC TSRMLS_DC)
|
2000-10-13 00:09:31 +00:00
|
|
|
{
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream *stream=NULL;
|
2000-10-13 00:09:31 +00:00
|
|
|
php_url *resource=NULL;
|
|
|
|
char tmp_line[512];
|
|
|
|
unsigned short portno;
|
|
|
|
char *scratch;
|
|
|
|
int result;
|
|
|
|
int i;
|
|
|
|
char *tpath, *ttpath;
|
2002-04-10 22:42:32 +00:00
|
|
|
size_t file_size = 0;
|
2000-10-13 00:09:31 +00:00
|
|
|
|
2001-06-11 15:14:04 +00:00
|
|
|
resource = php_url_parse((char *) path);
|
2002-03-15 21:03:08 +00:00
|
|
|
if (resource == NULL || resource->path == NULL)
|
2000-10-13 00:09:31 +00:00
|
|
|
return NULL;
|
2002-03-15 21:03:08 +00:00
|
|
|
|
2000-10-13 00:09:31 +00:00
|
|
|
/* use port 21 if one wasn't specified */
|
|
|
|
if (resource->port == 0)
|
|
|
|
resource->port = 21;
|
|
|
|
|
2002-07-22 18:46:26 +00:00
|
|
|
stream = php_stream_sock_open_host(resource->host, resource->port, SOCK_STREAM, NULL, 0);
|
2002-03-15 21:03:08 +00:00
|
|
|
if (stream == NULL)
|
|
|
|
goto errexit;
|
|
|
|
|
2002-04-10 22:42:32 +00:00
|
|
|
php_stream_context_set(stream, context);
|
|
|
|
php_stream_notify_info(context, PHP_STREAM_NOTIFY_CONNECT, NULL, 0);
|
|
|
|
|
2000-10-13 00:09:31 +00:00
|
|
|
/* Start talking to ftp server */
|
2002-04-10 22:42:32 +00:00
|
|
|
result = GET_FTP_RESULT(stream);
|
|
|
|
if (result > 299 || result < 200) {
|
|
|
|
php_stream_notify_error(context, PHP_STREAM_NOTIFY_FAILURE, tmp_line, result);
|
2000-10-13 00:09:31 +00:00
|
|
|
goto errexit;
|
2002-04-10 22:42:32 +00:00
|
|
|
}
|
2000-10-13 00:09:31 +00:00
|
|
|
|
|
|
|
/* send the user name */
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "USER ");
|
2000-10-13 00:09:31 +00:00
|
|
|
if (resource->user != NULL) {
|
|
|
|
php_raw_url_decode(resource->user, strlen(resource->user));
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, resource->user);
|
2000-10-13 00:09:31 +00:00
|
|
|
} else {
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "anonymous");
|
2000-10-13 00:09:31 +00:00
|
|
|
}
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "\r\n");
|
2000-10-13 00:09:31 +00:00
|
|
|
|
|
|
|
/* get the response */
|
2002-04-10 22:42:32 +00:00
|
|
|
result = GET_FTP_RESULT(stream);
|
2000-10-13 00:09:31 +00:00
|
|
|
|
|
|
|
/* if a password is required, send it */
|
|
|
|
if (result >= 300 && result <= 399) {
|
2002-04-10 22:42:32 +00:00
|
|
|
php_stream_notify_info(context, PHP_STREAM_NOTIFY_AUTH_REQUIRED, tmp_line, 0);
|
|
|
|
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "PASS ");
|
2000-10-13 00:09:31 +00:00
|
|
|
if (resource->pass != NULL) {
|
|
|
|
php_raw_url_decode(resource->pass, strlen(resource->pass));
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, resource->pass);
|
2000-10-13 00:09:31 +00:00
|
|
|
} else {
|
|
|
|
/* if the user has configured who they are,
|
|
|
|
send that as the password */
|
|
|
|
if (cfg_get_string("from", &scratch) == SUCCESS) {
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, scratch);
|
2000-10-13 00:09:31 +00:00
|
|
|
} else {
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "anonymous");
|
2000-10-13 00:09:31 +00:00
|
|
|
}
|
|
|
|
}
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "\r\n");
|
2000-10-13 00:09:31 +00:00
|
|
|
|
|
|
|
/* read the response */
|
2002-04-10 22:42:32 +00:00
|
|
|
result = GET_FTP_RESULT(stream);
|
|
|
|
|
|
|
|
if (result > 299 || result < 200) {
|
|
|
|
php_stream_notify_error(context, PHP_STREAM_NOTIFY_AUTH_RESULT, tmp_line, result);
|
|
|
|
} else {
|
|
|
|
php_stream_notify_info(context, PHP_STREAM_NOTIFY_AUTH_RESULT, tmp_line, result);
|
|
|
|
}
|
2000-10-13 00:09:31 +00:00
|
|
|
}
|
|
|
|
if (result > 299 || result < 200)
|
|
|
|
goto errexit;
|
|
|
|
|
|
|
|
/* set the connection to be binary */
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "TYPE I\r\n");
|
2002-04-10 22:42:32 +00:00
|
|
|
result = GET_FTP_RESULT(stream);
|
2000-10-13 00:09:31 +00:00
|
|
|
if (result > 299 || result < 200)
|
|
|
|
goto errexit;
|
|
|
|
|
|
|
|
/* find out the size of the file (verifying it exists) */
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "SIZE ");
|
|
|
|
php_stream_write_string(stream, resource->path);
|
|
|
|
php_stream_write_string(stream, "\r\n");
|
2000-10-13 00:09:31 +00:00
|
|
|
|
|
|
|
/* read the response */
|
2002-04-10 22:42:32 +00:00
|
|
|
result = GET_FTP_RESULT(stream);
|
2000-10-13 00:09:31 +00:00
|
|
|
if (mode[0] == 'r') {
|
2002-04-10 22:42:32 +00:00
|
|
|
char *sizestr;
|
|
|
|
|
2000-10-13 00:09:31 +00:00
|
|
|
/* when reading file, it must exist */
|
|
|
|
if (result > 299 || result < 200) {
|
|
|
|
errno = ENOENT;
|
2002-03-15 21:03:08 +00:00
|
|
|
goto errexit;
|
2000-10-13 00:09:31 +00:00
|
|
|
}
|
2002-04-10 22:42:32 +00:00
|
|
|
|
|
|
|
sizestr = strchr(tmp_line, ' ');
|
|
|
|
if (sizestr) {
|
|
|
|
sizestr++;
|
|
|
|
file_size = atoi(sizestr);
|
|
|
|
php_stream_notify_file_size(context, file_size, tmp_line, result);
|
|
|
|
}
|
2000-10-13 00:09:31 +00:00
|
|
|
} else {
|
|
|
|
/* when writing file, it must NOT exist */
|
|
|
|
if (result <= 299 && result >= 200) {
|
|
|
|
errno = EEXIST;
|
2002-03-15 21:03:08 +00:00
|
|
|
goto errexit;
|
2000-10-13 00:09:31 +00:00
|
|
|
}
|
|
|
|
}
|
2002-04-10 22:42:32 +00:00
|
|
|
|
2000-10-13 00:09:31 +00:00
|
|
|
/* set up the passive connection */
|
|
|
|
|
|
|
|
/* We try EPSV first, needed for IPv6 and works on some IPv4 servers */
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "EPSV\r\n");
|
2002-04-10 22:42:32 +00:00
|
|
|
result = GET_FTP_RESULT(stream);
|
2000-10-13 00:09:31 +00:00
|
|
|
|
|
|
|
/* check if we got a 229 response */
|
2002-04-10 22:42:32 +00:00
|
|
|
if (result != 229) {
|
2000-10-13 00:09:31 +00:00
|
|
|
/* EPSV failed, let's try PASV */
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "PASV\r\n");
|
2002-04-10 22:42:32 +00:00
|
|
|
result = GET_FTP_RESULT(stream);
|
|
|
|
|
2000-10-13 00:09:31 +00:00
|
|
|
/* make sure we got a 227 response */
|
2002-04-10 22:42:32 +00:00
|
|
|
if (result != 227)
|
2000-10-13 00:09:31 +00:00
|
|
|
goto errexit;
|
2002-04-10 22:42:32 +00:00
|
|
|
|
2001-08-11 17:03:37 +00:00
|
|
|
/* parse pasv command (129, 80, 95, 25, 13, 221) */
|
2000-10-13 00:09:31 +00:00
|
|
|
tpath = tmp_line;
|
|
|
|
/* skip over the "227 Some message " part */
|
|
|
|
for (tpath += 4; *tpath && !isdigit((int) *tpath); tpath++);
|
|
|
|
if (!*tpath)
|
|
|
|
goto errexit;
|
|
|
|
/* skip over the host ip, we just assume it's the same */
|
|
|
|
for (i = 0; i < 4; i++) {
|
|
|
|
for (; isdigit((int) *tpath); tpath++);
|
|
|
|
if (*tpath != ',')
|
|
|
|
goto errexit;
|
|
|
|
tpath++;
|
|
|
|
}
|
|
|
|
/* pull out the MSB of the port */
|
|
|
|
portno = (unsigned short) strtol(tpath, &ttpath, 10) * 256;
|
|
|
|
if (ttpath == NULL) {
|
|
|
|
/* didn't get correct response from PASV */
|
|
|
|
goto errexit;
|
|
|
|
}
|
|
|
|
tpath = ttpath;
|
|
|
|
if (*tpath != ',')
|
|
|
|
goto errexit;
|
|
|
|
tpath++;
|
|
|
|
/* pull out the LSB of the port */
|
|
|
|
portno += (unsigned short) strtol(tpath, &ttpath, 10);
|
|
|
|
} else {
|
|
|
|
/* parse epsv command (|||6446|) */
|
|
|
|
for (i = 0, tpath = tmp_line + 4; *tpath; tpath++) {
|
|
|
|
if (*tpath == '|') {
|
|
|
|
i++;
|
|
|
|
if (i == 3)
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (i < 3)
|
|
|
|
goto errexit;
|
|
|
|
/* pull out the port */
|
|
|
|
portno = (unsigned short) strtol(tpath + 1, &ttpath, 10);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (ttpath == NULL) {
|
|
|
|
/* didn't get correct response from EPSV/PASV */
|
|
|
|
goto errexit;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (mode[0] == 'r') {
|
|
|
|
/* retrieve file */
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "RETR ");
|
2000-10-13 00:09:31 +00:00
|
|
|
} else {
|
|
|
|
/* store file */
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "STOR ");
|
2000-10-13 00:09:31 +00:00
|
|
|
}
|
|
|
|
if (resource->path != NULL) {
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, resource->path);
|
2000-10-13 00:09:31 +00:00
|
|
|
} else {
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "/");
|
2000-10-13 00:09:31 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/* close control connection */
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_write_string(stream, "\r\nQUIT\r\n");
|
|
|
|
php_stream_close(stream);
|
2000-10-13 00:09:31 +00:00
|
|
|
|
|
|
|
/* open the data channel */
|
2002-03-15 21:03:08 +00:00
|
|
|
stream = php_stream_sock_open_host(resource->host, portno, SOCK_STREAM, 0, 0);
|
|
|
|
if (stream == NULL)
|
2000-10-13 00:09:31 +00:00
|
|
|
goto errexit;
|
2002-03-15 21:03:08 +00:00
|
|
|
|
2002-04-10 22:42:32 +00:00
|
|
|
php_stream_context_set(stream, context);
|
|
|
|
php_stream_notify_progress_init(context, 0, file_size);
|
|
|
|
|
2001-06-11 15:14:04 +00:00
|
|
|
php_url_free(resource);
|
2002-03-15 21:03:08 +00:00
|
|
|
return stream;
|
2000-10-13 00:09:31 +00:00
|
|
|
|
|
|
|
errexit:
|
2001-06-11 15:14:04 +00:00
|
|
|
php_url_free(resource);
|
2002-04-10 22:42:32 +00:00
|
|
|
if (stream) {
|
|
|
|
php_stream_notify_error(context, PHP_STREAM_NOTIFY_FAILURE, tmp_line, result);
|
2002-03-15 21:03:08 +00:00
|
|
|
php_stream_close(stream);
|
2002-04-10 22:42:32 +00:00
|
|
|
}
|
|
|
|
if (tmp_line[0] != '\0')
|
|
|
|
zend_error(E_WARNING, "FTP server reports %s", tmp_line);
|
2000-10-13 00:09:31 +00:00
|
|
|
return NULL;
|
|
|
|
}
|
2001-06-06 13:06:12 +00:00
|
|
|
/* }}} */
|
2001-06-05 13:12:10 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Local variables:
|
|
|
|
* tab-width: 4
|
|
|
|
* c-basic-offset: 4
|
|
|
|
* End:
|
2001-09-09 13:29:31 +00:00
|
|
|
* vim600: sw=4 ts=4 fdm=marker
|
|
|
|
* vim<600: sw=4 ts=4
|
2001-06-05 13:12:10 +00:00
|
|
|
*/
|