Vm-dev March 2018

vm-dev@lists.squeakfoundation.org

46 participants
218 discussions

VM Maker: VMMaker.oscog-eem.2343.mcz
by commits＠source.squeak.org 07 Mar '18

07 Mar '18

Eliot Miranda uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker.oscog-eem.2343.mcz ==================== Summary ==================== Name: VMMaker.oscog-eem.2343 Author: eem Time: 6 March 2018, 12:21:51.336493 pm UUID: e603efa4-c652-41e1-a981-6814acaca9f3 Ancestors: VMMaker.oscog-topa.2342 Better comment Tobias' inclusion of config.h in all plugins. Also ensure (almost) no duplications can occur. Fix a typo in primitiveVMParameter and a compiler warning in primitiveSignalAtMilliseconds (deltaMsecs < 0 implies that deltaMsecs is signed). =============== Diff against VMMaker.oscog-topa.2342 =============== Item was changed: ----- Method: StackInterpreterPrimitives>>primitiveSignalAtMilliseconds (in category 'system control primitives') ----- primitiveSignalAtMilliseconds "Cause the time semaphore, if one has been registered, to be signalled when the microsecond clock is greater than or equal to the given tick value. A tick value of zero turns off timer interrupts." | msecsObj msecs deltaMsecs sema | <var: #msecs type: #usqInt> + <var: #deltaMsecs type: #sqLong> - <var: #deltaMsecs type: #usqLong> msecsObj := self stackTop. sema := self stackValue: 1. msecs := self positive32BitValueOf: msecsObj. self successful ifTrue: [(objectMemory isSemaphoreOop: sema) ifTrue: [objectMemory splObj: TheTimerSemaphore put: sema. deltaMsecs := msecs - (self ioMSecs bitAnd: MillisecondClockMask). deltaMsecs < 0 ifTrue: [deltaMsecs := deltaMsecs + MillisecondClockMask + 1]. nextWakeupUsecs := self ioUTCMicroseconds + (deltaMsecs * 1000). ^self pop: 2]. sema = objectMemory nilObject ifTrue: [objectMemory storePointer: TheTimerSemaphore ofObject: objectMemory specialObjectsOop withValue: objectMemory nilObject. nextWakeupUsecs := 0. ^self pop: 2]]. self primitiveFailFor: PrimErrBadArgument! Item was changed: ----- Method: StackInterpreterPrimitives>>primitiveVMParameter (in category 'system control primitives') ----- (excessive size, no diff calculated) Item was changed: ----- Method: VMPluginCodeGenerator>>emitCHeaderOn: (in category 'C code generator') ----- emitCHeaderOn: aStream + "Write a C file header onto the given stream, adding include files and some basic definitions." + | standardHeaders | + aStream nextPutAll: (self fileHeaderVersionStampForSourceClass: pluginClass); cr; cr. - "Write a C file header onto the given stream." + "config.h should always go first because config.h properly defines flags. + One of those is _GNU_SOURCE, as explained in https://www.gnu.org/software/autoconf/manual/autoconf.html#Posix-Variants, + where the Autoconf macro AC_USE_SYSTEM_EXTENSIONS makes sure this is defined." + standardHeaders := #('"config.h"' '<math.h>' '<stdio.h>' '<stdlib.h>' '<string.h>' '<time.h>'). + self emitHeaderFiles: standardHeaders on: aStream. - aStream nextPutAll: (self fileHeaderVersionStampForSourceClass: pluginClass). - aStream cr; cr. + headerFiles := headerFiles copyWithoutAll: standardHeaders. - #('<math.h>' '<stdio.h>' '<stdlib.h>' '<string.h>' '<time.h>') reverseDo: - [:hdr| self addHeaderFileFirst: hdr]. - self addHeaderFileFirst: '"config.h"'. "Should always go first" - "Additional header files; include C library ones first." self emitHeaderFiles: (headerFiles select: [:hdr| hdr includes: $<]) on: aStream. + aStream cr; nextPutAll: '/* Default EXPORT macro that does nothing (see comment in sq.h): */ - aStream cr; nextPutAll:'/* Default EXPORT macro that does nothing (see comment in sq.h): */ #define EXPORT(returnType) returnType /* Do not include the entire sq.h file but just those parts needed. */ #include "sqConfig.h" /* Configuration options */ #include "sqVirtualMachine.h" /* The virtual machine proxy definition */ #include "sqPlatformSpecific.h" /* Platform specific definitions */ #define true 1 #define false 0 #define null 0 /* using ''null'' because nil is predefined in Think C */ #ifdef SQUEAK_BUILTIN_PLUGIN # undef EXPORT # define EXPORT(returnType) static returnType #endif'; cr; cr. self addHeaderFile: '"sqMemoryAccess.h"'. "Additional header files; include squeak VM ones last" self emitHeaderFiles: (headerFiles reject: [:hdr| hdr includes: $<]) on: aStream. self maybePutPreambleFor: pluginClass on: aStream. aStream cr!

3 3

VM Maker: VMMaker.oscog-akg.2346.mcz
by commits＠source.squeak.org 07 Mar '18

07 Mar '18

