Smalltalk › tODE

[tode_st] https mc repos

_‹ Previous Topic Next Topic _›

Classic

List

Threaded

2 messages Options

Paul DeBruicker

[tode_st] https mc repos

Hi Dale,

On GemStone 3.3.1 and tODE (a52d32 ?) I attempt to get the packages list from an https mcz repo that uses a password/user combo I get this bug:

Looks like its maybe not Zodiac aware which is loaded in the stone and works.

Prior to running the "use-server-certs-to-validate-clients" e.g.:

GsSecureSocket useCACertificateFileForClients: '/etc/ssl/certs/ca-certificates.crt'.

the stack is

> UserDefinedError: Reading a number failed: a digit between 0 and 9 expected
> --------------------
> 1. UserDefinedError(AbstractException)>>_signalWith: @6 line 25
> 2. UserDefinedError(AbstractException)>>signal @2 line 47
> 3. SqNumberParser(Object)>>error: @6 line 7
> 4. SqNumberParser(NumberParser)>>expected: @14 line 8
> 5. SqNumberParser>>readNamedFloatOrFail @20 line 24
> 6. SqNumberParser>>nextNumber @9 line 13
> 7. Number class>>readFrom: @3 line 8
> 8. String(CharacterCollection)>>asNumber @3 line 5
> 9. HTTPSocket class>>httpGetDocument:args:accept:request: @25 line 15
> 10. HTTPSocket class>>httpGet:args:accept:request: @3 line 6
> 11. HTTPSocket class>>httpGet:args:user:passwd: @12 line 5
> 12. [] in ExecBlock0(MCPlatformSupport class)>>readStreamForUrl:user:passwd:do: @5 line 9
> 13. ExecBlock0(ExecBlock)>>on:do: @3 line 44
> 14. MCPlatformSupport class>>readStreamForUrl:user:passwd:do: @6 line 14
> 15. MCHttpRepository>>allFileNames @7 line 3
> 16. MCHttpRepository(MCFileBasedRepository)>>readableFileNames @3 line 2
> 17. MCHttpRepository(MCFileBasedRepository)>>allVersionNames @3 line 2
> 18. TDMonticelloTool>>resolvedReferencesForRepository: @3 line 3
> 19. TDMonticelloTool>>mrpackageNamesIn: @5 line 4
> 20. TDRepositoryPackageBrowser>>packagesSpec @4 line 2
> 21. TDRepositoryPackageBrowser>>packageTextList @3 line 3
> 22. TDRepositoryPackageBrowser>>clientList:listElement: @3 line 3
> 23. [] in TDRepositoryPackageBrowser(TDAbstractToolBuilder)>>clientListBlock @3 line 2
> 24. TDMiniToolSpec>>clientList:listElement: @4 line 3
> 25. TDMiniToolClientListElementBuilder>>clientList: @3 line 2
> 26. TDMiniToolClientListElementBuilder(TDClientListElementBuilder)>>firstList: @2 line 2
> 27. TDMiniToolClientListElementBuilder(TDClientListElementBuilder)>>buildClientElementUsing:editorAspect: @20 line 15
> 28. [] in ExecBlock2(TDTopezServer)>>clientElementFor:using: @5 line 9
> 29. [] in TDTopezServer>>editorNodeFor:aspect:do: @9 line 9
> 30. [] in ExecBlock1(TDTopezServer)>>editorNodeClassNameFor:aspect:do: @6 line 10
> 31. TDTopezServer>>lookupClassNameFor:aspect:defaultAspect:in:do: @25 line 28
> 32. TDTopezServer>>editorNodeClassNameFor:aspect:do: @6 line 3
> 33. TDTopezServer>>editorNodeFor:aspect:do: @3 line 3
> 34. TDTopezServer>>clientElementFor:using: @4 line 4
> 35. TDTopezServer>>edit:using: @3 line 3
> 36. TDRepositoryPackageBrowser(Object)>>editUsing: @4 line 3
> 37. TDRepositoryPackageBrowser(TDAbstractToolBuilder)>>open @3 line 2
> 38. TDMonticelloTool>>mrBrowseRepositoryPackges:workingCopy:parentBuilder:windowId:label: @13 line 12
> 39. TDMonticelloTool>>mrBrowseRepositoryPackges:workingCopy:label: @2 line 3
> 40. TDRepositoryBrowser>>browseRepositoryPackages:selectedIndex: @13 line 7
> 41. TDRepositoryBrowser(Object)>>perform:withArguments: @1 line 1
> 42. TDRepositoryBrowser(TDAbstractToolBuilder)>>menuAction:actionSymbol:listElement:selectedIndex: @4 line 5
> 43. TDRepositoryBrowser(TDStandardToolBuilder)>>menuAction:actionSymbol:listElement:selectedIndex: @3 line 4
> 44. [] in TDRepositoryBrowser(TDAbstractToolBuilder)>>menuActionBlock @3 line 5
> 45. TDMiniToolSpec>>menuAction:actionSymbol:listElement:selectedIndex: @4 line 4
> 46. [] in TDMiniToolClientListElementBuilder>>menuActionBlock @4 line 7
> 47. TDMiniToolClientListElementBuilder(ExecBlock)>>valueWithArguments: @1 line 1
> 48. TDMiniToolClientListElementBuilder(ExecBlock)>>value:value:value: @2 line 11
> 49. GsNMethod class>>_gsReturnToC @1 line 1

