lipgloss 0.1.0-x86-linux-musl

data/ext/lipgloss/extension.h

@@ -0,0 +1,76 @@
+#ifndef LIPGLOSS_EXTENSION_H
+#define LIPGLOSS_EXTENSION_H
+
+#include <ruby.h>
+#include "liblipgloss.h"
+
+extern VALUE mLipgloss;
+extern VALUE cStyle;
+extern VALUE cTable;
+extern VALUE cList;
+extern VALUE cTree;
+
+extern const rb_data_type_t style_type;
+extern const rb_data_type_t table_type;
+extern const rb_data_type_t list_type;
+extern const rb_data_type_t tree_type;
+
+typedef struct {
+  unsigned long long handle;
+} lipgloss_style_t;
+
+typedef struct {
+  unsigned long long handle;
+} lipgloss_table_t;
+
+typedef struct {
+  unsigned long long handle;
+} lipgloss_list_t;
+
+typedef struct {
+  unsigned long long handle;
+} lipgloss_tree_t;
+
+
+#define GET_STYLE(self, style) \
+  lipgloss_style_t *style; \
+  TypedData_Get_Struct(self, lipgloss_style_t, &style_type, style)
+
+#define GET_TABLE(self, table) \
+  lipgloss_table_t *table; \
+  TypedData_Get_Struct(self, lipgloss_table_t, &table_type, table)
+
+#define GET_LIST(self, list) \
+  lipgloss_list_t *list; \
+  TypedData_Get_Struct(self, lipgloss_list_t, &list_type, list)
+
+#define GET_TREE(self, tree) \
+  lipgloss_tree_t *tree; \
+  TypedData_Get_Struct(self, lipgloss_tree_t, &tree_type, tree)
+
+#define BORDER_NORMAL 0
+#define BORDER_ROUNDED 1
+#define BORDER_THICK 2
+#define BORDER_DOUBLE 3
+#define BORDER_HIDDEN 4
+#define BORDER_BLOCK 5
+#define BORDER_OUTER_HALF_BLOCK 6
+#define BORDER_INNER_HALF_BLOCK 7
+#define BORDER_ASCII 8
+#define BORDER_MARKDOWN 9
+
+VALUE style_wrap(VALUE klass, unsigned long long handle);
+VALUE table_wrap(VALUE klass, unsigned long long handle);
+VALUE list_wrap_handle(VALUE klass, unsigned long long handle);
+VALUE tree_wrap_handle(VALUE klass, unsigned long long handle);
+
+void Init_lipgloss_style(void);
+void Init_lipgloss_table(void);
+void Init_lipgloss_list(void);
+void Init_lipgloss_tree(void);
+
+void register_style_spacing_methods(void);
+void register_style_border_methods(void);
+void register_style_unset_methods(void);
+
+#endif

data/ext/lipgloss/list.c

