Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: 1 [2]  Все   Вниз
  Печать  
Автор Тема: perl javascript packer  (Прочитано 45101 раз)
0 Пользователей и 1 Гость смотрят эту тему.
vika
Постоялец

ru
Offline Offline
Пол: Женский

« Ответ #30 : 10-10-2012 22:01 » 

Приветствую всех. Собственно, нашла то, что давно искала, только в варианте джаваскрипта. Пробовала перегнать в перл с лету, но столкнулась со множеством костылей, не могли бы ув. форумчане знатоки перла опытным взглядом окинуть скрипт, дабы мне о подводных камнях сказать, которые меня ждут....

Код:
//////////////////////////////////////////
//  Un pack the code from the /packer/  //
//  By matthew@matthewfl.com            //
//  http://matthewfl.com/unPacker.html  //
//////////////////////////////////////////
// version 1.2


function unPack (code) {
function indent (code) {
try {
var tabs = 0, old=-1, add='';
for(var i=0;i<code.length;i++) {
if(code[i].indexOf("{") != -1) tabs++;
if(code[i].indexOf("}") != -1) tabs--;

if(old != tabs) {
old = tabs;
add = "";
while (old > 0) {
add += "\t";
old--;
}
old = tabs;
}

code[i] = add + code[i];
}
} finally {
tabs = null;
old = null;
add = null;
}
return code;
}
   
    var env = {
        eval: function (c) {
            code = c;
        },
        window: {},
        document: {}
    };
   
    eval("with(env) {" + code + "}");

code = (code+"").replace(/;/g, ";\n").replace(/{/g, "\n{\n").replace(/}/g, "\n}\n").replace(/\n;\n/g, ";\n").replace(/\n\n/g, "\n");

    code = code.split("\n");
    code = indent(code);
   
    code = code.join("\n");
    return code;
}
Записан
RXL
Технический
Администратор

ru
Offline Offline
Пол: Мужской

WWW
« Ответ #31 : 11-10-2012 04:05 » new

Эх, Вика, Вика...
Задумайся о eval. Почитай, чем эта конструкция занимается. Потом подумай, чем eval Javascript отличается от eval Perl. После возвращайся к предыдущей теме (кстати, снова объединяю, т.к. ничего нового тут нет) и читай последние посты.
Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Страниц: 1 [2]  Все   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines