service.c @ 697

Last change on this file since 697 was 448, checked in by djay, 11 years ago
Add support for srcWin in gdal translate service.
Property svn:eol-style set to `native` Property svn:mime-type set to `text/x-csrc`
File size: 30.4 KB

Rev	Line
[1]	1	/******************************************************************************
	2	* $Id$
	3	*
	4	* Project: GDAL Utilities
	5	* Purpose: GDAL Image Translator Program
	6	* Author: Frank Warmerdam, warmerdam@pobox.com
	7	*
	8	******************************************************************************
	9	* Copyright (c) 1998, 2002, Frank Warmerdam
	10	*
	11	* Permission is hereby granted, free of charge, to any person obtaining a
	12	* copy of this software and associated documentation files (the "Software"),
	13	* to deal in the Software without restriction, including without limitation
	14	* the rights to use, copy, modify, merge, publish, distribute, sublicense,
	15	* and/or sell copies of the Software, and to permit persons to whom the
	16	* Software is furnished to do so, subject to the following conditions:
	17	*
	18	* The above copyright notice and this permission notice shall be included
	19	* in all copies or substantial portions of the Software.
	20	*
	21	* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
	22	* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
	23	* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
	24	* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
	25	* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
	26	* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
	27	* DEALINGS IN THE SOFTWARE.
	28	****************************************************************************/
	29
	30	#include "cpl_vsi.h"
	31	#include "cpl_conv.h"
	32	#include "cpl_string.h"
	33	#include "gdal_priv.h"
	34	#include "ogr_spatialref.h"
