From 1b7a7a0d83353c9d4e67387d864011b1556330eb Mon Sep 17 00:00:00 2001
From: sanine-a <sanine.not@pm.me>
Date: Thu, 17 Dec 2020 23:44:26 -0600
Subject: add setLineWidth and arc functions to cairo bindings

---
 demo/main.lua        |  5 ++---
 src/cairo_bindings.c | 42 +++++++++++++++++++++++++++++++++++++++++-
 src/cairo_bindings.h |  4 ++++
 3 files changed, 47 insertions(+), 4 deletions(-)

diff --git a/demo/main.lua b/demo/main.lua
index eb05beb..f60c345 100644
--- a/demo/main.lua
+++ b/demo/main.lua
@@ -25,9 +25,8 @@ cairo:moveTo(1024,0)
 cairo:lineTo(0,1024)
 cairo:stroke()
 
-cairo:setColor(1, 0, 1, 0.2)
-cairo:moveTo(0,0)
-cairo:lineTo(1024,1024)
+cairo:setLineWidth(20);
+cairo:arc(512, 512, 256);
 cairo:stroke()
 
 cairo:updateTexture()
diff --git a/src/cairo_bindings.c b/src/cairo_bindings.c
index 1c4c57b..d72597c 100644
--- a/src/cairo_bindings.c
+++ b/src/cairo_bindings.c
@@ -9,13 +9,15 @@ int honey_setup_cairo(lua_State* L)
 {
     honey_lua_create_table
         (L, 2,
-         HONEY_TABLE, "__index", 6,
+         HONEY_TABLE, "__index", 8,
          HONEY_FUNCTION, "getTexture", honey_cairo_get_texture,
          HONEY_FUNCTION, "updateTexture", honey_cairo_update_texture,
          HONEY_FUNCTION, "moveTo", honey_cairo_move_to,
          HONEY_FUNCTION, "lineTo", honey_cairo_line_to,
+	 HONEY_FUNCTION, "arc", honey_cairo_arc,
          HONEY_FUNCTION, "stroke", honey_cairo_stroke,
          HONEY_FUNCTION, "setColor", honey_cairo_set_color,
+	 HONEY_FUNCTION, "setLineWidth", honey_cairo_set_line_width,
 
          HONEY_FUNCTION, "__gc", honey_cairo_destroy);
     honey_cairo_mt_ref = luaL_ref(L, LUA_REGISTRYINDEX);
@@ -188,6 +190,31 @@ int honey_cairo_line_to(lua_State* L)
 
 /* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
 
+int honey_cairo_arc(lua_State* L)
+{
+    cairo_t** cr;
+    float cx, cy, radius, angle1, angle2;
+    int choice = honey_lua_parse_arguments
+	(L, 2,
+	 4,
+	 HONEY_USERDATA, &cr,
+	 HONEY_NUMBER, &cx, HONEY_NUMBER, &cy, HONEY_NUMBER, &radius,
+	 6,
+	 HONEY_USERDATA, &cr,
+	 HONEY_NUMBER, &cx, HONEY_NUMBER, &cy, HONEY_NUMBER, &radius,
+	 HONEY_NUMBER, &angle1, HONEY_NUMBER, &angle2);
+
+    if (choice == 0) {
+	angle1 = 0;
+	angle2 = 6.2831;
+    }
+
+    cairo_arc(*cr, cx, cy, radius, angle1, angle2);
+    return 0;
+}
+
+/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
+
 int honey_cairo_stroke(lua_State* L)
 {
     cairo_t** cr;
@@ -218,3 +245,16 @@ int honey_cairo_set_color(lua_State* L)
 
     return 0;
 }
+
+/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
+
+int honey_cairo_set_line_width(lua_State* L)
+{
+    cairo_t** cr;
+    float width;
+    honey_lua_parse_arguments(L, 1, 2, HONEY_USERDATA, &cr, HONEY_NUMBER, &width);
+
+    cairo_set_line_width(*cr, width);
+    return 0;
+}
+			      
diff --git a/src/cairo_bindings.h b/src/cairo_bindings.h
index 1170406..314256b 100644
--- a/src/cairo_bindings.h
+++ b/src/cairo_bindings.h
@@ -26,8 +26,12 @@ int honey_cairo_move_to(lua_State* L);
 
 int honey_cairo_line_to(lua_State* L);
 
+int honey_cairo_arc(lua_State* L);
+
 int honey_cairo_stroke(lua_State* L);
 
 int honey_cairo_set_color(lua_State* L);
 
+int honey_cairo_set_line_width(lua_State* L);
+
 #endif
-- 
cgit v1.2.1