Anonimailer - Send Anonymous E-mail

PB · Post by PB » Sun Aug 14, 2005 1:20 am

>> His name, avatar and number of posts don't do him any favors
>
> hmm... and what about me ?

Yours is just a fantasy.

His name is too similar to "saboteur", so let's
have a brief summary of his history here: a newbie with only 23 posts, with
a name meaning someone who commits sabotage, who has two previous
posts with dubious topics (one is how to harvest e-mail addresses from web
pages, and the other is how to hide an app from the CTRL+ALT+DEL list),
and now he posts a program without source that collects e-mail addresses
from those who use it but doesn't actually send anything anywhere. Doesn't
seem right to me.

Hroudtwolf · Post by **Hroudtwolf** » Sun Aug 14, 2005 3:11 am

This is'nt a nice tool.
Please, delete it from here.
You support new spammers.

sec · Post by **sec** » Sun Aug 14, 2005 3:16 am

<TITLE>ARE YOU A SPAMMER?</TITLE>

16 is here. wrote:Lower than 20

You only use e-mail to get in touch with friends, family and the people you find interesting on the Internet. People that receive your mail can be sure it is written to them with care and attention.

thefool · Post by **thefool** » Sun Aug 14, 2005 9:22 am

i got 12 in the test

well that the same answer as above.

@PB: well, the name "sabater" is afaik for someone who "sabat" like witch's and that stuff. they sacrifice other humans etc. its a very negative username.

Post by **Dare2** » Sun Aug 14, 2005 10:06 am

Score: 4 (What's email?

)

LuCiFeR[SD] · Post by **LuCiFeR[SD]** » Sun Aug 14, 2005 10:30 am

And don't forget his little MSN killing Application(click here for link)... the one with the executable named "svchost.exe".

I had to laugh at his reply to my "Accusation" at him.

Any of you with XP, try killing all the tasks named "svchost" via task manager and tell me that he wasn't trying to be a nasty piece of work

It's not like I've got a nice name or lots of posts either

... but I have been around for an eternity

thefool · Post by **thefool** » Sun Aug 14, 2005 11:28 am

lol dare2

@lucifer:

this is also worrying:

Code: Select all

