Refactorizar nuevamente

A medida que crece la biblioteca auxiliar, se vuelve más difícil seguirla de un vistazo. Refactorice nuevamente para mantener cada función pequeña y con un solo propósito.

Rompiendo la complejidad

Para que la función sea más fácil de seguir y mantener, divídala en funciones más pequeñas y enfocadas. Comience por separar la validación del enrutamiento de mensajes.

Crear una función de validación

Podemos tomar la parte de la función que valida los argumentos message y output y moverla a una función separada. De esta manera, la función principal send-message no necesita preocuparse por la validación, lo que facilita su seguimiento.

(define (validate-message message output)
  ;; Comprobar si el mensaje es una cadena no vacía
  (if (or (not (string? message)) (string=? message ""))
      (error "Message must be a non-empty string"))

  ;; Comprobar si la salida es uno de los destinos esperados
  (if (not (member output '(gui error-console terminal)))
      (error "Invalid output destination: " output)))

Simplifica el envío de mensajes

Ahora que la validación se ha movido a una función separada, la función send-message puede centrarse simplemente en enviar el mensaje. Será mucho más sencillo, ya que sólo se encarga de la tarea específica de dirigir el mensaje al destino correcto.

(define (send-message message output)
  ;; Llamar a la función de validación antes de continuar
  (validate-message message output)

  (cond
    ;; Enviar a la consola de mensajes
    ((eq? output 'error-console)
       (lumi-message-set-handler 2)
       (lumi-message message))

    ;; Enviar al cuadro de diálogo GUI
    ((eq? output 'gui)
       (lumi-message-set-handler 0)
       (lumi-message message))

    ;; Enviar a la ventana de terminal
    ((eq? output 'terminal)
       (display message)))

  ;; Restaurar el controlador de mensajes predeterminado a la consola de mensajes
  (lumi-message-set-handler 2))

Desglose más: separe cada controlador de salida

Cada tipo de salida de mensaje (GUI, consola de mensajes, terminal) se puede mover a su propia función. Esto permite realizar pruebas, modificaciones y posibles extensiones más fácilmente en el futuro.

(define (send-to-gui message)
  (lumi-message-set-handler 0)
  (lumi-message message))

(define (send-to-error-console message)
  (lumi-message-set-handler 2)
  (lumi-message message))

(define (send-to-terminal message)
  (display message))

(define (send-message message output)
  ;; Enviar a la salida adecuada
  (cond
    ((eq? output 'error-console) (send-to-error-console message))
    ((eq? output 'gui) (send-to-gui message))
    ((eq? output 'terminal) (send-to-terminal message)))

  ;; Restaurar el controlador de mensajes predeterminado a la consola de mensajes
  (lumi-message-set-handler 2))

Reutilizar la validación en cada función de envío

Dado que la validación es una parte importante para garantizar que tanto el mensaje como la salida sean correctos, tiene sentido que cada función send-* realice su propia validación. Esto garantiza que, sin importar qué salida se llame, siempre verificamos primero las entradas.

(define (send-to-gui message)
  ;; Validar el mensaje antes de continuar
  (validate-message message 'gui)
  (lumi-message-set-handler 0)
  (lumi-message message))

(define (send-to-error-console message)
  ;; Validar el mensaje antes de continuar
  (validate-message message 'error-console)
  (lumi-message-set-handler 2)
  (lumi-message message))

(define (send-to-terminal message)
  ;; Validar el mensaje antes de continuar
  (validate-message message 'terminal)
  (display message))

Vea que eliminamos la validación de la función de enviar mensaje y cambiamos la responsabilidad a cada función de salida individual. Este cambio garantiza que cada destino (GUI, consola de mensajes, terminal) maneje su propia validación, simplificando la función de envío de mensajes y manteniendo la lógica de validación más cerca de donde se necesita.

Este enfoque puede simplificar la función de envío de mensaje, convirtiéndola en un dispatcher, al tiempo que garantiza que cada función de envío a* valide el mensaje correctamente antes de procesarlo.

Al trasladar la validación a cada función de envío a*, las hemos hecho reutilizables como funciones independientes. Esto significa que podemos llamar a cualquiera de las funciones de envío a interfaz gráfica de usuario, de envío a consola de error o de envío a terminal directamente sin depender de la función del despachador de envío de mensajes. Cada una de estas funciones ahora maneja completamente su propia lógica y se puede usar de forma independiente en otras partes del código o en otros complementos, lo que hace que su código sea más modular y flexible.

Beneficios de la refactorización

Separación clara de preocupaciones: cada función ahora maneja solo una responsabilidad, lo que hace que el código sea más fácil de entender.
Extensibilidad: agregar nuevos tipos de salida es sencillo. Simplemente define una nueva función como send-to-file o send-to-logger, y luego agrega un caso en la declaración cond.
Reutilizabilidad: cada una de estas funciones de manejo de salida se puede reutilizar en otra parte de su proyecto o compartirse entre varios complementos.
Consistencia: al reutilizar la función de validación en cada función send-to-*, garantiza que todas las salidas estén validadas correctamente, lo que hace que el código sea más sólido.

Una versión de biblioteca refactorizada:

;; Propósito: Envía un mensaje al cuadro de diálogo GUI
(define (send-to-gui message)
  ;; Validar el mensaje antes de continuar
  (validate-message message 'gui)
  (lumi-message-set-handler 0)
  (lumi-message message))

;; Propósito: Envía un mensaje a la consola de mensajes
(define (send-to-error-console message)
  ;; Validar el mensaje antes de continuar
  (validate-message message 'error-console)
  (lumi-message-set-handler 2)
  (lumi-message message))

;; Propósito: Envía un mensaje a la ventana del terminal
(define (send-to-terminal message)
  ;; Validar el mensaje antes de continuar
  (validate-message message 'terminal)
  (display message))

;; Propósito: Envía un mensaje al destino de salida adecuado
(define (send-message message output)
  (cond
    ((eq? output 'error-console) (send-to-error-console message))
    ((eq? output 'gui) (send-to-gui message))
    ((eq? output 'terminal) (send-to-terminal message)))

  ;; Restaurar el controlador de mensajes predeterminado a la consola de mensajes
  (lumi-message-set-handler 2))

;; Propósito: Comprueba que el mensaje es una cadena no vacía y que la salida es válida
(define (validate-message message output)
  ;; Comprobar si el mensaje es una cadena no vacía
  (if (or (not (string? message)) (string=? message ""))
      (error "Message must be a non-empty string"))

  ;; Comprobar si la salida es uno de los destinos esperados
  (if (not (member output '(gui error-console terminal)))
      (error "Invalid output destination: " output)))

¿Eso es todo lo que podemos hacer? ¡No! hay más por hacer, sigue leyendo.

Validación Biblioteca de mensajería