Snippet Number Encrypter

Nestharus

o-o
Reaction score
84
JASS:

//Requires
//  BigInt          hiveworkshop.com/forums/jass-functions-413/system-bigint-188973/
//  Base            hiveworkshop.com/forums/submissions-414/snippet-base-188814/
//  Ascii           wc3c.net/showthread.php?t=110153
//  Table           hiveworkshop.com/forums/jass-functions-413/snippet-new-table-188084/
//  KnuthChecksum   hiveworkshop.com/forums/1846246-post343.html
//  Scrambler       hiveworkshop.com/forums/submissions-414/snippet-salt-189766/
library NumberEncrypter uses BigInt, KnuthChecksum, Scrambler
    /***********************************************************************
    *
    *   Security Details
    *
    *       -   Player Unique Base
    *       -   Player Unique Shuffling
    *       -   Player Unique Knuth Checksum
    *
    ***********************************************************************
    *
    *   function EncryptNumberVersion takes BigInt number, integer security, integer shuffles, integer forPlayerId, string playerSalt, real checksumVariance, integer maxVersion, integer ver returns string
    *       -   Encrypts number of version
    *
    *       ->  maxVersion is the maximum possible version that number can be
    *       ->  version is the version of the number
    *
    *   function EncryptNumber takes BigInt number, integer security, integer shuffles, integer forPlayerId, string playerSalt, real checksumVariance returns string
    *       -   Encrypts a BigInt given max security, shuffles, and player id
    *       
    *       ->  security is the maximum value the security can be. Bigger means more secure but larger codes.
    *       ->  6-7 digits is usually good here
    *       
    *       ->  shuffles is how many times to shuffle the number (make it impossible to read it)
    *       ->  3 shuffles is good for smaller numbers (maybe 15-20 char codes)
    *       ->  1 shuffle is good for larger (more than 20 chars)
    *       ->  if this function freezes the game for a while, lower the amount of shuffles
    *       
    *       ->  the player id is the id of the player to encrypt the value for (GetPlayerId(player))
    *
    *       ->  playerSalt refers to a string to be appended to the player's name when generating a unique checksum for that
    *       ->  player (close to original checksum value).
    *
    *       ->  checksumVariance is how little the checksum can vary. The smaller this value, the more variance. The larger, 
    *       ->  the less variance. .85 is a good number.
    *
    *   function GetLastDecryptedVersion takes nothing returns integer
    *       -   Retrieves the last version that was decrypted out of a number (call after DecryptNumberVersion)
    *
    *   function DecryptNumberVersion takes string c, Base base, integer security, integer shuffles, integer forPlayerId, string playerSalt, real checksumVariance, integer maxVersion returns BigInt
    *       -   Decrypts a BigInt and its version and returns 0 if version was bad
    *   function DecryptNumber takes string c, string encryptionKey, integer security, integer shuffles, integer forPlayerId, string playerSalt, real checksumVariance returns BigInt
    *       -   Decrypts a BigInt given its base, security, shuffles, and player id
    *       -   Returns 0 if bad number
    *
    ***********************************************************************/
    globals
        private Table array bases
        private Table array checksums
        private string array names
    endglobals
    private function GetPlayerBase takes Base base, integer pid returns Base
        local string b
        local BigInt i
        if (not bases[pid].has(base)) then
            set b=base.string
            set i=BigInt.convertString(base.string,Base[SubString(b,1,2)+SubString(b,0,1)+SubString(b,2,base.size)])
            call Scramble(i,pid,3,i.base,true)
            set bases[pid][base]=Base[i.toString()]
            call i.destroy()
        endif
        return bases[pid][base]
    endfunction
    private function GetPlayerChecksum takes integer checksum, integer pid, string playerSalt, real variance returns integer
        local integer ch
        local integer min
        local integer range
        set checksum=checksum+1
        if (not checksums[pid].has(checksum)) then
            set ch=StringHash(StringCase(names[pid]+playerSalt,false))
            if (0>ch) then
                set ch=-ch
            endif
            set min=R2I(checksum*variance)
            set range=checksum-min
            set ch=ch-ch/range*range+min
            set checksums[pid][checksum]=ch
            return ch
        endif
        return checksums[pid][checksum]
    endfunction
    
    function EncryptNumberVersion takes BigInt number, integer security, integer shuffles, integer forPlayerId, string playerSalt, real checksumVariance, integer maxVersion, integer ver returns string
        local integer s
        set security=GetPlayerChecksum(security,forPlayerId,playerSalt,checksumVariance)        //get player unique security
        set number.base=GetPlayerBase(number.base,forPlayerId)                                  //get player unique base
        
        //apply security
        set s=GetKnuthChecksum(number,security)
        call number.multiply(security+maxVersion)
        call number.add(s+ver,0)
        
        //apply player unique shuffle
        call Shuffle(number,forPlayerId,shuffles)
        
        //return number as string
        return number.toString()
    endfunction
    
    function EncryptNumber takes BigInt number, integer security, integer shuffles, integer forPlayerId, string playerSalt, real checksumVariance returns string
        local integer s
        set security=GetPlayerChecksum(security,forPlayerId,playerSalt,checksumVariance)    //get player unique security
        set number.base=GetPlayerBase(number.base,forPlayerId)                              //get player unique base
        
        //apply security
        set s=GetKnuthChecksum(number,security)
        call number.multiply(security)
        call number.add(s,0)
        
        //apply player unique shuffle
        call Shuffle(number,forPlayerId,shuffles)
        
        //return number as string
        return number.toString()
    endfunction
    globals
        private integer v = 0
    endglobals
    function GetLastDecryptedVersion takes nothing returns integer
        return v
    endfunction
    function DecryptNumberVersion takes string c, Base base, integer security, integer shuffles, integer forPlayerId, string playerSalt, real checksumVariance, integer maxVersion returns BigInt
        //convert to BigInt using player unique base
        local BigInt number = BigInt.convertString(c,GetPlayerBase(base,forPlayerId))
        
        //if converted
        if (0!=number) then
            //retrieve player unique security
            set security=GetPlayerChecksum(security,forPlayerId,playerSalt,checksumVariance)
            
            //remove player unique shuffle
            call Unshuffle(number, forPlayerId, shuffles)
            
            //retrieve version out of checksum
            set v = number.divide(security+maxVersion) - GetKnuthChecksum(number, security)
            
            //if version is out of bounds, return 0
            if (v<1 or v>maxVersion) then
                call number.destroy()
                set v = 0
                return 0
            endif
            
        endif
        return number
    endfunction
    function DecryptNumber takes string c, Base base, integer security, integer shuffles, integer forPlayerId, string playerSalt, real checksumVariance returns BigInt
        //convert to BigInt using player unique base
        local BigInt number = BigInt.convertString(c,GetPlayerBase(base,forPlayerId))
        
        //if converted
        if (0!=number) then
            //retrieve player unique security
            set security=GetPlayerChecksum(security,forPlayerId,playerSalt,checksumVariance)
            
            //remove player unique shuffle
            call Unshuffle(number, forPlayerId, shuffles)
            
            //if security doesn't match up, return 0
            if (number.divide(security) != GetKnuthChecksum(number, security)) then
                call number.destroy()
                return 0
            endif
            
        endif
        return number
    endfunction
    private module I
        private static method onInit takes nothing returns nothing
            local integer i=11
            loop
                if (GetPlayerSlotState(Player(i))==PLAYER_SLOT_STATE_PLAYING and GetPlayerController(Player(i))==MAP_CONTROL_USER) then
                    set names<i>=GetPlayerName(Player(i))
                endif
                set bases<i>=Table.create()
                set checksums<i>=Table.create()
                exitwhen 0==i
                set i=i-1
            endloop
        endmethod
    endmodule
    private struct N extends array
        implement I
    endstruct
