Nokia SL3 Cod 2 NCK Source.. (the last secret for bforcer..)

[oOXTCOo]

here is the last secret for local beforce ppl!

iam not a php expert... but works!

PHP Code:

<?php
function SL3NCK($TargetHash, $MasterSP)
{
    $MasterSP='000000'.substr($MasterSP,0,24);
    for ($i = 1; $i <= 7; $i++) 
    {
        $hash= pack('H*', '0'.$i.$TargetHash );
        $hash=strtoupper(sha1($hash));
        $levelhash_16='';
        $levelhash_16=$levelhash_16.substr($hash,0,32);

        $precode8=substr($MasterSP,0,16);
        $precode7=substr($MasterSP,17,30);
        for ($magic = 0; $magic <= 1; $magic++) 
        {
            $sh= pack('H*', '0'.$magic.$levelhash_16.$precode8);
            $sh=strtoupper(sha1($sh));
            $precode='';
            $precode=SimlFeistel($sh, $precode7);
            $precode7=$precode;
                
            $sh= pack('H*', '0'.$magic.$levelhash_16.$precode);
            $sh=strtoupper(sha1($sh));
            $precode='';
            $precode=SimlFeistel($sh, $precode8, 8);
            $precode8=$precode;
        }
        
        $final=$precode8.$precode7;
        $x=1;
        $nck='';
        for ($y = 1; $y <= 15; $y++) 
        {
            $nck=$nck.$final[$x];
            $x+=2;
        }
        $result.='#pw+'.$nck.'+'.$i.'#<br>';
    }
    return $result;
}

function SimlFeistel($sh, $precode, $bytes = 7)
{
    $i=0; 
    while($i<($bytes*2)) 
    {
        $nck=$sh[$i].$sh[$i+1];
        $nck2=$precode[$i]+$precode[$i+1];
        $prenck=( (hexdec($nck)+hexdec($nck2)) % 10);
        $result=$result.'0'.$prenck;
        $i+=2; 
    }    
    return $result;    
}
?>

call this script like:

PHP Code:

<?php
    $TargetHash=$_REQUEST["hash"];
    echo '[TARGET_HASH]: '.$TargetHash.'</br>';
    $MasterSP=$_REQUEST["mastersp"];
    echo '[MASTER_SP_CODE]: '.$MasterSP.'</br></br>';
    
    
    echo SL3NCK($TargetHash,$MasterSP);
?>

test: http://ooxtcoo.dyndns.org/sl3code.ph...04030708040805


wbr.
hari

[fr3nsis]

here on asp.net

