fdo-mirrors/mesa
1
0
Fork 0
mirror of https://gitlab.freedesktop.org/mesa/mesa.git synced 2026-05-08 13:28:06 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Remove OpenVMS support

Browse source 
Not maintained since 2008. Doubtful that it's worked in quite a while.

Also see commit 32ac8cb05 which removed VMS stuff from Makefile in 2009.

Cc: Jouk Jansen <j.jansen@tudelft.nl>
Reviewed-by: Brian Paul <brianp@vmware.com>
Signed-off-by: Andreas Boll <andreas.boll.dev@gmail.com>
This commit is contained in:
Matt Turner 2012-08-22 18:44:54 -07:00 • committed by Andreas Boll
parent 900f5eb7a8
commit 1f82bf12ed
27 changed files with 4 additions and 2313 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

38
docs/README.VMS
View file

@ -1,38 +0,0 @@
VMS support contributed by Jouk Jansen (joukj@hrem.stm.tudelft.nl)
The latest version was tested on a VMSAlpha7.2 system using DECC6.0, but
probably also works for other versions.
At the moment only the libraries LIBMESGL.EXE/LIBMESGL.OLB,
LIBMESAGLU.EXE/LIBMESAGLU.OLB and LIBGLUT.EXE/LIBGLUT.OLB and the demos of the
directory [.DEMOS] can be build.
However, feel free to create the missing "decrip.mms-files" in the other
directories.
The make files were tested
using the DIGITAL make utility called MMS. There is also a public domain
clone available (MMK) and I think, but it is not tested, that this
utility will give (hardly) any problem.
To make everything just type MMS (or MMK) in the main directory of
mesagl. For MMS the deafult makefile is called descrip.mms, and
that is what I have called it. I included alse some config files,
all having mms somewhere in the name which all the makefiles need
(just as your unix makefiles).
On Alpha platforms at default a sharable images for the libraries are created.
To get a static library make it by typing MMS/MACRO=(NOSHARE=1).
On VAX platforms only static libraries can be build.
23-sep-2005
changed default compilation to use /float=ieee/ieee=denorm. The reason for
this is that it makes Mesa on OpenVMS better compatible with other platforms
and other packages for VMS that I maintain.
For more information see
http://nchrem.tnw.tudelft.nl/openvms
https://bugs.freedesktop.org/show_bug.cgi?id=4270
You may want to compile Mesa to use VAX-floating point arithmetic, instead
of IEEE floating point by removing the /float=IEEE/denorm flag from the
compiler options in the descrip.mms files.

13
include/GL/glx.h
View file

@ -27,21 +27,8 @@
#define GLX_H #define GLX_H
#ifdef __VMS
#include <GL/vms_x_fix.h>
# ifdef __cplusplus
/* VMS Xlib.h gives problems with C++.
* this avoids a bunch of trivial warnings */
#pragma message disable nosimpint
#endif
#endif
#include <X11/Xlib.h> #include <X11/Xlib.h>
#include <X11/Xutil.h> #include <X11/Xutil.h>
#ifdef __VMS
# ifdef __cplusplus
#pragma message enable nosimpint
#endif
#endif
#include <GL/gl.h> #include <GL/gl.h>

1224
include/GL/vms_x_fix.h
View file

File diff suppressed because it is too large Load diff

4
src/egl/main/eglcompiler.h
View file

@ -110,9 +110,7 @@
* Don't define it if using a newer Windows compiler. * Don't define it if using a newer Windows compiler.
*/ */
#ifndef __FUNCTION__ #ifndef __FUNCTION__
# if defined(__VMS) # if (!defined __GNUC__) && (!defined __xlC__) && \
# define __FUNCTION__ "VMS$NL:"
# elif (!defined __GNUC__) && (!defined __xlC__) && \
(!defined(_MSC_VER) || _MSC_VER < 1300) (!defined(_MSC_VER) || _MSC_VER < 1300)
# if (__STDC_VERSION__ >= 199901L) /* C99 */ || \ # if (__STDC_VERSION__ >= 199901L) /* C99 */ || \
(defined(__SUNPRO_C) && defined(__C99FEATURES__)) (defined(__SUNPRO_C) && defined(__C99FEATURES__))

27
src/mesa/descrip.mms
View file

@ -1,27 +0,0 @@
# Makefile for Mesa for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Date last revision : 7 March 2007
all :
set default [.main]
$(MMS)$(MMSQUALIFIERS)
set default [-.glapi]
$(MMS)$(MMSQUALIFIERS)
set default [-.shader]
$(MMS)$(MMSQUALIFIERS)
set default [-.drivers.common]
$(MMS)$(MMSQUALIFIERS)
set default [-.x11]
$(MMS)$(MMSQUALIFIERS)
set default [-.osmesa]
$(MMS)$(MMSQUALIFIERS)
set default [--.math]
$(MMS)$(MMSQUALIFIERS)
set default [-.tnl]
$(MMS)$(MMSQUALIFIERS)
set default [-.swrast]
$(MMS)$(MMSQUALIFIERS)
set default [-.swrast_setup]
$(MMS)$(MMSQUALIFIERS)
set default [-.vbo]
$(MMS)$(MMSQUALIFIERS)

42
src/mesa/drivers/common/descrip.mms
View file

