1 files changed, 311 insertions, 0 deletions

diff --git a/other/zylyx/src/screen.c b/other/zylyx/src/screen.c
new file mode 100644
index 0000000..a4c707c
--- /dev/null
+++ b/other/zylyx/src/screen.c
@@ -0,0 +1,311 @@
+/* zylyx - file find
+ *
+ * screen and output module
+ *
+ * by team teso
+ */
+
+#define _ZYL_SCR_MAIN
+
+#include <pthread.h>
+#include <stdarg.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <slang.h>
+#include "screen.h"
+#include "zylyx.h"
+
+
+pthread_mutex_t screen_mutex;
+
+void
+scr_init (void)
+{
+        int     n;
+
+        pthread_mutex_init (&screen_mutex, NULL);
+        SLtt_get_terminfo ();
+        SLang_init_tty (-1, 0, 0);
+        n = SLsmg_init_smg ();
+        if (n == -1) {
+                fprintf (stderr, "SLsmg_init_smg failed\n");
+                exit (EXIT_FAILURE);
+        }
+        SLsmg_cls ();
+        scr_init_col ();
+        SLsmg_refresh ();
+
+        return;
+}
+
+
+void
+scr_init_col (void)
+{
+        /* give us some sneezy colors, oh yeah
+         */
+
+        SLtt_set_color (COL_SPICY, NULL, "white", "black");
+        SLtt_set_color (COL_MSPICY, NULL, "brightblue", "black");
+        SLtt_set_color (COL_LSPICY, NULL, "blue", "black");
+        SLtt_set_color (COL_TEXT, NULL, "gray", "black");
+        SLtt_set_color (COL_STEXT, NULL, "brightgreen", "black");
+        SLtt_set_color (COL_PRX_INACT, NULL, "green", "black");
+
+        return;
+}
+
+
+void
+scr_prg_init (void)
+{
+        scr_build_box (0, 0, SLtt_Screen_Cols - 1, 6);
+        scr_build_box (0, 6, SLtt_Screen_Cols - 1, SLtt_Screen_Rows - 1);
+
+        scr_banner ();
+
+        SLsmg_refresh ();
+
+        return;
+}
+
+
+void
+scr_banner (void)
+{
+        scr_cprint (2, 1, ":05zylyx v"VERSION":01 - :05file find:01 - :02"AUTHORS"\n");
+
+        scr_cprint (2, 3, ":05o :02opening connection  :02c connected  :04- :02connection failed\n");
+        scr_cprint (2, 4, ":02g :02try to get file  :02r receiving  :03j :02junk  :04f :02file not found\n");
+        scr_cprint (2, 5, ":04t :02timeouted  :01! :02file found\n");
+
+        return;
+}
+
+
+int
+scr_rprintf (int x, int y, const char *str, ...)
+{
+        char    tmp[1025];
+        va_list vl;
+        int     i;
+
+        va_start (vl, str);
+        memset (tmp, '\0', sizeof (tmp));
+        i = vsnprintf (tmp, sizeof (tmp) - 1, str, vl);
+        va_end (vl);
+
+        scr_rprint (x, y, tmp);
+        SLsmg_refresh ();
+
+        return (i);
+}
+
+
+void
+scr_rprint (int x, int y, char *str)
+{
+        scr_cprint (x, y, str);
+        SLsmg_refresh ();
+}
+
+
+void
+scr_cprint (int x, int y, char *str)
+{
+        pthread_mutex_lock (&screen_mutex);
+        SLsmg_gotorc (y, x);
+        scr_print (str);
+        pthread_mutex_unlock (&screen_mutex);
+}
+
+
+void
+scr_print (char *str1)
+{
+        char    *str = strdup (str1);
+        char    *prc = str;     /* process pointer */
+        char    *print_str;
+        int     color;
+
+        if (str[0] == ':') {
+                if (sscanf (str + 1, "%d", &color) != 1)
+                        goto p_fail;
+                SLsmg_set_color (color);
+                prc += 3;
+        }
+
+        while ((print_str = strsep (&prc, ":")) != NULL) {
+                SLsmg_write_string (print_str);
+                if (prc == NULL)
+                        goto p_fail;
+                if (sscanf (prc, "%d", &color) != 1)
+                        goto p_fail;
+                SLsmg_set_color (color);
+                prc += 2;
+        }
+
+p_fail:
+        free (str);
+
+        return;
+}
+
+
+void
+scr_build_box (int x1, int y1, int x2, int y2)
+{
+        pthread_mutex_lock (&screen_mutex);
+
+        scr_build_sline_v (x1, y1, ((y2 - y1) / 2) + y1, '+', '|', '+', COL_SPICY, COL_MSPICY, COL_LSPICY);
+        scr_build_sline_v (x2, y1, ((y2 - y1) / 2) + y1, '+', '|', '+', COL_SPICY, COL_MSPICY, COL_LSPICY);
+        scr_build_sline_h (y1, x1 + 1, ((x2 - x1 - 2) / 2) + x1, '-', '-', '-', COL_SPICY, COL_MSPICY, COL_LSPICY);
+        scr_build_sline_h (y2, x1 + 1, ((x2 - x1 - 2) / 2) + x1, '-', '-', '-', COL_SPICY, COL_MSPICY, COL_LSPICY);
+
+        scr_build_sline_v (x1, y2, ((y2 - y1) / 2) + y1, '|', '|', '+', COL_SPICY, COL_MSPICY, COL_LSPICY);
+        scr_build_sline_v (x2, y2, ((y2 - y1) / 2) + y1, '|', '|', '+', COL_SPICY, COL_MSPICY, COL_LSPICY);
+        scr_build_sline_h (y1, x2 - 1, ((x2 - x1) / 2) + x1, '-', '-', '-', COL_SPICY, COL_MSPICY, COL_LSPICY);
+        scr_build_sline_h (y2, x2 - 1, ((x2 - x1) / 2) + x1, '-', '-', '-', COL_SPICY, COL_MSPICY, COL_LSPICY);
+
+        pthread_mutex_unlock (&screen_mutex);
+
+        return;
+}
+
+
+void
+scr_build_sline_v (int x, int y1, int y2, char start, char fill, char end,
+        int objhigh, int objmed, int objlow)
+{
+        int     ly2, ly3;
+
+        if (y1 > y2) {
+                int     obj_tmp;
+
+                y2 ^= y1;
+                y1 ^= y2;
+                y2 ^= y1;
+
+                obj_tmp = objhigh;
+                objhigh = objlow;
+                objlow = objmed;
+                objmed = obj_tmp;
+
+                ly2 = ((y2 - y1) - ((y2 - y1) / 8)) + y1;
+                ly3 = ((y2 - y1) - ((y2 - y1) / 4)) + y1;
+        } else {
+                ly2 = ((y2 - y1) / 8) + y1;
+                ly3 = ((y2 - y1) / 4) + y1;
+        }
+
+        SLsmg_set_color (objhigh);
+        SLsmg_gotorc (y1, x);
+        SLsmg_write_char (start);
+
+        for (++y1 ; y1 < y2 ; ++y1) {
+                if (y1 == ly2) {
+                        SLsmg_set_color (objmed);
+                } else if (y1 == ly3) {
+                        SLsmg_set_color (objlow);
+                }
+                SLsmg_gotorc (y1, x);
+                SLsmg_write_char (fill);
+        }
+        SLsmg_gotorc (y2, x);
+        SLsmg_write_char (end);
+
+        return;
+}
+
+
+void
+scr_build_sline_h (int y, int x1, int x2, char start, char fill, char end,
+        int objhigh, int objmed, int objlow)
+{
+        int     lx2, lx3;
+
+        if (x1 > x2) {
+                int     obj_tmp;
+
+                x2 ^= x1;
+                x1 ^= x2;
+                x2 ^= x1;
+                obj_tmp = objhigh;
+                objhigh = objlow;
+                objlow = objmed;
+                objmed = obj_tmp;
+                lx2 = ((x2 - x1) - ((x2 - x1) / 8)) + x1;
+                lx3 = ((x2 - x1) - ((x2 - x1) / 4)) + x1;
+        } else {
+                lx2 = ((x2 - x1) / 8) + x1;
+                lx3 = ((x2 - x1) / 4) + x1;
+        }
+
+        SLsmg_set_color (objhigh);
+        SLsmg_gotorc (y, x1);
+        SLsmg_write_char (start);
+
+        for (++x1 ; x1 < x2 ; ++x1) {
+                if (x1 == lx2) {
+                        SLsmg_set_color (objmed);
+                } else if (x1 == lx3) {
+                        SLsmg_set_color (objlow);
+                }
+                SLsmg_gotorc (y, x1);
+                SLsmg_write_char (fill);
+        }
+        SLsmg_gotorc (y, x2);
+        SLsmg_write_char (end);
+
+        return;
+}
+
+
+void
+scr_build_line_v (int obj, int x, int y1, int y2, char start, char fill, char end)
+{
+        SLsmg_set_color (obj);
+        SLsmg_gotorc (y1, x);
+        SLsmg_write_char (start);
+
+        for (++y1 ; y1 < y2 ; ++y1) {
+                SLsmg_gotorc (y1, x);
+                SLsmg_write_char (fill);
+        }
+
+        SLsmg_gotorc (y2, x);
+        SLsmg_write_char (end);
+
+        return;
+}
+
+
+void
+scr_build_line_h (int obj, int y, int x1, int x2, char start, char fill, char end)
+{
+        SLsmg_set_color (obj);
+        SLsmg_gotorc (y, x1);
+        SLsmg_write_char (start);
+
+        for (++x1 ; x1 < x2 ; ++x1) {
+                SLsmg_gotorc (y, x1);
+                SLsmg_write_char (fill);
+        }
+
+        SLsmg_gotorc (y, x2);
+        SLsmg_write_char (end);
+
+        return;
+}
+
+
+void
+scr_exit (void)
+{
+        SLsmg_reset_smg ();
+        SLang_reset_tty ();
+
+        return;
+}
+