| View previous topic :: View next topic |
| Author |
Message |
Kushal
Joined: 11 May 2018
Posts: 52
|
 Posted: Thu Sep 26, 2019 7:53 am Post subject: AuthenticationData from Floating License |
 |
|
Hi there,
I'm confused on how to get the AuthenticationData from Floating Lics, please help!
My Local License Code:
| Code: | Private Function LoadLocalLicense() As Boolean
If _localLicense Is Nothing Then
_localLicense = _localLicenseProvider.GetLicense()
End If
If _localLicense IsNot Nothing Then 'Custom Code
Dim input As String = _localLicense.AuthenticationData
If input IsNot Nothing Then
Try
Dim element As Xml.Linq.XElement = Xml.Linq.XElement.Parse(input)
If element.Element("LicenseType") IsNot Nothing Then _License_Type = element.Element("LicenseType").Value.ToString.ToUpper
If element.Element("IsLimited") IsNot Nothing Then _License_IsLimited = CBool(element.Element("IsLimited").Value.ToString.ToUpper) '(Limited=Lifetime license but limited support)
If element.Element("CompanyName") IsNot Nothing Then MyCompany.CompanyName = element.Element("CompanyName").Value.ToString.ToUpper
If _License_Type = "LIFETIME" Then Return True
Catch ex As Exception
End Try
End If
End If
Return _localLicenseProvider.IsValid(_localLicense)
End Function |
My Floating code: How do I access the AuthenticationData here?
| Code: |
Private Function LoadFloatingLicense() As Boolean
If _floatingLicense Is Nothing AndAlso Not String.IsNullOrEmpty(UseFloatingLicense) Then
_floatingLicense = GetFloatingLicense(LicenseServerAddress, LicenseServerPort)
If _floatingLicense IsNot Nothing Then
StartFloatingLicenseTimer()
End If
End If
Return _floatingLicense IsNot Nothing
End Function |
|
|
| Back to top |
|
 |