endlibrary
</i></i></i>


Working Demo
JASS:

struct T extends array
    private static method init takes nothing returns nothing
        local Base b=Base[&quot;0123456789abcdefghijklmnopqrstuvwxyz&quot;]
        local NumberStack c = NumberStack.create(b)
        local string m
        call c.push(10,10)
        call c.push(20,20)
        call DisplayTimedTextToPlayer(GetLocalPlayer(),0,0,60,I2S(BigInt(c).toInt()))
        set m=EncryptNumber(c,1000000,3,0,&quot;hello world&quot;,.85)
        call DisplayTimedTextToPlayer(GetLocalPlayer(),0,0,60,m)
        call c.destroy()
        set c=DecryptNumber(m,b,1000000,3,0,&quot;hello world&quot;,.85)
        if (0!=c) then
            call DisplayTimedTextToPlayer(GetLocalPlayer(),0,0,60,I2S(BigInt(c).toInt()))
        else
            call DisplayTimedTextToPlayer(GetLocalPlayer(),0,0,60,&quot;INVALID&quot;)
        endif
        call DestroyTimer(GetExpiredTimer())
    endmethod
    private static method onInit takes nothing returns nothing
        call TimerStart(CreateTimer(),0,false,function thistype.init)
    endmethod
endstruct
 
