Dự án chuyển, dịch ngôn ngữ lập trình

[fms17]

Các bạn có ý định xây dựng dự án về biên dịch, chuyển ngữ lập trình hay dịch ngược thì mời tham gia.

Xem:
http://diendan.congdongcviet.com/threads/t381342::hop-ngu-inline-assembler.cpp

[fms17]

Sẵn giới thiệu trình biên dịch nhỏ nhất - có luôn source code - mà tôi biết :

Inno Pascal 0.1.x
Copyright (C) 2000 Jordan Russell
For conditions of distribution and use, see LICENSE.TXT.
Home page: http://www.jrsoftware.org/
Current Inno Pascal home page: http://other.jrsoftware.org/ip/
E-mail: jr @ jrsoftware.org

http://other.jrsoftware.org/ip/

[fms17]

Ngày mai trong đám xuân xanh ấy
Có kẻ theo chồng bỏ cuộc chơi.

Ngày nay trong đám u minh ấy
Có kẻ quay về bỏ cuộc chơi.

Các tên tuổi một thời lẫy lừng như Macrobject\Obfuscator.NET 2009,


CodeVeil nay lùi về ký ức, trong catch


Phọt mô xa 2016

[fms17]

Như hình trên, hiện nay Obfuscator.NET 2009 chỉ support đến NetFx 3.5

Viết bằng 4.0 / 4.5 hay 4.6 thì không thể mã hoá - chạy được - với Macrobject. Một vận động viên dừng cuộc đua

Phọt mô xa 2016

[fms17]

obfuscation / deobfuscation

Một khái niệm cơ bản của reCompile, người ta sẽ biến đổi exec thành một dạng khác và đặt dấu ở chỗ khác
- biến đổi : nén, mã hoá, ...
- đặt dấu : trong resource, DLL, data, ...

Khi cần thực thi (run) nó sẽ lấy ra, biến đổi ngược lại (có thể không hoàn toàn) về exec ban đầu, nạp (load) để thực hiện.

Ví dụ đơn giản, với dự án sau:

using System;using System.Drawing;using System.Windows.Forms; namespace nsA.nsSub{ //@ nameSpase    static class Program{ //@ className        [STAThread]        static void Main(){ //@ entrypoint            Application.EnableVisualStyles();            Application.SetCompatibleTextRenderingDefault(false);            Application.Run(new Form1());        }    }//===    public partial class Form1 : Form{        public Form1(){            InitializeComponent();            timer1.Start();        }         void timer1_Tick(object sender, EventArgs e){            label1.Text = receiveAbc();        }        static string receiveAbc() {            return DateTime.Now.ToString();        }        void button1_Click(object sender, EventArgs e){            timer1.Stop();        }    }//===    partial class Form1{        protected override void Dispose(bool disposing){            if (disposing && (components != null))                components.Dispose();            base.Dispose(disposing);        }         void InitializeComponent(){            this.components = new System.ComponentModel.Container();            this.timer1 = new System.Windows.Forms.Timer(this.components);            this.label1 = new System.Windows.Forms.Label();            this.button1 = new System.Windows.Forms.Button();            this.SuspendLayout();            //            // timer1            //            this.timer1.Tick += new System.EventHandler(this.timer1_Tick);            //            // label1            //            this.label1.AutoSize = true;            this.label1.Location = new System.Drawing.Point(29, 25);            this.label1.Name = "label1";            this.label1.Size = new System.Drawing.Size(35, 13);            this.label1.TabIndex = 0;            this.label1.Text = "label1";            //            // button1            //            this.button1.Location = new System.Drawing.Point(102, 54);            this.button1.Name = "button1";            this.button1.Size = new System.Drawing.Size(75, 23);            this.button1.TabIndex = 1;            this.button1.Text = "&Stop";            this.button1.UseVisualStyleBackColor = true;            this.button1.Click += new System.EventHandler(this.button1_Click);            //            // Form1            //            this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 13F);            this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font;            this.ClientSize = new System.Drawing.Size(292, 100);            this.Controls.Add(this.button1);            this.Controls.Add(this.label1);            this.Name = "Form1";            this.Text = "Form1";            this.ResumeLayout(false);            this.PerformLayout();         }         System.ComponentModel.IContainer components = null;        System.Windows.Forms.Timer timer1;        System.Windows.Forms.Label label1;        System.Windows.Forms.Button button1;    }}

Nó được biên dịch thành exec : Prog.exe được biến đổi thành data và đặt trong file : aExec.dat
Để đơn giản, nó chỉ là đổi tên file, chưa nén cũng không mã hoá

Chương trình có nhiệm vụ nạp để chương trình trên thực hiện :

using System;using System.Reflection;using System.Windows.Forms; static class Md {    static void Main(string[] ss) {        try {            byte[] bys = System.IO.File.ReadAllBytes("aExec.dat");            //unZip, hay giải mã gì đó nữa, sao cho nó về dạng ban đầu            Assembly asm = Assembly.Load(bys);             Type typ = asm.GetType("nsA.nsSub.Program"); // namespace.className            MethodBase mb = typ.GetMethod("Main", BindingFlags.NonPublic | BindingFlags.Static); //entrypoint             object[] ts = new object[mb.GetParameters().Length]; //tham số            if (ts.Length != 0) ts[0] = ts;                       object obj = mb.Invoke(null, ts);        } catch (Exception ex) { MessageBox.Show(ex.StackTrace, ex.Message); }        //        MessageBox.Show("Abc", "Done");    }}

Xem full code trong file đính kèm : _Exam.rar

Phọt mô xa 2017

[khoaph]

obfuscation / deobfuscation

Một khái niệm cơ bản của reCompile, người ta sẽ biến đổi exec thành một dạng khác và đặt dấu ở chỗ khác
- biến đổi : nén, mã hoá, ...
- đặt dấu : trong resource, DLL, data, ...

Khi cần thực thi (run) nó sẽ lấy ra, biến đổi ngược lại (có thể không hoàn toàn) về exec ban đầu, nạp (load) để thực hiện.

Ví dụ đơn giản, với dự án sau:

using System;using System.Drawing;using System.Windows.Forms; namespace nsA.nsSub{ //@ nameSpase    static class Program{ //@ className        [STAThread]        static void Main(){ //@ entrypoint            Application.EnableVisualStyles();            Application.SetCompatibleTextRenderingDefault(false);            Application.Run(new Form1());        }    }//===    public partial class Form1 : Form{        public Form1(){            InitializeComponent();            timer1.Start();        }         void timer1_Tick(object sender, EventArgs e){            label1.Text = receiveAbc();        }        static string receiveAbc() {            return DateTime.Now.ToString();        }        void button1_Click(object sender, EventArgs e){            timer1.Stop();        }    }//===    partial class Form1{        protected override void Dispose(bool disposing){            if (disposing && (components != null))                components.Dispose();            base.Dispose(disposing);        }         void InitializeComponent(){            this.components = new System.ComponentModel.Container();            this.timer1 = new System.Windows.Forms.Timer(this.components);            this.label1 = new System.Windows.Forms.Label();            this.button1 = new System.Windows.Forms.Button();            this.SuspendLayout();            //            // timer1            //            this.timer1.Tick += new System.EventHandler(this.timer1_Tick);            //            // label1            //            this.label1.AutoSize = true;            this.label1.Location = new System.Drawing.Point(29, 25);            this.label1.Name = "label1";            this.label1.Size = new System.Drawing.Size(35, 13);            this.label1.TabIndex = 0;            this.label1.Text = "label1";            //            // button1            //            this.button1.Location = new System.Drawing.Point(102, 54);            this.button1.Name = "button1";            this.button1.Size = new System.Drawing.Size(75, 23);            this.button1.TabIndex = 1;            this.button1.Text = "&Stop";            this.button1.UseVisualStyleBackColor = true;            this.button1.Click += new System.EventHandler(this.button1_Click);            //            // Form1            //            this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 13F);            this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font;            this.ClientSize = new System.Drawing.Size(292, 100);            this.Controls.Add(this.button1);            this.Controls.Add(this.label1);            this.Name = "Form1";            this.Text = "Form1";            this.ResumeLayout(false);            this.PerformLayout();         }         System.ComponentModel.IContainer components = null;        System.Windows.Forms.Timer timer1;        System.Windows.Forms.Label label1;        System.Windows.Forms.Button button1;    }}

Nó được biên dịch thành exec : Prog.exe được biến đổi thành data và đặt trong file : aExec.dat
Để đơn giản, nó chỉ là đổi tên file, chưa nén cũng không mã hoá

Chương trình có nhiệm vụ nạp để chương trình trên thực hiện :

using System;using System.Reflection;using System.Windows.Forms; static class Md {    static void Main(string[] ss) {        try {            byte[] bys = System.IO.File.ReadAllBytes("aExec.dat");            //unZip, hay giải mã gì đó nữa, sao cho nó về dạng ban đầu            Assembly asm = Assembly.Load(bys);             Type typ = asm.GetType("nsA.nsSub.Program"); // namespace.className            MethodBase mb = typ.GetMethod("Main", BindingFlags.NonPublic | BindingFlags.Static); //entrypoint             object[] ts = new object[mb.GetParameters().Length]; //tham số            if (ts.Length != 0) ts[0] = ts;                       object obj = mb.Invoke(null, ts);        } catch (Exception ex) { MessageBox.Show(ex.StackTrace, ex.Message); }        //        MessageBox.Show("Abc", "Done");    }}

Xem full code trong file đính kèm : _Exam.rar

Phọt mô xa 2017

Viết sai chính tả rồi, đặt giấu chứ không phải là đặt dấu, làm mình nghĩ cả buổi

- - - Nội dung đã được cập nhật ngày 19-02-2017 lúc 08:59 PM - - -

đề nghị bác khi kí tên nước ngoài thì cứ để nguyên và có thể thêm phiên âm tiếng Việt
chứ chỉ để phiên âm như vậy người ta không hiểu đâu, bác thử google chữ phọt mô xa của bác thử nó ra kết quả gì

[MHoang]

Tôi hiểu từ dấu trong các đoạn trên của VH là dấu diếm, ỉm đi, không để trước mắt ai. Theo nghĩa này thì không sai chính tả.

[fms17]

Tiếng Việt thật phức tạp, một người như tôi - thường tự hào về tiếng Việt - mà vẫn vấp té.

Mười bảy hay là mười tám đây,
Cho ta yêu dấu chẳng rời tay.
Mỏng dày từng ấy, chành ba góc,
Rộng hẹp dường nào, cắm một cay.
Càng nóng bao nhiêu càng mát nấy,
Yêu đêm chưa phỉ lại yêu ngày.
Hồng hồng má phấn duyên vì cậy,
Chúa dấu vua yêu một cái này.

Formosa : Đài Loan chăng ?

Năm 1554, có tàu của Bồ Đào Nha đi qua vùng biển Đài Loan, thủy thủ nhìn từ xa thấy Đài Loan rất đẹp nên hô "Ilha Formosa!", ý là hòn đảo xinh đẹp[31]. Trước thập niên 1950, các quốc gia châu Âu chủ yếu gọi Đài Loan là "Formosa"[32].

Nguồn : https://vi.wikipedia.org/wiki/%C4%90%C3%A0i_Loan

Phọt mô xa 2017

[MHoang]

Tiếng Việt thật phức tạp, một người như tôi - thường tự hào về tiếng Việt - mà vẫn vấp té.

Mười bảy hay là mười tám đây,
Cho ta yêu dấu chẳng rời tay.
Mỏng dày từng ấy, chành ba góc,
Rộng hẹp dường nào, cắm một cay.
Càng nóng bao nhiêu càng mát nấy,
Yêu đêm chưa phỉ lại yêu ngày.
Hồng hồng má phấn duyên vì cậy,
Chúa dấu vua yêu một cái này.

Formosa : Đài Loan chăng ?

Nguồn : https://vi.wikipedia.org/wiki/%C4%90%C3%A0i_Loan

Phọt mô xa 2017

Đọc thơ lại nhớ thơ (Tưởng nhớ HXH)

Phành ra 3 góc ...
Khép lại đôi bên ...

[khoaph]

Tiếng Việt thật phức tạp, một người như tôi - thường tự hào về tiếng Việt - mà vẫn vấp té.

Mười bảy hay là mười tám đây,
Cho ta yêu dấu chẳng rời tay.
Mỏng dày từng ấy, chành ba góc,
Rộng hẹp dường nào, cắm một cay.
Càng nóng bao nhiêu càng mát nấy,
Yêu đêm chưa phỉ lại yêu ngày.
Hồng hồng má phấn duyên vì cậy,
Chúa dấu vua yêu một cái này.

Formosa : Đài Loan chăng ?

Nguồn : https://vi.wikipedia.org/wiki/%C4%90%C3%A0i_Loan

Phọt mô xa 2017

Tôi giữ nguyên ý kiến của mình về chữ ký của bác, khi người ta thấy một từ mà không hiểu, chắc là người ta sẽ tìm trên google, nhưng với chữ ký của bác, thì tìm ra không kết quả gì, không phải bác đang tuyên truyền về vụ đó sao