dirconvert.c

   1 /*-
   2  * SPDX-License-Identifier: BSD-2-Clause
   3  *
   4  * Copyright (c) 2021
   5  *      Cameron Katri.  All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY CAMERON KATRI AND CONTRIBUTORS ``AS IS'' AND
  17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED.  IN NO EVENT SHALL CAMERON KATRI OR CONTRIBUTORS BE LIABLE
  20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26  * SUCH DAMAGE.
  27  */
  28
  29 #include <ctype.h>
  30 #include <libgen.h>
  31 #include <stdbool.h>
  32 #include <stdio.h>
  33 #include <stdlib.h>
  34 #include <string.h>
  35 #include <sysexits.h>
  36
  37 #include "common.h"
  38
  39 static const char *types[11] = { "di", "ln", "so", "pi", "ex", "bd", "cd", "su",
  40         "sg", "tw", "ow" };
  41
  42 void usage(const char *);
  43 char *tols_colors(char *);
  44 char *tolscolors(char *);
  45
  46 int
  47 main(int argc, char **argv)
  48 {
  49         if (argc != 2)
  50                 usage(argv[0]);
  51
  52         char *input = NULL;
  53         if (strcmp(argv[1], "-") == 0) {
  54                 char *buf = NULL;
  55                 size_t linecap = 0;
  56                 getline(&buf, &linecap, stdin);
  57                 if (buf[sizeof(buf) - 1] == '\n')
  58                         buf[sizeof(buf) - 1] = '\0';
  59                 input = strdup(buf);
  60                 free(buf);
  61         } else
  62                 input = argv[1];
  63
  64         if (strchr(input, '='))
  65                 fprintf(stdout, "%s\n", tolscolors(input));
  66         else
  67                 fprintf(stdout, "%s\n", tols_colors(input));
  68
  69         return (0);
  70 }
  71
  72 char *
  73 tols_colors(char *lscolors)
  74 {
  75         char *ls_out = strdup("");
  76
  77         for (int i = 0; i < 11; i++) {
  78                 if (lscolors[2 * i] == 'x' && lscolors[2 * i + 1] == 'x')
  79                         continue;
  80                 sprintf(ls_out + strlen(ls_out), "%s=", types[i]);
  81                 if (isupper(lscolors[2 * i]))
  82                         sprintf(ls_out + strlen(ls_out), "01;");
  83                 if (isupper(lscolors[2 * i + 1]))
  84                         sprintf(ls_out + strlen(ls_out), "04;");
  85                 if (tolower(lscolors[2 * i]) == 'x')
  86                         sprintf(ls_out + strlen(ls_out), "00");
  87                 else if (tolower(lscolors[2 * i] != 'x'))
  88                         sprintf(ls_out + strlen(ls_out), "3%i", (int)tolower(lscolors[2 * i]) - 97);
  89                 if (tolower(lscolors[2 * i + 1]) != 'x')
  90                         sprintf(ls_out + strlen(ls_out), ";4%i", (int)tolower(lscolors[2 * i + 1]) - 97);
  91                 sprintf(ls_out + strlen(ls_out), ":");
  92         }
  93         char *ret = strdup(ls_out);
  94         free(ls_out);
  95         return (ret);
  96 }
  97
  98 char *
  99 tolscolors(char *dircolor)
 100 {
 101         char *ent;
 102         char key[2] = "", val[MAXKEYLEN] = "";
 103         char out[22] = "xxxxxxxxxxxxxxxxxxxx";
 104         struct color color;
 105
 106         while ((ent = strsep(&dircolor, ":")) != NULL) {
 107                 for (int i = 0; i < 11; i++) {
 108                         if (strncmp(ent, types[i], strlen(types[i])) == 0) {
 109                                 sscanf(ent, "%c%c=%s", &key[0], &key[1], val);
 110                                 parseansi(val, &color);
 111                                 out[2 * i] = color.fg;
 112                                 out[2 * i + 1] = color.bg;
 113                         }
 114                 }
 115         }
 116         char *ret = strdup(out);
 117         return (ret);
 118 }
 119
 120 void
 121 usage(const char *progname)
 122 {
 123         char *path;
 124         path = strdup(progname);
 125
 126         (void)fprintf(
 127             stderr, "usage: %s LSCOLORS | LS_COLORS\n", basename(path));
 128         exit(EX_USAGE);
 129 }