Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

SETI@Home

Discussioni e opinioni costruttive sul mondo dell'informatica.
Per la soluzione di problemi specifici fare riferimento alle sezioni di assistenza!

Moderatori: aurelio37, axelrox

Postdi Ribonix » 20/05/04 21:10

Intanto visto che le pagina delle statistiche personali ha ripreso a funzionare e che non sono più in possesso degli eseguibili e i dei sorgenti da me creati all'epoca, "bovinamente" ho buttato giù delle righe in VB5.

Ma ho ancora problemi con il telnet sull'altro indirizzo premettendo che contrariamente a quanto scritto prima non c'è un problema di proxy. Probabilmente ho sbagliato a sniffare. Prometto di farmi meno canne... :lol:
Comunque il sasso l'ho tirato e non ho alcuna intenzione di ritirare la mia mano...

Il programma è semplicissimo ed è formato da 1 solo file il FORM1.FRM che utilizza il componente MSWINSCK.OCX:
Codice: Seleziona tutto
Private sDataIn As String
Private sDataBuff As String

Private Sub Form_Load()
  Winsock1.LocalPort = 0
  Winsock1.RemotePort = 0
  Winsock1.RemoteHost = "setiathome2.ssl.berkeley.edu"
  Winsock1.RemotePort = 80
  Winsock1.Connect
  DoEvents
  Do
    If Winsock1.State = sckConnected Then Exit Do
    DoEvents
  Loop
  email = "XXXXXXXXXXXXXXXXXXX" 'qui va inserita la vostra mail d'iscrizione al Seti
  Winsock1.SendData "GET /fcgi-bin/fcgi?email=" & email & "&cmd=user_stats_new HTTP/1.1" & vbCrLf
  Winsock1.SendData "Host: setiathome2.ssl.berkeley.edu" & vbCrLf
  Winsock1.SendData "" & vbCrLf
  End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
  Winsock1.GetData sDataIn
  sDataBuff = sDataBuff & sDataIn
  If InStr(sDataBuff, "Results Received") Then
    numero = Mid$(sDataBuff, InStr(sDataBuff, "Results Received") + 28)
    n1 = InStr(numero, "</td>")
    numero = Left(numero, n1 - 1)
    Winsock1.Close
    Open "c:\seti.txt" For Output As 1
    Print #1, numero
    Close
    Winsock1.Close
    MsgBox (numero)
    End
  End If
  DoEvents
End Sub


In C:\ comparirà un file di testo, il seti.txt con la quantità di dati inviati finora e contestualmente verrà visualizzata anche una msgbox.

Per farla breve c'è il comando
Codice: Seleziona tutto
C:\> TELNET setiathome2.ssl.berkeley.edu 80

seguito da
Codice: Seleziona tutto
GET /fcgi-bin/fcgi?email=vostroindirizzoemail&cmd=user_stats_new HTTP/1.1
Host: setiathome2.ssl.berkeley.edu

Marooooooooooooooooonnn questo weekend avrò il certificato!!! WOW!!!!
Allah Akhbar! Allah Akhbar! Allah Akhbar!
Avatar utente
Ribonix
Utente Senior
 
Post: 346
Iscritto il: 12/02/03 22:41
Località: 3GYPT

Sponsor
 

Postdi h23 » 20/05/04 21:24

BianConiglio ha scritto:ognuno si sceglie il suo tempo e lo inserisce nella linea di comando in modo da ognuno si faccia i suoi test e benchmark per avere seti al massimo, visto che le differenze da portatile a portatile son pesanti
yes doc. ready to test ;)
[e mo che ti sei messo in coppia con ribonix chi vi ferma piu'?? ;) ]
"Noctis aeternae chaos, aversa superis regna manesque impios dominunque regni tristis et dominam fide meliore raptam, voce non fausta precor." (Seneca, Medea)
h23
Utente Senior
 
Post: 1349
Iscritto il: 16/12/02 17:30
Località: 404 - file not found

Postdi Ribonix » 20/05/04 21:31

h23... bella lì :lol: :lol: :lol:
Se vuoi puoi contribuire anche tu alla nobile causa del Seti... ;)
Allah Akhbar! Allah Akhbar! Allah Akhbar!
Avatar utente
Ribonix
Utente Senior
 
Post: 346
Iscritto il: 12/02/03 22:41
Località: 3GYPT

Postdi h23 » 20/05/04 21:35

Ribonix ha scritto:Se vuoi puoi contribuire anche tu alla nobile causa del Seti... ;)
in questo periodo sto un po' incasinato con gli esami, ma appena ne esco vengo a darvi man forte ;)
"Noctis aeternae chaos, aversa superis regna manesque impios dominunque regni tristis et dominam fide meliore raptam, voce non fausta precor." (Seneca, Medea)
h23
Utente Senior
 