@ -1,42 +0,0 @@
# Makefile for core library for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Last revision : 29 September 2008
.first
define gl [----.include.gl]
define math [--.math]
define tnl [--.tnl]
define swrast [--.swrast]
define glapi [--.glapi]
define shader [--.shader]
define main [--.main]
.include [----]mms-config.
##### MACROS #####
VPATH = RCS
INCDIR = [----.include],[--.main],[--.glapi],[--.shader]
LIBDIR = [----.lib]
CFLAGS = /include=($(INCDIR),[])/define=(PTHREADS=1)/name=(as_is,short)\
/float=ieee/ieee=denorm/warn=disable=(PTRMISMATCH)
SOURCES = driverfuncs.c
OBJECTS =driverfuncs.obj
##### RULES #####
VERSION=Mesa V3.4
##### TARGETS #####
# Make the library
$(LIBDIR)$(GL_LIB) : $(OBJECTS)
@ library $(LIBDIR)$(GL_LIB) $(OBJECTS)
clean :
purge
delete *.obj;*
driverfuncs.obj : driverfuncs.c

45
src/mesa/drivers/osmesa/descrip.mms
View file

@ -1,45 +0,0 @@
# Makefile for core library for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Last revision : 3 October 2007
.first
define gl [----.include.gl]
define math [--.math]
define tnl [--.tnl]
define vbo [--.vbo]
define swrast [--.swrast]
define swrast_setup [--.swrast_setup]
define array_cache [--.array_cache]
define drivers [-]
define glapi [--.glapi]
define main [--.main]
define shader [--.shader]
.include [----]mms-config.
##### MACROS #####
VPATH = RCS
INCDIR = [----.include],[--.main],[--.glapi],[--.shader]
LIBDIR = [----.lib]
CFLAGS = /include=($(INCDIR),[])/define=(PTHREADS=1)/name=(as_is,short)/float=ieee/ieee=denorm
SOURCES = osmesa.c
OBJECTS = osmesa.obj
##### RULES #####
VERSION=Mesa V3.4
##### TARGETS #####
# Make the library
$(LIBDIR)$(GL_LIB) : $(OBJECTS)
@ library $(LIBDIR)$(GL_LIB) $(OBJECTS)
clean :
purge
delete *.obj;*
osmesa.obj : osmesa.c

55
src/mesa/drivers/x11/descrip.mms
View file

@ -1,55 +0,0 @@
# Makefile for core library for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Last revision : 3 October 2007
.first
define gl [----.include.gl]
define math [--.math]
define tnl [--.tnl]
define vbo [--.vbo]
define swrast [--.swrast]
define swrast_setup [--.swrast_setup]
define array_cache [--.array_cache]
define drivers [-]
define glapi [--.glapi]
define main [--.main]
define shader [--.shader]
.include [----]mms-config.
##### MACROS #####
VPATH = RCS
INCDIR = [----.include],[--.main],[--.glapi],[--.shader]
LIBDIR = [----.lib]
CFLAGS =/include=($(INCDIR),[])/define=(PTHREADS=1)/name=(as_is,short)/float=ieee/ieee=denorm
SOURCES = fakeglx.c glxapi.c xfonts.c xm_api.c xm_dd.c xm_line.c xm_span.c\
xm_tri.c xm_buffer.c
OBJECTS =fakeglx.obj,glxapi.obj,xfonts.obj,xm_api.obj,xm_dd.obj,xm_line.obj,\
xm_span.obj,xm_tri.obj,xm_buffer.obj
##### RULES #####
VERSION=Mesa V3.4
##### TARGETS #####
# Make the library
$(LIBDIR)$(GL_LIB) : $(OBJECTS)
@ library $(LIBDIR)$(GL_LIB) $(OBJECTS)
clean :
purge
delete *.obj;*
fakeglx.obj : fakeglx.c
glxapi.obj : glxapi.c
xfonts.obj : xfonts.c
xm_api.obj : xm_api.c
xm_buffer.obj : xm_buffer.c
xm_dd.obj : xm_dd.c
xm_line.obj : xm_line.c
xm_span.obj : xm_span.c
xm_tri.obj : xm_tri.c

4
src/mesa/drivers/x11/fakeglx.c
View file

@ -52,10 +52,6 @@
#include "xfonts.h" #include "xfonts.h"
#include "xmesaP.h" #include "xmesaP.h"
#ifdef __VMS
#define sprintf sprintf
#endif
/* This indicates the client-side GLX API and GLX encoder version. */ /* This indicates the client-side GLX API and GLX encoder version. */
#define CLIENT_MAJOR_VERSION 1 #define CLIENT_MAJOR_VERSION 1
#define CLIENT_MINOR_VERSION 4 /* but don't have 1.3's pbuffers, etc yet */ #define CLIENT_MINOR_VERSION 4 /* but don't have 1.3's pbuffers, etc yet */

4
src/mesa/drivers/x11/glxheader.h
View file

@ -26,10 +26,6 @@
#ifndef GLX_HEADER_H #ifndef GLX_HEADER_H
#define GLX_HEADER_H #define GLX_HEADER_H
#ifdef __VMS
#include <GL/vms_x_fix.h>
#endif
#include "main/glheader.h" #include "main/glheader.h"

4
src/mesa/drivers/x11/xfonts.c
View file