MessageRequester("MSN Messenger Error!","FATAL ERROR!!!",#PB_MessageRequester_Ok)

he said that it was because messenger was irritating, why would he like to have a fake error message? And naming the program svchost :roll:
i guess he did the program to irritate his "friends" or so

sabater · Post by **sabater** » Wed Aug 17, 2005 6:02 pm

Like you are distrustful:shock:
Excuse my delay from response. This post was moved from the original category in the forum and then I not found it, and I thought which it was deleted, more now I found it.
Responding the questions about the program Anonimailer:
In this String:

Enviado para:

This string is in portuguese and in english is Sent to.
When a person send a E-mail with anonimailer, I receive a copy of the e-mail sent.
In the beginning of the e-mail which I receive have this line: Enviado para: anybody@anyserver.com Conteúdo: content_of_email
The word Conteúdo in english signifies Content
After the word Conteúdo, is all the content of the e-mail( text, images, etc...)

For example. You send a e-mail to anybody@anyserver.com with the content:
I'm the better!
I'm the better!
I'm the better!

then I receive a copy of the e-mail.
In this case, I receive a e-mail with the content:
Enviado para: anybody@anyserver.com Conteúdo:
I'm the better!
I'm the better!
I'm the better!

PB wrote:

His name is too similar to "saboteur", so let's

Sabater is my last name.

thefool · Post by **thefool** » Wed Aug 17, 2005 6:16 pm

sabater wrote: When a person send a E-mail with anonimailer, I receive a copy of the e-mail sent.

wich is not just unlegal, its VERY unlegal and if anybody sued you, you would get a big ticket. Dont do that kind of stuff WITHOUT WRITING IT! Now, i dont intend to sue you however take it as a warning because if anybody gets upset about this, you are on the very wrong side of the law!
break on private rights and more.

Why dont you use the knowlegde you gathered from writing this, study the pop3 protocol and purebasic a bit more and write a nice little mail client? (OPEN SOURCE! i doubt anyone will use your compiled tools anymore after this little "episode"..! at least, i can tell that i would not do that. you probably just ruined all thrust to you on this forum...)

His name is too similar to "saboteur", so let's
Sabater is my last name.

oh

ricardo · Post by **ricardo** » Wed Aug 17, 2005 6:56 pm

sabater wrote: When a person send a E-mail with anonimailer, I receive a copy of the e-mail sent.

You or the person that send it?

I guees you have not be clear and i want to believe that the guy who send the e mail receive the copy not you... i am right?

thefool · Post by **thefool** » Wed Aug 17, 2005 7:00 pm

sorry, ricardo. here he states it:

For example. You send a e-mail to anybody@anyserver.com with the content:
I'm the better!
I'm the better!
I'm the better!

then I receive a copy of the e-mail.
In this case, I receive a e-mail with the content:
Enviado para: anybody@anyserver.com Conteúdo:
I'm the better!
I'm the better!
I'm the better!

he DOES receive a copy of the email as well as the one you send it to.

sabater · Post by **sabater** » Wed Aug 17, 2005 7:13 pm

For example. You send a e-mail to anybody@anyserver.com with the content:
I'm the better!
I'm the better!
I'm the better!

then I receive a copy of the e-mail.
In this case, I receive a e-mail with the content:
Enviado para: anybody@anyserver.com Conteúdo:
I'm the better!
I'm the better!
I'm the better!

he DOES receive a copy of the email as well as the one you send it to.

I and the person of the field From: receive the e-mail. More the person of the field From: don't receive this line Enviado para: anybody@anyserver.com Conteúdo:

Now this episode already is past. OK :roll:

This is the source code of the Anonimailer.

Code: Select all

; PureBasic Visual Designer v3.90 build 1361

IncludeFile "Common2.pb"
code:
casep=0
Global res.s, cr.s, ConnID.l 
Open_Window_0() 
Repeat 
  Select WaitWindowEvent()
   Case #PB_Event_CloseWindow  
      End 
  Case #PB_Event_Gadget
          
          Select EventGadgetID()
            
          Case #Button_0
          casep=1
          ;SetGadgetText(#String_3,"Enviando... Por Favor. Aguarde")
  EndSelect   
  Case #PB_Event_Menu

  Select EventMenuID()  ; To see which menu has been selected
  Case #MENU_6
    MessageRequester("Anonimailer 2.0","Created by a Human")
  
  Case #MENU_3
    End
  Case #MENU_2
    createfile$ = SaveFileRequester("Save","",".txt", PatternPosition)
    CreateFile(#PB_Any,createfile$)
    WriteString(GetGadgetText(#Editor_0))
  Case #MENU_1 
    opentextmail$ = OpenFileRequester("Open Text","",".txt", PatternPosition)
    d=ReadFile(1,opentextmail$)
    If d 
      While Eof(1)=0 
        Text$ = text$+ReadString()+Chr(13)+ Chr(10) 
      Wend 
      CloseFile(1) 
      SetGadgetText(#Editor_0, Text$) 
      Else 
      ;MessageRequester("Error","No valid file was selected.",#MB_ICONERROR) 
      EndIf 
  EndSelect 
  
  Case #PB_Event_CloseWindow
        Quit = 1
        

  EndSelect      
            

 Until casep=1;Quit = 1 

cr.s=Chr(13)+Chr(10)
mailto.s=GetGadgetText(#String_0)
;cco.s="sabater_wb@yahoo.com.br"
mailfrom.s=GetGadgetText(#String_1)
subject.s=GetGadgetText(#String_2)
conteudo.s=GetGadgetText(#Editor_0)
If conteudo=""
  conteudo="Sem conteudo"
EndIf   
Procedure send(msg.s) 
  SendNetworkData(ConnID,@msg,Len(msg)) 
  ;;Debug "send: "+msg 
EndProcedure 

Procedure.s wait() 
  res="" 
  For tmp=1 To 4999 
    res+" " 
  Next 
  ReceiveNetworkData(ConnID,@res,4999) 
  ;Debug "received: "+res 
  res=Left(res,3) 
  ProcedureReturn res 
EndProcedure 

Procedure.l sendmail(mailserver.s,mailto.s,mailfrom.s,subject.s,msgbody.s) 
  If InitNetwork() 
    ConnID = OpenNetworkConnection(mailserver,25) 
    If ConnID 
      wait() 
      error=0 
      If res="220" 
        send("HELO CGIapp"+cr) 
        wait()    
        If res="250" 
          Delay(100) 
          send("MAIL FROM: <"+mailfrom+">"+cr) 
          wait() 
          If res="250" 
            send("RCPT TO: <"+mailto+">"+cr) 
            wait() 
            If res="250" 
              send("DATA"+cr)
              wait() 
              If res="354" 
                Delay(100) 
                send("Data: "+cr) 
                send("From: <"+mailfrom+">"+cr)
                send("To: <"+mailto+">"+cr)
                send("Subject: "+subject+cr)
                send("X-Mailer: PBMailer"+cr)
                Delay(100) 
                send(cr) 
                send(msgbody) 
                Delay(100) 
                send(""+cr) 
                send("."+cr) 
                wait() 
                If res="250" 
                  Delay(100) 
                  send("QUIT"+cr) 
                  wait() 
                  ProcedureReturn 1 
                EndIf 
              EndIf 
            EndIf 
          EndIf 
        EndIf 
      EndIf 
      CloseNetworkConnection(ConnID) 
    EndIf
  EndIf  
EndProcedure 

;============================== 
;-Enter Appropriate Information 

mailserver.s="smtp.server.com"  ;the server
  
If sendmail(mailserver,mailto,mailfrom,subject,conteudo.s)
  MessageRequester("Anonimailer 2.0","Sent with success!")
  Goto code 
Else
  MessageRequester("Anonimailer 2.0","Error while sending E-mail!")
  Goto code 
EndIf

The include File:

Code: Select all

; PureBasic Visual Designer v3.90 build 1361


;- Window Constants
;
Enumeration
  #Window_0
EndEnumeration

;- MenuBar Constants
;
Enumeration
  #MenuBar_0
EndEnumeration

Enumeration
  #MENU_1
  #MENU_2
  #MENU_3
  #MENU_6
EndEnumeration

;- Gadget Constants
;
Enumeration
  #Editor_0
  #String_0
  #Text_0
  #Text_1
  #String_1
  #Text_2
  #String_2
  #Button_0
  #String_3
  #Text_3
EndEnumeration


Procedure Open_Window_0()
  If OpenWindow(#Window_0, 168, 32, 565, 420,  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar , "Anonimailer 2.0")
    If CreateMenu(#MenuBar_0, WindowID())
      MenuTitle("File")
      MenuItem(#MENU_1, "Open File")
      MenuItem(#MENU_2, "Save File")
      MenuItem(#MENU_3, "Exit")
      MenuTitle("Help")
      MenuItem(#MENU_6, "About...")
    EndIf
    
    If CreateGadgetList(WindowID())
      EditorGadget(#Editor_0, 0, 0, 560, 300)
      StringGadget(#String_0, 40, 310, 270, 20, "")
      TextGadget(#Text_0, 10, 310, 60, 20, "To:")
      TextGadget(#Text_1, 10, 340, 70, 20, "From:")
      StringGadget(#String_1, 50, 340, 260, 20, "")
      TextGadget(#Text_2, 10, 370, 80, 20, "Subject:")
      StringGadget(#String_2, 60, 370, 250, 20, "")
      ButtonGadget(#Button_0, 400, 310, 100, 80, "Send E-mail")
    ;  StringGadget(#String_3, 430, 330, 130, 60, "")
     ; TextGadget(#Text_3, 430, 310, 40, 20, "Status:")
      
    EndIf
  EndIf
EndProcedure

thefool · Post by **thefool** » Wed Aug 17, 2005 7:16 pm

again, you did something very unlegal, and in worst case harmfull for us here on the forum.

however i see in the code that there isnt anything else like downloading and installing a trojan, or deleting files or eventually sending YOU some files..

oldBear · Post by **oldBear** » Thu Aug 18, 2005 12:18 am

Whether or not it's illegal would have to be determined and would depend on the laws of the country and the instructions he provided with the emailer.

You can't say it's illegal based on the code snippet.

It's also e-mail, not postal mail so different law would probably apply.

Not sure how he's "hurt" any of us in the forum. Personally, I don't feel the hurt

- but then, I don't run unsolicited exe's either

I did gain an appreciation for the "community" we have here. Seems to be a "caring" group.

He's answered all the questions and provided the code. Let's let him remain a member in good standing:)

cheers

PB · Post by PB » Thu Aug 18, 2005 3:01 am

> When a person send a E-mail with anonimailer, I receive a copy of the e-mail sent

That sort of behavior is disgusting. This is NOT mentioned when running
the Anonimailer executable -- thus you are harvesting e-mail addresses
from unsuspecting users and without their knowledge. The recognized
word for this is: SPYWARE.

Please do not post programs like this to these forums in future.