1. Лучший говнокод

    В номинации:
    За время:
  2. Куча / Говнокод #5698

    +123

    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
    Мир Вам,
    
    ВНИМАНИЕ: это автоматическое уведомление. Игнорирование этого уведомления может привести к остановке Вашего эккаунта.
    
    Вам подвластный эккаунт li*** (***.com.ua) сверхнормативно использует серверные ресурсы Вашего сервера.
    Эккаунт интенсивно использует ресурсы MySQL.
    Количество запросов от Вашего эккаунта сильно превышает разрешённое в Вашем тарифном плане (G1).
    
    У нас 2х уровневая система лимитов: эккаунт может использовать не только базовое кол-во запросов из своего хостинг-плана, но также и пиковое - для покрытия своих случайных высоких потребностей.
    На текущий момент Ваш эккаунт по потреблению превышает оба эти показателя.
    Ваш лимит - 400 MySQL запросов в минуту и он основательно превышен.
    Количество превышений за вчера составило: 160.
    В пике эккаунт вызывал запросов: 1660.
    
    Т.е. эккаунт уже превышает и уже подлежит немедленной остановке.
    
    Мы даём Вам дополнительное время - пожалуйста, в течении 2х дней (включая сегодня) кардинально снизьте активность данного Вашего эккаунта, чтобы он вернулся в рамки Вашего хостинг-плана.
    Если же такое невозможно либо такая активность есть запланированной, пожалуйста, смените свой хостинг-план на такой, в котором возможно такое использование ресурсов.
    У нас хорошая тарифная линейка, с различными лимитами - обычно достаточно просто сменить план на следующий план в своей линейке и последить за уведомлениями.
    
    Пожалуйста, отметьте: если после этого периода превышения будут наблюдаться, то возможна остановка Вашего эккаунта.
    
    Посмотреть лимиты по хостинг-планам можно у нас на сайте, из раздела описания хостинг-плана, секция "Подробнее о возможностях и параметрах cPanel/хостинга".
    Посмотреть детальную статистику использования ресурсов по своему эккаунту можно из раздела: ПРК - Хостинг - параметры - статистика.
    
    Пожалуйста, отнеситесь к вопросу серьёзно, как и мы относимся серьёзно к планированию равномерной загрузки серверов - ведь каждый из клиентов хочет стабильной и бесперебойной работы.
    Спасибо за то, что Вы сами добросовестно пользуетесь нашими услугами, а также даёте пользоваться и Вашим соседям по серверу!
    
    
    ВНИМАНИЕ: пожалуйста, свой ответ размещайте в запросе, ответ письмом не будет прочитан.
    
    
    
    Если у Вас возникли вопросы, будем рады на них ответить.
    -----
    С уважением,
    Сервис DOMEN.com.ua
    http://domen.com.ua

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

    alex322, 16 Февраля 2011

    Комментарии (37)
  3. C# / Говнокод #5683

    +113

    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
    using System;
    using System.Collections.Generic;
    using System.Linq;
    using System.Text;
    
    namespace ConsoleApplication1
    {
        class Program
        {
            static void Main(string[] args)
            {
    
                string[] exit_program = { "1", "2", "3", "4", "5", "6" };
                bool flag = true;
                while(flag)
                {
                    Console.WriteLine("Введите команду");
                    string ss = Console.ReadLine();
    
                    for (int i = 0; i < exit_program.Length&&flag;i++)
                    {
                        
                        if (ss == exit_program[i])
                        {
                            Console.WriteLine("Вы ввели {0} и теперь можете выйти из цикла",ss);
                            flag = false;
                            break;
                        }
                                  
                    }
                    
                    
    
                   
                }
    
                Console.ReadLine();
              
            }
        }
    }

    Говнокод, позволяющий выйти из консольного приложение по нажатию цифр 1,2....6

    user12, 15 Февраля 2011

    Комментарии (37)
  4. Си / Говнокод #5561

    +129

    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
    #include <intrin.h>
    #include <stdarg.h>
    #include <stdio.h>
    int func()
    {
    va_list vl;
    int i;
    int arg,Z=1;
    va_start(vl,*(int *)_AddressOfReturnAddress());
    for(i=0;i<5;i++)
        {
             arg=va_arg(vl,int);    
             Z=arg*Z;
        }
     return(Z);
    }
    
    int main(void)
    {
    printf("%d",func(1,2,3,4,5));
    getchar();
    return 0;
    }

    гуру-вычисление факториала пяти одного красавчика с форума wasm.ru... был выведен, как пример функции с переменным числом параметров без единого явного параметра... грязный хак с адресом возврата на стеке - моя идея)))

    ReL, 07 Февраля 2011

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

    +113

    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
    let rnd = System.Random()
     
    // создаём строку, содержащую 10 случайных чисел, разделённых пробелами
    let sourceString = System.String.Join (" ", [1..10] |> List.map (fun x -> rnd.Next(1, 10).ToString()))
     
    // функция, удаляющая повторяющиеся числа из строки
    let removeDuplicate str =
        // разбиваем строку на отдельные числа
        let sourceList = sourceString.Split ([|' '|]) |> Array.toList |> List.map (fun x -> System.Int32.Parse (x))
        
        // список, в который будем ложить неповторяющиеся элементы
        let newList = ref []
     
        // проходим по всем элементам исходного списка
        List.iter
            (fun x -> 
                // если элемента в новом списке ещё нет, кладём его туда
                if (List.exists (fun y -> y = x) !newList) = false 
                then (newList := List.append !newList [x]))
            sourceList
     
        // получаем строку из списка с неповторяющимися элементами
        System.String.Join (" ", !newList |> List.map (fun x -> x.ToString()))
     
    // получаем новую строку
    let resultString = removeDuplicate sourceString
     
    // выводим старую и новую строку
    printfn "%s" sourceString
    printfn "%s" resultString

    qbasic, 01 Января 2011

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

    +122

    1. 1
    2. 2
    3. 3
    int valu=...;
    ...
    string vals=""+valu;

    Говногость, 28 Декабря 2010

    Комментарии (37)
  7. PHP / Говнокод #4990

    +178

    1. 1
    @echo "<center>Страница сгенерина за: ".rand(5, 15)." наносекунд. Загрузка процессора 0%.</center>";

    @ - стоит на каждой строчке PHP скрипта.

    Говногость, 20 Декабря 2010

    Комментарии (37)
  8. PHP / Говнокод #4526

    +162

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    function checkmail($mail) 
        {
            $mail = trim($mail);
            if ((strlen($mail) == 0) OR (!preg_match('/^[a-z0-9_-]{1,20}+(\.){0,2}+([a-z0-9_-]){0,5}@(([a-z0-9-]+\.)+(com|net|org|mil|edu|gov|arpa|info|biz|inc|name|[a-z]{2})|[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3})$/is', $mail))) {
                return false;
            } 
            return true;
        }

    валидация e-mail

    rtfm, 03 Ноября 2010

    Комментарии (37)
  9. C++ / Говнокод #3835

    +148

    1. 1
    Block *** Cells;

    Лаконичная семантика C++.
    Глядишь на код -- и всё понятно: Cells - это указатель массива указателей на массивы указателей объектов класса Block.
    А устно с первого раза хрен выговоришь.

    maniac, 30 Июля 2010

    Комментарии (37)
  10. C++ / Говнокод #3517

    +167

    1. 1
    2. 2
    3. 3
    void AfterWorks(const int& WorkID)
    {
      assert(&WorkID!=nullptr);

    Говногость, 20 Июня 2010

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

    +85

    1. 001
    2. 002
    3. 003
    4. 004
    5. 005
    6. 006
    7. 007
    8. 008
    9. 009
    10. 010
    11. 011
    12. 012
    13. 013
    14. 014
    15. 015
    16. 016
    17. 017
    18. 018
    19. 019
    20. 020
    21. 021
    22. 022
    23. 023
    24. 024
    25. 025
    26. 026
    27. 027
    28. 028
    29. 029
    30. 030
    31. 031
    32. 032
    33. 033
    34. 034
    35. 035
    36. 036
    37. 037
    38. 038
    39. 039
    40. 040
    41. 041
    42. 042
    43. 043
    44. 044
    45. 045
    46. 046
    47. 047
    48. 048
    49. 049
    50. 050
    51. 051
    52. 052
    53. 053
    54. 054
    55. 055
    56. 056
    57. 057
    58. 058
    59. 059
    60. 060
    61. 061
    62. 062
    63. 063
    64. 064
    65. 065
    66. 066
    67. 067
    68. 068
    69. 069
    70. 070
    71. 071
    72. 072
    73. 073
    74. 074
    75. 075
    76. 076
    77. 077
    78. 078
    79. 079
    80. 080
    81. 081
    82. 082
    83. 083
    84. 084
    85. 085
    86. 086
    87. 087
    88. 088
    89. 089
    90. 090
    91. 091
    92. 092
    93. 093
    94. 094
    95. 095
    96. 096
    97. 097
    98. 098
    99. 099
    100. 100
    program Project2;
    
    {$APPTYPE CONSOLE}
    
    {#1.Ввести последовательность натуральных чисел. Если в последовательности есть
    простые числа, упорядочить последовательность по неубыванию суммы цифр.
    В противном случае удалить из последовательности числа с нечетным количеством
    цифр и продублировать 4-хзначные числа. Последовательность хранить в
    односвязном списке. Перед завершением программы очистить динамическую память с
    помощью процедуры Dispose.}
    
    uses
      SysUtils;
    
    type
      adres=^Element;
      element=
               RECORD
      body:integer; next:adres; end;
    
    Var n,i:integer;
        dub,nov,t,first,p,p0:adres;
        pred:adres;
        a:integer;
        pr:boolean;
    
    
        function sum(a:integer):integer;
        var i,s:integer;
        begin
        s:=0;
        while a<>0 do begin
        inc(s,a mod 10);
        a:=a div 10;
        end;
        sum:=s;
        end;
    
    
    
     function prostoe(a:integer):boolean;
     var i:integer;
     p:boolean;
     begin
     a:=abs(a);
     p:=true;
     for i:=2 to trunc(sqrt(a)) do
     if a mod i=0 then begin p:=false; break;  end;
     prostoe:=p;
     if a=1 then prostoe:=false;
     end;
    
    
    
    BEGIN
     pr:=false;
     reset(input,'input.txt');
     rewrite(output,'output.txt');
     first:=NIL;
     while not seekeof do begin
     read(a);
     new(p);
     p^.body:=a;
     if first=nil then first:=p else p0^.next:=p;
     p0:=p;
     end;
    
     p:=first;
     while p<>nil do begin
     if prostoe(p^.body)  then pr:=true;
     p:=p^.next;
     end;
    
    if not pr then begin
      p:=first;
    if (length(inttostr(p.body)) mod 2<>0) then first:=p.next;
      p:=first;
    while p<>nil do
    begin
    if (p.next <> nil) and (length(inttostr(p.next^.body)) mod 2<>0) then
    begin
    T:=p.next;
    p.next:=T.next;
    Dispose(T);
    end
    else p:=p.next;
    end;
    
    
      p:=first;
    while p<>nil do
    begin
    if (p <> nil) and (length(inttostr(p.body))=4) then
          begin
            new(dub);
            dub.body:=p.body;
            dub.next:=p.next;
            p.next:=dub;
    p:=p.next.next;
          end

    basic, 14 Июня 2010

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