support for php5.6.30
[php-ancillary.git] / php-ancillary.c
index 115221a..b79a92a 100644 (file)
 #ifdef HAVE_CONFIG_H
 #include "config.h"
 #endif
+
+#ifndef _XPG4_2 /* Solaris sucks */
+# define _XPG4_2
+#endif
+
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/socket.h>
+#include <sys/uio.h>
+#include <assert.h>
+#if defined(__FreeBSD__)
+# include <sys/param.h> /* FreeBSD sucks */
+#endif
+
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <stdio.h>
+
 #include "php.h"
+#include <php5/main/php_network.h>
+#include <php5/ext/standard/file.h>
 #include <ancillary.h>
+
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
  
 #define PHP_ANCILLARY_VERSION "1.0"
 #define PHP_ANCILLARY_EXTNAME "ancillary"
  
 extern zend_module_entry ancillary_module_entry;
 #define phpext_ancillary_ptr &ancillary_module_entry
+
+int
+ancil_recv_fds_with_buffer(int sock, int *fds, unsigned n_fds, void *buffer)
+{
+    struct msghdr msghdr;
+    char nothing;
+    struct iovec nothing_ptr;
+    struct cmsghdr *cmsg;
+    int i;
+
+    nothing_ptr.iov_base = &nothing;
+    nothing_ptr.iov_len = 1;
+    msghdr.msg_name = NULL;
+    msghdr.msg_namelen = 0;
+    msghdr.msg_iov = &nothing_ptr;
+    msghdr.msg_iovlen = 1;
+    msghdr.msg_flags = 0;
+    msghdr.msg_control = buffer;
+    msghdr.msg_controllen = sizeof(struct cmsghdr) + sizeof(int) * n_fds;
+    cmsg = CMSG_FIRSTHDR(&msghdr);
+    cmsg->cmsg_len = msghdr.msg_controllen;
+    cmsg->cmsg_level = SOL_SOCKET;
+    cmsg->cmsg_type = SCM_RIGHTS;
+    for(i = 0; i < n_fds; i++)
+       ((int *)CMSG_DATA(cmsg))[i] = -1;
+    
+    if(recvmsg(sock, &msghdr, 0) < 0)
+       return(-1);
+    for(i = 0; i < n_fds; i++)
+       fds[i] = ((int *)CMSG_DATA(cmsg))[i];
+    n_fds = (cmsg->cmsg_len - sizeof(struct cmsghdr)) / sizeof(int);
+    return(n_fds);
+}
+
+int
+ancil_recv_fds_with_buffer_ext(int sock, int *fds, unsigned n_fds, void *buffer, char *headers, int hsize)
+{
+    struct msghdr msghdr;
+    char nothing;
+    struct iovec nothing_ptr;
+    struct cmsghdr *cmsg;
+    int i, mop_len;
+
+    nothing_ptr.iov_base = &nothing;
+    nothing_ptr.iov_len = 1;
+    msghdr.msg_name = NULL;
+    msghdr.msg_namelen = 0;
+    msghdr.msg_iov = &nothing_ptr;
+    msghdr.msg_iovlen = 1;
+    msghdr.msg_flags = 0;
+    msghdr.msg_control = buffer;
+    msghdr.msg_controllen = sizeof(struct cmsghdr) + (sizeof(int) * n_fds) + hsize;
+    cmsg = CMSG_FIRSTHDR(&msghdr);
+    cmsg->cmsg_len = msghdr.msg_controllen;
+    cmsg->cmsg_level = SOL_SOCKET;
+    cmsg->cmsg_type = SCM_RIGHTS;
+    for(i = 0; i < n_fds; i++)
+       ((int *)CMSG_DATA(cmsg))[i] = -1;
+    if((mop_len = recvmsg(sock, &msghdr, 0)) < 0)
+       return(-1);
+
+    if (0 == 1) {
+        int mop_fd;
+        char mop_bf[512];
+
+        mop_fd = open("/tmp/fd_recv.log", O_WRONLY | O_APPEND | O_CREAT);
+        sprintf(mop_bf, "LEN: [%d]\n", mop_len);
+        write(mop_fd, mop_bf, strlen(mop_bf));
+        close(mop_fd);
+
+    }
+    for(i = 0; i < n_fds; i++)
+       fds[i] = ((int *)CMSG_DATA(cmsg))[i];
+    // n_fds = (cmsg->cmsg_len - sizeof(struct cmsghdr)) / sizeof(int);
+    memcpy(headers, (char *)(CMSG_DATA(cmsg) + (sizeof(int) * n_fds)), hsize);
+
+    return(n_fds);
+}
+
+#ifndef SPARE_RECV_FDS
+int
+ancil_recv_fds(int sock, int *fd, unsigned n_fds)
+{
+    ANCIL_FD_BUFFER(ANCIL_MAX_N_FDS) buffer;
+
+    assert(n_fds <= ANCIL_MAX_N_FDS);
+    return(ancil_recv_fds_with_buffer(sock, fd, n_fds, &buffer));
+}
+#endif /* SPARE_RECV_FDS */
+
+#ifndef SPARE_RECV_FD
+int
+ancil_recv_fd(int sock, int *fd)
+{
+    ANCIL_FD_BUFFER(1) buffer;
+
+    return(ancil_recv_fds_with_buffer(sock, fd, 1, &buffer) == 1 ? 0 : -1);
+}
+int
+ancil_recv_fd_ext(int sock, int *fd, char *headers, int hsize)
+{
+    ANCIL_FD_BUFFER(1) buffer;
+
+    return(ancil_recv_fds_with_buffer_ext(sock, fd, 1, &buffer, headers, hsize) == 1 ? 0 : -1);
+}
+#endif /* SPARE_RECV_FD */
+
  
 // declaration of a custom mop_function()
 PHP_FUNCTION(ancillary_getstream);
  
 // list of custom PHP functions provided by this extension
 // set {NULL, NULL, NULL} as the last record to mark the end of list
