/* motif.c-- stuff for support for mwm hints
 *
 *  Window Maker window manager
 *
 *  Copyright (c) 1998-2003 Alfredo K. Kojima
 *
 *  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.
 */


#include "wconfig.h"

#ifdef MWM_HINTS

#include <X11/Xlib.h>
#include <X11/Xutil.h>

#include <stdlib.h>
#include <stdio.h>
#include <string.h>


#include "WindowMaker.h"

#include "wcore.h"
#include "framewin.h"
#include "window.h"
#include "properties.h"
#include "icon.h"
#include "client.h"
#include "funcs.h"

#include "motif.h"


/* Motif window hints */
#define MWM_HINTS_FUNCTIONS           (1L << 0)
#define MWM_HINTS_DECORATIONS         (1L << 1)

/* bit definitions for MwmHints.functions */
#define MWM_FUNC_ALL            (1L << 0)
#define MWM_FUNC_RESIZE         (1L << 1)
#define MWM_FUNC_MOVE           (1L << 2)
#define MWM_FUNC_MINIMIZE       (1L << 3)
#define MWM_FUNC_MAXIMIZE       (1L << 4)
#define MWM_FUNC_CLOSE          (1L << 5)

/* bit definitions for MwmHints.decorations */
#define MWM_DECOR_ALL                 (1L << 0)
#define MWM_DECOR_BORDER              (1L << 1)
#define MWM_DECOR_RESIZEH             (1L << 2)
#define MWM_DECOR_TITLE               (1L << 3)
#define MWM_DECOR_MENU                (1L << 4)
#define MWM_DECOR_MINIMIZE            (1L << 5)
#define MWM_DECOR_MAXIMIZE            (1L << 6)

#define PROP_MWM_HINTS_ELEMENTS       5

/* Motif  window hints */
typedef struct {
    long flags;
    long functions;
    long decorations;
    long inputMode;
    long unknown;
} MWMHints;

static Atom _XA_MOTIF_WM_HINTS;



