Initial Commit - Copy from Altus Metrum AltOS

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();
+}