2d816ad36e
git-svn-id: http://skia.googlecode.com/svn/trunk@9252 2bbb7eff-a529-9590-31e7-b0007b416f81
132 lines
3.5 KiB
C++
132 lines
3.5 KiB
C++
/*
|
|
* Copyright 2013 Google Inc.
|
|
*
|
|
* Use of this source code is governed by a BSD-style license that can be
|
|
* found in the LICENSE file.
|
|
*/
|
|
|
|
#include "SampleCode.h"
|
|
#include "SkView.h"
|
|
#include "SkLua.h"
|
|
#include "SkCanvas.h"
|
|
|
|
extern "C" {
|
|
#include "lua.h"
|
|
#include "lualib.h"
|
|
#include "lauxlib.h"
|
|
}
|
|
|
|
static const char gDrawName[] = "onDrawContent";
|
|
|
|
static const char gCode[] = ""
|
|
"require \"math\" "
|
|
""
|
|
"local r = { left = 10, top = 10, right = 100, bottom = 80 } "
|
|
"local x = 0;"
|
|
""
|
|
"local paint = Sk.newPaint();"
|
|
"paint:setAntiAlias(true);"
|
|
""
|
|
"local color = {a = 1, r = 1, g = 0, b = 0};"
|
|
""
|
|
"function rnd(range) "
|
|
" return math.random() * range;"
|
|
"end "
|
|
""
|
|
"rndX = function () return rnd(640) end "
|
|
"rndY = function () return rnd(480) end "
|
|
""
|
|
"function draw_rand_path(canvas);"
|
|
" if not path_paint then "
|
|
" path_paint = Sk.newPaint();"
|
|
" path_paint:setAntiAlias(true);"
|
|
" end "
|
|
" path_paint:setColor({a = 1, r = math.random(), g = math.random(), b = math.random() });"
|
|
""
|
|
" local path = Sk.newPath();"
|
|
" path:moveTo(rndX(), rndY());"
|
|
" for i = 0, 50 do "
|
|
" path:quadTo(rndX(), rndY(), rndX(), rndY());"
|
|
" end "
|
|
" canvas:drawPath(path, path_paint);"
|
|
"end "
|
|
""
|
|
"function onDrawContent(canvas) "
|
|
" draw_rand_path(canvas);"
|
|
" color.g = x / 100;"
|
|
" paint:setColor(color) "
|
|
" canvas:translate(x, 0);"
|
|
" canvas:drawOval(r, paint) "
|
|
" x = x + 1;"
|
|
" if x > 100 then x = 0 end;"
|
|
"end";
|
|
|
|
class LuaView : public SampleView {
|
|
public:
|
|
LuaView() : fLua(NULL) {}
|
|
|
|
virtual ~LuaView() {
|
|
SkDELETE(fLua);
|
|
}
|
|
|
|
lua_State* ensureLua() {
|
|
if (NULL == fLua) {
|
|
fLua = SkNEW(SkLua);
|
|
fLua->runCode(gCode);
|
|
}
|
|
return fLua->get();
|
|
}
|
|
|
|
protected:
|
|
virtual bool onQuery(SkEvent* evt) SK_OVERRIDE {
|
|
if (SampleCode::TitleQ(*evt)) {
|
|
SampleCode::TitleR(evt, "Lua");
|
|
return true;
|
|
}
|
|
SkUnichar uni;
|
|
if (SampleCode::CharQ(*evt, &uni)) {
|
|
}
|
|
return this->INHERITED::onQuery(evt);
|
|
}
|
|
|
|
virtual void onDrawContent(SkCanvas* canvas) SK_OVERRIDE {
|
|
lua_State* L = this->ensureLua();
|
|
|
|
lua_getglobal(L, gDrawName);
|
|
if (!lua_isfunction(L, -1)) {
|
|
int t = lua_type(L, -1);
|
|
SkDebugf("--- expected %s function %d, ignoring.\n", gDrawName, t);
|
|
lua_pop(L, 1);
|
|
} else {
|
|
// does it make sense to try to "cache" the lua version of this
|
|
// canvas between draws?
|
|
fLua->pushCanvas(canvas);
|
|
if (lua_pcall(L, 1, 0, 0) != LUA_OK) {
|
|
SkDebugf("lua err: %s\n", lua_tostring(L, -1));
|
|
}
|
|
}
|
|
// need a way for the lua-sample to tell us if they want animations...
|
|
// hard-code it ON for now.
|
|
this->inval(NULL);
|
|
}
|
|
|
|
virtual SkView::Click* onFindClickHandler(SkScalar x, SkScalar y,
|
|
unsigned modi) SK_OVERRIDE {
|
|
return this->INHERITED::onFindClickHandler(x, y, modi);
|
|
}
|
|
|
|
virtual bool onClick(Click* click) SK_OVERRIDE {
|
|
return this->INHERITED::onClick(click);
|
|
}
|
|
|
|
private:
|
|
SkLua* fLua;
|
|
|
|
typedef SampleView INHERITED;
|
|
};
|
|
|
|
//////////////////////////////////////////////////////////////////////////////
|
|
|
|
static SkView* MyFactory() { return new LuaView; }
|
|
static SkViewRegister reg(MyFactory);
|