git: 9front

ref: b9d3ca5753cc1922236fc733605bc8b3caabc8c1
dir: /sys/src/libdraw/mkwarp.c/

View raw version 
#include <u.h>
#include <libc.h>
#include <draw.h>
#include <geometry.h>

/* 25.7 fixed-point number operations */

#define flt2fix(n)	((long)((n)*(1<<7) + ((n) < 0? -0.5: 0.5)))

void
mkwarp(Warp w, double m0[3][3])
{
	Matrix m;

	memmove(m, m0, sizeof(Matrix));
	invm(m);

	w[0][0] = flt2fix(m[0][0]); w[0][1] = flt2fix(m[0][1]); w[0][2] = flt2fix(m[0][2]);
	w[1][0] = flt2fix(m[1][0]); w[1][1] = flt2fix(m[1][1]); w[1][2] = flt2fix(m[1][2]);
	w[2][0] = 0; w[2][1] = 0; w[2][2] = 1<<7;
}