summaryrefslogtreecommitdiff
path: root/3544/CH2/EX2.25/Ex2_25.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3544/CH2/EX2.25/Ex2_25.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3544/CH2/EX2.25/Ex2_25.sce')
-rw-r--r--3544/CH2/EX2.25/Ex2_25.sce43
1 files changed, 43 insertions, 0 deletions
diff --git a/3544/CH2/EX2.25/Ex2_25.sce b/3544/CH2/EX2.25/Ex2_25.sce
new file mode 100644
index 000000000..676729f59
--- /dev/null
+++ b/3544/CH2/EX2.25/Ex2_25.sce
@@ -0,0 +1,43 @@
+//Encryption process in Playfair cipher
+
+// Move scilab to current file directory
+[u,t,n] = file()
+n = strcat(n)
+file_name = basename(n)+fileext(n)
+file_name = strcat(file_name)
+ind=strindex(n,file_name)
+path = part(n,1:ind-1)
+chdir(path)
+
+exec("Chapter_2.sci",-1)
+
+//Playfair cipher key
+key = "PLAYFAIR EXAMPLE"
+disp("Original plaintext:")
+pt = "MY NAME IS ATUL."
+disp(pt)
+
+//Using functions from dependency file to reformat the input
+
+pt = playfair_pt(pt) // substituting J to I and handling duplicates
+pt_digram = digram_array(pt) // converting to digrams
+
+disp("Plaintext message broken down into pair of elements:")
+print_matrix(pt_digram,0)
+disp("")
+a = ascii('A')
+
+key_matrix = playfair_matrix(key);
+// mat contains ascii values of characters of playfair matrix
+//Use "disp(mat)" to verify this
+disp("Playfair Cipher Key matrix: ")
+
+print_matrix(key_matrix,1)
+
+//disp(pt_matrix)
+ct_mat = encrypt_playfair(pt_digram,key_matrix)
+
+disp("Playfair ciphertext:")
+print_matrix(ct_mat,0)
+
+