- simple message test
[m6w6/ext-http] / http_methods.c
index af7586d86e2ba3ddc7f5288258cdacc2e5d3d9c2..e06f34078521155fc777944afde0c4dfb135d176 100644 (file)
@@ -317,13 +317,13 @@ PHP_METHOD(HttpResponse, setData)
        zval *the_data;
        getObject(http_response_object, obj);
 
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &the_data)) {
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z/", &the_data)) {
                RETURN_FALSE;
        }
 
        convert_to_string_ex(&the_data);
        SET_PROP(obj, data, the_data);
-       UPD_PROP(obj, long, lastModified, http_lmod(the_data, SEND_DATA));
+       UPD_PROP(obj, long, lastModified, http_last_modified(the_data, SEND_DATA));
        UPD_PROP(obj, long, send_mode, SEND_DATA);
        RETURN_TRUE;
 }
@@ -362,7 +362,7 @@ PHP_METHOD(HttpResponse, setStream)
        php_stream_from_zval(the_real_stream, &the_stream);
 
        SET_PROP(obj, stream, the_stream);
-       UPD_PROP(obj, long, lastModified, http_lmod(the_real_stream, SEND_RSRC));
+       UPD_PROP(obj, long, lastModified, http_last_modified(the_real_stream, SEND_RSRC));
        UPD_PROP(obj, long, send_mode, SEND_RSRC);
        RETURN_TRUE;
 }
@@ -400,7 +400,7 @@ PHP_METHOD(HttpResponse, setFile)
        convert_to_string_ex(&the_file);
 
        UPD_PROP(obj, string, file, Z_STRVAL_P(the_file));
-       UPD_PROP(obj, long, lastModified, http_lmod(the_file, -1));
+       UPD_PROP(obj, long, lastModified, http_last_modified(the_file, -1));
        UPD_PROP(obj, long, send_mode, -1);
        RETURN_TRUE;
 }
@@ -523,7 +523,7 @@ PHP_METHOD(HttpResponse, send)
 
 /* {{{ HttpMessage */
 
-/* {{{ static HttpMessage HttpMessage::fromString(string raw_message)
+/* {{{ proto static HttpMessage HttpMessage::fromString(string raw_message)
  *
  * Create an HttpMessage object from a string.
  */
@@ -532,6 +532,7 @@ PHP_METHOD(HttpMessage, fromString)
        char *string = NULL;
        int length = 0;
        http_message *msg = NULL;
+       http_message_object obj;
 
        if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &string, &length)) {
                RETURN_NULL();
@@ -546,135 +547,239 @@ PHP_METHOD(HttpMessage, fromString)
 }
 /* }}} */
 
-/* {{{ void HttpMessage::__construct([string raw_message])
+/* {{{ proto void HttpMessage::__construct([string message])
  *
- * Instantiate a new HttpMessage object based on the optionally provided
- * raw message.  An HTTP Message can be either a response or a request.
+ * Instantiate a new HttpMessage object.
  */
 PHP_METHOD(HttpMessage, __construct)
 {
-       zval *message = NULL;
+       char *message = NULL;
+       int length = 0;
        getObject(http_message_object, obj);
 
        SET_EH_THROW_HTTP();
-       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|z/", &message)) {
-               if (message) {
-                       convert_to_string(message);
-                       SET_PROP(obj, raw, message);
+       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &message, &length) && message && length) {
+               if (obj->message = http_message_parse(message, length)) {
+                       if (obj->message->parent) {
+                               obj->parent = http_message_object_from_msg(obj->message->parent);
+                       }
                }
+       } else if (!obj->message) {
+               obj->message = http_message_new();
        }
        SET_EH_NORMAL();
 }
 /* }}} */
 
-/* {{{ void HttpMessage::setRaw(string raw_message)
+/* {{{ proto string HttpMessage::getBody()
  *
- * Parse a new raw message.
+ * Get the body of the parsed Message.
  */
-PHP_METHOD(HttpMessage, setRaw)
+PHP_METHOD(HttpMessage, getBody)
 {
-       zval *message;
+       zval *body;
        getObject(http_message_object, obj);
 
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z/", &message)) {
-               return;
-       }
+       NO_ARGS;
 
-       convert_to_string(message);
-       SET_PROP(obj, raw, message);
+       RETURN_PHPSTR(&obj->message->body, PHPSTR_FREE_NOT, 1);
 }
 /* }}} */
 