Post: 1349
Iscritto il: 16/12/02 17:30
Località: 404 - file not found

Postdi Ribonix » 20/05/04 22:49

E ALLORA!!!... :) Come disse Champolion, dopo aver decifrato i primi Geroglifici "Je tiens l’affaire!!!"
CE L'HO FATTA!!! 8)

Da prompt di DOS digitiamo:
Codice: Seleziona tutto
C:\> TELNET 66.28.250.122 80


L'IP 66.28.250.122 corrisponde a shserver2.ssl.berkeley.edu
Nella sessione telnet dobbiamo inviare le seguenti stringhe:

Codice: Seleziona tutto
POST / HTTP/1.0
Pragma: no-cache
Host: shserver2.ssl.berkeley.edu
Cache-Control: no-cache
Content-Type: text/plain

operation=lookup_user_name
user_id=0
user_key=0
major_version=3
minor_version=8
platform=Pentium/Windows
cpu_type=Intel Pentium
system=Windows NT: 5.0
id=0
key0=aaaaaaaa
key1=bbbbbbbb
end_request_header
type=user info
id=0
key=0
email_addr=INDIRIZZO-E-MAIL
name=
url=
country=
postal_code=
show_name=no
show_email=no
venue=0
register_time=       0.00000
last_wu_time=       0.00000
last_result_time=       0.00000
nwus=0
nresults=0
total_cpu=0.000000
params_index=0



NOTE
Copiate il codice così com'è tenendo presente quanto segue:
key0 e key1 li ho settati così come li vedete. Comunque sono codici esadecimali. Io li lascerei così.
INDIRIZZO-E-MAIL è proprio l'indirizzo di posta elettronica con il quale vi siete iscritti al Seti
Tra Content-Type: text/plain e operation=lookup_user_name c'è la sequenza dei caratteri 0d0a0d0a (13-10-13-10)
Dopo operation=lookup_user_name e per tutte le righe che seguono c'è un solo carattere 0a (10)
Alla fine dell'ultima riga params_index=0 c'è la sequenza dei caratteri 0a0a (10-10)

Mi raccomando i caratteri 0a e non il carattere INVIO!!! E' stato il muro contro il quale ho sbattuto la testa tutto oggi pomeriggio :oops:

E' possibile, e a me è capitato, che alcune volte il server non risponda. Basta semplicemente riprovare.
Quando il server risponde, dà una serie di dati separati dal carattere 0a.
Allah Akhbar! Allah Akhbar! Allah Akhbar!
Avatar utente
Ribonix
Utente Senior
 
Post: 346
Iscritto il: 12/02/03 22:41
Località: 3GYPT

Postdi Ribonix » 20/05/04 22:54

E dirò di più. Il codice si può tranquillamente riadattare al programma in VB che ho postato in questo topic facendo alcune modifiche che non ne stravolgono la struttura.
Allah Akhbar! Allah Akhbar! Allah Akhbar!
Avatar utente
Ribonix
Utente Senior
 
Post: 346
Iscritto il: 12/02/03 22:41
Località: 3GYPT

Postdi BianConiglio » 21/05/04 03:27

ok è ora che impari ad utilizzare i socket in C
domani studio...dopo che mi sveglio...alle 2 di pomeriggio !

@h23 faccio pure quel prog, na cazzatina veloce

@ribonix, gran bello sniff (con cosa??) mi studio i socks e si smanetta !!

se thor mi aiuta potremmo fare le statistiche tipo quelle che abbiamo nella firma ! monto un prog C sul mio server e faccio in modo che crei dei txt con i quali ci si interfaccia via php e si crea la firma

FIGOOOOOOOOOO

a domani !
BianConiglio
Utente Senior
 
Post: 4710
Iscritto il: 26/12/01 01:00
Località: Varese / Lugano

Postdi Ribonix » 21/05/04 07:51

Ho usato Ethereal.
Di solito ho una gran dimestichezza con quel programma, ma sono stato così cieco da non vedere la formattazione particolare delle andate a capo al termine di ogni riga. Lo uso per fare certi giochetti in rete assieme a telnet e notepad... ;)

Però, che bei traguardi sul Seti: 5 anni di Seti ed oggi abbiamo raggiunto e superata la soglia dei 5.000.000 di user!!!
Anche se molti non sono sicuramente più attivi, beh... comunque siamo in tantissimissimisssimi!!!! :)

Curiosità: è la prima volta che vedo il carattere '"@" davanti ad un nick, immagino significhi "messaggio rivolto a" :?:
Allah Akhbar! Allah Akhbar! Allah Akhbar!
Avatar utente
Ribonix
Utente Senior
 
