[Box-Admins] Re: Wiping Eliot's versions Re: [squeak-dev] automated
way to delete specific trunk packages?
Tobias Pape
Das.Linux at gmx.de
Sat May 9 17:49:09 UTC 2015
On 09.05.2015, at 19:43, Levente Uzonyi <leves at elte.hu> wrote:
> The easiest way to do it is to access it via RFB/VNC. Either load some version of the RFB package during startup (and then configure it), or start a native vnc server, and restart the VM on its display.
> I don't suggest using xpra on this server, because it tends to use quite a lot of memory.
So this means the vm has to be killed before? :/
>
> Levente
>
> On Sat, 9 May 2015, Tobias Pape wrote:
>
>> Hi levente,
>>
>> On 09.05.2015, at 01:36, Levente Uzonyi <leves at elte.hu> wrote:
>>
>>> squeaksource is running in the chroot environment. What you see on box4 is the future replacement, but it's not alive yet (at least it shouldn't be).
>>>
>>
>> ah, ok, I forgot… but how to I get into _that_ image?
>>
>> Best regards
>> -Tobias
>>
>>> Levente
>>>
>>> On Sat, 9 May 2015, Tobias Pape wrote:
>>>
>>>> Hi all,
>>>>
>>>>
>>>> I just tried wiping the versions Eliot asked to be removed.
>>>> I am able to remove the corresponding files from the disk and also remove
>>>> the Squeaksource version entries.
>>>>
>>>> However, it seems that source.squeak.org is running on some kind of
>>>> Magma-backend, where wiping the versions is virtually impossible for me.
>>>> I put together the following script:
>>>>
>>>> "=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-==-=-"
>>>> | project projectDir rawVersions fs candidates condition mcModel |
>>>> project := SSRepository current projects detect: [:p | p id = 'trunk'].
>>>> mcModel := (SSRepository storage respondsTo: #mcModelFor: ) ifTrue: [
>>>> SSRepository storage mcModelFor: project].
>>>> projectDir := SSFilesystem new projectDirectoryFor: project.
>>>> " we really want to delete the versions, so circumvent the accessor that filters them "
>>>> rawVersions := project instVarNamed: 'versions'.
>>>> condition := [:version |
>>>> #('Collections.spur' 'Compiler.spur' 'Kernel.spur' 'System.spur')
>>>> anySatisfy: [:pat | version fileName beginsWith: pat]].
>>>> candidates := (rawVersions select: condition) values.
>>>> candidates
>>>> do: [:version| | fileName |
>>>> fileName := version fileName.
>>>> Transcript showln: '> ', fileName.
>>>> version diffs copy keysDo: [:diffName |
>>>> projectDir deleteFileNamed: diffName ifAbsent: ["ok"].
>>>> Transcript showln: ' Removed ', diffName.
>>>> version diffs removeKey: diffName.
>>>> Transcript showln: ' Wiped ', diffName].
>>>> projectDir deleteFileNamed: fileName ifAbsent: ["ok"].
>>>> Transcript showln: ' Removed ', fileName.
>>>> rawVersions removeKey: fileName.
>>>> " mcModel ifNotNil: [:m | m removeVersion: (project mcVersionFrom: version)]. " "<============== this does not work, chris"
>>>> Transcript showln: ' Wiped ', fileName]
>>>> displayingProgress: [:version | 'Wiping ', version fileName].
>>>> self assert: [rawVersions noneSatisfy: condition].
>>>> "=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-==-=-"
>>>>
>>>> At the position Indicated I tried removing the faulty version from the magma-based
>>>> data structures, but #removeVersion: tries to remove from an (magma)array, which fail.
>>>>
>>>> I can't help any further here, sorry. Please somebody step in?
>>>>
>>>> Best regards
>>>> -Tobias
>>>>
>>>> PS: I already backed up all affected files to ~squeaksoure/spur-backup
>>>>
>>>>
>>>> On 08.05.2015, at 23:42, Levente Uzonyi <leves at elte.hu> wrote:
>>>>
>>>>> Hi Eliot,
>>>>>
>>>>> On Fri, 8 May 2015, Eliot Miranda wrote:
>>>>>
>>>>>
>>>>> I just reuploaded Collections-ul.625.mcz, and the server happily accepted it. It even sent a mail about it.
>>>>> It's possible that it won't accept packages with different content, but it clearly accepts reuploads (which is a bug).
>>>>>
>>>>> Levente
More information about the Box-Admins
mailing list