1. Pascal / Говнокод #17939

    +98

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    // Функция шифрования
    function encryptAecMessage(): string;
    var
      //  myCript: TSyna3Des;
      tmpKey: string;
      //encryptingStr: string;
      aProcess: TProcess;
      pubKeyPath: string;
    begin
      tmpKey := keyCreate();
      pubKeyPath := ExtractFileDir(ParamStr(0)) + '/workinkey/key2_rsa.pub';
      //  myCript := TSyna3Des.Create(tmpKey);
      //encryptingStr := myCript.EncryptCTR(msg);
      aProcess := TProcess.Create(nil);
      // openssl rsautl -in /home/maksim/test -out /home/maksim/Загрузки/Keys -inkey /home/maksim/key2_rsa.pub
      AProcess.CommandLine := 'echo ' + tmpKey +
        ' | openssl rsautl -in /home/maksim/test -out ' +
        '/home/maksim/Загрузки/Keys -inkey ' + pubKeyPath + ' -pubin -encrypt';
      Result := '';
    end;

    Вот такое кусок отборного кала нашёл в старой версии игрового сервера-)

    Запостил: Cynicrus, 06 Апреля 2015

    Комментарии (65) RSS

    • Код на паскале под линукс? О_о
      Ответить
      • А было же платформа от борланда для линя. Умерла потом.
        Ответить
        • Борланд сам умер. Как и TMT.

          А FPC и GPC для Линукса до сих пор живы.
          Ответить
          • та не FreePascal а что то типа Дельфи для win.
            Ответить
            • Kylix? Да, эта среда умерла. Но есть Lazarus.
              Ответить
              • о точно Kylix. Лазарус пробывал давно очень. ИМХО лазарус говно.
                Ответить
                • Да тут не имхо, а обьективное мнение. Это же делфи для бедных
                  Ответить
                  • для тех кто не умеет в crack ?
                    Ответить
                    • и для них в том числе. У нас к универе когда лицензия на борланделфи кончилась одно время стоял лазарус
                      Ответить
                      • жуть
                        на 7 дельфи же нет никаких лицензий
                        Ответить
                        • Че это их нет? Не так давно же вышла, чтобы общественным достоянием стать.
                          Ответить
                      • там же по моему разово. заплатил охулион денег и юзай.
                        Ответить
                        • Угу, купил версию - и сиди на ней пока на пенсию не соберёшься.
                          Ответить
                        • Честно - хз. Просто на первом курсе стоял нормальный делфи, потом на 3 был лазарус и дикие маты в его адрес, а щас опять делфи стоит и улыбается. Но как там с лицухой мне все равно, потому что как раз на 3 курсе я на шарп перешел
                          Ответить
                          • Lazarus - а чего на него плеваться? Почти как Delphi 7. Но с особенностями.
                            Ответить
                            • А че на царя плеваться? обычный программист, только с особенностями
                              Ответить
                              • только цело численный.
                                Ответить
                              • cleaned
                                Ответить
                                • нашел на помойке смелость вернуться?
                                  Ответить
                                  • cleaned
                                    Ответить
                                    • но моя мама не живет в германии. может это была твоя мама?
                                      Ответить
                                      • cleaned
                                        Ответить
                                        • Видать на помойке не было остроумия
                                          Ответить
                                        • Сема ты сейчас похож на сетора. Прекрати это блядство. Ты же адекватный.
                                          Капча 6662 подтвердит
                                          Ответить
                                          • cleaned
                                            Ответить
                                            • Замкнутый круг бля. Начни с себя. Не страдай хуйней. Ну и все будет. А иначе так и останется.
                                              Ответить
                                            • >и второй акк убили.
                                              Пиздаболище, ведь даже все свои акки на этот сайт ты нашёл на помойке. Жалкий неудачник.
                                              Ответить
                                              • Пидарасина, ты знаешь, что такое анонимность?
                                                Ответить
                                                • Зачем анонимность тому, кто детектируется уже по началу фразы?
                                                  Ответить
                                          • >Сема ты сейчас похож на сетора. Прекрати это блядство. Ты же адекватный.
                                            >>Сема
                                            >>адекватный.
                                            :D
                                            Ответить
                                            • ну это у вас с ним взаимная не приязнь.
                                              Ответить
                                              • Причем тут неприязнь? Его тут полсайта, включая гостей выше, на хуях катают за тупость.

                                                Наоборот весело смотреть как сумасшедший за тобой бегает, разнюхивает твоё говно, роется в твоём мусоре.
                                                Ответить
                                                • cleaned
                                                  Ответить
                                                  • Сёма, смотри как я тебя хорошо выдрессировал и двух минут не прошло, а ты уже под моим комментом виляешь хвостом, выпрашивая очередную виртуальную защёчину.

                                                    >>Наоборот весело смотреть как сумасшедший за тобой бегает
                                                    Ответить
                                                • Опять про этот мусор! Ну чёрт, ну нормальные люди тоже хотят на свалочки и что-то там полезное находят. Вам, москалям, не понять, а у нас в Сибири все, кроме Кегдана ходят (а Кегдан как раз выбрасывает, чтобы у нас ассортимент был достаточно широкий).
                                                  Ответить
                                                  • Я студент. Я не выбрасываю старые вещи. Я их ем (
                                                    Ответить
                                                • cleaned
                                                  Ответить
                                            • cleaned
                                              Ответить
                          • Я сам не застал. но мне рассказывали что был период когда ловили пиратов по ВУЗам.
                            Поэтому все перешли на ОпенСоурс. аникейщики ставили линуксы, писали BolgenOS ы.
                            У меня подружака есть она рассказывала ужасы про сборку приложений C# под моно. потому как Windows нельзя. Студию нельзя. А можно было только Eclipse кусочек, и чего то там глоток.
                            А всякие работы и курсовые не кто не отменял.
                            Ответить
                            • почему не пересесть на жабэ?
                              Ответить
                            • > потому как Windows нельзя
                              а мне как раз казалось, что микросовт сам приплачивает вузам, чтобы готовили строго в его приложения, средах и осях
                              насаживали на крючок с малолетства
                              чтобы выпускаешь ты специалиста, а он только в студии и может
                              Ответить
                              • У нас на кафедре программирования по курсу "Ява, введение в програмирование" автоматическая система сдачи-приемки лаб принимает только файлы DOC, DOCX, XLS.
                                Ответить
                                • > автоматическая система сдачи-приемки лаб принимает только файлы DOC, DOCX, XLS.

                                  Которые можно сгенерить жабой в линуксе библиотекой Apache.POI
                                  Ответить
                                • > автоматическая система сдачи-приемки лаб
                                  Искусственный интеллект, способный понять и проверить пояснительную записку к лабе?
                                  Ответить
                                  • понять и простить
                                    имхо там несколько тест-кейсов натравливается
                                    если тесты прошёл, то лабу сдал
                                    Ответить
                                    • Но... Но... Но как оно извлекает исходник лабы из doc и, прости господи, xls?
                                      Ответить
                                    • Лол, тест-кейсы, большинство кода, который я там видел вообще не скомпилируетса. В большинстве случаев там просто скобки неправильно расставлены.
                                      Студенты, которые думают, что так и надо (а таких большинство), набирают код в ворде, и никогда его не запускают. Преподаватель потом читает этот код и ставит оценку. Для того чтобы поставить оценку не нужно же код запускать.
                                      У меня два года назад там вышла эпопея: я пытался получить зачет без того, чтобы на лекции ходить (до степени дофигища очков набрать надо, а набирать изучением юдаики или ислама, или правoписания клинописью мне как-то совсем не хочется). И вобщем, решил я все лабы сдать за один раз - просто отправил по почте tar.gz. Препод взбеленился, и сказал, что не будет файл открывать. Я перепаковал в зип, но в папке с каждой лабой были мейк-файл, сконс и Ант билд скрипты, ну мало ли. И тут препод взбеленился: зачем мне посылаешь какие-то файлы, я только Яву хотел. Я удалил билд скрипты, послал еще раз, и тут преопод взбеленился: почему файлы лежат не в корневоm каталоге. Ну у меня уже накипело, я дал ему почитать ссылку на Оракловские "лучшие практики", и пожаловался на кафедру. На кафедре мне сказали, что это продвинутый преподаватель, и что я вообще должен быть благодарен, что он принимает лабы не через универскую систему. И что, если я хочу пересдать, то я могу отправить МС Ворд файлы бабушке, которая их проверяет.

                                      В итоге плюнул, и так и остался без шарового зачета.
                                      Ответить
                                      • Идиотизм. Как в армии - "мне не надо, что бы ты сделал, мне надо, что бы ты заебался"
                                        Ответить
                                      • cleaned
                                        Ответить
                                      • > Препод взбеленился (x3)
                                        Жаль, что только плюсиком и словом могу пособолезновать.
                                        Мне тут дали посмотреть на придирки к лабам от одного препода на 1 курсе. Он прикапывается к тому, что хедер-гарды #ifndef HEADER_H #define HEADER_H #endif - "устаревший способ" и его нужно заменить на #pragma pack, и вообще, в начале заголовочника нужно написать "using namespace std;". Ну, и остальные придирки в стиле "не знаешь, к чему придраться - придерись к орфографии". Если он тут обитает, передаю пламенный привет.
                                        Ответить
                                        • инклюд гарды это хуйня

                                          в моих уютных объективных сишечках есть директива #import

                                          становись яблодрочером, как я, и сила будет на твоей стороне
                                          Ответить
                                • Это в израиловке?
                                  Ответить
                              • Так и есть. но в этот отдельно взятый период как раз все перешли на OpenSource ибо проверки. А типа у них препод повелитель решёток. Есть только один язык!!!! остальные говно. Вот они под моно все делали.
                                Лично у меня все это вызывало только боль за Российское образование.
                                Ответить
                            • > был период когда ловили пиратов по ВУЗам
                              Тоже помню. У нас тогда старые компы в полудохлой сетке заменили на быстрый свитч и ровные стойки крепких красавчиков с твердыми баграми с лицензионной мсвц2010 (upd: мсвц ультимате) на борту.
                              И никого туда не пускали.
                              Ответить
                              • cleaned
                                Ответить
                                • Лет шесть назад, не самый престижный московский вуз.
                                  Заниматься ходили в соседнюю комнату, куда перенесли старьё, чуток его почистив физически (или в ходе переноски самые крупные хлопья пыли отвалились) и программно. Ну, как там обычно вычищают авгиевы конюшни - хрюшу снесли, хрюшу поставили.
                                  Ответить
                            • ну давай, расскажи как хорошо у нее WindowsForms работали на моно
                              Ответить
      • Дедушка Ритчи в гробу переворачивается
        Ответить

    Добавить комментарий