Красивый способ превращать числа в строки, заданные подобным #define IAC 0x01

Команда препроцессора # берёт аргумент в кавычки. Тебе это нужно?

#define to_string(s) #s

Мне нужно поступающие числовые данные преобразовывать в строки и выводить в терминал. То есть поступил 0x01, вывожу «IAC».

Если #define можно переделать, то можно как-то так (X Macro):

#include <stdio.h>

#define IDS \
        X(none, 0x00) \
        X(IAC, 0x01) \
        X(IAB, 0x02)

enum {
#define X(id, value) id = value,
IDS
#undef X
};

static const char *map[] = {
#define X(id, value) [value] = #id,
IDS
#undef X
};

void main ()
{
  unsigned int i;

  for (i=0U; i<sizeof(map)/sizeof(map[0]); ++i) {
    printf("%d = %s\n", i, map[i]);
  }
}

$ ./a.out
0 = none
1 = IAC
2 = IAB

В ЦЛ просто заводить массив строк и выбираешь нужную по номеру.

А в common lisp как можно?

alist, hashmap, дженерики, сахарок на макросах. Если числа без пропусков, то просто массив строк.

Массив сформировать sed/awk из #define

Зачем?

сахарок на макросах

Можешь подсказать в виде идеи?

А в common lisp как можно?

http://clhs.lisp.se/Body/f_assocc.htm

(setq values '((x . 100) (y . 200) (z . 50))) =>  ((X . 100) (Y . 200) (Z . 50))

(assoc 'y values) =>  (Y . 200)

Немного не то, но, может, подскажет идею:

Перечисление констант:

https://github.com/sde-gui/libsde-utils-x11/blob/master/include/sde-utils-x11...

Их обработка:

https://github.com/sde-gui/libsde-utils-x11/blob/master/src/atoms.c

http://clhs.lisp.se/Body/f_assocc.htm

Ну да, ведь постоянно бегать по списку из списков и делать кучу сравнений, намного «лучше» чем просто получить значение по индексу.

Покажи на примере такого выражения:

(cdr
 (assoc
  (read)
   '(
    (18446744073709551615 . "The maximum unsigned 64 bit value")
    (4294967295 . "The maximum unsigned 32 bit value (2^32 - 1)")
    (65535 . "The maximum unsigned 16 bit value (2^16 - 1)")
    (255 . "The maximum unsigned 8 bit value (2^8 - 1")
    (9223372036854775807 . "The maximum signed 64 bit value")
    (2147483647 . "The maximum signed 32 bit valu")
    (32767 . "The maximum signed 16 bit value")
    (127 . "The maximum signed 8 bit value")
    (-128 . "Minimum signed 8 bit value")
    (-32768 . "Minimum signed 16 bit value")
    (-2147483648 . "Minimum signed 32 bit value")
    (-9223372036854775808 . "Minimum signed 64 bit value"))))

Тут уже хэш-таблицы лучше. Последний раз сравнивал на СБЦЛ - это лучше ощущается только после достаточно большого количества элементов - после 30-50.

Можешь подсказать в виде идеи?

Вообще я не очень понял, зачем тебе это надо. Судя по всем заморочкам, ты хочешь получать строковое представление идентификатора константы/переменной. Так вот в лиспе это есть из коробки, т.к. для любого символа можно получить строку через symbol-name.

> (setf IAC 1)
1

> (symbol-name 'IAC)
"IAC"

Если же тебе надо по числу получить строку, или символ, то тут уже без списка(массива, хэша и т.п.) символов никак не обойтись. Вот тут пригодится макрос, который засетапит значения переданных символов и список самих символов.

В итоге должно получиться что-то вроде такого

(defenum *codes* (IAC 1 FOO 2 BAR 3))
;;; Делает
;;; (setf IAC 1 FOO 2 BAR 3)
;;; (defvar *codes* (list 'IAC 'FOO 'BAR))
;;; по желанию можно deftype

(find-enum *codes* 1)
;;; Проходим по *codes*, ищем (= (symbol-value i) 1) возвращаем i и/или (symbol-name i)

Можно ещё сахарка накинуть, прикрутить switch по *codes* и т.п.

В CL есть аналог switch в C --- case. Если список констант известен на этапе компиляции или расходы на (compile nil '(lambda (id) (case id ...))) пренебрежимо малы, то можно через него.