Alistair Grant uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker.oscog-akg.2346.mcz ==================== Summary ==================== Name: VMMaker.oscog-akg.2346 Author: akg Time: 7 March 2018, 10:06:25.159309 am UUID: 314dcb1d-cd55-439c-972b-87c4b916d71a Ancestors: VMMaker.oscog-eem.2345 FilePlugin connect to file primitives - Rename primitiveFileOpenUseFileDescriptor to primitiveConnectToFileDescriptor - Rename primitiveFileOpenUseFile to primitiveConnectToFile - Add support for Windows - Bug fix pointer retrieval in primitiveConnectToFile - Additional comments =============== Diff against VMMaker.oscog-eem.2345 =============== Item was removed: - ----- Method: FilePlugin>>cfileRecordSize (in category 'private') ----- - cfileRecordSize - "Return the size of a stdio FILE* handle" - <inline: #always> - ^self sizeof: #'FILE*'! Item was added: + ----- Method: FilePlugin>>connectToFd:write: (in category 'private') ----- + connectToFd: fd write: writeFlag + "Connect to the supplied file descriptor. Answer the file oop. + On POSIX platforms this translates to fdopen(). + writeFlag must be compatible with the existing file access." + | file fileOop | + <var: #file type: 'SQFile *'> + <var: 'fd' type: 'int'> + <export: true> + fileOop := interpreterProxy instantiateClass: interpreterProxy classByteArray indexableSize: self fileRecordSize. + file := self fileValueOf: fileOop. + interpreterProxy failed + ifFalse: [self cCode: 'sqConnectToFileDescriptor(file, fd, writeFlag)' inSmalltalk: [file]]. + ^ fileOop! Item was added: + ----- Method: FilePlugin>>connectToFile:write: (in category 'private') ----- + connectToFile: cfile write: writeFlag + "Open the FILE* as file. Answer the file oop. + writeFlag must be compatible with the existing file access." + | file fileOop | + <var: 'file' type: 'SQFile *'> + <var: 'cfile' type: 'void *'> + <export: true> + fileOop := interpreterProxy instantiateClass: interpreterProxy classByteArray indexableSize: self fileRecordSize. + file := self fileValueOf: fileOop. + interpreterProxy failed + ifFalse: [self cCode: 'sqConnectToFile(file, cfile, writeFlag)' inSmalltalk: [file]]. + ^ fileOop! Item was removed: - ----- Method: FilePlugin>>fileOpenFd:write: (in category 'private') ----- - fileOpenFd: fd write: writeFlag - "Open the fd as file. Answer the file oop." - | file fileOop | - <var: #file type: 'SQFile *'> - <var: 'fd' type: 'int'> - <export: true> - fileOop := interpreterProxy instantiateClass: interpreterProxy classByteArray indexableSize: self fileRecordSize. - file := self fileValueOf: fileOop. - interpreterProxy failed - ifFalse: [self cCode: 'sqFileFdOpen(file, fd, writeFlag)' inSmalltalk: [file]]. - ^ fileOop! Item was removed: - ----- Method: FilePlugin>>fileOpenFile:write: (in category 'private') ----- - fileOpenFile: cfile write: writeFlag - "Open the FILE* as file. Answer the file oop." - | file fileOop | - <var: #file type: 'SQFile *'> - <var: 'cfile' type: 'FILE *'> - <export: true> - fileOop := interpreterProxy instantiateClass: interpreterProxy classByteArray indexableSize: self fileRecordSize. - file := self fileValueOf: fileOop. - interpreterProxy failed - ifFalse: [self cCode: 'sqFileFileOpen(file, cfile, writeFlag)' inSmalltalk: [file]]. - ^ fileOop! Item was added: + ----- Method: FilePlugin>>pointerFrom: (in category 'private') ----- + pointerFrom: pointerByteArray + "Answer the machine address contained in anExternalAddressOop." + + | ptr addressUnion idx | + <returnTypeC: 'void *'> + <var: 'ptr' type: 'unsigned char *'> + <var: 'addressUnion' type: 'union {void *address; unsigned char bytes[sizeof(void *)];}'> + ((interpreterProxy is: pointerByteArray KindOf: 'ByteArray') and: + [(interpreterProxy stSizeOf: pointerByteArray) = self sizeOfPointer]) + ifFalse: [^ nil]. + ptr := interpreterProxy arrayValueOf: pointerByteArray. + idx := 0. + [idx < self sizeOfPointer] whileTrue: + [self cCode: 'addressUnion.bytes[idx] = ptr[idx]'. + idx := idx + 1]. + ^ self cCode: 'addressUnion.address' inSmalltalk: [addressUnion] + ! Item was added: + ----- Method: FilePlugin>>primitiveConnectToFile (in category 'file primitives') ----- + primitiveConnectToFile + "Connect to the file with the supplied FILE* and writeFlag. + FILE* must be supplied in a byte object (ByteArray) with the platform address size. + writeFlag must be a boolean and compatible with the existing file access." + | writeFlag cfileOop cfile filePointer | + <var: 'cfile' type: 'void* '> + <export: true> + writeFlag := interpreterProxy + booleanValueOf: (interpreterProxy stackValue: 0). + cfileOop := interpreterProxy stackValue: 1. + cfile := self pointerFrom: cfileOop. + cfile ifNil: + [^interpreterProxy primitiveFailFor: PrimErrBadArgument]. + filePointer := self connectToFile: cfile write: writeFlag. + interpreterProxy failed ifFalse: + [^interpreterProxy pop: 3 "rcvr, name, writeFlag" + thenPush: filePointer]. + ^interpreterProxy primitiveFail.! Item was added: + ----- Method: FilePlugin>>primitiveConnectToFileDescriptor (in category 'file primitives') ----- + primitiveConnectToFileDescriptor + "Connect to the existing file identified by fileDescriptor. + fileDescriptor must be an integer. + writeFlag is aboolean indicating whether to open in read or write mode and must be compatible with the existing file access." + | writeFlag fdPointer fd filePointer | + <var: 'fd' type: 'int'> + <export: true> + writeFlag := interpreterProxy + booleanValueOf: (interpreterProxy stackValue: 0). + fdPointer := interpreterProxy stackValue: 1. + (interpreterProxy isIntegerObject: fdPointer) + ifFalse: [^ interpreterProxy primitiveFailFor: PrimErrBadArgument]. + fd := interpreterProxy integerValueOf: fdPointer. + filePointer := self connectToFd: fd write: writeFlag. + interpreterProxy failed + ifFalse: [^interpreterProxy pop: 3 "rcvr, name, writeFlag" + thenPush: filePointer]. + ^interpreterProxy primitiveFail.! Item was removed: - ----- Method: FilePlugin>>primitiveFileOpenUseFile (in category 'file primitives') ----- - primitiveFileOpenUseFile - "Open the file with the supplied FILE* and writeFlag. - FILE* must be supplied in a byte object (ByteArray) with the platform address size. - writeFlag must be a boolean." - | writeFlag cfileOop cfile filePointer | - <var: 'cfile' type: 'FILE* '> - <export: true> - writeFlag := interpreterProxy - booleanValueOf: (interpreterProxy stackValue: 0). - cfileOop := interpreterProxy stackValue: 1. - (((interpreterProxy isBytes: cfileOop) and: - [(interpreterProxy byteSizeOf: cfileOop) = self cfileRecordSize])) - ifFalse: [^interpreterProxy primitiveFailFor: PrimErrBadArgument]. - cfile := interpreterProxy firstIndexableField: cfileOop. - interpreterProxy failed ifFalse: - [filePointer := self fileOpenFile: cfile write: writeFlag]. - interpreterProxy failed ifFalse: - [^interpreterProxy pop: 3 "rcvr, name, writeFlag" - thenPush: filePointer]. - ^interpreterProxy primitiveFail.! Item was removed: - ----- Method: FilePlugin>>primitiveFileOpenUseFileDescriptor (in category 'file primitives') ----- - primitiveFileOpenUseFileDescriptor - "Open the file with the supplied file descriptor and writeFlag. - fileDescriptor must be an integer. - writeFlag must be a boolean." - | writeFlag fdPointer fd filePointer | - <var: 'fd' type: 'int'> - <export: true> - writeFlag := interpreterProxy - booleanValueOf: (interpreterProxy stackValue: 0). - fdPointer := interpreterProxy stackValue: 1. - (interpreterProxy isIntegerObject: fdPointer) - ifFalse: [^ interpreterProxy primitiveFailFor: PrimErrBadArgument]. - fd := interpreterProxy integerValueOf: fdPointer. - filePointer := self fileOpenFd: fd write: writeFlag. - interpreterProxy failed - ifFalse: [^interpreterProxy pop: 3 "rcvr, name, writeFlag" - thenPush: filePointer]. - ^interpreterProxy primitiveFail.! Item was added: + ----- Method: FilePlugin>>sizeOfPointer (in category 'private') ----- + sizeOfPointer + "Return the size of a pointer (address size)" + <inline: #always> + ^self sizeof: #'void *'!

1 0

