1
0
mirror of https://github.com/upx/upx synced 2025-09-28 19:06:07 +08:00
upx/src/packer_f.cpp
Markus F.X.J. Oberhumer c4da5e81fa Welcome 2017.
2017-01-03 12:02:07 +01:00

361 lines
11 KiB
C++

/* packer_f.cpp -- Packer filter handling
This file is part of the UPX executable compressor.
Copyright (C) 1996-2017 Markus Franz Xaver Johannes Oberhumer
Copyright (C) 1996-2017 Laszlo Molnar
All Rights Reserved.
UPX and the UCL library are free software; you can redistribute them
and/or modify them under the terms of the GNU General Public License as
published by the Free Software Foundation; either version 2 of
the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; see the file COPYING.
If not, write to the Free Software Foundation, Inc.,
59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
Markus F.X.J. Oberhumer Laszlo Molnar
<markus@oberhumer.com> <ezerotven+github@gmail.com>
*/
#include "conf.h"
#include "packer.h"
#include "filter.h"
#include "linker.h"
/*************************************************************************
// filter util
**************************************************************************/
bool Packer::isValidFilter(int filter_id) const
{
return Filter::isValidFilter(filter_id, getFilters());
}
/*************************************************************************
// addFilter32
**************************************************************************/
#define NOFILT 0 // no filter
#define FNOMRU 1 // filter, but not using mru
#define MRUFLT 2 // mru filter
static inline unsigned f80_call(int filter_id)
{
return (1+ (0x0f & filter_id)) % 3;
}
static inline unsigned f80_jmp1(int filter_id)
{
return ((1+ (0x0f & filter_id)) / 3) % 3;
}
static inline unsigned f80_jcc2(int filter_id)
{
return f80_jmp1(filter_id);
}
void Packer::addFilter32(int filter_id)
{
assert(filter_id > 0);
assert(isValidFilter(filter_id));
if (filter_id < 0x80) {
if (0x50==(0xF0 & filter_id)) {
addLoader("ctok32.00",
((0x50==filter_id) ? "ctok32.50" :
(0x51==filter_id) ? "ctok32.51" : ""),
"ctok32.10", NULL);
}
else if ((filter_id & 0xf) % 3 == 0) {
if (filter_id < 0x40) {
addLoader("CALLTR00",
(filter_id > 0x20) ? "CTCLEVE1" : "",
"CALLTR01",
(filter_id & 0xf) > 3 ? (filter_id > 0x20 ? "CTBSHR01,CTBSWA01" : "CTBROR01,CTBSWA01") : "",
"CALLTR02",
NULL
);
}
else if (0x40==(0xF0 & filter_id)) {
addLoader("ctok32.00", NULL);
if (9<=(0xf & filter_id)) {
addLoader("ctok32.10", NULL);
}
addLoader("ctok32.20", NULL);
if (9<=(0xf & filter_id)) {
addLoader("ctok32.30", NULL);
}
addLoader("ctok32.40", NULL);
}
}
else
addLoader("CALLTR10",
(filter_id & 0xf) % 3 == 1 ? "CALLTRE8" : "CALLTRE9",
"CALLTR11",
(filter_id > 0x20) ? "CTCLEVE2" : "",
"CALLTR12",
(filter_id & 0xf) > 3 ? (filter_id > 0x20 ? "CTBSHR11,CTBSWA11" : "CTBROR11,CTBSWA11") : "",
"CALLTR13",
NULL
);
}
if (0x80==(filter_id & 0xF0)) {
bool const x386 = (opt->cpu <= opt->CPU_386);
unsigned const n_mru = ph.n_mru ? 1+ ph.n_mru : 0;
bool const mrupwr2 = (0!=n_mru) && 0==((n_mru -1) & n_mru);
unsigned const f_call = f80_call(filter_id);
unsigned const f_jmp1 = f80_jmp1(filter_id);
unsigned const f_jcc2 = f80_jcc2(filter_id);
if (NOFILT!=f_jcc2) {
addLoader("LXJCC010", NULL);
if (n_mru) {
addLoader("LXMRU045", NULL);
}
else {
addLoader("LXMRU046", NULL);
}
if (0==n_mru || MRUFLT!=f_jcc2) {
addLoader("LXJCC020", NULL);
}
else { // 0!=n_mru
addLoader("LXJCC021", NULL);
}
if (NOFILT!=f_jcc2) {
addLoader("LXJCC023", NULL);
}
}
addLoader("LXUNF037", NULL);
if (x386) {
if (n_mru) {
addLoader("LXUNF386", NULL);
}
addLoader("LXUNF387", NULL);
if (n_mru) {
addLoader("LXUNF388", NULL);
}
}
else {
addLoader("LXUNF486", NULL);
if (n_mru) {
addLoader("LXUNF487", NULL);
}
}
if (n_mru) {
addLoader("LXMRU065", NULL);
if (256==n_mru) {
addLoader("MRUBYTE3", NULL);
}
else {
addLoader("MRUARB30", NULL);
if (mrupwr2) {
addLoader("MRUBITS3", NULL);
}
else {
addLoader("MRUARB40", NULL);
}
}
addLoader("LXMRU070", NULL);
if (256==n_mru) {
addLoader("MRUBYTE4", NULL);
}
else if (mrupwr2) {
addLoader("MRUBITS4", NULL);
}
else {
addLoader("MRUARB50", NULL);
}
addLoader("LXMRU080", NULL);
if (256==n_mru) {
addLoader("MRUBYTE5", NULL);
}
else {
addLoader("MRUARB60", NULL);
if (mrupwr2) {
addLoader("MRUBITS5", NULL);
}
else {
addLoader("MRUARB70", NULL);
}
}
addLoader("LXMRU090", NULL);
if (256==n_mru) {
addLoader("MRUBYTE6", NULL);
}
else {
addLoader("MRUARB80", NULL);
if (mrupwr2) {
addLoader("MRUBITS6", NULL);
}
else {
addLoader("MRUARB90", NULL);
}
}
addLoader("LXMRU100", NULL);
}
addLoader("LXUNF040", NULL);
if (n_mru) {
addLoader("LXMRU110", NULL);
}
else {
addLoader("LXMRU111", NULL);
}
addLoader("LXUNF041", NULL);
addLoader("LXUNF042", NULL);
if (n_mru) {
addLoader("LXMRU010", NULL);
if (NOFILT!=f_jmp1 && NOFILT==f_call) {
addLoader("LXJMPA00", NULL);
}
else {
addLoader("LXCALLB0", NULL);
}
addLoader("LXUNF021", NULL);
}
else {
addLoader("LXMRU022", NULL);
if (NOFILT!=f_jmp1 && NOFILT==f_call) {
addLoader("LXJMPA01", NULL);
}
else {
addLoader("LXCALLB1", NULL);
}
}
if (n_mru) {
if (256!=n_mru && mrupwr2) {
addLoader("MRUBITS1", NULL);
}
addLoader("LXMRU030", NULL);
if (256==n_mru) {
addLoader("MRUBYTE1", NULL);
}
else {
addLoader("MRUARB10", NULL);
}
addLoader("LXMRU040", NULL);
}
addLoader("LXUNF030", NULL);
if (NOFILT!=f_jcc2) {
addLoader("LXJCC000", NULL);
}
if (NOFILT!=f_call || NOFILT!=f_jmp1) { // at least one is filtered
// shift opcode origin to zero
if (0==n_mru) {
addLoader("LXCJ0MRU", NULL);
}
else {
addLoader("LXCJ1MRU", NULL);
}
// determine if in range
if ((NOFILT!=f_call) && (NOFILT!=f_jmp1)) { // unfilter both
addLoader("LXCALJMP", NULL);
}
if ((NOFILT==f_call) ^ (NOFILT==f_jmp1)) { // unfilter just one
if (0==n_mru) {
addLoader("LXCALL00", NULL);
}
else {
addLoader("LXCALL01", NULL);
}
}
// determine if mru applies
if (0==n_mru || ! ((FNOMRU==f_call) || (FNOMRU==f_jmp1)) ) {
addLoader("LXCJ2MRU", NULL); // no mru, or no exceptions
}
else { // mru on one, but not the other
addLoader("LXCJ4MRU", NULL);
if (MRUFLT==f_jmp1) { // JMP only
addLoader("LXCJ6MRU", NULL);
} else
if (MRUFLT==f_call) { // CALL only
addLoader("LXCJ7MRU", NULL);
}
addLoader("LXCJ8MRU", NULL);
}
}
addLoader("LXUNF034", NULL);
if (n_mru) {
addLoader("LXMRU055", NULL);
if (256==n_mru) {
addLoader("MRUBYTE2", NULL);
}
else if (mrupwr2) {
addLoader("MRUBITS2", NULL);
}
else if (n_mru) {
addLoader("MRUARB20", NULL);
}
addLoader("LXMRU057", NULL);
}
}
}
#undef NOFILT
#undef FNOMRU
#undef MRUFLT
/*************************************************************************
//
**************************************************************************/
void Packer::defineFilterSymbols(const Filter *ft)
{
if (ft->id == 0)
{
linker->defineSymbol("filter_length", 0);
linker->defineSymbol("filter_cto", 0);
return;
}
assert(ft->calls > 0);
assert(ft->buf_len > 0);
if (ft->id >= 0x40 && ft->id <= 0x4f)
{
linker->defineSymbol("filter_length", ft->buf_len);
linker->defineSymbol("filter_cto", ft->cto);
}
else if (ft->id >= 0x50 && ft->id <= 0x5f)
{
linker->defineSymbol("filter_id", ft->id);
linker->defineSymbol("filter_cto", ft->cto);
}
else if ((ft->id & 0xf) % 3 == 0)
{
linker->defineSymbol("filter_length", ft->calls);
linker->defineSymbol("filter_cto", ft->cto);
}
else
{
linker->defineSymbol("filter_length", ft->lastcall - ft->calls * 4);
linker->defineSymbol("filter_cto", ft->cto);
}
#if 0
if (0x80==(ft->id & 0xF0)) {
int const mru = ph.n_mru ? 1+ ph.n_mru : 0;
if (mru && mru!=256) {
unsigned const is_pwr2 = (0==((mru -1) & mru));
//patch_le32(0x80 + (char *)loader, lsize - 0x80, "NMRU", mru - is_pwr2);
}
}
#endif
}
/* vim:set ts=4 sw=4 et: */