Vm-dev September 2021

vm-dev@lists.squeakfoundation.org

15 participants
137 discussions

VM Maker: VMMaker.oscog-eem.3051.mcz
by commits＠source.squeak.org 05 Sep '21

05 Sep '21

Eliot Miranda uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker.oscog-eem.3051.mcz ==================== Summary ==================== Name: VMMaker.oscog-eem.3051 Author: eem Time: 5 September 2021, 6:37:35.453761 am UUID: 2dad9ef3-af23-4589-be9a-1e1954ba8bcc Ancestors: VMMaker.oscog-eem.3050 CoInterpreter: Run primitiveCopyObject on the Smalltalk stack (for Symbol>>intern:). Have primitiveSetOrHasIdentityHash support all of e.g. Symbol primitiveSetIdentityHashOf: aSymbol to: hash anObject primitiveSetIdentityHash: hashValue isBehavior: boolean anObject primitiveSetIdentityHashTo: hash Fix a spelling error PrimNumberUnoadModule => PrimNumberUnloadModule =============== Diff against VMMaker.oscog-eem.3050 =============== Item was changed: StackInterpreterPrimitives subclass: #CoInterpreter instanceVariableNames: 'cogit cogMethodZone gcMode cogCodeSize desiredCogCodeSize heapBase lastCoggableInterpretedBlockMethod deferSmash deferredSmash primTraceLog primTraceLogIndex traceLog traceLogIndex traceSources cogCompiledCodeCompactionCalledFor statCodeCompactionCount statCodeCompactionUsecs lastUncoggableInterpretedBlockMethod flagInterpretedMethods maxLiteralCountForCompile minBackwardJumpCountForCompile CFramePointer CStackPointer CReturnAddress primTracePluginName' + classVariableNames: 'CSCallbackEnter CSCallbackLeave CSCheckEvents CSEnterCriticalSection CSExitCriticalSection CSOwnVM CSResume CSSignal CSSuspend CSSwitchIfNeccessary CSThreadBind CSThreadSchedulingLoop CSWait CSYield HasBeenReturnedFromMCPC HasBeenReturnedFromMCPCOop MFMethodFlagFrameIsMarkedFlag MinBackwardJumpCountForCompile PrimNumberCopyObject PrimNumberObjectAtPut PrimTraceLogSize PrimitiveMetadataFlagsShift RumpCStackSize TraceBlockActivation TraceBlockCreation TraceBufferSize TraceCodeCompaction TraceContextSwitch TraceDisownVM TraceFullGC TraceIncrementalGC TraceIsFromInterpreter TraceIsFromMachineCode TraceOwnVM TracePreemptDisowningThread TracePrimitiveFailure TracePrimitiveRetry TraceSources TraceStackOverflow TraceThreadSwitch TraceVMCallback TraceVMCallbackReturn' - classVariableNames: 'CSCallbackEnter CSCallbackLeave CSCheckEvents CSEnterCriticalSection CSExitCriticalSection CSOwnVM CSResume CSSignal CSSuspend CSSwitchIfNeccessary CSThreadBind CSThreadSchedulingLoop CSWait CSYield HasBeenReturnedFromMCPC HasBeenReturnedFromMCPCOop MFMethodFlagFrameIsMarkedFlag MinBackwardJumpCountForCompile PrimNumberObjectAtPut PrimTraceLogSize PrimitiveMetadataFlagsShift RumpCStackSize TraceBlockActivation TraceBlockCreation TraceBufferSize TraceCodeCompaction TraceContextSwitch TraceDisownVM TraceFullGC TraceIncrementalGC TraceIsFromInterpreter TraceIsFromMachineCode TraceOwnVM TracePreemptDisowningThread TracePrimitiveFailure TracePrimitiveRetry TraceSources TraceStackOverflow TraceThreadSwitch TraceVMCallback TraceVMCallbackReturn' poolDictionaries: 'CogMethodConstants VMStackFrameOffsets' category: 'VMMaker-JIT'! !CoInterpreter commentStamp: 'eem 3/31/2020 18:56' prior: 0! I am a variant of the StackInterpreter that can co-exist with the Cog JIT. I interpret unjitted methods, either because they have been found for the first time or because they are judged to be too big to JIT. See CogMethod class's comment for method interoperability. cogCodeSize - the current size of the machine code zone cogCompiledCodeCompactionCalledFor - a variable set when the machine code zone runs out of space, causing a machine code zone compaction at the next available opportunity cogMethodZone - the manager for the machine code zone (instance of CogMethodZone) cogit - the JIT (co-jit) (instance of SimpleStackBasedCogit, StackToRegisterMappoingCogit, etc) deferSmash - a flag causing deferral of smashes of the stackLimit around the call of functionSymbol (for assert checks) deferredSmash - a flag noting deferral of smashes of the stackLimit around the call of functionSymbol (for assert checks) desiredCogCodeSize - the desred size of the machine code zone, set at startup or via primitiveVMParameter to be written at snapshot time flagInterpretedMethods - true if methods that are interpreted shoudl have their flag bit set (used to identity methods that are interpreted because they're unjittable for some reason) gcMode - the variable holding the gcMode, used to inform the cogit of how to scan the machine code zone for oops on GC heapBase - the address in memory of the base of the objectMemory's heap, which is immediately above the machine code zone lastCoggableInterpretedBlockMethod - a variable used to invoke the cogit for a block mehtod being invoked repeatedly in the interpreter lastUncoggableInterpretedBlockMethod - a variable used to avoid invoking the cogit for an unjittable method encountered on block evaluation maxLiteralCountForCompile - the variable controlling which methods to jit. methods with a literal count above this value will not be jitted (on the grounds that large methods are typically used for initialization, and take up a lot of space in the code zone) minBackwardJumpCountForCompile - the variable controlling when to attempt to jit a method being interpreted. If as many backward jumps as this occur, the current method will be jitted primTraceLog - a small array implementing a crcular buffer logging the last N primitive invocations, GCs, code compactions, etc used for crash reporting primTraceLogIndex - the index into primTraceLog of the next entry reenterInterpreter - the jmpbuf used to jmp back into the interpreter when transitioning from machine code to the interpreter statCodeCompactionCount - the count of machine code zone compactions statCodeCompactionUsecs - the total microseconds spent in machine code zone compactions traceLog - a log of various events, used in debugging traceLogIndex - the index into traceLog of the next entry traceSources - the names associated with the codes of events in traceLog CFramePointer - if in use, the value of the C frame pointer on most recent entry to the interpreter after start-up or a callback. Used to establish the C stack when calling the run-time from generated machine code. CStackPointer - the value of the C stack pointer on most recent entry to the interpreter after start-up or a callback. Used to establish the C stack when calling the run-time from generated machine code. CReturnAddress - the return address for the function call which invoked the interpreter at start-up. Using this as teh return address when entering the interpreter via ceInvokeInterpeter maintains a valid stack. Since this is effevtively a constant it does not need to be saved and restored once set.! Item was changed: ----- Method: CoInterpreter class>>initializePrimitiveTable (in category 'initialization') ----- initializePrimitiveTable super initializePrimitiveTable. + + "These two are run on the Smalltalk stack under Spur. See primitivePropertyFlagsForSpur:" PrimNumberObjectAtPut := 69. self assert: (PrimitiveTable at: PrimNumberObjectAtPut + 1) = #primitiveObjectAtPut. + PrimNumberCopyObject := 168. + self assert: (PrimitiveTable at: PrimNumberCopyObject + 1) = #primitiveCopyObject. #(216 253) do: [:pidx| self assert: (PrimitiveTable at: pidx + 1) = #primitiveFail]. self assert: (PrimitiveTable at: 215 + 1) = #primitiveFlushCacheByMethod. PrimitiveTable at: 253 + 1 put: #primitiveCollectCogCodeConstituents; at: 215 + 1 put: #primitiveVoidVMStateForMethod; at: 216 + 1 put: #primitiveMethodXray! Item was changed: ----- Method: CoInterpreter>>isCodeCompactingPrimitiveIndex: (in category 'primitive support') ----- isCodeCompactingPrimitiveIndex: primIndex "If instVarAt:, slotAt: or shallowCopy operate on a Context then they compute a bytecode pc and hence may provoke a code compaction. Hence primitive invocation from these primitives must use a static return address (cePrimReturnEnterCogCode:). Note that the process switch primitives may also provoke a code compaction, which happens when switching to a process whose top context has a machine code pc but the method is no longer in the code cache. However, in this case they are switching process and don't go through the normal return. So we don't include them here." <inline: true> self cCode: [] inSmalltalk: [#primitiveClone. #primitiveInstVarAt. #primitiveSlotAt. #primitiveFlushExternalPrimitives. #primitiveUnloadModule]. "For senders..." ^primIndex = PrimNumberInstVarAt or: [primIndex = PrimNumberShallowCopy or: [primIndex = PrimNumberSlotAt or: [primIndex = PrimNumberFlushExternalPrimitives + or: [primIndex = PrimNumberUnloadModule]]]]! - or: [primIndex = PrimNumberUnoadModule]]]]! Item was changed: ----- Method: CoInterpreter>>primitivePropertyFlagsForSpur: (in category 'cog jit support') ----- primitivePropertyFlagsForSpur: primIndex <inline: true> "Answer any special requirements of the given primitive. Spur always needs to set primitiveFunctionPointer and newMethod so primitives can retry on failure due to forwarders." | baseFlags | self cCode: [] inSmalltalk: [#(primitiveObjectAtPut primitiveExternalCall primitiveCalloutToFFI)]. "For senders..." baseFlags := profileSemaphore = objectMemory nilObject ifTrue: [0] ifFalse: [PrimCallCollectsProfileSamples]. + (primIndex = PrimNumberObjectAtPut + or: [primIndex = PrimNumberCopyObject]) ifTrue: - primIndex = PrimNumberObjectAtPut ifTrue: [^baseFlags + PrimCallOnSmalltalkStack]. baseFlags := baseFlags + PrimCallNeedsPrimitiveFunction + PrimCallNeedsNewMethod. (self isCalloutPrimitiveIndex: primIndex) ifTrue: "For callbacks & module unloading" [^baseFlags + PrimCallMayEndureCodeCompaction + PrimCallIsExternalCall]. (self isCodeCompactingPrimitiveIndex: primIndex) ifTrue: "For code reclamations" [^baseFlags bitOr: PrimCallMayEndureCodeCompaction]. ^baseFlags! Item was changed: ----- Method: InterpreterPrimitives>>primitiveSetOrHasIdentityHash (in category 'object access primitives') ----- primitiveSetOrHasIdentityHash | hash oldHash thisReceiver isReceiverAClass | argumentCount = 0 ifTrue: [| hasHash | hasHash := (objectMemory isNonImmediate: self stackTop) and: [objectMemory hasIdentityHash: self stackTop]. + ^self methodReturnBool: hasHash]. + isReceiverAClass := false. - self pop: 1 thenPushBool: hasHash. - ^self]. argumentCount = 2 ifTrue: + [| lastArg | + lastArg := self stackTop. + (objectMemory isIntegerObject: lastArg) + ifTrue: "e.g. Symbol primitiveSetIdentityHashOf: aSymbol to: hash" + [hash := lastArg. + thisReceiver := self stackValue: 1] + ifFalse: "anObject primitiveSetIdentityHash: hashValue isBehavior: boolean" + [thisReceiver := self stackValue: 2. + hash := self stackValue: 1. + lastArg = objectMemory trueObject + ifTrue: [isReceiverAClass := true] + ifFalse: + [lastArg = objectMemory falseObject ifFalse: + [^self primitiveFailFor: PrimErrBadArgument]]]] + ifFalse: "anObject primitiveSetIdentityHashTo: hash" + [thisReceiver := self stackValue: 1. + hash := self stackTop]. + (objectMemory isIntegerObject: hash) ifFalse: + [^self primitiveFailFor: PrimErrBadArgument]. + (objectMemory isNonImmediate: thisReceiver) ifFalse: + [^self primitiveFailFor: (thisReceiver = (self stackValue: argumentCount) + ifTrue: [PrimErrBadReceiver] + ifFalse: [PrimErrBadArgument])]. + oldHash := objectMemory hashBitsOf: thisReceiver. + objectMemory setHashBitsOf: thisReceiver to: hash. + (isReceiverAClass and: [objectMemory hasSpurMemoryManagerAPI]) ifTrue: + [objectMemory classAtIndex: hash put: thisReceiver. + "this figures out if the index is ambiguous and fixes all the instances if needed" + objectMemory allInstancesOf: thisReceiver]. + self methodReturnInteger: oldHash! - [isReceiverAClass := self booleanValueOf: self stackTop. - self successful ifFalse: - [^self primitiveFailFor: PrimErrBadArgument]] - ifFalse: [isReceiverAClass := false]. - hash := self stackIntegerValue: argumentCount - 1. - thisReceiver := self stackObjectValue: argumentCount. - self successful ifTrue: - [oldHash := objectMemory hashBitsOf: thisReceiver. - objectMemory setHashBitsOf: thisReceiver to: hash. - (isReceiverAClass and: [objectMemory hasSpurMemoryManagerAPI]) ifTrue: - [objectMemory classAtIndex: hash put: thisReceiver. - "this figures out if the index is ambiguous and fixes all the instances if needed" - objectMemory allInstancesOf: thisReceiver]. - self methodReturnInteger: oldHash]! Item was changed: ----- Method: StackInterpreter class>>initializePrimitiveTable (in category 'initialization') ----- (excessive size, no diff calculated) Item was changed: SharedPool subclass: #VMBytecodeConstants instanceVariableNames: '' + classVariableNames: 'BytecodeSetHasDirectedSuperSend CtxtTempFrameStart LargeContextBit LargeContextSize LargeContextSlots NewsqueakV4BytecodeSet PrimNumberDoExternalCall PrimNumberDoPrimitive PrimNumberExternalCall PrimNumberFFICall PrimNumberFlushExternalPrimitives PrimNumberInstVarAt PrimNumberShallowCopy PrimNumberSlotAt PrimNumberUnloadModule SistaV1BytecodeSet SmallContextSize SmallContextSlots SqueakV3PlusClosuresBytecodeSet' - classVariableNames: 'BytecodeSetHasDirectedSuperSend CtxtTempFrameStart LargeContextBit LargeContextSize LargeContextSlots NewsqueakV4BytecodeSet PrimNumberDoExternalCall PrimNumberDoPrimitive PrimNumberExternalCall PrimNumberFFICall PrimNumberFlushExternalPrimitives PrimNumberInstVarAt PrimNumberShallowCopy PrimNumberSlotAt PrimNumberUnoadModule SistaV1BytecodeSet SmallContextSize SmallContextSlots SqueakV3PlusClosuresBytecodeSet' poolDictionaries: 'VMBasicConstants' category: 'VMMaker-Interpreter'! !VMBytecodeConstants commentStamp: '<historical>' prior: 0! self ensureClassPool. #(CtxtTempFrameStart LargeContextBit LargeContextSize SmallContextSize) do: [:k| self classPool declare: k from: ObjectMemory classPool]!

