Kernel/ELF - Fixed ELF segment permissions
[tpg/acess2.git] / Kernel / bin / elf.c
index c844ff0..73154c1 100644 (file)
@@ -128,9 +128,9 @@ tBinary *Elf_Load(int fp)
                ret->LoadSections[j].Virtual = phtab[i].VAddr;\r
                ret->LoadSections[j].MemSize = phtab[i].MemSize;\r
                ret->LoadSections[j].Flags = 0;\r
-               if( !(phtab[i].Flags & SHF_WRITE) )\r
+               if( !(phtab[i].Flags & PF_W) )\r
                        ret->LoadSections[j].Flags |= BIN_SECTFLAG_RO;\r
-               if( phtab[i].Flags & SHF_EXECINSTR )\r
+               if( phtab[i].Flags & PF_X )\r
                        ret->LoadSections[j].Flags |= BIN_SECTFLAG_EXEC;\r
                j ++;\r
        }\r

UCC git Repository :: git.ucc.asn.au