ArcView-绿色版-免费

/*
 * Copyright （C） 1996 by Environmental Systems Research Institute Inc.
 * All Rights Reserved.
 *
 * N O T I C E
 *
 * THIS MATERIAL IS BEING PRIVIDED TO ARCVIEW GIS USERS BY  ESRI.
 * UNAUTHORIZED ACCESS IS PROHIBITED
 */


/*
*-------------------------------------------------------------------
*
*	CAllocate1 - Allocate a one dimensional array
*
*-------------------------------------------------------------------
*P	PURPOSE:
*
*	CAllocate1 dynamically allocates a one dimensional array
*
*E
*-------------------------------------------------------------------
*A	ARGUMENTS:
*
*	number  （int） number of elements in array
*       size    （int） size in bytes of an array element
*
* 	RETURN VALUE    
 （char *） Pointer to allocated memory
*                                         NULL == allocate failed
*
*E
*-------------------------------------------------------------------
*H	HISTORY:
*	
*E
*-------------------------------------------------------------------
*/
#include	


char *CAllocate1 （int	number 
                    int	size ）

{
	return （char *）calloc（number size）;
}

	
/*
*-------------------------------------------------------------------
*
*	CAllocate2 - Allocate a two dimensional array
*
*-------------------------------------------------------------------
*P	PURPOSE:
*
*	CAllocate2 dynamically allocates a two dimensional array
*
*E
*-------------------------------------------------------------------
*A	ARGUMENTS:
*
*	nrows   （int） number of rows in array
*	ncols   （int） number of cols in array
*       size    （int） size in bytes of an array element
*
* 	RETURN VALUE    
 （char **） Pointer to allocated memory
*                                         NULL == allocate failed
*
*E
*-------------------------------------------------------------------
*H	HISTORY:
*E
*-------------------------------------------------------------------
*/

char **CAllocate2 （int	nrows 
                   int	ncols 
                   int	size ）

{
char	*data;
char	**rows;
char	**ptr;
int	len;
int	cur;
int	i;

	if （（data = （char *）calloc （nrows*ncols size）） == NULL） {
		return （NULL）;
	}

	if （（rows = （char **）calloc （nrows sizeof（char **））） == NULL） {
		free （（char *）data）;
		return （NULL）;
	}

	ptr = rows;
	len = ncols*size;
	cur = 0;

	for （i=0; i	{
		*ptr++ = （char *） &（data[cur]）;
		cur += len;
	}

	return （char **）rows ;

	/*
	Note :
	-----------------------------------------------
	The GRIDIO libraries REQUIRE that
	the underlying data array for a two dimensional
	buffer is 1-Dimensional CONTIGUOS as above
	-----------------------------------------------
	*/
}

/*
*-------------------------------------------------------------------
*
*	CFree1 - Free a one dimensional array
*
*-------------------------------------------------------------------
*P	PURPOSE:
*
*	CFree1 frees a one dimensional array
*
*E
*-------------------------------------------------------------------
*A	ARGUMEN