This discussion has been locked.
You can no longer post new replies to this discussion. If you have a question you can start a new discussion

Web session parameters

Hi.

A partner is implementing 1IM and they struggle with a use case where they need to determine the authentication method used in the 1IM web portal. The user must be authenticated using a smartcard certificate in order to be allowed certain actions in the 1IM web.

Below is some information from the partner:

"Customer is using http://www.avaintec.com/' s CryptoSign software that uses probably PKCS11 standard. 

We need to request information about users login thru HTTP session. Web session should somehow tell us parameters from that CryptoSign software. i.e. there are some other software are doing that thru PKCS11.

We haven’t been able to get any information about this and this is still open. Do you have any technical resources in your organization that might have any understanding how PKI and IT-shop session parameters work?"

 

Anyone who knows if we can parse web session parameters into 1IM?

 

Kind regards,

Ingvar 

Parents
  • Below is what the partner runs and the results:

    --- start---
    Imports System.Text
    Imports System
    Imports System.Web
    Imports System.Collections.Specialized.NameValueCollection
    Imports System.Web.SessionState

    Public Function Get_ITSHOP_HTTPHeader() As String


    Dim loop1, loop2 As Integer
    Dim arr1(), arr2() As String
    Dim coll As System.Collections.Specialized.NameValueCollection
    Dim Request As System.Web.HttpRequest = System.Web.HttpContext.Current.Request
    Dim UserType As String= System.Web.HttpContext.Current.User.GetType.ToString

    coll=Request.ServerVariables
    arr1 = coll.AllKeys
    For loop1 = 0 To arr1.GetUpperBound(0)
    VID_Write2Log("c:\temp\IIS_HTTP_REQUEST.TXT", "Key: " & arr1(loop1))
    arr2 = coll.GetValues(loop1) ' Get all values under this key.
    For loop2 = 0 To arr2.GetUpperBound(0)
    VID_Write2Log("c:\temp\IIS_HTTP_REQUEST.TXT", UserType)
    Next loop2
    Next loop1


    Return "the end"
    End Function
    --end--


    The result is pretty much same. The trace below is from application log under IIS

    Error executing script 'Get_ITSHOP_HTTPHeader'.
    at VI.DB.Scripting.ScriptInstance.Eval(String key, Object[] parameters)
    at VI.WebDesigner.Expression.Function.DbScriptFunction.EvalFunction(ActionExecutor executor, RowPointerStack row, Object[] argumentValues)
    at VI.WebDesigner.Expression.UnaryNode.Eval(ActionExecutor executor, RowPointerStack row)
    at VI.WebDesigner.Expression.DataExpression.EvaluateSingleRow(ActionExecutor executor, RowPointerStack rowStack)
    at VI.WebDesigner.Expression.DataExpression.EvaluateSingleRow(ActionExecutor executor, RowPointer row)
    at VI.WebDesigner.Action.FillTable.FillFromRule(ActionExecutor executor, IRuntimeTable tbl, Int32 loadLimit)
    at VI.WebDesigner.Action.FillTable._ExecuteInternal(ActionExecutor executor)
    at VI.WebDesigner.Action.FillTable.ExecuteInternal(ActionExecutor executor)
    at VI.WebDesigner.Action.ActionBase.Execute(ActionExecutor executor) Object reference not set to an instance of an object.
    at DynScripts.Scripts_B7BF6A8B19F44C8BB2A1C440374B9B02.Get_ITSHOP_HTTPHeader()


    Cheers,
    Ingvar
Reply
  • Below is what the partner runs and the results:

    --- start---
    Imports System.Text
    Imports System
    Imports System.Web
    Imports System.Collections.Specialized.NameValueCollection
    Imports System.Web.SessionState

    Public Function Get_ITSHOP_HTTPHeader() As String


    Dim loop1, loop2 As Integer
    Dim arr1(), arr2() As String
    Dim coll As System.Collections.Specialized.NameValueCollection
    Dim Request As System.Web.HttpRequest = System.Web.HttpContext.Current.Request
    Dim UserType As String= System.Web.HttpContext.Current.User.GetType.ToString

    coll=Request.ServerVariables
    arr1 = coll.AllKeys
    For loop1 = 0 To arr1.GetUpperBound(0)
    VID_Write2Log("c:\temp\IIS_HTTP_REQUEST.TXT", "Key: " & arr1(loop1))
    arr2 = coll.GetValues(loop1) ' Get all values under this key.
    For loop2 = 0 To arr2.GetUpperBound(0)
    VID_Write2Log("c:\temp\IIS_HTTP_REQUEST.TXT", UserType)
    Next loop2
    Next loop1


    Return "the end"
    End Function
    --end--


    The result is pretty much same. The trace below is from application log under IIS

    Error executing script 'Get_ITSHOP_HTTPHeader'.
    at VI.DB.Scripting.ScriptInstance.Eval(String key, Object[] parameters)
    at VI.WebDesigner.Expression.Function.DbScriptFunction.EvalFunction(ActionExecutor executor, RowPointerStack row, Object[] argumentValues)
    at VI.WebDesigner.Expression.UnaryNode.Eval(ActionExecutor executor, RowPointerStack row)
    at VI.WebDesigner.Expression.DataExpression.EvaluateSingleRow(ActionExecutor executor, RowPointerStack rowStack)
    at VI.WebDesigner.Expression.DataExpression.EvaluateSingleRow(ActionExecutor executor, RowPointer row)
    at VI.WebDesigner.Action.FillTable.FillFromRule(ActionExecutor executor, IRuntimeTable tbl, Int32 loadLimit)
    at VI.WebDesigner.Action.FillTable._ExecuteInternal(ActionExecutor executor)
    at VI.WebDesigner.Action.FillTable.ExecuteInternal(ActionExecutor executor)
    at VI.WebDesigner.Action.ActionBase.Execute(ActionExecutor executor) Object reference not set to an instance of an object.
    at DynScripts.Scripts_B7BF6A8B19F44C8BB2A1C440374B9B02.Get_ITSHOP_HTTPHeader()


    Cheers,
    Ingvar
Children
No Data