Imports System.Security.Cryptography
Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Public Function Hex2Str(ByVal Hex As String)
        Dim hb((Hex.Length / 2) - 1) As Byte
        Dim i As Integer = 0
        For n = 0 To Hex.Length - 2 Step 2
            hb(i) = Val("&H" & Hex.Substring(n, 2))
            i += 1
        Next
        Return System.Text.ASCIIEncoding.ASCII.GetString(hb)
    End Function

    Public Function Str2Hex(ByVal str As String)
        Return System.BitConverter.ToString(System.Text.ASCIIEncoding.ASCII.GetBytes(str)).Replace("-", "")
    End Function

    Public Function SL3_NCK(ByVal Hash As String, ByVal MasterCode As String)
        MasterCode = "000000" & MasterCode.Substring(0, 24)
        Dim levelhash As String = ""
        For y = 1 To 7
            levelhash = "0" & y & Hash
            levelhash = My_Sha1(levelhash)

            Dim levelhash_16 As String = levelhash.Substring(0, 32).ToUpper
            Dim precode_8 As String = MasterCode.Substring(0, 16)
            Dim precode_7 As String = MasterCode.Substring(16, 14)

            For magic = 0 To 1
                Dim sh As String = My_Sha1("0" & magic & levelhash_16 & precode_8).ToUpper
                Dim precode As String = SimFeistel(sh, precode_7, 7)
                precode_7 = precode

                sh = My_Sha1("0" & magic & levelhash_16 & precode).ToUpper
                precode = SimFeistel(sh, precode_8, 8)
                precode_8 = precode
            Next
            Dim data As String = ""
            Dim final As String = precode_8 & precode_7
            Dim codice As String = ""
            For n = 0 To final.Length - 1
                If n Mod 2 = 1 Then codice &= final.Substring(n, 1)
            Next
            Label1.Text &= "LEVEL" & y & "= #pw+" & codice & "+" & y & "#" & "<br>"
        Next
    End Function

    Public Function SimFeistel(ByVal sh As String, ByVal precode As String, ByVal volte As Integer)
        Dim result As String = ""
        For i = 0 To volte - 1
            result &= "0" & (Val("&H" & sh.Substring(i * 2, 2)) + Val("&H" & precode.Substring(i * 2, 2))) Mod 10
        Next
        Return result
    End Function
    Function My_Sha1(ByVal strToHash As String) As String
        Dim bytesToHash((strToHash.Length / 2) - 1) As Byte
        Dim i As Integer = 0

        For n = 0 To strToHash.Length - 2 Step 2
            bytesToHash(i) = Val("&H" & strToHash.Substring(n, 2))
            i += 1
        Next

        Dim sha1Obj As New SHA1CryptoServiceProvider


        bytesToHash = sha1Obj.ComputeHash(bytesToHash)

        Dim strResult As String = ""

        For Each b As Byte In bytesToHash
            strResult += b.ToString("x2")
        Next

        Return strResult
    End Function
    Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Label1.Text = ""
        If TextBox1.Text <> "" And TextBox2.Text <> "" Then
            If TextBox1.Text.Length <> &H14 * 2 Then
                Label1.Text = "BAD HASH FORMAT!"
                Exit Sub
            End If

            If TextBox2.Text.Length <> &HF * 2 Then
                Label1.Text = "BAD MASTER CODE FORMAT!"
                Exit Sub
            End If

            SL3_NCK(TextBox1.Text, TextBox2.Text)
        End If
    End Sub
End Class

[gsmro2012]

will this provide bruteforcers a faster calculation? can we calculate 20digit nck from now on?

[dawood1208]

Originally Posted by gsmro2012

will this provide bruteforcers a faster calculation? can we calculate 20digit nck from now on?

Why not u can even repair imei with this
i'm joking now serious with this code u can convert mastercode(after b.f) + hash to nck
thx oOXTCOo & fr3nsis

[dawood1208]

All Same just added option Auto Calculate (load cod/txt file)
it will generate nck + add nck in cod/txt file (Thx sam for idiea)

[gamu]

upload that software please

[coronellw]

So this works after the log file has been decripted, right?

[mauriciopineros]

Originally Posted by dawood1208

all same just added option auto calculate (load cod/txt file)
it will generate nck + add nck in cod/txt file (thx sam for idiea)

please link to download file

[bep-bep]

is simple as that ? i see no any hash table

[oOXTCOo]

sha1 rounds with mixing some bytes..

[irfan_gsm]

431139832242522431139832242522

nokia 1616 movistar . only get master code from server. any one can convert this to unlock code>??? thanks

[oOXTCOo]

you need also your hash... its in your hash file what you uploaded..

then you use this adress:

http://ooxtcoo.dyndns.org/sl3code.ph...31139832242522

in hash you enter your hash and in master sp you enter your master sp ( i have done this already for you).

so only change the hash (0000000000000000000000000000000000000000) with yours...

[gsmnsd]

Originally Posted by irfan_gsm

431139832242522431139832242522

nokia 1616 movistar . only get master code from server. any one can convert this to unlock code>??? thanks

try this code and post result please

#pw+275503618616486+1#
#pw+705362924524085+2#
#pw+683401949605753+3#
#pw+845513458526921+4#
#pw+751617387407037+5#
#pw+562441500417174+6#
#pw+671220790582951+7#

[IkaMazini]

Originally Posted by gsmnsd

try this code and post result please

#pw+275503618616486+1#
#pw+705362924524085+2#
#pw+683401949605753+3#
#pw+845513458526921+4#
#pw+751617387407037+5#
#pw+562441500417174+6#
#pw+671220790582951+7#

Do you really think this will work

[irfan_gsm]

i not used brute force service to to get unlock code for this nokia 1616 . because it its cheap price (movistar spain) than brute force method .but my bad luck server just give master code . any way to calculate nck code without hash file?? thanks all for try to help me