/**

 * pmc/main.cc

 * Copyright (C) 2008 Markus Broeker

 */

#include <surface.hpp>

#include <rectangle.hpp>

#include <cube.hpp>

#include <cstdio>

#include <cstdlib>

#ifndef STEP

#define STEP 1

#endif

#define MAX 3

using namespace algebra;

int main (int argc, char **argv)

{

    Surface *surface;

    SDL_Event event;

    Drawable *d[MAX];

    int height;

    if (argc != 2) {

        fprintf (stderr, "Usage: %s <HEIGHT>\n", argv[0]);

        height = 250;

    } else

        height = atoi (argv[1]);

    if ((height < 10) || (height >= 360))

        height = 200;

    Vector p1 (0, 0);

    Vector p2 (height, 0);

    Vector p3 (height + 100, height + 100);

    Vector p4 (100, height + 100);

    surface = new Surface (1024, 768, 32);

    SDL_WM_SetCaption ("Pimp my Cube", NULL);

    d[0] = new Rectangle (surface, p1, p2, p3, p4);

    d[1] = new Cube (surface);

    d[2] = new Cube (surface, p1, p2, p3, p4, height);

    bool running = true;

    int i, x, y;

    x = y = 0;

    d[1]->move (Vector (3 * height, 25));

    d[2]->move (Vector (290, 0));

    while (running) {

        SDL_PollEvent (&event);

        if (event.type == SDL_QUIT)

            running = false;

        if (event.type == SDL_KEYDOWN) {

            surface->setColor (Surface::BLACK);

            for (i = 0; i < MAX; i++)

                d[i]->show ();

            surface->setColor (Surface::GREEN);

            switch (event.key.keysym.sym) {

            case SDLK_ESCAPE:

                running = false;

                break;

            case SDLK_UP:

                for (i = 0; i < MAX; i++)

                    d[i]->move ((Vector (x, y - STEP)));

                break;

            case SDLK_DOWN:

                for (i = 0; i < MAX; i++)

                    d[i]->move ((Vector (x, y + STEP)));

                break;

            case SDLK_LEFT:

                for (i = 0; i < MAX; i++)

                    d[i]->move ((Vector (x - STEP, y)));

                break;

            case SDLK_RIGHT:

                for (i = 0; i < MAX; i++)

                    d[i]->move ((Vector (x + STEP, y)));

                break;

            case SDLK_RETURN:

                fprintf (stderr, "Objects remaining: %d\n", surface->getInstances ());

                break;

            default:

                break;

            }

            for (i = 0; i < MAX; i++) {

                d[i]->show ();

            }

            surface->flip ();

        }

    }

    for (i = 0; i < MAX; i++)

        delete d[i];

    delete surface;

    /*

     * the remaining objects will be removed on exit

     */

    fprintf (stderr, "Objects remaining on exit: %d\n", refCounter);

    return EXIT_SUCCESS;

}