General chit-chat
Help Users
  • No one is chatting at the moment.
  • Monovertex Monovertex:
    Hmm, how do I change my signature?
  • tom_mai78101 tom_mai78101:
    Signatures can be edit in your account profile. As for the old stuffs, I'm thinking it's because Blizzard is now under Microsoft, and because of Microsoft Xbox going the way it is, it's dreadful.
  • The Helper The Helper:
    I am not big on the recipes I am just promoting them - I use the site as a practice place promoting stuff
    +2
  • Monovertex Monovertex:
    @tom_mai78101 I must be blind. If I go on my profile I don't see any area to edit the signature; If I go to account details (settings) I don't see any signature area either.
  • The Helper The Helper:
    You can get there if you click the bell icon (alerts) and choose preferences from the bottom, signature will be in the menu on the left there https://www.thehelper.net/account/preferences
  • The Helper The Helper:
    I think I need to split the Sci/Tech news forum into 2 one for Science and one for Tech but I am hating all the moving of posts I would have to do
  • The Helper The Helper:
    What is up Old Mountain Shadow?
  • The Helper The Helper:
    Happy Thursday!
    +1
  • Varine Varine:
    Crazy how much 3d printing has come in the last few years. Sad that it's not as easily modifiable though
  • Varine Varine:
    I bought an Ender 3 during the pandemic and tinkered with it all the time. Just bought a Sovol, not as easy. I'm trying to make it use a different nozzle because I have a fuck ton of Volcanos, and they use what is basically a modified volcano that is just a smidge longer, and almost every part on this thing needs to be redone to make it work
  • Varine Varine:
    Luckily I have a 3d printer for that, I guess. But it's ridiculous. The regular volcanos are 21mm, these Sovol versions are about 23.5mm
  • Varine Varine:
    So, 2.5mm longer. But the thing that measures the bed is about 1.5mm above the nozzle, so if I swap it with a volcano then I'm 1mm behind it. So cool, new bracket to swap that, but THEN the fan shroud to direct air at the part is ALSO going to be .5mm to low, and so I need to redo that, but by doing that it is a little bit off where it should be blowing and it's throwing it at the heating block instead of the part, and fuck man
  • Varine Varine:
    I didn't realize they designed this entire thing to NOT be modded. I would have just got a fucking Bambu if I knew that, the whole point was I could fuck with this. And no one else makes shit for Sovol so I have to go through them, and they have... interesting pricing models. So I have a new extruder altogether that I'm taking apart and going to just design a whole new one to use my nozzles. Dumb design.
  • Varine Varine:
    Can't just buy a new heatblock, you need to get a whole hotend - so block, heater cartridge, thermistor, heatbreak, and nozzle. And they put this fucking paste in there so I can't take the thermistor or cartridge out with any ease, that's 30 dollars. Or you can get the whole extrudor with the direct driver AND that heatblock for like 50, but you still can't get any of it to come apart
  • Varine Varine:
    Partsbuilt has individual parts I found but they're expensive. I think I can get bits swapped around and make this work with generic shit though
  • Ghan Ghan:
    Heard Houston got hit pretty bad by storms last night. Hope all is well with TH.
  • The Helper The Helper:
    Power back on finally - all is good here no damage
    +2
  • V-SNES V-SNES:
    Happy Friday!
    +1
  • The Helper The Helper:
    New recipe is another summer dessert Berry and Peach Cheesecake - https://www.thehelper.net/threads/recipe-berry-and-peach-cheesecake.194169/
  • The Helper The Helper:
    I think we need to add something to the bottom of the front page that shows the Headline News forum that has a link to go to the News Forum Index so people can see there is more news. Do you guys see what I am saying, lets say you read all the articles on the front page and you get to the end and it just ends, no kind of link for MOAR!
  • The Helper The Helper:
    Happy Wednesday!
    +1

      The Helper Discord

      Members online

      No members online now.

      Affiliates

      Hive Workshop NUON Dome World Editor Tutorials

      Network Sponsors

      Apex Steel Pipe - Buys and sells Steel Pipe.
      Top