1 0

[OpenSmalltalk/opensmalltalk-vm] a94a15: Ficx a logprintf_status in sqMacSSL.c
by Eliot Miranda 05 Sep '21

05 Sep '21

Branch: refs/heads/Cog Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: a94a15738d96eb593ed6bd449160e2804a2a7c25 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/a94a15738d96eb593e… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2021-09-04 (Sat, 04 Sep 2021) Changed paths: M platforms/iOS/plugins/SqueakSSL/sqMacSSL.c Log Message: ----------- Ficx a logprintf_status in sqMacSSL.c

1 0

[OpenSmalltalk/opensmalltalk-vm] 8e191a: CHange the install name in products for 32-bit Spu...
by Eliot Miranda 05 Sep '21

05 Sep '21

Branch: refs/heads/Cog Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: 8e191a084d23fccca2ff4483a45ef31a58d7d37a https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/8e191a084d23fccca2… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2021-09-04 (Sat, 04 Sep 2021) Changed paths: M building/linux32ARMv6/newspeak.cog.spur/build.assert/mvm M building/linux32ARMv6/newspeak.cog.spur/build.debug/mvm M building/linux32ARMv6/newspeak.cog.spur/build/mvm M building/linux32ARMv6/newspeak.stack.spur/build.assert/mvm M building/linux32ARMv6/newspeak.stack.spur/build.debug/mvm M building/linux32ARMv6/newspeak.stack.spur/build/mvm M building/linux32ARMv6/pharo.cog.spur/build.assert/mvm M building/linux32ARMv6/pharo.cog.spur/build.debug/mvm M building/linux32ARMv6/pharo.cog.spur/build/mvm M building/linux32ARMv6/squeak.cog.spur/build.assert/mvm M building/linux32ARMv6/squeak.cog.spur/build.debug/mvm M building/linux32ARMv6/squeak.cog.spur/build/mvm M building/linux32ARMv6/squeak.stack.spur/build.assert/mvm M building/linux32ARMv6/squeak.stack.spur/build.debug/mvm M building/linux32ARMv6/squeak.stack.spur/build/mvm M building/linux32ARMv7/newspeak.cog.spur/build.assert/mvm M building/linux32ARMv7/newspeak.cog.spur/build.debug/mvm M building/linux32ARMv7/newspeak.cog.spur/build/mvm M building/linux32ARMv7/newspeak.stack.spur/build.assert/mvm M building/linux32ARMv7/newspeak.stack.spur/build.debug/mvm M building/linux32ARMv7/newspeak.stack.spur/build/mvm M building/linux32x86/newspeak.cog.spur/build.assert.itimerheartbeat/mvm M building/linux32x86/newspeak.cog.spur/build.assert/mvm M building/linux32x86/newspeak.cog.spur/build.debug.itimerheartbeat/mvm M building/linux32x86/newspeak.cog.spur/build.debug/mvm M building/linux32x86/newspeak.cog.spur/build.itimerheartbeat/mvm M building/linux32x86/newspeak.cog.spur/build/mvm M building/linux32x86/newspeak.stack.spur/build.assert/mvm M building/linux32x86/newspeak.stack.spur/build.debug/mvm M building/linux32x86/newspeak.stack.spur/build/mvm M building/linux32x86/nsnac.cog.spur/build.assert.itimerheartbeat/mvm M building/linux32x86/nsnac.cog.spur/build.assert/mvm M building/linux32x86/nsnac.cog.spur/build.debug.itimerheartbeat/mvm M building/linux32x86/nsnac.cog.spur/build.debug/mvm M building/linux32x86/nsnac.cog.spur/build.itimerheartbeat/mvm M building/linux32x86/nsnac.cog.spur/build/mvm M building/linux32x86/pharo.cog.spur/build.assert.itimerheartbeat/mvm M building/linux32x86/pharo.cog.spur/build.assert/mvm M building/linux32x86/pharo.cog.spur/build.debug.itimerheartbeat/mvm M building/linux32x86/pharo.cog.spur/build.debug/mvm M building/linux32x86/pharo.cog.spur/build.itimerheartbeat/mvm M building/linux32x86/pharo.cog.spur/build/mvm M building/linux32x86/pharo.sista.spur/build.assert.itimerheartbeat/mvm M building/linux32x86/pharo.sista.spur/build.assert/mvm M building/linux32x86/pharo.sista.spur/build.debug.itimerheartbeat/mvm M building/linux32x86/pharo.sista.spur/build.debug/mvm M building/linux32x86/pharo.sista.spur/build.itimerheartbeat/mvm M building/linux32x86/pharo.sista.spur/build/mvm M building/linux32x86/squeak.cog.spur/build.assert.itimerheartbeat/mvm M building/linux32x86/squeak.cog.spur/build.assert/mvm M building/linux32x86/squeak.cog.spur/build.debug.itimerheartbeat/mvm M building/linux32x86/squeak.cog.spur/build.debug/mvm M building/linux32x86/squeak.cog.spur/build.itimerheartbeat/mvm M building/linux32x86/squeak.cog.spur/build/mvm M building/linux32x86/squeak.sista.spur/build.assert.itimerheartbeat/mvm M building/linux32x86/squeak.sista.spur/build.assert/mvm M building/linux32x86/squeak.sista.spur/build.debug.itimerheartbeat/mvm M building/linux32x86/squeak.sista.spur/build.debug/mvm M building/linux32x86/squeak.sista.spur/build.itimerheartbeat/mvm M building/linux32x86/squeak.sista.spur/build/mvm M building/linux32x86/squeak.stack.spur/build.assert/mvm M building/linux32x86/squeak.stack.spur/build.debug/mvm M building/linux32x86/squeak.stack.spur/build/mvm Log Message: ----------- CHange the install name in products for 32-bit Spur builds from XXspurYYY to XXspur32YYY to mirror XXspur64YYY.

