Subversion Repositories or1k

/*

 * tkUnixPort.h --

 *

 *      This file is included by all of the Tk C files.  It contains

 *      information that may be configuration-dependent, such as

 *      #includes for system include files and a few other things.

 *

 * Copyright (c) 1991-1993 The Regents of the University of California.

 * Copyright (c) 1994-1996 Sun Microsystems, Inc.

 * Copyright (c) 1998 by Scriptics Corporation.

 *

 * See the file "license.terms" for information on usage and redistribution

 * of this file, and for a DISCLAIMER OF ALL WARRANTIES.

 *

 * RCS: @(#) $Id: tkUnixPort.h,v 1.1.1.1 2002-01-16 10:26:01 markom Exp $

 */

#ifndef _UNIXPORT

#define _UNIXPORT

#define __UNIX__ 1

/*

 * Macro to use instead of "void" for arguments that must have

 * type "void *" in ANSI C;  maps them to type "char *" in

 * non-ANSI systems.  This macro may be used in some of the include

 * files below, which is why it is defined here.

 */

#ifndef VOID

#   ifdef __STDC__

#       define VOID void

#   else

#       define VOID char

#   endif

#endif

#include <stdio.h>

#include <ctype.h>

#include <fcntl.h>

#ifdef HAVE_LIMITS_H

#   include <limits.h>

#else

#   include "../compat/limits.h"

#endif

#include <math.h>

#include <pwd.h>

#ifdef NO_STDLIB_H

#   include "../compat/stdlib.h"

#else

#   include <stdlib.h>

#endif

/* CYGNUS LOCAL: Don't include the system string.h if we've already

   included tcl/compat/string.h.  Otherwise you can't include both

   tclInt.h and tkInt.h (not that you should anyhow, but some SN code

   does).  */

#ifndef _STRING

#   include <string.h>

#endif

#include <sys/types.h>

#include <sys/file.h>

#ifdef HAVE_SYS_SELECT_H

#   include <sys/select.h>

#endif

#include <sys/stat.h>

#ifndef _TCL

#   include <tcl.h>

#endif

#if TIME_WITH_SYS_TIME

#   include <sys/time.h>

#   include <time.h>

#else

#   if HAVE_SYS_TIME_H

#       include <sys/time.h>

#   else

#       include <time.h>

#   endif

#endif

#ifdef HAVE_UNISTD_H

#   include <unistd.h>

#else

#   include "../compat/unistd.h"

#endif

#include <X11/Xlib.h>

#include <X11/cursorfont.h>

#include <X11/keysym.h>

#include <X11/Xatom.h>

#include <X11/Xproto.h>

#include <X11/Xresource.h>

#include <X11/Xutil.h>

/*

 * The following macro defines the type of the mask arguments to

 * select:

 */

#ifndef NO_FD_SET

#   define SELECT_MASK fd_set

#else

#   ifndef _AIX

        typedef long fd_mask;

#   endif

#   if defined(_IBMR2)

#       define SELECT_MASK void

#   else

#       define SELECT_MASK int

#   endif

#endif

/*

 * The following macro defines the number of fd_masks in an fd_set:

 */

#ifndef FD_SETSIZE

#   ifdef OPEN_MAX

#       define FD_SETSIZE OPEN_MAX

#   else

#       define FD_SETSIZE 256

#   endif

#endif

#if !defined(howmany)

#   define howmany(x, y) (((x)+((y)-1))/(y))

#endif

#ifndef NFDBITS

#   define NFDBITS NBBY*sizeof(fd_mask)

#endif

#define MASK_SIZE howmany(FD_SETSIZE, NFDBITS)

/*

 * Not all systems declare the errno variable in errno.h. so this

 * file does it explicitly.

 */

extern int errno;

/*

 * Define "NBBY" (number of bits per byte) if it's not already defined.

 */

#ifndef NBBY

#   define NBBY 8

#endif

/*

 * These macros are just wrappers for the equivalent X Region calls.

 */

#define TkClipBox(rgn, rect) XClipBox((Region) rgn, rect)

#define TkCreateRegion() (TkRegion) XCreateRegion()

#define TkDestroyRegion(rgn) XDestroyRegion((Region) rgn)

#define TkIntersectRegion(a, b, r) XIntersectRegion((Region) a, \

        (Region) b, (Region) r)

#define TkRectInRegion(r, x, y, w, h) XRectInRegion((Region) r, x, y, w, h)

#define TkSetRegion(d, gc, rgn) XSetRegion(d, gc, (Region) rgn)

#define TkUnionRectWithRegion(rect, src, ret) XUnionRectWithRegion(rect, \

        (Region) src, (Region) ret)

/*

 * The TkPutImage macro strips off the color table information, which isn't

 * needed for X.

 */

#define TkPutImage(colors, ncolors, display, pixels, gc, image, destx, desty, srcx, srcy, width, height) \

        XPutImage(display, pixels, gc, image, destx, desty, srcx, \

        srcy, width, height);

/*

 * Supply macros for seek offsets, if they're not already provided by

 * an include file.

 */

#ifndef SEEK_SET

#   define SEEK_SET 0

#endif

#ifndef SEEK_CUR

#   define SEEK_CUR 1

#endif

#ifndef SEEK_END

#   define SEEK_END 2

#endif

/*

 * Declarations for various library procedures that may not be declared

 * in any other header file.

 */

extern void             panic _ANSI_ARGS_(TCL_VARARGS(char *, string));

/*

 * These functions do nothing under Unix, so we just eliminate calls to them.

 */

#define TkpDestroyButton(butPtr) {}

#define TkSelUpdateClipboard(a,b) {}

#define TkSetPixmapColormap(p,c) {}

/*

 * These calls implement native bitmaps which are not supported under

 * UNIX.  The macros eliminate the calls.

 */

#define TkpDefineNativeBitmaps()

#define TkpCreateNativeBitmap(display, source) None

#define TkpGetNativeAppBitmap(display, name, w, h) None

/*

 * This macro stores a representation of the window handle in a string.

 */

#define TkpPrintWindowId(buf,w) \

        sprintf((buf), "0x%x", (unsigned int) (w))

/*

 * TkpScanWindowId is just an alias for Tcl_GetInt on Unix.

 */

#define TkpScanWindowId(i,s,wp) \

        Tcl_GetInt((i),(s),(wp))

/*

 * This macro indicates that entry and text widgets should display

 * the selection highlight regardless of which window has the focus.

 */

#define ALWAYS_SHOW_SELECTION

/*

 * The following declaration is used to get access to a private Tcl interface

 * that is needed for portability reasons.

 */

EXTERN void             TclpGetTime _ANSI_ARGS_((Tcl_Time *time));

#endif /* _UNIXPORT */