//  This may look like C code, but it is really -*- C++ -*-

//  ------------------------------------------------------------------
//  The Goldware Library
//  Copyright (C) 1999 Alexander S. Aganichev
//  ------------------------------------------------------------------
//  This library is free software; you can redistribute it and/or
//  modify it under the terms of the GNU Library General Public
//  License as published by the Free Software Foundation; either
//  version 2 of the License, or (at your option) any later version.
//
//  This library 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
//  Library General Public License for more details.
//
//  You should have received a copy of the GNU Library 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
//  ------------------------------------------------------------------
//  $Id$
//  ------------------------------------------------------------------
//  Midnight Commander compatible clipboard.
//  ------------------------------------------------------------------

#include <cstdlib>
#include <cstdio>
#include <gstrall.h>
#include <gmemdbg.h>
#include <gutlos.h>
#include <gmemi86.h>
#include <gfilutil.h>

#include <Clipboard.h>
#include <UTF8.h>

//  ------------------------------------------------------------------

char          ge_beos_title[GMAXTITLE+1] = "";
int           ge_beos_ext_title;

static BClipboard g_clipboard("system", true);

//  ------------------------------------------------------------------

int g_init_os(int flags)
{

    NW(flags);
    return 0;
}


//  ------------------------------------------------------------------

void g_deinit_os(void)
{

    // do nothing
}


//  ------------------------------------------------------------------

void g_init_title(char *tasktitle, int titlestatus)
{

    strxcpy(ge_beos_title, tasktitle, GMAXTITLE);
    ge_beos_ext_title = titlestatus;
}


//  ------------------------------------------------------------------

void g_increase_priority(void)
{

    // Do nothing
}


//  ------------------------------------------------------------------

void g_set_ostitle(char* title)
{

    printf("\x1b\x5d\x32\x3b%s\x07", title);
    fflush(stdout);
}

//  ------------------------------------------------------------------

void g_set_osicon(void)
{

    // do nothing
}


//  ------------------------------------------------------------------

bool g_is_clip_available(void)
{

    return true;
}

//  ------------------------------------------------------------------

char* g_get_clip_text(void)
{

    char *clip_text = NUL;
    const char *text = NUL;
    int32 textLen;
    BMessage *clip = (BMessage *)NUL;

    if(g_clipboard.Lock())
    {
        if((clip = g_clipboard.Data()) != NUL)
        {
            if(B_OK == clip->FindData("text/plain", B_MIME_TYPE,
                                      (const void **)&text, &textLen))
            {
                clip_text = (char *)throw_malloc(textLen * 2 + 1);
                *clip_text = NUL;
                int32 state = 0, destLen = textLen * 2;
                convert_from_utf8(B_ISO5_CONVERSION, text, &textLen,
                                  clip_text, &destLen, &state);
                clip_text[destLen] = NUL;
            }
        }
        g_clipboard.Unlock();
    }
    return clip_text;
}

//  ------------------------------------------------------------------

int g_put_clip_text(const char* buf)
{

    int ret = -1;
    BMessage *clip = (BMessage *)NULL;
    if(g_clipboard.Lock())
    {
        g_clipboard.Clear();
        if((clip = g_clipboard.Data()) != NUL)
        {
            int32 textLen = strlen(buf);
            int32 destLen = textLen * 3;
            char *clip_text = (char *)throw_malloc(destLen);
            *clip_text = NUL;
            int32 state = 0;
            convert_to_utf8(B_ISO5_CONVERSION, buf, &textLen, clip_text, &destLen, &state);
            clip->AddData("text/plain", B_MIME_TYPE, clip_text, destLen);
            g_clipboard.Commit();
            ret = 0;
        }
        g_clipboard.Unlock();
    }
    return -1;
}


//  ------------------------------------------------------------------

void g_get_ostitle_name(char* title)
{

    *title = NUL;
}


//  ------------------------------------------------------------------

void g_set_ostitle_name(char* title, int mode)
{

    if(mode == 0)
    {
        char fulltitle[GMAXTITLE+1];
        strcpy(fulltitle, ge_beos_title);
        if(ge_beos_ext_title)
        {
            int len = strlen(fulltitle);
            if(len < GMAXTITLE-3)
            {
                if(len)
                    strcat(fulltitle, " - ");
                strxcpy(fulltitle+len+3, title, GMAXTITLE-len-3);
            }
        }
        g_set_ostitle(fulltitle);
    }
    else
        g_set_ostitle(title);
}


//  ------------------------------------------------------------------

int g_send_mci_string(char* str, char* his_buffer)
{

    NW(str);
    NW(his_buffer);
    return 1;
}


//  ------------------------------------------------------------------
