root/trunk/midgard/apis/php5/php_midgard_object_attachment.c

/*
 * Copyright (C) 2006, 2007 Piotr Pokora <piotrek.pokora@gmail.com>
 * 
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU Lesser General Public License as published
 * by the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 * 
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

#include "php_midgard.h"
#include "php_midgard_gobject.h"

#define _FREE_PARAMETERS \
        guint _i; \
        for(_i = 0; _i < n_params; _i++) { \
                g_value_unset(&parameters[_i].value); \
        } \
        g_free(parameters); \

PHP_FUNCTION(_php_midgard_object_list_attachments)
{
        RETVAL_FALSE;
        CHECK_MGD;
        zval *zval_object = getThis();  
        MgdObject **objects = NULL;

        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "") != SUCCESS) 
                return;

        MgdObject *mobj = php_midgard_get_midgard_object(zval_object);
        objects = midgard_object_list_attachments(mobj);        

        array_init(return_value);
        
        if(objects) {   
                php_midgard_array_from_objects((GObject **)objects, "midgard_attachment", return_value);
                g_free(objects);
        }
}

PHP_FUNCTION(_php_midgard_object_delete_attachments)
{
        RETVAL_FALSE;
        CHECK_MGD;
        zval *zval_object = getThis();
        zval *params = NULL;
        guint n_params = 0;
        gboolean rv = FALSE;
        
        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
                                "|z", &params) != SUCCESS) {
                return;
        }       

        GParameter *parameters = php_midgard_array_to_gparameter(params, &n_params);
        MgdObject *mobj = php_midgard_get_midgard_object(zval_object);
        rv = midgard_object_delete_attachments(mobj, n_params, parameters);

        _FREE_PARAMETERS;

        RETURN_BOOL(rv);
}

PHP_FUNCTION(_php_midgard_object_purge_attachments)
{
        RETVAL_FALSE;
        CHECK_MGD;
        zval *zval_object = getThis();
        zval *params = NULL;
        guint n_params = 0;
        gboolean rv = FALSE;
        zend_bool zbool = TRUE;
        
        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
                                "|zz", &zbool, &params) != SUCCESS) {
                return;
        }       

        GParameter *parameters = php_midgard_array_to_gparameter(params, &n_params);
        MgdObject *mobj = php_midgard_get_midgard_object(zval_object);
        rv = midgard_object_purge_attachments(mobj, (gboolean) zbool, n_params, parameters);

        _FREE_PARAMETERS;

        RETURN_BOOL(rv);
}

PHP_FUNCTION(_php_midgard_object_find_attachments)
{
        RETVAL_FALSE;
        CHECK_MGD;
        zval *zval_object = getThis();
        zval *params = NULL;
        guint n_params = 0;
        MgdObject **objects = NULL;

        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
                                "|z", &params) != SUCCESS) {
                return;
        }       

        GParameter *parameters = php_midgard_array_to_gparameter(params, &n_params);
        MgdObject *mobj = php_midgard_get_midgard_object(zval_object);
        objects = midgard_object_find_attachments(mobj, n_params, parameters);

        _FREE_PARAMETERS;

        array_init(return_value);
        
        if(objects) {   
                php_midgard_array_from_objects((GObject **)objects, "midgard_attachment", return_value);
                g_free(objects);
        }
}

PHP_FUNCTION(_php_midgard_object_create_attachment)
{
        RETVAL_FALSE;
        CHECK_MGD;
        zval *zval_object = getThis();  
        gchar *class_name;
        const gchar *type_name;
        zend_class_entry **ce;
        const gchar *name = NULL, *title = NULL, *mimetype = NULL;
        guint name_length, title_length, mimetype_length;
        
        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
                                "|sss", &name, &name_length, 
                                &title, &title_length, 
                                &mimetype, &mimetype_length) != SUCCESS) {
                return;
        }       

        MgdObject *mobj = php_midgard_get_midgard_object(zval_object);
        MgdObject *att = midgard_object_create_attachment(mobj, name, title, mimetype);

        if(att) {
                
                type_name = G_OBJECT_TYPE_NAME((GObject*)att);
                class_name = g_ascii_strdown(type_name, strlen(type_name));
                zend_hash_find(CG(class_table),
                                class_name, strlen(class_name)+1, (void **) &ce);
                php_midgard_gobject_new_with_gobject(return_value, *ce, G_OBJECT(att), TRUE);
                g_free(class_name);
                g_signal_emit(att, MIDGARD_OBJECT_GET_CLASS(att)->signal_action_loaded_hook, 0);
        
        } else {
                
                RETURN_NULL();
        }
}

/* It's not binded from core. This is PHP specific */
PHP_FUNCTION(_php_midgard_object_serve_attachment)
{
        RETVAL_FALSE;
        CHECK_MGD;      
        MgdObject *att = NULL;
        const gchar *guid;
        guint guid_length;


        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
                                "s", &guid, &guid_length) != SUCCESS) {
                return;
        }       

        if(!midgard_is_guid(guid)) {
                g_warning("Given parameter is not a guid");
                return;
        }

        GValue gval = {0, };
        g_value_init(&gval, G_TYPE_STRING);
        g_value_set_string(&gval, guid);
        att = midgard_object_new(mgd_handle(), "midgard_attachment", &gval);

        /* error is set by core */
        if(!att)
                return;

        MidgardBlob *blob = midgard_blob_new(att);

        if(!blob)
                return ;
        gchar *mimetype; 
        g_object_get(G_OBJECT(att), "mimetype", &mimetype, NULL);
        gchar *content_type = g_strconcat("Content-type: ", mimetype, NULL);
        sapi_add_header(content_type, strlen(content_type), 1);
        g_free(content_type);

        if (sapi_send_headers(TSRMLS_C) != SUCCESS) 
                return;

        const gchar *path = midgard_blob_get_path(blob);
        FILE *fp;
        int b;
        char buf[1024];

        if (!(fp = fopen(path, "r"))) {
                g_warning("File doesn't exist");
                MIDGARD_ERRNO_SET(mgd_handle(), MGD_ERR_INTERNAL);
                return;
        }

        while ((b = fread(buf, 1, sizeof(buf), fp)) > 0) {
                PHPWRITE(buf, b);
        }
        
        fclose(fp);

        RETVAL_TRUE;;
}