/*
 *  Copyright 2003 by Texas Instruments Incorporated.
 *  All rights reserved. Property of Texas Instruments Incorporated.
 *  Restricted rights to use, duplicate or disclose this code are
 *  granted through contract.
 *  
 */
/* "@(#) DDK 1.10.00.23 07-02-03 (ddk-b12)" */
#include <std.h>
#include <tsk.h>  
#include <sem.h>   
#include <gio.h>

#include <csl_dat.h>
#include <csl_cache.h>


#include <fvid.h>
#include <edc.h>
#include <vport.h>
#include <vportcap.h>
#include <vportdis.h>
#include <saa7105.h>
#include <saa7115.h>    

#include <evmdm642.h>

#include "evmdm642_vcapparams.h"
#include "evmdm642_vdisparams.h"

/* heap IDs defined in the BIOS configuration file */
extern Int EXTERNALHEAP;
                                       
#include "ths8200_beta.h"

#ifdef _HD480P
THS8200_Params params = {   
  YCx20_EMBEDDED_SYNC, 
  YPbPr_480P_HDTV
};
#endif

#ifdef _HD720P
THS8200_Params params = {   
  YCx20_EMBEDDED_SYNC, 
  YPbPr_720P_HDTV
};
#endif

#ifdef _HD1080I
THS8200_Params params = {   
  YCx20_EMBEDDED_SYNC, 
  YPbPr_1080i_HDTV
};
#endif


/*
 * ======== main ========
 */
main()
{
    /******************************************************/
    /* open CSL DAT module for fast copy                  */
    /******************************************************/
    CSL_init();                                             
    CACHE_clean(CACHE_L2ALL, 0, 0);
    CACHE_setL2Mode(CACHE_256KCACHE);       
    CACHE_enableCaching(CACHE_EMIFA_CE00);
    CACHE_enableCaching(CACHE_EMIFA_CE01);
    DAT_open(DAT_CHAANY, DAT_PRI_LOW, DAT_OPEN_2D);

}

/*
 * ======== tskVideoLoopback ========
 * video loopback function.
 */
void tskVideoLoopback()
{
    Int status,i,x,y;
    FVID_Handle disChan; 
    Int frames = 0;
    FVID_Frame *disFrameBuf;
    Int numLinesDis = EVMDM642_vDisParamsChan.imgVSizeFld1;
    Int numLinesCap = EVMDM642_vCapParamsChan.fldYStop1 -
       EVMDM642_vCapParamsChan.fldYStrt1+1;

    
    Int numLines = (numLinesDis > numLinesCap) ? numLinesCap : numLinesDis;


    FVID_Handle capChan; 
    Int numPixels = EVMDM642_vCapParamsChan.fldXStop1 - 
       EVMDM642_vCapParamsChan.fldXStrt1+1;
    FVID_Frame *capFrameBuf;
    Int capLinePitch = EVMDM642_vCapParamsChan.fldXStop1 - 
       EVMDM642_vCapParamsChan.fldXStrt1+1;
    Int disLinePitch = EVMDM642_vDisParamsChan.imgHSizeFld1;




 
    numLines *= 2; /* both fields */
    /******************************************************/
    /* allocate both capture and display frame buffers    */
    /* in external heap memory                            */
    /******************************************************/
        EVMDM642_vCapParamsChan.segId = EXTERNALHEAP;
        EVMDM642_vDisParamsChan.segId = EXTERNALHEAP;
        EVMDM642_vCapParamsSAA7115.hI2C = EVMDM642_I2C_hI2C;

    /******************************************************/
    /* initialization of capture driver                   */
    /******************************************************/

    capChan = FVID_create("/VP0CAPTURE/A/0", 
            IOM_INPUT, &status, (Ptr)&EVMDM642_vCapParamsChan, NULL);


    /******************************************************/
    /* initialization of display driver                   */
    /******************************************************/
    disChan = FVID_create("/VP2DISPLAY", IOM_OUTPUT, 
        &status, (Ptr)&EVMDM642_vDisParamsChan, NULL);

    
    /******************************************************/
    /* configure video encoder & decoder                  */
    /******************************************************/
    FVID_control(disChan, VPORT_CMD_EDC_BASE + EDC_CONFIG,
    	(void *)&params);

    FVID_control(capChan, VPORT_CMD_EDC_BASE + EDC_CONFIG, 
        (Ptr)&EVMDM642_vCapParamsSAA7115);




    /******************************************************/
    /* start capture & display operation                  */    
    /******************************************************/
    FVID_control(disChan, VPORT_CMD_START, NULL);

    FVID_control(capChan, VPORT_CMD_START, NULL);


    
    /********************************************************/
    /* request a frame buffer from display & capture driver */
    /********************************************************/
    FVID_alloc(disChan, &disFrameBuf);

    FVID_alloc(capChan, &capFrameBuf);



/*************************************************\
|  Fill Frames with Background Color              |
\*************************************************/
	for(i=0; i < (EVMDM642_vDisParamsChan.numFrmBufs); i++)
	{
		for(y=0; y < (EVMDM642_vDisParamsChan.imgVSizeFld1+EVMDM642_vDisParamsChan.imgVSizeFld2); y++)
		{
			for(x=0; x < (EVMDM642_vDisParamsChan.imgHSizeFld1); x++)
			{
				disFrameBuf->frame.iFrm.y1[EVMDM642_vDisParamsChan.imgHSizeFld1*y + x] = 16;
				if (x <= (EVMDM642_vDisParamsChan.imgHSizeFld1/2)-1)
				{
					disFrameBuf->frame.iFrm.cb1[(EVMDM642_vDisParamsChan.imgHSizeFld1>>1)*y + x] = 127;
					disFrameBuf->frame.iFrm.cr1[(EVMDM642_vDisParamsChan.imgHSizeFld1>>1)*y + x] = 127;
				}
			}
		}

    FVID_exchange(disChan, &disFrameBuf);        
	}

    CACHE_clean(CACHE_L2ALL, 0, 0);

    frames ++;

    while(1){/* loop forever */
    
        /* copy data from capture buffer to display buffer */
        /***************************************************/

        for(i = 0; i < numLines; i ++) {
            DAT_copy(capFrameBuf->frame.iFrm.y1 + i * capLinePitch, 
                     disFrameBuf->frame.iFrm.y1 + i * disLinePitch,
                     numPixels);
            DAT_copy(capFrameBuf->frame.iFrm.cb1 + i * (capLinePitch >> 1), 
                     disFrameBuf->frame.iFrm.cb1 + i * (disLinePitch >> 1),
                     numPixels>>1);

            DAT_copy(capFrameBuf->frame.iFrm.cr1 + i * (capLinePitch >> 1), 
                     disFrameBuf->frame.iFrm.cr1 + i * (disLinePitch >> 1),
                     numPixels>>1);
        }

        DAT_wait(DAT_XFRID_WAITALL);
        
        FVID_exchange(capChan, &capFrameBuf);

        FVID_exchange(disChan, &disFrameBuf);        
        frames ++;              
   }
}