@@ -0,0 +1,147 @@
+#include "extension.h"
+
+static void list_free(void *pointer) {
+  lipgloss_list_t *list = (lipgloss_list_t *) pointer;
+
+  if (list->handle != 0) {
+    lipgloss_list_free(list->handle);
+  }
+
+  xfree(list);
+}
+
+static size_t list_memsize(const void *pointer) {
+  return sizeof(lipgloss_list_t);
+}
+
+const rb_data_type_t list_type = {
+  .wrap_struct_name = "Lipgloss::List",
+  .function = {
+    .dmark = NULL,
+    .dfree = list_free,
+    .dsize = list_memsize,
+  },
+  .flags = RUBY_TYPED_FREE_IMMEDIATELY
+};
+
+static VALUE list_alloc(VALUE klass) {
+  lipgloss_list_t *list = ALLOC(lipgloss_list_t);
+  list->handle = lipgloss_list_new();
+
+  return TypedData_Wrap_Struct(klass, &list_type, list);
+}
+
+VALUE list_wrap_handle(VALUE klass, unsigned long long handle) {
+  lipgloss_list_t *list = ALLOC(lipgloss_list_t);
+  list->handle = handle;
+
+  return TypedData_Wrap_Struct(klass, &list_type, list);
+}
+
+static VALUE list_initialize(int argc, VALUE *argv, VALUE self) {
+  if (argc > 0) {
+    GET_LIST(self, list);
+    VALUE json_str = rb_funcall(rb_ary_new_from_values(argc, argv), rb_intern("to_json"), 0);
+    list->handle = lipgloss_list_items(list->handle, StringValueCStr(json_str));
+  }
+
+  return self;
+}
+
+static VALUE list_item(VALUE self, VALUE item) {
+  GET_LIST(self, list);
+
+  if (rb_obj_is_kind_of(item, cList)) {
+    lipgloss_list_t *sublist;
+    TypedData_Get_Struct(item, lipgloss_list_t, &list_type, sublist);
+    unsigned long long new_handle = lipgloss_list_item_list(list->handle, sublist->handle);
+
+    return list_wrap_handle(rb_class_of(self), new_handle);
+  }
+
+  Check_Type(item, T_STRING);
+  unsigned long long new_handle = lipgloss_list_item(list->handle, StringValueCStr(item));
+
+  return list_wrap_handle(rb_class_of(self), new_handle);
+}
+
+static VALUE list_items(VALUE self, VALUE items) {
+  GET_LIST(self, list);
+  Check_Type(items, T_ARRAY);
+
+  VALUE json_str = rb_funcall(items, rb_intern("to_json"), 0);
+  unsigned long long new_handle = lipgloss_list_items(list->handle, StringValueCStr(json_str));
+
+  return list_wrap_handle(rb_class_of(self), new_handle);
+}
+
+#define LIST_ENUMERATOR_BULLET 0
+#define LIST_ENUMERATOR_ARABIC 1
+#define LIST_ENUMERATOR_ALPHABET 2
+#define LIST_ENUMERATOR_ROMAN 3
+#define LIST_ENUMERATOR_DASH 4
+#define LIST_ENUMERATOR_ASTERISK 5
+
+static int symbol_to_list_enumerator(VALUE symbol) {
+  if (symbol == ID2SYM(rb_intern("bullet"))) return LIST_ENUMERATOR_BULLET;
+  if (symbol == ID2SYM(rb_intern("arabic"))) return LIST_ENUMERATOR_ARABIC;
+  if (symbol == ID2SYM(rb_intern("alphabet"))) return LIST_ENUMERATOR_ALPHABET;
+  if (symbol == ID2SYM(rb_intern("roman"))) return LIST_ENUMERATOR_ROMAN;
+  if (symbol == ID2SYM(rb_intern("dash"))) return LIST_ENUMERATOR_DASH;
+  if (symbol == ID2SYM(rb_intern("asterisk"))) return LIST_ENUMERATOR_ASTERISK;
+
+  return LIST_ENUMERATOR_BULLET;
+}
+
+static VALUE list_enumerator(VALUE self, VALUE enum_symbol) {
+  GET_LIST(self, list);
+  int enum_type = symbol_to_list_enumerator(enum_symbol);
+  unsigned long long new_handle = lipgloss_list_enumerator(list->handle, enum_type);
+
+  return list_wrap_handle(rb_class_of(self), new_handle);
+}
+
+static VALUE list_enumerator_style(VALUE self, VALUE style_object) {
+  GET_LIST(self, list);
+  lipgloss_style_t *style;
+
+  TypedData_Get_Struct(style_object, lipgloss_style_t, &style_type, style);
+  unsigned long long new_handle = lipgloss_list_enumerator_style(list->handle, style->handle);
+
+  return list_wrap_handle(rb_class_of(self), new_handle);
+}
+
+static VALUE list_item_style(VALUE self, VALUE style_object) {
+  GET_LIST(self, list);
+  lipgloss_style_t *style;
+  TypedData_Get_Struct(style_object, lipgloss_style_t, &style_type, style);
+  unsigned long long new_handle = lipgloss_list_item_style(list->handle, style->handle);
+  return list_wrap_handle(rb_class_of(self), new_handle);
+}
+
+static VALUE list_render(VALUE self) {
+  GET_LIST(self, list);
+  char *result = lipgloss_list_render(list->handle);
+  VALUE rb_result = rb_utf8_str_new_cstr(result);
+  lipgloss_free(result);
+  return rb_result;
+}
+
+static VALUE list_to_s(VALUE self) {
+  return list_render(self);
+}
+
+void Init_lipgloss_list(void) {
+  cList = rb_define_class_under(mLipgloss, "List", rb_cObject);
+
+  rb_define_alloc_func(cList, list_alloc);
+
+  rb_define_method(cList, "initialize", list_initialize, -1);
+  rb_define_method(cList, "item", list_item, 1);
+  rb_define_method(cList, "items", list_items, 1);
+  rb_define_method(cList, "enumerator", list_enumerator, 1);
+  rb_define_method(cList, "enumerator_style", list_enumerator_style, 1);
+  rb_define_method(cList, "item_style", list_item_style, 1);
+  rb_define_method(cList, "render", list_render, 0);
+  rb_define_method(cList, "to_s", list_to_s, 0);
+}