Post: 346
Iscritto il: 12/02/03 22:41
Località: 3GYPT

Postdi pjfry » 21/05/04 09:12

Ribonix ha scritto:Curiosità: è la prima volta che vedo il carattere '"@" davanti ad un nick, immagino significhi "messaggio rivolto a" :?:

esatto ;)
Avatar utente
pjfry
Moderatore
 
Post: 8240
Iscritto il: 19/11/02 17:52
Località: terni

Postdi h23 » 21/05/04 11:39

BianConiglio ha scritto:ok è ora che impari ad utilizzare i socket in C
domani studio...dopo che mi sveglio...alle 2 di pomeriggio !

messaggio del 3.27... ma che fai la notte? 8)

BianConiglio ha scritto:@h23 faccio pure quel prog, na cazzatina veloce
bueno. aspetto ;)

se thor mi aiuta potremmo fare le statistiche tipo quelle che abbiamo nella firma ! monto un prog C sul mio server e faccio in modo che crei dei txt con i quali ci si interfaccia via php e si crea la firma

quindi la differenza sarebbe che al posto di seti.familie.blabla comparirebbe "powered by BC", giusto? :P
"Noctis aeternae chaos, aversa superis regna manesque impios dominunque regni tristis et dominam fide meliore raptam, voce non fausta precor." (Seneca, Medea)
h23
Utente Senior
 
Post: 1349
Iscritto il: 16/12/02 17:30
Località: 404 - file not found

Postdi BianConiglio » 21/05/04 11:48

4.27, lo sai che il forum è un' ora indietro...

mi son appena alzato e son devastatissimo, megafestone :D
sto cercando delle guide sui socks !!

stasera faccio il programmino smorza seti per il portatile, serà na cagata tipo

Codice: Seleziona tutto
while(1)
{
esegui seti nascosto;
sleep(argomento);
termina seti:
sleep(60000); // un minuto)
}
BianConiglio
Utente Senior
 
Post: 4710
Iscritto il: 26/12/01 01:00
Località: Varese / Lugano

Postdi BianConiglio » 21/05/04 11:51

naturalmente oltre a farei test ti toccherà scrivere la guida e il testo per il sito :D
BianConiglio
Utente Senior
 
Post: 4710
Iscritto il: 26/12/01 01:00
Località: Varese / Lugano

Postdi pjfry » 21/05/04 12:32

sul mio asus (che però comincia ad avere un'età, poverino :roll: ) gli sbalzi di temperatura hanno un ordine di grandezza molto minore di un minuto, se accendo il seti ci mette tipo 10 secondi a partire la ventola! ha senso stopparlo e rilanciarlo ogni 10 secondi? quanto ci mette a cominciare a computare seriamente?
Avatar utente
pjfry
Moderatore
 
Post: 8240
Iscritto il: 19/11/02 17:52
Località: terni

Postdi BianConiglio » 21/05/04 12:42

a computare inizia subito non è come UD... direi che posso mettere 2 valori da inserire... il tempo di interruzione e ogni quanto interrompere... cosi ognuno fa quello che vuole... lo fai partire per 5 secondi e lo stoppi per 2..che ne so..a voi fare le prove..
BianConiglio
Utente Senior
 
Post: 4710
Iscritto il: 26/12/01 01:00
Località: Varese / Lugano

Postdi Ribonix » 21/05/04 13:41

Ribonix ha scritto:
Codice: Seleziona tutto
Private sDataIn As String
Private sDataBuff As String

Private Sub Form_Load()
...
...
...
End Sub


Giusto per il gusto di provare ho inserito le mie routine dentro il VBA di Microsoft Excel 2000... funzionano anche lì... 8)
Adesso però sto correggendo il codice: non tiene conto del fatto che a volte il server Seti non risponde.
Questo evento manda in loop il programma che per essere chiuso deve essere terminato brutalmente.
Allah Akhbar! Allah Akhbar! Allah Akhbar!
Avatar utente
Ribonix
Utente Senior
 
Post: 346
Iscritto il: 12/02/03 22:41
Località: 3GYPT

Postdi BianConiglio » 21/05/04 14:00

puoi fare un controllo, se il ping fallisce o è troppo alto riprova dopo 15 secondi...
BianConiglio
Utente Senior
 
Post: 4710
Iscritto il: 26/12/01 01:00
Località: Varese / Lugano

Postdi Ribonix » 21/05/04 14:36

x BianConiglio: nel loop posso mettere un contatore che si incrementa e se supera un certo valore, l'azzero, chiudo il socket, esco dal loop, lo riapro per poi rientrarci.

