The Weird and The Wonderful

bool UpdateImageFileWithGPSPosition(LPCTSTR lpszPictureFilePath, char* lat_lon)
{
	LPCTSTR lpszModPictureFilePath = lpszPictureFilePath;

	IImagingFactory*    pImgFactory = NULL;
	IImage*             pImage = NULL;


	bool                fIsClsFounded    = false;
	GUID                guidImageEncoderCls;
	HRESULT             hr = S_OK;

	hr = CoCreateInstance(CLSID_ImagingFactory, NULL, CLSCTX_INPROC_SERVER, IID_IImagingFactory, (void   **)&pImgFactory);

	if (SUCCEEDED(hr))
	{
		IStream*        pFileStream = CreateStreamByFileName(lpszPictureFilePath);
		IImageDecoder*   pImageDecoder = 0; 

		hr = pImgFactory->CreateImageDecoder(pFileStream, DecoderInitFlagNone, &pImageDecoder);
		if (SUCCEEDED(hr))
		{
			ImageInfo imageInfo;

			hr = pImageDecoder->GetImageInfo(&imageInfo);
			if (SUCCEEDED(hr))
			{
				UINT nEncodersCount = 0;
				ImageCodecInfo* pEncoders = NULL;

				hr = pImgFactory->GetInstalledEncoders(&nEncodersCount, &pEncoders);
				if (SUCCEEDED(hr))
				{
					for (UINT i = 0; i < nEncodersCount; i++)
					{
						if (pEncoders[i].FormatID == imageInfo.RawDataFormat)
						{
							guidImageEncoderCls = pEncoders[i].Clsid;
							fIsClsFounded = true;
							break;
						}//if
					}//for
				}//if


				// encoder founded now goes to properties
				if (fIsClsFounded)
				{
					PropertyItem pi;

					// add latitude
					{
						// add longitude
						pi.id = PropertyTagSoftwareUsed;
						pi.type = PropertyTagTypeASCII;
						pi.length = sizeof(char) * 30;
						pi.value = lat_lon;

						hr = pImageDecoder->SetPropertyItem(pi);
						if (SUCCEEDED(hr))
						{
							IImageEncoder* pImageEncoder = NULL;

							hr = pImgFactory->CreateImageEncoderToFile(
								&guidImageEncoderCls,
								lpszModPictureFilePath,
								&pImageEncoder);

							if (SUCCEEDED(hr))
							{
								IImageSink* pImageSink = NULL;

								hr = pImageEncoder->GetEncodeSink(&pImageSink);
								if (SUCCEEDED(hr))
								{
									UINT uiPropertiesCount = 0;

									hr = pImageDecoder->GetPropertyCount(&uiPropertiesCount);
									if (SUCCEEDED(hr))
									{
										UINT totalBufferSize = 0;
										UINT numProperties = 0;

										hr = pImageDecoder->GetPropertySize(&totalBufferSize, &numProperties);
										if (SUCCEEDED(hr))
										{
											PropertyItem* pis = (PropertyItem*)malloc(totalBufferSize);

											hr = pImageDecoder->GetAllPropertyItems(
												totalBufferSize, 
												numProperties, 
												pis);

											if (SUCCEEDED(hr))
											{
												hr = pImageSink->PushPropertyItems(
													numProperties,
													totalBufferSize,
													pis);
												if (SUCCEEDED(hr))
												{
													hr = pImageDecoder->BeginDecode(pImageSink, NULL);
													if (SUCCEEDED(hr))
													{
														while (true)
														{
															hr = pImageDecoder->Decode();
															if (SUCCEEDED(hr))
															{
																pImageDecoder->EndDecode(hr);
																break;
															}
															else if (FAILED(hr))
															{
																pImageDecoder->EndDecode(hr);
																break;
															}
															else if (hr == E_PENDING)
															{
																continue;
															}//if
														}//while
													}//if
												}//if

												free(pis);
											}//if
										}//if
									}//if

									pImageSink->Release();
								}//if

								pImageEncoder->TerminateEncoder();
								pImageEncoder->Release();
							}//if

						}//if

					}//if                    

				}//if

				pImageDecoder->Release();
			}//if

		}//if
		Stream_release(pFileStream);

		pImgFactory->Release();
	}//if

	return SUCCEEDED(hr);
}