Execute EXE from memory Lib

Developed or developing a new product in PureBasic? Tell the world about it.
Sanders
New User
New User
Posts: 4
Joined: Tue Jul 17, 2007 10:55 am

Post by Sanders »

Inf0Byt3 wrote:Here it is (it was on page 3):

http://purebasic.myftp.org/?filename=fi ... Shrink.zip

the link dont work

<br />
<b>Warning</b>: readfile(): Unable to access files/252/PureSFX/FShrink.zip in <b>/home/virtual/site1/fst/var/www/html/apps/pbwebstor/index.php</b> on line <b>20</b><br />
<br />
<b>Warning</b>: readfile(files/252/PureSFX/FShrink.zip): failed to open stream: No such file or directory in <b>/home/virtual/site1/fst/var/www/html/apps/pbwebstor/index.php</b> on line <b>20</b><br />


please give a working

thanks Sanders
Sanders
New User
New User
Posts: 4
Joined: Tue Jul 17, 2007 10:55 am

Post by Sanders »

please has someone the archive with source

please
Sanders
New User
New User
Posts: 4
Joined: Tue Jul 17, 2007 10:55 am

Post by Sanders »

no one ????????????? :cry: :cry: :cry:
User avatar
Rings
Moderator
Moderator
Posts: 1435
Joined: Sat Apr 26, 2003 1:11 am

Post by Rings »

no, we have only ??????? and some :cry: :cry: :cry:
SPAMINATOR NR.1
User avatar
DoubleDutch
Addict
Addict
Posts: 3220
Joined: Thu Aug 07, 2003 7:01 pm
Location: United Kingdom
Contact:

Post by DoubleDutch »

All the links seem to work for me - but the zip is damaged.
Poshu
Enthusiast
Enthusiast
Posts: 459
Joined: Tue Jan 25, 2005 7:01 pm
Location: Canada

Post by Poshu »

I'm looking for that as well. Does anyone has the zip please?
User avatar
Droopy
Enthusiast
Enthusiast
Posts: 658
Joined: Thu Sep 16, 2004 9:50 pm
Location: France
Contact:

Post by Droopy »

Poshu
Enthusiast
Enthusiast
Posts: 459
Joined: Tue Jan 25, 2005 7:01 pm
Location: Canada

Post by Poshu »

Droopy, je T'AIME.
Thx :3
johnfermor
User
User
Posts: 29
Joined: Wed Dec 31, 2003 3:17 pm

Post by johnfermor »

Can command-line arguments be passed to ExecuteEXE lib? I could REALLY use the functionality.

John
Henrik
Enthusiast
Enthusiast
Posts: 404
Joined: Sat Apr 26, 2003 5:08 pm
Location: Denmark

Post by Henrik »

Hi. You can find similar sources here on this forum and on the german forum
http://www.purebasic.fr/german/viewtopic.php?t=9172
You should be able to change it to your needs.

It's injecting a file into another programs address-space <-( i'm danish so i hope you get this)
In the german example your injetting notepad.exe in paint.exe address-space -' you can verify this in the Task Manager'-

The fact that it is injecting might fire off -'Some' - firewalls and viruskillers -'didn't happen here btw., but it might'-, but the same would happen with Maxus lib.

Best Henrik.
User avatar
Fluid Byte
Addict
Addict
Posts: 2336
Joined: Fri Jul 21, 2006 4:41 am
Location: Berlin, Germany

Post by Fluid Byte »

That code doesn't work at all. It will produce 2 memory access violation and 2 application errors before any antivirus or firewall software will get the chance to anything at all.
Windows 10 Pro, 64-Bit / Whose Hoff is it anyway?
Henrik
Enthusiast
Enthusiast
Posts: 404
Joined: Sat Apr 26, 2003 5:08 pm
Location: Denmark

Post by Henrik »

Nope. The code workes just fine here pb 4.20 b5, win xp sp2

There other examples on the forum, which might need some tweeking to get it working with pb 4, but they worked before.

Best Henrik.
thanos
Enthusiast
Enthusiast
Posts: 423
Joined: Sat Jan 12, 2008 3:25 pm
Location: Greece
Contact:

Post by thanos »

Inf0Byt3 wrote:Yes, that's not a bad idea... BTW, here are the sources for mine... (Just for reference :D)

FShrink Sources->FShrink.zip
Hello.
I am interested about the exe packer you wrote.
But unfortunately the link contains a damaged zip file.
Is there any other place to download the FShrink.zip?
Inf0Byt3 wrote:...About the encryption, my model was a modification of the self-encryption algo. Here it is the original code (i think Dare2 made it...)

Code: Select all

Procedure.s selfE(src.s,en.l)
  k1=Len(src)
  If k1>0
    *p=@src
    k2=PeekB(*p) & $FF
    r=k1 ! k2
    If r<>0 : PokeB(*p,r) : EndIf
    For i=2 To Len(src)
      *p+1
      If en : k1=PeekB(*p-1) & $FF : Else : k1=k2 : EndIf
      k2=PeekB(*p)
      r=k1 ! k2
      If r<>0 : PokeB(*p,r) : EndIf
    Next
  EndIf
  ProcedureReturn src
EndProcedure

w.s="Wooo! Hooo! This is self encrypting"
x.s=selfE(w,#True)
y.s=selfE(x,#False)
Debug w
Debug x
Debug y
The decryption results of the above code if you choose to create unicode executable and UTF-8 as the source file encoding are wrong.
Do you know why?
Regards.

Thanos
» myPersonal Banker :: Because you do not need to have a master degree in economics in order to organize your finances!
thanos
Enthusiast
Enthusiast
Posts: 423
Joined: Sat Jan 12, 2008 3:25 pm
Location: Greece
Contact:

Post by thanos »

Kiffi wrote:
Michael Vogel wrote:

Code: Select all

If PE <SetGadgetText> 0 And FileSize(File) < 32<<20
interesting Code ;-)

Greetings ... Kiffi
Hello.
The above code returns an error message in PureBasic 4.20:
Can't compare strings with numerical values
What is wrong?
Regards.

Thanos
» myPersonal Banker :: Because you do not need to have a master degree in economics in order to organize your finances!
Mistrel
Addict
Addict
Posts: 3415
Joined: Sat Jun 30, 2007 8:04 pm

Post by Mistrel »

Here is some new information regarding this topic. With this you could load an exe into the same process as a thread or inject it into another and then call either exported functions or main(), if you can find it.

http://sandsprite.com/CodeStuff/Using_a ... a_dll.html
Post Reply