After running the "use-server-certs-to-validate-clients" command the stack error is:

--
You received this message because you are subscribed to the Google Groups "tODE" group.
To unsubscribe from this group and stop receiving emails from it, send an email to [hidden email].
For more options, visit https://groups.google.com/d/optout.

Dale Henrichs-3

Re: [tode_st] https mc repos

Paul,

Never tried connecting to an HTTPS mcz repo and from looking at the
code, HTTPSocket is wired to use GsSocket, so I guess I wouldn't expect
it to work ...

Not exactly sure how to go about plugging GsSecureSocket into the mix
... HTTPSocket class>>httpGetDocument:args:accept:request: looks pretty
hard-wired to expecting/using http: ...

I suppose it wouldn't be too hard to hack https: recognition into
HTTPSocket and perhaps a subclass HTTPSSocket is called for?

Dale

On 02/05/2017 05:35 PM, PAUL DEBRUICKER wrote:

> Hi Dale,
>
>
> On GemStone 3.3.1 and tODE (a52d32 ?) I attempt to get the packages list from an https mcz repo that uses a password/user combo I get this bug:
>
>
> Looks like its maybe not Zodiac aware which is loaded in the stone and works.
>
>
> Prior to running the "use-server-certs-to-validate-clients" e.g.:
>
> GsSecureSocket useCACertificateFileForClients: '/etc/ssl/certs/ca-certificates.crt'.
>
>
> the stack is
>
>
>> UserDefinedError: Reading a number failed: a digit between 0 and 9 expected
>> --------------------
>> 1. UserDefinedError(AbstractException)>>_signalWith: @6 line 25
>> 2. UserDefinedError(AbstractException)>>signal @2 line 47
>> 3. SqNumberParser(Object)>>error: @6 line 7
>> 4. SqNumberParser(NumberParser)>>expected: @14 line 8
>> 5. SqNumberParser>>readNamedFloatOrFail @20 line 24
>> 6. SqNumberParser>>nextNumber @9 line 13
>> 7. Number class>>readFrom: @3 line 8
>> 8. String(CharacterCollection)>>asNumber @3 line 5
>> 9. HTTPSocket class>>httpGetDocument:args:accept:request: @25 line 15
>> 10. HTTPSocket class>>httpGet:args:accept:request: @3 line 6
>> 11. HTTPSocket class>>httpGet:args:user:passwd: @12 line 5
>> 12. [] in ExecBlock0(MCPlatformSupport class)>>readStreamForUrl:user:passwd:do: @5 line 9
>> 13. ExecBlock0(ExecBlock)>>on:do: @3 line 44
>> 14. MCPlatformSupport class>>readStreamForUrl:user:passwd:do: @6 line 14
>> 15. MCHttpRepository>>allFileNames @7 line 3
>> 16. MCHttpRepository(MCFileBasedRepository)>>readableFileNames @3 line 2
>> 17. MCHttpRepository(MCFileBasedRepository)>>allVersionNames @3 line 2
>> 18. TDMonticelloTool>>resolvedReferencesForRepository: @3 line 3
>> 19. TDMonticelloTool>>mrpackageNamesIn: @5 line 4
>> 20. TDRepositoryPackageBrowser>>packagesSpec @4 line 2
>> 21. TDRepositoryPackageBrowser>>packageTextList @3 line 3
>> 22. TDRepositoryPackageBrowser>>clientList:listElement: @3 line 3
>> 23. [] in TDRepositoryPackageBrowser(TDAbstractToolBuilder)>>clientListBlock @3 line 2
>> 24. TDMiniToolSpec>>clientList:listElement: @4 line 3
>> 25. TDMiniToolClientListElementBuilder>>clientList: @3 line 2
>> 26. TDMiniToolClientListElementBuilder(TDClientListElementBuilder)>>firstList: @2 line 2
>> 27. TDMiniToolClientListElementBuilder(TDClientListElementBuilder)>>buildClientElementUsing:editorAspect: @20 line 15
>> 28. [] in ExecBlock2(TDTopezServer)>>clientElementFor:using: @5 line 9
>> 29. [] in TDTopezServer>>editorNodeFor:aspect:do: @9 line 9
>> 30. [] in ExecBlock1(TDTopezServer)>>editorNodeClassNameFor:aspect:do: @6 line 10
>> 31. TDTopezServer>>lookupClassNameFor:aspect:defaultAspect:in:do: @25 line 28
>> 32. TDTopezServer>>editorNodeClassNameFor:aspect:do: @6 line 3
>> 33. TDTopezServer>>editorNodeFor:aspect:do: @3 line 3
>> 34. TDTopezServer>>clientElementFor:using: @4 line 4
>> 35. TDTopezServer>>edit:using: @3 line 3
>> 36. TDRepositoryPackageBrowser(Object)>>editUsing: @4 line 3
>> 37. TDRepositoryPackageBrowser(TDAbstractToolBuilder)>>open @3 line 2
>> 38. TDMonticelloTool>>mrBrowseRepositoryPackges:workingCopy:parentBuilder:windowId:label: @13 line 12
>> 39. TDMonticelloTool>>mrBrowseRepositoryPackges:workingCopy:label: @2 line 3
>> 40. TDRepositoryBrowser>>browseRepositoryPackages:selectedIndex: @13 line 7
>> 41. TDRepositoryBrowser(Object)>>perform:withArguments: @1 line 1
>> 42. TDRepositoryBrowser(TDAbstractToolBuilder)>>menuAction:actionSymbol:listElement:selectedIndex: @4 line 5
>> 43. TDRepositoryBrowser(TDStandardToolBuilder)>>menuAction:actionSymbol:listElement:selectedIndex: @3 line 4
>> 44. [] in TDRepositoryBrowser(TDAbstractToolBuilder)>>menuActionBlock @3 line 5
>> 45. TDMiniToolSpec>>menuAction:actionSymbol:listElement:selectedIndex: @4 line 4
>> 46. [] in TDMiniToolClientListElementBuilder>>menuActionBlock @4 line 7
>> 47. TDMiniToolClientListElementBuilder(ExecBlock)>>valueWithArguments: @1 line 1
>> 48. TDMiniToolClientListElementBuilder(ExecBlock)>>value:value:value: @2 line 11
>> 49. GsNMethod class>>_gsReturnToC @1 line 1
>
>
> After running the "use-server-certs-to-validate-clients" command the stack error is:
>
>
>> UserDefinedError: Reading a number failed: a digit between 0 and 9 expected
>> --------------------
>> 1. UserDefinedError(AbstractException)>>_signalWith: @6 line 25
>> 2. UserDefinedError(AbstractException)>>signal @2 line 47
>> 3. SqNumberParser(Object)>>error: @6 line 7
>> 4. SqNumberParser(NumberParser)>>expected: @14 line 8
>> 5. SqNumberParser>>readNamedFloatOrFail @20 line 24
>> 6. SqNumberParser>>nextNumber @9 line 13
>> 7. Number class>>readFrom: @3 line 8
>> 8. String(CharacterCollection)>>asNumber @3 line 5
>> 9. HTTPSocket class>>httpGetDocument:args:accept:request: @25 line 15
>> 10. HTTPSocket class>>httpGet:args:accept:request: @3 line 6
>> 11. HTTPSocket class>>httpGet:args:user:passwd: @12 line 5
>> 12. [] in ExecBlock0(MCPlatformSupport class)>>readStreamForUrl:user:passwd:do: @5 line 9
>> 13. ExecBlock0(ExecBlock)>>on:do: @3 line 44
>> 14. MCPlatformSupport class>>readStreamForUrl:user:passwd:do: @6 line 14
>> 15. MCHttpRepository>>allFileNames @7 line 3
>> 16. MCHttpRepository(MCFileBasedRepository)>>readableFileNames @3 line 2
>> 17. MCHttpRepository(MCFileBasedRepository)>>allVersionNames @3 line 2
>> 18. TDMonticelloTool>>resolvedReferencesForRepository: @3 line 3
>> 19. TDMonticelloTool>>mrpackageNamesIn: @5 line 4
>> 20. TDRepositoryPackageBrowser>>packagesSpec @4 line 2
>> 21. TDRepositoryPackageBrowser>>packageTextList @3 line 3
>> 22. TDRepositoryPackageBrowser>>clientList:listElement: @3 line 3
>> 23. [] in TDRepositoryPackageBrowser(TDAbstractToolBuilder)>>clientListBlock @3 line 2
>> 24. TDMiniToolSpec>>clientList:listElement: @4 line 3
>> 25. TDMiniToolClientListElementBuilder>>clientList: @3 line 2
>> 26. TDMiniToolClientListElementBuilder(TDClientListElementBuilder)>>firstList: @2 line 2
>> 27. TDMiniToolClientListElementBuilder(TDClientListElementBuilder)>>buildClientElementUsing:editorAspect: @20 line 15
>> 28. [] in ExecBlock2(TDTopezServer)>>clientElementFor:using: @5 line 9
>> 29. [] in TDTopezServer>>editorNodeFor:aspect:do: @9 line 9
>> 30. [] in ExecBlock1(TDTopezServer)>>editorNodeClassNameFor:aspect:do: @6 line 10
>> 31. TDTopezServer>>lookupClassNameFor:aspect:defaultAspect:in:do: @25 line 28
>> 32. TDTopezServer>>editorNodeClassNameFor:aspect:do: @6 line 3
>> 33. TDTopezServer>>editorNodeFor:aspect:do: @3 line 3
>> 34. TDTopezServer>>clientElementFor:using: @4 line 4
>> 35. TDTopezServer>>edit:using: @3 line 3
>> 36. TDRepositoryPackageBrowser(Object)>>editUsing: @4 line 3
>> 37. TDRepositoryPackageBrowser(TDAbstractToolBuilder)>>open @3 line 2
>> 38. TDMonticelloTool>>mrBrowseRepositoryPackges:workingCopy:parentBuilder:windowId:label: @13 line 12
>> 39. TDMonticelloTool>>mrBrowseRepositoryPackges:workingCopy:label: @2 line 3
>> 40. TDRepositoryBrowser>>browseRepositoryPackages:selectedIndex: @13 line 7
>> 41. TDRepositoryBrowser(Object)>>perform:withArguments: @1 line 1
>> 42. TDRepositoryBrowser(TDAbstractToolBuilder)>>menuAction:actionSymbol:listElement:selectedIndex: @4 line 5
>> 43. TDRepositoryBrowser(TDStandardToolBuilder)>>menuAction:actionSymbol:listElement:selectedIndex: @3 line 4
>> 44. [] in TDRepositoryBrowser(TDAbstractToolBuilder)>>menuActionBlock @3 line 5
>> 45. TDMiniToolSpec>>menuAction:actionSymbol:listElement:selectedIndex: @4 line 4
>> 46. [] in TDMiniToolClientListElementBuilder>>menuActionBlock @4 line 7
>> 47. TDMiniToolClientListElementBuilder(ExecBlock)>>valueWithArguments: @1 line 1
>> 48. TDMiniToolClientListElementBuilder(ExecBlock)>>value:value:value: @2 line 11
>> 49. GsNMethod class>>_gsReturnToC @1 line 1
>>