New topic: Adding licensing & activation mechanism to developed apps
<http://forums.realsoftware.com/viewtopic.php?t=47586> Page 1 of 1 [ 4 posts ] Previous topic | Next topic Author Message p0wn3d Post subject: Adding licensing & activation mechanism to developed appsPosted: Sat Apr 13, 2013 12:54 pm Joined: Sun Oct 28, 2012 4:54 am Posts: 204 Location: Herts, UK Hi, Now that I am getting close to a beta release of my app. I was just curious what methods others are using for adding licensing, product activation and code obscurification _________________ Real Studio 2012 R2 SysInfo BackTrack Linux/BackBox Linux/Debian Lenny/Windows 7/Windows 8/OpenWRT/OpenBSD & Yes it's me in the Avatar Top simulanics Post subject: Re: Adding licensing & activation mechanism to developed appPosted: Sat Apr 13, 2013 3:17 pm Joined: Sun Aug 12, 2007 10:10 am Posts: 1053 Location: Boiling Springs, SC p0wn3d wrote:Hi, Now that I am getting close to a beta release of my app. I was just curious what methods others are using for adding licensing, product activation and code obscurification What platforms are you releasing for? Here is a great encryption function to save licenses and such...also used by SSL Function RC4(strData as string, strKey as String) As string #If Not DebugBuild #pragma DisableBackgroundTasks #pragma DisableBoundsChecking #pragma DisableAutoWaitCursor #pragma StackOverflowchecking False #pragma NilObjectChecking False #EndIf Dim MM As MemoryBlock = strData Dim MM2 As New MemoryBlock(LenB(strData)) Dim memAsciiArray(255) As Integer Dim memKeyArray(255) As Integer Dim memJump As Integer Dim memTemp As Integer Dim memY As Integer Dim intKeyLength As Integer Dim intIndex As Integer Dim intT As Integer Dim intX As Integer intKeyLength = Len(strKey) For intIndex = 0 To 255 memKeyArray(intIndex) = Asc(Mid(strKey, ((intIndex) Mod (intKeyLength)) + 1, 1)) Next For intIndex = 0 To 255 memAsciiArray(intIndex) = intIndex Next For intIndex = 0 To 255 memJump = (memJump + memAsciiArray(intIndex) + memKeyArray(intIndex)) Mod 256 memTemp = memAsciiArray(intIndex) memAsciiArray(intIndex) = memAsciiArray(memJump) memAsciiArray(memJump) = memTemp Next intIndex = 0 memJump = 0 For intX = 1 To MM2.Size intIndex = (intIndex + 1) Mod 256 memJump = (memJump + memAsciiArray(intIndex)) Mod 256 intT = (memAsciiArray(intIndex) + memAsciiArray(memJump)) Mod 256 memTemp = memAsciiArray(intIndex) memAsciiArray(intIndex) = memAsciiArray(memJump) memAsciiArray(memJump) = memTemp memY = memAsciiArray(intT) mm2.Byte(intX - 1) = bitwise.bitxor(Val("&h" + Hex(MM.Byte(IntX - 1))), bitwise.bitxor(memTemp,memY)) Next Return MM2 End Function You can also do a hash of your compiled application and have the application do a hash check at startup of your app to verify that it hasn't been altered (thus preventing hacking attempts)..and if so...prompt the user to re-install..and quit There's a number of methods to be employed. Will the application require an internet connection? _________________ Matthew A. Combatti Real Studio 2012 r1.2 Visit Real Studio Developer's Spot! Systems I Use: Windows XP/Windows Vista/Windows Server 2008 r2/Windows 7/Windows 8 Mac OSX 10.5/Mac OSX 10.6/Mac OSX Server/Ubuntu/Debian/Suse/Red Hat/ Windows Server 2011/CentOS 5.4 /ReactOS/SimOS ~All REAL Compatible~ Top Bob Keeney Post subject: Re: Adding licensing & activation mechanism to developed appPosted: Sat Apr 13, 2013 4:12 pm Joined: Fri Sep 30, 2005 11:48 am Posts: 3498 Location: Lenexa, KS We've used eSellerate for years and a number of our clients are using it. Currently you have to contact support to get a Windows install that works with Real Studio 2012 and newer. It combines the web store along with licensing. Lot's of options. Others have used FastSpring and they seem to like it. I know a few that are using Kagi but not too many. _________________ Bob K. A blog about being a Real Studio developer at http://www.bkeeneybriefs.com Top p0wn3d Post subject: Re: Adding licensing & activation mechanism to developed appPosted: Mon Apr 15, 2013 7:10 am Joined: Sun Oct 28, 2012 4:54 am Posts: 204 Location: Herts, UK Thanks guys for you kind advice. Quote:Here is a great encryption function to save licenses and such...also used by SSL Thanks Matt that is very very useful _________________ Real Studio 2012 R2 SysInfo BackTrack Linux/BackBox Linux/Debian Lenny/Windows 7/Windows 8/OpenWRT/OpenBSD & Yes it's me in the Avatar Top Display posts from previous: All posts1 day7 days2 weeks1 month3 months6 months1 year Sort by AuthorPost timeSubject AscendingDescending Page 1 of 1 [ 4 posts ] -- Over 1500 classes with 29000 functions in one REALbasic plug-in collection. The Monkeybread Software Realbasic Plugin v9.3. http://www.monkeybreadsoftware.de/realbasic/plugins.shtml [email protected]
