rule win_rad_auto {

    meta:
        author = "Felix Bilstein - yara-signator at cocacoding dot com"
        date = "2026-05-04"
        version = "1"
        description = "Detects win.rad."
        info = "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.rad"
        malpedia_rule_date = "20260422"
        malpedia_hash = "a182e35da64e6d71cb55f125c4d4225196523f14"
        malpedia_version = "20260504"
        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 = { 8d4dd4 c745e80f000000 e8???????? 8975fc 8b75b4 8d45d4 }
            // n = 6, score = 100
            //   8d4dd4               | lea                 ecx, [ebp - 0x2c]
            //   c745e80f000000       | mov                 dword ptr [ebp - 0x18], 0xf
            //   e8????????           |                     
            //   8975fc               | mov                 dword ptr [ebp - 4], esi
            //   8b75b4               | mov                 esi, dword ptr [ebp - 0x4c]
            //   8d45d4               | lea                 eax, [ebp - 0x2c]

        $sequence_1 = { 05c8030000 50 8d8db8feffff ff15???????? 8d8db8feffff c645fc15 ff15???????? }
            // n = 7, score = 100
            //   05c8030000           | add                 eax, 0x3c8
            //   50                   | push                eax
            //   8d8db8feffff         | lea                 ecx, [ebp - 0x148]
            //   ff15????????         |                     
            //   8d8db8feffff         | lea                 ecx, [ebp - 0x148]
            //   c645fc15             | mov                 byte ptr [ebp - 4], 0x15
            //   ff15????????         |                     

        $sequence_2 = { e8???????? 8be5 5d c3 be26000000 b8???????? 8d4c243c }
            // n = 7, score = 100
            //   e8????????           |                     
            //   8be5                 | mov                 esp, ebp
            //   5d                   | pop                 ebp
            //   c3                   | ret                 
            //   be26000000           | mov                 esi, 0x26
            //   b8????????           |                     
            //   8d4c243c             | lea                 ecx, [esp + 0x3c]

        $sequence_3 = { 898415ccfeffff ff15???????? 8b8d68ffffff 8bb574ffffff 83e980 51 8d9570ffffff }
            // n = 7, score = 100
            //   898415ccfeffff       | mov                 dword ptr [ebp + edx - 0x134], eax
            //   ff15????????         |                     
            //   8b8d68ffffff         | mov                 ecx, dword ptr [ebp - 0x98]
            //   8bb574ffffff         | mov                 esi, dword ptr [ebp - 0x8c]
            //   83e980               | sub                 ecx, -0x80
            //   51                   | push                ecx
            //   8d9570ffffff         | lea                 edx, [ebp - 0x90]

        $sequence_4 = { be12000000 b8???????? 8d4c2418 895c2428 885c2418 e8???????? }
            // n = 6, score = 100
            //   be12000000           | mov                 esi, 0x12
            //   b8????????           |                     
            //   8d4c2418             | lea                 ecx, [esp + 0x18]
            //   895c2428             | mov                 dword ptr [esp + 0x28], ebx
            //   885c2418             | mov                 byte ptr [esp + 0x18], bl
            //   e8????????           |                     

        $sequence_5 = { c745fc00000000 e8???????? 8b5dac 8b03 8b5004 8bcb }
            // n = 6, score = 100
            //   c745fc00000000       | mov                 dword ptr [ebp - 4], 0
            //   e8????????           |                     
            //   8b5dac               | mov                 ebx, dword ptr [ebp - 0x54]
            //   8b03                 | mov                 eax, dword ptr [ebx]
            //   8b5004               | mov                 edx, dword ptr [eax + 4]
            //   8bcb                 | mov                 ecx, ebx

        $sequence_6 = { 83fb0b 0f95c0 85c0 0f94c0 84c0 740e 8b442418 }
            // n = 7, score = 100
            //   83fb0b               | cmp                 ebx, 0xb
            //   0f95c0               | setne               al
            //   85c0                 | test                eax, eax
            //   0f94c0               | sete                al
            //   84c0                 | test                al, al
            //   740e                 | je                  0x10
            //   8b442418             | mov                 eax, dword ptr [esp + 0x18]

        $sequence_7 = { e9???????? 8db514faffff e9???????? 8d8d4cfaffff ff25???????? 8db530faffff }
            // n = 6, score = 100
            //   e9????????           |                     
            //   8db514faffff         | lea                 esi, [ebp - 0x5ec]
            //   e9????????           |                     
            //   8d8d4cfaffff         | lea                 ecx, [ebp - 0x5b4]
            //   ff25????????         |                     
            //   8db530faffff         | lea                 esi, [ebp - 0x5d0]

        $sequence_8 = { 8b06 2bc8 51 50 57 ff15???????? 8b06 }
            // n = 7, score = 100
            //   8b06                 | mov                 eax, dword ptr [esi]
            //   2bc8                 | sub                 ecx, eax
            //   51                   | push                ecx
            //   50                   | push                eax
            //   57                   | push                edi
            //   ff15????????         |                     
            //   8b06                 | mov                 eax, dword ptr [esi]

        $sequence_9 = { 8b35???????? 50 8d8c2400020000 ffd6 8d8c2474010000 51 8bc8 }
            // n = 7, score = 100
            //   8b35????????         |                     
            //   50                   | push                eax
            //   8d8c2400020000       | lea                 ecx, [esp + 0x200]
            //   ffd6                 | call                esi
            //   8d8c2474010000       | lea                 ecx, [esp + 0x174]
            //   51                   | push                ecx
            //   8bc8                 | mov                 ecx, eax

    condition:
        7 of them and filesize < 207872
}