1. Куча / Говнокод #28231

    0

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    Как прекрасно быть Крысой!.. Я вывел целый список преимуществ.
    
    1. Можно бегать по коммуникациям, погрызая туннели и пользоваться  Ethernet бесплатно и анонимно.
    2. Можно смачно поссать оппоненту в ебло - и это не будет нарушением прав или оскорблением.
    3. В крысьих стаях жесточайшая иерархия - быдла и праздношатов там нет, от слова вообще.
    4. Крысы - телепаты и обладают даром предвидца.
    5. Корма - завались; никаких талонов на еду. Ну, а если прижало, то...  можно пожевать свою какашечку.
    
    Есть лишь один нюанс, жить придется лишь от силы годик... --------------
    Но даже это преимущество: не успеешь пресытиться жизнью.

    Как там пел Малежик? "Головешкой тлеть всю жизнь - дикая тоска"

    KPblCA, 20 Июня 2022

    Комментарии (0)
  2. C++ / Говнокод #28228

    0

    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
    typedef struct {
    
        std::shared_ptr<char*>my_arr;
    
    }MyInputs;
    
    ...
    
    std::shared_ptr<MyInputs> MainDoc (static_cast<MyInputs*>(malloc(sizeof (*MainDoc))),free); 
    
    std::shared_ptr<char*> Z (static_cast<char**>(malloc(sizeof (**MainDoc->my_arr) * 10)),free); 
    std::shared_ptr<char> Z[0](static_cast<char*>(malloc(sizeof (char *) * 10)),free); 
    memcpy(Z[0].get(), (char*)"salut\0", 6);
    
    cout << Z[0] << endl;
    
    ...

    https://stackoverflow.com/questions/27201555/c-array-of-shared-ptr

    kcalbCube, 19 Июня 2022

    Комментарии (2)
  3. JavaScript / Говнокод #28225

    −4

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    function main()
    {
        const iterable = function* () { yield* [1,2,3]; }();
    
        for (const v of iterable)
            print("v =", v);
    }

    я вам говнокод принес. только нахрена я сам не знаю... https://godbolt.org/#z:OYLghAFBqd5QCxAYwPYBMCmBRdBLAF1QCcAaP ECAMzwBtMA7AQwFtMQByARg9KtQYEAysib0QXAGx 8BBAKoBnTAAUAHpwAMvAFYTStJg1AEAngAdMC5MT xmCpJfWQE8Ayo3QBhVLQCuLBhAAJlIPABk8BkwAO X8AI0xiEAB2UjNUBUJXBm8/AOC0jKyBCKjYlgSk1MdMZ2yhAiZiAlz/QJCauoEGpoJSmPjElIdG5tb8jtG%2ByIGKoeSASg dUX2Jkdg4qXwYuhgBqFiZIiAWAUg0AQVPkgCFzi7 3HvbQGBQI9wkSmOPo904BmAAiey2OxcAgAVHsAPo nP63PYmPCYWjoKGnACsNy4pBC/0xgIBN3hgJORPu9yeIJIewgLzeewAbntUFQPgQvj 9MGdLlSqWYbIIIKcgkFmQDCaLSEyzv87pdroCOEt aJwMbxAhwtKRUJwACrmTAiGx2PbRJguRmYPYKFZr a0i/48UgETTKpYAa2CGIAdEEABxBf7%2BgCcABYuAGuP 8QyH9Jwwxq3TrOLwFCANC63Us4LAkHgyBQ6agWGY 6IlzWx9YbjbZ3ubLdbvKXy8Q9hofR2BZggho9gAp ACSetpAHFPAteJh8EQbOg9PxBCIxOwuGGZIJFCp1 FqdHpOuDAhAPONAjjwjNypU9OlMofTzeiof%2Ble hjiD/Upg/3yjaoees0L6DEk75fj4bT7lMQFzCBSwEMQmCYHg8 7cMq8YcOqpCatquocGEYQAGoALJ7IOABKewEciAD uiR7AaFi1qaDZ4FaezNmW9Bth2XYIb2A7DmOE60r ghA0o6OLsSWnF0RJk5ZruCxLAgmBMFgSQnKQXoRj 6saxhi/wYmuGhBBiQboYmWHJrhaYZgpWg5jAUBORASCYKot S%2BLO5CUE0wAKMohgokICCoNRmrOmgLYGIegVRL QIVhdhvBRTJSQEFY0IaFl0K9tCwDIKQqWtgA8l5i Xhcm7m1BcxD%2BamoQecgDT4JqvCLsIojiGuG7yE oajJroOIGEYICmBYVgmvYtB4HE6aQEsqB2Nk6YcG mdrrJBrVxcFoWVahLoIRszrUcQTBmJwPAqmqSa7i mHDYE1Xk0gxRrWHWZoWqxTbSa27adj63b8UOI4QO OCy0q9TH1l9VrSqJs5/EGXDya6imeiA/xBD6yRcMkkgYskGjJE6kjE3GqocJZLApBiVl3TZD h2WjDmkLmiAoL9XE%2BcW0VDBlyA5dleUFXwdAcs Q6YQHEyZxJETQmJdKUlmwgglQwtCK3dWCHEY4jaw Wf7fat2rVcgXnHbwkQcpT2ozXEZ3ECY3hYErh14D TqFLFQBj%2BVRmDUSVFgRe1sjLt164dVuA13UN%2 BiGMYhqTXW%2BizfNmlLYeq1pr%2BuzuAwXjgfk5 4F9B144rexQ5EXZ6FHe2Rl2%2BDi5/%2BYF5LXH7dFBl7AZBvTfiMvSN7ByyrJtOLwYhSv XRht04dWjHvcxsM/Xz3EA0DfYg0JEMQFDS8w428MzuJyPShxf1ybwLPu qQKlqUMmmU9T3r0/Pa1M5mN9KVpmPY7j%2BNCbE1JuTdC/w568EZt/GeQQIH3WvtmJYVpJbZBAGGIAA%3D%3D%3D

    ASD_77, 16 Июня 2022

    Комментарии (8)
  4. SQL / Говнокод #28223

    −1

    1. 1
    Доброго дня!

    Никогда не писал для баз данных, да судьба-злодейка заставила.
    Кто бы помог разобраться, м?

    Имеется таблица-справочник, с несколькими колонками. Как я могу прочитать строки из нее, как в ListView?
    Имеется код

    SELECT
    PAT.PATID,
    PAT.PATFIRSTNAME,
    PAT.PATMIDDLENAME,
    PAT.PATLASTNAME,
    PAT.PATBIRTHDATE,
    PAT.PATSEX,
    PAT.PATIDDOC,
    PAT.PATIDDOCSERIES,
    PAT.PATIDDOCNUMBER,
    PAT.PATADDRESSFACT,
    PAT.PATADDRESSFROMDOC,
    PAT.PATPHONENUM,
    PAT.PATPHOTO
    FROM
    PATLIST PAT


    но хз, правильный ли он... и хз как обращаться к элементам полей. я имею только список полей.
    Остались ли среди нас сикулянты, кодящие на Delphi+FIBPLUS?

    без этого говнеца на работу не примут. ох, горе-то какое.

    TPOJlJlb, 15 Июня 2022

    Комментарии (6)
  5. C++ / Говнокод #28222

    0

    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
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    #include <clcpp/clcpp.h>
    #include <clcpp/FunctionCall.h>
    
    
    // Reflect the entire namespace and implement each class
    clcpp_reflect(TestClassImpl)
    namespace TestClassImpl
    {
    	class A
    	{
    	public:
    		A()
    		{
    			x = 1;
    			y = 2;
    			z = 3;
    		}
    
    		int x, y, z;
    	};
    
    	struct B
    	{
    		B()
    		{
    			a = 1.5f;
    			b = 2.5f;
    			c = 3.5f;
    		}
    
    		float a, b, c;
    	};
    }
    
    clcpp_impl_class(TestClassImpl::A)
    clcpp_impl_class(TestClassImpl::B)
    
    void TestConstructorDestructor(clcpp::Database& db)
    {
    	const clcpp::Class* ca = clcpp::GetType<TestClassImpl::A>()->AsClass();
    	const clcpp::Class* cb = clcpp::GetType<TestClassImpl::B>()->AsClass();
    
    	TestClassImpl::A* a = (TestClassImpl::A*)new char[sizeof(TestClassImpl::A)];
    	TestClassImpl::B* b = (TestClassImpl::B*)new char[sizeof(TestClassImpl::B)];
    
    	CallFunction(ca->constructor, a);
    	CallFunction(cb->constructor, b);
    
    	CallFunction(ca->destructor, a);
    	CallFunction(cb->destructor, b);
    
    	delete [] (char*) a;
    	delete [] (char*) b;
    }

    https://github.com/Celtoys/clReflect/blob/master/src/clReflectTest/TestClassImpl.cpp

    kcalbCube, 14 Июня 2022

    Комментарии (11)
  6. Pascal / Говнокод #28215

    0

    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
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    // реализация интерфейса IArguments2 для самодельного скриптового движка, aka vbs to exe
    
    unit Arguments;
    
    interface
    
    uses
      Windows, ComObj, ActiveX, Stub_TLB, SysUtils,WSHNamedArguments,WSHUnNamedArguments, CmdUtils;
    
    type
      TIarguments=class(TAutoObject, IArguments2, IEnumVariant)
          FAArgs:array of WideString;
          FWSHNamedArguments:TIWSHNamedArguments;
          FWSHUnNamedArguments:TIWSHUnNamedArguments;
          function Item(Index: Integer): WideString; safecall;
        function Count: Integer; safecall;
        function Get_length: Integer; safecall;
        function _NewEnum: IUnknown; safecall;
        property length: Integer read Get_length;
            function Get_Named: IWSHNamedArguments; safecall;
        function Get_Unnamed: IWSHUnnamedArguments; safecall;
        procedure ShowUsage; safecall;
        property Named: IWSHNamedArguments read Get_Named;
        property Unnamed: IWSHUnnamedArguments read Get_Unnamed;
            function Next(celt: LongWord; var rgvar : OleVariant;
          out pceltFetched: LongWord): HResult; stdcall;
        function Skip(celt: LongWord): HResult; stdcall;
        function Reset: HResult; stdcall;
        function Clone(out Enum: IEnumVariant): HResult; stdcall;
        public
        constructor Create;
        end;

    implementation

    uses ComServ;

    var
    FIndex:Integer=0;

    { TIarguments }

    function TIarguments._NewEnum: IUnknown;
    begin
    Result:=self;
    end;

    function TIarguments.Count: Integer;
    begin
    Result:=System.Length(FAArgs);
    end;

    function TIarguments.Get_length: Integer;
    begin
    Result:=Count;
    end;

    function TIarguments.Item(Index: Integer): WideString;
    begin
    if (Index >= System.Length(FAArgs)) then
    raise EOleSysError.Create('Range check error', HRESULT($800A0009),0)
    else
    Result:=FAArgs[Index]
    end;

    function TIarguments.Get_Named: IWSHNamedArguments;
    begin
    Result:=FWSHNamedArguments;
    end;

    function TIarguments.Get_Unnamed: IWSHUnnamedArguments;
    begin
    Result:=FWSHUnNamedArguments;
    end;

    procedure TIarguments.ShowUsage;
    begin
    OleError(E_NOTIMPL);
    end;

    constructor TIarguments.Create;
    var
    I,J, PCnt:Integer;
    S, CmdLine:string;
    begin
    inherited Create;
    FIndex:=0;
    FWSHNamedArguments:=TIWSHNamedArguments.Create;
    FWSHUnNamedArguments:=TIWSHUnNamedArguments.Create;
    PCnt:=ParamCount;
    SetLength(FAArgs, PCnt);
    for I:=1 to PCnt do
    begin
    J:=I-1;
    FAArgs[J]:=ParamStr(I);
    end;

    //Parsing named args.

    CmdLine:='';
    S:=GetCommandLine;
    PCnt:=iParamCount(PChar(S));
    if PCnt > 1 then
    begin
    for I:=1 to PCnt-1 do
    begin
    CmdLine:=CmdLine+iParamStr(PChar(S), I);
    if I < PCnt-1 then
    CmdLine:=CmdLine+' ';
    end;
    end;

    Support, 09 Июня 2022

    Комментарии (6)
  7. C++ / Говнокод #28214

    −1

    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
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    /**
     * @throw   std::system_error 
     */
    auto udp_echo_service(int64_t sd) -> no_return_t {
        sockaddr_in remote{};
        io_work_t work{};
        io_buffer_t buf{};              // memory view to the 'storage'
        io_buffer_reserved_t storage{}; // each coroutine frame contains buffer
    
        while (true) {
            // packet length(read)
            auto len = co_await recv_from(sd, remote, buf = storage, work);
            // instead of length check, see the error from the 'io_work_t' object
            if (work.error())
                goto OnError;
    
            buf = {storage.data(), static_cast<size_t>(len)};
            len = co_await send_to(sd, remote, buf, work);
            if (work.error())
                goto OnError;
    
            assert(len == buf.size_bytes());
        }
        co_return;
    OnError:
        // expect ERROR_OPERATION_ABORTED (the socket is closed in this case)
        const auto ec = work.error();
        const auto emsg = system_category().message(ec);
        fputs(emsg.c_str(), stderr);
    }

    https://github.com/luncliff/coroutine/blob/main/test/net_socket_udp_echo.cpp

    kcalbCube, 08 Июня 2022

    Комментарии (9)
  8. Куча / Говнокод #28213

    0

    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
    Как же сильно обмельчали веб-разработчики! Где только их набирают! 
    У этих смазливых уебков в голове - говно, достаточно взглянуть, во что превратился дизайн авито.
    
    Кроме того, есть сайт eias.rospotrebnadzor.ru. Доступ к нему по сертификату; по документам - для безопасности, на деле - чтобы люди не упали в обморок, от созерцания этого убожества.
    Его анонсировали совсем недавно; портал якобы предназначен для автоматизации внесения статистических данных. Работать в нем обязаны сотрудники fcgie.ru и всех подчиненные ведомств России. 
    Работать с ресурсом невозможно, это пыточный инструмент, содержащий недочеты уровня новичка. Исправлять их никто не собирается.
    
    Налицо - типичная отмывка государственных денег. Был заключен контракт с сомнительной конторой и получен полуработоспособный продукт.
    Деньги уплачены - товар получен. Всё остальное - дело третье. Шлюха - Попова с дружками-ворами пилит бюджет и смачно ссыт в ебало подчиненным. 
    Прискорбно, что это не единственный случай отмывки. Видели бы вы, с какими софтами работают сотрудники ведомств!..
    
    Я был вынужден уволиться с очередной работы, ибо нет сил смотреть на это содомию. Работодателю ну никак не докажешь, что это лыжи не едут.
    Как Вы уже заметили, я стал чаще заходить на говнокод, в перерывах между дрочкой и игрой на фортепьяно, которыми я снимаю стресс.

    Денег на пиво нет. Интернет скоро отключат. Питаюсь гречкой.

    Support, 07 Июня 2022

    Комментарии (1)
  9. Куча / Говнокод #28208

    0

    1. 1
    https://www.youtube.com/watch?v=SV6KGNXRUBc

    Это просто пиздец, господа. Пранк юрия Jlo3bl

    Support, 05 Июня 2022

    Комментарии (0)
  10. Куча / Говнокод #28207

    0

    1. 1
    https://youtu.be/AID5HDpVwuI?t=1557

    Another world - финальная сцена

    Support, 05 Июня 2022

    Комментарии (0)