- 1
Хотели бы вы, чтобы прелестница-кудесница засунула вам в попу свою волшебную палочку?Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−2
Хотели бы вы, чтобы прелестница-кудесница засунула вам в попу свою волшебную палочку?
            Я прелестница-кудесница, и у меня есть волшебная палочка.
Сим-салапим!
Ахалай-махалай!
Зад подставляй!
Вжжжух!
        
−2
function inhify(guest, inho = 'inho') {
    guest = guest.replace(/[aeiou]$/ig, '');
    return guest + inho;
}
function test(guest, guestinho) {
    var res = inhify(guest);
    if (res !== guestinho) {
        console.error(`Expected ${res} to be ${guestinho}`);
    } else {
        console.log(`${guest} => ${guestinho}`);
    }
}
test('guest', 'guestinho');
test('guesto', 'guestinho');
test('bormand', 'bormandinho');
test('barop', 'baropinho');
test('anus', 'anusinho');
test('viagra', 'viagrinho');
test('pohui', 'pohuinho');
0
body {background: url("http://forumfiles.ru/files/0008/ea/f4/23438.jpg") repeat-y scroll center top transparent;}
#logotop {background-image: url("http://forumfiles.ru/files/0008/ea/f4/46264.png"); margin-left: -33px;}
#pun {background-image: url("http://forumfiles.ru/files/0008/ea/f4/21620.jpg");}
.punbb .section .container, .punbb .post-body, .punbb .post-links, .punbb td.tc2, .punbb td.tc3, .punbb .formal fieldset .post-box, #viewprofile li strong, #viewprofile li div, #setmods dd, .punbb .info-box, .punbb #pun-main .info-box .legend {color: #777;}
.punbb .post h3 span, .punbb th, #viewprofile li, #setmods dl {color: #777;}Северянин
0
Струйкер!
Засунь симо-салапимо в кувшин.
−2
instance Arbitrary ProjectConfig where
    arbitrary =
      ProjectConfig
        <$> (map getPackageLocationString <$> arbitrary)
        <*> (map getPackageLocationString <$> arbitrary)
        <*> shortListOf 3 arbitrary
        <*> arbitrary
        <*> arbitrary
        <*> arbitrary
        <*> arbitrary
        <*> arbitrary
        <*> arbitrary
        <*> (MapMappend . fmap getNonMEmpty . Map.fromList
               <$> shortListOf 3 arbitrary)
        -- package entries with no content are equivalent to
        -- the entry not existing at all, so exclude empty
    shrink ProjectConfig { projectPackages = x0
                         , projectPackagesOptional = x1
                         , projectPackagesRepo = x2
                         , projectPackagesNamed = x3
                         , projectConfigBuildOnly = x4
                         , projectConfigShared = x5
                         , projectConfigProvenance = x6
                         , projectConfigLocalPackages = x7
                         , projectConfigSpecificPackage = x8
                         , projectConfigAllPackages = x9 } =
      [ ProjectConfig { projectPackages = x0'
                      , projectPackagesOptional = x1'
                      , projectPackagesRepo = x2'
                      , projectPackagesNamed = x3'
                      , projectConfigBuildOnly = x4'
                      , projectConfigShared = x5'
                      , projectConfigProvenance = x6'
                      , projectConfigLocalPackages = x7'
                      , projectConfigSpecificPackage = (MapMappend
                                                         (fmap getNonMEmpty x8'))
                      , projectConfigAllPackages = x9' }
      | ((x0', x1', x2', x3'), (x4', x5', x6', x7', x8', x9'))
          <- shrink ((x0, x1, x2, x3),
                      (x4, x5, x6, x7, fmap NonMEmpty (getMapMappend x8), x9))
      ]В хачкеле мало бойлерплейта, говорили они. Это ещё далеко не самый длинный список, см. x43 ниже.
https://github.com/haskell/cabal/blob/4e0c701a2feb520d369ef506a18288c47f64b06a/cabal-install/tests/UnitTests/Distribution/Client/ProjectConfig.hs−1
if (isset($_GET['org'])) {
$org=htmlspecialchars($_GET["org"]);
}
else $org=1;
if ($num_resultsdop) {
$sql = "SELECT * FROM `baza`, `sankomerc`, `sandop` WHERE baza.id='$org' and sankomerc.id='$org' and sandop.id='$org'";
}
else {
    $sql = "SELECT * FROM `baza`, `sankomerc` WHERE baza.id='$org' and sankomerc.id='$org'";
}
$row = mysql_fetch_array($result);
    $chotz=$row['chotz'];
    $nazvanie=$row['nazvanie'];
    $nazvaniech=$row['nazvanie'];
    //типографим название
    $typograph->set_text($nazvanie);
    $nazvanie = $typograph->apply();
    $nazvanienotags = strip_tags($nazvanie);
            SEO: #nazvanienotags
SemaReal, помнишь, я тебе говорил, что летом скорее всего перейду на другую работу или восстановлюсь в универе?
Тогда моя претензия была в том, что используют устаревающий Yii2, что нет CI, нет тестов…
После импровизированного отпуска я пришёл, и получил проект, пример реального кода из которого ты видишь.
        
+1
public static function PhpToJSObject($arData, $bWS = false, $bSkipTilda = false, $bExtType = false)
	{
		static $use_bx_encode = null;
		if (!isset($use_bx_encode))
			$use_bx_encode = function_exists('bx_js_encode');
		if ($use_bx_encode)
			return bx_js_encode($arData, $bWS, $bSkipTilda, $bExtType);
		switch(gettype($arData))
		{
		case "string":
			if(preg_match("#['\"\\n\\r<\\\\\x80]#", $arData))
				return "'".CUtil::JSEscape($arData)."'";
			else
				return "'".$arData."'";
		case "array":
			$i = -1;
			$j = -1;
			foreach($arData as $j => $temp)
			{
				$i++;
				if ($j !== $i)
					break;
			}
			if($j === $i)
			{
				$res = '[';
				$first = true;
				foreach($arData as $key => $value)
				{
					if($first)
						$first = false;
					else
						$res .= ',';
					switch(gettype($value))
					{
					case "string":
						if(preg_match("#['\"\\n\\r<\\\\\x80]#", $value))
							$res .= "'".CUtil::JSEscape($value)."'";
						else
							$res .= "'".$value."'";
						break;
					case "array":
						$res .= CUtil::PhpToJSObject($value, $bWS, $bSkipTilda, $bExtType);
						break;
					case "boolean":
						if($value === true)
							$res .= 'true';
						else
							$res .= 'false';
						break;
					case "integer":
					case "double":
						if ($bExtType)
							$res .= $value;
						else
							$res .= "'".$value."'";
						break;
					default:
						if(preg_match("#['\"\\n\\r<\\\\\x80]#", $value))
							$res .= "'".CUtil::JSEscape($value)."'";
						else
							$res .= "'".$value."'";
						break;
					}
				}
				$res .= ']';
				return $res;
			}
			$sWS = ','.($bWS ? "\n" : '');
			$res = ($bWS ? "\n" : '').'{';
			$first = true;
			foreach($arData as $key => $value)
			{
				if ($bSkipTilda && substr($key, 0, 1) == '~')
					continue;
				if($first)
					$first = false;
				else
					$res .= $sWS;
				if(preg_match("#['\"\\n\\r<\\\\\x80]#", $key))
					$res .= "'".CUtil::JSEscape($key)."':";
				else
					$res .= "'".$key."':";
				switch(gettype($value))
				{
				case "string":
					if(preg_match("#['\"\\n\\r<\\\\\x80]#", $value))
						$res .= "'".CUtil::JSEscape($value)."'";
					else
						$res .= "'".$value."'";
					break;
				case "array":
					$res .= CUtil::PhpToJSObject($value, $bWS, $bSkipTilda, $bExtType);
            В ядре битрикса в файле bitrix/modules/main/tools.php на 4613 строке, длинной в 141 строку (жаль здесь ограничение на 100 строк), есть замечательный метод который по сути почти повторяет json_encode().
Почти - это потому, что это говно генерит невалидный json (использует одинарные ковычки), да еще не учитывает типы (true превратится в строку 'true').
Битриксоиды этим подосрали даже не веб-студиям, они просто нагенерировали себе много дополнительной работы на долгое время вперед. 
Желаю им держать эту планку, и никогда не расти.
        
0
void check_manifest_line (int p) {
  static char c[MAX_LINE_LEN + 1];
  int l = p - START_MANIFEST_POSITION;
  if (l <= MAX_LINE_LEN && l > 4) {
    get_binlog_data (c, START_MANIFEST_POSITION, l);
    c[l] = 0;
    char *pp = c;
    int op = -1;
    if (l >= 6 && !memcmp (c, "start", 5)) {
      op = 1; 
      pp += 5;
    } else if (l >= 5 && !memcmp (c, "stop", 4)) {
      op = 2;
      pp += 4;
    } else if (l >= 8 && !memcmp (c, "version", 7)) {
      op = 3;
      pp += 7;
    }
    if (is_whitespace (*pp) && op > 0) {      
      pp ++;
      pp = eat_whitespace (pp);
      if (!*pp) {
        START_MANIFEST_POSITION = p + 1;
        return;
      }
      if (op == 1 || op == 2) {
        char *rr = pp;
        pp = eat_not_whitespace (pp);
        char *zz = pp;
        pp = eat_whitespace (pp);
        *zz = 0;
        if (pp == c + l && zz - rr > 0) {
          struct cluster *C = CC;
          int x = BINLOG_NAME_LEN - 1;
          while (x >= 0 && BINLOG_NAME[x] != '/') {
            x--;
          }
          add_cluster (BINLOG_NAME, x + 1, rr, (MAIN_REPLICA ? 2 : 0) + (op == 2 ? 4 : 0) + (1 << 30));
          CC = C;
        }
      } else {
        assert (op == 3);
        char *rr = pp;
        pp = eat_not_whitespace (pp);
        char *rr_end = pp;
        pp = eat_whitespace (pp);
        *rr_end = 0;
        if (!*pp) {
          START_MANIFEST_POSITION = p + 1;
          return;
        }
        int version = atoi (pp);
        pp = eat_not_whitespace (pp);
        pp = eat_whitespace (pp);
        if (!*pp) {
          START_MANIFEST_POSITION = p + 1;
          return;
        }
        long long size = atoll (pp);
        pp = eat_not_whitespace (pp);
        pp = eat_whitespace (pp);
        if (pp == c + l && rr_end > rr && version > 0 && size >= 0) {
          struct cluster *C = CC;
          int x = BINLOG_NAME_LEN - 1;
          while (x >= 0 && BINLOG_NAME[x] != '/') {
            x --;
          }
          int rrlen = rr_end - rr;
          int i;
          for (i = 0; i < max_cluster; i++) if (Clusters[i]) {
            //fprintf (stderr, "i = %d, binlog_name = %s, rr = %s, rrlen = %d\n", i, Clusters[i]->binlog_name, rr, rrlen);
            const char *s = Clusters[i]->binlog_name;
            int l = strlen (Clusters[i]->binlog_name) - 1;
            while (l >= 0 && s[l] != '/') { l --; }
            s = s + l + 1;
            if (!memcmp (s, rr, rrlen) && s[rrlen] == '.') {
              int old = atoi (s + rrlen + 1);
              if (old >= version) {
                vkprintf (0, "New version %d, old %d. Skipping\n", version, old);
                START_MANIFEST_POSITION = p + 1;
                return;
              }
              if (unlink (Clusters[i]->binlog_name) < 0) {
                fprintf (stderr, "Can not delete old file %s: %m\n", Clusters[i]->binlog_name);
              }
              delete_cluster (i);
            }
          }
          static char name[1024];
          memcpy (name, rr, rrlen);
          name[rrlen] = '.';
          sprintf (name + rrlen + 1, "%06d", version);
          add_cluster (BINLOG_NAME, x + 1, name, (MAIN_REPLICA ? 2 : 0) + (1 << 30));
          LAST_SIZE = size;
          CC = C;
        }
      }
    }
  }
  START_MANIFEST_POSITION = p + 1;
https://github.com/vk-com/kphp-kdb/blob/ce6dead5b3345f4b38487cc9e45d55ced3dd7139/copyfast/copyfast-engine.c#L1081-L1181−1
Яндекс начал индексировать Google Документы с паролями
https://habr.com/post/416219/
            А в чем, собственно, здесь вина "Яндекс"? То что пользователи-долбоёбы держат пароли в общедоступных документах?
В таком случае я и без "Яндекс" могу получить к ним доступ.
        
−1
https://habr.com/company/jugru/blog/416161/
            Есть только одна причина не использовать "k8s" - это всё не нужный ХУЙ! И никого не ебёт ваш "k8s" под "FreeBSD".
Въебите этому посту, пожалуйста, минус.