Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
1
Web Server - Ask For Help / Re: Cryptonite question..
« on: March 30, 2016, 07:22:05 AM »
for those interested in what I did now with Bruce's newest update is the following.
st1 is a stringtheory object.
outdata = 'ee8fkXvqWUhObN/B+9MbaiX5PH9cvkiyRBA/wOMaKqTs6W9j+LdwARS108cfqLfr'
st1.SetValue(outdata)
st1.Base64decode()
datalen = st1.Length()
outdata = st1.getvalue()
Crypto.CipherMode = 2
indata = outdata
Password = '1234567890123456'
ProviderType = cs:PROV_RSA_AES
ProviderName = cs:MS_ENH_RSA_AES_PROV
Algorithm = cs:CALG_AES_128
KeyHashAlg = 0
CipherMode = cs:CRYPT_MODE_ECB
PaddingMode = 4
initVector = ''
Crypto.DecryptString(indata,datalen,Password,ProviderType,ProviderName,Algorithm,KeyHashAlg,CipherMode,PaddingMode,clip(initVector))
And that's the code I used to decrypt my stuff from AES 128 with ECB mode (AES is also know as Rijndael in case somebody doesn't recognize the name)
Hope that helps somebody else out.
Best Regards..
Roberto Renz
st1 is a stringtheory object.
outdata = 'ee8fkXvqWUhObN/B+9MbaiX5PH9cvkiyRBA/wOMaKqTs6W9j+LdwARS108cfqLfr'
st1.SetValue(outdata)
st1.Base64decode()
datalen = st1.Length()
outdata = st1.getvalue()
Crypto.CipherMode = 2
indata = outdata
Password = '1234567890123456'
ProviderType = cs:PROV_RSA_AES
ProviderName = cs:MS_ENH_RSA_AES_PROV
Algorithm = cs:CALG_AES_128
KeyHashAlg = 0
CipherMode = cs:CRYPT_MODE_ECB
PaddingMode = 4
initVector = ''
Crypto.DecryptString(indata,datalen,Password,ProviderType,ProviderName,Algorithm,KeyHashAlg,CipherMode,PaddingMode,clip(initVector))
And that's the code I used to decrypt my stuff from AES 128 with ECB mode (AES is also know as Rijndael in case somebody doesn't recognize the name)
Hope that helps somebody else out.
Best Regards..
Roberto Renz
2
Web Server - Ask For Help / Re: NetWebServerWorker
« on: March 30, 2016, 07:13:54 AM »
I seems that nettalk urldecodes all incoming gets when you do the getvalue requests.
NetWebServerWorkerBase.GetValueFormat
of net:IsNumber
returnvalue = self.DformatNumber(self._LocalDataQueue.Value,self._LocalDataQueue.Picture)
!str.KeepChars('01234567890.-')
!returnvalue = str.GetValue()
of net:IsTyped ! space up, plus 13,10
str.RemoveChars('<0,1,2,3,4,5,6,7,8,9,11,12,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31>')
returnvalue = str.GetValue()
of net:OnlySpaceup ! only keeps chars 32 and up.
str.RemoveChars('<0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31>')
returnvalue = str.GetValue()
so if the text is only not urlencoded and only has pure base 64 it truncates some characters..
you'll need to get the value some other way that is not the getvalue method or Bruce needs to gives us a raw way to get the value.
there might already be a way, I just don't know it.
Best Regards...
Roberto Renz
NetWebServerWorkerBase.GetValueFormat
of net:IsNumber
returnvalue = self.DformatNumber(self._LocalDataQueue.Value,self._LocalDataQueue.Picture)
!str.KeepChars('01234567890.-')
!returnvalue = str.GetValue()
of net:IsTyped ! space up, plus 13,10
str.RemoveChars('<0,1,2,3,4,5,6,7,8,9,11,12,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31>')
returnvalue = str.GetValue()
of net:OnlySpaceup ! only keeps chars 32 and up.
str.RemoveChars('<0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31>')
returnvalue = str.GetValue()
so if the text is only not urlencoded and only has pure base 64 it truncates some characters..
you'll need to get the value some other way that is not the getvalue method or Bruce needs to gives us a raw way to get the value.
there might already be a way, I just don't know it.
Best Regards...
Roberto Renz
3
Web Server - Ask For Help / Re: Cryptonite question..
« on: March 24, 2016, 01:31:25 PM »
ok.. so any help would be appreciated..
what happened to Kevin's help here? it's all gone..
Best Regards...
Roberto Renz
what happened to Kevin's help here? it's all gone..
Best Regards...
Roberto Renz
4
Web Server - Ask For Help / Re: Cryptonite question..
« on: March 18, 2016, 05:43:03 AM »
That's what I'm using..
that code is basicly from from the example program.
that code is basicly from from the example program.
5
Web Server - Ask For Help / Cryptonite question..
« on: March 17, 2016, 06:44:44 AM »
Help please
Sorry if this is not nettalk related, although I will be using it with nettalk as a service..
Anyway.. I need to decode and decrypt a data string I'll be receiving on a URL.
similiar to this:
http://mytest.reddin.net/testa?data=+9PJM7jC8g1pdb0YnN19ZJl8eUgUfT8z5IOBGGq+4UPK8YSx1lT16Ghv9OsX+Kh6Q8+BCx2QgaePeLsHZn5xEAIKtkVOWM5xqqacEh3eMlaHDhQCWpETYz+lHWqMVXdY
Python code looks so easy
secret_key = '1234567890123456'
cipher = AES.new(secret_key, AES.MODE_ECB)
encoded = '+9PJM7jC8g1pdb0YnN19ZJl8eUgUfT8z5IOBGGq+4UPK8YSx1lT16Ghv9OsX+Kh6Q8+BCx2QgaePeLsHZn5xEAIKtkVOWM5xqqacEh3eMlaHDhQCWpETYz+lHWqMVXdY'
decoded = cipher.decrypt(base64.b64decode(encoded))
data = json.loads(decoded)
so I took the encoded text and sent it to this web site
http://aesencryption.net/
works like a charm I get the data back..
so I try doing the same in clarion..
My current code.
inbase64 = '+9PJM7jC8g1pdb0YnN19ZJl8eUgUfT8z5IOBGGq+4UPK8YSx1lT16Ghv9OsX+Kh6Q8+BCx2QgaePeLsHZn5xEAIKtkVOWM5xqqacEh3eMlaHDhQCWpETYz+lHWqMVXdY'
stbase.SetValue(inbase64, true)
stbase.Base64decode()
dataLen = stbase.length()
Password = '1234567890123456'
ProviderType = cs:PROV_RSA_AES
ProviderName = cs:MS_ENH_RSA_AES_PROV
Algorithm = cs:ALG_SID_AES_128
Crypto.DecryptString(stbase,datalen,Password,ProviderType,ProviderName,Algorithm)
but I get and error when I try to decrypt and frankly have no idea what it means..
http://screencast.com/t/tfK3UkaRJa
that error is followed by the following error..
http://screencast.com/t/O8hbJhK5Kb
and of course nothing gets decrypted.
can it really be more difficult, or am I doing to enormous booboo here..
Best Regards...
Roberto Renz
Sorry if this is not nettalk related, although I will be using it with nettalk as a service..
Anyway.. I need to decode and decrypt a data string I'll be receiving on a URL.
similiar to this:
http://mytest.reddin.net/testa?data=+9PJM7jC8g1pdb0YnN19ZJl8eUgUfT8z5IOBGGq+4UPK8YSx1lT16Ghv9OsX+Kh6Q8+BCx2QgaePeLsHZn5xEAIKtkVOWM5xqqacEh3eMlaHDhQCWpETYz+lHWqMVXdY
Python code looks so easy
secret_key = '1234567890123456'
cipher = AES.new(secret_key, AES.MODE_ECB)
encoded = '+9PJM7jC8g1pdb0YnN19ZJl8eUgUfT8z5IOBGGq+4UPK8YSx1lT16Ghv9OsX+Kh6Q8+BCx2QgaePeLsHZn5xEAIKtkVOWM5xqqacEh3eMlaHDhQCWpETYz+lHWqMVXdY'
decoded = cipher.decrypt(base64.b64decode(encoded))
data = json.loads(decoded)
so I took the encoded text and sent it to this web site
http://aesencryption.net/
works like a charm I get the data back..
so I try doing the same in clarion..
My current code.
inbase64 = '+9PJM7jC8g1pdb0YnN19ZJl8eUgUfT8z5IOBGGq+4UPK8YSx1lT16Ghv9OsX+Kh6Q8+BCx2QgaePeLsHZn5xEAIKtkVOWM5xqqacEh3eMlaHDhQCWpETYz+lHWqMVXdY'
stbase.SetValue(inbase64, true)
stbase.Base64decode()
dataLen = stbase.length()
Password = '1234567890123456'
ProviderType = cs:PROV_RSA_AES
ProviderName = cs:MS_ENH_RSA_AES_PROV
Algorithm = cs:ALG_SID_AES_128
Crypto.DecryptString(stbase,datalen,Password,ProviderType,ProviderName,Algorithm)
but I get and error when I try to decrypt and frankly have no idea what it means..
http://screencast.com/t/tfK3UkaRJa
that error is followed by the following error..
http://screencast.com/t/O8hbJhK5Kb
and of course nothing gets decrypted.
can it really be more difficult, or am I doing to enormous booboo here..
Best Regards...
Roberto Renz
6
Web Server - Ask For Help / Re: Multiple lines in a radio Option
« on: March 15, 2016, 08:33:06 AM »
wonderful....
7
Web Server - Ask For Help / Re: Multiple lines in a radio Option
« on: March 14, 2016, 03:31:55 PM »
Maybe Bruce will chime in with an idea..
this is my workaround for now..
http://screencast.com/t/S9cG8OQGA
so maybe that will be the best I can do.
this is my workaround for now..
http://screencast.com/t/S9cG8OQGA
so maybe that will be the best I can do.
8
Web Server - Ask For Help / Re: Counting users which are logged in
« on: March 14, 2016, 10:32:38 AM »
I do that in the webhandler.
notifydeletesession embed.
you can do that there but you would need to save the sessionid somehow tied to your user in you login form so that you can log him out adequately.
Best Regards...
Roberto Renz
notifydeletesession embed.
you can do that there but you would need to save the sessionid somehow tied to your user in you login form so that you can log him out adequately.
Best Regards...
Roberto Renz
9
Web Server - Ask For Help / Re: event on a radio field
« on: March 14, 2016, 06:14:10 AM »
Correct you are..
I had code in the Generate Form that was interfering with the correct functionality..
Best Regards...
Roberto Renz
I had code in the Generate Form that was interfering with the correct functionality..
Best Regards...
Roberto Renz
10
Web Server - Ask For Help / Re: Multiple lines in a radio Option
« on: March 13, 2016, 09:58:26 PM »
Flint
http://screencast.com/t/4G42P0hhzGl
well.. not quite what we we thought it would show. but maybe it was expected..
Best Regards...
Robi
http://screencast.com/t/4G42P0hhzGl
well.. not quite what we we thought it would show. but maybe it was expected..
Best Regards...
Robi
11
Web Server - Ask For Help / event on a radio field
« on: March 11, 2016, 09:51:19 PM »
on a radio field I'm refreshing other fields depending on the selection..
however it will only trigger the event once, the first time I select something on the radio.
after that the second, third whatever will not go through the server side code. unless you accept the full form and then it will reset.
any way to get the radio button to trigger on any change?
however it will only trigger the event once, the first time I select something on the radio.
after that the second, third whatever will not go through the server side code. unless you accept the full form and then it will reset.
any way to get the radio button to trigger on any change?
12
Web Server - Ask For Help / Multiple lines in a radio Option
« on: March 11, 2016, 07:41:34 AM »
Is it possible to have several lines divided with a forced Carriage Return in a Radio Option with Jquery button?
I ca add the carriage return linefeed in my text but the button will get all jumbled up together..
http://screencast.com/t/LZBoI6oiIlZ
here in the Firefox Web Inspector I see that my line feeds are going through,
http://screencast.com/t/LZTFoOq4x
but they are all getting jumbled up in the button..
any help would be appreciated..
Best Regards...
Roberto Renz
I ca add the carriage return linefeed in my text but the button will get all jumbled up together..
http://screencast.com/t/LZBoI6oiIlZ
here in the Firefox Web Inspector I see that my line feeds are going through,
http://screencast.com/t/LZTFoOq4x
but they are all getting jumbled up in the button..
any help would be appreciated..
Best Regards...
Roberto Renz
13
Web Server - Ask For Help / Re: sessionlevel coming back from the afterlife.
« on: June 11, 2015, 06:40:40 AM »
Thanks Bruce...
14
Web Server - Ask For Help / sessionlevel coming back from the afterlife.
« on: June 09, 2015, 10:23:20 AM »
Bruce...
using latest 8.51
setting sessionlevel at my login form
say I set it to 50 or whatever..
I logout and do deletesession()
I test for sessionlevel after that and it's set to 0
then I go to a form that requieres no login session value or level and test for sessionlevel at the start of it and sessionlevel still set at 50
does this have anything to do with the xml save and restore for the settings?
using latest 8.51
setting sessionlevel at my login form
say I set it to 50 or whatever..
I logout and do deletesession()
I test for sessionlevel after that and it's set to 0
then I go to a form that requieres no login session value or level and test for sessionlevel at the start of it and sessionlevel still set at 50
does this have anything to do with the xml save and restore for the settings?
15
Web Server - Ask For Help / Tab dissappears and comes out below when you add a condition to the tab
« on: March 27, 2015, 01:23:17 PM »
sending a screenshot of how it displays when you add a condition to the tab
http://screencast.com/t/XUYuBxKaadn
if I take away the condition, then it creates a tab up at the top like it should.
can you take a look at this bug Bruce... it does it with newest release also..
Best Regards...
Roberto Renz
http://screencast.com/t/XUYuBxKaadn
if I take away the condition, then it creates a tab up at the top like it should.
can you take a look at this bug Bruce... it does it with newest release also..
Best Regards...
Roberto Renz