Generate LED icons on the fly. Include SVG versions.

[fw/altos] / icon / led.5c

diff --git a/icon/led.5c b/icon/led.5c
new file mode 100644 (file)
index 0000000..cdbcdc7
--- /dev/null
+++ b/icon/led.5c
@@ -0,0 +1,189 @@
+/*
+ * Copyright © 2018 Keith Packard <keithp@keithp.com>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * General Public License for more details.
+ */
+
+/*
+ * Generate LED images for rocketview and launchcontrol
+ */
+
+autoimport Cairo;
+
+void led (cairo_t cr, real red, real green, real blue, bool on)
+{
+    translate (cr, .5, .5);
+
+    /* basic unilluminated LED */
+
+    if (true)
+    {
+       set_source_rgb (cr, red *.4, green *.4, blue *.4);
+       move_to (cr, 1, 1/2);
+       arc (cr, .5, .5, .5, 0, pi*2);
+       fill (cr);
+    }
+
+    /* Bright spot of LED illumination */
+    if (on)
+    {
+       pattern_t       led = Pattern::create_radial (1/2, 1/2, 0,
+                                                     1/2, 1/2, .4);
+       Pattern::add_color_stop_rgba (led, 0, red, green, blue, 1);
+       Pattern::add_color_stop_rgba (led, .5, red, green, blue, .8);
+       Pattern::add_color_stop_rgba (led, 1, red, green, blue, 0);
+       set_source (cr, led);
+       move_to (cr, 1, 1/2);
+       arc (cr, .5, .5, .5, 0, pi*2);
+       fill (cr);
+    }
+
+    /* Bezel */
+    if (true)
+    {
+       pattern_t       ring = Pattern::create_radial (.5, .5, .4, .5, .5, .5);
+       Pattern::add_color_stop_rgba (ring, 0, 0, 0, 0, 1);
+       Pattern::add_color_stop_rgba (ring, .5, 0, 0, 0, 1);
+       Pattern::add_color_stop_rgba (ring, 1, .5, .5, .5, 1);
+       set_source (cr, ring);
+       move_to (cr, 1, 1/2);
+       arc (cr, .5, .5, .5, 0, pi*2);
+       move_to (cr, 1, 1/2);
+       arc_negative (cr, .5, .5, .45, pi*2, 0);
+       fill (cr);
+    }
+
+    /* Specular highlight from room illumination */
+    if (true)
+    {
+       pattern_t       room = Pattern::create_radial (1/3, 1/3, 0, 1/3, 1/3, 1/2);
+       Pattern::add_color_stop_rgba (room, 0, 1, 1, 1, .4);
+       Pattern::add_color_stop_rgba (room, 1, 1, 1, 1, 0);
+       set_source (cr, room);
+       move_to (cr, 1, 1/2);
+       arc (cr, .5, .5, .5, 0, pi*2);
+       fill (cr);
+    }
+
+}
+
+/*
+ * Desired LED image size in pixels
+ */
+int diameter = 12;
+
+void do_one_svg (string name, real red, real green, real blue, bool on)
+{
+    cairo_t cr = new_svg (name, diameter, diameter);
+
+    translate (cr, -width(cr)/2, -height(cr)/2);
+    scale (cr, width(cr), height(cr));
+    led (cr, red, green, blue, on);
+    destroy (cr);
+}
+
+void do_one_png (string name, real red, real green, real blue, bool on)
+{
+    cairo_t cr = new_image (diameter, diameter);
+
+    translate (cr, -width(cr)/2, -height(cr)/2);
+    scale (cr, width(cr), height(cr));
+    led (cr, red, green, blue, on);
+    write_to_png (cr, name);
+    destroy (cr);
+}
+
+void do_one(string name,  real red, real green, real blue, bool on)
+{
+    do_one_png(name + ".png", red, green, blue, on);
+    do_one_svg(name + ".svg", red, green, blue, on);
+}
+
+void doit ()
+{
+    do_one ("redled", 1, 0, 0, true);
+    do_one ("redoff", 1, 0, 0, false);
+    do_one ("greenled", 0, 1, .4824, true);
+    do_one ("greenoff", 0, 1, .4824, false);
+    do_one ("grayled", .9, .9, .9, false);
+    do_one ("grayon", .9, .9, .9, true);
+}
+
+typedef struct {
+    real       red, green, blue;
+    bool       on;
+} stock_t;
+
+stock_t[string] stock_leds = {
+    "redled" => {
+       .red = 1,
+       .green = 0,
+       .blue = 0,
+       .on = true
+    },
+    "redoff" => {
+       .red = 1,
+       .green = 0,
+       .blue = 0,
+       .on = false
+    },
+    "greenled" => {
+       .red = 0,
+       .green = 1,
+       .blue = .4824,
+       .on = true
+    },
+    "greenoff" => {
+       .red = 0,
+       .green = 1,
+       .blue = .4824,
+       .on = false
+    },
+    "grayon" => {
+       .red = .9,
+       .green = .9,
+       .blue = .9,
+       .on = true
+    },
+    "grayled" => {
+       .red = .9,
+       .green = .9,
+       .blue = .9,
+       .on = false
+    },
+};
+
+void main ()
+{
+    for (int i = 1; i < dim(argv); i++) {
+       string          name = argv[i];
+       string[]        bits = String::split(name, ".");
+
+       if (dim(bits) != 2) {
+           File::fprintf(stderr, "Filename is weird: \"%s\"\n", argv[i]);
+           exit (1);
+       }
+
+       stock_t stock = stock_leds[bits[0]];
+       switch (bits[1]) {
+       case "png":
+           do_one_png(argv[i], stock.red, stock.green, stock.blue, stock.on);
+           break;
+       case "svg":
+           do_one_svg(argv[i], stock.red, stock.green, stock.blue, stock.on);
+           break;
+       }
+    }
+}
+
+if (dim(argv) > 0) {
+    main();
+}