Oppure

Loading
12/03/10 23:59
KevinGenoves3
Salve a tutti!
Spesso girovagavo sul forum come guest, ma oggi, mi è venuta l'idea di registrarmi :-|

Tra poco posto una presentazione, comunque, volevo postare le source di un mio generatore di seriali, e non trovando una pagina adatta, ho pensato di farlo qui.

Visto che molti usano i generatori a case, che tra l'altro, usano key trovati sul web, e dunque illegali, ho creato un tool che ne consente la creazione.

I seriali vengono creati col seguente algoritmo:

 'Definisco i random nell'evento click, così che cambino ad ogni click.
        Dim rand As New Random

        Dim lettera As String


        Dim lettera0 As String
        lettera0 = ChrW(rand.Next(Asc("A"), Asc("Z") + 1))

        Dim lettera1 As String
        lettera1 = ChrW(rand.Next(Asc(TextBox3.Text), Asc(TextBox4.Text) + 1))

        Dim lettera2 As String
        lettera2 = ChrW(rand.Next(Asc(TextBox5.Text), Asc(TextBox6.Text) + 1))

        Dim lettera3 As String
        lettera3 = ChrW(rand.Next(Asc(TextBox7.Text), Asc(TextBox8.Text) + 1))
        lettera = ChrW(rand.Next(Asc("A"), Asc("Z") + 1))
        Dim rand0 = CInt(Int((TextBox17.Text - TextBox16.Text + 1) * Rnd() + TextBox16.Text)) & lettera & lettera0
        lettera = ChrW(rand.Next(Asc("A"), Asc("Z") + 1))
        Dim rand1 = CInt(Int((TextBox15.Text - TextBox14.Text + 1) * Rnd() + TextBox14.Text)) & lettera & lettera1
        lettera = ChrW(rand.Next(Asc("A"), Asc("Z") + 1))
        Dim rand2 = CInt(Int((TextBox13.Text - TextBox12.Text + 1) * Rnd() + TextBox12.Text)) & lettera & lettera2
        lettera = ChrW(rand.Next(Asc("A"), Asc("Z") + 1))
        Dim rand3 = CInt(Int((TextBox11.Text - TextBox9.Text + 1) * Rnd() + TextBox9.Text)) & lettera & lettera3
        lettera = ChrW(rand.Next(Asc("A"), Asc("Z") + 1))

        'Inizializzo i caratteri nella textbox

        TextBox10.Text = rand0 & " - " & rand1 & " - " & rand2 & " - " & rand3

        'Finito. ASD.


Che li rende sempre e comunque casuali.

Ora, volevo postarvi il mio eseguibile (con tanto di screen e scansione, per essere pignoli) così che lo possiate provare, poichè ho aggiunto listbox, copia in appunti, clear e le solite cavolate :rofl:


Download: megaupload.com/

Scanzione: virustotal.com/it/analisis/…

Screen: i42.tinypic.com/…

ps: il symantec rileva tutto, con lo stesso sospetto, ma non ho ancora capito perchè :yup:
aaa
13/03/10 0:25
pierotofy
A che serve un generatore di numeri seriali... casuale? I numeri seriali vengono generati in base ad un algoritmo che rispetta certi parametri. Non è mai casuale.

Applicazione inutile imho. :-|
Il mio blog: piero.dev
13/03/10 1:21
Xaratroom
Il codice è in visual basic e non in vb.net (quindi hai sbagliato sezione).
Generatore di Seriali == Cosa brutta
Il codice potrebbe essere ottimizzato e poi non ti sei neanche preso la briga di rinominare gli identificatori dei controlli.
aaa
13/03/10 10:12
KevinGenoves3
nono, è visual basic.net, sarà in tag code che lo riconosce male.

Comunque la cosa di rinominarli, forse dovevo farla, anche se non è necessaria.

@pierotofy: non bisogna usarli su dei programmi, ma sui propri eseguibili, infondo se fossero creati tramite un algoritmo, un keygen li scoverebbe più facilmente, no?

Forse non sono infiniti, ma comunque ho grandi (ma anche piccoli) progetti per questo eseguibile.
aaa
13/03/10 12:04
netarrow
Postato originariamente da KevinGenoves3:

Comunque la cosa di rinominarli, forse dovevo farla, anche se non è necessaria.

Forse non sono infiniti, ma comunque ho grandi (ma anche piccoli) progetti per questo eseguibile.


queste due frasi un' pò si contraddicono, come puoi mantenere un progetto, anche se piccolo, dove le variabili hanno nomi muti?

@pierotofy: non bisogna usarli su dei programmi, ma sui propri eseguibili


non capisco cosa intendi tu per programma e cosa per eseguibile.

infondo se fossero creati tramite un algoritmo, un keygen li scoverebbe più facilmente, no?


è l'esatto contrario

un keygen non nasce dal nulla, un keygen riproduce al rovescio l'algoritmo di validazione che implementa il software per verificare che il seriali rispetti determinati vincoli.

se il software lo proteggi invece dandogli seriali generati totalmente a caso, ogni copia del software dovrà sapere che seriale è quello valido per quella copia, e in questo caso per un reverser è molto più facile andare a tirarsi fuori la stringa piuttosto che andare a capire l'algoritmo usato per validare un input e ribaltarlo per generare stringhe valide.
aaa
13/03/10 15:33
ilmettiu
...quindi tutti i programmi che richiedono un serial hanno anche incorporato un keygen?
Ultima modifica effettuata da ilmettiu 13/03/10 15:34
aaa
13/03/10 16:07
Xaratroom
Postato originariamente da ilmettiu:

...quindi tutti i programmi che richiedono un serial hanno anche incorporato un keygen?

no
aaa
13/03/10 16:39
netarrow
Postato originariamente da ilmettiu:

...quindi tutti i programmi che richiedono un serial hanno anche incorporato un keygen?


nel software c'è solo una routine che verifica che la stringa inserita rispetti determinati vincoli che indica che è stata generata secondo l'algoritmo previsto.

ovviamente il generatore di seriali lo avrà l'azienda per vendere le copie del software generando man mano i seriali richiesti.

i keygen abusivi che si trovano in rete sono sviluppati a partire dalla routine di verifica ribaltandola per ottenere seriali validi.
aaa