// LTISAPI.CPP - Implementation file for your Internet Server
//    LEADTOOLS ISAPI Extension
//
// To use this example, you must create a directory of 31 images (any format
// supported by LEADTOOLS).  The images must be named 1, 2, 3, etc. with no
// extension up to 31.
//
// This ISAPI DLL can be called in two ways:
//
// 1) use the dll to return an IMG:
//    <IMG SRC="/scripts/ltisapi.dll">
//    will return a jpeg image corresponding to the day of the month
//
// 2) use the dll in an input form:
//    <form action="/scripts/ltisapi.dll?" method="POST">
//        <input type="hidden" name="MfcISAPICommand" value="MyText"><p>Enter
//        the text you want placed on the image: <input type="text"
//        size="20" name="MyText" value="XXXXX"> <input type="submit"
//        value="Submit"> </p>
//    </form>
//    will return a jpeg image corresponding to the day of the month with
//    the string "xxx" written on it.
//
// Compile this DLL, and place it in your IIS Server's scripts directory.
//
// See the bottom of this source file for a sample HTML page that
// calls this ISAPI DLL.
// Or, use the sample page "ISAPI.HTM"

#include "stdafx.h"
#include "LTISAPI.h"

// This program sends back jpeg images rather than HTML.
static const TCHAR szContentType[] = _T("Content-Type: image/pjpeg\r\n");

// This should be the location of the source image files
// change this for your server
static const TCHAR szImagePath[] = _T("D:\\images\\daily\\");
static const TCHAR szImageType[] = _T(".cmp");

// The following two headers will tell the client never to cache
// this information, as it is dynamic.
static const TCHAR szExpires[] = _T("Expires: Thu, 01 Jan 1995 01:00:00 GMT\r\n");
static const TCHAR szNoCache[] = _T("Pragma: no-cache\r\n");

static const TCHAR szError[] = _T("Error getting image!\r\n");

///////////////////////////////////////////////////////////////////////
// The one and only CWinApp object
// NOTE: You may remove this object if you alter your project to no
// longer use MFC in a DLL.

CWinApp theApp;

///////////////////////////////////////////////////////////////////////
// command-parsing map

BEGIN_PARSE_MAP(CLTISAPIExtension, CHttpServer)
	// TODO: insert your ON_PARSE_COMMAND() and 
	// ON_PARSE_COMMAND_PARAMS() here to hook up your commands.
	// For example:
	ON_PARSE_COMMAND(Default, CLTISAPIExtension, ITS_EMPTY)
   ON_PARSE_COMMAND(MyText, CLTISAPIExtension, ITS_PSTR)
   DEFAULT_PARSE_COMMAND(Default, CLTISAPIExtension)
END_PARSE_MAP(CLTISAPIExtension)


///////////////////////////////////////////////////////////////////////
// The one and only CLTISAPIExtension object

CLTISAPIExtension theExtension;


///////////////////////////////////////////////////////////////////////
// CLTISAPIExtension implementation

CLTISAPIExtension::CLTISAPIExtension()
{
}

CLTISAPIExtension::~CLTISAPIExtension()
{
}

BOOL CLTISAPIExtension::GetExtensionVersion(HSE_VERSION_INFO* pVer)
{
	// Call default implementation for initialization
	CHttpServer::GetExtensionVersion(pVer);

	// Load description string
	TCHAR sz[HSE_MAX_EXT_DLL_NAME_LEN+1];
	ISAPIVERIFY(::LoadString(AfxGetResourceHandle(),
			IDS_SERVER, sz, HSE_MAX_EXT_DLL_NAME_LEN));
	_tcscpy(pVer->lpszExtensionDesc, sz);
	return TRUE;
}

///////////////////////////////////////////////////////////////////////
// CLTISAPIExtension command handlers

void CLTISAPIExtension::Default(CHttpServerContext* pCtxt)
{
   CString szFile;
   CString szMyText;
//	StartContent(pCtxt);
//	WriteTitle(pCtxt);
//
//	*pCtxt << _T("This default message was produced by the Internet");
//	*pCtxt << _T(" Server DLL Wizard. Edit your CLTISAPIExtension::Default()");
//	*pCtxt << _T(" implementation to change it.\r\n");

// We don't call StartContent() or WriteTitle() here due to the
// fact that those will send back tags appropriate only to
// HTML pages.  We will be sending back an image.

	// Don't allow these pages to be cached
	AddHeader(pCtxt, szExpires);
	AddHeader(pCtxt, szNoCache);

   szFile = GetTodaysImage();

   //Send back the image as image/pjpeg
   OutputJPEG(pCtxt, szFile, szMyText);

// EndContent() is only appropriate for HTML files, so we
// don't call it here.
}

