merge upstream

data/common/settings/assoc.ini

@@ -190,8 +190,8 @@ gbc=/kolibrios/emul/gameboy
 min=/kolibrios/emul/pokemini
 nc=/kolibrios/utils/cnc_editor/cnc_editor
 ch8=/kolibrios/emul/chip8/chip8
-md=/kolibrios/emul/dgen/dgen
-gen=/kolibrios/emul/dgen/dgen
+md=/kolibrios/emul/dgen/dgen_open
+gen=/kolibrios/emul/dgen/dgen_open
 rom=/kolibrios/emul/uxn
 
 zip=$Unz

programs/fs/wrap_open/Tupfile.lua

@@ -0,0 +1,3 @@
+if tup.getconfig("NO_FASM") ~= "" then return end
+tup.include("../../use_fasm.lua")
+tup.rule("wrap_open.asm", FASM .. " %f %o " .. tup.getconfig("KPACK_CMD"), "wrap_open")

programs/fs/wrap_open/wrap_open.asm

@@ -0,0 +1,63 @@
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;                                                              ;;
+;; Copyright (C) KolibriOS team 2013-2024. All rights reserved. ;;
+;;  Distributed under terms of the GNU General Public License.  ;;
+;;                                                              ;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+; wraps command line arguments in quotes and launches a target.
+        include 'KOSfuncs.inc'
+        include 'macros.inc'
+
+        org     0x0
+        use32
+
+        db      'MENUET01'
+        dd      1
+        dd      start
+        dd      i_end
+        dd      m_end
+        dd      m_end
+        dd      path
+        dd      target_path
+
+start:
+        mov     edi, target_path
+        or      ecx, -1
+        xor     al, al
+        repne scasb
+        
+        sub     edi, 6
+        mov     byte [edi], 0
+
+        cmp     byte [path], 0
+        je      .launch
+
+        mov     byte [q_path], '"'
+
+        mov     edi, path
+        or      ecx, -1
+        xor     al, al
+        repne scasb
+        
+        mov     word [edi-1], '"'
+
+        mov     dword [fi + 8], q_path
+
+.launch:
+        mcall   SF_FILE, fi
+        mcall   SF_TERMINATE_PROCESS
+
+fi:
+        dd      SSF_START_APP, 0, 0, 0, 0
+        db      0
+        dd      target_path
+
+i_end:
+
+q_path rb 1
+path   rb 255
+
+target_path rb 1024
+
+m_end: