rule win_pirpi_auto {

    meta:
        author = "Felix Bilstein - yara-signator at cocacoding dot com"
        date = "2020-12-22"
        version = "1"
        description = "autogenerated rule brought to you by yara-signator"
        tool = "yara-signator v0.6.0"
        signator_config = "callsandjumps;datarefs;binvalue"
        malpedia_reference = "https://malpedia.caad.fkie.fraunhofer.de/details/win.pirpi"
        malpedia_rule_date = "20201222"
        malpedia_hash = "30354d830a29f0fbd3714d93d94dea941d77a130"
        malpedia_version = "20201023"
        malpedia_license = "CC BY-SA 4.0"
        malpedia_sharing = "TLP:WHITE"

    /* DISCLAIMER
     * The strings used in this rule have been automatically selected from the
     * disassembly of memory dumps and unpacked files, using YARA-Signator.
     * The code and documentation is published here:
     * https://github.com/fxb-cocacoding/yara-signator
     * As Malpedia is used as data source, please note that for a given
     * number of families, only single samples are documented.
     * This likely impacts the degree of generalization these rules will offer.
     * Take the described generation method also into consideration when you
     * apply the rules in your use cases and assign them confidence levels.
     */


    strings:
        $sequence_0 = { 7438 8b942440050000 56 53 }
            // n = 4, score = 200
            //   7438                 | je                  0x3a
            //   8b942440050000       | mov                 edx, dword ptr [esp + 0x540]
            //   56                   | push                esi
            //   53                   | push                ebx

        $sequence_1 = { 03d0 51 52 ff15???????? 83c414 b801000000 }
            // n = 6, score = 200
            //   03d0                 | add                 edx, eax
            //   51                   | push                ecx
            //   52                   | push                edx
            //   ff15????????         |                     
            //   83c414               | add                 esp, 0x14
            //   b801000000           | mov                 eax, 1

        $sequence_2 = { 51 52 68???????? 50 ff15???????? 8b8324200000 33d2 }
            // n = 7, score = 200
            //   51                   | push                ecx
            //   52                   | push                edx
            //   68????????           |                     
            //   50                   | push                eax
            //   ff15????????         |                     
            //   8b8324200000         | mov                 eax, dword ptr [ebx + 0x2024]
            //   33d2                 | xor                 edx, edx

        $sequence_3 = { 5e b805000000 5b 83c40c c20800 }
            // n = 5, score = 200
            //   5e                   | pop                 esi
            //   b805000000           | mov                 eax, 5
            //   5b                   | pop                 ebx
            //   83c40c               | add                 esp, 0xc
            //   c20800               | ret                 8

        $sequence_4 = { e8???????? 3933 0f84cffeffff 8b442418 8b542430 }
            // n = 5, score = 200
            //   e8????????           |                     
            //   3933                 | cmp                 dword ptr [ebx], esi
            //   0f84cffeffff         | je                  0xfffffed5
            //   8b442418             | mov                 eax, dword ptr [esp + 0x18]
            //   8b542430             | mov                 edx, dword ptr [esp + 0x30]

        $sequence_5 = { 52 f3a4 8bfa 83c9ff f2ae f7d1 }
            // n = 6, score = 200
            //   52                   | push                edx
            //   f3a4                 | rep movsb           byte ptr es:[edi], byte ptr [esi]
            //   8bfa                 | mov                 edi, edx
            //   83c9ff               | or                  ecx, 0xffffffff
            //   f2ae                 | repne scasb         al, byte ptr es:[edi]
            //   f7d1                 | not                 ecx

        $sequence_6 = { 8d8424c4020000 52 50 e8???????? }
            // n = 4, score = 200
            //   8d8424c4020000       | lea                 eax, [esp + 0x2c4]
            //   52                   | push                edx
            //   50                   | push                eax
            //   e8????????           |                     

        $sequence_7 = { 53 55 ff15???????? 668b4e0c }
            // n = 4, score = 200
            //   53                   | push                ebx
            //   55                   | push                ebp
            //   ff15????????         |                     
            //   668b4e0c             | mov                 cx, word ptr [esi + 0xc]

        $sequence_8 = { 51 8b8834010000 51 8bcd e8???????? 8b542420 50 }
            // n = 7, score = 200
            //   51                   | push                ecx
            //   8b8834010000         | mov                 ecx, dword ptr [eax + 0x134]
            //   51                   | push                ecx
            //   8bcd                 | mov                 ecx, ebp
            //   e8????????           |                     
            //   8b542420             | mov                 edx, dword ptr [esp + 0x20]
            //   50                   | push                eax

        $sequence_9 = { 33c0 83e103 f3a4 33f6 3be8 7615 8b4c2418 }
            // n = 7, score = 200
            //   33c0                 | xor                 eax, eax
            //   83e103               | and                 ecx, 3
            //   f3a4                 | rep movsb           byte ptr es:[edi], byte ptr [esi]
            //   33f6                 | xor                 esi, esi
            //   3be8                 | cmp                 ebp, eax
            //   7615                 | jbe                 0x17
            //   8b4c2418             | mov                 ecx, dword ptr [esp + 0x18]

    condition:
        7 of them and filesize < 327680
}