[OpenSmalltalk/opensmalltalk-vm] Include FilePlugin>>primitiveFileOpenUseFileDescriptor & primitiveFileOpenUseFile (#223)
by akgrant43 07 Mar '18

07 Mar '18

on all platforms (not just PharoVM). See also discussion at: http://lists.squeakfoundation.org/pipermail/vm-dev/2018-March/026955.html You can view, comment on, or merge this pull request online at: https://github.com/OpenSmalltalk/opensmalltalk-vm/pull/223 -- Commit Summary -- * Include FilePlugin>>primitiveFileOpenUseFileDescriptor & primitiveFileOpenUseFile -- File Changes -- M platforms/Cross/plugins/FilePlugin/FilePlugin.h (2) M platforms/Cross/plugins/FilePlugin/sqFilePluginBasicPrims.c (3) M platforms/win32/plugins/FilePlugin/sqWin32FilePrims.c (2) M src/plugins/FilePlugin/FilePlugin.c (50) -- Patch Links -- https://github.com/OpenSmalltalk/opensmalltalk-vm/pull/223.patch https://github.com/OpenSmalltalk/opensmalltalk-vm/pull/223.diff -- 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/pull/223

1 2

[OpenSmalltalk/opensmalltalk-vm] c26b74: Include FilePlugin>>primitiveFileOpenUseFileDescri...
by GitHub 07 Mar '18

07 Mar '18

Branch: refs/heads/Cog Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: c26b74a7c537158c30bbd7eafbcc0147cba8ade7 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/c26b74a7c537158c30… Author: AlistairGrant <akgrant0710(a)gmail.com> Date: 2018-03-03 (Sat, 03 Mar 2018) Changed paths: M platforms/Cross/plugins/FilePlugin/FilePlugin.h M platforms/Cross/plugins/FilePlugin/sqFilePluginBasicPrims.c M platforms/win32/plugins/FilePlugin/sqWin32FilePrims.c M src/plugins/FilePlugin/FilePlugin.c Log Message: ----------- Include FilePlugin>>primitiveFileOpenUseFileDescriptor & primitiveFileOpenUseFile on all platforms (not just PharoVM) Commit: 23269657f697f868e48094391946f190dc598b38 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/23269657f697f868e4… Author: AlistairGrant <akgrant0710(a)gmail.com> Date: 2018-03-06 (Tue, 06 Mar 2018) Changed paths: M platforms/Cross/plugins/FilePlugin/FilePlugin.h M platforms/Cross/plugins/FilePlugin/sqFilePluginBasicPrims.c M platforms/win32/plugins/FilePlugin/sqWin32FilePrims.c M src/plugins/FilePlugin/FilePlugin.c Log Message: ----------- Rename fd and file open primitives, add Windows support Commit: 5aabffb202c14db3fa16134cc7020d3727d8c296 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/5aabffb202c14db3fa… Author: Alistair Grant <akgrant0710(a)gmail.com> Date: 2018-03-06 (Tue, 06 Mar 2018) Changed paths: M platforms/Cross/plugins/FilePlugin/FilePlugin.h M platforms/Cross/plugins/FilePlugin/sqFilePluginBasicPrims.c M platforms/win32/plugins/FilePlugin/sqWin32FilePrims.c Log Message: ----------- Use void* instead of FILE* for Win32 compatibility Commit: de272539aa78a3e310d219d7f12bb93c475e4ef2 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/de272539aa78a3e310… Author: AlistairGrant <akgrant0710(a)gmail.com> Date: 2018-03-06 (Tue, 06 Mar 2018) Changed paths: M src/plugins/FilePlugin/FilePlugin.c Log Message: ----------- FilePlugin>>primitiveConnectToFile fix address retrieval Commit: 19a102b518f8238579f776ef46a8b59f172502b8 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/19a102b518f8238579… Author: akgrant43 <akgrant(a)gmail.com> Date: 2018-03-07 (Wed, 07 Mar 2018) Changed paths: M platforms/Cross/plugins/FilePlugin/FilePlugin.h M platforms/Cross/plugins/FilePlugin/sqFilePluginBasicPrims.c M platforms/win32/plugins/FilePlugin/sqWin32FilePrims.c M src/plugins/FilePlugin/FilePlugin.c Log Message: ----------- Merge pull request #223 from akgrant43/21462-Open-a-FileStream-based-on-fd-or-FILE Include FilePlugin>>primitiveFileOpenUseFileDescriptor & primitiveFileOpenUseFile Summary of changes: - Rename primitiveFileOpenUseFileDescriptor to primitiveConnectToFileDescriptor - Rename primitiveFileOpenUseFile to primitiveConnectToFile - Include new primitives on all platforms (not just Pharo) - Add support for Windows - Bug fix pointer retrieval in primitiveConnectToFile - Additional comments Compare: https://github.com/OpenSmalltalk/opensmalltalk-vm/compare/b8fba4cbd873...19…

1 0

VM Maker: VMMaker.oscog-eem.2345.mcz
by commits＠source.squeak.org 07 Mar '18

07 Mar '18

Eliot Miranda uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker.oscog-eem.2345.mcz ==================== Summary ==================== Name: VMMaker.oscog-eem.2345 Author: eem Time: 6 March 2018, 6:49:09.645306 pm UUID: a9d9ad65-8e38-4936-a5de-2c4be0110c0d Ancestors: VMMaker.oscog-eem.2344 Cogit: Fix several slips. Inline a few trivial methods. VMMaker: Nuke an unused sender of cogitClass: =============== Diff against VMMaker.oscog-eem.2344 =============== Item was changed: ----- Method: CogIA32Compiler>>stopsFrom:to: (in category 'generate machine code') ----- stopsFrom: startAddr to: endAddr self + cCode: [self me: startAddr ms: self stop et: endAddr - startAddr + 1] - cCode: [self self me: startAddr ms: self stop et: endAddr - startAddr + 1] inSmalltalk: [| alignedEnd alignedStart stops | stops := self stop << 8 + self stop. stops := stops << 16 + stops. alignedStart := startAddr + 3 // 4 * 4. alignedEnd := endAddr - 1 // 4 * 4. alignedEnd <= startAddr ifTrue: [startAddr to: endAddr do: [:addr | objectMemory byteAt: addr put: self stop]] ifFalse: [startAddr to: alignedStart - 1 do: [:addr | objectMemory byteAt: addr put: self stop]. alignedStart to: alignedEnd by: 4 do: [:addr | objectMemory long32At: addr put: stops]. alignedEnd + 4 to: endAddr do: [:addr | objectMemory byteAt: addr put: self stop]]]! Item was added: + ----- Method: CogSSBytecodeFixup>>isTargetOfBackwardBranch (in category 'testing') ----- + isTargetOfBackwardBranch + ^isTargetOfBackwardBranch! Item was changed: ----- Method: CogX64Compiler>>stopsFrom:to: (in category 'generate machine code') ----- stopsFrom: startAddr to: endAddr self + cCode: [self me: startAddr ms: self stop et: endAddr - startAddr + 1] - cCode: [self self me: startAddr ms: self stop et: endAddr - startAddr + 1] inSmalltalk: [| alignedEnd alignedStart stops | stops := self stop << 8 + self stop. stops := stops << 16 + stops. stops := stops << 32 + stops. alignedStart := startAddr + 7 // 8 * 8. alignedEnd := endAddr - 1 // 8 * 8. alignedEnd <= startAddr ifTrue: [startAddr to: endAddr do: [:addr | objectMemory byteAt: addr put: self stop]] ifFalse: [startAddr to: alignedStart - 1 do: [:addr | objectMemory byteAt: addr put: self stop]. alignedStart to: alignedEnd by: 8 do: [:addr | objectMemory long64At: addr put: stops]. alignedEnd + 8 to: endAddr do: [:addr | objectMemory byteAt: addr put: self stop]]]! Item was changed: ----- Method: Cogit>>initializeFixupAt: (in category 'compile abstract instructions') ----- initializeFixupAt: targetPC "Make sure there's a flagged fixup at the targetPC in fixups. Initially a fixup's target is just a flag. Later on it is replaced with a proper instruction." <returnTypeC: #'BytecodeFixup *'> + <inline: true> (self fixupAt: targetPC) becomeFixup! Item was changed: ----- Method: RegisterAllocatingCogit>>genPushReceiverBytecode (in category 'bytecode generators') ----- genPushReceiverBytecode + ^self ssPushDesc: self ssSelfDescriptor! - ^self ssPushDesc: self simSelf! Item was changed: ----- Method: StackInterpreter>>maybeSelectorOfMethod: (in category 'debug support') ----- maybeSelectorOfMethod: methodObj "Answer the selector of a method, assuming its penultimate literal is either a symbol or a pointer object whose first slot references the method and whose second slot is a symbol (i.e. an AdditionalMethodState). If a Symbol can't be found answer nil. This isn't satisfactory, as it puts a lot of information into the VM, but it is needed for adequate crash debugging at Cadence. With full blocks as of 9/2016 the last literal of a CompiledBlock is a back pointer to the enclosing block or compiled method." + <api> | ultimateLiteral penultimateLiteral maybeSelector | self assert: (objectMemory isOopCompiledMethod: methodObj). ultimateLiteral := self ultimateLiteralOf: methodObj. (objectMemory isOopCompiledMethod: ultimateLiteral) ifTrue: [^self maybeSelectorOfMethod: ultimateLiteral]. penultimateLiteral := self penultimateLiteralOf: methodObj. (objectMemory isWordsOrBytes: penultimateLiteral) ifTrue: [^(objectMemory fetchClassTagOfNonImm: penultimateLiteral) = (objectMemory fetchClassTagOfNonImm: (objectMemory splObj: SelectorDoesNotUnderstand)) ifTrue: [penultimateLiteral]]. ^((objectMemory isPointers: penultimateLiteral) and: [(objectMemory numSlotsOf: penultimateLiteral) >= 2 and: [(objectMemory fetchPointer: 0 ofObject: penultimateLiteral) = methodObj and: [maybeSelector := objectMemory fetchPointer: 1 ofObject: penultimateLiteral. (objectMemory isWordsOrBytes: maybeSelector) and: [(objectMemory fetchClassTagOfNonImm: maybeSelector) = (objectMemory fetchClassTagOfNonImm: (objectMemory splObj: SelectorDoesNotUnderstand))]]]]) ifTrue: [maybeSelector]! Item was changed: ----- Method: StackToRegisterMappingCogit>>genPushReceiverBytecode (in category 'bytecode generators') ----- genPushReceiverBytecode self receiverIsInReceiverResultReg ifTrue: [^self ssPushRegister: ReceiverResultReg]. + ^self ssPushDesc: self ssSelfDescriptor! - ^self ssPushDesc: self simSelf! Item was changed: ----- Method: StackToRegisterMappingCogit>>initializeFixupAt: (in category 'compile abstract instructions') ----- initializeFixupAt: targetPC "Make sure there's a flagged fixup at the targetPC in fixups. These are the targets of backward branches. A backward branch fixup's simStackPtr needs to be set when generating the code for the bytecode at the targetPC. Initially a fixup's target is just a flag. Later on it is replaced with a proper instruction." + <inline: true> | fixup | fixup := self fixupAt: targetPC. self initializeFixup: fixup! Item was added: + ----- Method: StackToRegisterMappingCogit>>ssSelfDescriptor (in category 'simulation stack') ----- + ssSelfDescriptor + <returnTypeC: #SimStackEntry> + <inline: true> + ^simStack at: 0! Item was changed: ----- Method: StackToRegisterMappingCogit>>ssTopDescriptor (in category 'simulation stack') ----- ssTopDescriptor <returnTypeC: #SimStackEntry> + <inline: true> ^simStack at: simStackPtr! Item was removed: - ----- Method: VMMaker class>>makerFor:and:to:platformDir: (in category 'utilities') ----- - makerFor: interpreterClass and: cogitClassOrNil to: srcDirName platformDir: platDirName - "Initialize a VMMaker to generate the VM to the given target directory. Include plugins in pluginList. - Example: - (VMMaker - generate: NewspeakInterpreter - to: (FileDirectory default pathFromURI: 'cogvm/newspeaksrc') - platformDir: (FileDirectory default pathFromURI: 'cogvm/platforms') - including:#( AsynchFilePlugin FloatArrayPlugin RePlugin B2DPlugin FloatMathPlugin SecurityPlugin - BMPReadWriterPlugin IA32ABI SocketPlugin BitBltPlugin JPEGReadWriter2Plugin SurfacePlugin - DSAPrims JPEGReaderPlugin UUIDPlugin DropPlugin LargeIntegers UnixOSProcessPlugin - FileCopyPlugin Matrix2x3Plugin Win32OSProcessPlugin FilePlugin MiscPrimitivePlugin ZipPlugin))" - | maker | - maker := self forPlatform: 'Cross'. - maker sourceDirectoryName: srcDirName. - maker platformRootDirectoryName: platDirName. - maker interpreterClass: interpreterClass. - cogitClassOrNil ifNotNil: [maker cogitClass: cogitClassOrNil]. - ^maker - !

1 0

VM Maker: VMMaker.oscog-eem.2344.mcz
by commits＠source.squeak.org 07 Mar '18

07 Mar '18

Eliot Miranda uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker.oscog-eem.2344.mcz ==================== Summary ==================== Name: VMMaker.oscog-eem.2344 Author: eem Time: 6 March 2018, 5:11:30.627397 pm UUID: b785e3d3-3c99-4902-83fc-fac211e891de Ancestors: VMMaker.oscog-eem.2343 Cogit: Fix the macro definition for simSelf (it must take arguments). VMMakerTool: Have the tool open up with the default directories as specified in VMMaker's DirNames dictionary. Regularise and simplify the directrory checking, even though the code is still really messy. Delete some unsent methods. Fix a deprecation warning. =============== Diff against VMMaker.oscog-eem.2343 =============== Item was changed: ----- Method: StackToRegisterMappingCogit>>simSelf (in category 'accessing') ----- simSelf + <cmacro: '() simStack'> - <cmacro: ' simStack'> <returnTypeC: #'CogSimStackEntry *'> ^self simStackAt: 0! Item was added: + ----- Method: VMMaker class>>rootDirectory (in category 'accessing') ----- + rootDirectory + ^FileDirectory default directoryNamed: self sourceTree! Item was changed: ----- Method: VMMaker>>crossPlatformDirectory (in category 'source directories') ----- crossPlatformDirectory "return the directory where we should find the cross-platform literal sources - <sq.h> etc" + | dir | + dir := self platformRootDirectory directoryNamed: 'Cross'. + dir exists ifFalse: "The supposed directory for the actual cross-platform code does not exist." + [^self couldNotFindPlatformDirectoryFor: 'cross-platform ']. + ^dir! - | fd machDirNm | - fd := self platformRootDirectory. - (fd directoryExists: (machDirNm := 'Cross')) - ifFalse: ["The supposed directory for the actual cross-platform code - does not exist." - ^ self couldNotFindPlatformDirectoryFor: 'cross-platform ']. - ^ fd directoryNamed: machDirNm! Item was changed: ----- Method: VMMaker>>crossPlatformPluginsDirectory (in category 'source directories') ----- crossPlatformPluginsDirectory "return the directory where we should find the cross-platform plugin specific sources" + | dir | + dir := self crossPlatformDirectory directoryNamed: self class pluginsDirName. + dir exists ifFalse: "The supposed directory for the plugins code does not exist. + We need to raise a suitable exception, but can't think of one right now." + [^self couldNotFindPlatformDirectoryFor: 'any plugins needing cross-platform']. + ^dir! - - (self crossPlatformDirectory directoryExists: self class pluginsDirName) - ifFalse: ["The supposed directory for the plugins code does not - exist. We need to raise a suitable exception, but cant - think of one right now." - ^self couldNotFindPlatformDirectoryFor: 'any plugins needing cross-platform']. - ^self crossPlatformDirectory directoryNamed: self class pluginsDirName! Item was removed: - ----- Method: VMMaker>>externalFilesRequiredFor: (in category 'plugin lists') ----- - externalFilesRequiredFor: plugin - ^plugin requiresCrossPlatformFiles or:[plugin requiresPlatformFiles]! Item was removed: - ----- Method: VMMaker>>externalModuleNames (in category 'plugin lists') ----- - externalModuleNames - "return the list of all the external plugins' moduleNames" - ^Array streamContents:[:strm| self externalPluginsDo:[:pl| strm nextPut: pl moduleName ]]! Item was changed: ----- Method: VMMaker>>initialize (in category 'initialize') ----- initialize logger := Transcript. inline := true. forBrowser := false. internalPlugins := SortedCollection new. externalPlugins := SortedCollection new. platformName := self class machinesDirName. is64BitVM := false. + interpreterClassName := StackInterpreterPrimitives name. - interpreterClassName := Interpreter name. optionsDictionary := Dictionary newFromPairs: {#BytesPerWord. 4}. VMStructType voidStructTypeCache! Item was removed: - ----- Method: VMMaker>>initializeAllExternal (in category 'initialize') ----- - initializeAllExternal - "add all the plugins to the external list and make sure the internal list is empty" - - self initializeInternal: #() external: self availablePlugins ! Item was removed: - ----- Method: VMMaker>>initializeAllExternalBut: (in category 'initialize') ----- - initializeAllExternalBut: arrayOfInternalPluginNames - "add all the plugins to the external list except for those listed, which should be added to the internal list" - - self initializeInternal: arrayOfInternalPluginNames external: (self availablePlugins copyWithoutAll: arrayOfInternalPluginNames )! Item was removed: - ----- Method: VMMaker>>initializeAllInternal (in category 'initialize') ----- - initializeAllInternal - "add all the plugins to the internal list and make sure the external list is empty" - - self initializeInternal: self availablePlugins external: #()! Item was removed: - ----- Method: VMMaker>>initializeAllInternalBut: (in category 'initialize') ----- - initializeAllInternalBut: arrayOfExternalPluginNames - "add all the plugins to the internal list except for those listed, which should be added to the external list" - - self initializeInternal: (self availablePlugins copyWithoutAll: arrayOfExternalPluginNames) external: arrayOfExternalPluginNames! Item was removed: - ----- Method: VMMaker>>internalModuleNames (in category 'plugin lists') ----- - internalModuleNames - "return the list of all the internal plugins' moduleNames" - ^Array streamContents:[:strm| self internalPluginsDo:[:pl| strm nextPut: pl moduleName ]]! Item was removed: - ----- Method: VMMaker>>isFor32BitVM (in category 'initialize') ----- - isFor32BitVM - "is my flag to make a 32bit pointer model VM?" - ^is64BitVM not! Item was changed: ----- Method: VMMaker>>platformDirectory (in category 'source directories') ----- platformDirectory "return the directory where we should find the platform specific sources" + | dir | + dir := self platformRootDirectory directoryNamed: self platformName. + dir exists ifFalse: "The supposed directory for the actual platform code does not exist." + [^self couldNotFindPlatformDirectoryFor: self platformName]. + ^dir! - | fd platNm | - fd := self platformRootDirectory. - (fd directoryExists: (platNm := self platformName)) - ifFalse: ["The supposed directory for the actual platform code - does not exist." - ^ self couldNotFindPlatformDirectoryFor: platNm]. - ^ fd directoryNamed: platNm! Item was changed: ----- Method: VMMaker>>platformPluginsDirectory (in category 'source directories') ----- platformPluginsDirectory "return the directory where we should find the platform plugin specific sources" + | dir | + dir := self platformDirectory directoryNamed: self class pluginsDirName. + dir exists ifFalse: "The supposed directory for the plugins code does not exist. + We need to raise a suitable exception, but can't think of one right now." + [^self couldNotFindPlatformDirectoryFor: 'any plugins needing ', self platformName]. + ^dir! - (self platformDirectory directoryExists: self class pluginsDirName) - ifFalse: ["The supposed directory for the plugins code does not - exist. We need to raise a suitable exception, but cant - think of one right now." - ^self couldNotFindPlatformDirectoryFor: 'any plugins needing ', self platformName]. - ^self platformDirectory directoryNamed: self class pluginsDirName! Item was changed: ----- Method: VMMaker>>platformRootDirectory (in category 'source directories') ----- platformRootDirectory + "Answer the directory where we should find all platform's sources" + | dir | + dir := FileDirectory default directoryNamed: self platformRootDirectoryName. + dir exists ifFalse: "The supposed directory for the platforms code does not exist." + [^self couldNotFindDirectory: 'the platform code tree']. + ^dir! - "return the directory where we should find all platform's sources" - (FileDirectory default - directoryExists: (platformRootDirName - ifNil: [self class platformsDirName])) - ifFalse: ["The supposed directory for the platforms code does not - exist." - ^ self couldNotFindDirectory: 'the platform code tree']. - ^ FileDirectory default - directoryNamed: (platformRootDirName - ifNil: [self class platformsDirName])! Item was changed: ----- Method: VMMaker>>platformRootDirectoryName (in category 'source directories') ----- platformRootDirectoryName "Answer the name of the directory where we should find all platform's sources" + ^platformRootDirName ifNil: + [self class rootDirectory fullNameFor: self class platformsDirName]! - ^platformRootDirName! Item was changed: ----- Method: VMMaker>>sourceDirectory (in category 'target directories') ----- sourceDirectory | fd | + fd := FileDirectory default directoryNamed: self sourceDirectoryName. - fd := FileDirectory default directoryNamed: (sourceDirName - ifNil: [self class sourceDirName, self vmBitnessString]). fd assureExistence. + ^fd! - ^ fd! Item was changed: ----- Method: VMMaker>>sourceDirectoryName (in category 'target directories') ----- sourceDirectoryName + ^sourceDirName ifNil: + [self class rootDirectory fullNameFor: self class sourceDirName]! - ^sourceDirName! Item was removed: - ----- Method: VMMaker>>sourceFileNameFor: (in category 'target directories') ----- - sourceFileNameFor: aVMClass - "Answer the source file name for a VM class." - - ^aVMClass sourceFileName! Item was removed: - ----- Method: VMMaker>>vmBitnessString (in category 'target directories') ----- - vmBitnessString - "Return a string of 32 or 64 depending on the is64BitVM valuse" - ^is64BitVM ifTrue:['64'] ifFalse:['32']! Item was changed: ----- Method: VMMakerTool>>entryRowWithLabel:balloonText:getFieldText:setFieldText:buttonLabel:buttonAction:buttonBalloonText: (in category 'window construction') ----- entryRowWithLabel: label balloonText: balloonText getFieldText: getTextSelector setFieldText: setTextSelector buttonLabel: buttonLabel buttonAction: buttonAction buttonBalloonText: buttonBalloonText | row lWidth | lWidth := TextStyle defaultFont pixelSize * 11. row := Morph new color: Color transparent; hResizing: #spaceFill; vResizing: #spaceFill; extent: 550 @ 40; layoutPolicy: ProportionalLayout new; borderWidth: 2; setBalloonText: balloonText translated; yourself. row addMorph: (TextMorph new contents: label translated asText allBold) lock fullFrame: (LayoutFrame fractions: (0 @ 0 corner: 0 @ 1) offsets: (3 @ 3 corner: lWidth @ -3)). row addMorph: ((PluggableTextMorph on: self text: getTextSelector + accept: setTextSelector) vScrollBarPolicy: #never; - accept: setTextSelector) hideVScrollBarIndefinitely: true; acceptOnCR: true) fullFrame: (LayoutFrame fractions: (0 @ 0 corner: 1 @ 1) offsets: (lWidth + 10 @ 0 corner: (lWidth / 1.8 + 10) negated @ 0)). buttonAction ifNotNil: [row addMorph: (SimpleButtonMorph new target: self; label: buttonLabel translated; actionSelector: buttonAction; hResizing: #spaceFill; setBalloonText: buttonBalloonText translated) fullFrame: (LayoutFrame fractions: (1 @ 0 corner: 1 @ 1) offsets: ((lWidth / 1.8 + 5) negated @ 3 corner: -5 @ -3))]. ^ row!

1 0

FFI Struct Argument Pass By Value Fails on Mac 64 bit
by Todd Blanchard 06 Mar '18

06 Mar '18

I've been trying to track this down for a couple weeks now. I have concluded that structs passed by value to functions on the 64 bit VM are not properly populated. The struct's memory is all zero'd. I found this while trying to work with LibClang and found that functions that fetched code locations from code ranges always returned invalid zero'd locations. After spending some time with lldb I have traced the problem into the native code and found that the argument is not correct. I've carved out the wee bit of clang to reproduce this in a tiny library. The gist of it is below and the entire file is included. Basically the struct passed to the function clang_getRangeStart is zero'd memory regardless of the data I send from the image side. The build command I used on sierra is clang -shared -undefined dynamic_lookup -o microclang.dylib microclang.c I'm stuck. The FFI64 plugin is way beyond my comprehension. // microclang.c typedef struct { const void *ptr_data[2]; unsigned int_data; } CXSourceLocation; /** * \brief Identifies a half-open character range in the source code. * * Use clang_getRangeStart() and clang_getRangeEnd() to retrieve the * starting and end locations from a source range, respectively. */ typedef struct { const void *ptr_data[2]; unsigned begin_int_data; unsigned end_int_data; } CXSourceRange; const char* first = "first_pointer"; const char* second = "second_pointer"; // return a fake range with non zero data CXSourceRange clang_getArbitraryRange() { CXSourceRange range = {0}; range.ptr_data[0] = (void*)first; range.ptr_data[1] = (void*)second; range.begin_int_data = 17; range.end_int_data = 24; return range; } // Actual clang function - range is always zero'd here despite having values in the image CXSourceLocation clang_getRangeStart(CXSourceRange range) { // Special decoding for CXSourceLocations for CXLoadedDiagnostics. if ((uintptr_t)range.ptr_data[0] & 0x1) { CXSourceLocation Result = { { range.ptr_data[0], nullptr }, 0 }; return Result; } CXSourceLocation Result = { { range.ptr_data[0], range.ptr_data[1] }, range.begin_int_data }; return Result; }

3 12

Buffer overriuns detected by fortify in the AioPlugin (was Re: [Pharo-dev] Pharo6 with Ubuntu and OSSubprocess/threaded heartbeat crashes and problems
by Eliot Miranda 06 Mar '18

06 Mar '18

Hi, aioEnable et al should really check the fd argument against FD_SETSIZE and answer error codes that get tested in clients. See two messages below: On Tue, Mar 6, 2018 at 2:49 AM, Sabine Manaa <manaa.sabine(a)gmail.com> wrote: > Hi, > > I can report the following: > > The problem with the Buffer overflow remains also with OSProcess. > Also with the normal vm (https://get.pharo.org ). > > Summary: I have buffer overflow crashes with my application on Linux. > The same code runs without problems on MacOS and on Windows. > I have the same test data/database and do exactly the same. > > The problem occurs only after calling several times OSProcess/OSSubprocess. > This is the reason why I first had a suspicion that OSSubprocess is > responsible for the crashes. > > Can anyone tell me how to proceed to find the reason for the buffer > overflow? > There is no PharoDebug.log > > Help is very appreciated! > > This is the message when terminating: > > root@Pharo_ubuntu_16:/spf/build# ./pharo Pharo-Productive-SPF.image > --no-quit > > SmalltalkImageInstanceID class>>startUp*** buffer overflow detected ***: > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/pharo terminated > > ======= Backtrace: ========= > > /lib/i386-linux-gnu/libc.so.6(+0x67377)[0xf75b9377] > > /lib/i386-linux-gnu/libc.so.6(__fortify_fail+0x68)[0xf7649708] > > /lib/i386-linux-gnu/libc.so.6(+0xf58f8)[0xf76478f8] > > /lib/i386-linux-gnu/libc.so.6(+0xf75fa)[0xf76495fa] > > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/pharo(aioEnab > le+0x31)[0x80c9811] > > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/pharo[0x81215ee] > > [0x90010e0] > > [0x90ad2d0] > > [0x90db8b4] > > [0x90ad24a] > > [0x900be6b] > > [0x900b04d] > > [0x9007a3e] > > [0x9004247] > > [0x9004572] > > [0x9001020] > > [0xa98c524] > > [0xb1755db] > > [0x9003efc] > > [0x9001020] > > [0xdcb558c] > > [0xb0d4d95] > > [0x9000ff0] > > ======= Memory map: ======== > > 08048000-08164000 r-xp 00000000 00:1b 1183256 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/pharo > > 08164000-08165000 r--p 0011b000 00:1b 1183256 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/pharo > > 08165000-08170000 rw-p 0011c000 00:1b 1183256 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/pharo > > 08170000-081a7000 rw-p 00000000 00:00 0 > > 08fdd000-08ffe000 rw-p 00000000 00:00 0 > [heap] > > 09000000-09100000 rwxp 00000000 00:00 0 > > 09100000-11200000 rw-p 00000000 00:00 0 > > f552e000-f554a000 r-xp 00000000 00:1b 8244 > /lib/i386-linux-gnu/libgcc_s.so.1 > > f554a000-f554b000 rw-p 0001b000 00:1b 8244 > /lib/i386-linux-gnu/libgcc_s.so.1 > > f554b000-f684c000 rw-p 00000000 00:00 0 > > f684c000-f684f000 r-xp 00000000 00:1b 1183242 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/JPEGReaderPlugin.so > > f684f000-f6850000 r--p 00002000 00:1b 1183242 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/JPEGReaderPlugin.so > > f6850000-f6851000 rw-p 00003000 00:1b 1183242 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/JPEGReaderPlugin.so > > f6851000-f68b2000 r-xp 00000000 00:1b 1183230 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/libssl.so.1.0.0 > > f68b2000-f68b3000 ---p 00061000 00:1b 1183230 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/libssl.so.1.0.0 > > f68b3000-f68b5000 r--p 00061000 00:1b 1183230 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/libssl.so.1.0.0 > > f68b5000-f68b9000 rw-p 00063000 00:1b 1183230 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/libssl.so.1.0.0 > > f68b9000-f6a7b000 r-xp 00000000 00:1b 1183239 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/libcrypto.so.1.0.0 > > f6a7b000-f6a7c000 ---p 001c2000 00:1b 1183239 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/libcrypto.so.1.0.0 > > f6a7c000-f6a8c000 r--p 001c2000 00:1b 1183239 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/libcrypto.so.1.0.0 > > f6a8c000-f6a93000 rw-p 001d2000 00:1b 1183239 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/libcrypto.so.1.0.0 > > f6a93000-f6a96000 rw-p 00000000 00:00 0 > > f6a96000-f6a9b000 r-xp 00000000 00:1b 1183249 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/SqueakSSL.so > > f6a9b000-f6a9c000 r--p 00004000 00:1b 1183249 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/SqueakSSL.so > > f6a9c000-f6a9d000 rw-p 00005000 00:1b 1183249 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/SqueakSSL.so > > f6a9d000-f6ab1000 r-xp 00000000 00:1b 7925 > /lib/i386-linux-gnu/libresolv-2.23.so > > f6ab1000-f6ab2000 ---p 00014000 00:1b 7925 > /lib/i386-linux-gnu/libresolv-2.23.so > > f6ab2000-f6ab3000 r--p 00014000 00:1b 7925 > /lib/i386-linux-gnu/libresolv-2.23.so > > f6ab3000-f6ab4000 rw-p 00015000 00:1b 7925 > /lib/i386-linux-gnu/libresolv-2.23.so > > f6ab4000-f6ab6000 rw-p 00000000 00:00 0 > > f6ab6000-f6abb000 r-xp 00000000 00:1b 7931 > /lib/i386-linux-gnu/libnss_dns-2.23.so > > f6abb000-f6abc000 r--p 00004000 00:1b 7931 > /lib/i386-linux-gnu/libnss_dns-2.23.so > > f6abc000-f6abd000 rw-p 00005000 00:1b 7931 > /lib/i386-linux-gnu/libnss_dns-2.23.so > > f6abd000-f6c05000 rw-p 00000000 00:00 0 > > f6c05000-f6c2e000 r-xp 00000000 00:1b 8373 > /lib/i386-linux-gnu/libpng12.so.0.54.0 > > f6c2e000-f6c2f000 r--p 00028000 00:1b 8373 > /lib/i386-linux-gnu/libpng12.so.0.54.0 > > f6c2f000-f6c30000 rw-p 00029000 00:1b 8373 > /lib/i386-linux-gnu/libpng12.so.0.54.0 > > f6c30000-f6c49000 r-xp 00000000 00:1b 8362 > /lib/i386-linux-gnu/libz.so.1.2.8 > > f6c49000-f6c4a000 r--p 00018000 00:1b 8362 > /lib/i386-linux-gnu/libz.so.1.2.8 > > f6c4a000-f6c4b000 rw-p 00019000 00:1b 8362 > /lib/i386-linux-gnu/libz.so.1.2.8 > > f6c4b000-f6cf6000 r-xp 00000000 00:1b 8395 > /usr/lib/i386-linux-gnu/libfreetype.so.6.12.1 > > f6cf6000-f6cfa000 r--p 000aa000 00:1b 8395 > /usr/lib/i386-linux-gnu/libfreetype.so.6.12.1 > > f6cfa000-f6cfb000 rw-p 000ae000 00:1b 8395 > /usr/lib/i386-linux-gnu/libfreetype.so.6.12.1 > > f6cfb000-f6d02000 r-xp 00000000 00:1b 1183229 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/FT2Plugin.so > > f6d02000-f6d03000 r--p 00006000 00:1b 1183229 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/FT2Plugin.so > > f6d03000-f6d04000 rw-p 00007000 00:1b 1183229 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/FT2Plugin.so > > f6d04000-f6d0f000 r-xp 00000000 00:1b 7934 > /lib/i386-linux-gnu/libnss_files-2.23.so > > f6d0f000-f6d10000 r--p 0000a000 00:1b 7934 > /lib/i386-linux-gnu/libnss_files-2.23.so > > f6d10000-f6d11000 rw-p 0000b000 00:1b 7934 > /lib/i386-linux-gnu/libnss_files-2.23.so > > f6d11000-f6d38000 rw-p 00000000 00:00 0 > > f6d38000-f6d39000 ---p 00000000 00:00 0 > > f6d39000-f7539000 rw-p 00000000 00:00 0 > [stack:21188] > > f7539000-f753b000 r-xp 00000000 00:1b 7968 > /usr/lib/i386-linux-gnu/gconv/MACINTOSH.so > > f753b000-f753c000 r--p 00001000 00:1b 7968 > /usr/lib/i386-linux-gnu/gconv/MACINTOSH.so > > f753c000-f753d000 rw-p 00002000 00:1b 7968 > /usr/lib/i386-linux-gnu/gconv/MACINTOSH.so > > f753d000-f7544000 r--s 00000000 00:1b 7977 > /usr/lib/i386-linux-gnu/gconv/gconv-modules.cache > > f7544000-f754a000 r-xp 00000000 00:1b 1183240 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/vm-sound-OSS.so > > f754a000-f754b000 r--p 00005000 00:1b 1183240 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/vm-sound-OSS.so > > f754b000-f754c000 rw-p 00006000 00:1b 1183240 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/vm-sound-OSS.so > > f754c000-f754e000 r-xp 00000000 00:1b 1183257 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/vm-display-null.so > > f754e000-f754f000 r--p 00001000 00:1b 1183257 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/vm-display-null.so > > f754f000-f7550000 rw-p 00002000 00:1b 1183257 > /spf/build/pharo-vm/lib/pharo/5.0-201707201942/vm-display-null.so > > f7550000-f7552000 rw-p 00000000 00:00 0 > > f7552000-f7702000 r-xp 00000000 00:1b 7921 > /lib/i386-linux-gnu/libc-2.23.so > > f7702000-f7704000 r--p 001af000 00:1b 7921 > /lib/i386-linux-gnu/libc-2.23.so > > f7704000-f7705000 rw-p 001b1000 00:1b 7921 > /lib/i386-linux-gnu/libc-2.23.so > > f7705000-f7708000 rw-p 00000000 00:00 0 > > f7708000-f775b000 r-xp 00000000 00:1b 7917 > /lib/i386-linux-gnu/libm-2.23.so > > f775b000-f775c000 r--p 00052000 00:1b 7917 > /lib/i386-linux-gnu/libm-2.23.so > > f775c000-f775d000 rw-p 00053000 00:1b 7917 > /lib/i386-linux-gnu/libm-2.23.so > > f775d000-f7776000 r-xp 00000000 00:1b 7920 > /lib/i386-linux-gnu/libpthread-2.23.so > > f7776000-f7777000 r--p 00018000 00:1b 7920 > /lib/i386-linux-gnu/libpthread-2.23.so > > f7777000-f7778000 rw-p 00019000 00:1b 7920 > /lib/i386-linux-gnu/libpthread-2.23.so > > f7778000-f777a000 rw-p 00000000 00:00 0 > > f777a000-f777d000 r-xp 00000000 00:1b 7923 > /lib/i386-linux-gnu/libdl-2.23.so > > f777d000-f777e000 r--p 00002000 00:1b 7923 > /lib/i386-linux-gnu/libdl-2.23.so > > f777e000-f777f000 rw-p 00003000 00:1b 7923 > /lib/i386-linux-gnu/libdl-2.23.so > > f777f000-f7780000 rw-p 00000000 00:00 0 > > f7780000-f7781000 r-xp 00000000 00:00 0 > [vdso] > > f7781000-f77a4000 r-xp 00000000 00:1b 7919 > /lib/i386-linux-gnu/ld-2.23.so > > f77a4000-f77a5000 r--p 00022000 00:1b 7919 > /lib/i386-linux-gnu/ld-2.23.so > > f77a5000-f77a6000 rw-p 00023000 00:1b 7919 > /lib/i386-linux-gnu/ld-2.23.so > > ffc55000-ffcd1000 rw-p 00000000 00:00 0 > [stack] > > ./pharo: line 11: 14639 Aborted "$DIR"/"pharo-vm/pharo" > --nodisplay "$@" > > On Tue, Mar 6, 2018 at 5:26 AM, Henrik Sperre Johansen < henrik.s.johansen(a)veloxit.no> wrote: > Seems to me aioEnable somehow triggers this. > It maintains buffers of size FD_SETSIZE (1024 on Linux)*, so an fd > parameter** >= that, could probably trigger such an error. > Maybe you could put a halt in whichever method in OSSubprocess/OSProcess > calls the primitive triggered when condition occurs, to see if that is the > cause? > If so, identifying *why* you end up with fd's that high (which, afaik, > isn't > normal), will probably lead to a workaround/solution... > > Cheers, > Henry > > * > https://github.com/pharo-project/pharo-vm/blob/e0ce2d9d78c3c > 7b37bbc12cd8730c6a15f1f057c/opensmalltalk-vm/platforms/unix/vm/aio.c > ** > https://github.com/pharo-project/pharo-vm/blob/c50dec02d2875 > de56c84d11889c78484e2d5cda8/mc/VMConstruction-Plugins- > AioPlugin.package/UnixAioPlugin.class/instance/primitiveAioEnable.st > > -- > Sent from: http://forum.world.st/Pharo-Smalltalk-Developers-f1294837.html > _,,,^..^,,,_ best, Eliot

1 0

VM Maker: VMMaker.oscog-topa.2342.mcz
by commits＠source.squeak.org 06 Mar '18

06 Mar '18

Tobias Pape uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker.oscog-topa.2342.mcz ==================== Summary ==================== Name: VMMaker.oscog-topa.2342 Author: topa Time: 6 March 2018, 3:03:51.335169 am UUID: fea20583-2134-4dfa-bd3a-aa47504642a5 Ancestors: VMMaker.oscog-akg.2341 The config should always come first. =============== Diff against VMMaker.oscog-akg.2341 =============== Item was changed: ----- Method: VMPluginCodeGenerator>>emitCHeaderOn: (in category 'C code generator') ----- emitCHeaderOn: aStream "Write a C file header onto the given stream." aStream nextPutAll: (self fileHeaderVersionStampForSourceClass: pluginClass). aStream cr; cr. #('<math.h>' '<stdio.h>' '<stdlib.h>' '<string.h>' '<time.h>') reverseDo: [:hdr| self addHeaderFileFirst: hdr]. + self addHeaderFileFirst: '"config.h"'. "Should always go first" "Additional header files; include C library ones first." self emitHeaderFiles: (headerFiles select: [:hdr| hdr includes: $<]) on: aStream. aStream cr; nextPutAll:'/* Default EXPORT macro that does nothing (see comment in sq.h): */ #define EXPORT(returnType) returnType /* Do not include the entire sq.h file but just those parts needed. */ #include "sqConfig.h" /* Configuration options */ #include "sqVirtualMachine.h" /* The virtual machine proxy definition */ #include "sqPlatformSpecific.h" /* Platform specific definitions */ #define true 1 #define false 0 #define null 0 /* using ''null'' because nil is predefined in Think C */ #ifdef SQUEAK_BUILTIN_PLUGIN # undef EXPORT # define EXPORT(returnType) static returnType #endif'; cr; cr. self addHeaderFile: '"sqMemoryAccess.h"'. "Additional header files; include squeak VM ones last" self emitHeaderFiles: (headerFiles reject: [:hdr| hdr includes: $<]) on: aStream. self maybePutPreambleFor: pluginClass on: aStream. aStream cr!

3 4

[OpenSmalltalk/opensmalltalk-vm] b8fba4: Get the B3DAcceleratorPlugin to compile under the ...
by GitHub 06 Mar '18

06 Mar '18

Branch: refs/heads/Cog Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: b8fba4cbd8739620ec6001871be47d95feec1a22 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/b8fba4cbd8739620ec… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2018-03-05 (Mon, 05 Mar 2018) Changed paths: M build.macos64x64/squeak.cog.spur.immutability/plugins.ext M build.macos64x64/squeak.cog.spur/plugins.ext M build.macos64x64/squeak.sista.spur/plugins.ext M build.macos64x64/squeak.stack.spur/plugins.ext M platforms/iOS/plugins/B3DAcceleratorPlugin/sqMacOpenGL.m M platforms/iOS/vm/SqueakPureObjc_Prefix.pch Log Message: ----------- Get the B3DAcceleratorPlugin to compile under the ARC regime on 64-bit Mac OS X. THIS NEEDS REVIEW!!

2 1

← Newer
1
...
13
14
15
16
17
18
19
...
22
Older →

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 March 2018