[373]	35	#include "vrtdataset.h"
[1]	36
	37	#include "service.h"
	38
	39	CPL_CVSID("$Id$");
	40
	41	extern "C" {
	42
	43	static void AttachMetadata( GDALDatasetH, char ** );
	44	static int bSubCall = FALSE;
	45
	46	/************************************************************************/
	47	/* Gdal_Translate() */
	48	/************************************************************************/
	49
[369]	50	#ifdef WIN32
	51	__declspec(dllexport)
	52	#endif
[1]	53	int Gdal_Translate(maps& conf,maps& inputs,maps*& outputs)
	54	{
	55
[369]	56
[1]	57	GDALDatasetH hDataset, hOutDS;
	58	int i;
	59	int nRasterXSize, nRasterYSize;
	60	const char pszSource=NULL, pszDest=NULL, *pszFormat = "GTiff";
	61	GDALDriverH hDriver;
	62	int *panBandList = NULL, nBandCount = 0, bDefBands = TRUE;
	63	double adfGeoTransform[6];
	64	GDALDataType eOutputType = GDT_Unknown;
	65	int nOXSize = 0, nOYSize = 0;
	66	char pszOXSize=NULL, pszOYSize=NULL;
	67	char **papszCreateOptions = NULL;
	68	int anSrcWin[4], bStrict = FALSE;
	69	const char *pszProjection;
	70	int bScale = FALSE, bHaveScaleSrc = FALSE;
	71	double dfScaleSrcMin=0.0, dfScaleSrcMax=255.0;
	72	double dfScaleDstMin=0.0, dfScaleDstMax=255.0;
	73	double dfULX, dfULY, dfLRX, dfLRY;
	74	char **papszMetadataOptions = NULL;
	75	char *pszOutputSRS = NULL;
	76	int bQuiet = TRUE, bGotBounds = FALSE;
	77	GDALProgressFunc pfnProgress = GDALDummyProgress;
	78	int nGCPCount = 0;
	79	GDAL_GCP *pasGCPs = NULL;
	80	int iSrcFileArg = -1, iDstFileArg = -1;
	81	int bCopySubDatasets = FALSE;
	82	double adfULLR[4] = { 0,0,0,0 };
	83	int bSetNoData = FALSE;
	84	double dfNoDataReal = 0.0;
	85	int nRGBExpand = 0;
	86
	87	anSrcWin[0] = 0;
	88	anSrcWin[1] = 0;
	89	anSrcWin[2] = 0;
	90	anSrcWin[3] = 0;
	91
	92	dfULX = dfULY = dfLRX = dfLRY = 0.0;
	93
	94	/* ----------------------------------------------------------------- */
	95	/* Register standard GDAL drivers, and process generic GDAL */
	96	/* ----------------------------------------------------------------- */
	97	GDALAllRegister();
	98	/* ----------------------------------------------------------------- */
	99	/* Extract Format, InputDSN, OutputDSN parameters */
	100	/* ----------------------------------------------------------------- */
	101
	102	map* tmpMap=NULL;
	103
	104	char dataPath[1024];
	105	tmpMap=getMapFromMaps(conf,"main","dataPath");
	106	if(tmpMap!=NULL)
	107	sprintf(dataPath,"%s",tmpMap->value);
	108	tmpMap=NULL;
	109
	110	char tempPath[1024];
	111	tmpMap=getMapFromMaps(conf,"main","tmpPath");
	112	if(tmpMap!=NULL){
	113	sprintf(tempPath,"%s",tmpMap->value);
	114	}
	115	tmpMap=NULL;
	116
	117	tmpMap=getMapFromMaps(inputs,"Format","value");
	118	if(tmpMap!=NULL){
	119	pszFormat=tmpMap->value;
	120	}
	121	tmpMap=NULL;
	122	tmpMap=getMapFromMaps(inputs,"InputDSN","value");
	123	if(tmpMap!=NULL){
[369]	124	pszSource=(char)CPLMalloc(sizeof(char)(strlen(dataPath)+strlen(tmpMap->value)+4));
	125	sprintf((char*)pszSource,"%s/%s",dataPath,tmpMap->value);
[1]	126	}
	127	tmpMap=NULL;
	128	tmpMap=getMapFromMaps(inputs,"OutputDSN","value");
	129	if(tmpMap!=NULL){
[369]	130	pszDest=(char)CPLMalloc(sizeof(char)(strlen(tempPath)+strlen(tmpMap->value)+4));
[1]	131	char *ext=new char[4];
	132	ext="tif";
[284]	133	if(strncasecmp(pszFormat,"AAIGRID",7)==0)
[1]	134	ext="csv";
	135	else
[284]	136	if(strncasecmp(pszFormat,"PNG",3)==0)
[1]	137	ext="png";
	138	else
[284]	139	if(strncasecmp(pszFormat,"GIF",3)==0)
[1]	140	ext="gif";
	141	else
[284]	142	if(strncasecmp(pszFormat,"JPEG",4)==0)
[1]	143	ext="jpg";
	144	sprintf((char*)pszDest,"%s/%s.%s",tempPath,tmpMap->value,ext);
	145	fprintf(stderr,"DEBUG pszDest : %s\n",pszDest);
	146	}
[448]	147
[1]	148	tmpMap=NULL;
[448]	149	tmpMap=getMapFromMaps(inputs,"SrcWin","value");
	150	if(tmpMap!=NULL){
	151	char *tmp=tmpMap->value;
	152	char *t=strtok(tmp,",");
	153	int cnt=0;
	154	while(t!=NULL){
	155	anSrcWin[cnt] = atoi(t);
	156	t=strtok(NULL,",");
	157	cnt++;
	158	}
	159	}
	160
	161	tmpMap=NULL;
[1]	162	tmpMap=getMapFromMaps(inputs,"ProjWin","value");
	163	if(tmpMap!=NULL){
	164	char *tmp=tmpMap->value;
	165	char *t=strtok(tmp,",");
	166	int cnt=0;
	167	while(t!=NULL){
	168	switch(cnt){
	169	case 0:
	170	dfULX = atof(t);
	171	break;
	172	case 1:
	173	dfULY = atof(t);
	174	break;
	175	case 2:
	176	dfLRX = atof(t);
	177	break;
	178	case 3:
	179	dfLRY = atof(t);
	180	break;
	181	}
	182	t=strtok(NULL,",");
	183	cnt++;
	184	}
	185	}
[369]	186
[372]	187	fprintf(stderr,"DEBUG pszDest : %s %d\n",pszDest,__LINE__);
[1]	188	tmpMap=NULL;
[369]	189	tmpMap=getMapFromMaps(inputs,"GCP","value");
[372]	190	if(tmpMap!=NULL && strncasecmp(tmpMap->value,"NULL",4)!=0){
[369]	191	map* length=getMapFromMaps(inputs,"GCP","length");
	192	int len=0;
	193	if(length){
	194	len=atoi(length->value);
	195	int i;
	196	maps* currentMaps=getMaps(inputs,"GCP");
	197	for(i=0;i<len;i++){
	198	char* endptr = NULL;
	199	/* -gcp pixel line easting northing [elev] */
	200
	201	nGCPCount++;
	202	pasGCPs = (GDAL_GCP *)
	203	realloc( pasGCPs, sizeof(GDAL_GCP) * nGCPCount );
	204	GDALInitGCPs( 1, pasGCPs + nGCPCount - 1 );
	205
	206	map* currentMap=getMapArray(currentMaps->content,"value",i);
	207
	208	char* tmpV=strdup(currentMap->value);
	209	char *res=strtok(tmpV,",");
	210	int j=0;
	211	while(res!=NULL){
	212	switch(j){
	213	case 0:
	214	pasGCPs[nGCPCount-1].dfGCPPixel = CPLAtofM(res);
	215	break;
	216	case 1:
	217	pasGCPs[nGCPCount-1].dfGCPLine = CPLAtofM(res);
	218	break;
	219	case 2:
	220	pasGCPs[nGCPCount-1].dfGCPX = CPLAtofM(res);
	221	break;
	222	case 3:
	223	pasGCPs[nGCPCount-1].dfGCPY = CPLAtofM(res);
	224	break;
	225	case 4:
	226	if(res!=NULL && (strtod(res, &endptr) != 0.0 \|\| res[0] == '0'))
	227	if (endptr && *endptr == 0)
	228	pasGCPs[nGCPCount-1].dfGCPZ = CPLAtofM(res);
	229	break;
	230	}
	231	res=strtok(NULL,",");
	232	j++;
	233	}
	234	}
	235	}else{
	236	char* endptr = NULL;
	237	/* -gcp pixel line easting northing [elev] */
	238
	239	nGCPCount++;
	240	pasGCPs = (GDAL_GCP *)
	241	realloc( pasGCPs, sizeof(GDAL_GCP) * nGCPCount );
	242	GDALInitGCPs( 1, pasGCPs + nGCPCount - 1 );
	243
	244	char* tmpV=strdup(tmpMap->value);
	245	char *res=strtok(tmpV,",");
	246	int j=0;
	247	while(res!=NULL){
	248	switch(j){
	249	case 0:
	250	pasGCPs[nGCPCount-1].dfGCPPixel = CPLAtofM(res);
	251	break;
	252	case 1:
	253	pasGCPs[nGCPCount-1].dfGCPLine = CPLAtofM(res);
	254	break;
	255	case 2:
	256	pasGCPs[nGCPCount-1].dfGCPX = CPLAtofM(res);
	257	break;
	258	case 3:
	259	pasGCPs[nGCPCount-1].dfGCPY = CPLAtofM(res);
	260	break;
	261	case 4:
	262	if(res!=NULL && (CPLStrtod(res, &endptr) != 0.0 \|\| res[0] == '0'))
	263	if (endptr && *endptr == 0)
	264	pasGCPs[nGCPCount-1].dfGCPZ = CPLAtofM(res);
	265	break;
	266	}
	267	res=strtok(NULL,",");
	268	j++;
	269	}
	270	}
	271	}
	272
[372]	273	fprintf(stderr,"DEBUG pszDest : %s %d\n",pszDest,__LINE__);
[369]	274	tmpMap=NULL;
[1]	275	tmpMap=getMapFromMaps(inputs,"SRS","value");
	276	if(tmpMap!=NULL){
	277	OGRSpatialReference oOutputSRS;
	278	if( oOutputSRS.SetFromUserInput( tmpMap->value ) != OGRERR_NONE )
	279	{
[369]	280	char msg=(char)CPLMalloc(100*sizeof(char));
	281	sprintf( msg, "Failed to process SRS definition: %s\n",
[1]	282	tmpMap->value );
[369]	283	setMapInMaps(conf,"lenv","message",msg);
	284	/**
	285	* Avoiding GDALDestroyDriverManager() call
	286	*/
	287	return SERVICE_FAILED;
[1]	288	}
	289	oOutputSRS.exportToWkt( &pszOutputSRS );
	290	}
	291	tmpMap=NULL;
	292	tmpMap=getMapFromMaps(inputs,"Type","value");
	293	if(tmpMap!=NULL){
	294	int iType;
	295
	296	for( iType = 1; iType < GDT_TypeCount; iType++ )
	297	{
	298	if( GDALGetDataTypeName((GDALDataType)iType) != NULL
	299	&& EQUAL(GDALGetDataTypeName((GDALDataType)iType),
	300	tmpMap->value) )
	301	{
	302	eOutputType = (GDALDataType) iType;
	303	}
	304	}
	305
	306	if( eOutputType == GDT_Unknown )
	307	{
	308	printf( "Unknown output pixel type: %s\n", tmpMap->value );
	309	/**
	310	* Avoiding GDALDestroyDriverManager() call
	311	*/
	312	exit( 2 );
	313	}
	314	}
	315
[372]	316	fprintf(stderr,"DEBUG pszDest : %s %d\n",pszDest,__LINE__);
[1]	317	if( pszDest == NULL ){
	318	fprintf(stderr,"exit line 416");
	319	fflush(stderr);
	320	/**
	321	* Avoiding GDALDestroyDriverManager() call
	322	*/
	323	exit( 10 );
	324	}
	325
[372]	326	fprintf(stderr,"DEBUG pszDest : %s %d\n",pszDest,__LINE__);
[1]	327	if ( strcmp(pszSource, pszDest) == 0)
	328	{
	329	fprintf(stderr, "Source and destination datasets must be different.\n");
	330	fflush(stderr);
	331	/**
	332	* Avoiding GDALDestroyDriverManager() call
	333	*/
	334	exit( 1 );
	335	}
	336
[372]	337	fprintf(stderr,"DEBUG pszDest : %s %d\n",pszDest,__LINE__);
[1]	338	/* ----------------------------------------------------------------- */
	339	/* Attempt to open source file. */
	340	/* ----------------------------------------------------------------- */
	341
	342	hDataset = GDALOpenShared( pszSource, GA_ReadOnly );
[372]	343	fprintf(stderr,"DEBUG pszDest : %s %d\n",pszDest,__LINE__);
[1]	344
	345	if( hDataset == NULL ){
[369]	346	char msg=(char) CPLMalloc(1024*sizeof(char));
	347	sprintf( msg,
	348	"GDALOpen failed - %d\n%s\n",
	349	CPLGetLastErrorNo(), CPLGetLastErrorMsg() );
	350	setMapInMaps(conf,"lenv","message",msg);
	351	return SERVICE_FAILED;
	352	}
[1]	353
[372]	354	fprintf(stderr,"DEBUG pszDest : %s %d\n",pszDest,__LINE__);
[1]	355	/* ----------------------------------------------------------------- */
	356	/* Handle subdatasets. */
	357	/* ----------------------------------------------------------------- */
	358	if( !bCopySubDatasets
	359	&& CSLCount(GDALGetMetadata( hDataset, "SUBDATASETS" )) > 0
	360	&& GDALGetRasterCount(hDataset) == 0 )
	361	{
[369]	362	char msg=(char) CPLMalloc(1024*sizeof(char));
	363	sprintf( msg,
[1]	364	"Input file contains subdatasets. Please, select one of them for reading.\n" );
[369]	365	setMapInMaps(conf,"lenv","message",msg);
[1]	366	GDALClose( hDataset );
	367	/**
	368	* Avoiding GDALDestroyDriverManager() call
	369	*/
	370	exit( 1 );
	371	}
	372
	373	if( CSLCount(GDALGetMetadata( hDataset, "SUBDATASETS" )) > 0
	374	&& bCopySubDatasets )
	375	{
	376	char **papszSubdatasets = GDALGetMetadata(hDataset,"SUBDATASETS");
	377	char pszSubDest = (char ) CPLMalloc(strlen(pszDest)+32);
	378	int i;
	379	int bOldSubCall = bSubCall;
	380
	381	//argv[iDstFileArg] = pszSubDest;
	382	bSubCall = TRUE;
	383	for( i = 0; papszSubdatasets[i] != NULL; i += 2 )
	384	{
	385	//argv[iSrcFileArg] = strstr(papszSubdatasets[i],"=")+1;
	386	sprintf( pszSubDest, "%s%d", pszDest, i/2 + 1 );
	387	/*if( ProxyMain( argc, argv ) != 0 )
	388	break;*/
	389	}
	390
	391	bSubCall = bOldSubCall;
[369]	392	free( pszSubDest );
[1]	393
	394	GDALClose( hDataset );
	395
	396	if( !bSubCall )
	397	{
	398	GDALDumpOpenDatasets( stderr );
	399	fflush(stderr);
	400	/**
	401	* Avoiding GDALDestroyDriverManager() call
	402	*/
	403	}
	404	return 1;
	405	}
	406
	407	/* ----------------------------------------------------------------- */
	408	/* Collect some information from the source file. */
	409	/* ----------------------------------------------------------------- */
	410	nRasterXSize = GDALGetRasterXSize( hDataset );
	411	nRasterYSize = GDALGetRasterYSize( hDataset );
	412
	413	if( !bQuiet )
[369]	414	fprintf( stderr, "Input file size is %d, %d\n", nRasterXSize, nRasterYSize );
[1]	415
	416	if( anSrcWin[2] == 0 && anSrcWin[3] == 0 ){
	417	anSrcWin[2] = nRasterXSize;
	418	anSrcWin[3] = nRasterYSize;
	419	}
	420
	421	/* ----------------------------------------------------------------- */
	422	/* Build band list to translate */
	423	/* ----------------------------------------------------------------- */
	424	if( nBandCount == 0 ){
	425	nBandCount = GDALGetRasterCount( hDataset );
	426	if( nBandCount == 0 ){
	427	fprintf( stderr, "Input file has no bands, and so cannot be translated.\n" );
	428	fflush(stderr);
	429	/**
	430	* Avoiding GDALDestroyDriverManager() call
	431	*/
	432	exit(1 );
	433	}
	434
	435	panBandList = (int ) CPLMalloc(sizeof(int)nBandCount);
	436	for( i = 0; i < nBandCount; i++ )
	437	panBandList[i] = i+1;
	438	}
	439	else
	440	{
	441	for( i = 0; i < nBandCount; i++ )
	442	{
	443	if( panBandList[i] < 1 \|\| panBandList[i] > GDALGetRasterCount(hDataset) )
	444	{
	445	fprintf( stderr,
	446	"Band %d requested, but only bands 1 to %d available.\n",
	447	panBandList[i], GDALGetRasterCount(hDataset) );
	448	fflush(stderr);
	449	/**
	450	* Avoiding GDALDestroyDriverManager() call
	451	*/
	452	exit( 2 );
	453	}
	454	}
	455
	456	if( nBandCount != GDALGetRasterCount( hDataset ) )
	457	bDefBands = FALSE;
	458	}
	459
	460	/* ----------------------------------------------------------------- */
	461	/* Compute the source window from the projected source window */
	462	/* if the projected coordinates were provided. Note that the */
	463	/* projected coordinates are in ulx, uly, lrx, lry format, */
	464	/* while the anSrcWin is xoff, yoff, xsize, ysize with the */
	465	/* xoff,yoff being the ulx, uly in pixel/line. */
	466	/* ----------------------------------------------------------------- */
	467	if( dfULX != 0.0 \|\| dfULY != 0.0
	468	\|\| dfLRX != 0.0 \|\| dfLRY != 0.0 )
	469	{
	470	double adfGeoTransform[6];
	471
	472	GDALGetGeoTransform( hDataset, adfGeoTransform );
	473
	474	if( adfGeoTransform[2] != 0.0 \|\| adfGeoTransform[4] != 0.0 ){
	475	fprintf( stderr,
	476	"The -projwin option was used, but the geotransform is\n"
	477	"rotated. This configuration is not supported.\n" );
	478	GDALClose( hDataset );
[369]	479	free( panBandList );
[1]	480	fflush(stderr);
	481	/**
	482	* Avoiding GDALDestroyDriverManager() call
	483	*/
	484	exit( 1 );
	485	}
	486
	487	anSrcWin[0] = (int)
	488	((dfULX - adfGeoTransform[0]) / adfGeoTransform[1] + 0.001);
	489	anSrcWin[1] = (int)
	490	((dfULY - adfGeoTransform[3]) / adfGeoTransform[5] + 0.001);
	491
	492	anSrcWin[2] = (int) ((dfLRX - dfULX) / adfGeoTransform[1] + 0.5);
	493	anSrcWin[3] = (int) ((dfLRY - dfULY) / adfGeoTransform[5] + 0.5);
	494
	495	if( !bQuiet )
	496	fprintf( stdout,
	497	"Computed -srcwin %d %d %d %d from projected window.\n",
	498	anSrcWin[0],
	499	anSrcWin[1],
	500	anSrcWin[2],
	501	anSrcWin[3] );
	502
	503	if( anSrcWin[0] < 0 \|\| anSrcWin[1] < 0
	504	\|\| anSrcWin[0] + anSrcWin[2] > GDALGetRasterXSize(hDataset)
	505	\|\| anSrcWin[1] + anSrcWin[3] > GDALGetRasterYSize(hDataset) )
	506	{
	507	fprintf( stderr,
	508	"Computed -srcwin falls outside raster size of %dx%d.\n",
	509	GDALGetRasterXSize(hDataset),
	510	GDALGetRasterYSize(hDataset) );
	511	exit( 1 );
	512	}
	513	}
	514
	515	/* ----------------------------------------------------------------- */
	516	/* Verify source window. */
	517	/* ----------------------------------------------------------------- */
	518	if( anSrcWin[0] < 0 \|\| anSrcWin[1] < 0
	519	\|\| anSrcWin[2] <= 0 \|\| anSrcWin[3] <= 0
	520	\|\| anSrcWin[0] + anSrcWin[2] > GDALGetRasterXSize(hDataset)
	521	\|\| anSrcWin[1] + anSrcWin[3] > GDALGetRasterYSize(hDataset) )
	522	{
	523	fprintf( stderr,
	524	"-srcwin %d %d %d %d falls outside raster size of %dx%d\n"
	525	"or is otherwise illegal.\n",
	526	anSrcWin[0],
	527	anSrcWin[1],
	528	anSrcWin[2],
	529	anSrcWin[3],
	530	GDALGetRasterXSize(hDataset),
	531	GDALGetRasterYSize(hDataset) );
	532	exit( 1 );
	533	}
	534
	535	/* ----------------------------------------------------------------- */
	536	/* Find the output driver. */
	537	/* ----------------------------------------------------------------- */
	538	hDriver = GDALGetDriverByName( pszFormat );
	539	if( hDriver == NULL )
	540	{
	541	int iDr;
	542
[369]	543	char* msg=(char) CPLMalloc(4096sizeof(char));
	544	sprintf(msg,"Output driver `%s' not recognised.\nThe following format drivers are configured and support output:\n",pszFormat);
[1]	545	for( iDr = 0; iDr < GDALGetDriverCount(); iDr++ )
	546	{
	547	GDALDriverH hDriver = GDALGetDriver(iDr);
	548
	549	if( GDALGetMetadataItem( hDriver, GDAL_DCAP_CREATE, NULL ) != NULL
	550	\|\| GDALGetMetadataItem( hDriver, GDAL_DCAP_CREATECOPY,
	551	NULL ) != NULL )
	552	{
[369]	553	fprintf(stderr,msg);
	554	char *tmp=strdup(msg);
	555	sprintf( msg,"%s %s: %s\n",tmp,
[1]	556	GDALGetDriverShortName( hDriver ),
	557	GDALGetDriverLongName( hDriver ) );
[369]	558	free(tmp);
[1]	559	}
	560	}
[369]	561	setMapInMaps(conf,"lenv","message",msg);
[1]	562	GDALClose( hDataset );
[369]	563	free( panBandList );
[1]	564	fflush(stderr);
	565	/**
	566	* Avoiding GDALDestroyDriverManager() call
	567	*/
	568	CSLDestroy( papszCreateOptions );
[369]	569	return 4;
[1]	570	}
	571
	572	/* ----------------------------------------------------------------- */
	573	/* The short form is to CreateCopy(). We use this if the input */
	574	/* matches the whole dataset. Eventually we should rewrite */
	575	/* this entire program to use virtual datasets to construct a */
	576	/* virtual input source to copy from. */
	577	/* ----------------------------------------------------------------- */
[369]	578	int bSpatialArrangementPreserved = (
	579	anSrcWin[0] == 0 && anSrcWin[1] == 0
	580	&& anSrcWin[2] == GDALGetRasterXSize(hDataset)
	581	&& anSrcWin[3] == GDALGetRasterYSize(hDataset)
	582	&& pszOXSize == NULL && pszOYSize == NULL );
	583
[1]	584	if( eOutputType == GDT_Unknown
	585	&& !bScale && CSLCount(papszMetadataOptions) == 0 && bDefBands
[369]	586	&& bSpatialArrangementPreserved
[1]	587	&& nGCPCount == 0 && !bGotBounds
	588	&& pszOutputSRS == NULL && !bSetNoData
	589	&& nRGBExpand == 0)
	590	{
	591
	592	hOutDS = GDALCreateCopy( hDriver, pszDest, hDataset,
[369]	593	FALSE, (char**)0,
[1]	594	pfnProgress, NULL );
	595
	596	if( hOutDS != NULL )
	597	GDALClose( hOutDS );
	598
	599	GDALClose( hDataset );
	600
[369]	601	free( panBandList );
[1]	602
	603	if( !bSubCall )
	604	{
	605	GDALDumpOpenDatasets( stderr );
	606	/**
	607	* Avoiding GDALDestroyDriverManager() call
	608	*/
	609	}
[369]	610	fprintf(stderr,"==%s %s %s %d==\n",pszFormat,pszSource,pszDest,__LINE__);
	611	fflush(stderr);
[1]	612
	613	CSLDestroy( papszCreateOptions );
[369]	614	fprintf(stderr,"==%s %s %s %d==\n",pszFormat,pszSource,pszDest,__LINE__);
	615	fflush(stderr);
	616	//outputs=(maps)CPLMalloc(sizeof(maps));
	617	//outputs->name="OutputedPolygon";
	618	//outputs->content=createMap("value",(char*)pszDest);
	619	//outputs->next=NULL;
	620	dumpMaps(outputs);
	621	setMapInMaps(outputs,"Result","value",(char*)pszDest);
[1]	622	return SERVICE_SUCCEEDED;
	623	}
	624
	625	/* ----------------------------------------------------------------- */
	626	/* Establish some parameters. */
	627	/* ----------------------------------------------------------------- */
	628	if( pszOXSize == NULL )
	629	{
	630	nOXSize = anSrcWin[2];
	631	nOYSize = anSrcWin[3];
	632	}
	633	else
	634	{
	635	nOXSize = (int) ((pszOXSize[strlen(pszOXSize)-1]=='%'
	636	? atof(pszOXSize)/100*anSrcWin[2] : atoi(pszOXSize)));
	637	nOYSize = (int) ((pszOYSize[strlen(pszOYSize)-1]=='%'
	638	? atof(pszOYSize)/100*anSrcWin[3] : atoi(pszOYSize)));
	639	}
	640
	641	/* ================================================================= */
	642	/* Create a virtual dataset. */
	643	/* ================================================================= */
	644	VRTDataset *poVDS;
	645
	646	/* ----------------------------------------------------------------- */
	647	/* Make a virtual clone. */
	648	/* ----------------------------------------------------------------- */
	649	poVDS = (VRTDataset *) VRTCreate( nOXSize, nOYSize );
	650
	651	if( nGCPCount == 0 )
	652	{
	653	if( pszOutputSRS != NULL )
	654	{
	655	poVDS->SetProjection( pszOutputSRS );
	656	}
	657	else
	658	{
	659	pszProjection = GDALGetProjectionRef( hDataset );
	660	if( pszProjection != NULL && strlen(pszProjection) > 0 )
	661	poVDS->SetProjection( pszProjection );
	662	}
	663	}
	664
	665	if( bGotBounds )
	666	{
	667	adfGeoTransform[0] = adfULLR[0];
	668	adfGeoTransform[1] = (adfULLR[2] - adfULLR[0]) / nOXSize;
	669	adfGeoTransform[2] = 0.0;
	670	adfGeoTransform[3] = adfULLR[1];
	671	adfGeoTransform[4] = 0.0;
	672	adfGeoTransform[5] = (adfULLR[3] - adfULLR[1]) / nOYSize;
	673
	674	poVDS->SetGeoTransform( adfGeoTransform );
	675	}
	676
	677	else if( GDALGetGeoTransform( hDataset, adfGeoTransform ) == CE_None
	678	&& nGCPCount == 0 )
	679	{
	680	adfGeoTransform[0] += anSrcWin[0] * adfGeoTransform[1]
	681	+ anSrcWin[1] * adfGeoTransform[2];
	682	adfGeoTransform[3] += anSrcWin[0] * adfGeoTransform[4]
	683	+ anSrcWin[1] * adfGeoTransform[5];
	684
	685	adfGeoTransform[1] *= anSrcWin[2] / (double) nOXSize;
	686	adfGeoTransform[2] *= anSrcWin[3] / (double) nOYSize;
	687	adfGeoTransform[4] *= anSrcWin[2] / (double) nOXSize;
	688	adfGeoTransform[5] *= anSrcWin[3] / (double) nOYSize;
	689
	690	poVDS->SetGeoTransform( adfGeoTransform );
	691	}
	692
	693	if( nGCPCount != 0 )
	694	{
	695	const char *pszGCPProjection = pszOutputSRS;
	696
	697	if( pszGCPProjection == NULL )
	698	pszGCPProjection = GDALGetGCPProjection( hDataset );
	699	if( pszGCPProjection == NULL )
	700	pszGCPProjection = "";
	701
	702	poVDS->SetGCPs( nGCPCount, pasGCPs, pszGCPProjection );
	703
	704	GDALDeinitGCPs( nGCPCount, pasGCPs );
[369]	705	free( pasGCPs );
[1]	706	}
	707
	708	else if( GDALGetGCPCount( hDataset ) > 0 )
	709	{
	710	GDAL_GCP *pasGCPs;
	711	int nGCPs = GDALGetGCPCount( hDataset );
	712
	713	pasGCPs = GDALDuplicateGCPs( nGCPs, GDALGetGCPs( hDataset ) );
	714
	715	for( i = 0; i < nGCPs; i++ )
	716	{
	717	pasGCPs[i].dfGCPPixel -= anSrcWin[0];
	718	pasGCPs[i].dfGCPLine -= anSrcWin[1];
	719	pasGCPs[i].dfGCPPixel *= (nOXSize / (double) anSrcWin[2] );
	720	pasGCPs[i].dfGCPLine *= (nOYSize / (double) anSrcWin[3] );
	721	}
	722
	723	poVDS->SetGCPs( nGCPs, pasGCPs,
	724	GDALGetGCPProjection( hDataset ) );
	725
	726	GDALDeinitGCPs( nGCPs, pasGCPs );
[369]	727	free( pasGCPs );
[1]	728	}
	729
	730	/* ----------------------------------------------------------------- */
	731	/* Transfer generally applicable metadata. */
	732	/* ----------------------------------------------------------------- */
	733	poVDS->SetMetadata( ((GDALDataset*)hDataset)->GetMetadata() );
	734	AttachMetadata( (GDALDatasetH) poVDS, papszMetadataOptions );
	735
	736	/* ----------------------------------------------------------------- */
	737	/* Transfer metadata that remains valid if the spatial */
	738	/* arrangement of the data is unaltered. */
	739	/* ----------------------------------------------------------------- */
	740	if( anSrcWin[0] == 0 && anSrcWin[1] == 0
	741	&& anSrcWin[2] == GDALGetRasterXSize(hDataset)
	742	&& anSrcWin[3] == GDALGetRasterYSize(hDataset)
	743	&& pszOXSize == NULL && pszOYSize == NULL )
	744	{
	745	char **papszMD;
	746
	747	papszMD = ((GDALDataset*)hDataset)->GetMetadata("RPC");
	748	if( papszMD != NULL )
	749	poVDS->SetMetadata( papszMD, "RPC" );
	750	}
	751
	752	if (nRGBExpand != 0)
	753	nBandCount += nRGBExpand - 1;
	754
	755	/* ================================================================= */
	756	/* Process all bands. */
	757	/* ================================================================= */
	758	for( i = 0; i < nBandCount; i++ )
	759	{
	760	VRTSourcedRasterBand *poVRTBand;
	761	GDALRasterBand *poSrcBand;
	762	GDALDataType eBandType;
	763
	764	if (nRGBExpand != 0 && i < nRGBExpand)
	765	{
	766	poSrcBand = ((GDALDataset *)
	767	hDataset)->GetRasterBand(panBandList[0]);
	768	if (poSrcBand->GetColorTable() == NULL)
	769	{
	770	fprintf(stderr, "Error : band %d has no color table\n", panBandList[0]);
	771	GDALClose( hDataset );
[369]	772	free( panBandList );
[1]	773	fflush(stderr);
	774	/**
	775	* Avoiding GDALDestroyDriverManager() call
	776	*/
	777	CSLDestroy( papszCreateOptions );
	778	exit( 1 );
	779	}
	780	}
	781	else
	782	poSrcBand = ((GDALDataset *)
	783	hDataset)->GetRasterBand(panBandList[i]);
	784
	785	/* ------------------------------------------------------------ */
	786	/* Select output data type to match source. */
	787	/* ------------------------------------------------------------ */
	788	if( eOutputType == GDT_Unknown )
	789	eBandType = poSrcBand->GetRasterDataType();
	790	else
	791	eBandType = eOutputType;
	792
	793	/* ------------------------------------------------------------ */
	794	/* Create this band. */
	795	/* ------------------------------------------------------------ */
	796	poVDS->AddBand( eBandType, NULL );
	797	poVRTBand = (VRTSourcedRasterBand *) poVDS->GetRasterBand( i+1 );
	798
	799	/* ------------------------------------------------------------ */
	800	/* Do we need to collect scaling information? */
	801	/* ------------------------------------------------------------ */
	802	double dfScale=1.0, dfOffset=0.0;
	803
	804	if( bScale && !bHaveScaleSrc )
	805	{
	806	double adfCMinMax[2];
	807	GDALComputeRasterMinMax( poSrcBand, TRUE, adfCMinMax );
	808	dfScaleSrcMin = adfCMinMax[0];
	809	dfScaleSrcMax = adfCMinMax[1];
	810	}
	811
	812	if( bScale )
	813	{
	814	if( dfScaleSrcMax == dfScaleSrcMin )
	815	dfScaleSrcMax += 0.1;
	816	if( dfScaleDstMax == dfScaleDstMin )
	817	dfScaleDstMax += 0.1;
	818
	819	dfScale = (dfScaleDstMax - dfScaleDstMin)
	820	/ (dfScaleSrcMax - dfScaleSrcMin);
	821	dfOffset = -1 * dfScaleSrcMin * dfScale + dfScaleDstMin;
	822	}
	823
	824	/* ------------------------------------------------------------ */
	825	/* Create a simple or complex data source depending on the */
	826	/* translation type required. */
	827	/* ------------------------------------------------------------ */
	828	if( bScale \|\| (nRGBExpand != 0 && i < nRGBExpand) )
	829	{
	830	poVRTBand->AddComplexSource( poSrcBand,
	831	anSrcWin[0], anSrcWin[1],
	832	anSrcWin[2], anSrcWin[3],
	833	0, 0, nOXSize, nOYSize,
	834	dfOffset, dfScale,
	835	VRT_NODATA_UNSET,
	836	(nRGBExpand != 0 && i < nRGBExpand) ? i + 1 : 0 );
	837	}
	838	else
	839	poVRTBand->AddSimpleSource( poSrcBand,
	840	anSrcWin[0], anSrcWin[1],
	841	anSrcWin[2], anSrcWin[3],
	842	0, 0, nOXSize, nOYSize );
	843
	844	/* In case of color table translate, we only set the color interpretation */
	845	/* other info copied by CopyCommonInfoFrom are not relevant in RGB expansion */
	846	if (nRGBExpand != 0 && i < nRGBExpand)
	847	{
	848	poVRTBand->SetColorInterpretation( (GDALColorInterp) (GCI_RedBand + i) );
	849	}
	850	else
	851	{
	852	/* --------------------------------------------------------- */
	853	/* copy over some other information of interest. */
	854	/* --------------------------------------------------------- */
	855	poVRTBand->CopyCommonInfoFrom( poSrcBand );
	856	}
	857
	858	/* ------------------------------------------------------------- */
	859	/* Set a forcable nodata value? */
	860	/* ------------------------------------------------------------- */
	861	if( bSetNoData )
	862	poVRTBand->SetNoDataValue( dfNoDataReal );
	863	}
	864
	865	/* ----------------------------------------------------------------- */
	866	/* Write to the output file using CopyCreate(). */
	867	/* ----------------------------------------------------------------- */
	868	hOutDS = GDALCreateCopy( hDriver, pszDest, (GDALDatasetH) poVDS,
	869	bStrict, papszCreateOptions,
	870	pfnProgress, NULL );
	871
	872	if( hOutDS != NULL )
	873	{
	874	GDALClose( hOutDS );
	875	}
	876
	877	GDALClose( (GDALDatasetH) poVDS );
[369]	878
[1]	879	GDALClose( hDataset );
[369]	880
	881	free( panBandList );
[1]	882
[369]	883	free( pszOutputSRS );
[1]	884
	885	if( !bSubCall )
	886	{
	887	GDALDumpOpenDatasets( stderr );
	888	fflush(stderr);
	889	/**
	890	* Avoiding GDALDestroyDriverManager() call
	891	*/
	892	}
	893
	894	CSLDestroy( papszCreateOptions );
	895
[369]	896	setMapInMaps(outputs,"Result","value",(char*)pszDest);
[1]	897
	898	return SERVICE_SUCCEEDED;
	899	}
	900
	901
	902	/************************************************************************/
	903	/* AttachMetadata() */
	904	/************************************************************************/
	905
	906	static void AttachMetadata( GDALDatasetH hDS, char **papszMetadataOptions )
	907
	908	{
	909	int nCount = CSLCount(papszMetadataOptions);
	910	int i;
	911
	912	for( i = 0; i < nCount; i++ )
	913	{
	914	char *pszKey = NULL;
	915	const char *pszValue;
	916
	917	pszValue = CPLParseNameValue( papszMetadataOptions[i], &pszKey );
	918	GDALSetMetadataItem(hDS,pszKey,pszValue,NULL);
[369]	919	free( pszKey );
[1]	920	}
	921
	922	CSLDestroy( papszMetadataOptions );
	923	}
	924
	925	}

Note: See TracBrowser for help on using the repository browser.

Open WPS platform

source: trunk/zoo-project/zoo-services/gdal/translate/service.c @ 697

Download in other formats:

Download now !

Support ZOO-Project

Search

Context Navigation

Main Navigation

ZOO Sponsors

Knowledge partners

Related links