#include "opencv2/imgproc/imgproc.hpp"

#include "opencv2/highgui/highgui.hpp"

#include <cv.h>

#include <highgui.h>

#include "BlobResult.h"

#include <jni.h>

using namespace cv;

using namespace std;

char *filepath1 = "/sdcard/CLOWN-FACE.jpg";//char *filepath1 = "/sdcard/ReyRey__s_mask_transparent_WIP_by_Ionutsu.png";

double alpha = 0.2;

double beta = 1.0 - alpha;

//struct timeval t1,t2;

//char buf3[200],buf4[200];

//CascadeClassifier lbpCascadeFile;

//String lbpCascadeFileName ="/data/data/com.android.phone/lbpcascade_frontalface.xml" ;

//char *path1 = "/data/data/com.android.phone/bruce_qcif.jpg";

//char *path2 = "/data/data/com.android.phone/glasses.jpg";

//Mat img1 ;

extern "C" {

JNIEXPORT void JNICALL Java_org_opencv_samples_tutorial3_Sample3View_FindFeatures(JNIEnv* env, jobject thiz, jint width, jint height, jbyteArray yuv, jintArray bgra)

{

        int col,row;

        jbyte* _yuv  = env->GetByteArrayElements(yuv, 0);

    jint*  _bgra = env->GetIntArrayElements(bgra, 0);

    Mat myuv(height + height/2, width, CV_8UC1, (unsigned char *)_yuv);

    Mat mbgra(height, width, CV_8UC4, (unsigned char *)_bgra);

    //Please make attention about BGRA byte order

    //ARGB stored in java as int array becomes BGRA at native level

        cvtColor(myuv, mbgra, CV_YUV420sp2BGR, 4);

        IplImage imageBGR = mbgra;

        IplImage* imageHSV = cvCreateImage( cvGetSize(&imageBGR), 8, 3);        // Full HSV color image.

        cvCvtColor(&imageBGR, imageHSV, CV_BGR2HSV);                                // Convert from a BGR to an HSV image.

        // Get the separate HSV color components of the color input image.

        IplImage* planeH = cvCreateImage( cvGetSize(&imageBGR), 8, 1);        // Hue component.

        IplImage* planeS = cvCreateImage( cvGetSize(&imageBGR), 8, 1);        // Saturation component.

        IplImage* planeV = cvCreateImage( cvGetSize(&imageBGR), 8, 1);        // Brightness component.

        cvCvtPixToPlane(imageHSV, planeH, planeS, planeV, 0);        // Extract the 3 color components.

        IplImage* tempPlaneH = cvCreateImage( cvGetSize(&imageBGR), 8, 1);//Clone of planeH

        cvCopy(planeH,tempPlaneH);

        // Detect which pixels in each of the H, S and V channels are probably skin pixels.

        //cvInRangeS(imageHSV, cvScalarAll(0), cvScalarAll(25), imageHSV);

        cvInRangeS(tempPlaneH, cvScalarAll(0), cvScalarAll(18), tempPlaneH);

        cvInRangeS(planeH, cvScalarAll(170), cvScalarAll(179), planeH);

        cvThreshold(planeS, planeS, 30, UCHAR_MAX, CV_THRESH_BINARY);//Original value 50

        cvThreshold(planeV, planeV, 35, UCHAR_MAX, CV_THRESH_BINARY);//Original value 80

        cvOr(tempPlaneH,planeH,planeH);

        // Combine all 3 thresholded color components, so that an output pixel will only

        // be white if the H, S and V pixels were also white.

        IplImage* imageSkinPixels = cvCreateImage( cvGetSize(&imageBGR), 8, 1);        // Greyscale output image.

        cvAnd(planeH, planeS, imageSkinPixels);                                // imageSkin = H {BITWISE_AND} S.

        cvAnd(imageSkinPixels, planeV, imageSkinPixels);        // imageSkin = H {BITWISE_AND} S {BITWISE_AND} V.

        // Find blobs in the image.

        CBlobResult blobs;

        CBlob biggestBlob;

        //CBlob secondBiggestBlob;

        blobs = CBlobResult(imageSkinPixels, NULL, 0);

        int minArea = 2000;

        blobs.Filter(blobs, B_EXCLUDE, CBlobGetArea(), B_LESS, minArea);

        blobs.GetNthBlob( CBlobGetArea(), 0, biggestBlob );//Gets the blob with largest area

        //blobs.GetNthBlob( CBlobGetArea(), 1, secondBiggestBlob );

        CvRect faces1;//,faces2;

        faces1 = biggestBlob.GetBoundingBox();

        //faces2 = secondBiggestBlob.GetBoundingBox();

        if (faces1.height>(1.3*faces1.width) && faces1.height<(1.7*faces1.width)) 

        {

                cvRectangle( &imageBGR,cvPoint( faces1.x, faces1.y ), cvPoint( faces1.x + faces1.width, faces1.y + faces1.height ),CV_RGB( 255, 0, 0 ), 10, 8, 0 );

                //IplImage temp3 = cvCreateImage(cvSize(imageBGR.width,imageBGR.height),imageBGR.depth,imageBGR.nChannels);

                cvSetImageROI(&imageBGR,faces1);

                IplImage *temp1 = cvLoadImage(filepath1);

                IplImage *temp2 = cvCreateImage(cvSize(faces1.width,faces1.height),imageBGR.depth,imageBGR.nChannels);

                cvResize(temp1,temp2);

                //IplImage *temp3 = cvCreateImage(cvSize(faces1.width,faces1.height), temp1->depth, temp1->nChannels);

                cvAddWeighted(&imageBGR,alpha,temp2,beta,0.0,&imageBGR);//cvCopy(temp2,&imageBGR);/////

                cvResetImageROI(&imageBGR);

        }

        //cvReleaseImage(&temp2);

        //cvReleaseImage(&temp1);

        cvReleaseImage( &imageHSV );

        cvReleaseImage( &tempPlaneH );

        cvReleaseImage( &planeH );

        cvReleaseImage( &planeS );

        cvReleaseImage( &planeV );

        cvReleaseImage( &imageSkinPixels );

        //cvReleaseImage( &imageSkinBlobs );

        env->ReleaseIntArrayElements(bgra, _bgra, 0);

    env->ReleaseByteArrayElements(yuv, _yuv, 0);

#if 0

        int i;

        storage = cvCreateMemStorage( 0 );

    jbyte* _yuv  = env->GetByteArrayElements(yuv, 0);

    jint*  _bgra = env->GetIntArrayElements(bgra, 0);

    Mat myuv(height + height/2, width, CV_8UC1, (unsigned char *)_yuv);

    Mat mbgra(height, width, CV_8UC4, (unsigned char *)_bgra);

    //Please make attention about BGRA byte order

    //ARGB stored in java as int array becomes BGRA at native level

        cvtColor(myuv, mbgra, CV_YUV420sp2BGR, 4);

        CvSeq *faces = cvHaarDetectObjects(&imgbgra, cascadeFile,storage,1.3, 3, 0 , cvSize(0,0), cvSize(0,0));

        for( i= 0 ; i < ( faces ? faces->total : 0 ) ; i++ )

        {

                CvRect *r = ( CvRect* )cvGetSeqElem( faces, i );

        cvRectangle( &imgbgra,cvPoint( r->x, r->y ), cvPoint( r->x + r->width, r->y + r->height ),CV_RGB( 255, 0, 0 ), 10, 8, 0 );

        }

        env->ReleaseIntArrayElements(bgra, _bgra, 0);

    env->ReleaseByteArrayElements(yuv, _yuv, 0);

        /*jbyte* _yuv  = env->GetByteArrayElements(yuv, 0);

    jint*  _bgra = env->GetIntArrayElements(bgra, 0);

    Mat myuv(height + height/2, width, CV_8UC1, (unsigned char *)_yuv);

    Mat mbgra(height, width, CV_8UC4, (unsigned char *)_bgra);

    Mat mgray(height, width, CV_8UC1, (unsigned char *)_yuv);

    //Please make attention about BGRA byte order

    //ARGB stored in java as int array becomes BGRA at native level

    cvtColor(myuv, mbgra, CV_YUV420sp2BGR, 4);

    vector<KeyPoint> v;

    FastFeatureDetector detector(50);

    detector.detect(mgray, v);

    for( size_t i = 0; i < v.size(); i++ )

        circle(mbgra, Point(v[i].pt.x, v[i].pt.y), 10, Scalar(0,0,255,255));*/

#endif

}

}