1 0

[OpenSmalltalk/opensmalltalk-vm] f69464: Update mvm scripts to specify distinct names for s...
by David T Lewis 04 Sep '21

04 Sep '21

Branch: refs/heads/dtl/distinct-scriptnames Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: f694642e2834e733e8171baa696911e16651f320 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/f694642e2834e733e8… Author: David T. Lewis <lewis(a)mail.msen.com> Date: 2021-09-04 (Sat, 04 Sep 2021) Changed paths: M building/linux32ARMv6/squeak.cog.spur/build.assert/mvm M building/linux32ARMv6/squeak.cog.spur/build.debug/mvm M building/linux32ARMv6/squeak.cog.spur/build/mvm M building/linux32ARMv6/squeak.cog.v3/build.assert/mvm M building/linux32ARMv6/squeak.cog.v3/build.debug/mvm M building/linux32ARMv6/squeak.cog.v3/build/mvm M building/linux32ARMv6/squeak.stack.spur/build.assert/mvm M building/linux32ARMv6/squeak.stack.spur/build.debug/mvm M building/linux32ARMv6/squeak.stack.spur/build/mvm M building/linux32ARMv6/squeak.stack.v3/build.assert/mvm M building/linux32ARMv6/squeak.stack.v3/build.debug/mvm M building/linux32ARMv6/squeak.stack.v3/build/mvm M building/linux32x86/squeak.cog.spur/build.assert.itimerheartbeat/mvm M building/linux32x86/squeak.cog.spur/build.assert/mvm M building/linux32x86/squeak.cog.spur/build.debug.itimerheartbeat/mvm M building/linux32x86/squeak.cog.spur/build.debug/mvm M building/linux32x86/squeak.cog.spur/build.itimerheartbeat/mvm M building/linux32x86/squeak.cog.spur/build/mvm M building/linux32x86/squeak.cog.v3/build.assert.itimerheartbeat/mvm M building/linux32x86/squeak.cog.v3/build.assert/mvm M building/linux32x86/squeak.cog.v3/build.debug.itimerheartbeat/mvm M building/linux32x86/squeak.cog.v3/build.debug/mvm M building/linux32x86/squeak.cog.v3/build.itimerheartbeat/mvm M building/linux32x86/squeak.cog.v3/build.multithreaded.assert/mvm M building/linux32x86/squeak.cog.v3/build.multithreaded.debug/mvm M building/linux32x86/squeak.cog.v3/build.multithreaded/mvm M building/linux32x86/squeak.cog.v3/build/mvm M building/linux32x86/squeak.sista.spur/build.assert.itimerheartbeat/mvm M building/linux32x86/squeak.sista.spur/build.assert/mvm M building/linux32x86/squeak.sista.spur/build.debug.itimerheartbeat/mvm M building/linux32x86/squeak.sista.spur/build.debug/mvm M building/linux32x86/squeak.sista.spur/build.itimerheartbeat/mvm M building/linux32x86/squeak.sista.spur/build/mvm M building/linux32x86/squeak.stack.spur/build.assert/mvm M building/linux32x86/squeak.stack.spur/build.debug/mvm M building/linux32x86/squeak.stack.spur/build/mvm M building/linux32x86/squeak.stack.v3/build.assert/mvm M building/linux32x86/squeak.stack.v3/build.debug/mvm M building/linux32x86/squeak.stack.v3/build/mvm M building/linux64ARMv8/squeak.cog.spur/build.assert/mvm M building/linux64ARMv8/squeak.cog.spur/build.debug/mvm M building/linux64ARMv8/squeak.cog.spur/build/mvm M building/linux64ARMv8/squeak.cogmt.spur/build.assert/mvm M building/linux64ARMv8/squeak.cogmt.spur/build.debug/mvm M building/linux64ARMv8/squeak.cogmt.spur/build/mvm M building/linux64ARMv8/squeak.stack.spur/build.assert/mvm M building/linux64ARMv8/squeak.stack.spur/build.debug/mvm M building/linux64ARMv8/squeak.stack.spur/build/mvm M building/linux64x64/squeak.cog.spur/build.assert.itimerheartbeat/mvm M building/linux64x64/squeak.cog.spur/build.assert/mvm M building/linux64x64/squeak.cog.spur/build.debug.itimerheartbeat/mvm M building/linux64x64/squeak.cog.spur/build.debug/mvm M building/linux64x64/squeak.cog.spur/build.itimerheartbeat/mvm M building/linux64x64/squeak.cog.spur/build/mvm M building/linux64x64/squeak.stack.spur/build.assert/mvm M building/linux64x64/squeak.stack.spur/build.debug/mvm M building/linux64x64/squeak.stack.spur/build/mvm M building/sunos32x86/squeak.cog.spur/build/mvm M building/sunos32x86/squeak.stack.spur/build/mvm M building/sunos64x64/squeak.cog.spur/build/mvm M building/sunos64x64/squeak.stack.spur/build/mvm Log Message: ----------- Update mvm scripts to specify distinct names for squeak run scripts. sudo make install (following build with ./mvm) will install 64-bit Spur VMs with /usr/local/bin/spur64, 32-bit Spur VMs with /usr/local/bin/spur, and 32-bit Cog V3 VMs as /usr/local/bin/cog.