void CLTISAPIExtension::MyText(CHttpServerContext* pCtxt, LPTSTR pszMyText)
{
   CString szFile;
   CString szMyText="";
   CString szTemp;
   CString szToken="MyText=";
   int nIndex=0;

	// Don't allow these pages to be cached
	AddHeader(pCtxt, szExpires);
	AddHeader(pCtxt, szNoCache);

   szFile = GetTodaysImage();

   //Get the user's text input
   szTemp = pCtxt->m_pECB->lpbData;
   nIndex = szTemp.Find(szToken);
   szMyText = szTemp.Right(szTemp.GetLength() - (nIndex + szToken.GetLength()));
   //Convert "+" to " "
   int x;
   for(x=0;x<szMyText.GetLength();x++)
   {
      if(szMyText.GetAt(x) == '+')
         szMyText.SetAt(x, ' ');
   }
   //Send back the image as image/pjpeg
   OutputJPEG(pCtxt, szFile, szMyText);
}

CString CLTISAPIExtension::GetTodaysImage(void)
{
   //Get the system time, and use the day of the month
   SYSTEMTIME sysTime;

   GetSystemTime(&sysTime);

   CString csRes;
   csRes.Format("%s%d%s", szImagePath, sysTime.wDay,szImageType);
   return csRes;
}

void CLTISAPIExtension::OutputJPEG(CHttpServerContext* pCtxt, CString& szFileName, CString& szMyText)
{
	// Function to load a file, convert to JPEG file in memory, and send to the stream
   L_INT nRet;
   HGLOBAL hHandle;
   L_UINT32 uSize;
   L_CHAR L_FAR* pData=NULL;
   BITMAPHANDLE Bitmap;

   L_InitBitmap(&Bitmap,sizeof(BITMAPHANDLE), 0, 0, 0);

   // Load the image, which can be any format LEADTOOLS supports
   nRet = L_LoadBitmap((LPTSTR)(LPCTSTR)szFileName, &Bitmap, sizeof(BITMAPHANDLE), 0, ORDER_BGR, NULL, NULL);
   if(nRet == SUCCESS)
   {
      if(szMyText.GetLength())
      {
         // Create an HDC for the image surface
         HDC hLEADDC = L_CreateLeadDC(&Bitmap);
         if(hLEADDC)
         {
            // Output the text string to the image surface
            TextOut(hLEADDC, 5, Bitmap.Height/2, szMyText, szMyText.GetLength()-2);
            L_DeleteLeadDC(hLEADDC);
         }
      }
      // Save the image as JPEG, which the client's browser can handle
      nRet = L_SaveBitmapMemory(&hHandle, &Bitmap, FILE_JFIF, 24, 2, &uSize, NULL);
   }
   else
   {
	   *pCtxt << _T("File ");
	   *pCtxt << szFileName;
	   *pCtxt << _T(" Not Found !!!");
   }
   if(Bitmap.Flags.Allocated)
      L_FreeBitmap(&Bitmap);

   if(nRet == SUCCESS)
   {
      // Start by writing the proper content type to the client
	   AddHeader(pCtxt, szContentType);
      // Get the pointer to the memory-resident file
      pData = (L_CHAR L_FAR *) GlobalLock (hHandle);

   	CBinaryHtmlStream* pStream = new CBinaryHtmlStream;
	   ISAPIVERIFY(pStream != NULL);

	   L_UINT32 uCount;
	   for (uCount = 0; uCount<uSize; uCount++)
      {
		   *pStream << pData[uCount];
      }

	   *pCtxt << *pStream;

	   delete pStream;
      
      // Clean up
      GlobalUnlock (hHandle);
      GlobalFree (hHandle);
   }
   else
   {
      ISAPITRACE(szError);
   }

   //Close the data
   *pCtxt << _T("};\r\n");
}


// Do not edit the following lines, which are needed by ClassWizard.
#if 0
BEGIN_MESSAGE_MAP(CLTISAPIExtension, CHttpServer)
	//{{AFX_MSG_MAP(CLTISAPIExtension)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()
#endif	// 0

////////////////////////// Sample HTML page/////////////////////////////
// be sure to set the url's to your specific server
/***********************************************************************
<html>

<head>
<meta http-equiv="Content-Type"
content="text/html; charset=iso-8859-1">
<meta name="GENERATOR" content="Microsoft FrontPage Express 2.0">
<title>ISAPI Example Test Page</title>
</head>

<body bgcolor="#FFFFFF">

<p align="center"><strong>LEADTOOLS ISAPI Test Page!</strong></p>

<p>Daily image: <img src="/scripts/ltisapi.dll"></p>

<hr>

<p>To see the daily image with Text on it:</p>

<form action="/scripts/ltisapi.dll?" method="POST">
    <input type="hidden" name="MfcISAPICommand" value="MyText"><p>Enter
    the text you want placed on the image: <input type="text"
    size="20" name="MyText" value="XXXXX"> <input type="submit"
    value="Submit"> </p>
</form>

<p align="center"><b>© 1991-2000 LEAD Technologies, Inc.</b></p>
</body>
</html>
***********************************************************************/
////////////////////////// Sample HTML page/////////////////////////////