/*
 * Copyright 2022 Olaf Wintermann
 *
 * Permission is hereby granted, free of charge, to any person obtaining a 
 * copy of this software and associated documentation files (the "Software"), 
 * to deal in the Software without restriction, including without limitation 
 * the rights to use, copy, modify, merge, publish, distribute, sublicense, 
 * and/or sell copies of the Software, and to permit persons to whom the 
 * Software is furnished to do so, subject to the following conditions:
 * 
 * The above copyright notice and this permission notice shall be included in 
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING 
 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER 
 * DEALINGS IN THE SOFTWARE.
 */

#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <locale.h>
#include <time.h>
#include <inttypes.h>

#include "window.h"
#include "main.h"
#include "settings.h"

#include <ucx/buffer.h>
#include <ucx/utils.h>

static XtAppContext app;
static Display *display;
static Widget toplevel_window;

static int event_pipe[2];

static String fallback[] = {
        "*renderTable: rt",
        "*rt*fontType: FONT_IS_XFT",
        "*rt*fontName: Sans",
        "*rt*fontSize: 9",
        
        "*pbbutton.shadowThickness: 1",
        "*pbbutton.highlightThickness: 1",
    
        "*XmText.baseTranslations: #override\\n" \
                                "Ctrl~Alt~Meta<KeyPress>v: paste-clipboard()\\n" \
                                "Ctrl~Alt~Meta<KeyPress>c: copy-clipboard()\\n" \
                                "Ctrl~Alt~Meta<KeyPress>x: cut-clipboard()\\n" \
                                "Ctrl~Alt~Meta<KeyPress>u: delete-to-start-of-line()\\n",
        "*XmTextField.baseTranslations: #override\\n" \
                                "Ctrl~Alt~Meta<KeyPress>v: paste-clipboard()\\n" \
                                "Ctrl~Alt~Meta<KeyPress>c: copy-clipboard()\\n" \
                                "Ctrl~Alt~Meta<KeyPress>x: cut-clipboard()\\n" \
                                "Ctrl~Alt~Meta<KeyPress>u: delete-to-start-of-line()\\n",
	NULL
};

static String langProc(Display *dp, String xnl, XtPointer closure) {
    setlocale(LC_ALL, xnl);
    setlocale(LC_NUMERIC, "C");
    return setlocale(LC_ALL, NULL);
}

typedef struct EventLoopCB {
    XtWorkProc proc;
    XtPointer data;
} EventLoopCB;

static void input_proc(XtPointer data, int *source, XtInputId *iid) {
    EventLoopCB cb[16];
    ssize_t r = read(event_pipe[0], cb, sizeof(EventLoopCB)*16);
    size_t n = r / sizeof(EventLoopCB);
    for(int i=0;i<n;i++) {
        cb[i].proc(cb[i].data);
    }
}

int main(int argc, char** argv) {  
    // disable stdout buffering, because the netbeans's internal terminal
    // has a bug on freebsd and doesn't flush the output after a newline
    setvbuf(stdout, NULL, _IONBF, 0);
    
    // init event pipe for xt event loop
    if(pipe(event_pipe)) {
        perror("pipe");
        return 2;
    }
     
    // initialize toolkit
    XtToolkitInitialize();
    XtSetLanguageProc(NULL, langProc, NULL);
    app = XtCreateApplicationContext();
    XtAppSetFallbackResources(app, fallback);
       
    display =  XtOpenDisplay(app, NULL, APP_NAME, APP_CLASS, NULL, 0, &argc, argv);
    
    XtAppAddInput(
            app,
            event_pipe[0],
            (XtPointer)XtInputReadMask,
            input_proc,
            NULL);
    
    // load settings
    if(load_settings()) {
        return 1;
    }
    
    MainWindow *window = WindowCreate(display);
    toplevel_window = window->window;
    
    // random numbers only used for creating tmp dirs
    srand(time(NULL));
    
    WindowShow(window);
    XtAppMainLoop(app);
    
    return 0;
}

XtAppContext* GetAppContext(void) {
    return &app;
}

void ApplicationExit(void) {
    XtAppSetExitFlag(app);
}

void AppExecProc(XtWorkProc proc, XtPointer data) {
    EventLoopCB cb;
    cb.proc = proc;
    cb.data = data;
    write(event_pipe[1], &cb, sizeof(cb));
}