//
// Copyright (c) 2013 Mikko Mononen memon@inside.org
//
// This software is provided 'as-is', without any express or implied
// warranty.  In no event will the authors be held liable for any damages
// arising from the use of this software.
// Permission is granted to anyone to use this software for any purpose,
// including commercial applications, and to alter it and redistribute it
// freely, subject to the following restrictions:
// 1. The origin of this software must not be misrepresented; you must not
//    claim that you wrote the original software. If you use this software
//    in a product, an acknowledgment in the product documentation would be
//    appreciated but is not required.
// 2. Altered source versions must be plainly marked as such, and must not be
//    misrepresented as being the original software.
// 3. This notice may not be removed or altered from any source distribution.
//

#include <stdio.h>
#include <string.h>
#define FONTSTASH_IMPLEMENTATION

//#define FONS_USE_FREETYPE

#include <GLUT/glut.h>
#include "fontstash.h"
#define GLFONTSTASH_IMPLEMENTATION
#include "glfontstash.h"

int fontNormal = FONS_INVALID;
int fontItalic = FONS_INVALID;
int fontBold = FONS_INVALID;
int fontJapanese = FONS_INVALID;

FONScontext* fs = NULL;

int debug = 0;

void dash(float dx, float dy)
{
    glBegin(GL_LINES);
    glColor4ub(0,0,0,128);
    glVertex2f(dx-5,dy);
    glVertex2f(dx-10,dy);
    glEnd();
}

void line(float sx, float sy, float ex, float ey)
{
    glBegin(GL_LINES);
    glColor4ub(0,0,0,128);
    glVertex2f(sx,sy);
    glVertex2f(ex,ey);
    glEnd();
}

void keyPressed(unsigned char key, int x, int y)
{
    switch(key) {
        case 27 : exit(0);
            break;
        case ' ': debug = !debug;
            break;
        default:
            break;
    }
}