1 0

VM Maker: ImageFormat-dtl.52.mcz
by commits＠source.squeak.org 04 Sep '21

04 Sep '21

David T. Lewis uploaded a new version of ImageFormat to project VM Maker: http://source.squeak.org/VMMaker/ImageFormat-dtl.52.mcz ==================== Summary ==================== Name: ImageFormat-dtl.52 Author: dtl Time: 3 September 2021, 9:51:57.032717 pm UUID: d5994dca-2176-41dd-a79e-3df7e3192bfe Ancestors: ImageFormat-dtl.51 Update for a Squeak deprecation, use ifNil:ifNotNil: =============== Diff against ImageFormat-dtl.51 =============== Item was changed: ----- Method: ImageFormat class>>generateCkFormatProgram:on: (in category 'ckformat') ----- generateCkFormatProgram: programName on: stream "Generate source code for an image format version reader. The program is intended for testing image file format from a unix shell script such that the shell script can decide what VM to run based on image requirements." | fileID formatNumber | fileID := (Smalltalk classNamed: #CCodeGenerator) ifNil: [ self name, ' ', DateAndTime now asString ] + ifNotNil: [ :ccg | ccg monticelloDescriptionFor: self ]. - ifNotNilDo: [ :ccg | ccg monticelloDescriptionFor: self ]. stream nextPutAll: '/* ', programName, ': Print the image format number on standard output */'; cr; nextPutAll: '/* for use in a shell script to test image format requirements. */'; cr; nextPutAll: '/* A non-zero return status code indicates failure. */'; cr; cr; nextPutAll: '/* Usage: ', programName, ' imageFileName */'; cr; cr; nextPutAll: '/* --- DO NOT EDIT THIS FILE --- */'; cr; nextPutAll: '/* --- Automatically generated from class ', fileID, '--- */'; cr; nextPutAll: '/* --- Source code is in package ImageFormat in the VMMaker repository --- */'; cr; nextPutAll: '/* --- DO NOT EDIT THIS FILE --- */'; cr; cr; nextPutAll: '#include <stdio.h>'; cr; nextPutAll: '#include <stdlib.h>'; cr; nextPutAll: '#include <string.h>'; cr; cr; nextPutAll: 'int main(int argc, char **argv) {'; cr; tab; nextPutAll: 'FILE *f;'; cr; tab; nextPutAll: 'unsigned char buf[8];'; cr; tab; nextPutAll: 'int formatNumber;'; cr; tab; nextPutAll: 'unsigned char c;'; cr; tab; nextPutAll: 'int match;'; cr; tab; nextPutAll: 'if (argc !!= 2) {'; cr; tab; tab; nextPutAll: 'printf("usage: ', programName, ' imageFileName\n");'; cr; tab; tab; nextPutAll: 'printf("answer the image format number for an image file or 0 if not known\n");'; cr; tab; tab; nextPutAll: 'printf("known image formats:\n");'; cr. KnownVersionNumbers do: [ :e | | s | s := String streamContents: [ :strm | strm nextPutAll: e asString, ': '. (self fromInteger: e) printDescriptionOn: strm withVersionNumber: false ]. stream tab; tab; nextPutAll: 'printf("', s, '\n");'; cr ]. stream tab; tab; nextPutAll: 'exit(1);'; cr; tab; nextPutAll: '}'; cr; tab; nextPutAll: 'f = fopen(argv[1], "r");'; cr; tab; nextPutAll: 'if (f == NULL) {'; cr; tab; tab; nextPutAll: 'perror(argv[1]);'; cr; tab; tab; nextPutAll: 'exit(2);'; cr; tab; nextPutAll: '}'; cr. { 0. 512 } do: [:offset | stream tab; nextPutAll: 'if(fseek(f, '; nextPutAll: offset asString; nextPutAll: 'L, SEEK_SET) !!= 0) {';cr; tab; tab; nextPutAll: 'fprintf(stderr, "cannot go to pos %d in %s\n", '; nextPutAll: offset asString; nextPutAll: ', argv[1]);'; cr; tab; tab; nextPutAll: 'exit(3);'; cr; tab; nextPutAll: '}'; cr; tab; nextPutAll: 'if (fread(buf, 1, 8, f) < 8) {'; cr; tab; tab; nextPutAll: 'fprintf(stderr, "cannot read %s\n", argv[1]);'; cr; tab; tab; nextPutAll: 'exit(3);'; cr; tab; nextPutAll: '}'; cr. self versionNumberByteArrays withIndexDo: [ :v :tag | | b | formatNumber := (self fromBytes: v) asInteger. b := 'b_', formatNumber asString, '_', tag asString. stream tab; nextPutAll: '{'; cr; tab; nextPutAll: 'unsigned char ', b, '[', v size asString, ']= { '. v inject: true into: [:first : elem | first ifFalse: [stream nextPutAll: ', ']. stream nextPutAll: elem asString. false]. stream nextPutAll: '};'; cr; tab; nextPutAll: 'if (memcmp(buf, ', b, ', ', v size asString, ') == 0) {'; cr; tab; tab; nextPutAll: 'printf("%d\n", ', formatNumber, ');'; cr; tab; tab; nextPutAll: 'exit(0);'; cr; tab; nextPutAll: '}'; cr; tab; nextPutAll: '}'; cr]]. stream tab; nextPutAll: 'printf("0\n"); /* print an invalid format number */';cr; tab; nextPutAll: 'exit (-1); /* not found, exit with error code */'; cr; nextPutAll: '}'; cr !

