/*******************************************************************************

 WINBINDER - The native Windows binding for PHP for PHP

 Copyright © Hypervisual - see LICENSE.TXT for details
 Author: Rubem Pechansky (http://winbinder.org/contact.php)

 ZEND wrapper for treeview control

*******************************************************************************/

//----------------------------------------------------------------- DEPENDENCIES

#include "phpwb.h"

//---------------------------------------------------------- EXTERNAL PROTOTYPES

extern UINT wbGetTreeViewItemLevel(PWBOBJ pwbo, HTREEITEM hItem);

//----------------------------------------------------------- EXPORTED FUNCTIONS

/* Returns the level of a node in a treeview */

ZEND_FUNCTION(wb_get_level)
{
	LONG pwbo, item = 0;

    if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
	  "ll", &pwbo, &item) == FAILURE)
		return;

	if(!wbIsWBObj((void *)pwbo, TRUE))
		RETURN_NULL()

	if(((PWBOBJ)pwbo)->uClass == TreeView) {
		if(item) {
			RETURN_LONG(wbGetTreeViewItemLevel((PWBOBJ)pwbo, (HTREEITEM)item));
		} else {
			RETURN_NULL();
		}
	} else {
		RETURN_NULL();
	}
}

ZEND_FUNCTION(wbtemp_set_treeview_item_selected)
{
	LONG pwbo, item;

    if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
	  "ll", &pwbo, &item) == FAILURE)
		return;

	if(!wbIsWBObj((void *)pwbo, TRUE))
		RETURN_NULL()

	RETURN_BOOL(wbSetTreeViewItemSelected((PWBOBJ)pwbo, (HTREEITEM)item));
}

ZEND_FUNCTION(wbtemp_set_treeview_item_text)
{
	LONG pwbo, item;
	char *s;
	int s_len;

    if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
	  "lls", &pwbo, &item, &s, &s_len) == FAILURE)
		return;

	if(!wbIsWBObj((void *)pwbo, TRUE))
		RETURN_NULL()

	RETURN_BOOL(wbSetTreeViewItemText((PWBOBJ)pwbo, (HTREEITEM)item, s));
}

ZEND_FUNCTION(wbtemp_get_treeview_item_text)
{
	LONG pwbo, item = 0;
	char szItem[MAX_ITEM_STRING];

    if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
	  "ll", &pwbo, &item) == FAILURE)
		return;

	if(!wbIsWBObj((void *)pwbo, TRUE))
		RETURN_NULL()

	wbGetTreeViewItemText((PWBOBJ)pwbo, (HTREEITEM)item, szItem, MAX_ITEM_STRING - 1);
	RETURN_STRING(szItem, TRUE)
}

/*

Change the item value.
If zparam is NULL, does not change associated value (does nothing).

*/

ZEND_FUNCTION(wbtemp_set_treeview_item_value)
{
	LONG pwbo, item, lparam = 0;
	zval *zparam, *zcopy;

    if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
	  "llz!", &pwbo, &item, &zparam) == FAILURE)
		return;

	if(!wbIsWBObj((void *)pwbo, TRUE))
		RETURN_NULL()

	switch(zparam->type) {

		case IS_NULL:				// Do not change lparam
			lparam = 0;
			break;

		case IS_BOOL:
		case IS_LONG:
		case IS_STRING:
		default:
			// ****** Possible leak: Should free the existing copy of zparam here, if any
			ALLOC_ZVAL(zcopy);		// Create a copy of zparam
			*zcopy = *zparam;
			zval_copy_ctor(zcopy);
			lparam = (LONG)zcopy;
			break;
	}

	RETURN_BOOL(wbSetTreeViewItemValue((PWBOBJ)pwbo, (HTREEITEM)item, lparam));
}

/*

int wbtemp_create_treeview_item( int wbobject, string caption [, mixed param [, int where [, int image [, int selectedimage [, insertiontype]]]]])

Create a new treeview item and returns the HTREEITEM handle to it.
If zparam is NULL, does not change associated value.

*/

ZEND_FUNCTION(wbtemp_create_treeview_item)
{
	LONG pwbo, where = 0, img1 = -1, img2 = -1, insertiontype = 0;
	char *str;
	int str_len, lparam = 0;
	zval *zparam = NULL, *zcopy;
	BOOL setlparam = FALSE;

    if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,
	  "ls|zllll", &pwbo, &str, &str_len, &zparam, &where, &img1, &img2, &insertiontype) == FAILURE)
		return;

	if(!wbIsWBObj((void *)pwbo, TRUE))
		RETURN_NULL()

	switch(zparam->type) {

		case IS_NULL:				// Do not change lparam
			lparam = 0;
			setlparam = FALSE;
			break;

		case IS_BOOL:
		case IS_LONG:
		case IS_STRING:
		default:
			// ****** Possible leak: Should free the existing copy of zparam here, if any
			ALLOC_ZVAL(zcopy);		// Create a copy of zparam
			*zcopy = *zparam;
			zval_copy_ctor(zcopy);
			lparam = (LONG)zcopy;
			setlparam = TRUE;
			break;
	}

	switch(insertiontype) {
		case 0:						// 'where' is the level of insertion
		default:
			RETURN_LONG((LONG)wbAddTreeViewItemLevel((PWBOBJ)pwbo, where, str, lparam, setlparam, img1, img2));
			break;
		case 1:						// 'where' is the sibling of the new node
			RETURN_LONG((LONG)wbAddTreeViewItemSibling((PWBOBJ)pwbo, (HTREEITEM)where, str, lparam, setlparam, img1, img2));
			break;
		case 2:						// 'where' is the parent of the new node
			RETURN_LONG((LONG)wbAddTreeViewItemChild((PWBOBJ)pwbo, (HTREEITEM)where, str, lparam, setlparam, img1, img2))
			break;
	}
}

//------------------------------------------------------------------ END OF FILE