data/ext/lipgloss/style.c

@@ -0,0 +1,398 @@
+#include "extension.h"
+
+static void style_free(void *pointer) {
+  lipgloss_style_t *style = (lipgloss_style_t *) pointer;
+
+  if (style->handle != 0) {
+    lipgloss_free_style(style->handle);
+  }
+
+  xfree(style);
+}
+
+static size_t style_memsize(const void *pointer) {
+  return sizeof(lipgloss_style_t);
+}
+
+const rb_data_type_t style_type = {
+  .wrap_struct_name = "Lipgloss::Style",
+  .function = {
+    .dmark = NULL,
+    .dfree = style_free,
+    .dsize = style_memsize,
+  },
+  .flags = RUBY_TYPED_FREE_IMMEDIATELY
+};
+
+static VALUE style_alloc(VALUE klass) {
+  lipgloss_style_t *style = ALLOC(lipgloss_style_t);
+  style->handle = lipgloss_new_style();
+  return TypedData_Wrap_Struct(klass, &style_type, style);
+}
+
+VALUE style_wrap(VALUE klass, unsigned long long handle) {
+  lipgloss_style_t *style = ALLOC(lipgloss_style_t);
+
+  style->handle = handle;
+
+  return TypedData_Wrap_Struct(klass, &style_type, style);
+}
+
+static VALUE style_initialize(VALUE self) {
+  return self;
+}
+
+static VALUE style_render(VALUE self, VALUE string) {
+  GET_STYLE(self, style);
+  Check_Type(string, T_STRING);
+
+  char *result = lipgloss_style_render(style->handle, StringValueCStr(string));
+  VALUE rb_result = rb_utf8_str_new_cstr(result);
+  lipgloss_free(result);
+
+  return rb_result;
+}
+
+// Formatting methods
+
+static VALUE style_bold(VALUE self, VALUE value) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_bold(style->handle, RTEST(value) ? 1 : 0);
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_italic(VALUE self, VALUE value) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_italic(style->handle, RTEST(value) ? 1 : 0);
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_underline(VALUE self, VALUE value) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_underline(style->handle, RTEST(value) ? 1 : 0);
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_strikethrough(VALUE self, VALUE value) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_strikethrough(style->handle, RTEST(value) ? 1 : 0);
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_reverse(VALUE self, VALUE value) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_reverse(style->handle, RTEST(value) ? 1 : 0);
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_blink(VALUE self, VALUE value) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_blink(style->handle, RTEST(value) ? 1 : 0);
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_faint(VALUE self, VALUE value) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_faint(style->handle, RTEST(value) ? 1 : 0);
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+// Color helper functions
+
+static int is_complete_color(VALUE obj) {
+  return rb_respond_to(obj, rb_intern("true_color")) && rb_respond_to(obj, rb_intern("ansi256")) && rb_respond_to(obj, rb_intern("ansi"));
+}
+
+static int is_adaptive_color(VALUE obj) {
+  return rb_respond_to(obj, rb_intern("light")) && rb_respond_to(obj, rb_intern("dark"));
+}
+
+// Color methods
+
+static VALUE style_foreground(VALUE self, VALUE color) {
+  GET_STYLE(self, style);
+
+  if (is_adaptive_color(color)) {
+    VALUE light = rb_funcall(color, rb_intern("light"), 0);
+    VALUE dark = rb_funcall(color, rb_intern("dark"), 0);
+
+    if (is_complete_color(light) && is_complete_color(dark)) {
+      VALUE light_true = rb_funcall(light, rb_intern("true_color"), 0);
+      VALUE light_256 = rb_funcall(light, rb_intern("ansi256"), 0);
+      VALUE light_ansi = rb_funcall(light, rb_intern("ansi"), 0);
+      VALUE dark_true = rb_funcall(dark, rb_intern("true_color"), 0);
+      VALUE dark_256 = rb_funcall(dark, rb_intern("ansi256"), 0);
+      VALUE dark_ansi = rb_funcall(dark, rb_intern("ansi"), 0);
+
+      unsigned long long new_handle = lipgloss_style_foreground_complete_adaptive(
+        style->handle,
+        StringValueCStr(light_true),
+        StringValueCStr(light_256),
+        StringValueCStr(light_ansi),
+        StringValueCStr(dark_true),
+        StringValueCStr(dark_256),
+        StringValueCStr(dark_ansi)
+      );
+
+      return style_wrap(rb_class_of(self), new_handle);
+    }
+
+    unsigned long long new_handle = lipgloss_style_foreground_adaptive(
+      style->handle,
+      StringValueCStr(light),
+      StringValueCStr(dark)
+    );
+
+    return style_wrap(rb_class_of(self), new_handle);
+  }
+
+  if (is_complete_color(color)) {
+    VALUE true_color = rb_funcall(color, rb_intern("true_color"), 0);
+    VALUE ansi256 = rb_funcall(color, rb_intern("ansi256"), 0);
+    VALUE ansi = rb_funcall(color, rb_intern("ansi"), 0);
+
+    unsigned long long new_handle = lipgloss_style_foreground_complete(
+      style->handle,
+      StringValueCStr(true_color),
+      StringValueCStr(ansi256),
+      StringValueCStr(ansi)
+    );
+
+    return style_wrap(rb_class_of(self), new_handle);
+  }
+
+  Check_Type(color, T_STRING);
+  unsigned long long new_handle = lipgloss_style_foreground(style->handle, StringValueCStr(color));
+
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_background(VALUE self, VALUE color) {
+  GET_STYLE(self, style);
+
+  if (is_adaptive_color(color)) {
+    VALUE light = rb_funcall(color, rb_intern("light"), 0);
+    VALUE dark = rb_funcall(color, rb_intern("dark"), 0);
+
+    if (is_complete_color(light) && is_complete_color(dark)) {
+      VALUE light_true = rb_funcall(light, rb_intern("true_color"), 0);
+      VALUE light_256 = rb_funcall(light, rb_intern("ansi256"), 0);
+      VALUE light_ansi = rb_funcall(light, rb_intern("ansi"), 0);
+      VALUE dark_true = rb_funcall(dark, rb_intern("true_color"), 0);
+      VALUE dark_256 = rb_funcall(dark, rb_intern("ansi256"), 0);
+      VALUE dark_ansi = rb_funcall(dark, rb_intern("ansi"), 0);
+
+      unsigned long long new_handle = lipgloss_style_background_complete_adaptive(
+        style->handle,
+        StringValueCStr(light_true),
+        StringValueCStr(light_256),
+        StringValueCStr(light_ansi),
+        StringValueCStr(dark_true),
+        StringValueCStr(dark_256),
+        StringValueCStr(dark_ansi)
+      );
+
+      return style_wrap(rb_class_of(self), new_handle);
+    }
+
+    unsigned long long new_handle = lipgloss_style_background_adaptive(
+      style->handle,
+      StringValueCStr(light),
+      StringValueCStr(dark)
+    );
+
+    return style_wrap(rb_class_of(self), new_handle);
+  }
+
+  if (is_complete_color(color)) {
+    VALUE true_color = rb_funcall(color, rb_intern("true_color"), 0);
+    VALUE ansi256 = rb_funcall(color, rb_intern("ansi256"), 0);
+    VALUE ansi = rb_funcall(color, rb_intern("ansi"), 0);
+
+    unsigned long long new_handle = lipgloss_style_background_complete(
+      style->handle,
+      StringValueCStr(true_color),
+      StringValueCStr(ansi256),
+      StringValueCStr(ansi)
+    );
+
+    return style_wrap(rb_class_of(self), new_handle);
+  }
+
+  Check_Type(color, T_STRING);
+  unsigned long long new_handle = lipgloss_style_background(style->handle, StringValueCStr(color));
+
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_margin_background(VALUE self, VALUE color) {
+  GET_STYLE(self, style);
+  Check_Type(color, T_STRING);
+
+  unsigned long long new_handle = lipgloss_style_margin_background(style->handle, StringValueCStr(color));
+
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+// Size methods
+
+static VALUE style_width(VALUE self, VALUE width) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_width(style->handle, NUM2INT(width));
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_height(VALUE self, VALUE height) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_height(style->handle, NUM2INT(height));
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_max_width(VALUE self, VALUE width) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_max_width(style->handle, NUM2INT(width));
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_max_height(VALUE self, VALUE height) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_max_height(style->handle, NUM2INT(height));
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+// Alignment methods
+
+static VALUE style_align(int argc, VALUE *argv, VALUE self) {
+  GET_STYLE(self, style);
+
+  if (argc == 0 || argc > 2) {
+    rb_raise(rb_eArgError, "wrong number of arguments (given %d, expected 1..2)", argc);
+  }
+
+  double positions[2];
+  for (int index = 0; index < argc; index++) {
+    positions[index] = NUM2DBL(argv[index]);
+  }
+
+  unsigned long long new_handle = lipgloss_style_align(style->handle, positions, argc);
+
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_align_horizontal(VALUE self, VALUE position) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_align_horizontal(style->handle, NUM2DBL(position));
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_align_vertical(VALUE self, VALUE position) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_align_vertical(style->handle, NUM2DBL(position));
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+// Other style methods
+
+static VALUE style_inline(VALUE self, VALUE value) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_inline(style->handle, RTEST(value) ? 1 : 0);
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_tab_width(VALUE self, VALUE width) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_tab_width(style->handle, NUM2INT(width));
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_underline_spaces(VALUE self, VALUE value) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_underline_spaces(style->handle, RTEST(value) ? 1 : 0);
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_strikethrough_spaces(VALUE self, VALUE value) {
+  GET_STYLE(self, style);
+  unsigned long long new_handle = lipgloss_style_strikethrough_spaces(style->handle, RTEST(value) ? 1 : 0);
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+// SetString, Inherit, to_s
+
+static VALUE style_set_string(VALUE self, VALUE string) {
+  GET_STYLE(self, style);
+  Check_Type(string, T_STRING);
+
+  unsigned long long new_handle = lipgloss_style_set_string(style->handle, StringValueCStr(string));
+
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_inherit(VALUE self, VALUE other) {
+  GET_STYLE(self, style);
+  lipgloss_style_t *other_style;
+
+  TypedData_Get_Struct(other, lipgloss_style_t, &style_type, other_style);
+  unsigned long long new_handle = lipgloss_style_inherit(style->handle, other_style->handle);
+
+  return style_wrap(rb_class_of(self), new_handle);
+}
+
+static VALUE style_to_s(VALUE self) {
+  GET_STYLE(self, style);
+  char *result = lipgloss_style_string(style->handle);
+  VALUE rb_result = rb_utf8_str_new_cstr(result);
+
+  lipgloss_free(result);
+
+  return rb_result;
+}
+
+void Init_lipgloss_style(void) {
+  cStyle = rb_define_class_under(mLipgloss, "Style", rb_cObject);
+
+  rb_define_alloc_func(cStyle, style_alloc);
+
+  rb_define_method(cStyle, "initialize", style_initialize, 0);
+  rb_define_method(cStyle, "render", style_render, 1);
+
+  // Formatting
+  rb_define_method(cStyle, "bold", style_bold, 1);
+  rb_define_method(cStyle, "italic", style_italic, 1);
+  rb_define_method(cStyle, "underline", style_underline, 1);
+  rb_define_method(cStyle, "strikethrough", style_strikethrough, 1);
+  rb_define_method(cStyle, "reverse", style_reverse, 1);
+  rb_define_method(cStyle, "blink", style_blink, 1);
+  rb_define_method(cStyle, "faint", style_faint, 1);
+
+  // Colors
+  rb_define_method(cStyle, "foreground", style_foreground, 1);
+  rb_define_method(cStyle, "background", style_background, 1);
+  rb_define_method(cStyle, "margin_background", style_margin_background, 1);
+
+  // Size
+  rb_define_method(cStyle, "width", style_width, 1);
+  rb_define_method(cStyle, "height", style_height, 1);
+  rb_define_method(cStyle, "max_width", style_max_width, 1);
+  rb_define_method(cStyle, "max_height", style_max_height, 1);
+
+  // Alignment
+  rb_define_method(cStyle, "align", style_align, -1);
+  rb_define_method(cStyle, "align_horizontal", style_align_horizontal, 1);
+  rb_define_method(cStyle, "align_vertical", style_align_vertical, 1);
+
+  // Other
+  rb_define_method(cStyle, "inline", style_inline, 1);
+  rb_define_method(cStyle, "tab_width", style_tab_width, 1);
+  rb_define_method(cStyle, "underline_spaces", style_underline_spaces, 1);
+  rb_define_method(cStyle, "strikethrough_spaces", style_strikethrough_spaces, 1);
+
+  rb_define_method(cStyle, "set_string", style_set_string, 1);
+  rb_define_method(cStyle, "inherit", style_inherit, 1);
+  rb_define_method(cStyle, "to_s", style_to_s, 0);
+
+  // Register methods from sub-files
+  register_style_spacing_methods();
+  register_style_border_methods();
+  register_style_unset_methods();
+}