1 0

Fedora 34 squeak - plugin SSL
by stes＠PANDORA.BE 03 Sep '21

03 Sep '21

-----BEGIN PGP SIGNED MESSAGE----- Hash: SHA256 I compiled squeak 4.19.9 classic VM and opensmalltalk cog VM on Fedora 34. The good news is that they both seem to work; I compiled with gcc for OpenSmalltalk : dnf groupinstall development-tools dnf groupinstall "X Software Development" dnf install mesa-libGL-devel and for classic VM: dnf install cmake dnf install gcc-c++ My Fedora 34 setup seems to have the following OpenSSL libraries: openssl-libs-1.1.1k-1.fc34.x86_64 The SSL plugin appears to have issues with that because the TestRunner fails: 13 run in 0:00:00:00.536, 1 passes, 0 expected failures, 1 failures, 11 errors, 0 unexpected passes SqueakSSLTest (13 tests, 536 ms) SqueakSSLTest>>#testConnectAccept SqueakSSLTest>>#testEncryptDecrypt SqueakSSLTest>>#testMultiFrameDecrypt SqueakSSLTest>>#testSSLSockets SqueakSSLTest>>#testSingleByteDecrypt SqueakSSLTest>>#testSocketAccept SqueakSSLTest>>#testSocketConnect SqueakSSLTest>>#testSplitTlsFrameRead SqueakSSLTest>>#testStreamAccept SqueakSSLTest>>#testStreamConnect SqueakSSLTest>>#testStreamTransfer SqueakSSLTest>>#testGooglePopStream In the UNIX terminal window the following errors are printed: 140079738917440:error:140AB18F:SSL routines:SSL_CTX_use_certificate:ee key too small:ssl/ssl_rsa.c:301: 140079738917440:error:1417A0C1:SSL routines:tls_post_process_client_hello:no shared cipher:ssl/statem/statem_srvr.c:2283: 140079738917440:error:140AB18F:SSL routines:SSL_CTX_use_certificate:ee key too small:ssl/ssl_rsa.c:301: 140079738917440:error:1417A0C1:SSL routines:tls_post_process_client_hello:no shared cipher:ssl/statem/statem_srvr.c:2283: 140079738917440:error:140AB18F:SSL routines:SSL_CTX_use_certificate:ee key too small:ssl/ssl_rsa.c:301: 140079738917440:error:1417A0C1:SSL routines:tls_post_process_client_hello:no shared cipher:ssl/statem/statem_srvr.c:2283: 140079738917440:error:140AB18F:SSL routines:SSL_CTX_use_certificate:ee key too small:ssl/ssl_rsa.c:301: 140079738917440:error:1417A0C1:SSL routines:tls_post_process_client_hello:no shared cipher:ssl/statem/statem_srvr.c:2283: 140079738917440:error:140AB18F:SSL routines:SSL_CTX_use_certificate:ee key too small:ssl/ssl_rsa.c:301: 140079738917440:error:1417A0C1:SSL routines:tls_post_process_client_hello:no shared cipher:ssl/statem/statem_srvr.c:2283: 140079738917440:error:140AB18F:SSL routines:SSL_CTX_use_certificate:ee key too small:ssl/ssl_rsa.c:301: 140079738917440:error:1417A0C1:SSL routines:tls_post_process_client_hello:no shared cipher:ssl/statem/statem_srvr.c:2283: 140079738917440:error:140AB18F:SSL routines:SSL_CTX_use_certificate:ee key too small:ssl/ssl_rsa.c:301: 140079738917440:error:1417A0C1:SSL routines:tls_post_process_client_hello:no shared cipher:ssl/statem/statem_srvr.c:2283: 140079738917440:error:140AB18F:SSL routines:SSL_CTX_use_certificate:ee key too small:ssl/ssl_rsa.c:301: 140079738917440:error:1417A0C1:SSL routines:tls_post_process_client_hello:no shared cipher:ssl/statem/statem_srvr.c:2283: Is anyone using the SSL plugin (either OpenSmalltalk or Classic VM) on OpenSSL 1.1.1k ? Thanks, David Stes -----BEGIN PGP SIGNATURE----- Version: GnuPG v2 iQEcBAEBCAAGBQJhK4l8AAoJENdFDkXGicizHRsH/1+UZj6zv8hh6DQghy9CF6oc LZu1eiKKY4cXGO0URhQviOTZTxymw0OCe9CDTbxCNCz7FISYRxPGGV5y0+rOCnWx dFOSGvA3I0OQg78b5lyI1i5iOU5FusbFMfU+58qWnUlX9whQRtAqCGw0W16IiT7V oGE3FEVsfMRsa4yKK1HTFi67M9R5Cg/acaxvC8KCIjg5LgSUwTCp0GM3dQMTQRj9 CPDPTSH5kE5tK2wCGH/QzaTgJd/GKFWMBZKt5MdZCTQJGC2tQtrqceCJD53Mlm3/ JgZlVbgfISHrg4+r+dh3LMUIVcRG/xBOU6TlkvlMgQUp4xh6/AUKRrSAdbxOdUU= =O9sD -----END PGP SIGNATURE-----

2 1

Re: [Vm-dev] [OpenSmalltalk/opensmalltalk-vm] Mac OS X build changes. (7074989)
by Tobias Pape 02 Sep '21

02 Sep '21

I don't know what changed, but the SerialPlugin builds on my MBP x86_64 -- You are receiving this because you are subscribed to this thread. Reply to this email directly or view it on GitHub: https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/70749894f4b48b04d9…

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Vm-dev September 2021