
-
Лучший говнокод
- В номинации:
-
- Лучший рейтинг
- Самый комментируемый
- За время:
-
- за сегодня
- за неделю
- за месяц
- за всё время
-
C# / Говнокод #6700
+111
просто гет
Комментарии (89) -
Assembler / Говнокод #6475
+212
- 1
- 2
- 3
sub eax, edx test eax, eax jl +$04
dcc32
Нафига вторая строчка?Комментарии (89) -
1C / Говнокод #3630
−133
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
Отбор = РегистрыСведений.БазыКонтрагентов.СрезПоследних(Дата,новый Структура("Производитель",Контрагент)); Если Отбор.Количество()>0 Тогда Для каждого ТекТМ из Отбор Цикл Элемент.списокВыбора.Очистить(); Для каждого ТекТМ из Отбор Цикл Элемент.списокВыбора.ДОбавить(ТекТМ.ТорговаяМарка,ТекТМ.ТорговаяМарка); КонецЦикла; КонецЦикла; КонецЕсли;
Сложно сказать что хотел сделать этим автор :)
Может добавить последнюю строку из отбора? :DКомментарии (89) -
PHP / Говнокод #18
+163.9
- 1
- 2
- 3
- 4
- 5
if ( $condition ) a = 6; a = 10;
Подозвал меня прогер и спросил: "а почему у меня a всегда равно 10, даже если условие выполняется? ((("
Комментарии (89) -
Куча / Говнокод #27936
+3
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
- 69
- 70
- 71
- 72
- 73
- 74
- 75
- 76
- 77
- 78
#!/usr/bin/env escript -mode(compile). main(["-p"|Filenames]) -> put(pretend, true), main(Filenames); main(Filenames) -> case get(pretend) of true -> ok; _ -> put(pretend, false) end, Albums = lists:filtermap(fun parse_name/1, Filenames), lists:foreach(fun process_album/1, Albums). process_album({Zip, Artist, Album}) -> Dir = filename:absname(filename:join(Artist, Album)), case filelib:wildcard(Dir ++ "/cover.*") of [] -> io:format("Will create ~p~n", [Dir]), get(pretend) orelse do_process_album(Dir, Zip, Album); _ -> io:format("Ignoring ~p : ~p~n", [Artist, Album]) end. do_process_album(Dir, Zip, Album) -> ok = filelib:ensure_dir(Dir ++ "/fake"), 0 = exec(Dir, "/usr/bin/unzip", [Zip, "-d", Dir]), postprocess(Album, Dir). postprocess(Album, Dir) -> Files = filelib:wildcard(Dir ++ "/*-*[0-9]*.flac"), lists:foreach(fun(I) -> rename_flac(Album, I) end, Files). rename_flac(Album, OldFile) -> Dir = filename:dirname(OldFile), OldName = filename:basename(OldFile), Options = [{capture, all_but_first, list}], {ok, RE} = re:compile(Album ++ " - ([0-9]+.*\\.flac)", [unicode]), case re:run(OldName, RE, Options) of {match, [NewName]} -> io:format("New name: ~p~n", [NewName]), NewFile = filename:join(Dir, NewName), ok = file:rename(OldFile, NewFile); nomatch -> ok end. parse_name(Filename) -> Opts = [{capture, ['band', album], list}], case re:run(filename:basename(Filename), "(?<band>[^-]+) - (?<album>.*)\\.zip", Opts) of {match, [Band, Album]} -> {true, {filename:absname(Filename), Band, Album}}; nomatch -> false end. -spec exec(file:filename(), file:filename(), [string() | binary()]) -> integer(). exec(Dir, CMD, Args) -> Port = open_port( {spawn_executable, CMD} , [ exit_status , binary , stderr_to_stdout , {args, Args} , {cd, Dir} , {line, 300} ] ), collect_port_output(Port, filename:basename(CMD)). -spec collect_port_output(port(), string()) -> integer(). collect_port_output(Port, CMD) -> receive {Port, {data, {_, Data}}} -> io:format("~s: ~s~n", [CMD, Data]), collect_port_output(Port, CMD); {Port, {exit_status, ExitStatus}} -> ExitStatus end.
Комментарии (88) -
Куча / Говнокод #27633
+2
- 001
- 002
- 003
- 004
- 005
- 006
- 007
- 008
- 009
- 010
- 011
- 012
- 013
- 014
- 015
- 016
- 017
- 018
- 019
- 020
- 021
- 022
- 023
- 024
- 025
- 026
- 027
- 028
- 029
- 030
- 031
- 032
- 033
- 034
- 035
- 036
- 037
- 038
- 039
- 040
- 041
- 042
- 043
- 044
- 045
- 046
- 047
- 048
- 049
- 050
- 051
- 052
- 053
- 054
- 055
- 056
- 057
- 058
- 059
- 060
- 061
- 062
- 063
- 064
- 065
- 066
- 067
- 068
- 069
- 070
- 071
- 072
- 073
- 074
- 075
- 076
- 077
- 078
- 079
- 080
- 081
- 082
- 083
- 084
- 085
- 086
- 087
- 088
- 089
- 090
- 091
- 092
- 093
- 094
- 095
- 096
- 097
- 098
- 099
- 100
// https://wandbox.org/permlink/rAilQ54oYBNsHJ3W struct blob_p(T,alias t_xmalloc,alias t_free) { blob!(T)* bl_p; size_t getlen ( ) @trusted in { assert(bl_p != null); } do { return bl_p.len; } T* getdata ( ) @trusted in { assert(this.bl_p != null); } do { return cast(T*)bl_p.data; } static bool cmp ( typeof(this) a, typeof(this) b ) @trusted in { assert(a.bl_p != null); assert(b.bl_p != null); } do { if (a.bl_p.len != b.bl_p.len) { return false; } if(memcmp(cast(void*)a.bl_p.data, cast(void*)b.bl_p.data, a.bl_p.len * T.sizeof) != 0) { return false; } return true; } bool cmp ( typeof(this) a ) @trusted in { assert(a.bl_p != null); assert(this.bl_p != null); } do { if (a.bl_p.len != this.bl_p.len) { return false; } if(memcmp(cast(void*)a.bl_p.data, cast(void*)bl_p.data, a.bl_p.len * T.sizeof) != 0) { return false; } return true; } T opIndex(size_t i) in { assert(bl_p != null); assert(bl_p.len > i); } do { return getdata()[i]; } ~this() /*in { assert (cast(void*)bl_p != null); } do*/ { t_free(cast(void*)bl_p); }
Попробовал написать на "D" своего рода "массив" с известно каким размером
Комментарии (88) -
C++ / Говнокод #27621
+4
- 1
- 2
- 3
- 4
- 5
- 6
struct Foo { }; struct Bar { int x[0]; };
https://ideone.com/upuoOg
Какая консистентность )))Комментарии (88) -
Perl / Говнокод #26798
0
- 1
- 2
- 3
- 4
- 5
# The API methods die when an error occurs. say $api->getMe->{result}{username}; # ... but error handling is available as well. my $result = eval { $api->getMe } or die 'Got error message: ', $api->parse_error->{msg};
https://metacpan.org/pod/WWW::Telegram::BotAPI
Продолжаем пиздеть про перл.
Решил выбрать предметную область "Телеграм-бот" чтобы поднатаскаться в «Perl».
Вопрос: что за говно в оп-коде? Это говноспособ обработки ошибок предлагают, или такое распространено? Типа eval вместо try?Комментарии (88) -
PHP / Говнокод #26066
−2
- 1
Пидарашки, приведите реальный пример говнокода.
Комментарии (88) -
Go / Говнокод #25839
−2
- 1
TOCTOU race condition in Docker allows root access to the filesystem of the host platform.[4]
Комментарии (88)