-/* {{{ string HttpMessage::getBody()
+/* {{{ proto array HttpMessage::getHeaders()
  *
- * Get the body of the parsed Message.
+ * Get Message Headers.
  */
-PHP_METHOD(HttpMessage, getBody)
+PHP_METHOD(HttpMessage, getHeaders)
 {
-       zval *body;
+       zval headers;
        getObject(http_message_object, obj);
 
        NO_ARGS;
 
-       body = GET_PROP(obj, body);
-       RETURN_STRINGL(Z_STRVAL_P(body), Z_STRLEN_P(body), 1);
+       Z_ARRVAL(headers) = &obj->message->hdrs;
+       array_init(return_value);
+       array_copy(&headers, return_value);
 }
 /* }}} */
 
-/* {{{ array HttpMessage::getHeaders()
+/* {{{ proto void HttpMessage::setHeaders(array headers)
  *
- * Get Message Headers.
+ * Sets new headers.
  */
-PHP_METHOD(HttpMessage, getHeaders)
+PHP_METHOD(HttpMessage, setHeaders)
 {
-       zval *headers;
+       zval *new_headers, old_headers;
        getObject(http_message_object, obj);
 
-       NO_ARGS;
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &new_headers)) {
+               return;
+       }
 
-       headers = GET_PROP(obj, headers);
-       array_init(return_value);
-       array_copy(headers, return_value);
+       zend_hash_clean(&obj->message->hdrs);
+       Z_ARRVAL(old_headers) = &obj->message->hdrs;
+       array_copy(new_headers, &old_headers);
+}
+/* }}} */
+
+/* {{{ proto void HttpMessage::addHeaders(array headers[, bool append = false])
+ *
+ * Add headers. If append is true, headers with the same name will be separated, else overwritten.
+ */
+PHP_METHOD(HttpMessage, addHeaders)
+{
+       zval old_headers, *new_headers;
+       zend_bool append = 0;
+       getObject(http_message_object, obj);
+
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a|b", &new_headers, &append)) {
+               return;
+       }
+
+       Z_ARRVAL(old_headers) = &obj->message->hdrs;
+       if (append) {
+               array_append(new_headers, &old_headers);
+       } else {
+               array_merge(new_headers, &old_headers);
+       }
 }
 /* }}} */
 
-/* {{{ long HttpMessage::getType()
+/* {{{ proto long HttpMessage::getType()
  *
  * Get Message Type. (HTTP_MSG_NONE|HTTP_MSG_REQUEST|HTTP_MSG_RESPONSE)
  */
 PHP_METHOD(HttpMessage, getType)
 {
-       zval *type;
        getObject(http_message_object, obj);
 
        NO_ARGS;
 
-       type = GET_PROP(obj, type);
-       RETURN_LONG(Z_LVAL_P(type));
+       RETURN_LONG(obj->message->type);
 }
 /* }}} */
 