@ -28,10 +28,6 @@
* Copyright (C) 1995 Thorsten.Ohl @ Physik.TH-Darmstadt.de * Copyright (C) 1995 Thorsten.Ohl @ Physik.TH-Darmstadt.de
*/ */
#ifdef __VMS
#include <GL/vms_x_fix.h>
#endif
#include "glxheader.h" #include "glxheader.h"
#include "main/context.h" #include "main/context.h"
#include "main/imports.h" #include "main/imports.h"

4
src/mesa/drivers/x11/xfonts.h
View file

@ -27,10 +27,6 @@
#ifndef XFONTS_H #ifndef XFONTS_H
#define XFONTS_H #define XFONTS_H
#ifdef __VMS
#include <GL/vms_x_fix.h>
#endif
#include <X11/Xlib.h> #include <X11/Xlib.h>

3
src/mesa/drivers/x11/xm_dd.c
View file

@ -803,9 +803,6 @@ xmesa_begin_query(struct gl_context *ctx, struct gl_query_object *q)
/** /**
* Return the difference between the two given times in microseconds. * Return the difference between the two given times in microseconds.
*/ */
#ifdef __VMS
#define suseconds_t unsigned int
#endif
static GLuint64EXT static GLuint64EXT
time_diff(const struct timeval *t0, const struct timeval *t1) time_diff(const struct timeval *t0, const struct timeval *t1)
{ {

4
src/mesa/drivers/x11/xmesa.h
View file

@ -64,10 +64,6 @@ and create a window, you must do the following to use the X/Mesa interface:
#ifndef XMESA_H #ifndef XMESA_H
#define XMESA_H #define XMESA_H
#ifdef __VMS
#include <GL/vms_x_fix.h>
#endif
#ifdef __cplusplus #ifdef __cplusplus
extern "C" { extern "C" {
#endif #endif

6
src/mesa/main/compiler.h
View file

@ -183,9 +183,7 @@ extern "C" {
* Don't define it if using a newer Windows compiler. * Don't define it if using a newer Windows compiler.
*/ */
#ifndef __FUNCTION__ #ifndef __FUNCTION__
# if defined(__VMS) # if !defined(__GNUC__) && !defined(__xlC__) && \
# define __FUNCTION__ "VMS$NL:"
# elif !defined(__GNUC__) && !defined(__xlC__) && \
(!defined(_MSC_VER) || _MSC_VER < 1300) (!defined(_MSC_VER) || _MSC_VER < 1300)
# if (__STDC_VERSION__ >= 199901L) /* C99 */ || \ # if (__STDC_VERSION__ >= 199901L) /* C99 */ || \
(defined(__SUNPRO_C) && defined(__C99FEATURES__)) (defined(__SUNPRO_C) && defined(__C99FEATURES__))
@ -363,7 +361,7 @@ static INLINE GLuint CPU_TO_LE32(GLuint x)
defined(__arm__) || \ defined(__arm__) || \
defined(__sh__) || defined(__m32r__) || \ defined(__sh__) || defined(__m32r__) || \
(defined(__sun) && defined(_IEEE_754)) || \ (defined(__sun) && defined(_IEEE_754)) || \
(defined(__alpha__) && (defined(__IEEE_FLOAT) || !defined(VMS))) (defined(__alpha__) && defined(__IEEE_FLOAT))
#define USE_IEEE #define USE_IEEE
#define IEEE_ONE 0x3f800000 #define IEEE_ONE 0x3f800000
#endif #endif

258
src/mesa/main/descrip.mms
View file

@ -1,258 +0,0 @@
# Makefile for core library for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Last revision : 29 September 2008
.first
define gl [---.include.gl]
define math [-.math]
define shader [-.shader]
define glapi [-.glapi]
define main [-.main]
.include [---]mms-config.
##### MACROS #####
VPATH = RCS
INCDIR = [---.include],[-.glapi],[-.shader]
LIBDIR = [---.lib]
CFLAGS = /include=($(INCDIR),[])/define=(PTHREADS=1)/name=(as_is,short)/float=ieee/ieee=denorm
SOURCES =accum.c \
api_arrayelt.c \
api_exec.c \
api_loopback.c \
api_noop.c \
api_validate.c \
attrib.c \
arrayobj.c \
blend.c \
bufferobj.c \
buffers.c \
clear.c \
clip.c \
colortab.c \
context.c \
convolve.c \
debug.c \
depth.c \
depthstencil.c \
dlist.c \
drawpix.c \
enable.c \
enums.c \
errors.c \
eval.c \
execmem.c \
extensions.c \
fbobject.c \
feedback.c \
ffvertex_prog.c \
fog.c \
framebuffer.c \
get.c \
getstring.c \
hash.c \
hint.c \
histogram.c \
image.c \
imports.c \
light.c \
lines.c \
matrix.c \
mipmap.c \
mm.c \
multisample.c \
pixel.c \
pixelstore.c \
points.c \
polygon.c \
rastpos.c \
rbadaptors.c \
readpix.c \
renderbuffer.c \
scissor.c \
shaders.c \
state.c \
stencil.c \
texcompress.c \
texcompress_fxt1.c \
texcompress_s3tc.c \
texenv.c \
texenvprogram.c \
texformat.c \
texgen.c \
teximage.c \
texobj.c \
texparam.c \
texrender.c \
texstate.c \
texstore.c \
varray.c \
vtxfmt.c \
queryobj.c \
rbadaptors.c
OBJECTS=accum.obj,\
api_arrayelt.obj,\
api_exec.obj,\
api_loopback.obj,\
api_noop.obj,\
api_validate.obj,\
arrayobj.obj,\
attrib.obj,\
blend.obj,\
bufferobj.obj,\
buffers.obj,\
clear.obj,\
clip.obj,\
colortab.obj,\
context.obj,\
convolve.obj,\
debug.obj,\
depth.obj,\
depthstencil.obj,\
dlist.obj,\
drawpix.obj,\
enable.obj,\
enums.obj,\
errors.obj,\
eval.obj,\
execmem.obj,\
extensions.obj,\
fbobject.obj,\
feedback.obj,\
ffvertex_prog.obj,\
fog.obj,\
framebuffer.obj,\
get.obj,\
getstring.obj,\
hash.obj,\
hint.obj,\
histogram.obj,\
image.obj,\
imports.obj,\
light.obj,\
lines.obj,\
matrix.obj,\
mipmap.obj,\
mm.obj,\
multisample.obj,\
pixel.obj,\
pixelstore.obj,\
points.obj,\
polygon.obj,\
rastpos.obj,\
readpix.obj,\
renderbuffer.obj,\
scissor.obj,\
shaders.obj,\
state.obj,\
stencil.obj,\
texcompress.obj,\
texcompress_fxt1.obj,\
texcompress_s3tc.obj,\
texenv.obj,\
texenvprogram.obj,\
texformat.obj,\
texgen.obj,\
teximage.obj,\
texobj.obj,\
texparam.obj,\
texrender.obj,\
texstate.obj,\
texstore.obj,\
varray.obj,\
vtxfmt.obj,\
queryobj.obj,\
rbadaptors.obj
##### RULES #####
VERSION=Mesa V3.4
##### TARGETS #####
# Make the library
$(LIBDIR)$(GL_LIB) : $(OBJECTS)
@ $(MAKELIB) $(LIBDIR)$(GL_LIB) $(OBJECTS)
clean :
purge
delete *.obj;*
accum.obj : accum.c
api_arrayelt.obj : api_arrayelt.c
api_loopback.obj : api_loopback.c
api_noop.obj : api_noop.c
api_validate.obj : api_validate.c
arrayobj.obj : arrayobj.c
attrib.obj : attrib.c
blend.obj : blend.c
bufferobj.obj : bufferobj.c
buffers.obj : buffers.c
clip.obj : clip.c
colortab.obj : colortab.c
context.obj : context.c
convolve.obj : convolve.c
debug.obj : debug.c
depth.obj : depth.c
depthstencil.obj : depthstencil.c
dlist.obj : dlist.c
drawpix.obj : drawpix.c
enable.obj : enable.c
enums.obj : enums.c
errors.obj : errors.c
eval.obj : eval.c
execmem.obj : execmem.c
extensions.obj : extensions.c
fbobject.obj : fbobject.c
feedback.obj : feedback.c
fog.obj : fog.c
framebuffer.obj : framebuffer.c
get.obj : get.c
getstring.obj : getstring.c
hash.obj : hash.c
hint.obj : hint.c
histogram.obj : histogram.c
image.obj : image.c
imports.obj : imports.c vsnprintf.c
light.obj : light.c
lines.obj : lines.c
matrix.obj : matrix.c
mipmap.obj : mipmap.c
mm.obj : mm.c
pixel.obj : pixel.c
points.obj : points.c
polygon.obj : polygon.c
rastpos.obj : rastpos.c
rbadaptors.obj : rbadaptors.c
renderbuffer.obj : renderbuffer.c
state.obj : state.c
stencil.obj : stencil.c
texcompress.obj : texcompress.c
texcompress_fxt1.obj : texcompress_fxt1.c
cc$(CFLAGS)/warn=(disable=SHIFTCOUNT) texcompress_fxt1.c
texcompress_s3tc.obj : texcompress_s3tc.c
texenvprogram.obj : texenvprogram.c
texformat.obj : texformat.c
teximage.obj : teximage.c
texobj.obj : texobj.c
texrender.obj : texrender.c
texstate.obj : texstate.c
texstore.obj : texstore.c
varray.obj : varray.c
vtxfmt.obj : vtxfmt.c
shaders.obj : shaders.c
queryobj.obj : queryobj.c
rbadaptors.obj : rbadaptors.c
clear.obj : clear.c
multisample.obj : multisample.c
scissor.obj : scissor.c
texenv.obj : texenv.c
texgen.obj : texgen.c
texparam.obj : texparam.c
readpix.obj : readpix.c
ffvertex_prog.obj : ffvertex_prog.c
api_exec.obj : api_exec.c
pixelstore.obj : pixelstore.c

5
src/mesa/main/imports.c
View file

@ -59,11 +59,8 @@
#ifdef _WIN32 #ifdef _WIN32
#define vsnprintf _vsnprintf #define vsnprintf _vsnprintf
#elif defined(__IBMC__) || defined(__IBMCPP__) || ( defined(__VMS) && __CRTL_VER < 70312000 ) #elif defined(__IBMC__) || defined(__IBMCPP__)
extern int vsnprintf(char *str, size_t count, const char *fmt, va_list arg); extern int vsnprintf(char *str, size_t count, const char *fmt, va_list arg);
#ifdef __VMS
#include "vsnprintf.c"
#endif
#endif #endif
/**********************************************************************/ /**********************************************************************/

2
src/mesa/main/imports.h
View file

@ -214,8 +214,6 @@ static inline int IS_INF_OR_NAN( float x )
#define IS_INF_OR_NAN(x) (!isfinite(x)) #define IS_INF_OR_NAN(x) (!isfinite(x))
#elif defined(finite) #elif defined(finite)
#define IS_INF_OR_NAN(x) (!finite(x)) #define IS_INF_OR_NAN(x) (!finite(x))
#elif defined(__VMS)
#define IS_INF_OR_NAN(x) (!finite(x))
#elif defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L #elif defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
#define IS_INF_OR_NAN(x) (!isfinite(x)) #define IS_INF_OR_NAN(x) (!isfinite(x))
#else #else

5
src/mesa/main/teximage.h
View file

@ -268,11 +268,6 @@ _mesa_CompressedTexImage3D(GLenum target, GLint level,
GLsizei height, GLsizei depth, GLint border, GLsizei height, GLsizei depth, GLint border,
GLsizei imageSize, const GLvoid *data); GLsizei imageSize, const GLvoid *data);
#ifdef VMS
#define _mesa_CompressedTexSubImage1D _mesa_CompressedTexSubImage1DAR
#define _mesa_CompressedTexSubImage2D _mesa_CompressedTexSubImage2DAR
#define _mesa_CompressedTexSubImage3D _mesa_CompressedTexSubImage3DAR
#endif
extern void GLAPIENTRY extern void GLAPIENTRY
_mesa_CompressedTexSubImage1D(GLenum target, GLint level, GLint xoffset, _mesa_CompressedTexSubImage1D(GLenum target, GLint level, GLint xoffset,
GLsizei width, GLenum format, GLsizei width, GLenum format,

165
src/mesa/main/vsnprintf.c
View file

@ -1,165 +0,0 @@
/*
* Revision 12: http://theos.com/~deraadt/snprintf.c
*
* Copyright (c) 1997 Theo de Raadt
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
#ifndef __VMS
# include <sys/param.h>
#endif
#include <sys/types.h>
#include <sys/mman.h>
#include <signal.h>
#include <stdio.h>
#if __STDC__
#include <stdarg.h>
#include <stdlib.h>
#else
#include <varargs.h>
#endif
#include <setjmp.h>
#include <unistd.h>
#include <string.h>
#ifndef roundup
#define roundup(x, y) ((((x)+((y)-1))/(y))*(y))
#endif
#ifdef __sgi
#define size_t ssize_t
#endif
static int pgsize;
static char *curobj;
static int caught;
static sigjmp_buf bail;
#define EXTRABYTES 2 /* XXX: why 2? you don't want to know */
static char *
msetup(str, n)
char *str;
size_t n;
{
char *e;
if (n == 0)
return NULL;
if (pgsize == 0)
pgsize = getpagesize();
curobj = malloc(n + EXTRABYTES + pgsize * 2);
if (curobj == NULL)
return NULL;
e = curobj + n + EXTRABYTES;
e = (char *)roundup((unsigned long)e, pgsize);
if (mprotect(e, pgsize, PROT_NONE) == -1) {
free(curobj);
curobj = NULL;
return NULL;
}
e = e - n - EXTRABYTES;
*e = '\0';
return (e);
}
static void
mcatch( int a )
{
siglongjmp(bail, 1);
}
static void
mcleanup(str, n, p)
char *str;
size_t n;
char *p;
{
strncpy(str, p, n-1);
str[n-1] = '\0';
if (mprotect((caddr_t)(p + n + EXTRABYTES), pgsize,
PROT_READ|PROT_WRITE|PROT_EXEC) == -1)
mprotect((caddr_t)(p + n + EXTRABYTES), pgsize,
PROT_READ|PROT_WRITE);
free(curobj);
}
int
#if __STDC__
vsnprintf(char *str, size_t n, char const *fmt, va_list ap)
#else
vsnprintf(str, n, fmt, ap)
char *str;
size_t n;
char *fmt;
char *ap;
#endif
{
struct sigaction osa, nsa;
char *p;
int ret = n + 1; /* if we bail, indicated we overflowed */
memset(&nsa, 0, sizeof nsa);
nsa.sa_handler = mcatch;
sigemptyset(&nsa.sa_mask);
p = msetup(str, n);
if (p == NULL) {
*str = '\0';
return 0;
}
if (sigsetjmp(bail, 1) == 0) {
if (sigaction(SIGSEGV, &nsa, &osa) == -1) {
mcleanup(str, n, p);
return (0);
}
ret = vsprintf(p, fmt, ap);
}
mcleanup(str, n, p);
(void) sigaction(SIGSEGV, &osa, NULL);
return (ret);
}
int
#if __STDC__
snprintf(char *str, size_t n, char const *fmt, ...)
#else
snprintf(str, n, fmt, va_alist)
char *str;
size_t n;
char *fmt;
va_dcl
#endif
{
va_list ap;
#if __STDC__
va_start(ap, fmt);
#else
va_start(ap);
#endif
return (vsnprintf(str, n, fmt, ap));
va_end(ap);
}

47
src/mesa/math/descrip.mms
View file

@ -1,47 +0,0 @@
# Makefile for core library for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Last revision : 3 October 2007
.first
define gl [---.include.gl]
define math [-.math]
define glapi [-.glapi]
define main [-.main]
.include [---]mms-config.
##### MACROS #####
VPATH = RCS
INCDIR = [---.include],[-.main],[-.glapi]
LIBDIR = [---.lib]
CFLAGS = /include=($(INCDIR),[])/define=(PTHREADS=1)/name=(as_is,short)/float=ieee/ieee=denorm
SOURCES = m_debug_clip.c m_debug_norm.c m_debug_xform.c m_eval.c m_matrix.c\
m_translate.c m_vector.c m_xform.c
OBJECTS = m_debug_clip.obj,m_debug_norm.obj,m_debug_xform.obj,m_eval.obj,\
m_matrix.obj,m_translate.obj,m_vector.obj,m_xform.obj
##### RULES #####
VERSION=Mesa V3.4
##### TARGETS #####
# Make the library
$(LIBDIR)$(GL_LIB) : $(OBJECTS)
@ library $(LIBDIR)$(GL_LIB) $(OBJECTS)
clean :
purge
delete *.obj;*
m_debug_clip.obj : m_debug_clip.c
m_debug_norm.obj : m_debug_norm.c
m_debug_xform.obj : m_debug_xform.c
m_eval.obj : m_eval.c
m_matrix.obj : m_matrix.c
m_translate.obj : m_translate.c
m_vector.obj : m_vector.c
m_xform.obj : m_xform.c

93
src/mesa/program/descrip.mms
View file

@ -1,93 +0,0 @@
# Makefile for core library for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Last revision : 29 September 2008
.first
define gl [---.include.gl]
define math [-.math]
define swrast [-.swrast]
define array_cache [-.array_cache]
define glapi [-.glapi]
define main [-.main]
define shader [-.shader]
.include [---]mms-config.
##### MACROS #####
VPATH = RCS
INCDIR = [---.include],[-.main],[-.glapi],[.slang]
LIBDIR = [---.lib]
CFLAGS = /include=($(INCDIR),[])/define=(PTHREADS=1,"__extension__=")/name=(as_is,short)/float=ieee/ieee=denorm
SOURCES = \
atifragshader.c \
arbprogparse.c \
arbprogram.c \
nvfragparse.c \
nvprogram.c \
nvvertparse.c \
program.c \
programopt.c \
prog_debug.c \
prog_execute.c \
prog_instruction.c \
prog_parameter.c \
prog_print.c \
prog_cache.c \
prog_statevars.c \
shader_api.c prog_uniform.c
OBJECTS = \
atifragshader.obj,\
arbprogparse.obj,\
arbprogram.obj,\
nvfragparse.obj,\
nvprogram.obj,\
nvvertparse.obj,\
program.obj,\
programopt.obj,\
prog_debug.obj,\
prog_execute.obj,\
prog_instruction.obj,\
prog_parameter.obj,\
prog_print.obj,\
prog_statevars.obj,\
shader_api.obj,prog_uniform.obj,prog_cache.obj
##### RULES #####
VERSION=Mesa V3.4
##### TARGETS #####
all :
$(MMS)$(MMSQUALIFIERS) $(LIBDIR)$(GL_LIB)
set def [.slang]
$(MMS)$(MMSQUALIFIERS)
set def [-]
# Make the library
$(LIBDIR)$(GL_LIB) : $(OBJECTS)
@ library $(LIBDIR)$(GL_LIB) $(OBJECTS)
clean :
purge
delete *.obj;*
atifragshader.obj : atifragshader.c
arbprogparse.obj : arbprogparse.c
arbprogram.obj : arbprogram.c
nvfragparse.obj : nvfragparse.c
nvprogram.obj : nvprogram.c
nvvertparse.obj : nvvertparse.c
program.obj : program.c
programopt. obj : programopt.c
prog_debug.obj : prog_debug.c
prog_execute.obj : prog_execute.c
prog_instruction.obj : prog_instruction.c
prog_parameter.obj : prog_parameter.c
prog_print.obj : prog_print.c
prog_statevars.obj : prog_statevars.c
shader_api.obj : shader_api.c
prog_uniform.obj : prog_uniform.c
prog_cache.obj : prog_cache.c

11
src/mesa/program/prog_execute.c
View file

@ -65,9 +65,6 @@
fi.i = 0xFF800000; \ fi.i = 0xFF800000; \
x = fi.f; \ x = fi.f; \
} while (0) } while (0)
#elif defined(VMS)
#define SET_POS_INFINITY(x) x = __MAXFLOAT
#define SET_NEG_INFINITY(x) x = -__MAXFLOAT
#else #else
#define SET_POS_INFINITY(x) x = (GLfloat) HUGE_VAL #define SET_POS_INFINITY(x) x = (GLfloat) HUGE_VAL
#define SET_NEG_INFINITY(x) x = (GLfloat) -HUGE_VAL #define SET_NEG_INFINITY(x) x = (GLfloat) -HUGE_VAL
@ -1027,15 +1024,7 @@ _mesa_execute_program(struct gl_context * ctx,
fetch_vector1(&inst->SrcReg[0], machine, t); fetch_vector1(&inst->SrcReg[0], machine, t);
abs_t0 = FABSF(t[0]); abs_t0 = FABSF(t[0]);
if (abs_t0 != 0.0F) { if (abs_t0 != 0.0F) {
/* Since we really can't handle infinite values on VMS
* like other OSes we'll use __MAXFLOAT to represent
* infinity. This may need some tweaking.
*/
#ifdef VMS
if (abs_t0 == __MAXFLOAT)
#else
if (IS_INF_OR_NAN(abs_t0)) if (IS_INF_OR_NAN(abs_t0))
#endif
{ {
SET_POS_INFINITY(q[0]); SET_POS_INFINITY(q[0]);
q[1] = 1.0F; q[1] = 1.0F;

82
src/mesa/swrast/descrip.mms
View file

@ -1,82 +0,0 @@
# Makefile for core library for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Last revision : 3 October 2007
.first
define gl [---.include.gl]
define math [-.math]
define swrast [-.swrast]
define array_cache [-.array_cache]
define glapi [-.glapi]
define main [-.main]
define shader [-.shader]
.include [---]mms-config.
##### MACROS #####
VPATH = RCS
INCDIR = [---.include],[-.main],[-.glapi],[-.shader],[-.shader.slang]
LIBDIR = [---.lib]
CFLAGS = /include=($(INCDIR),[])/define=(PTHREADS=1)/name=(as_is,short)/float=ieee/ieee=denorm
SOURCES = s_aaline.c s_aatriangle.c s_accum.c s_alpha.c \
s_bitmap.c s_blend.c s_blit.c s_buffers.c s_context.c \
s_copypix.c s_depth.c s_fragprog.c \
s_drawpix.c s_feedback.c s_fog.c s_imaging.c s_lines.c s_logic.c \
s_masking.c s_points.c s_readpix.c \
s_span.c s_stencil.c s_texstore.c s_texcombine.c s_texfilter.c \
s_triangle.c s_zoom.c s_atifragshader.c
OBJECTS = s_aaline.obj,s_aatriangle.obj,s_accum.obj,s_alpha.obj,\
s_bitmap.obj,s_blend.obj,s_blit.obj,s_fragprog.obj,\
s_buffers.obj,s_context.obj,s_atifragshader.obj,\
s_copypix.obj,s_depth.obj,s_drawpix.obj,s_feedback.obj,s_fog.obj,\
s_imaging.obj,s_lines.obj,s_logic.obj,s_masking.obj,\
s_points.obj,s_readpix.obj,s_span.obj,s_stencil.obj,\
s_texstore.obj,s_texcombine.obj,s_texfilter.obj,s_triangle.obj,\
s_zoom.obj
##### RULES #####
VERSION=Mesa V3.4
##### TARGETS #####
# Make the library
$(LIBDIR)$(GL_LIB) : $(OBJECTS)
@ library $(LIBDIR)$(GL_LIB) $(OBJECTS)
clean :
purge
delete *.obj;*
s_atifragshader.obj : s_atifragshader.c
s_aaline.obj : s_aaline.c
s_aatriangle.obj : s_aatriangle.c
s_accum.obj : s_accum.c
s_alpha.obj : s_alpha.c
s_bitmap.obj : s_bitmap.c
s_blend.obj : s_blend.c
s_blit.obj : s_blit.c
s_buffers.obj : s_buffers.c
s_context.obj : s_context.c
s_copypix.obj : s_copypix.c
s_depth.obj : s_depth.c
s_drawpix.obj : s_drawpix.c
s_feedback.obj : s_feedback.c
s_fog.obj : s_fog.c
s_imaging.obj : s_imaging.c
s_lines.obj : s_lines.c
s_logic.obj : s_logic.c
s_masking.obj : s_masking.c
s_points.obj : s_points.c
s_readpix.obj : s_readpix.c
s_span.obj : s_span.c
s_stencil.obj : s_stencil.c
s_texstore.obj : s_texstore.c
s_texcombine.obj : s_texcombine.c
s_texfilter.obj : s_texfilter.c
s_triangle.obj : s_triangle.c
s_zoom.obj : s_zoom.c
s_fragprog.obj : s_fragprog.c

42
src/mesa/swrast_setup/descrip.mms
View file

@ -1,42 +0,0 @@
# Makefile for core library for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Last revision : 3 October 2007
.first
define gl [---.include.gl]
define math [-.math]
define tnl [-.tnl]
define vbo [-.vbo]
define swrast [-.swrast]
define array_cache [-.array_cache]
define glapi [-.glapi]
define main [-.main]
.include [---]mms-config.
##### MACROS #####
VPATH = RCS
INCDIR = [---.include],[-.main],[-.glapi]
LIBDIR = [---.lib]
CFLAGS = /include=($(INCDIR),[])/define=(PTHREADS=1)/name=(as_is,short)/float=ieee/ieee=denorm
SOURCES = ss_context.c ss_triangle.c
OBJECTS = ss_context.obj,ss_triangle.obj
##### RULES #####
VERSION=Mesa V3.4
##### TARGETS #####
# Make the library
$(LIBDIR)$(GL_LIB) : $(OBJECTS)
@ library $(LIBDIR)$(GL_LIB) $(OBJECTS)
clean :
purge
delete *.obj;*
ss_context.obj : ss_context.c
ss_triangle.obj : ss_triangle.c

68
src/mesa/tnl/descrip.mms
View file

@ -1,68 +0,0 @@
# Makefile for core library for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Last revision : 39 September 2008
.first
define gl [---.include.gl]
define math [-.math]
define vbo [-.vbo]
define shader [-.shader]
define swrast [-.swrast]
define array_cache [-.array_cache]
define main [-.main]
define glapi [-.glapi]
define tnl [-.tnl]
.include [---]mms-config.
##### MACROS #####
VPATH = RCS
INCDIR = [---.include],[-.main],[-.glapi],[-.shader],[-.shader.slang]
LIBDIR = [---.lib]
CFLAGS = /include=($(INCDIR),[])/define=(PTHREADS=1)/name=(as_is,short)/float=ieee/ieee=denorm
SOURCES = t_context.c t_draw.c \
t_pipeline.c t_vb_fog.c \
t_vb_light.c t_vb_normals.c t_vb_points.c t_vb_program.c \
t_vb_render.c t_vb_texgen.c t_vb_texmat.c t_vb_vertex.c \
t_vertex.c t_rasterpos.c\
t_vertex_generic.c t_vp_build.c
OBJECTS = t_context.obj,t_draw.obj,\
t_pipeline.obj,t_vb_fog.obj,t_vb_light.obj,t_vb_normals.obj,\
t_vb_points.obj,t_vb_program.obj,t_vb_render.obj,t_vb_texgen.obj,\
t_vb_texmat.obj,t_vb_vertex.obj,t_rasterpos.obj,\
t_vertex.obj,t_vertex_generic.obj,\
t_vp_build.obj
##### RULES #####
VERSION=Mesa V3.4
##### TARGETS #####
# Make the library
$(LIBDIR)$(GL_LIB) : $(OBJECTS)
@ library $(LIBDIR)$(GL_LIB) $(OBJECTS)
clean :
purge
delete *.obj;*
t_context.obj : t_context.c
t_draw.obj : t_draw.c
t_pipeline.obj : t_pipeline.c
t_vb_fog.obj : t_vb_fog.c
t_vb_light.obj : t_vb_light.c
t_vb_normals.obj : t_vb_normals.c
t_vb_points.obj : t_vb_points.c
t_vb_program.obj : t_vb_program.c
t_vb_render.obj : t_vb_render.c
t_vb_texgen.obj : t_vb_texgen.c
t_vb_texmat.obj : t_vb_texmat.c
t_vb_vertex.obj : t_vb_vertex.c
t_vertex.obj : t_vertex.c
t_vertex_generic.obj : t_vertex_generic.c
t_vp_build.obj : t_vp_build.c
t_rasterpos.obj : t_rasterpos.c

62
src/mesa/vbo/descrip.mms
View file

@ -1,62 +0,0 @@
# Makefile for core library for VMS
# contributed by Jouk Jansen joukj@hrem.nano.tudelft.nl
# Last revision : 3 October 2007
.first
define gl [---.include.gl]
define math [-.math]
define vbo [-.vbo]
define tnl [-.tnl]
define shader [-.shader]
define swrast [-.swrast]
define swrast_setup [-.swrast_setup]
define main [-.main]
define glapi [-.glapi]
.include [---]mms-config.
##### MACROS #####
VPATH = RCS
INCDIR = [---.include],[-.main],[-.glapi],[-.shader],[-.shader.slang]
LIBDIR = [---.lib]
CFLAGS = /include=($(INCDIR),[])/define=(PTHREADS=1)/name=(as_is,short)/float=ieee/ieee=denorm
SOURCES =vbo_context.c,vbo_exec.c,vbo_exec_api.c,vbo_exec_array.c,\
vbo_exec_draw.c,vbo_exec_eval.c,vbo_rebase.c,vbo_save.c,\
vbo_save_api.c,vbo_save_draw.c,vbo_save_loopback.c,\
vbo_split.c,vbo_split_copy.c,vbo_split_inplace.c
OBJECTS =vbo_context.obj,vbo_exec.obj,vbo_exec_api.obj,vbo_exec_array.obj,\
vbo_exec_draw.obj,vbo_exec_eval.obj,vbo_rebase.obj,vbo_save.obj,\
vbo_save_api.obj,vbo_save_draw.obj,vbo_save_loopback.obj,\
vbo_split.obj,vbo_split_copy.obj,vbo_split_inplace.obj
##### RULES #####
VERSION=Mesa V3.4
##### TARGETS #####
# Make the library
$(LIBDIR)$(GL_LIB) : $(OBJECTS)
@ library $(LIBDIR)$(GL_LIB) $(OBJECTS)
clean :
purge
delete *.obj;*
vbo_context.obj : vbo_context.c
vbo_exec.obj : vbo_exec.c
vbo_exec_api.obj : vbo_exec_api.c
vbo_exec_array.obj : vbo_exec_array.c
vbo_exec_draw.obj : vbo_exec_draw.c
vbo_exec_eval.obj : vbo_exec_eval.c
vbo_rebase.obj : vbo_rebase.c
vbo_save.obj : vbo_save.c
vbo_save_api.obj : vbo_save_api.c
vbo_save_draw.obj : vbo_save_draw.c
vbo_save_loopback.obj : vbo_save_loopback.c
vbo_split.obj : vbo_split.c
vbo_split_copy.obj : vbo_split_copy.c
vbo_split_inplace.obj : vbo_split_inplace.c