我对凯撒密码的代码有疑问。我不会将我的评论更改为英语,但无论如何它们并不多。该程序由两个程序组成。一个是对凯撒密码进行编码,另一个是对凯撒密码进行解码。我这样做了,所以当我按 0 时,它应该运行编码部分,当我按 1 时,它应该运行解码部分。
编码程序应该像这样工作"0" -> "abc" -> "A" -> "bcd"
,而解码则改为“zab”。
糟糕的是,每当我按 0 或 1 时,它都会进行编码或解码。例如,如果有:
cmp $'0' , %bl
je LOOP1
cmp $'1' , %bl
je LOOP2
程序将在 0 和 1 编码后运行。如果我像在完整代码上一样更改它,即使我按 0(与 1 相同),它也会运行解码。所以可能比较有错误..
完整代码:
SYSCALL = 0X80
STDIN = 0
STDOUT = 1
SYSREAD = 3
SYSWRITE = 4
SYSEXIT = 1
EXIT_SUCCESS = 0
.data
msg_hello: .ascii "0-kodowanie 1-dekodowanie"
msg_hello_len = . - msg_hello
WYBOR_MAXLEN = 1
WYBOR: .space WYBOR_MAXLEN
WYBOR_LEN: .long 0
TEXT_MAXLEN = 64
TEXT: .space TEXT_MAXLEN
TEXT_LEN: .long 0
KEY_MAXLEN = 2
KEY: .space KEY_MAXLEN
KEY_LEN: .byte
.text
.global _start
_start:
#wczytanie powitania
mov $SYSWRITE, %eax
mov $STDOUT, %ebx
mov $msg_hello, %ecx
mov $msg_hello_len, %edx
int $SYSCALL
# wczytanie 01
mov $TEXT_MAXLEN, %edx
mov $TEXT, %ecx
mov $STDIN, %ebx
mov $SYSREAD, %eax
int $SYSCALL
mov %ebx, WYBOR_LEN # wybor
# wczytanie tekstu
mov $TEXT_MAXLEN, %edx
mov $TEXT, %ecx
mov $STDIN, %ebx
mov $SYSREAD, %eax
int $SYSCALL
mov %eax, TEXT_LEN # rzeczywista dlugosc wczytanego tekstu
#wczytywanie klucza
mov $KEY_MAXLEN, %edx
mov $KEY, %ecx
mov $STDIN, %ebx
mov $SYSREAD, %eax
int $SYSCALL
mov %eax, KEY_LEN # dlugosc klucza
xor %edx, %edx
movb KEY, %dl
sub $'A', %edx
add $1, %edx
mov $WYBOR_LEN, %ebx
cmp $'0' , %bl
je LOOP1
#cmp $'1' , %bl
jne LOOP2
#szyfr cezara
#klucz w edx
LOOP1:
mov $0, %ecx # licznik petli
sub $1, TEXT_LEN
ENCRYPTION_LOOP:
mov TEXT(, %ecx, 1), %eax #przesuwamy aktualny znak do rejestru al
cmp $'A', %al
jb DONT_ENCRYPT_CHAR
cmp $'z', %al
ja DONT_ENCRYPT_CHAR
cmp $'Z', %al
jna ENCRYPT_CHAR
cmp $'a', %al
jb DONT_ENCRYPT_CHAR
ENCRYPT_CHAR:
add %edx, %eax
cmp $'z', %al
jae CORRECT_CHAR_CODE
cmp $'a', %al
jae CHAR_CODE_OK
cmp $'Z', %al
ja CORRECT_CHAR_CODE
jmp CHAR_CODE_OK
CORRECT_CHAR_CODE:
sub $26, %al
CHAR_CODE_OK:
movb %al, TEXT(, %ecx, 1)
DONT_ENCRYPT_CHAR:
add $1, %ecx # inkrementacja licznika petli
cmp %ecx, TEXT_LEN
jne ENCRYPTION_LOOP
add $1, TEXT_LEN
jmp WYSWIETL
LOOP2:
mov $0, %ecx # licznik petli
sub $1, TEXT_LEN
DECRYPTION_LOOP:
mov TEXT(, %ecx, 1), %eax #przesuwamy aktualny znak do rejestru al
cmp $'A', %al
jb DONT_DECRYPT_CHAR
cmp $'z', %al
ja DONT_DECRYPT_CHAR
cmp $'Z', %al
jna DECRYPT_CHAR
cmp $'a', %al
jb DONT_DECRYPT_CHAR
DECRYPT_CHAR:
sub %edx, %eax
cmp $'A', %al
jb CORRECT_CHAR_CODE2
cmp $'Z', %al
jbe CHAR_CODE_OK2
cmp $'a', %al
jb CORRECT_CHAR_CODE2
jmp CHAR_CODE_OK2
ja CORRECT_CHAR_CODE2
jmp CHAR_CODE_OK2
CORRECT_CHAR_CODE2:
add $26, %al
CHAR_CODE_OK2:
movb %al, TEXT(, %ecx, 1)
DONT_DECRYPT_CHAR:
add $1, %ecx # inkrementacja licznika petli
cmp %ecx, TEXT_LEN
jne DECRYPTION_LOOP
add $1, TEXT_LEN
jmp WYSWIETL
WYSWIETL:
#wyswietlanie tekstu
mov TEXT_LEN, %edx
mov $TEXT, %ecx
mov $STDOUT, %ebx
mov $SYSWRITE, %eax
int $SYSCALL
EXIT:
# zakonczenie programu
mov $EXIT_SUCCESS, %ebx
mov $SYSEXIT, %eax
int $SYSCALL