Infralution
Joined: 28 Feb 2005
Posts: 5027
|
| Posted: Thu Sep 26, 2019 11:16 pm Post subject: |
|
|
In the sample Floating License sample project the floating license does not include the AuthenticationData. You can easily modify the FloatingLicense class code to add AuthenticationData as a property and pass it to the FloatingLicense constructor when it is created in GetLicense eg
| Code: | public FloatingLicense GetLicense(string client)
{
FloatingLicense result = null;
lock (this)
{
// check for an existing license first
//
foreach (FloatingLicense license in _activeLicenses)
{
if (license.Client == client)
{
result = license;
break;
}
}
// otherwise create a new license if the limit has
// not been exceeded
//
if (result == null)
{
int numLicenses = NumFloatingLicenses;
if (_activeLicenses.Count >= numLicenses)
throw new LicenseLimitException(numLicenses);
result = new FloatingLicense(client, _license.AuthenticationData);
_activeLicenses.Add(result);
}
}
return result;
}
|
_________________
Infralution Support |
|
| Back to top |
|
|
Kushal
Joined: 11 May 2018
Posts: 52
|
| Posted: Mon Sep 30, 2019 11:12 am Post subject: |
|
|
The function that calls GetLicense as you advised is below:
| Code: | Private Function GetFloatingLicense(ByVal serverAddress As String, ByVal serverPort As Integer) As FloatingLicense
Dim result As FloatingLicense = Nothing
While result Is Nothing
Dim errorMsg As String = Nothing
Try
Dim url As String = [String].Format("tcp://{0}:{1}/LicenseServer", serverAddress, serverPort)
Dim licenseServer As LicenseServer = TryCast(Activator.GetObject(GetType(LicenseServer), url), LicenseServer)
result = licenseServer.GetLicense(Environment.MachineName)
Catch e As LicenseLimitException
errorMsg = String.Format(My.Resources.LicenseLimitMsg, e.Limit)
Catch e As Exception
errorMsg = String.Format(My.Resources.LicenseServerErrorMsg, e.Message, serverAddress)
End Try
If errorMsg IsNot Nothing Then
Dim dr As DialogResult = MessageBox.Show(errorMsg, My.Resources.LicenseErrorTitle, MessageBoxButtons.RetryCancel, MessageBoxIcon.[Error])
If dr = DialogResult.Cancel Then
Exit While
End If
End If
End While
Return result
End Function |
However, when debugging, even stepping through, I simply cannot get INTO GetLicense()!
Removed the SyncLock as well, but no change.
Any suggestions? |
|
| Back to top |
|
|
Infralution
Joined: 28 Feb 2005
Posts: 5027
|
| Posted: Mon Sep 30, 2019 11:56 pm Post subject: |
|
|
Just to clarify you are debugging your GetFloatingLicense method below but you are unable to step into the GetLicense method?
That is to be expected because the GetLicense method is not executing in this process - it executes in your server process. To debug this method you need to open another instance of Visual Studio with the SampleLicenseService project and in the Debug start options set the command line options to be:
/r
This enables you to run the service from the command line or within the debugger. You can start the project and set a break point in the GetLicense method which will be hit when the FloatingLicense application calls it.
_________________
Infralution Support |
|
| Back to top |
|
|
Kushal
Joined: 11 May 2018
Posts: 52
|
| Posted: Fri Oct 04, 2019 8:28 am Post subject: |
|
|
Ahhhh!!!
Thanks! That should've been obvious!!
Managed to add the Auth Data, cheers! |
|
| Back to top |
|
|
Kushal
Joined: 11 May 2018
Posts: 52
|
| Posted: Sat Oct 19, 2019 7:45 am Post subject: |
|
|
Hello there.
A new issue on the result data from the AuthData I'm getting from the license server;
| Code: | Dim url As String = [String].Format("tcp://{0}:{1}/LicenseServer", serverAddress, serverPort)
Dim licenseServer As LicenseServer = TryCast(Activator.GetObject(GetType(LicenseServer), url), LicenseServer)
result = licenseServer.GetLicense(Environment.MachineName) |
Error on, which takes about 30 seconds to move onto;
| Code: | | _License_ExpiryDate = result.expiryDate |
Error:
| Code: | | A connection attempt failed because the connected party did not properly respond after a period of time, or established connection failed because connected host has failed to respond 172.17.161.17:19399 |
Please note that the serverAddress passed, and the result which came back fine, uses 192.168.0.X
HOWEVER, this runs perfectly smoothly when stepping through during a debug session (the /r function in debug). |
|
| Back to top |
|
|
Infralution
Joined: 28 Feb 2005
Posts: 5027
|
| Posted: Sun Oct 20, 2019 3:40 am Post subject: |
|
|
Are you entering the raw IP address for the server in the client software ie 192.168.0.X?
If this is the case I have no idea where the 172.17.161.17 address could be coming from. If you are entering the name of the computer and then you may have DNS issues on your network causing it to resolve to the wrong IP address.
_________________
Infralution Support |
|
| Back to top |
|
|
Kushal
Joined: 11 May 2018
Posts: 52
|
| Posted: Thu Jan 02, 2020 7:42 am Post subject: |
|
|
Happy New Year!!
Sorry for the delay in getting back onto this topic.
Managed to get things working and just ignored this issue for a while!
Ok, so my issue is reading the lic data; including number of floating, expiry date, AuthenticationData.
My code getting the result from .GetLicense is untouched, as shown below;
| Code: |
Dim errorMsg As String = Nothing
Try
Dim url As String = [String].Format("tcp://{0}:{1}/LicenseServer", serverAddress, serverPort)
_logger.Info(url)
Dim licenseServer As LicenseServer = TryCast(Activator.GetObject(GetType(LicenseServer), url), LicenseServer)
result = licenseServer.GetLicense(Environment.MachineName)
Catch e As LicenseLimitException
errorMsg = String.Format(My.Resources.LicenseLimitMsg, e.Limit)
.........
.......
....
|
Result comes back fine, but when reading anything from result, i get the error previously mentioned, with a random (invalid) IP address;
ANY OF THE BELOW TYPE OF ATTEMPTS:
Debug.Print(result.expiryDate.ToString)
ERROR:
| Code: | | A connection attempt failed because the connected party did not properly respond after a period of time, or established connection failed because connected host has failed to respond 172.17.161.17:19399 |
So finally,
what's the CORRECT way to get data from 'result'?
*I'm using BOTH floating and local licenses in my app. |
|
| Back to top |
|
|
Infralution
Joined: 28 Feb 2005
Posts: 5027
|
| Posted: Thu Jan 02, 2020 8:21 am Post subject: |
|
|
I think this has to be a network configuration (DNS lookup) issue. I can't see anyway that the code can generate random IP addresses. Try entering the raw IP address when configuring the client rather than a name which has to be resolved.
_________________
Infralution Support |
|
| Back to top |
|
|
Kushal
Joined: 11 May 2018
Posts: 52
|
| Posted: Thu Jan 02, 2020 9:33 am Post subject: |
|
|
We are using raw IP addresses to avoid any issues.
We've also tried to use static IP's between the client and server, but the same issue occurs.
Am I reading the result the right way?
| Code: | _License_ExpiryDate = result.expiryDate
_License_AuthData = result.AuthData |
In the LicenceService, I create the FloatingLicense like this;
| Code: | Friend Sub New(ByVal client As String, ByVal authdata As String, ByVal numOfLics As Integer, ByVal expirydate As Date)
Me.Client = client
Me.AuthData = authdata
Me.numOfLics = numOfLics
Me.expiryDate = expirydate
End Sub |
Above fields are from the same (Service project, FloatingLicense.vb)
| Code: | Public ReadOnly Property Client() As String
Public ReadOnly Property AuthData() As String
Public ReadOnly Property numOfLics() As Integer
Public ReadOnly Property expiryDate() As Date |
|
|
| Back to top |
|
|
Infralution
Joined: 28 Feb 2005
Posts: 5027
|
| Posted: Mon Jan 06, 2020 2:34 am Post subject: |
|
|
Is the IP address (172.17.161.17) in the error message the IP address of your server?
If you are using the raw IP address for the server when configuring the client and then you get an error message which has a different IP address in it then I don't see how this could possibly occur - other than some very strange networking configuration issue.
_________________
Infralution Support |
|
| Back to top |
|
|
Kushal
Joined: 11 May 2018
Posts: 52
|
| Posted: Mon Jan 06, 2020 6:06 am Post subject: |
|
|
Sorry, forgot to mentioned the customers IP.
They're running on 192.168.0.0/20
The computers were tested with static and DHCP IP's on the same sequence.
Client has about 20 PC's in the same office, 3 of them have this issue.
The IP in the error is either starting from 172 or 169, which ususally occur when DHCP fails.
The stack trace;
| Code: | System.Net.Sockets.SocketException: A connection attempt failed because the connected party did not properly respond after a period of time, or established connection failed because connected host has failed to respond 169.254.85.40:19399
at
at Server stack trace:
at System.Net.Sockets.Socket.DoConnect(EndPoint endPointSnapshot, SocketAddress socketAddress)
at System.Net.Sockets.Socket.Connect(EndPoint remoteEP)
at System.Runtime.Remoting.Channels.RemoteConnection.CreateNewSocket(EndPoint ipEndPoint)
at System.Runtime.Remoting.Channels.RemoteConnection.CreateNewSocket()
at System.Runtime.Remoting.Channels.RemoteConnection.GetSocket()
at System.Runtime.Remoting.Channels.SocketCache.GetSocket(String machinePortAndSid, Boolean openNew)
at System.Runtime.Remoting.Channels.Tcp.TcpClientTransportSink.SendRequestWithRetry(IMessage msg, ITransportHeaders requestHeaders, Stream requestStream)
at System.Runtime.Remoting.Channels.Tcp.TcpClientTransportSink.ProcessMessage(IMessage msg, ITransportHeaders requestHeaders, Stream requestStream, ITransportHeaders& responseHeaders, Stream& responseStream)
at System.Runtime.Remoting.Channels.BinaryClientFormatterSink.SyncProcessMessage(IMessage msg)
at
at Exception rethrown at [0]:
at System.Runtime.Remoting.Proxies.RealProxy.HandleReturnMessage(IMessage reqMsg, IMessage retMsg)
at System.Runtime.Remoting.Proxies.RealProxy.PrivateInvoke(MessageData& msgData, Int32 type)
at System.Object.ToString()
at Raminian.Program.GetFloatingLicense(String serverAddress, Int32 serverPort)
at Raminian.Program.InstallFloatingLicense(String serverAddress, Int32 serverPort)
at Raminian.LicenseSelectForm.OnClosing(CancelEventArgs e)
at System.Windows.Forms.Form.CheckCloseDialog(Boolean closingOnly) |
Again,
Am I reading the result the right way?
| Code: | | License_ExpiryDate = result.expiryDate |
|
|
| Back to top |
|
|
Infralution
Joined: 28 Feb 2005
Posts: 5027
|
| Posted: Mon Jan 06, 2020 10:48 pm Post subject: |
|
|
If some clients are connecting and others not then it is definitely a networking configuration issue.
It still is not clear from your answers. Are you configuring the clients to connect by entering the server IP address?
If so what is the server address?
If the server address is not the same as the IP address being reported in the error message I don't really understand how that could happen - there must be some strange IP redirection going on on the PC/network.
_________________
Infralution Support |
|
| Back to top |
|
|
Kushal
Joined: 11 May 2018
Posts: 52
|
| Posted: Tue Jan 07, 2020 5:49 am Post subject: |
|
|
Server is 192.168.0.99, Subnet of 255.255.240.0
Client is on 192.168.0.66, Subnet of 255.255.240.0
Tried client on a different IP, both, static and dynamic.
AM I READING THE FLOATING LICENSE THE RIGHT WAY? BY USING RESULT.CUSTOM_FIELD? |
|
| Back to top |
|
|
Infralution
Joined: 28 Feb 2005
Posts: 5027
|
| Posted: Tue Jan 07, 2020 7:14 am Post subject: |
|
|
When you configured the client did you specify the server by IP address?
I have no idea what you mean by "result.custom_field".
_________________
Infralution Support |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