void DisplayFunc() {
    float sx, sy, dx, dy, lh = 0;
    int width, height;
    unsigned int white,black,brown,blue;
    // Update and render
    glViewport(0, 0, width, height);
    glClearColor(0.3f, 0.3f, 0.32f, 1.0f);
    glClear(GL_COLOR_BUFFER_BIT|GL_DEPTH_BUFFER_BIT);
    glEnable(GL_BLEND);
    glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
    glDisable(GL_TEXTURE_2D);
    glMatrixMode(GL_PROJECTION);
    glLoadIdentity();
    glOrtho(0,width,height,0,-1,1);
    
    glMatrixMode(GL_MODELVIEW);
    glLoadIdentity();
    glDisable(GL_DEPTH_TEST);
    glColor4ub(255,255,255,255);
    glEnable(GL_BLEND);
    glBlendFunc(GL_SRC_ALPHA,GL_ONE_MINUS_SRC_ALPHA);
    glEnable(GL_CULL_FACE);
    
    white = glfonsRGBA(255,255,255,255);
    brown = glfonsRGBA(192,128,0,128);
    blue = glfonsRGBA(0,192,255,255);
    black = glfonsRGBA(0,0,0,255);
    
    sx = 50; sy = 50;
    
    dx = sx; dy = sy;
    
    dash(dx,dy);
    
    fonsClearState(fs);
    
    fonsSetSize(fs, 124.0f);
    fonsSetFont(fs, fontNormal);
    fonsVertMetrics(fs, NULL, NULL, &lh);
    dx = sx;
    dy += lh;
    dash(dx,dy);
    
    fonsSetSize(fs, 124.0f);
    fonsSetFont(fs, fontNormal);
    fonsSetColor(fs, white);
    dx = fonsDrawText(fs, dx,dy,"The quick ",NULL);
    
    fonsSetSize(fs, 48.0f);
    fonsSetFont(fs, fontItalic);
    fonsSetColor(fs, brown);
    dx = fonsDrawText(fs, dx,dy,"brown ",NULL);
    
    fonsSetSize(fs, 24.0f);
    fonsSetFont(fs, fontNormal);
    fonsSetColor(fs, white);
    dx = fonsDrawText(fs, dx,dy,"fox ",NULL);
    
    fonsVertMetrics(fs, NULL, NULL, &lh);
    dx = sx;
    dy += lh*1.2f;
    dash(dx,dy);
    fonsSetFont(fs, fontItalic);
    dx = fonsDrawText(fs, dx,dy,"jumps over ",NULL);
    fonsSetFont(fs, fontBold);
    dx = fonsDrawText(fs, dx,dy,"the lazy ",NULL);
    fonsSetFont(fs, fontNormal);
    dx = fonsDrawText(fs, dx,dy,"dog.",NULL);
    
    dx = sx;
    dy += lh*1.2f;
    dash(dx,dy);
    fonsSetSize(fs, 12.0f);
    fonsSetFont(fs, fontNormal);
    fonsSetColor(fs, blue);
    fonsDrawText(fs, dx,dy,"Now is the time for all good men to come to the aid of the party.",NULL);
    
    fonsVertMetrics(fs, NULL,NULL,&lh);
    dx = sx;
    dy += lh*1.2f*2;
    dash(dx,dy);
    fonsSetSize(fs, 18.0f);
    fonsSetFont(fs, fontItalic);
    fonsSetColor(fs, white);
    fonsDrawText(fs, dx,dy,"Ég get etið gler án þess að meiða mig.",NULL);
    
    fonsVertMetrics(fs, NULL,NULL,&lh);
    dx = sx;
    dy += lh*1.2f;
    dash(dx,dy);
    fonsSetFont(fs, fontJapanese);
    fonsDrawText(fs, dx,dy,"私はガラスを食べられます。それは私を傷つけません。",NULL);
    
    // Font alignment
    fonsSetSize(fs, 18.0f);
    fonsSetFont(fs, fontNormal);
    fonsSetColor(fs, white);
    
    dx = 50; dy = 350;
    line(dx-10,dy,dx+250,dy);
    fonsSetAlign(fs, FONS_ALIGN_LEFT | FONS_ALIGN_TOP);
    dx = fonsDrawText(fs, dx,dy,"Top",NULL);
    dx += 10;
    fonsSetAlign(fs, FONS_ALIGN_LEFT | FONS_ALIGN_MIDDLE);
    dx = fonsDrawText(fs, dx,dy,"Middle",NULL);
    dx += 10;
    fonsSetAlign(fs, FONS_ALIGN_LEFT | FONS_ALIGN_BASELINE);
    dx = fonsDrawText(fs, dx,dy,"Baseline",NULL);
    dx += 10;
    fonsSetAlign(fs, FONS_ALIGN_LEFT | FONS_ALIGN_BOTTOM);
    fonsDrawText(fs, dx,dy,"Bottom",NULL);
    
    dx = 150; dy = 400;
    line(dx,dy-30,dx,dy+80.0f);
    fonsSetAlign(fs, FONS_ALIGN_LEFT | FONS_ALIGN_BASELINE);
    fonsDrawText(fs, dx,dy,"Left",NULL);
    dy += 30;
    fonsSetAlign(fs, FONS_ALIGN_CENTER | FONS_ALIGN_BASELINE);
    fonsDrawText(fs, dx,dy,"Center",NULL);
    dy += 30;
    fonsSetAlign(fs, FONS_ALIGN_RIGHT | FONS_ALIGN_BASELINE);
    fonsDrawText(fs, dx,dy,"Right",NULL);
    
    // Blur
    dx = 500; dy = 350;
    fonsSetAlign(fs, FONS_ALIGN_LEFT | FONS_ALIGN_BASELINE);
    
    fonsSetSize(fs, 60.0f);
    fonsSetFont(fs, fontItalic);
    fonsSetColor(fs, white);
    fonsSetSpacing(fs, 5.0f);
    fonsSetBlur(fs, 10.0f);
    fonsDrawText(fs, dx,dy,"Blurry...",NULL);
    
    dy += 50.0f;
    
    fonsSetSize(fs, 18.0f);
    fonsSetFont(fs, fontBold);
    fonsSetColor(fs, black);
    fonsSetSpacing(fs, 0.0f);
    fonsSetBlur(fs, 3.0f);
    fonsDrawText(fs, dx,dy+2,"DROP THAT SHADOW",NULL);
    
    fonsSetColor(fs, white);
    fonsSetBlur(fs, 0);
    fonsDrawText(fs, dx,dy,"DROP THAT SHADOW",NULL);
    
    if (debug)
        fonsDrawDebug(fs, 800.0, 50.0);
    
    
    glEnable(GL_DEPTH_TEST);
    
    glutSwapBuffers();
}

int main(int argc, char* argv[])
{
    glutInit(&argc, argv);
    
    glutInitWindowPosition(500, 300);
    glutInitWindowSize(800, 600);
    glutInitDisplayMode(GLUT_RGBA | GLUT_DOUBLE);
    glutCreateWindow("Font Stash");
    glutDisplayFunc(DisplayFunc);
    glutKeyboardFunc(keyPressed);
    
    fs = glfonsCreate(512, 512, FONS_ZERO_TOPLEFT);
    if (fs == NULL) {
        printf("Could not create stash.\n");
        return -1;
    }
    
    fontNormal = fonsAddFont(fs, "sans", "DroidSerif-Regular.ttf");
    if (fontNormal == FONS_INVALID) {
        printf("Could not add font normal.\n");
        return -1;
    }
    fontItalic = fonsAddFont(fs, "sans-italic", "DroidSerif-Italic.ttf");
    if (fontItalic == FONS_INVALID) {
        printf("Could not add font italic.\n");
        return -1;
    }
    fontBold = fonsAddFont(fs, "sans-bold", "DroidSerif-Bold.ttf");
    if (fontBold == FONS_INVALID) {
        printf("Could not add font bold.\n");
        return -1;
    }
    fontJapanese = fonsAddFont(fs, "sans-jp", "DroidSansJapanese.ttf");
    if (fontJapanese == FONS_INVALID) {
        printf("Could not add font japanese.\n");
        return -1;
    }
    
    glutMainLoop();
    
    glfonsDelete(fs);
    
    return 0;
}