**
Nombre: cant.s
Autor: Karla Itzel Vázquez Cruz
Fecha: 10-04-2025
Descripción: Largo de una cadena
Plataforma: Raspberry Pi OS 64-bit
Asciinema: cant.s

Versión en C:

int largo_cadena(const char *cadena) {
    return strlen(cadena);
}

Versión en ARM64 RaspbianOS Linux:

.global _start

.section .bss
input_buffer: .skip 128     // Buffer para la cadena
number_buffer: .skip 16     // Buffer para el número en texto

.section .text

_start:
    // ======================
    // Leer cadena desde stdin
    // ======================
    MOV X0, #0              // stdin
    ADR X1, input_buffer    // buffer destino
    MOV X2, #128            // tamaño máx
    MOV X8, #63             // syscall: read
    SVC #0
    MOV X20, X0             // Guardar longitud original

    // ======================
    // Eliminar el salto de línea (\n)
    // ======================
    ADR X1, input_buffer
ADD X1, X1, X20         // apunta al final
SUB X1, X1, #1          // retrocede 1
LDRB W2, [X1]
CMP W2, #10             // comparar con '\n'
BNE skip_trim
SUB X20, X20, #1        // descontar \n
skip_trim:
 // ======================
    // Mostrar mensaje: "Longitud: "
    // ======================
    LDR X1, =msg
    MOV X2, #10             // longitud del mensaje
    MOV X0, #1              // stdout
    MOV X8, #64             // syscall: write
    SVC #0

    // ======================
    // Convertir número (X20) a ASCII
    // ======================
    MOV X6, X20             // número a convertir
    BL print_number         // convierte y lo imprime

    // Salto de línea
    LDR X1, =newline
    MOV X2, #1
    MOV X0, #1
    MOV X8, #64
    SVC #0

    // ======================
    // Salida limpia
    // ======================
    MOV X0, #0
    MOV X8, #93             // syscall: exit
    SVC #0

// ========================================
// Función: print_number
// Entrada: X6 = número
// Usa: number_buffer para la conversión
// ========================================
print_number:
    ADR X7, number_buffer
    ADD X7, X7, #15         // apuntamos al final
    MOV X8, X6              // copia del número
    MOV X9, #0              // contador de dígitos

print_loop:
    MOV X10, #10
    UDIV X11, X8, X10       // cociente
    MUL X12, X11, X10
    SUB X13, X8, X12        // resto
    ADD X13, X13, #'0'      // convertir a ASCII
    STRB W13, [X7], #-1     // guardar y retroceder
    MOV X8, X11
    ADD X9, X9, #1
    CBNZ X8, print_loop

    // Imprimir número
    ADD X1, X7, #1          // buffer corregido
    MOV X2, X9              // longitud
    MOV X0, #1
    MOV X8, #64
    SVC #0

    RET

.section .rodata
msg:     .asciz "Longitud: "
newline: .asciz "\n"