Per quanto riguarda la possibilità di inviare la statistica tramite SMS, ho un account di Tin.it che mi permette di mandare una mail in formato testo di 100-120 caratteri max all'indirizzo tipo 33xxxxxxxx@sms.tin.it che è strettamente collegato al mio numero di cellulare.
E' un indirizzo che utilizzo per ricevere quotidianamente lo status di servizio dei miei server e il risultato di andata a buon fine di alcune procedure di lavoro che ho automatizzato.

Premesso che con le precedenti righe di codice ho creato il file c:\seti.txt ho buttato giù delle altre che leggono il file e lo elaborano in un altro che ho chiamato leggiedinvia.vbs:
Codice: Seleziona tutto
sub leggiedinvia
  Dim fso   
  Dim mymail
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set txtStream = fso.OpenTextFile("c:\seti.txt")
  Do While Not (txtStream.atEndOfStream)
    ReadTextFileContents = ReadTextFileContents & txtStream.ReadLine & vbCrLf
  Loop
  msgbox ReadTextFileContents
  set mymail = createobject("CDONTS.NewMail")
  mymail.from       = "setiserver@dominio.it"
  mymail.to         = "33xxxxxxxx@sms.tin.it"
  mymail.Subject    = "SETI@HOME"
  mymail.BodyFormat = 0
  mymail.mailFormat = 0
  mymail.body       = "Hai elaborato: " & ReadTextFileContents & " w.u."
  mymail.send
end sub

call leggiedinvia

Oggi ho ritestato la procedura ed ho ricevuto l'SMS. Sul display del mio cellulare ho potuto visualizzare una stringa come questa:
Codice: Seleziona tutto
F: <setiserver@dominio.it>, S: SETI@HOME, B: Hai elaborato: 24937 w.u.

LEGENDA: F=from; S=subject; B=body.

Non ho idea se esistono ancora dei siti che permettono di inviare gratuitamente degli SMS. In tal caso, senza andare nell'illegalità, una simile procedura, volendola standardizzare, potrebbe essere ritrascritta utilizzando uno sniffer e una sessione tipo telnet.

Ciauz! ;)
Allah Akhbar! Allah Akhbar! Allah Akhbar!
Avatar utente
Ribonix
Utente Senior
 
Post: 346
Iscritto il: 12/02/03 22:41
Località: 3GYPT

Postdi Ribonix » 21/05/04 17:33

BianConiglio ha scritto:sto cercando delle guide sui socks !!

Bravo... cerca, cerca... cerca però di non sbagliare l'unica vocale della parola socks... ;)
Sai, tra una ricerca e l'altra è facile confonderla... :lol: :lol: :lol: :lol: :lol:

Se posso esserti d'aiuto:
http://java.sun.com/docs/books/tutorial ... g/sockets/
http://www.cs.rpi.edu/courses/sysprog/sockets/sock.html
http://www.scit.wlv.ac.uk/~jphb/comms/sockets.html
http://www.scit.wlv.ac.uk/~jphb/comms/s ... ample.html

Ok?
Allah Akhbar! Allah Akhbar! Allah Akhbar!
Avatar utente
Ribonix
Utente Senior
 
Post: 346
Iscritto il: 12/02/03 22:41
Località: 3GYPT

Postdi h23 » 21/05/04 18:03

BianConiglio ha scritto:naturalmente oltre a farei test ti toccherà scrivere la guida e il testo per il sito :D

ma guarda un po' che novita' :D

@ribonix
non ho capito se l'invio della tua statistica avviene verso un indrizzo email che controlli via cellulare o proprio sul tuo numero di cell (e' l'indrizzo num@sms.tin.it a trarmi in inganno...)
"Noctis aeternae chaos, aversa superis regna manesque impios dominunque regni tristis et dominam fide meliore raptam, voce non fausta precor." (Seneca, Medea)
h23
Utente Senior
 
Post: 1349
Iscritto il: 16/12/02 17:30
Località: 404 - file not found

Postdi Ribonix » 21/05/04 18:57

Io non controllo alcunchè sul mio cellulare.
Semplicemente mandando un mesaggio di max 140 caratteri a quell'indirizzo, Tin.it manda un SMS al numero di cellulare ad esso associato. Non ci sono filtri nè regole. E un servizio incluso nel mio abbonamento col provider.
Allah Akhbar! Allah Akhbar! Allah Akhbar!
Avatar utente
Ribonix
Utente Senior
 
Post: 346
Iscritto il: 12/02/03 22:41
Località: 3GYPT

PrecedenteProssimo

Torna a Discussioni


Topic correlati a "SETI@Home":


Chi c’è in linea

Visitano il forum: Nessuno e 2 ospiti