/*****************************************************************************
 *
 * Copyright (c) 1999, KL GROUP INC.  All Rights Reserved.
 * http://www.klgroup.com
 *
 * This file is provided for demonstration and educational uses only.
 * Permission to use, copy, modify and distribute this file for
 * any purpose and without fee is hereby granted, provided that the
 * above copyright notice and this permission notice appear in all
 * copies, and that the name of KL Group not be used in advertising
 * or publicity pertaining to this material without the specific,
 * prior written permission of an authorized representative of
 * KL Group.
 *
 * KL GROUP MAKES NO REPRESENTATIONS OR WARRANTIES ABOUT THE SUITABILITY
 * OF THE SOFTWARE, EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED
 * TO THE IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
 * PURPOSE, OR NON-INFRINGEMENT. KL GROUP SHALL NOT BE LIABLE FOR ANY
 * DAMAGES SUFFERED BY USERS AS A RESULT OF USING, MODIFYING OR
 * DISTRIBUTING THIS SOFTWARE OR ITS DERIVATIVES.
 */

#ifndef STRICT
    #define STRICT
#endif

#include <windows.h>
#include "malloc.h"
#include "olch2d.h"
#include "pointsty.h"

/* We want to keep one pointstyle available for each pie. Since this simple
 * demo doesn't track the pie windows, we use a simple table to keep them
 * organized by chart handle. A simple linear search of the table will do
 * for our purposes here.
 */

TrackingEntry* TrackingArray = NULL;
int TrackingEntryCount = 0;

/* Local routine - find point style for this chart, if any */
XrtPointStyleHandle LookupPointStyle(HXRT2D hChart)
{
	int i;

	if( TrackingArray != NULL) {
		for( i=0; i<TrackingEntryCount; i++) {
			if( TrackingArray[i].hChart == hChart ) {
				return TrackingArray[i].hps;
			}
		}
	}

	return NULL;
}

/* Local routine - add point style for this chart to our local list */
void AddPointStyleEntry(HXRT2D hChart, XrtPointStyleHandle hps)
{
	if(TrackingEntryCount == 0) { /* 1st entry */
		TrackingEntryCount++;
		TrackingArray = (TrackingEntry *)malloc(sizeof(TrackingEntry));
	}
	else
	{
		TrackingEntryCount++;
		TrackingArray = (TrackingEntry* )realloc(TrackingArray, TrackingEntryCount * sizeof(TrackingEntry));
	}
	TrackingArray[TrackingEntryCount-1].hChart = hChart;
	TrackingArray[TrackingEntryCount-1].hps = hps;
}

/* Local routine - remove point style for this chart from our local list */
void RemovePointStyleEntry(HXRT2D hChart)
{
	int i;
	if( TrackingArray != NULL) {
		for( i=0; i<TrackingEntryCount; i++) {
			if( TrackingArray[i].hChart == hChart ) {
				/* Found it, remove from the table */
				if( i != TrackingEntryCount-1) {
					/* Move the last entry up, we're dropping one from the middle */
					TrackingArray[i] = TrackingArray[TrackingEntryCount-1];
				}
				/* Drop the last entry */
				TrackingEntryCount--;
				TrackingArray = (TrackingEntry* )realloc(TrackingArray, TrackingEntryCount * sizeof(TrackingEntry));
				return;
			}
		}
	}
}

/* Routines exported for use in the other modules */

XrtPointStyleHandle CreatePointStyle(HXRT2D hChart, double offset)
{
	XrtPointStyleHandle hPointStyle;
	
	/* In case there's one already, just use it */
	hPointStyle = LookupPointStyle(hChart);

	if (hPointStyle == NULL ) {
		/* Create a pointstyle for this chart */
		XrtPointStyleHandle hPointStyle = XrtPointStyleCreate(hChart);

		/* Keep track of it for local use */
		AddPointStyleEntry(hChart, hPointStyle);

		/* Exploding makes the pie slightly smaller, we do it now before 
		 * a specific slice is assigned so that the pie will maintain a 
		 * constant diameter when a slice is picked. We use a slice that 
		 * we know we'll never have so the exploded slice is "hidden" 
		 * until we need it.
		 */
		XrtPointStyleSetValues( hPointStyle, 
			XRT_POINTSTYLE_DATASET, XRT_DATASET1,
			XRT_POINTSTYLE_SET,     HIDDEN_SLICE,  /* Set indicates the slice. */
			XRT_POINTSTYLE_POINT,   0,  /* We only have one pie, so point is 0.*/
			NULL);

		/* Set the pointstyle to explode the selected slice */
		XrtPointStyleSetValues(hPointStyle, XRT_POINTSTYLE_SLICE_OFFSET, offset, NULL);

		/* To HIDE the slice instead of exploding it, use the line below instead: */		
/*
	    XrtPointStyleSetValues(hPointStyle, XRT_POINTSTYLE_DISPLAY, XRT_DISPLAY_HIDE, NULL);
*/
	}
	return hPointStyle;
}

XrtPointStyleHandle RetrievePointStyle(HXRT2D hChart)
{
	return LookupPointStyle(hChart);
}

void ReleasePointStyle(HXRT2D hChart)
{
	XrtPointStyleHandle hPointStyle = LookupPointStyle(hChart);

	if (hPointStyle != NULL) { /* destroy the pointstyle */
		/* Remove from local tracking */
		RemovePointStyleEntry(hChart);

		/* Tell Olectra Chart to release it */
		XrtPointStyleDestroy(hPointStyle);
	}
}