]> git.imager.perl.org - imager.git/blame - regmach.h
various bits and pieces of documentation
[imager.git] / regmach.h
CommitLineData
02d1d628
AMH
1#ifndef _REGMACH_H_
2#define _REGMACH_H_
3
4#include <stdio.h>
5#include <math.h>
92bda632 6#include "imager.h"
02d1d628
AMH
7
8enum rm_byte_codes {
9 rbc_add, /* ra + rb -> r*/
10 rbc_subtract, /* ra - rb -> r */
11 rbc_mult, /* ra * rb -> r */
12 rbc_div, /* ra / rb -> r */
13 rbc_mod, /* ra % rb -> r */
14 rbc_pow, /* ra ** rb -> r */
15 rbc_uminus, /* -ra -> r */
16 rbc_multp, /* pa ** rb -> p */
17 rbc_addp, /* pa + pb -> p */
18 rbc_subtractp, /* pa - pb -> p */
19 /* rbcParm, we just preload a register */
20 rbc_sin, /* sin(ra) -> r */
21 rbc_cos, /* cos(ra) -> r */
22 rbc_atan2, /* atan2(ra,rb) -> r */
23 rbc_sqrt, /* sqrt(ra) -> r */
24 rbc_distance, /* distance(rx, ry, rx, ry) -> r */
25 /* getp? codes must be in order */
26 rbc_getp1, /* getp1(ra, rb) -> p */
27 rbc_getp2, /* getp2(ra, rb) -> p */
28 rbc_getp3, /* getp3(ra, rb) -> p */
29 rbc_value, /* value(pa) -> r */
30 rbc_hue, /* hue(pa) -> r */
31 rbc_sat, /* sat(pa) -> r */
32 rbc_hsv, /* hsv(rh, rs, rv) -> p */
33 rbc_red, /* red(pa) -> r */
34 rbc_green, /* green(pa) -> r */
35 rbc_blue, /* blue(pa) -> r */
36 rbc_rgb, /* rgb(rr, rg, rb) -> p */
37 rbc_int, /* int(ra) -> r */
38 rbc_if, /* if(rc, rt, rf) -> r */
39 rbc_ifp, /* if(rc, pt, pf) -> p */
40 rbc_le, /* ra <= rb -> r */
41 rbc_lt, /* ra < rb -> r */
42 rbc_ge, /* ra >= rb -> r */
43 rbc_gt, /* ra > rb -> r */
44 rbc_eq, /* ra == rb -> r -- does approx equal */
45 rbc_ne, /* ra != rb -> r -- does approx equal */
46 rbc_and, /* ra && rb -> r */
47 rbc_or, /* ra || rb -> r */
48 rbc_not, /* !ra -> r */
49 rbc_abs, /* abs(ra) -> r */
50 rbc_ret, /* returns pa */
51 rbc_jump, /* jump to ja */
52 rbc_jumpz, /* jump if ra == 0 to jb */
53 rbc_jumpnz, /* jump if ra != 0 to jb */
54 rbc_set, /* ra -> r */
55 rbc_setp, /* pa -> p*/
56 rbc_print, /* prints ra */
e5744e01
TC
57 rbc_rgba, /* rgba(ra, rb, rc, rd) -> p */
58 rbc_hsva, /* hsva(ra, rb, rc, rd) -> p */
59 rbc_alpha, /* alpha(pa) -> r */
aed9d070
TC
60 rbc_log, /* log(ra) -> r */
61 rbc_exp, /* exp(ra) -> r */
02d1d628
AMH
62 rbc_op_count
63};
64
65/* rm_word was originally char, but even for some simpler expressions
66 I was getting close to running out of register numbers.
67 It should also simplify structure alignment issues. (I hope.)
68*/
69typedef int rm_word;
70#define RM_WORD_PACK "i"
71
72struct rm_op {
73 rm_word code; /* op code */
74 rm_word ra; /* first operand */
75 rm_word rb; /* possible second operand */
76 rm_word rc; /* possible third operand */
77 rm_word rd; /* possible fourth operand */
78 rm_word rout; /* output register */
79};
80
b33c08f8
TC
81i_color i_rm_run(struct rm_op codes[], size_t code_count,
82 double n_regs[], size_t n_regs_count,
83 i_color c_regs[], size_t c_regs_count,
84 i_img *images[], size_t image_count);
02d1d628
AMH
85
86/* op_run(fx, sizeof(fx), parms, 2)) */
87
88#endif /* _REGMACH_H_ */