1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
|
/*
FILE: x_interface.c
PURPOSE: Creation and access to an X windows interface
to wet+sticky using Athena Widgets
AUTHOR: David England
VERSION: 1.00 (13-May-91)
Copyright 1991, 1992, 2002, 2003 Tunde Cockshott, Kevin Waite, David England.
Contact David England d.england@livjm.ac.uk
School of Computing and Maths Sciences,
Liverpool John Moores University
Liverpool L3 3AF
United Kingdom
Phone +44 151 231 2271
Wet and Sticky 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. Wet and Sticky 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 Wet and Sticky; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
#define FRAME_LIMIT 36
#include <X11/Xos.h>
#include <X11/Xlib.h>
#include <X11/Xutil.h>
#include <X11/Intrinsic.h>
#include <X11/cursorfont.h>
#include <X11/StringDefs.h>
#include <X11/Shell.h>
#include <X11/Xaw/Box.h>
#include <X11/Xaw/Label.h>
#include <stdio.h>
#include "constants.h"
#include "types.h"
#include "engine.h"
#include "canvas.h"
/* Window Heirarchy -
Three shell widgets, one for colour output, two for attributes
output
plus a back_up pixmap for redrawing
*/
static Widget top_level;
static Widget colour_shell;
static Widget colour_box;
static Widget colour_canvas;
static Pixmap colour_pm[FRAME_LIMIT];
static GC gc;
static GC tmp_gc;
static long mask;
static XGCValues values;
Display *display;
char pix_file[32];
unsigned int delay;
main(argc, argv)
int argc;
char *argv[];
{
static Arg args[]={
{XtNwidth, (XtArgVal) 0},
{XtNheight, (XtArgVal)0} };
XEvent event;
int i, width, height;
int ret;
int c;
extern char *optarg;
extern int optind;
width = 300;
height = 300;
args[0].value = (XtArgVal)width;
args[1].value = (XtArgVal)height;
top_level = XtInitialize("wet+sticky", "Wet+Sticky", NULL,
0, &argc, argv);
delay = 100000; /*default delay in microseconds between frames */
while ((c = getopt(argc, argv, "D:")) != -1)
switch (c) {
case 'D':
delay = atoi(optarg);
delay = delay * 1000000;
break;
}
display = XtDisplay(top_level);
colour_shell = XtCreateApplicationShell("colour_frame",
topLevelShellWidgetClass, NULL, 0);
colour_box = XtCreateManagedWidget("colour_box", boxWidgetClass,
colour_shell, NULL, 0);
colour_canvas = XtCreateManagedWidget("", labelWidgetClass,
colour_box, args, XtNumber(args));
/*XtAddEventHandler(colour_canvas, ExposureMask, False,
expose_event, 0);*/
XtRealizeWidget(colour_shell);
XSynchronize(display, True);
mask = GCBackground| GCForeground| GCFunction;
values.function = GXcopy;
values.background = 0;
values.foreground = 1;
gc = XtGetGC(colour_canvas, mask, &values);
fprintf(stderr,"Read files ...");
for (i=0; i < FRAME_LIMIT; i++) {
sprintf(pix_file,"pixmap.%d",i);
if ((XReadBitmapFile(display, XtWindow(colour_shell), pix_file,
&width, &height, &colour_pm[i], &ret, &ret)) !=
BitmapSuccess)
perror("bad bitmap");
}
fprintf(stderr,"done.\nBegin Animation\n");
for (;;) {
for (i=0; i < FRAME_LIMIT; i++) {
XCopyPlane(display, colour_pm[i],
XtWindow(colour_canvas),gc,
0, 0, 300, 300, 0, 0, 1);
fprintf(stderr,"pre sleep\n");
usleep(delay);
}
} /* End for loop */
}xk
|
