PHP  
 PHP: Test and Code Coverage Analysis
downloads | QA | documentation | faq | getting help | mailing lists | reporting bugs | php.net sites | links | my php.net 
 

LCOV - code coverage report
Current view: top level - ext/standard - streamsfuncs.c (source / functions) Hit Total Coverage
Test: PHP Code Coverage Lines: 528 695 76.0 %
Date: 2014-07-29 Functions: 39 43 90.7 %
Legend: Lines: hit not hit

          Line data    Source code
       1             : /*
       2             :   +----------------------------------------------------------------------+
       3             :   | PHP Version 5                                                        |
       4             :   +----------------------------------------------------------------------+
       5             :   | Copyright (c) 1997-2014 The PHP Group                                |
       6             :   +----------------------------------------------------------------------+
       7             :   | This source file is subject to version 3.01 of the PHP license,      |
       8             :   | that is bundled with this package in the file LICENSE, and is        |
       9             :   | available through the world-wide-web at the following url:           |
      10             :   | http://www.php.net/license/3_01.txt                                  |
      11             :   | If you did not receive a copy of the PHP license and are unable to   |
      12             :   | obtain it through the world-wide-web, please send a note to          |
      13             :   | license@php.net so we can mail you a copy immediately.               |
      14             :   +----------------------------------------------------------------------+
      15             :   | Authors: Wez Furlong <wez@thebrainroom.com>                          |
      16             :   |          Sara Golemon <pollita@php.net>                              |
      17             :   +----------------------------------------------------------------------+
      18             : */
      19             : 
      20             : /* $Id$ */
      21             : 
      22             : #include "php.h"
      23             : #include "php_globals.h"
      24             : #include "ext/standard/flock_compat.h"
      25             : #include "ext/standard/file.h"
      26             : #include "ext/standard/php_filestat.h"
      27             : #include "php_open_temporary_file.h"
      28             : #include "ext/standard/basic_functions.h"
      29             : #include "php_ini.h"
      30             : #include "streamsfuncs.h"
      31             : #include "php_network.h"
      32             : #include "php_string.h"
      33             : 
      34             : #ifndef PHP_WIN32
      35             : #define php_select(m, r, w, e, t)       select(m, r, w, e, t)
      36             : typedef unsigned long long php_timeout_ull;
      37             : #else
      38             : #include "win32/select.h"
      39             : #include "win32/sockets.h"
      40             : typedef unsigned __int64 php_timeout_ull;
      41             : #endif
      42             : 
      43             : static php_stream_context *decode_context_param(zval *contextresource TSRMLS_DC);
      44             : 
      45             : /* Streams based network functions */
      46             : 
      47             : #if HAVE_SOCKETPAIR
      48             : /* {{{ proto array stream_socket_pair(int domain, int type, int protocol)
      49             :    Creates a pair of connected, indistinguishable socket streams */
      50           8 : PHP_FUNCTION(stream_socket_pair)
      51             : {
      52             :         long domain, type, protocol;
      53             :         php_stream *s1, *s2;
      54             :         php_socket_t pair[2];
      55             : 
      56           8 :         if (FAILURE == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "lll",
      57             :                         &domain, &type, &protocol)) {
      58           0 :                 RETURN_FALSE;
      59             :         }
      60             : 
      61           8 :         if (0 != socketpair(domain, type, protocol, pair)) {
      62             :                 char errbuf[256];
      63           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "failed to create sockets: [%d]: %s",
      64           0 :                         php_socket_errno(), php_socket_strerror(php_socket_errno(), errbuf, sizeof(errbuf)));
      65           0 :                 RETURN_FALSE;
      66             :         }
      67             : 
      68           8 :         array_init(return_value);
      69             : 
      70           8 :         s1 = php_stream_sock_open_from_socket(pair[0], 0);
      71           8 :         s2 = php_stream_sock_open_from_socket(pair[1], 0);
      72             : 
      73             :         /* set the __exposed flag.
      74             :          * php_stream_to_zval() does, add_next_index_resource() does not */
      75             :         php_stream_auto_cleanup(s1);
      76             :         php_stream_auto_cleanup(s2);
      77             : 
      78           8 :         add_next_index_resource(return_value, php_stream_get_resource_id(s1));
      79           8 :         add_next_index_resource(return_value, php_stream_get_resource_id(s2));
      80             : }
      81             : /* }}} */
      82             : #endif
      83             : 
      84             : /* {{{ proto resource stream_socket_client(string remoteaddress [, long &errcode [, string &errstring [, double timeout [, long flags [, resource context]]]]])
      85             :    Open a client connection to a remote address */
      86         658 : PHP_FUNCTION(stream_socket_client)
      87             : {
      88             :         char *host;
      89             :         int host_len;
      90         658 :         zval *zerrno = NULL, *zerrstr = NULL, *zcontext = NULL;
      91         658 :         double timeout = FG(default_socket_timeout);
      92             :         php_timeout_ull conv;
      93             :         struct timeval tv;
      94         658 :         char *hashkey = NULL;
      95         658 :         php_stream *stream = NULL;
      96             :         int err;
      97         658 :         long flags = PHP_STREAM_CLIENT_CONNECT;
      98         658 :         char *errstr = NULL;
      99         658 :         php_stream_context *context = NULL;
     100             : 
     101         658 :         RETVAL_FALSE;
     102             : 
     103         658 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|zzdlr", &host, &host_len, &zerrno, &zerrstr, &timeout, &flags, &zcontext) == FAILURE) {
     104           1 :                 RETURN_FALSE;
     105             :         }
     106             : 
     107         657 :         context = php_stream_context_from_zval(zcontext, flags & PHP_FILE_NO_DEFAULT_CONTEXT);
     108             : 
     109         657 :         if (flags & PHP_STREAM_CLIENT_PERSISTENT) {
     110           1 :                 spprintf(&hashkey, 0, "stream_socket_client__%s", host);
     111             :         }
     112             : 
     113             :         /* prepare the timeout value for use */
     114         657 :         conv = (php_timeout_ull) (timeout * 1000000.0);
     115             : #ifdef PHP_WIN32
     116             :         tv.tv_sec = (long)(conv / 1000000);
     117             :         tv.tv_usec =(long)(conv % 1000000);
     118             : #else
     119         657 :         tv.tv_sec = conv / 1000000;
     120         657 :         tv.tv_usec = conv % 1000000;
     121             : #endif
     122         657 :         if (zerrno)     {
     123         625 :                 zval_dtor(zerrno);
     124         625 :                 ZVAL_LONG(zerrno, 0);
     125             :         }
     126         657 :         if (zerrstr) {
     127         623 :                 zval_dtor(zerrstr);
     128         623 :                 ZVAL_STRING(zerrstr, "", 1);
     129             :         }
     130             : 
     131         657 :         stream = php_stream_xport_create(host, host_len, REPORT_ERRORS,
     132             :                         STREAM_XPORT_CLIENT | (flags & PHP_STREAM_CLIENT_CONNECT ? STREAM_XPORT_CONNECT : 0) |
     133             :                         (flags & PHP_STREAM_CLIENT_ASYNC_CONNECT ? STREAM_XPORT_CONNECT_ASYNC : 0),
     134             :                         hashkey, &tv, context, &errstr, &err);
     135             : 
     136             : 
     137         657 :         if (stream == NULL) {
     138             :                 /* host might contain binary characters */
     139           8 :                 char *quoted_host = php_addslashes(host, host_len, NULL, 0 TSRMLS_CC);
     140             : 
     141           8 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "unable to connect to %s (%s)", quoted_host, errstr == NULL ? "Unknown error" : errstr);
     142           8 :                 efree(quoted_host);
     143             :         }
     144             : 
     145         657 :         if (hashkey) {
     146           1 :                 efree(hashkey);
     147             :         }
     148             : 
     149         657 :         if (stream == NULL)     {
     150           8 :                 if (zerrno) {
     151           8 :                         zval_dtor(zerrno);
     152           8 :                         ZVAL_LONG(zerrno, err);
     153             :                 }
     154          13 :                 if (zerrstr && errstr) {
     155             :                         /* no need to dup; we need to efree buf anyway */
     156           5 :                         zval_dtor(zerrstr);
     157           5 :                         ZVAL_STRING(zerrstr, errstr, 0);
     158           3 :                 } else if (errstr) {
     159           2 :                         efree(errstr);
     160             :                 }
     161           8 :                 RETURN_FALSE;
     162             :         }
     163             : 
     164         649 :         if (errstr) {
     165           0 :                 efree(errstr);
     166             :         }
     167             : 
     168         649 :         php_stream_to_zval(stream, return_value);
     169             : 
     170             : }
     171             : /* }}} */
     172             : 
     173             : /* {{{ proto resource stream_socket_server(string localaddress [, long &errcode [, string &errstring [, long flags [, resource context]]]])
     174             :    Create a server socket bound to localaddress */
     175          93 : PHP_FUNCTION(stream_socket_server)
     176             : {
     177             :         char *host;
     178             :         int host_len;
     179          93 :         zval *zerrno = NULL, *zerrstr = NULL, *zcontext = NULL;
     180          93 :         php_stream *stream = NULL;
     181          93 :         int err = 0;
     182          93 :         long flags = STREAM_XPORT_BIND | STREAM_XPORT_LISTEN;
     183          93 :         char *errstr = NULL;
     184          93 :         php_stream_context *context = NULL;
     185             : 
     186          93 :         RETVAL_FALSE;
     187             : 
     188          93 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|zzlr", &host, &host_len, &zerrno, &zerrstr, &flags, &zcontext) == FAILURE) {
     189           0 :                 RETURN_FALSE;
     190             :         }
     191             : 
     192          93 :         context = php_stream_context_from_zval(zcontext, flags & PHP_FILE_NO_DEFAULT_CONTEXT);
     193             : 
     194          93 :         if (context) {
     195          93 :                 zend_list_addref(context->rsrc_id);
     196             :         }
     197             : 
     198          93 :         if (zerrno)     {
     199          67 :                 zval_dtor(zerrno);
     200          67 :                 ZVAL_LONG(zerrno, 0);
     201             :         }
     202          93 :         if (zerrstr) {
     203          67 :                 zval_dtor(zerrstr);
     204          67 :                 ZVAL_STRING(zerrstr, "", 1);
     205             :         }
     206             : 
     207          93 :         stream = php_stream_xport_create(host, host_len, REPORT_ERRORS,
     208             :                         STREAM_XPORT_SERVER | flags,
     209             :                         NULL, NULL, context, &errstr, &err);
     210             : 
     211          93 :         if (stream == NULL) {
     212           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "unable to connect to %s (%s)", host, errstr == NULL ? "Unknown error" : errstr);
     213             :         }
     214             : 
     215          93 :         if (stream == NULL)     {
     216           0 :                 if (zerrno) {
     217           0 :                         zval_dtor(zerrno);
     218           0 :                         ZVAL_LONG(zerrno, err);
     219             :                 }
     220           0 :                 if (zerrstr && errstr) {
     221             :                         /* no need to dup; we need to efree buf anyway */
     222           0 :                         zval_dtor(zerrstr);
     223           0 :                         ZVAL_STRING(zerrstr, errstr, 0);
     224           0 :                 } else if (errstr) {
     225           0 :                         efree(errstr);
     226             :                 }
     227           0 :                 RETURN_FALSE;
     228             :         }
     229             : 
     230          93 :         if (errstr) {
     231           0 :                 efree(errstr);
     232             :         }
     233             : 
     234          93 :         php_stream_to_zval(stream, return_value);
     235             : }
     236             : /* }}} */
     237             : 
     238             : /* {{{ proto resource stream_socket_accept(resource serverstream, [ double timeout [, string &peername ]])
     239             :    Accept a client connection from a server socket */
     240          45 : PHP_FUNCTION(stream_socket_accept)
     241             : {
     242          45 :         double timeout = FG(default_socket_timeout);
     243          45 :         zval *zpeername = NULL;
     244          45 :         char *peername = NULL;
     245             :         int peername_len;
     246             :         php_timeout_ull conv;
     247             :         struct timeval tv;
     248          45 :         php_stream *stream = NULL, *clistream = NULL;
     249             :         zval *zstream;
     250             : 
     251          45 :         char *errstr = NULL;
     252             : 
     253          45 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r|dz", &zstream, &timeout, &zpeername) == FAILURE) {
     254           0 :                 RETURN_FALSE;
     255             :         }
     256             : 
     257          45 :         php_stream_from_zval(stream, &zstream);
     258             : 
     259             :         /* prepare the timeout value for use */
     260          45 :         conv = (php_timeout_ull) (timeout * 1000000.0);
     261             : #ifdef PHP_WIN32
     262             :         tv.tv_sec = (long)(conv / 1000000);
     263             :         tv.tv_usec = (long)(conv % 1000000);
     264             : #else
     265          45 :         tv.tv_sec = conv / 1000000;
     266          45 :         tv.tv_usec = conv % 1000000;
     267             : #endif
     268          45 :         if (zpeername) {
     269           0 :                 zval_dtor(zpeername);
     270           0 :                 ZVAL_NULL(zpeername);
     271             :         }
     272             : 
     273         135 :         if (0 == php_stream_xport_accept(stream, &clistream,
     274          45 :                                 zpeername ? &peername : NULL,
     275          45 :                                 zpeername ? &peername_len : NULL,
     276             :                                 NULL, NULL,
     277             :                                 &tv, &errstr
     278         135 :                                 TSRMLS_CC) && clistream) {
     279             : 
     280          45 :                 if (peername) {
     281           0 :                         ZVAL_STRINGL(zpeername, peername, peername_len, 0);
     282             :                 }
     283          45 :                 php_stream_to_zval(clistream, return_value);
     284             :         } else {
     285           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "accept failed: %s", errstr ? errstr : "Unknown error");
     286           0 :                 RETVAL_FALSE;
     287             :         }
     288             : 
     289          45 :         if (errstr) {
     290          45 :                 efree(errstr);
     291             :         }
     292             : }
     293             : /* }}} */
     294             : 
     295             : /* {{{ proto string stream_socket_get_name(resource stream, bool want_peer)
     296             :    Returns either the locally bound or remote name for a socket stream */
     297           0 : PHP_FUNCTION(stream_socket_get_name)
     298             : {
     299             :         php_stream *stream;
     300             :         zval *zstream;
     301             :         zend_bool want_peer;
     302           0 :         char *name = NULL;
     303             :         int name_len;
     304             : 
     305           0 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rb", &zstream, &want_peer) == FAILURE) {
     306           0 :                 RETURN_FALSE;
     307             :         }
     308             : 
     309           0 :         php_stream_from_zval(stream, &zstream);
     310             : 
     311           0 :         if (0 != php_stream_xport_get_name(stream, want_peer,
     312             :                                 &name,
     313             :                                 &name_len,
     314             :                                 NULL, NULL
     315             :                                 TSRMLS_CC)) {
     316           0 :                 RETURN_FALSE;
     317             :         }
     318             : 
     319           0 :         RETURN_STRINGL(name, name_len, 0);
     320             : }
     321             : /* }}} */
     322             : 
     323             : /* {{{ proto long stream_socket_sendto(resouce stream, string data [, long flags [, string target_addr]])
     324             :    Send data to a socket stream.  If target_addr is specified it must be in dotted quad (or [ipv6]) format */
     325           0 : PHP_FUNCTION(stream_socket_sendto)
     326             : {
     327             :         php_stream *stream;
     328             :         zval *zstream;
     329           0 :         long flags = 0;
     330           0 :         char *data, *target_addr = NULL;
     331           0 :         int datalen, target_addr_len = 0;
     332             :         php_sockaddr_storage sa;
     333           0 :         socklen_t sl = 0;
     334             : 
     335           0 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs|ls", &zstream, &data, &datalen, &flags, &target_addr, &target_addr_len) == FAILURE) {
     336           0 :                 RETURN_FALSE;
     337             :         }
     338           0 :         php_stream_from_zval(stream, &zstream);
     339             : 
     340           0 :         if (target_addr_len) {
     341             :                 /* parse the address */
     342           0 :                 if (FAILURE == php_network_parse_network_address_with_port(target_addr, target_addr_len, (struct sockaddr*)&sa, &sl TSRMLS_CC)) {
     343           0 :                         php_error_docref(NULL TSRMLS_CC, E_WARNING, "Failed to parse `%s' into a valid network address", target_addr);
     344           0 :                         RETURN_FALSE;
     345             :                 }
     346             :         }
     347             : 
     348           0 :         RETURN_LONG(php_stream_xport_sendto(stream, data, datalen, flags, target_addr ? &sa : NULL, sl TSRMLS_CC));
     349             : }
     350             : /* }}} */
     351             : 
     352             : /* {{{ proto string stream_socket_recvfrom(resource stream, long amount [, long flags [, string &remote_addr]])
     353             :    Receives data from a socket stream */
     354           0 : PHP_FUNCTION(stream_socket_recvfrom)
     355             : {
     356             :         php_stream *stream;
     357           0 :         zval *zstream, *zremote = NULL;
     358           0 :         char *remote_addr = NULL;
     359             :         int remote_addr_len;
     360           0 :         long to_read = 0;
     361             :         char *read_buf;
     362           0 :         long flags = 0;
     363             :         int recvd;
     364             : 
     365           0 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl|lz", &zstream, &to_read, &flags, &zremote) == FAILURE) {
     366           0 :                 RETURN_FALSE;
     367             :         }
     368             : 
     369           0 :         php_stream_from_zval(stream, &zstream);
     370             : 
     371           0 :         if (zremote) {
     372           0 :                 zval_dtor(zremote);
     373           0 :                 ZVAL_NULL(zremote);
     374             :         }
     375             : 
     376           0 :         if (to_read <= 0) {
     377           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Length parameter must be greater than 0");
     378           0 :                 RETURN_FALSE;
     379             :         }
     380             : 
     381           0 :         read_buf = safe_emalloc(1, to_read, 1);
     382             : 
     383           0 :         recvd = php_stream_xport_recvfrom(stream, read_buf, to_read, flags, NULL, NULL,
     384           0 :                         zremote ? &remote_addr : NULL,
     385           0 :                         zremote ? &remote_addr_len : NULL
     386             :                         TSRMLS_CC);
     387             : 
     388           0 :         if (recvd >= 0) {
     389           0 :                 if (zremote) {
     390           0 :                         ZVAL_STRINGL(zremote, remote_addr, remote_addr_len, 0);
     391             :                 }
     392           0 :                 read_buf[recvd] = '\0';
     393             : 
     394           0 :                 RETURN_STRINGL(read_buf, recvd, 0);
     395             :         }
     396             : 
     397           0 :         efree(read_buf);
     398           0 :         RETURN_FALSE;
     399             : }
     400             : /* }}} */
     401             : 
     402             : /* {{{ proto string stream_get_contents(resource source [, long maxlen [, long offset]])
     403             :    Reads all remaining bytes (or up to maxlen bytes) from a stream and returns them as a string. */
     404        5994 : PHP_FUNCTION(stream_get_contents)
     405             : {
     406             :         php_stream      *stream;
     407             :         zval            *zsrc;
     408        5994 :         long            maxlen          = PHP_STREAM_COPY_ALL,
     409        5994 :                                 desiredpos      = -1L;
     410             :         int                     len;
     411        5994 :         char            *contents       = NULL;
     412             : 
     413        5994 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r|ll", &zsrc, &maxlen, &desiredpos) == FAILURE) {
     414           2 :                 RETURN_FALSE;
     415             :         }
     416             : 
     417        5992 :         php_stream_from_zval(stream, &zsrc);
     418             : 
     419        5992 :         if (desiredpos >= 0) {
     420          38 :                 int             seek_res = 0;
     421             :                 off_t   position;
     422             : 
     423          38 :                 position = php_stream_tell(stream);
     424          41 :                 if (position >= 0 && desiredpos > position) {
     425             :                         /* use SEEK_CUR to allow emulation in streams that don't support seeking */
     426           3 :                         seek_res = php_stream_seek(stream, desiredpos - position, SEEK_CUR);
     427          35 :                 } else if (desiredpos < position)  {
     428             :                         /* desired position before position or error on tell */
     429          22 :                         seek_res = php_stream_seek(stream, desiredpos, SEEK_SET);
     430             :                 }
     431             : 
     432          38 :                 if (seek_res != 0) {
     433           0 :                         php_error_docref(NULL TSRMLS_CC, E_WARNING,
     434             :                                 "Failed to seek to position %ld in the stream", desiredpos);
     435           0 :                         RETURN_FALSE;
     436             :                 }
     437             :         }
     438             : 
     439        5992 :         len = php_stream_copy_to_mem(stream, &contents, maxlen, 0);
     440             : 
     441        5992 :         if (contents) {
     442         103 :                 RETVAL_STRINGL(contents, len, 0);
     443             :         } else {
     444        5889 :                 RETVAL_EMPTY_STRING();
     445             :         }
     446             : }
     447             : /* }}} */
     448             : 
     449             : /* {{{ proto long stream_copy_to_stream(resource source, resource dest [, long maxlen [, long pos]])
     450             :    Reads up to maxlen bytes from source stream and writes them to dest stream. */
     451          15 : PHP_FUNCTION(stream_copy_to_stream)
     452             : {
     453             :         php_stream *src, *dest;
     454             :         zval *zsrc, *zdest;
     455          15 :         long maxlen = PHP_STREAM_COPY_ALL, pos = 0;
     456             :         size_t len;
     457             :         int ret;
     458             : 
     459          15 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr|ll", &zsrc, &zdest, &maxlen, &pos) == FAILURE) {
     460           0 :                 RETURN_FALSE;
     461             :         }
     462             : 
     463          15 :         php_stream_from_zval(src, &zsrc);
     464          15 :         php_stream_from_zval(dest, &zdest);
     465             : 
     466          15 :         if (pos > 0 && php_stream_seek(src, pos, SEEK_SET) < 0) {
     467           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Failed to seek to position %ld in the stream", pos);
     468           0 :                 RETURN_FALSE;
     469             :         }
     470             : 
     471          15 :         ret = php_stream_copy_to_stream_ex(src, dest, maxlen, &len);
     472             : 
     473          15 :         if (ret != SUCCESS) {
     474           0 :                 RETURN_FALSE;
     475             :         }
     476          15 :         RETURN_LONG(len);
     477             : }
     478             : /* }}} */
     479             : 
     480             : /* {{{ proto array stream_get_meta_data(resource fp)
     481             :     Retrieves header/meta data from streams/file pointers */
     482         111 : PHP_FUNCTION(stream_get_meta_data)
     483             : {
     484             :         zval *arg1;
     485             :         php_stream *stream;
     486             :         zval *newval;
     487             : 
     488         111 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &arg1) == FAILURE) {
     489          10 :                 return;
     490             :         }
     491         101 :         php_stream_from_zval(stream, &arg1);
     492             : 
     493         100 :         array_init(return_value);
     494             : 
     495         100 :         if (stream->wrapperdata) {
     496          37 :                 MAKE_STD_ZVAL(newval);
     497          37 :                 MAKE_COPY_ZVAL(&stream->wrapperdata, newval);
     498             : 
     499          37 :                 add_assoc_zval(return_value, "wrapper_data", newval);
     500             :         }
     501         100 :         if (stream->wrapper) {
     502          81 :                 add_assoc_string(return_value, "wrapper_type", (char *)stream->wrapper->wops->label, 1);
     503             :         }
     504         100 :         add_assoc_string(return_value, "stream_type", (char *)stream->ops->label, 1);
     505             : 
     506         100 :         add_assoc_string(return_value, "mode", stream->mode, 1);
     507             : 
     508             : #if 0   /* TODO: needs updating for new filter API */
     509             :         if (stream->filterhead) {
     510             :                 php_stream_filter *filter;
     511             : 
     512             :                 MAKE_STD_ZVAL(newval);
     513             :                 array_init(newval);
     514             : 
     515             :                 for (filter = stream->filterhead; filter != NULL; filter = filter->next) {
     516             :                         add_next_index_string(newval, (char *)filter->fops->label, 1);
     517             :                 }
     518             : 
     519             :                 add_assoc_zval(return_value, "filters", newval);
     520             :         }
     521             : #endif
     522             : 
     523         100 :         add_assoc_long(return_value, "unread_bytes", stream->writepos - stream->readpos);
     524             : 
     525         100 :         add_assoc_bool(return_value, "seekable", (stream->ops->seek) && (stream->flags & PHP_STREAM_FLAG_NO_SEEK) == 0);
     526         100 :         if (stream->orig_path) {
     527          80 :                 add_assoc_string(return_value, "uri", stream->orig_path, 1);
     528             :         }
     529             : 
     530         100 :         if (!php_stream_populate_meta_data(stream, return_value)) {
     531          78 :                 add_assoc_bool(return_value, "timed_out", 0);
     532          78 :                 add_assoc_bool(return_value, "blocked", 1);
     533          78 :                 add_assoc_bool(return_value, "eof", php_stream_eof(stream));
     534             :         }
     535             : 
     536             : }
     537             : /* }}} */
     538             : 
     539             : /* {{{ proto array stream_get_transports()
     540             :    Retrieves list of registered socket transports */
     541           3 : PHP_FUNCTION(stream_get_transports)
     542             : {
     543             :         HashTable *stream_xport_hash;
     544             :         char *stream_xport;
     545             :         uint stream_xport_len;
     546             :         ulong num_key;
     547             : 
     548           3 :         if (zend_parse_parameters_none() == FAILURE) {
     549           0 :                 return;
     550             :         }
     551             : 
     552           3 :         if ((stream_xport_hash = php_stream_xport_get_hash())) {
     553             :                 HashPosition pos;
     554           3 :                 array_init(return_value);
     555           3 :                 zend_hash_internal_pointer_reset_ex(stream_xport_hash, &pos);
     556          30 :                 while (zend_hash_get_current_key_ex(stream_xport_hash,
     557             :                                         &stream_xport, &stream_xport_len,
     558             :                                         &num_key, 0, &pos) == HASH_KEY_IS_STRING) {
     559          24 :                         add_next_index_stringl(return_value, stream_xport, stream_xport_len - 1, 1);
     560          24 :                         zend_hash_move_forward_ex(stream_xport_hash, &pos);
     561             :                 }
     562             :         } else {
     563           0 :                 RETURN_FALSE;
     564             :         }
     565             : }
     566             : /* }}} */
     567             : 
     568             : /* {{{ proto array stream_get_wrappers()
     569             :     Retrieves list of registered stream wrappers */
     570           4 : PHP_FUNCTION(stream_get_wrappers)
     571             : {
     572             :         HashTable *url_stream_wrappers_hash;
     573             :         char *stream_protocol;
     574             :         int key_flags;
     575           4 :         uint stream_protocol_len = 0;
     576             :         ulong num_key;
     577             : 
     578           4 :         if (zend_parse_parameters_none() == FAILURE) {
     579           0 :                 return;
     580             :         }
     581             : 
     582           4 :         if ((url_stream_wrappers_hash = php_stream_get_url_stream_wrappers_hash())) {
     583             :                 HashPosition pos;
     584           4 :                 array_init(return_value);
     585          84 :                 for (zend_hash_internal_pointer_reset_ex(url_stream_wrappers_hash, &pos);
     586          80 :                         (key_flags = zend_hash_get_current_key_ex(url_stream_wrappers_hash, &stream_protocol, &stream_protocol_len, &num_key, 0, &pos)) != HASH_KEY_NON_EXISTANT;
     587          76 :                         zend_hash_move_forward_ex(url_stream_wrappers_hash, &pos)) {
     588          76 :                                 if (key_flags == HASH_KEY_IS_STRING) {
     589          76 :                                         add_next_index_stringl(return_value, stream_protocol, stream_protocol_len - 1, 1);
     590             :                                 }
     591             :                 }
     592             :         } else {
     593           0 :                 RETURN_FALSE;
     594             :         }
     595             : 
     596             : }
     597             : /* }}} */
     598             : 
     599             : /* {{{ stream_select related functions */
     600      838483 : static int stream_array_to_fd_set(zval *stream_array, fd_set *fds, php_socket_t *max_fd TSRMLS_DC)
     601             : {
     602             :         zval **elem;
     603             :         php_stream *stream;
     604      838483 :         int cnt = 0;
     605             : 
     606      838483 :         if (Z_TYPE_P(stream_array) != IS_ARRAY) {
     607           0 :                 return 0;
     608             :         }
     609     3353906 :         for (zend_hash_internal_pointer_reset(Z_ARRVAL_P(stream_array));
     610     2515423 :                  zend_hash_get_current_data(Z_ARRVAL_P(stream_array), (void **) &elem) == SUCCESS;
     611     1676940 :                  zend_hash_move_forward(Z_ARRVAL_P(stream_array))) {
     612             : 
     613             :                 /* Temporary int fd is needed for the STREAM data type on windows, passing this_fd directly to php_stream_cast()
     614             :                         would eventually bring a wrong result on x64. php_stream_cast() casts to int internally, and this will leave
     615             :                         the higher bits of a SOCKET variable uninitialized on systems with little endian. */
     616             :                 int tmp_fd;
     617             : 
     618     1676940 :                 php_stream_from_zval_no_verify(stream, elem);
     619     1676940 :                 if (stream == NULL) {
     620           0 :                         continue;
     621             :                 }
     622             :                 /* get the fd.
     623             :                  * NB: Most other code will NOT use the PHP_STREAM_CAST_INTERNAL flag
     624             :                  * when casting.  It is only used here so that the buffered data warning
     625             :                  * is not displayed.
     626             :                  * */
     627     1676940 :                 if (SUCCESS == php_stream_cast(stream, PHP_STREAM_AS_FD_FOR_SELECT | PHP_STREAM_CAST_INTERNAL, (void*)&tmp_fd, 1) && tmp_fd != -1) {
     628             : 
     629     1676935 :                         php_socket_t this_fd = (php_socket_t)tmp_fd;
     630             : 
     631     1676935 :                         PHP_SAFE_FD_SET(this_fd, fds);
     632             : 
     633     1676935 :                         if (this_fd > *max_fd) {
     634     1676931 :                                 *max_fd = this_fd;
     635             :                         }
     636     1676935 :                         cnt++;
     637             :                 }
     638             :         }
     639      838483 :         return cnt ? 1 : 0;
     640             : }
     641             : 
     642      838476 : static int stream_array_from_fd_set(zval *stream_array, fd_set *fds TSRMLS_DC)
     643             : {
     644             :         zval **elem, **dest_elem;
     645             :         php_stream *stream;
     646             :         HashTable *new_hash;
     647      838476 :         int ret = 0;
     648             : 
     649      838476 :         if (Z_TYPE_P(stream_array) != IS_ARRAY) {
     650           0 :                 return 0;
     651             :         }
     652      838476 :         ALLOC_HASHTABLE(new_hash);
     653      838476 :         zend_hash_init(new_hash, zend_hash_num_elements(Z_ARRVAL_P(stream_array)), NULL, ZVAL_PTR_DTOR, 0);
     654             : 
     655     3353885 :         for (zend_hash_internal_pointer_reset(Z_ARRVAL_P(stream_array));
     656     2515409 :                  zend_hash_has_more_elements(Z_ARRVAL_P(stream_array)) == SUCCESS;
     657     1676933 :                  zend_hash_move_forward(Z_ARRVAL_P(stream_array))) {
     658             : 
     659             :                 int type;
     660             :                 char *key;
     661             :                 uint key_len;
     662             :                 ulong num_ind;
     663             :                 /* Temporary int fd is needed for the STREAM data type on windows, passing this_fd directly to php_stream_cast()
     664             :                         would eventually bring a wrong result on x64. php_stream_cast() casts to int internally, and this will leave
     665             :                         the higher bits of a SOCKET variable uninitialized on systems with little endian. */
     666             :                 int tmp_fd;
     667             : 
     668             : 
     669     1676933 :                 type = zend_hash_get_current_key_ex(Z_ARRVAL_P(stream_array),
     670             :                                 &key, &key_len, &num_ind, 0, NULL);
     671     3353866 :                 if (type == HASH_KEY_NON_EXISTANT ||
     672     1676933 :                         zend_hash_get_current_data(Z_ARRVAL_P(stream_array), (void **) &elem) == FAILURE) {
     673           0 :                         continue; /* should not happen */
     674             :                 }
     675             : 
     676     1676933 :                 php_stream_from_zval_no_verify(stream, elem);
     677     1676933 :                 if (stream == NULL) {
     678           0 :                         continue;
     679             :                 }
     680             :                 /* get the fd
     681             :                  * NB: Most other code will NOT use the PHP_STREAM_CAST_INTERNAL flag
     682             :                  * when casting.  It is only used here so that the buffered data warning
     683             :                  * is not displayed.
     684             :                  */
     685     1676933 :                 if (SUCCESS == php_stream_cast(stream, PHP_STREAM_AS_FD_FOR_SELECT | PHP_STREAM_CAST_INTERNAL, (void*)&tmp_fd, 1) && tmp_fd != -1) {
     686             : 
     687     1676933 :                         php_socket_t this_fd = (php_socket_t)tmp_fd;
     688             : 
     689     1676933 :                         if (PHP_SAFE_FD_ISSET(this_fd, fds)) {
     690      858342 :                                 if (type == HASH_KEY_IS_LONG) {
     691      858341 :                                         zend_hash_index_update(new_hash, num_ind, (void *)elem, sizeof(zval *), (void **)&dest_elem);
     692             :                                 } else { /* HASH_KEY_IS_STRING */
     693           1 :                                         zend_hash_update(new_hash, key, key_len, (void *)elem, sizeof(zval *), (void **)&dest_elem);
     694             :                                 }
     695             :                                 
     696      858342 :                                 if (dest_elem) {
     697      858342 :                                         zval_add_ref(dest_elem);
     698             :                                 }
     699      858342 :                                 ret++;
     700      858342 :                                 continue;
     701             :                         }
     702             :                 }
     703             :         }
     704             : 
     705             :         /* destroy old array and add new one */
     706      838476 :         zend_hash_destroy(Z_ARRVAL_P(stream_array));
     707      838476 :         efree(Z_ARRVAL_P(stream_array));
     708             : 
     709      838476 :         zend_hash_internal_pointer_reset(new_hash);
     710      838476 :         Z_ARRVAL_P(stream_array) = new_hash;
     711             : 
     712      838476 :         return ret;
     713             : }
     714             : 
     715      838470 : static int stream_array_emulate_read_fd_set(zval *stream_array TSRMLS_DC)
     716             : {
     717             :         zval **elem, **dest_elem;
     718             :         php_stream *stream;
     719             :         HashTable *new_hash;
     720      838470 :         int ret = 0;
     721             : 
     722      838470 :         if (Z_TYPE_P(stream_array) != IS_ARRAY) {
     723           0 :                 return 0;
     724             :         }
     725      838470 :         ALLOC_HASHTABLE(new_hash);
     726      838470 :         zend_hash_init(new_hash, zend_hash_num_elements(Z_ARRVAL_P(stream_array)), NULL, ZVAL_PTR_DTOR, 0);
     727             : 
     728     3353872 :         for (zend_hash_internal_pointer_reset(Z_ARRVAL_P(stream_array));
     729     2515402 :                  zend_hash_get_current_data(Z_ARRVAL_P(stream_array), (void **) &elem) == SUCCESS;
     730     1676932 :                  zend_hash_move_forward(Z_ARRVAL_P(stream_array))) {
     731             : 
     732     1676932 :                 php_stream_from_zval_no_verify(stream, elem);
     733     1676932 :                 if (stream == NULL) {
     734           0 :                         continue;
     735             :                 }
     736     1676932 :                 if ((stream->writepos - stream->readpos) > 0) {
     737             :                         /* allow readable non-descriptor based streams to participate in stream_select.
     738             :                          * Non-descriptor streams will only "work" if they have previously buffered the
     739             :                          * data.  Not ideal, but better than nothing.
     740             :                          * This branch of code also allows blocking streams with buffered data to
     741             :                          * operate correctly in stream_select.
     742             :                          * */
     743           1 :                         zend_hash_next_index_insert(new_hash, (void *)elem, sizeof(zval *), (void **)&dest_elem);
     744           1 :                         if (dest_elem) {
     745           1 :                                 zval_add_ref(dest_elem);
     746             :                         }
     747           1 :                         ret++;
     748           1 :                         continue;
     749             :                 }
     750             :         }
     751             : 
     752      838470 :         if (ret > 0) {
     753             :                 /* destroy old array and add new one */
     754           1 :                 zend_hash_destroy(Z_ARRVAL_P(stream_array));
     755           1 :                 efree(Z_ARRVAL_P(stream_array));
     756             : 
     757           1 :                 zend_hash_internal_pointer_reset(new_hash);
     758           1 :                 Z_ARRVAL_P(stream_array) = new_hash;
     759             :         } else {
     760      838469 :                 zend_hash_destroy(new_hash);
     761      838469 :                 FREE_HASHTABLE(new_hash);
     762             :         }
     763             : 
     764      838470 :         return ret;
     765             : }
     766             : /* }}} */
     767             : 
     768             : /* {{{ proto int stream_select(array &read_streams, array &write_streams, array &except_streams, int tv_sec[, int tv_usec])
     769             :    Runs the select() system call on the sets of streams with a timeout specified by tv_sec and tv_usec */
     770      838475 : PHP_FUNCTION(stream_select)
     771             : {
     772      838475 :         zval                    *r_array, *w_array, *e_array, **sec = NULL;
     773             :         struct timeval  tv;
     774      838475 :         struct timeval *tv_p = NULL;
     775             :         fd_set                  rfds, wfds, efds;
     776      838475 :         php_socket_t    max_fd = 0;
     777      838475 :         int                             retval, sets = 0;
     778      838475 :         long                    usec = 0;
     779      838475 :         int                             set_count, max_set_count = 0;
     780             : 
     781      838475 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a!a!a!Z!|l", &r_array, &w_array, &e_array, &sec, &usec) == FAILURE)
     782           0 :                 return;
     783             : 
     784      838475 :         FD_ZERO(&rfds);
     785      838475 :         FD_ZERO(&wfds);
     786      838475 :         FD_ZERO(&efds);
     787             : 
     788      838475 :         if (r_array != NULL) {
     789      838475 :                 set_count = stream_array_to_fd_set(r_array, &rfds, &max_fd TSRMLS_CC);
     790      838475 :                 if (set_count > max_set_count)
     791      838469 :                         max_set_count = set_count;
     792      838475 :                 sets += set_count;
     793             :         }
     794             : 
     795      838475 :         if (w_array != NULL) {
     796           5 :                 set_count = stream_array_to_fd_set(w_array, &wfds, &max_fd TSRMLS_CC);
     797           5 :                 if (set_count > max_set_count)
     798           1 :                         max_set_count = set_count;
     799           5 :                 sets += set_count;
     800             :         }
     801             : 
     802      838475 :         if (e_array != NULL) {
     803           3 :                 set_count = stream_array_to_fd_set(e_array, &efds, &max_fd TSRMLS_CC);
     804           3 :                 if (set_count > max_set_count)
     805           0 :                         max_set_count = set_count;
     806           3 :                 sets += set_count;
     807             :         }
     808             : 
     809      838475 :         if (!sets) {
     810           5 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "No stream arrays were passed");
     811           5 :                 RETURN_FALSE;
     812             :         }
     813             : 
     814      838470 :         PHP_SAFE_MAX_FD(max_fd, max_set_count);
     815             : 
     816             :         /* If seconds is not set to null, build the timeval, else we wait indefinitely */
     817      838470 :         if (sec != NULL) {
     818      838470 :                 convert_to_long_ex(sec);
     819             : 
     820      838470 :                 if (Z_LVAL_PP(sec) < 0) {
     821           0 :                         php_error_docref(NULL TSRMLS_CC, E_WARNING, "The seconds parameter must be greater than 0");
     822           0 :                         RETURN_FALSE;
     823      838470 :                 } else if (usec < 0) {
     824           0 :                         php_error_docref(NULL TSRMLS_CC, E_WARNING, "The microseconds parameter must be greater than 0");
     825           0 :                         RETURN_FALSE;
     826             :                 }
     827             : 
     828             :                 /* Solaris + BSD do not like microsecond values which are >= 1 sec */
     829      838470 :                 if (usec > 999999) {
     830           0 :                         tv.tv_sec = Z_LVAL_PP(sec) + (usec / 1000000);
     831           0 :                         tv.tv_usec = usec % 1000000;
     832             :                 } else {
     833      838470 :                         tv.tv_sec = Z_LVAL_PP(sec);
     834      838470 :                         tv.tv_usec = usec;
     835             :                 }
     836             : 
     837      838470 :                 tv_p = &tv;
     838             :         }
     839             : 
     840             :         /* slight hack to support buffered data; if there is data sitting in the
     841             :          * read buffer of any of the streams in the read array, let's pretend
     842             :          * that we selected, but return only the readable sockets */
     843      838470 :         if (r_array != NULL) {
     844             : 
     845      838470 :                 retval = stream_array_emulate_read_fd_set(r_array TSRMLS_CC);
     846      838470 :                 if (retval > 0) {
     847           1 :                         if (w_array != NULL) {
     848           1 :                                 zend_hash_clean(Z_ARRVAL_P(w_array));
     849             :                         }
     850           1 :                         if (e_array != NULL) {
     851           0 :                                 zend_hash_clean(Z_ARRVAL_P(e_array));
     852             :                         }
     853           1 :                         RETURN_LONG(retval);
     854             :                 }
     855             :         }
     856             : 
     857      838469 :         retval = php_select(max_fd+1, &rfds, &wfds, &efds, tv_p);
     858             : 
     859      838469 :         if (retval == -1) {
     860           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "unable to select [%d]: %s (max_fd=%d)",
     861             :                                 errno, strerror(errno), max_fd);
     862           0 :                 RETURN_FALSE;
     863             :         }
     864             : 
     865      838469 :         if (r_array != NULL) stream_array_from_fd_set(r_array, &rfds TSRMLS_CC);
     866      838469 :         if (w_array != NULL) stream_array_from_fd_set(w_array, &wfds TSRMLS_CC);
     867      838469 :         if (e_array != NULL) stream_array_from_fd_set(e_array, &efds TSRMLS_CC);
     868             : 
     869      838469 :         RETURN_LONG(retval);
     870             : }
     871             : /* }}} */
     872             : 
     873             : /* {{{ stream_context related functions */
     874           0 : static void user_space_stream_notifier(php_stream_context *context, int notifycode, int severity,
     875             :                 char *xmsg, int xcode, size_t bytes_sofar, size_t bytes_max, void * ptr TSRMLS_DC)
     876             : {
     877           0 :         zval *callback = (zval*)context->notifier->ptr;
     878           0 :         zval *retval = NULL;
     879             :         zval zvs[6];
     880             :         zval *ps[6];
     881             :         zval **ptps[6];
     882             :         int i;
     883             : 
     884           0 :         for (i = 0; i < 6; i++) {
     885           0 :                 INIT_ZVAL(zvs[i]);
     886           0 :                 ps[i] = &zvs[i];
     887           0 :                 ptps[i] = &ps[i];
     888           0 :                 MAKE_STD_ZVAL(ps[i]);
     889             :         }
     890             : 
     891           0 :         ZVAL_LONG(ps[0], notifycode);
     892           0 :         ZVAL_LONG(ps[1], severity);
     893           0 :         if (xmsg) {
     894           0 :                 ZVAL_STRING(ps[2], xmsg, 1);
     895             :         } else {
     896           0 :                 ZVAL_NULL(ps[2]);
     897             :         }
     898           0 :         ZVAL_LONG(ps[3], xcode);
     899           0 :         ZVAL_LONG(ps[4], bytes_sofar);
     900           0 :         ZVAL_LONG(ps[5], bytes_max);
     901             : 
     902           0 :         if (FAILURE == call_user_function_ex(EG(function_table), NULL, callback, &retval, 6, ptps, 0, NULL TSRMLS_CC)) {
     903           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "failed to call user notifier");
     904             :         }
     905           0 :         for (i = 0; i < 6; i++) {
     906           0 :                 zval_ptr_dtor(&ps[i]);
     907             :         }
     908           0 :         if (retval) {
     909           0 :                 zval_ptr_dtor(&retval);
     910             :         }
     911           0 : }
     912             : 
     913           2 : static void user_space_stream_notifier_dtor(php_stream_notifier *notifier)
     914             : {
     915           2 :         if (notifier && notifier->ptr) {
     916           2 :                 zval_ptr_dtor((zval **)&(notifier->ptr));
     917           2 :                 notifier->ptr = NULL;
     918             :         }
     919           2 : }
     920             : 
     921         686 : static int parse_context_options(php_stream_context *context, zval *options TSRMLS_DC)
     922             : {
     923             :         HashPosition pos, opos;
     924             :         zval **wval, **oval;
     925             :         char *wkey, *okey;
     926             :         uint wkey_len, okey_len;
     927         686 :         int ret = SUCCESS;
     928             :         ulong num_key;
     929             : 
     930         686 :         zend_hash_internal_pointer_reset_ex(Z_ARRVAL_P(options), &pos);
     931        1452 :         while (SUCCESS == zend_hash_get_current_data_ex(Z_ARRVAL_P(options), (void**)&wval, &pos)) {
     932         318 :                 if (HASH_KEY_IS_STRING == zend_hash_get_current_key_ex(Z_ARRVAL_P(options), &wkey, &wkey_len, &num_key, 0, &pos)
     933         159 :                                 && Z_TYPE_PP(wval) == IS_ARRAY) {
     934             : 
     935          79 :                         zend_hash_internal_pointer_reset_ex(Z_ARRVAL_PP(wval), &opos);
     936         293 :                         while (SUCCESS == zend_hash_get_current_data_ex(Z_ARRVAL_PP(wval), (void**)&oval, &opos)) {
     937             : 
     938         135 :                                 if (HASH_KEY_IS_STRING == zend_hash_get_current_key_ex(Z_ARRVAL_PP(wval), &okey, &okey_len, &num_key, 0, &opos)) {
     939         135 :                                         php_stream_context_set_option(context, wkey, okey, *oval);
     940             :                                 }
     941         135 :                                 zend_hash_move_forward_ex(Z_ARRVAL_PP(wval), &opos);
     942             :                         }
     943             : 
     944             :                 } else {
     945           1 :                         php_error_docref(NULL TSRMLS_CC, E_WARNING, "options should have the form [\"wrappername\"][\"optionname\"] = $value");
     946             :                 }
     947          80 :                 zend_hash_move_forward_ex(Z_ARRVAL_P(options), &pos);
     948             :         }
     949             : 
     950         686 :         return ret;
     951             : }
     952             : 
     953           4 : static int parse_context_params(php_stream_context *context, zval *params TSRMLS_DC)
     954             : {
     955           4 :         int ret = SUCCESS;
     956             :         zval **tmp;
     957             : 
     958           4 :         if (SUCCESS == zend_hash_find(Z_ARRVAL_P(params), "notification", sizeof("notification"), (void**)&tmp)) {
     959             : 
     960           2 :                 if (context->notifier) {
     961           1 :                         php_stream_notification_free(context->notifier);
     962           1 :                         context->notifier = NULL;
     963             :                 }
     964             : 
     965           2 :                 context->notifier = php_stream_notification_alloc();
     966           2 :                 context->notifier->func = user_space_stream_notifier;
     967           2 :                 context->notifier->ptr = *tmp;
     968           2 :                 Z_ADDREF_P(*tmp);
     969           2 :                 context->notifier->dtor = user_space_stream_notifier_dtor;
     970             :         }
     971           4 :         if (SUCCESS == zend_hash_find(Z_ARRVAL_P(params), "options", sizeof("options"), (void**)&tmp)) {
     972           1 :                 if (Z_TYPE_PP(tmp) == IS_ARRAY) {
     973           0 :                         parse_context_options(context, *tmp TSRMLS_CC);
     974             :                 } else {
     975           1 :                         php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid stream/context parameter");
     976             :                 }
     977             :         }
     978             : 
     979           4 :         return ret;
     980             : }
     981             : 
     982             : /* given a zval which is either a stream or a context, return the underlying
     983             :  * stream_context.  If it is a stream that does not have a context assigned, it
     984             :  * will create and assign a context and return that.  */
     985          43 : static php_stream_context *decode_context_param(zval *contextresource TSRMLS_DC)
     986             : {
     987          43 :         php_stream_context *context = NULL;
     988             : 
     989          43 :         context = zend_fetch_resource(&contextresource TSRMLS_CC, -1, NULL, NULL, 1, php_le_stream_context(TSRMLS_C));
     990          43 :         if (context == NULL) {
     991             :                 php_stream *stream;
     992             : 
     993           1 :                 stream = zend_fetch_resource(&contextresource TSRMLS_CC, -1, NULL, NULL, 2, php_file_le_stream(), php_file_le_pstream);
     994             : 
     995           1 :                 if (stream) {
     996           1 :                         context = stream->context;
     997           1 :                         if (context == NULL) {
     998             :                                 /* Only way this happens is if file is opened with NO_DEFAULT_CONTEXT
     999             :                                    param, but then something is called which requires a context.
    1000             :                                    Don't give them the default one though since they already said they
    1001             :                                    didn't want it. */
    1002           1 :                                 context = stream->context = php_stream_context_alloc(TSRMLS_C);
    1003             :                         }
    1004             :                 }
    1005             :         }
    1006             : 
    1007          43 :         return context;
    1008             : }
    1009             : /* }}} */
    1010             : 
    1011             : /* {{{ proto array stream_context_get_options(resource context|resource stream)
    1012             :    Retrieve options for a stream/wrapper/context */
    1013          20 : PHP_FUNCTION(stream_context_get_options)
    1014             : {
    1015             :         zval *zcontext;
    1016             :         php_stream_context *context;
    1017             : 
    1018          20 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &zcontext) == FAILURE) {
    1019           0 :                 RETURN_FALSE;
    1020             :         }
    1021          20 :         context = decode_context_param(zcontext TSRMLS_CC);
    1022          20 :         if (!context) {
    1023           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid stream/context parameter");
    1024           0 :                 RETURN_FALSE;
    1025             :         }
    1026             : 
    1027          80 :         RETURN_ZVAL(context->options, 1, 0);
    1028             : }
    1029             : /* }}} */
    1030             : 
    1031             : /* {{{ proto bool stream_context_set_option(resource context|resource stream, string wrappername, string optionname, mixed value)
    1032             :    Set an option for a wrapper */
    1033          17 : PHP_FUNCTION(stream_context_set_option)
    1034             : {
    1035          17 :         zval *options = NULL, *zcontext = NULL, *zvalue = NULL;
    1036             :         php_stream_context *context;
    1037             :         char *wrappername, *optionname;
    1038             :         int wrapperlen, optionlen;
    1039             : 
    1040          17 :         if (zend_parse_parameters_ex(ZEND_PARSE_PARAMS_QUIET, ZEND_NUM_ARGS() TSRMLS_CC,
    1041             :                                 "rssz", &zcontext, &wrappername, &wrapperlen,
    1042             :                                 &optionname, &optionlen, &zvalue) == FAILURE) {
    1043           5 :                 if (zend_parse_parameters_ex(ZEND_PARSE_PARAMS_QUIET, ZEND_NUM_ARGS() TSRMLS_CC,
    1044             :                                         "ra", &zcontext, &options) == FAILURE) {
    1045           4 :                         php_error_docref(NULL TSRMLS_CC, E_WARNING, "called with wrong number or type of parameters; please RTM");
    1046           4 :                         RETURN_FALSE;
    1047             :                 }
    1048             :         }
    1049             : 
    1050             :         /* figure out where the context is coming from exactly */
    1051          13 :         context = decode_context_param(zcontext TSRMLS_CC);
    1052          13 :         if (!context) {
    1053           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid stream/context parameter");
    1054           0 :                 RETURN_FALSE;
    1055             :         }
    1056             : 
    1057          13 :         if (options) {
    1058             :                 /* handle the array syntax */
    1059           1 :                 RETVAL_BOOL(parse_context_options(context, options TSRMLS_CC) == SUCCESS);
    1060             :         } else {
    1061          12 :                 php_stream_context_set_option(context, wrappername, optionname, zvalue);
    1062          12 :                 RETVAL_TRUE;
    1063             :         }
    1064             : }
    1065             : /* }}} */
    1066             : 
    1067             : /* {{{ proto bool stream_context_set_params(resource context|resource stream, array options)
    1068             :    Set parameters for a file context */
    1069           4 : PHP_FUNCTION(stream_context_set_params)
    1070             : {
    1071             :         zval *params, *zcontext;
    1072             :         php_stream_context *context;
    1073             : 
    1074           4 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ra", &zcontext, &params) == FAILURE) {
    1075           0 :                 RETURN_FALSE;
    1076             :         }
    1077             : 
    1078           4 :         context = decode_context_param(zcontext TSRMLS_CC);
    1079           4 :         if (!context) {
    1080           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid stream/context parameter");
    1081           0 :                 RETURN_FALSE;
    1082             :         }
    1083             : 
    1084           4 :         RETVAL_BOOL(parse_context_params(context, params TSRMLS_CC) == SUCCESS);
    1085             : }
    1086             : /* }}} */
    1087             : 
    1088             : /* {{{ proto array stream_context_get_params(resource context|resource stream)
    1089             :    Get parameters of a file context */
    1090           6 : PHP_FUNCTION(stream_context_get_params)
    1091             : {
    1092             :         zval *zcontext, *options;
    1093             :         php_stream_context *context;
    1094             : 
    1095           6 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &zcontext) == FAILURE) {
    1096           0 :                 RETURN_FALSE;
    1097             :         }
    1098             : 
    1099           6 :         context = decode_context_param(zcontext TSRMLS_CC);
    1100           6 :         if (!context) {
    1101           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid stream/context parameter");
    1102           0 :                 RETURN_FALSE;
    1103             :         }
    1104             : 
    1105           6 :         array_init(return_value);
    1106           6 :         if (context->notifier && context->notifier->ptr && context->notifier->func == user_space_stream_notifier) {
    1107           4 :                 add_assoc_zval_ex(return_value, ZEND_STRS("notification"), context->notifier->ptr);
    1108           4 :                 Z_ADDREF_P(context->notifier->ptr);
    1109             :         }
    1110           6 :         ALLOC_INIT_ZVAL(options);
    1111          18 :         ZVAL_ZVAL(options, context->options, 1, 0);
    1112           6 :         add_assoc_zval_ex(return_value, ZEND_STRS("options"), options);
    1113             : }
    1114             : /* }}} */
    1115             : 
    1116             : /* {{{ proto resource stream_context_get_default([array options])
    1117             :    Get a handle on the default file/stream context and optionally set parameters */
    1118           2 : PHP_FUNCTION(stream_context_get_default)
    1119             : {
    1120           2 :         zval *params = NULL;
    1121             :         php_stream_context *context;
    1122             : 
    1123           2 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|a", &params) == FAILURE) {
    1124           0 :                 RETURN_FALSE;
    1125             :         }
    1126             : 
    1127           2 :         if (FG(default_context) == NULL) {
    1128           2 :                 FG(default_context) = php_stream_context_alloc(TSRMLS_C);
    1129             :         }
    1130           2 :         context = FG(default_context);
    1131             : 
    1132           2 :         if (params) {
    1133           0 :                 parse_context_options(context, params TSRMLS_CC);
    1134             :         }
    1135             : 
    1136           2 :         php_stream_context_to_zval(context, return_value);
    1137             : }
    1138             : /* }}} */
    1139             : 
    1140             : /* {{{ proto resource stream_context_set_default(array options)
    1141             :    Set default file/stream context, returns the context as a resource */
    1142           1 : PHP_FUNCTION(stream_context_set_default)
    1143             : {
    1144           1 :         zval *options = NULL;
    1145             :         php_stream_context *context;
    1146             : 
    1147           1 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &options) == FAILURE) {
    1148           0 :                 return;
    1149             :         }
    1150             : 
    1151           1 :         if (FG(default_context) == NULL) {
    1152           1 :                 FG(default_context) = php_stream_context_alloc(TSRMLS_C);
    1153             :         }
    1154           1 :         context = FG(default_context);
    1155             : 
    1156           1 :         parse_context_options(context, options TSRMLS_CC);
    1157             : 
    1158           1 :         php_stream_context_to_zval(context, return_value);
    1159             : }
    1160             : /* }}} */
    1161             : 
    1162             : /* {{{ proto resource stream_context_create([array options[, array params]])
    1163             :    Create a file context and optionally set parameters */
    1164         716 : PHP_FUNCTION(stream_context_create)
    1165             : {
    1166         716 :         zval *options = NULL, *params = NULL;
    1167             :         php_stream_context *context;
    1168             : 
    1169         716 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|a!a!", &options, &params) == FAILURE) {
    1170           0 :                 RETURN_FALSE;
    1171             :         }
    1172             : 
    1173         716 :         context = php_stream_context_alloc(TSRMLS_C);
    1174             : 
    1175         716 :         if (options) {
    1176         684 :                 parse_context_options(context, options TSRMLS_CC);
    1177             :         }
    1178             : 
    1179         716 :         if (params) {
    1180           0 :                 parse_context_params(context, params TSRMLS_CC);
    1181             :         }
    1182             : 
    1183         716 :         RETURN_RESOURCE(context->rsrc_id);
    1184             : }
    1185             : /* }}} */
    1186             : 
    1187             : /* {{{ streams filter functions */
    1188          96 : static void apply_filter_to_stream(int append, INTERNAL_FUNCTION_PARAMETERS)
    1189             : {
    1190             :         zval *zstream;
    1191             :         php_stream *stream;
    1192             :         char *filtername;
    1193             :         int filternamelen;
    1194          96 :         long read_write = 0;
    1195          96 :         zval *filterparams = NULL;
    1196          96 :         php_stream_filter *filter = NULL;
    1197             :         int ret;
    1198             : 
    1199          96 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs|lz", &zstream,
    1200             :                                 &filtername, &filternamelen, &read_write, &filterparams) == FAILURE) {
    1201           0 :                 RETURN_FALSE;
    1202             :         }
    1203             : 
    1204          96 :         php_stream_from_zval(stream, &zstream);
    1205             : 
    1206          96 :         if ((read_write & PHP_STREAM_FILTER_ALL) == 0) {
    1207             :                 /* Chain not specified.
    1208             :                  * Examine stream->mode to determine which filters are needed
    1209             :                  * There's no harm in attaching a filter to an unused chain,
    1210             :                  * but why waste the memory and clock cycles?
    1211             :                  */
    1212          50 :                 if (strchr(stream->mode, 'r') || strchr(stream->mode, '+')) {
    1213          45 :                         read_write |= PHP_STREAM_FILTER_READ;
    1214             :                 }
    1215          50 :                 if (strchr(stream->mode, 'w') || strchr(stream->mode, '+') || strchr(stream->mode, 'a')) {
    1216          43 :                         read_write |= PHP_STREAM_FILTER_WRITE;
    1217             :                 }
    1218             :         }
    1219             : 
    1220          96 :         if (read_write & PHP_STREAM_FILTER_READ) {
    1221          74 :                 filter = php_stream_filter_create(filtername, filterparams, php_stream_is_persistent(stream) TSRMLS_CC);
    1222          74 :                 if (filter == NULL) {
    1223           1 :                         RETURN_FALSE;
    1224             :                 }
    1225             : 
    1226          73 :                 if (append) {
    1227          68 :                         ret = php_stream_filter_append_ex(&stream->readfilters, filter TSRMLS_CC);
    1228             :                 } else {
    1229           5 :                         ret = php_stream_filter_prepend_ex(&stream->readfilters, filter TSRMLS_CC);
    1230             :                 }
    1231          73 :                 if (ret != SUCCESS) {
    1232           7 :                         php_stream_filter_remove(filter, 1 TSRMLS_CC);
    1233           7 :                         RETURN_FALSE;
    1234             :                 }
    1235             :         }
    1236             : 
    1237          88 :         if (read_write & PHP_STREAM_FILTER_WRITE) {
    1238          54 :                 filter = php_stream_filter_create(filtername, filterparams, php_stream_is_persistent(stream) TSRMLS_CC);
    1239          54 :                 if (filter == NULL) {
    1240           0 :                         RETURN_FALSE;
    1241             :                 }
    1242             : 
    1243          54 :                 if (append) {
    1244          49 :                         ret = php_stream_filter_append_ex(&stream->writefilters, filter TSRMLS_CC);
    1245             :                 } else {
    1246           5 :                         ret = php_stream_filter_prepend_ex(&stream->writefilters, filter TSRMLS_CC);
    1247             :                 }
    1248          54 :                 if (ret != SUCCESS) {
    1249           0 :                         php_stream_filter_remove(filter, 1 TSRMLS_CC);
    1250           0 :                         RETURN_FALSE;
    1251             :                 }
    1252             :         }
    1253             : 
    1254          88 :         if (filter) {
    1255          88 :                 RETURN_RESOURCE(filter->rsrc_id = ZEND_REGISTER_RESOURCE(NULL, filter, php_file_le_stream_filter()));
    1256             :         } else {
    1257           0 :                 RETURN_FALSE;
    1258             :         }
    1259             : }
    1260             : /* }}} */
    1261             : 
    1262             : /* {{{ proto resource stream_filter_prepend(resource stream, string filtername[, int read_write[, string filterparams]])
    1263             :    Prepend a filter to a stream */
    1264           5 : PHP_FUNCTION(stream_filter_prepend)
    1265             : {
    1266           5 :         apply_filter_to_stream(0, INTERNAL_FUNCTION_PARAM_PASSTHRU);
    1267           5 : }
    1268             : /* }}} */
    1269             : 
    1270             : /* {{{ proto resource stream_filter_append(resource stream, string filtername[, int read_write[, string filterparams]])
    1271             :    Append a filter to a stream */
    1272          91 : PHP_FUNCTION(stream_filter_append)
    1273             : {
    1274          91 :         apply_filter_to_stream(1, INTERNAL_FUNCTION_PARAM_PASSTHRU);
    1275          91 : }
    1276             : /* }}} */
    1277             : 
    1278             : /* {{{ proto bool stream_filter_remove(resource stream_filter)
    1279             :         Flushes any data in the filter's internal buffer, removes it from the chain, and frees the resource */
    1280          24 : PHP_FUNCTION(stream_filter_remove)
    1281             : {
    1282             :         zval *zfilter;
    1283             :         php_stream_filter *filter;
    1284             : 
    1285          24 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &zfilter) == FAILURE) {
    1286           3 :                 RETURN_FALSE;
    1287             :         }
    1288             : 
    1289          21 :         filter = zend_fetch_resource(&zfilter TSRMLS_CC, -1, NULL, NULL, 1, php_file_le_stream_filter());
    1290          21 :         if (!filter) {
    1291           2 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid resource given, not a stream filter");
    1292           2 :                 RETURN_FALSE;
    1293             :         }
    1294             : 
    1295          19 :         if (php_stream_filter_flush(filter, 1) == FAILURE) {
    1296          10 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to flush filter, not removing");
    1297          10 :                 RETURN_FALSE;
    1298             :         }
    1299             : 
    1300           9 :         if (zend_list_delete(Z_LVAL_P(zfilter)) == FAILURE) {
    1301           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not invalidate filter, not removing");
    1302           0 :                 RETURN_FALSE;
    1303             :         } else {
    1304           9 :                 php_stream_filter_remove(filter, 1 TSRMLS_CC);
    1305           9 :                 RETURN_TRUE;
    1306             :         }
    1307             : }
    1308             : /* }}} */
    1309             : 
    1310             : /* {{{ proto string stream_get_line(resource stream, int maxlen [, string ending])
    1311             :    Read up to maxlen bytes from a stream or until the ending string is found */
    1312          56 : PHP_FUNCTION(stream_get_line)
    1313             : {
    1314          56 :         char *str = NULL;
    1315          56 :         int str_len = 0;
    1316             :         long max_length;
    1317             :         zval *zstream;
    1318             :         char *buf;
    1319             :         size_t buf_size;
    1320             :         php_stream *stream;
    1321             : 
    1322          56 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl|s", &zstream, &max_length, &str, &str_len) == FAILURE) {
    1323           0 :                 RETURN_FALSE;
    1324             :         }
    1325             : 
    1326          56 :         if (max_length < 0) {
    1327           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "The maximum allowed length must be greater than or equal to zero");
    1328           0 :                 RETURN_FALSE;
    1329             :         }
    1330          56 :         if (!max_length) {
    1331           3 :                 max_length = PHP_SOCK_CHUNK_SIZE;
    1332             :         }
    1333             : 
    1334          56 :         php_stream_from_zval(stream, &zstream);
    1335             : 
    1336          56 :         if ((buf = php_stream_get_record(stream, max_length, &buf_size, str, str_len TSRMLS_CC))) {
    1337          46 :                 RETURN_STRINGL(buf, buf_size, 0);
    1338             :         } else {
    1339          10 :                 RETURN_FALSE;
    1340             :         }
    1341             : }
    1342             : 
    1343             : /* }}} */
    1344             : 
    1345             : /* {{{ proto bool stream_set_blocking(resource socket, int mode)
    1346             :    Set blocking/non-blocking mode on a socket or stream */
    1347          17 : PHP_FUNCTION(stream_set_blocking)
    1348             : {
    1349             :         zval *arg1;
    1350             :         int block;
    1351             :         long arg2;
    1352             :         php_stream *stream;
    1353             : 
    1354          17 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &arg1, &arg2) == FAILURE) {
    1355           0 :                 return;
    1356             :         }
    1357             : 
    1358          17 :         php_stream_from_zval(stream, &arg1);
    1359             : 
    1360          15 :         block = arg2;
    1361             : 
    1362          15 :         if (php_stream_set_option(stream, PHP_STREAM_OPTION_BLOCKING, block == 0 ? 0 : 1, NULL) == -1) {
    1363           2 :                 RETURN_FALSE;
    1364             :         }
    1365             : 
    1366          13 :         RETURN_TRUE;
    1367             : }
    1368             : 
    1369             : /* }}} */
    1370             : 
    1371             : /* {{{ proto bool stream_set_timeout(resource stream, int seconds [, int microseconds])
    1372             :    Set timeout on stream read to seconds + microseonds */
    1373             : #if HAVE_SYS_TIME_H || defined(PHP_WIN32)
    1374          10 : PHP_FUNCTION(stream_set_timeout)
    1375             : {
    1376             :         zval *socket;
    1377          10 :         long seconds, microseconds = 0;
    1378             :         struct timeval t;
    1379             :         php_stream *stream;
    1380          10 :         int argc = ZEND_NUM_ARGS();
    1381             : 
    1382          10 :         if (zend_parse_parameters(argc TSRMLS_CC, "rl|l", &socket, &seconds, &microseconds) == FAILURE) {
    1383           3 :                 return;
    1384             :         }
    1385             : 
    1386           7 :         php_stream_from_zval(stream, &socket);
    1387             : 
    1388           6 :         t.tv_sec = seconds;
    1389             : 
    1390           6 :         if (argc == 3) {
    1391           4 :                 t.tv_usec = microseconds % 1000000;
    1392           4 :                 t.tv_sec += microseconds / 1000000;
    1393             :         } else {
    1394           2 :                 t.tv_usec = 0;
    1395             :         }
    1396             : 
    1397           6 :         if (PHP_STREAM_OPTION_RETURN_OK == php_stream_set_option(stream, PHP_STREAM_OPTION_READ_TIMEOUT, 0, &t)) {
    1398           4 :                 RETURN_TRUE;
    1399             :         }
    1400             : 
    1401           2 :         RETURN_FALSE;
    1402             : }
    1403             : #endif /* HAVE_SYS_TIME_H || defined(PHP_WIN32) */
    1404             : /* }}} */
    1405             : 
    1406             : /* {{{ proto int stream_set_write_buffer(resource fp, int buffer)
    1407             :    Set file write buffer */
    1408           5 : PHP_FUNCTION(stream_set_write_buffer)
    1409             : {
    1410             :         zval *arg1;
    1411             :         int ret;
    1412             :         long arg2;
    1413             :         size_t buff;
    1414             :         php_stream *stream;
    1415             : 
    1416           5 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &arg1, &arg2) == FAILURE) {
    1417           0 :                 RETURN_FALSE;
    1418             :         }
    1419             : 
    1420           5 :         php_stream_from_zval(stream, &arg1);
    1421             : 
    1422           5 :         buff = arg2;
    1423             : 
    1424             :         /* if buff is 0 then set to non-buffered */
    1425           5 :         if (buff == 0) {
    1426           2 :                 ret = php_stream_set_option(stream, PHP_STREAM_OPTION_WRITE_BUFFER, PHP_STREAM_BUFFER_NONE, NULL);
    1427             :         } else {
    1428           3 :                 ret = php_stream_set_option(stream, PHP_STREAM_OPTION_WRITE_BUFFER, PHP_STREAM_BUFFER_FULL, &buff);
    1429             :         }
    1430             : 
    1431           5 :         RETURN_LONG(ret == 0 ? 0 : EOF);
    1432             : }
    1433             : /* }}} */
    1434             : 
    1435             : /* {{{ proto int stream_set_chunk_size(resource fp, int chunk_size)
    1436             :    Set the stream chunk size */
    1437           6 : PHP_FUNCTION(stream_set_chunk_size)
    1438             : {
    1439             :         int                     ret;
    1440             :         long            csize;
    1441             :         zval            *zstream;
    1442             :         php_stream      *stream;
    1443             : 
    1444           6 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &zstream, &csize) == FAILURE) {
    1445           1 :                 RETURN_FALSE;
    1446             :         }
    1447             : 
    1448           5 :         if (csize <= 0) {
    1449           2 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "The chunk size must be a positive integer, given %ld", csize);
    1450           2 :                 RETURN_FALSE;
    1451             :         }
    1452             :         /* stream.chunk_size is actually a size_t, but php_stream_set_option 
    1453             :          * can only use an int to accept the new value and return the old one.
    1454             :          * In any case, values larger than INT_MAX for a chunk size make no sense.
    1455             :          */
    1456           3 :         if (csize > INT_MAX) {
    1457           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "The chunk size cannot be larger than %d", INT_MAX);
    1458           0 :                 RETURN_FALSE;
    1459             :         }
    1460             :         
    1461           3 :         php_stream_from_zval(stream, &zstream);
    1462             : 
    1463           3 :         ret = php_stream_set_option(stream, PHP_STREAM_OPTION_SET_CHUNK_SIZE, (int)csize, NULL);
    1464             :         
    1465           3 :         RETURN_LONG(ret > 0 ? (long)ret : (long)EOF);
    1466             : }
    1467             : /* }}} */
    1468             : 
    1469             : /* {{{ proto int stream_set_read_buffer(resource fp, int buffer)
    1470             :    Set file read buffer */
    1471           2 : PHP_FUNCTION(stream_set_read_buffer)
    1472             : {
    1473             :         zval *arg1;
    1474             :         int ret;
    1475             :         long arg2;
    1476             :         size_t buff;
    1477             :         php_stream *stream;
    1478             : 
    1479           2 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &arg1, &arg2) == FAILURE) {
    1480           0 :                 RETURN_FALSE;
    1481             :         }
    1482             : 
    1483           2 :         php_stream_from_zval(stream, &arg1);
    1484             : 
    1485           2 :         buff = arg2;
    1486             : 
    1487             :         /* if buff is 0 then set to non-buffered */
    1488           2 :         if (buff == 0) {
    1489           2 :                 ret = php_stream_set_option(stream, PHP_STREAM_OPTION_READ_BUFFER, PHP_STREAM_BUFFER_NONE, NULL);
    1490             :         } else {
    1491           0 :                 ret = php_stream_set_option(stream, PHP_STREAM_OPTION_READ_BUFFER, PHP_STREAM_BUFFER_FULL, &buff);
    1492             :         }
    1493             : 
    1494           2 :         RETURN_LONG(ret == 0 ? 0 : EOF);
    1495             : }
    1496             : /* }}} */
    1497             : 
    1498             : /* {{{ proto int stream_socket_enable_crypto(resource stream, bool enable [, int cryptokind [, resource sessionstream]])
    1499             :    Enable or disable a specific kind of crypto on the stream */
    1500           6 : PHP_FUNCTION(stream_socket_enable_crypto)
    1501             : {
    1502           6 :         long cryptokind = 0;
    1503           6 :         zval *zstream, *zsessstream = NULL;
    1504           6 :         php_stream *stream, *sessstream = NULL;
    1505             :         zend_bool enable;
    1506             :         int ret;
    1507             : 
    1508           6 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rb|lr", &zstream, &enable, &cryptokind, &zsessstream) == FAILURE) {
    1509           0 :                 RETURN_FALSE;
    1510             :         }
    1511             : 
    1512           6 :         php_stream_from_zval(stream, &zstream);
    1513             : 
    1514           6 :         if (ZEND_NUM_ARGS() >= 3) {
    1515           6 :                 if (zsessstream) {
    1516           0 :                         php_stream_from_zval(sessstream, &zsessstream);
    1517             :                 }
    1518             : 
    1519           6 :                 if (php_stream_xport_crypto_setup(stream, cryptokind, sessstream TSRMLS_CC) < 0) {
    1520           0 :                         RETURN_FALSE;
    1521             :                 }
    1522           0 :         } else if (enable) {
    1523           0 :                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "When enabling encryption you must specify the crypto type");
    1524           0 :                 RETURN_FALSE;
    1525             :         }
    1526             : 
    1527           6 :         ret = php_stream_xport_crypto_enable(stream, enable TSRMLS_CC);
    1528           6 :         switch (ret) {
    1529             :                 case -1:
    1530           0 :                         RETURN_FALSE;
    1531             : 
    1532             :                 case 0:
    1533           0 :                         RETURN_LONG(0);
    1534             : 
    1535             :                 default:
    1536           6 :                         RETURN_TRUE;
    1537             :         }
    1538             : }
    1539             : /* }}} */
    1540             : 
    1541             : /* {{{ proto string stream_resolve_include_path(string filename)
    1542             : Determine what file will be opened by calls to fopen() with a relative path */
    1543           4 : PHP_FUNCTION(stream_resolve_include_path)
    1544             : {
    1545             :         char *filename, *resolved_path;
    1546             :         int filename_len;
    1547             : 
    1548           4 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &filename, &filename_len) == FAILURE) {
    1549           1 :                 return;
    1550             :         }
    1551             : 
    1552           3 :         resolved_path = zend_resolve_path(filename, filename_len TSRMLS_CC);
    1553             : 
    1554           3 :         if (resolved_path) {
    1555           2 :                 RETURN_STRING(resolved_path, 0);
    1556             :         }
    1557           1 :         RETURN_FALSE;
    1558             : }
    1559             : /* }}} */
    1560             : 
    1561             : /* {{{ proto bool stream_is_local(resource stream|string url) U
    1562             : */
    1563           3 : PHP_FUNCTION(stream_is_local)
    1564             : {
    1565             :         zval **zstream;
    1566           3 :         php_stream *stream = NULL;
    1567           3 :         php_stream_wrapper *wrapper = NULL;
    1568             : 
    1569           3 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "Z", &zstream) == FAILURE) {
    1570           0 :                 RETURN_FALSE;
    1571             :         }
    1572             : 
    1573           3 :         if (Z_TYPE_PP(zstream) == IS_RESOURCE) {
    1574           1 :                 php_stream_from_zval(stream, zstream);
    1575           1 :                 if (stream == NULL) {
    1576           0 :                         RETURN_FALSE;
    1577             :                 }
    1578           1 :                 wrapper = stream->wrapper;
    1579             :         } else {
    1580           7 :                 convert_to_string_ex(zstream);
    1581             : 
    1582           2 :                 wrapper = php_stream_locate_url_wrapper(Z_STRVAL_PP(zstream), NULL, 0 TSRMLS_CC);
    1583             :         }
    1584             : 
    1585           3 :         if (!wrapper) {
    1586           0 :                 RETURN_FALSE;
    1587             :         }
    1588             : 
    1589           3 :         RETURN_BOOL(wrapper->is_url==0);
    1590             : }
    1591             : /* }}} */
    1592             : 
    1593             : /* {{{ proto bool stream_supports_lock(resource stream)
    1594             :    Tells whether the stream supports locking through flock(). */
    1595           5 : PHP_FUNCTION(stream_supports_lock)
    1596             : {
    1597             :         php_stream *stream;
    1598             :         zval *zsrc;
    1599             : 
    1600           5 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &zsrc) == FAILURE) {
    1601           0 :                 RETURN_FALSE;
    1602             :         }
    1603             : 
    1604           5 :         php_stream_from_zval(stream, &zsrc);
    1605             : 
    1606           4 :         if (!php_stream_supports_lock(stream)) {
    1607           2 :                 RETURN_FALSE;
    1608             :         }
    1609             : 
    1610           2 :         RETURN_TRUE;
    1611             : }
    1612             : 
    1613             : #ifdef HAVE_SHUTDOWN
    1614             : /* {{{ proto int stream_socket_shutdown(resource stream, int how)
    1615             :         causes all or part of a full-duplex connection on the socket associated
    1616             :         with stream to be shut down.  If how is SHUT_RD,  further receptions will
    1617             :         be disallowed. If how is SHUT_WR, further transmissions will be disallowed.
    1618             :         If how is SHUT_RDWR,  further  receptions and transmissions will be
    1619             :         disallowed. */
    1620           4 : PHP_FUNCTION(stream_socket_shutdown)
    1621             : {
    1622             :         long how;
    1623             :         zval *zstream;
    1624             :         php_stream *stream;
    1625             : 
    1626           4 :         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &zstream, &how) == FAILURE) {
    1627           0 :                 RETURN_FALSE;
    1628             :         }
    1629             : 
    1630           9 :         if (how != STREAM_SHUT_RD &&
    1631           4 :             how != STREAM_SHUT_WR &&
    1632           1 :             how != STREAM_SHUT_RDWR) {
    1633           0 :                 RETURN_FALSE;
    1634             :         }
    1635             : 
    1636           4 :         php_stream_from_zval(stream, &zstream);
    1637             : 
    1638           4 :         RETURN_BOOL(php_stream_xport_shutdown(stream, (stream_shutdown_t)how TSRMLS_CC) == 0);
    1639             : }
    1640             : /* }}} */
    1641             : #endif
    1642             : 
    1643             : /*
    1644             :  * Local variables:
    1645             :  * tab-width: 4
    1646             :  * c-basic-offset: 4
    1647             :  * End:
    1648             :  * vim600: noet sw=4 ts=4 fdm=marker
    1649             :  * vim<600: noet sw=4 ts=4
    1650             :  */
    1651             : 

Generated by: LCOV version 1.10

Generated at Tue, 29 Jul 2014 09:53:13 +0000 (2 days ago)

Copyright © 2005-2014 The PHP Group
All rights reserved.