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
|
#include <u.h>
#include <libc.h>
#include <thread.h>
#include <draw.h>
#include <memdraw.h>
#include <mouse.h>
#include <keyboard.h>
#include <geometry.h>
#include "libobj/obj.h"
#include "dat.h"
#include "fns.h"
int
min(int a, int b)
{
return a < b? a: b;
}
int
max(int a, int b)
{
return a > b? a: b;
}
double
fmin(double a, double b)
{
return a < b? a: b;
}
double
fmax(double a, double b)
{
return a > b? a: b;
}
void
swap(int *a, int *b)
{
int t;
t = *a;
*a = *b;
*b = t;
}
void
memsetd(double *p, double v, usize len)
{
double *dp;
for(dp = p; dp < p+len; dp++)
*dp = v;
}
typedef struct Deco Deco;
struct Deco
{
int pfd[2];
int infd;
char *prog;
};
static void
decproc(void *arg)
{
char buf[32];
Deco *d;
d = arg;
close(d->pfd[0]);
dup(d->infd, 0);
close(d->infd);
dup(d->pfd[1], 1);
close(d->pfd[1]);
snprint(buf, sizeof buf, "/bin/%s", d->prog);
execl(buf, d->prog, "-9t", nil);
threadexitsall("execl: %r");
}
static Memimage *
genreadimage(char *prog, char *path)
{
Memimage *i;
Deco d;
d.prog = prog;
if(pipe(d.pfd) < 0)
sysfatal("pipe: %r");
d.infd = open(path, OREAD);
if(d.infd < 0)
sysfatal("open: %r");
procrfork(decproc, &d, mainstacksize, RFFDG|RFNAMEG|RFNOTEG);
close(d.pfd[1]);
i = readmemimage(d.pfd[0]);
close(d.pfd[0]);
close(d.infd);
return i;
}
Memimage *
readtga(char *path)
{
return genreadimage("tga", path);
}
Memimage *
readpng(char *path)
{
return genreadimage("png", path);
}
Memimage *
rgb(ulong c)
{
Memimage *i;
i = eallocmemimage(Rect(0,0,1,1), screen->chan);
i->flags |= Frepl;
i->clipr = Rect(-1e6, -1e6, 1e6, 1e6);
memfillcolor(i, c);
return i;
}
|
