По колено в коде — Говнокод.ру

Objective C / Говнокод #6162

−111

1
2
3
4
5
6
7
8
9

/ set view controller
// this is just a pointer to object2
object1 = object2;

// claim ownership from object2
[object1 retain];
[object2 release];

This is all that is required. I have already tested & it works.

Пишем iPhone проект, боремся с мемори ликом, разработчик из индии (не учавствует в проекте) предлагает выход из положения с "вротмненоги" знанием дела

leon_coder, 31 Марта 2011

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

1C / Говнокод #6161

−135

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17

"ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ " + ПериодАнализаВРабочихДнях + "
|    РегламентированныйПроизводственныйКалендарь.ДатаКалендаря
|ИЗ
|    РегистрСведений.РегламентированныйПроизводственныйКалендарь КАК РегламентированныйПроизводственныйКалендарь
|ГДЕ
|    РегламентированныйПроизводственныйКалендарь.ДатаКалендаря <     &ДатаНач
|    И (РегламентированныйПроизводственныйКалендарь.ВидДня = &РабочийДень
|            ИЛИ РегламентированныйПроизводственныйКалендарь.ВидДня = &ПредпраздничныйДень)
|
|УПОРЯДОЧИТЬ ПО
|    РегламентированныйПроизводственныйКалендарь.ДатаКалендаря УБЫВ";
датаначала = Неопределено;
Выборка = запрос.выполнить().выбрать();
пока выборка.следующий() цикл
датаначала = выборка.ДатаКалендаря;
конеццикла;
возврат датаначала;

и почему я не могу додуматься взять минимальное значение??

drhihi, 31 Марта 2011

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

PHP / Говнокод #6160

+159

1

echo file_get_contents("split('?')[1]");

Смесь PHP & JavaScript. Честно, я не понимаю, какого результата хотел добиться автор.

stuffort, 31 Марта 2011

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

1C / Говнокод #6159

−124

01
02
03
04
05
06
07
08
09
10
11
12
13
14

"ВЫБРАТЬ
|	ТоварыНаСкладахОстатки.Номенклатура КАК Номенклатура,
|	СУММА(ТоварыНаСкладахОстатки.КоличествоОстаток) КАК КоличествоОстатокНаСкладах
|ИЗ
|	РегистрНакопления.ТоварыОрганизаций.Остатки(
|			,
|			Номенклатура В (&НоменклатураПоОтбору)
|				И Склад В (&СписокСкладов)
|				И Организация = (&Организация)) КАК ТоварыНаСкладахОстатки
|ГДЕ
|	ТоварыНаСкладахОстатки.Склад В(&СписокСкладов)
|
|СГРУППИРОВАТЬ ПО
|	ТоварыНаСкладахОстатки.Номенклатура

1с никогда меня не может понять, что мне нужны свернутые остатки....
1с загоняется... если я в виртуальной таблице отобрал по складам, то мне вновь приходится отбирать по складам

drhihi, 31 Марта 2011

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

1C / Говнокод #6158

−92

1
2
3
4
5
6
7
8
9

"ВЫБРАТЬ РАЗРЕШЕННЫЕ
|	Номенклатура.Ссылка КАК Номенклатура
|ИЗ
|	Справочник.Номенклатура КАК Номенклатура
|ГДЕ
|	Номенклатура.Ссылка В(&НоменклатураПоОтбору)
|
|СГРУППИРОВАТЬ ПО
|	Номенклатура.Ссылка

Пусть 1с раздупляется, что тебе не нужны одинаковые элементы справочника "номенклатура"

drhihi, 31 Марта 2011

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

1C / Говнокод #6157

−100

1
2
3
4
5
6
7

//ВИНМАНИЕ Деление на 0
Если СтрокаЗаказа.КоличествоДнейНаличияНаСкладеЗаПериод = 0 Тогда
	СтрокаЗаказа.КоличествоСделокВДень = 0;
Иначе
	СтрокаЗаказа.КоличествоСделокВДень = СтрокаЗаказа.КоличествоСделокЗаПериод
		/ ?( СтрокаЗаказа.КоличествоДнейНаличияНаСкладеЗаПериод = 0, 1, СтрокаЗаказа.КоличествоДнейНаличияНаСкладеЗаПериод );
КонецЕсли;

по условию 1с не догнала, что там 0...

drhihi, 31 Марта 2011

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

Си / Говнокод #6156

+141

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

char *toScan;
    unsigned int IP1, IP2, IP3, IP4, IPMask;
    if(argc > 1) {
        toScan = argv[1];

        if(sscanf(toScan, "%u.%u.%u.%u/%u", &IP1, &IP2, &IP3, &IP4, &IPMask) != 5) {
            puts("Error parsing arguments.");
            return -1;
        } else {
            if(IP1 > 255 || IP2 > 255 || IP3 > 255 || IP4 > 255 || IPMask > 32) {
                puts("Incorrect values specified.");
                return -2;
            } else {
                baseIP |= IP1 & 0xFF;
                baseIP |= ((IP2 << 8) & 0xFF00);
                baseIP |= ((IP3 << 16) & 0xFF0000);
                baseIP |= ((IP4 << 24) & 0xFF000000);

                baseIP = ntohl(baseIP);

                intCountIP = (unsigned long) pow(2, 32-IPMask);
                //printf("Total IP's: %u\n", countIP());
            }
        }
    } else {
        return -1;
    }

Парсинг аргументов из одного сетевого сканера. Программа выявляет выключенные хосты в указанной подсети.
Несмотря на *это*, сканер работает весьма резво (350 IP в секунду)

danilissimus, 31 Марта 2011

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

Perl / Говнокод #6155

−120

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

use strict;
use warnings;

my $expr = $ARGV[0] || die();
my $n = $ARGV[1] || die();
die if ($n < 1) || ($n > length($expr));

$expr =~ tr/[\xc0-\xdf]\xa8/[\xe0-\xff]\xb8/;   # lc
($expr =~ m/^[\xe0-\xff\xb8\-]+$/s) || die();


open(F, 'index') || die("failed to open 'index': $!");
while (<F>)
{
    chomp();
    print "$_\n" if (match($_, $expr, $n));
}
close(F);


sub match
{
    my ($str, $expr, $n) = @_;

    return if length($str) != $n;
    foreach my $letter (split(//, $str))
    {
        my $pos = index($expr, $letter);
        return if ($pos < 0);
        substr($expr, $pos, 1, '');
    }

    return 1;
}

собирает из букв слова
использовать совместно со словарем
вот мой это индекс русского вики
http://files.mail.ru/CNVUDS

iliym, 31 Марта 2011

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

Perl / Говнокод #6154

−125

1
2
3
4

use Date::Calc qw (Delta_Days);
use strict;
my $delta = Delta_Days(1601, 1, 1, 2008, 8, 12);
print "Delta is $delta\n";

дни нашей жизни

iliym, 31 Марта 2011

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

PHP / Говнокод #6153

+161

1
2

$this->Object = Application::getObject();
$this->OBJECT = $this->Object->object;

А Баден-Баден где-то в Европе...

skubent, 31 Марта 2011

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

Говнокод: по колено в коде.

Objective C / Говнокод #6162

1C / Говнокод #6161

PHP / Говнокод #6160

1C / Говнокод #6159

1C / Говнокод #6158

1C / Говнокод #6157

Си / Говнокод #6156

Perl / Говнокод #6155

Perl / Говнокод #6154

PHP / Говнокод #6153