-static function_entry ancillary_getstream[] = {
+static
+#if ZEND_MODULE_API_NO >= 20131226
+ zend_function_entry
+#elif ZEND_MODULE_API_NO >= 20010901
+ function_entry
+#endif
+ ancillary_getstream[] = {
     PHP_FE(ancillary_getstream, NULL)
     {NULL, NULL, NULL}
 };
@@ -39,31 +179,102 @@ zend_module_entry ancillary_module_entry = {
 };
  
 ZEND_GET_MODULE(ancillary)
+
+#define CTRL_BUFF_MAX_SZ (8*1024)
  
 // starting from a unix socket receive a socket from an external process
 PHP_FUNCTION(ancillary_getstream)
 {
     zval *zstream;
     php_stream *stream;
-    int fd_in, fd_out;
+    int fd_in, fd_out[2], retrecv, curpos = 0;
+    char *headers;
+    zval *zheaders;
+    php_netstream_data_t *sock;
+
+    if ((headers = calloc(CTRL_BUFF_MAX_SZ, 1)) == NULL) {
+        return;
+    }
 
-    if (FAILURE == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &zstream))
+    if (FAILURE == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rz", &zstream, &zheaders)) {
+        free(headers);
         return;
+    }
     
     php_stream_from_zval(stream, &zstream);
 
     if (php_stream_cast(stream, PHP_STREAM_AS_FD, (void*)&fd_in, REPORT_ERRORS) == FAILURE) {
+        free(headers);
         RETURN_FALSE;
     }
 
-    if(ancil_recv_fd(fd_in, &fd_out)) {
+    if(ancil_recv_fds(fd_in, fd_out, 2) == 0) {
+        free(headers);
         RETURN_FALSE;
     }
 
-    if ((stream = php_stream_fopen_from_fd(fd_out, "r+b", NULL)) == NULL) {
-        RETURN_FALSE;
+    {
+        char bf[2048];
+
+        sprintf(bf, "zero: [%d]    uno: [%d]\n", fd_out[0], fd_out[1]);
+        write(1, bf, strlen(bf));
+    }
+    while(1) {
+        write(1, "LOOP\n", 5);
+        retrecv = recv(fd_out[1], &(headers[curpos]), CTRL_BUFF_MAX_SZ - curpos - 1, 0);
+        if (retrecv < 0) {
+            free(headers);
+            RETURN_FALSE;
+        }
+        else if (retrecv == 0) {
+            break;
+        }
+        else {
+            char bf[1024];
+            curpos += retrecv;
+            sprintf(bf, "CURPOS: %d\n", curpos);
+            write(1, bf, strlen(bf));
+            if (curpos == CTRL_BUFF_MAX_SZ - 1) {
+                free(headers);
+                RETURN_FALSE;
+            }
+        }
+    }
+    shutdown(fd_out[1], SHUT_RDWR);
+    close(fd_out[1]);
+    write(1, "HEADERS[", 8);
+    write(1, headers, curpos);
+    headers[curpos] = '\0';
+    write(1, "]\n", 2);
+    ZVAL_STRING(zheaders, headers, 1);
+    free(headers);
+
+    if (0 == 1) {
+        int fh;
+
+        if ((fh = open("/tmp/out_php-anc.txt", O_WRONLY | O_CREAT | O_APPEND)) > -1) {
+            write(fh, headers, curpos);
+            close(fh);
+        }
     }
 
+    sock = pemalloc(sizeof(php_netstream_data_t), 0);
+    memset(sock, 0, sizeof(php_netstream_data_t));
+
+    sock->is_blocked = 1;
+    sock->timeout.tv_sec = FG(default_socket_timeout);
+    sock->timeout.tv_usec = 0;
+
+    /* we don't know the socket until we have determined if we are binding or
+     * connecting */
+    sock->socket = fd_out[0];
+
+    stream = php_stream_alloc_rel(&php_stream_socket_ops, sock, NULL, "r+");
+
+    if (stream == NULL)        {
+        pefree(sock, 0);
+        return;
+    }
     php_stream_to_zval(stream, return_value);
 }