/******************************************************************************
*                            recordMyDesktop                                  *
*******************************************************************************
*                                                                             *
*            Copyright (C) 2006,2007,2008 John Varouhakis                     *
*                                                                             *
*                                                                             *
*   This program is free software; you can redistribute it and/or modify      *
*   it under the terms of the GNU General Public License as published by      *
*   the Free Software Foundation; either version 2 of the License, or         *
*   (at your option) any later version.                                       *
*                                                                             *
*   This program is distributed in the hope that it will be useful,           *
*   but WITHOUT ANY WARRANTY; without even the implied warranty of            *
*   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the             *
*   GNU General Public License for more details.                              *
*                                                                             *
*   You should have received a copy of the GNU General Public License         *
*   along with this program; if not, write to the Free Software               *
*   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA  *
*                                                                             *
*                                                                             *
*                                                                             *
*   For further information contact me at johnvarouhakis@gmail.com            *
******************************************************************************/

#include "config.h"
#include "rmd_poll_events.h"

#include "rmd_frame.h"
#include "rmd_macro.h"
#include "rmd_rectinsert.h"
#include "rmd_types.h"

#include <X11/Xlib.h>
#include <X11/Xlibint.h>
#include <X11/extensions/Xdamage.h>

#include <stdio.h>
#include <stdlib.h>
#include <signal.h>
#include <pthread.h>


#define CLIP_EVENT_AREA(e,brwin,xrect){\
    if(((e)->area.x<=(brwin)->rrect.x)&&((e)->area.y<=(brwin)->rrect.y)&&\
        ((e)->area.width>=(brwin)->rrect.width)&&\
        ((e)->area.height<(brwin)->rrect.height)){\
        (xrect)->x=(brwin)->rrect.x;\
        (xrect)->y=(brwin)->rrect.y;\
        (xrect)->width=(brwin)->rrect.width;\
        (xrect)->height=(brwin)->rrect.height;\
    }\
    else{\
        (xrect)->x=((((e)->area.x+(e)->area.width>=(brwin)->rrect.x)&&\
        ((e)->area.x<=(brwin)->rrect.x+(brwin)->rrect.width))?\
        (((e)->area.x<=(brwin)->rrect.x)?(brwin)->rrect.x:(e)->area.x):-1);\
    \
        (xrect)->y=((((e)->area.y+(e)->area.height>=(brwin)->rrect.y)&&\
        ((e)->area.y<=(brwin)->rrect.y+(brwin)->rrect.height))?\
        (((e)->area.y<=(brwin)->rrect.y)?(brwin)->rrect.y:(e)->area.y):-1);\
    \
        (xrect)->width=((e)->area.x<=(brwin)->rrect.x)?\
        (e)->area.width-((brwin)->rrect.x-(e)->area.x):\
        ((e)->area.x<=(brwin)->rrect.x+(brwin)->rrect.width)?\
        (((brwin)->rrect.width-(e)->area.x+(brwin)->rrect.x<(e)->area.width)?\
        (brwin)->rrect.width-(e)->area.x+(brwin)->rrect.x:e->area.width):0;\
    \
        (xrect)->height=((e)->area.y<=(brwin)->rrect.y)?\
        (e)->area.height-((brwin)->rrect.y-(e)->area.y):\
        ((e)->area.y<=(brwin)->rrect.y+(brwin)->rrect.height)?\
        (((brwin)->rrect.height-(e)->area.y+\
         (brwin)->rrect.y<(e)->area.height)?\
         (brwin)->rrect.height-(e)->area.y+\
         (brwin)->rrect.y:(e)->area.height):0;\
    \
        if((xrect)->width>(brwin)->rrect.width)\
            (xrect)->width=(brwin)->rrect.width;\
        if((xrect)->height>(brwin)->rrect.height)\
            (xrect)->height=(brwin)->rrect.height;\
    }\
}


void rmdInitEventsPolling(ProgData *pdata){
    Window root_return,
           parent_return,
           *children;
    unsigned int i,
                 nchildren;


    XSelectInput (pdata->dpy,pdata->specs.root, SubstructureNotifyMask);


    if(!pdata->args.full_shots){
        XQueryTree (pdata->dpy,
                    pdata->specs.root,
                    &root_return,
                    &parent_return,
                    &children,
                    &nchildren);

        for (i = 0; i < nchildren; i++){
            XWindowAttributes attribs;
            if (XGetWindowAttributes (pdata->dpy,children[i],&attribs)){
                if(!attribs.override_redirect && 
                   attribs.depth==pdata->specs.depth)
                    XDamageCreate(pdata->dpy,
                                  children[i],
                                  XDamageReportRawRectangles);
            }
        }
        XFree(children);
        XDamageCreate(pdata->dpy,
                      pdata->specs.root,
                      XDamageReportRawRectangles);
    }



}


void rmdEventLoop(ProgData *pdata){
    int inserts=0;

    XEvent event;

    while(XPending(pdata->dpy)){
        XNextEvent(pdata->dpy,&event);
        if(event.type == KeyPress){
            XKeyEvent *e=(XKeyEvent *)(&event);
            if(e->keycode == pdata->pause_key.key){
                int i=0;
                int found=0;
                for(i=0;i<pdata->pause_key.modnum;i++){
                    if(pdata->pause_key.mask[i]==e->state){
                        found=1;
                        break;
                    }
                }
                if(found){
                    raise(SIGUSR1);
                    continue;
                }
            }
            if(e->keycode == pdata->stop_key.key){
                int i=0;
                int found=0;
                for(i=0;i<pdata->stop_key.modnum;i++){
                    if(pdata->stop_key.mask[i]==e->state){
                        found=1;
                        break;
                    }
                }
                if(found){
                    raise(SIGINT);
                    continue;
                }
            }
        }
        else if(event.type == Expose){
            
            if(event.xexpose.count!=0)
                continue;
            else if(!pdata->args.noframe){
                rmdDrawFrame(pdata->dpy,
                             pdata->specs.screen,  
                             pdata->shaped_w,
                             pdata->brwin.rrect.width,
                             pdata->brwin.rrect.height);
                
            }

        }
        else if(!pdata->args.full_shots){
            if(event.type == MapNotify ){
                XWindowAttributes attribs;
                if (!((XMapEvent *)(&event))->override_redirect&&
                    XGetWindowAttributes(pdata->dpy,
                                         event.xcreatewindow.window,
                                         &attribs)){
                    if(!attribs.override_redirect&&
                       attribs.depth==pdata->specs.depth)
                        XDamageCreate(pdata->dpy,
                                      event.xcreatewindow.window,
                                      XDamageReportRawRectangles);
                }
            }
            else if(event.type == pdata->damage_event + XDamageNotify ){
                XDamageNotifyEvent *e =(XDamageNotifyEvent *)( &event );
                XRectangle xrect;
                CLIP_EVENT_AREA(e,&(pdata->brwin),&xrect);
                if((xrect.x>=0)&&(xrect.y>=0)&&
                   (xrect.width>0)&&(xrect.height>0)){

                    inserts+=rmdRectInsert(&pdata->rect_root,&xrect);

                }
            }
        }

    }


}