- 1
https://github.com/ruby/ruby/blob/trunk/parse.y-
Лучший говнокод
- В номинации:
-
- Лучший рейтинг
- Самый комментируемый
- За время:
-
- за сегодня
- за неделю
- за месяц
- за всё время
-
Ruby / Говнокод #23360
+1
Как распарсить Руби код.
wvxvw,
25 Сентября 2017
Комментарии (14) -
Куча / Говнокод #23345
+1
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
(* /* C > /) 2> /dev/null & echo hello world!; exit * This file is correct input for: * sh, cc, pc, f77 */ main(program)) { puts("hello world!"); /* *) program main(output);begin writeln('hello world!')end. { write( *, '("hello world!")') end */ return &program; }Bash: https://ideone.com/HKy5RJ
C: https://ideone.com/KFbJsK
Pascal (fpc): https://ideone.com/4zcc51
inkanus-gray,
12 Сентября 2017
Комментарии (42) -
Куча / Говнокод #23344
+1
- 1
- 2
- 3
- 4
- 5
(*a/*/ % #)(PostScript)/Helvetica 40 selectfont 9 400 moveto show%v"f"a0 true showpage quit%#) 2>/dev/null;echo bash;exit #*/);int main()/*>"eb"v %a*0)unless print"perl\n"__END__*/{printf("C\n");/*>>#;"egnu">:#,_@;,,,< *)begin writeln(*\output={\setbox0=\box255}\eject\shipout\hbox{\TeX}\end *)('pascal');end.{*/return 0;}C: https://ideone.com/Ntu3S0
Pascal (fpc): https://ideone.com/A9qZ0x
Bash: https://ideone.com/TYr7cu
Perl: https://ideone.com/fAUhiv inkanus-gray,
12 Сентября 2017
Комментарии (6) -
Куча / Говнокод #23343
+1
- 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
- 79
- 80
- 81
- 82
(*O/*_/ Cu #%* )pop mark/CuG 4 def/# 2 def%%%%@@P[TX---P\P_SXPY!Ex(mx2ex("SX!Ex4P)Ex= CuG #%* *+Ex= CuG #%*------------------------------------------------------------------*+Ex= CuG #%* POLYGLOT - a program in eight languages 15 February 1991 *+Ex= CuG #%* 10th Anniversary Edition 1 December 2001 *+Ex= CuG #%* *+Ex= CuG #%* Written by Kevin Bungard, Peter Lisle, and Chris Tham *+Ex= CuG #%* *+Ex= CuG #%* Polyglot suports the following languages: *+Ex= CuG #%* 1. COBOL (ANSI) *+Ex= CuG #%* 2. Pascal (ISO) *+Ex= CuG #%* 3. Fortran (ANSI, f77) *+Ex= CuG #%* 4. C (ANSI-ish) *+Ex= CuG #%* 5. PostScript *+Ex= CuG #%* 6. Linux/Unix shell script (bash, sh, csh) *+Ex= CuG #%* 7. x86 machine language (MS-DOS, Win32, Linux) *+Ex= CuG #%* 8. Perl (version 5) *+Ex= CuG #%* *+Ex= CuG #%* Usage: *+Ex= CuG #%* 1. Rename this file to polyglot.[cob|pas|f77|c|ps|sh|com|pl] *+Ex= CuG #%* *+Ex= CuG #%* 2. Compile and run with your favorite compiler and operating *+Ex= CuG #%* system. *+Ex= CuG #%* *+Ex= CuG #%* Notes: *+Ex= CuG #%* 1. We have attempted to use only standard language features. *+Ex= CuG #%* *+Ex= CuG #%* 2. Without the -traditional flag gcc will issue a warning. *+Ex= CuG #%* *+Ex= CuG #%* 3. When transferring from Unix to DOS make sure that a LF *+Ex= CuG #%* is correctly translated into a CR/LF. *+Ex= CuG #%* *+Ex= CuG #%* 4. Keep the black lines at the start of the program. They *+Ex= CuG #%* are important. *+Ex= CuG #%* *+Ex= CuG #%* 5. This text is a comment block in all eight languages. *+Ex= CuG #%* *+Ex= CuG #%* Please mail any comments, corrections or additions to *+Ex= CuG #%* [email protected] *+Ex= CuG #%* *+Ex= CuG #%*------------------------------------------------------------------*QuZ= CuG #%* *+Ex= CuG #%*!Mx)ExQX5ZZ5SSP5n*5X!)Ex+ExPQXH,B+ExP[-9A-9B(g?(gA'UTTER_XYZZXX!X *+ CuG #(* *( C # */); /*( C # *) program polyglot (output); (*+ C # identification division. C # program-id. polyglot. C # C # data division. C # procedure division. C # C # * ))cleartomark /Bookman-Demi findfont 36 scalefont setfont ( C # * ( C # C # * hello polyglots$ C # main. C # perform C /# * ) 2>_$$; echo "hello polyglots"; rm _$$; exit; C # * ( C # C *0 ) unless print "hello polyglots\n"; __END__ print C stop run. -*, 'hello polyglots' C C print. C display "hello polyglots". ( C */ int i; /* C */ main () { /* C */ i=printf ("hello polyglots\n"); O= &i; return *O; /* C *) (* C *) begin (* C *) writeln ('hello polyglots'); (* C *) (* ) C * ) pop 60 360 ( C * ) pop moveto (hello polyglots) show ( C * ) pop showpage (( C *) end .(* ) C)pop% program polyglot. *){*/}C: https://ideone.com/LzLeJH
Pascal (gpc): https://ideone.com/J7VAQk
Perl: https://ideone.com/AmODLG
К сожалению, не все языки удалось проверить имеющимися интерпретаторами/компиляторами. inkanus-gray,
12 Сентября 2017
Комментарии (1) -
C++ / Говнокод #23340
+1
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
#ifdef _MSC_VER # if ( _MSC_VER <= 1800) // MSVC 2012 / 2013 typedef std::vector<char>& vector_ref; # else typedef std::vector<char>&& vector_ref; # endif #else typedef std::vector<char>&& vector_ref; #endif auto func = std::bind([this](vector_ref v) { /* ... */ }, std::placeholders::_1);тут говна вагон и маленькая тележка
Во-первых, версии студии, компилятора студии и _MSC_VER всегда разные. Сложно даже представить человека который решил "а давайте распространять компилятор по версии SDK, а проверять по левому числу, не являющемуся ни тем ни другим?"
Во-вторых, поддержка c++11 в msvc 2012/2013 удручает. В 2012 нет даже type aliases, потому и typedef.
В-третьих, кривая реализация bind (rvalue-версия не соберется в студиях 12/13, lvalue - в более поздних).
Antervis,
11 Сентября 2017
Комментарии (12) -
PHP / Говнокод #23317
+1
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
$parent = (new \yii\db\Query()) ->select(['parent','parent_1','parent_2']) ->from('user') ->where(['id' => "$user_id",]) ->all(); $sum_for_parent = (new \yii\db\Query()) ->select(['first_parent']) ->from('referal_control') ->all(); $sum_for_parent = $sum_for_parent[0]['first_parent']; $sum_for_parent_1 = (new \yii\db\Query()) ->select(['second_parent']) ->from('referal_control') ->all(); $sum_for_parent_1 = $sum_for_parent_1[0]['second_parent']; $sum_for_parent_2 = (new \yii\db\Query()) ->select(['third_parent']) ->from('referal_control') ->all(); $sum_for_parent_2 = $sum_for_parent_2[0]['third_parent'];Обращение к одной записи к 3-м полям через три запроса
reddevil,
31 Августа 2017
Комментарии (5) -
PHP / Говнокод #23293
+1
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
<? if(!$_POST){//mpre("Не аякс запрос"); }elseif(!$name = mpquot(get($_POST, 'name'))){mpre("Регистрационное имя не указано"); }elseif(!$pass = get($_POST, 'pass')){mpre("Пароль для регистрации не указан"); }elseif(get($_POST, 'pass') != get($_POST, 'pass2')){mpre("Пароли не совпадают"); }elseif($users = rb("{$conf['db']['prefix']}users","name","[{$name}]")){mpre("Пользователь уже зарегистрирован"); }elseif(!$sess = get($conf, 'user', 'sess')){mpre("Ошибка полученя сессии текущего пользователя"); }elseif(!$mphash = mphash($name, $pass)){mpre("Ошибка генерации пароля"); }elseif(!$users = fk("{$conf['db']['prefix']}users", $w = array("name"=>$name), $w += array("type_id"=>1, "pass"=>$mphash, "reg_time"=>time(), "last_time"=>time(), "email"=>get($_POST, 'email'), "ref"=>get($conf, 'user', 'sess', 'ref'), "refer"=>get($conf, 'user', 'sess', 'refer')))){mpre("Ошибка регистрации пользователя"); }elseif(!$grp = get($conf, 'settings', 'user_grp')){mpre("Ошибка определения пользовательской группы"); }elseif(!$users_grp = rb("users-grp", "name",$w = "[{$grp}]")){mpre("Ошибка выборки группы {$w}"); }elseif(!$users_mem = fk("users-mem", $w = ["uid"=>$users['id'], "grp_id"=>$users_grp['id']], $w)){mpre("Ошибка добавления пользователя `{$users["name"]}` в группу '{$users_grp["name"]}'"); }elseif(!$sess = fk("{$conf['db']['prefix']}sess", ["id"=>$sess["id"]], null, ['uid'=>$users["id"]])){mpre("Ошибка обновления сессии пользователя"); }else{ mpevent("Регистрация нового пользователя", $name, $users['id'], $_POST); exit(json_encode($users)); }Страница регистрации
12febraury,
23 Августа 2017
Комментарии (17) -
C# / Говнокод #23290
+1
- 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
var vals = tagsTypes.Zip(times, (tagType, time) => { if (error != null) return new { time = time, val = (object)ServiceValue.DataSourceNotAvailable }; if (!timedVals.ContainsKey(tagType.tag)) return new { time = time, val = (object)ServiceValue.NoValue }; if (timedVals[tagType.tag].Count == 0) return new { time = time, val = (object)ServiceValue.NoValue }; var value = timedVals[tagType.tag].Find(x => x.TimestampUTC == time.ToUniversalTime() && x.Value!=null); if (value != null && value.IsGood()) { if (value.Value == null) return new { time = time, val = (object)ServiceValue.Error }; else { if (!string.IsNullOrEmpty(value.DigitalSetValue)) return new { time = time, val = (object)value.DigitalSetValue }; return new { time = time, val = value.Value }; } } else { var val = _connection.GetTagByName(tagType.tag).Data.ArcValue(time, RetrievalTypeConstants.rtAuto); if (!string.IsNullOrEmpty(val.DigitalSetValue)) return new { time = time, val = (object)val.DigitalSetValue }; return new { time = time, val = val.Value }; } return new { time = time, val = (object)ServiceValue.Error }; }).ToArray();давайте ка рассортируем значения по аттрибутам
gogolevsergey,
23 Августа 2017
Комментарии (1) -
PHP / Говнокод #23289
+1
- 1
- 2
- 3
- 4
- 5
- 6
- 7
function line(){ $line = ''; for ($i=0; $i != 40; $i++){ $line .= '-'; } echo($line.PHP_EOL); }
NodnolStudio,
22 Августа 2017
Комментарии (1) -
PHP / Говнокод #23276
+1
- 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
<!doctype html> <html> <head> <meta http-equiv="X-UA-Compatible" content="IE=edge, chrome=1" /> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <meta charset="utf-8" /> <? $title = filter_var($_REQUEST["title"], FILTER_SANITIZE_STRING); $image = filter_var($_REQUEST["image"], FILTER_SANITIZE_STRING); $text = filter_var($_REQUEST["text"], FILTER_SANITIZE_STRING); ?> <meta property="og:type" content="article" /> <meta property="og:title" content="<?=$_REQUEST['title'];?>" /> <meta property="og:description" content="<?=$_REQUEST['text'];?>" /> <meta property="og:image" content="<?=$_REQUEST['image']?>" /> <?$d = 'Некий URL?title='.urlencode($title).'&image='.urlencode($image).'&text='.urlencode($text);?> <meta property="og:url" content="<?=$d?>" /> <title><?=$_REQUEST['title'];?></title> <script type="text/javascript"> window.location = "Еще один захардкоженый URL"; </script> </head> <body> <img src="<?=$_REQUEST['image']?>" /> </body> </html>все секурно
sh7,
18 Августа 2017
Комментарии (0)
Follow us!