-/* {{{ int HttpMessage::getResponseCode()
+/* {{{ proto void HttpMessage::setType(long type)
+ *
+ * Set Message Type. (HTTP_MSG_NONE|HTTP_MSG_REQUEST|HTTP_MSG_RESPONSE)
+ */
+PHP_METHOD(HttpMessage, setType)
+{
+       long type;
+       getObject(http_message_object, obj);
+
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &type)) {
+               return;
+       }
+       http_message_set_type(obj->message, type);
+}
+/* }}} */
+
+/* {{{ proto long HttpMessage::getResponseCode()
  *
  * Get the Response Code of the Message.
  */
 PHP_METHOD(HttpMessage, getResponseCode)
 {
-       zval *status;
        getObject(http_message_object, obj);
 
        NO_ARGS;
 
-       if (obj->message->type != HTTP_MSG_RESPONSE) {
+       if (!HTTP_MSG_TYPE(RESPONSE, obj->message)) {
+               http_error(E_NOTICE, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_RESPONSE");
                RETURN_NULL();
        }
 
-       status = GET_PROP(obj, responseCode);
-       RETURN_LONG(Z_LVAL_P(status));
+       RETURN_LONG(obj->message->info.response.code);
 }
 /* }}} */
 
-/* {{{ string HttpMessage::getRequestMethod()
+/* {{{ proto bool HttpMessage::setResponseCode(long code)
+ *
+ * Set the response code of an HTTP Response Message.
+ * Returns false if the Message is not of type HTTP_MSG_RESPONSE,
+ * or if the response code is out of range (100-510).
+ */
+PHP_METHOD(HttpMessage, setResponseCode)
+{
+       long code;
+       getObject(http_message_object, obj);
+
+       if (obj->message->type != HTTP_MSG_RESPONSE) {
+               http_error(E_WARNING, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_RESPONSE");
+               RETURN_FALSE;
+       }
+
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &code)) {
+               RETURN_FALSE;
+       }
+       if (code < 100 || code > 510) {
+               http_error_ex(E_WARNING, HTTP_E_PARAM, "Invalid response code (100-510): %ld", code);
+               RETURN_FALSE;
+       }
+
+       obj->message->info.response.code = code;
+       RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto string HttpMessage::getRequestMethod()
  *
  * Get the Request Method of the Message.
+ * Returns false if the Message is not of type HTTP_MSG_REQUEST.
  */
 PHP_METHOD(HttpMessage, getRequestMethod)
 {
-       zval *method;
        getObject(http_message_object, obj);
 
        NO_ARGS;
 
        if (obj->message->type != HTTP_MSG_REQUEST) {
+               http_error(E_NOTICE, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST");
                RETURN_NULL();
        }
 
-       method = GET_PROP(obj, requestMethod);
-       RETURN_STRINGL(Z_STRVAL_P(method), Z_STRLEN_P(method), 1);
+       RETURN_STRING(obj->message->info.request.method, 1);
 }
 /* }}} */
 
-/* {{{ string HttpMessage::getRequestUri()
+/* {{{ proto bool HttpMessage::setRequestMethod(string method)
+ *
+ * Set the Request Method of the HTTP Message.
+ * Returns false if the Message is not of type HTTP_MSG_REQUEST.
+ */
+PHP_METHOD(HttpMessage, setRequestMethod)
+{
+       char *method;
+       int method_len;
+       getObject(http_message_object, obj);
+
+       if (obj->message->type != HTTP_MSG_REQUEST) {
+               http_error(E_WARNING, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST");
+               RETURN_FALSE;
+       }
+
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &method, &method_len)) {
+               RETURN_FALSE;
+       }
+       if (method_len < 1) {
+               http_error(E_WARNING, HTTP_E_PARAM, "Cannot set HttpMessage::requestMethod to an empty string");
+               RETURN_FALSE;
+       }
+       if (SUCCESS != http_check_method(method)) {
+               http_error_ex(E_WARNING, HTTP_E_PARAM, "Unkown request method: %s", method);
+               RETURN_FALSE;
+       }
+
+       if (obj->message->info.request.method) {
+               efree(obj->message->info.request.method);
+       }
+       obj->message->info.request.method = estrndup(method, method_len);
+       RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto string HttpMessage::getRequestUri()
  *
  * Get the Request URI of the Message.
  */
@@ -686,38 +791,146 @@ PHP_METHOD(HttpMessage, getRequestUri)
        NO_ARGS;
 
        if (obj->message->type != HTTP_MSG_REQUEST) {
+               http_error(E_WARNING, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST");
                RETURN_NULL();
        }
 
-       uri = GET_PROP(obj, requestUri);
-       RETURN_STRINGL(Z_STRVAL_P(uri), Z_STRLEN_P(uri), 1);
+       RETURN_STRING(obj->message->info.request.URI, 1);
 }
 /* }}} */
 
-/* {{{ string HttpMessage::getHttpVersion()
+/* {{{ proto bool HttpMessage::setRequestUri(string URI)
+ *
+ * Set the Request URI of the HTTP Message.
+ * Returns false if the Message is not of type HTTP_MSG_REQUEST,
+ * or if paramtere URI was empty.
+ */
+PHP_METHOD(HttpMessage, setRequestUri)
+{
+       char *URI;
+       int URIlen;
+       getObject(http_message_object, obj);
+
+       if (obj->message->type != HTTP_MSG_REQUEST) {
+               http_error(E_WARNING, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST");
+               RETURN_FALSE;
+       }
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &URI, &URIlen)) {
+               RETURN_FALSE;
+       }
+       if (URIlen < 1) {
+               http_error(E_WARNING, HTTP_E_PARAM, "Cannot set HttpMessage::requestUri to an empty string");
+               RETURN_FALSE;
+       }
+
+       if (obj->message->info.request.URI) {
+               efree(obj->message->info.request.URI);
+       }
+       obj->message->info.request.URI = estrndup(URI, URIlen);
+       RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto string HttpMessage::getHttpVersion()
  *
  * Get the HTTP Protocol Version of the Message.
  */
 PHP_METHOD(HttpMessage, getHttpVersion)
 {
-       zval *version;
        char ver[4] = {0};
+       float version;
        getObject(http_message_object, obj);
 
        NO_ARGS;
 
-       version = GET_PROP(obj, httpVersion);
+       switch (obj->message->type)
+       {
+               case HTTP_MSG_RESPONSE:
+                       version = obj->message->info.response.http_version;
+               break;
 
-       if (Z_TYPE_P(version) == IS_NULL) {
-               RETURN_NULL();
-       }
+               case HTTP_MSG_REQUEST:
+                       version = obj->message->info.request.http_version;
+               break;
 
-       sprintf(ver, "1.1f", Z_DVAL_P(version));
+               case HTTP_MSG_NONE:
+               default:
+                       RETURN_NULL();
+       }
+       sprintf(ver, "%1.1f", version);
        RETURN_STRINGL(ver, 3, 1);
 }
 /* }}} */
 
-/* {{{ string HttpMessage::toString()
+/* {{{ proto bool HttpMessage::setHttpVersion(string version)
+ *
+ * Set the HTTP Protocol version of the Message.
+ * Returns false if version is invalid (1.0 and 1.1).
+ */
+PHP_METHOD(HttpMessage, setHttpVersion)
+{
+       char v[4];
+       zval *zv, *version;
+       getObject(http_message_object, obj);
+
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z/", &zv)) {
+               return;
+       }
+
+       if (obj->message->type == HTTP_MSG_NONE) {
+               http_error(E_WARNING, HTTP_E_MSG, "Message is neither of type HTTP_MSG_RESPONSE nor HTTP_MSG_REQUEST");
+               RETURN_FALSE;
+       }
+
+       convert_to_double_ex(&zv);
+       sprintf(v, "%1.1f", Z_DVAL_P(zv));
+       if (strcmp(v, "1.0") && strcmp(v, "1.1")) {
+               http_error_ex(E_WARNING, HTTP_E_PARAM, "Invalid HTTP protocol version (1.0 or 1.1): %s", v);
+               RETURN_FALSE;
+       }
+
+       if (obj->message->type == HTTP_MSG_RESPONSE) {
+               obj->message->info.response.http_version = (float) Z_DVAL_P(zv);
+       } else {
+               obj->message->info.request.http_version = (float) Z_DVAL_P(zv);
+       }
+       RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto HttpMessage HttpMessage::getParentMessage()
+ *
+ * Get parent Message.
+ */
+PHP_METHOD(HttpMessage, getParentMessage)
+{
+       getObject(http_message_object, obj);
+
+       NO_ARGS;
+
+       if (obj->message->parent) {
+               RETVAL_OBJVAL(obj->parent);
+       } else {
+               RETVAL_NULL();
+       }
+}
+/* }}} */
+
+/* {{{ proto bool HttpMessage::send()
+ *
+ * Send the Message according to its type as Response or Request.
+ */
+PHP_METHOD(HttpMessage, send)
+{
+       getObject(http_message_object, obj);
+
+       NO_ARGS;
+
+       RETURN_SUCCESS(http_message_send(obj->message));
+}
+/* }}} */
+
+/* {{{ proto string HttpMessage::toString([bool include_parent = true])
  *
  * Get the string representation of the Message.
  */
@@ -725,11 +938,18 @@ PHP_METHOD(HttpMessage, toString)
 {
        char *string;
        size_t length;
+       zend_bool include_parent = 1;
        getObject(http_message_object, obj);
 
-       NO_ARGS;
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|b", &include_parent)) {
+               RETURN_FALSE;
+       }
 
-       http_message_tostring(obj->message, &string, &length);
+       if (include_parent) {
+               http_message_serialize(obj->message, &string, &length);
+       } else {
+               http_message_tostring(obj->message, &string, &length);
+       }
        RETURN_STRINGL(string, length, 0);
 }
 /* }}} */