static void
setupMWMHints(WWindow *wwin, MWMHints *mwm_hints)
{
    /*
     * We will ignore all decoration hints that have an equivalent as
     * functions, because wmaker does not distinguish decoration hints
     */

    if (mwm_hints->flags & MWM_HINTS_DECORATIONS) {
# ifdef DEBUG
        fprintf(stderr,"has decor hints [ ");
# endif
        WSETUFLAG(wwin, no_titlebar, 1);
        WSETUFLAG(wwin, no_close_button, 1);
        WSETUFLAG(wwin, no_miniaturize_button, 1);
        WSETUFLAG(wwin, no_resizebar, 1);

        if (mwm_hints->decorations & MWM_DECOR_ALL) {
# ifdef DEBUG
            fprintf(stderr,"ALL ");
# endif
            WSETUFLAG(wwin, no_titlebar, 0);
            WSETUFLAG(wwin, no_close_button, 0);
            WSETUFLAG(wwin, no_closable, 0);
            WSETUFLAG(wwin, no_miniaturize_button, 0);
            WSETUFLAG(wwin, no_miniaturizable, 0);
            WSETUFLAG(wwin, no_resizebar, 0);
            WSETUFLAG(wwin, no_resizable, 0);
        }
        /*
         if (mwm_hints->decorations & MWM_DECOR_BORDER) {
         # ifdef DEBUG
         fprintf(stderr,"(BORDER) ");
         # endif
         }
         */

        if (mwm_hints->decorations & MWM_DECOR_RESIZEH) {
# ifdef DEBUG
            fprintf(stderr,"RESIZEH ");
# endif
            WSETUFLAG(wwin, no_resizebar, 0);
        }

        if (mwm_hints->decorations & MWM_DECOR_TITLE) {
# ifdef DEBUG
            fprintf(stderr,"TITLE+close ");
# endif
            WSETUFLAG(wwin, no_titlebar, 0);
            WSETUFLAG(wwin, no_close_button, 0);
            WSETUFLAG(wwin, no_closable, 0);
        }
        /*
         if (mwm_hints->decorations & MWM_DECOR_MENU) {
         # ifdef DEBUG
         fprintf(stderr,"(MENU) ");
         # endif
         }
         */

        if (mwm_hints->decorations & MWM_DECOR_MINIMIZE) {
# ifdef DEBUG
            fprintf(stderr,"MINIMIZE ");
# endif
            WSETUFLAG(wwin, no_miniaturize_button, 0);
            WSETUFLAG(wwin, no_miniaturizable, 0);
        }
        /*
         if (mwm_hints->decorations & MWM_DECOR_MAXIMIZE) {
         # ifdef DEBUG
         fprintf(stderr,"(MAXIMIZE) ");
         # endif
         }
         */
# ifdef DEBUG
        fprintf(stderr,"]\n");
# endif
    }


    if (mwm_hints->flags & MWM_HINTS_FUNCTIONS) {
# ifdef DEBUG
        fprintf(stderr,"has function hints [ ");
# endif
        WSETUFLAG(wwin, no_closable, 1);
        WSETUFLAG(wwin, no_miniaturizable, 1);
        WSETUFLAG(wwin, no_resizable, 1);

        if (mwm_hints->functions & MWM_FUNC_ALL) {
# ifdef DEBUG
            fprintf(stderr,"ALL ");
# endif
            WSETUFLAG(wwin, no_closable, 0);
            WSETUFLAG(wwin, no_miniaturizable, 0);
            WSETUFLAG(wwin, no_resizable, 0);
        }
        if (mwm_hints->functions & MWM_FUNC_RESIZE) {
# ifdef DEBUG
            fprintf(stderr,"RESIZE ");
# endif
            WSETUFLAG(wwin, no_resizable, 0);
        }
        /*
         if (mwm_hints->functions & MWM_FUNC_MOVE) {
         # ifdef DEBUG
         fprintf(stderr,"(MOVE) ");
         # endif
         }
         */
        if (mwm_hints->functions & MWM_FUNC_MINIMIZE) {
# ifdef DEBUG
            fprintf(stderr,"MINIMIZE ");
# endif
            WSETUFLAG(wwin, no_miniaturizable, 0);
        }
        if (mwm_hints->functions & MWM_FUNC_MAXIMIZE) {
# ifdef DEBUG
            fprintf(stderr,"MAXIMIZE ");
            /* a window must be resizable to be maximizable */
            WSETUFLAG(wwin, no_resizable, 0);
# endif
        }
        if (mwm_hints->functions & MWM_FUNC_CLOSE) {
# ifdef DEBUG
            fprintf(stderr,"CLOSE ");
# endif
            WSETUFLAG(wwin, no_closable, 0);
        }
# ifdef DEBUG
        fprintf(stderr,"]\n");
# endif
    }
}


static int
getMWMHints(Window window, MWMHints *mwmhints)
{
    unsigned long *data;
    int count;

    if (!_XA_MOTIF_WM_HINTS) {
        _XA_MOTIF_WM_HINTS = XInternAtom(dpy, "_MOTIF_WM_HINTS", False);
    }

    data = (unsigned long*)PropGetCheckProperty(window, _XA_MOTIF_WM_HINTS,
                                                _XA_MOTIF_WM_HINTS, 32,
                                                0, &count);

    if (!data)
        return 0;

    if (count >= 4) {
        mwmhints->flags = data[0];
        mwmhints->functions = data[1];
        mwmhints->decorations = data[2];
        mwmhints->inputMode = data[3];
        if (count > 5)
            mwmhints->unknown = data[4];
    }
    XFree(data);

    return 1;
}


void
wMWMCheckClientHints(WWindow *wwin)
{
    MWMHints hints;

    if (getMWMHints(wwin->client_win, &hints)) {
        setupMWMHints(wwin, &hints);
    }
}



#endif /* MWM_HINTS */