- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
int __fastcall TForm1::iscomm(AnsiString str)
{
int i=1;
while (str[i]==' ')
i++;
if (str[i]=='#')
{
return 1;
}
else
{
return 0;
};
};
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+141.4
int __fastcall TForm1::iscomm(AnsiString str)
{
int i=1;
while (str[i]==' ')
i++;
if (str[i]=='#')
{
return 1;
}
else
{
return 0;
};
};
borland C++.
Функция определяет, является ли строка комментарием (начинается с #)
+72.8
mov ebx, eax
mov eax, ebx
Такое борландовский кодогенератор иногда выдаёт
+25
private void OnRdbDatesCheckedChanged(object sender, EventArgs e)
{
if (rdbMonth.Checked)
MakeDateViewVisible("month");
else if (rdbQuarter.Checked)
MakeDateViewVisible("quarter");
else if (rdbYear.Checked)
MakeDateViewVisible("year");
else
MakeDateViewVisible("individual");
}
private void MakeDateViewVisible(string dateView)
{
switch (dateView)
{
case "year":
YearView.Visible = true;
QuarterView.Visible = false;
MonthView.Visible = false;
IndividualDatesView.Visible = false;
break;
case "quarter":
YearView.Visible = false;
QuarterView.Visible = true;
MonthView.Visible = false;
IndividualDatesView.Visible = false;
break;
case "month":
YearView.Visible = false;
QuarterView.Visible = false;
MonthView.Visible = true;
IndividualDatesView.Visible = false;
break;
case "individual":
YearView.Visible = false;
QuarterView.Visible = false;
MonthView.Visible = false;
IndividualDatesView.Visible = true;
break;
}
}
Зато красиво методы вызываются!
−1.5
void DictionaryEnumeratorFunction(char *val, void *tag)
{
DictionaryEnumeratorData ***data;
data = (DictionaryEnumeratorData***) tag;
(**data) = malloc(sizeof(DictionaryEnumeratorData));
(**data)->val = malloc(0); /* O_o [комент добавлен много позднее] */
strcpy((**data)->val, val);
(**data)->next = NULL;
*data = &((**data)->next);
}
Код, забивающий в массив данные из словаря (ассоциативного массива), путём рекурсивного обхода и вызова ЭТОГО. Писалось в 3 часа ночи.
На утро тихо матерился и переписывал всё
+16
// kuso@npj: спорная строка, но мне она нравится:
error_reporting (E_ALL ^ E_NOTICE);
0
// Таких warning куча целая.
warning: Can't open file /dev/hugepages/rtemap_72 during file-backed mapping note processing
warning: Can't open file /dev/hugepages/rtemap_73 during file-backed mapping note processing
warning: Can't open file /dev/hugepages/rtemap_70 during file-backed mapping note processing
warning: Can't open file /dev/hugepages/rtemap_71 during file-backed mapping note processing
warning: Can't open file /dev/hugepages/rtemap_68 during file-backed mapping note processing
warning: Can't open file /dev/hugepages/rtemap_69 during file-backed mapping note processing
warning: Can't open file /dev/hugepages/rtemap_64 during file-backed mapping note processing
warning: Can't open file /dev/hugepages/rtemap_67 during file-backed mapping note processing
warning: Can't open file /usr/lib/x86_64-linux-gnu/libpthread-2.31.so during file-backed mapping note processing
warning: Can't open file /usr/lib/x86_64-linux-gnu/libdl-2.31.so during file-backed mapping note processing
warning: Can't open file /usr/lib/x86_64-linux-gnu/ld-2.31.so during file-backed mapping note processing
[New LWP 3742003]
[New LWP 3742078]
[New LWP 3742050]
[New LWP 3742068]
[New LWP 3742356]
[New LWP 3742094]
[New LWP 3742095]
[New LWP 3742315]
[New LWP 3742316]
[New LWP 3742322]
[New LWP 3742338]
[New LWP 3742354]
[New LWP 3742355]
[New LWP 3768784]
(gdb) bt
#0 0x00007fbcdb6c92ab in ?? ()
#1 0x0000000000004203 in ?? ()
#2 0x00007fbcdabadf90 in ?? ()
#3 0x00007fbcdabb136e in ?? ()
#4 0x000055f0507c881a in ?? ()
#5 0x00007fbcdb5abdb4 in ?? ()
#6 0x000055f0507c908e in ?? ()
#7 0x000055f0507ab565 in ?? ()
#8 0x000055f0507abad0 in ?? ()
#9 0x000055f0507ac1f1 in ?? ()
#10 0x000055f0507aece7 in ?? ()
#11 0x000055f050795ca5 in ?? ()
#12 0x00007fbcd893b083 in ?? ()
#13 0x000055f050798f9e in ?? ()
#14 0x0000000000000000 in ?? ()
С корками вообще не работал ни разу. И сейчас gdb показывает знаки вопроса, дебажные символы прогрузились, в чем может быть дело?
0
/*
GNOT General Public License!
(c) 1995-2011 Microsoft Corporation
*/
#include "dos.h"
#include "win95.h"
#include "win98.h"
#include "sco_unix.h"
#include "metro.h" //windows 8
class Windows8 extends WindowsSeven implements Nothing {
int totalNewFeatures = 6; //task manager, ribbon, new bsod =D, new WAT, metro, linux_block
int totalWorkingFeatures = 1; //bsod
float bugCount = 345889E+09;
bool readyForRelease = FALSE;
void main() {
while (!CRASHED) {
if (first_time_install) {
if (installedRAM < 2GB || processorSpeed < 4GHz || videoCard < 1) { //requires video card
MessageBox("Hardware incompatibility error.");
GetKeyPress();
//BSOD();
BSOD2(); //windows 8
}
}
Make10GBswapfile();
SearchAndDestroy(FIREFOX|OPENOFFICEORG|ANYTHING_GOOGLE|LINUX_PARTITION|GRUB); //new features (linux & grub)
AddRandomDriver();
MessageBox("Driver incompatibility error.";
GetKeyPress();
//BSOD();
BSDO2(); //windows 8
}
//printf("Welcome to Windows 2000");
//printf("Welcome to Windows XP");
//printf("Welcome to Windows Vista");
//printf("Welcome to Windows 7");
printf("Welcome to Windows 8"); //8 : official name?
goto check_license;
goto start_metro; //windows 8 exclusive!! remove it on future versions
start_metro:
StartMetroUI();
if (WindowsStartMenuClick == 1)
{
goto start_metro;
}
else
{
if (TryingToRemoveMetroUsingRegedit == 1)
{
goto start_metro;
}
}
if (still_not_crashed) {
//CheckUserLicense();
//DoubleCheckUserLicense();
//TripleCheckUserLicense();
goto check_license;
check_license:
#ifdef NEED_LICENSE //DO_NOT_REMOVE, ALWAYS NEED A LICENSE
#include "string.h"
#endif
if (strlen(LicenseInput) < 10 || CheckOEMLicense(LicenseInput) < 1)
{
MessageBox("License is already in use or invalid.");
GetKeyPress();
//BSOD();
BSOD2(); //windows 8
}
else
{
goto start_metro;
}
RelayUserDeatilsToRedmond();
DisplayFancyGraphics();
FlickerLED(hard_drive);
//SetTheme(WindowsVista);
SetTheme(WindowsSeven);
RunWindowsSeven();
}
}
return LotsMoreMoney;
}
0
/**
* Hash a value according to FraudRecord specifications
*
* @param string $value
* @param bool $prepare password is treated differently
* @return string
*/
function hash($value, $prepare = true)
{
if($prepare) {
$value = trim($value);
$value = strtolower($value);
$value = str_replace(" ", "", $value);
}
for($i = 0; $i < 32000; $i++)
$value = sha1("fraudrecord-".$value);
return $value;
}
Безопасность в безопасности от безопасности
https://github.com/splitice/fraudrecord-api/blob/master/src/Splitice/FraudRecord/FraudRecordApi.php#L58
−1
За "PHP".
0
#!/usr/bin/perl -w
# apt install libdatetime-format-dateparse-perl libemail-sender-perl libemail-mime-perl
use warnings FATAL => 'all';
use strict;
use v5.28;
use utf8;
use Date::Parse;
use Date::Language;
use Date::Language::English;
use Socket;
use Email::Sender::Simple qw(sendmail);
use Email::Sender::Transport::SMTP qw();
use Email::MIME;
use Encode;
use constant FROM_MAIL => '[email protected]';
use constant TO_MAIL => 'postmaster';
# user->ip->error
my %errors;
my $dateLang = Date::Language->new('English');
my $yesterday = time() - 86400;
my %patterns = (
"Ошибка аутентификаици" => qr/.+Authentication failed for user (.+?)\. Attempt from IP address ([0-9.]+)\. (.+)$/,
"Попытка отправки с чужого адреса" => qr/.+Message from authenticated user: <([a-z.@]+)> was rejected, because sender identity was detected as spoofed. \(Source IP address: ([0-9.]+), (From header: <[.a-z@]+?>).*/,
);
while (<>) {
next unless m/^\[(.+)\](.+)/;
my $time = $dateLang->str2time($1);
next unless $time > $yesterday .. 0;
my $message = $2;
while ((my $error, my $regex) = each %patterns) {
next unless $message =~ m/$regex/;
$errors{$error}{$1}{$2}{$3} += 1;
}
}
exit 0 if !%errors;
my @message;
while ((my $error, my $userIpLogTimes) = each %errors) {
push @message, $error;
while ((my $user, my $ipLogTimes) = each %$userIpLogTimes) {
push @message, "\tПользователь $user";
while ((my $ip, my $logTimes) = each %$ipLogTimes) {
my $hostName = gethostbyaddr(inet_aton($ip), AF_INET) || $ip;
push @message, "\t\tс IP $ip ($hostName)";
while ((my $log, my $times) = each %$logTimes) {
push @message, "\t\t\t$times раз: $log";
}
}
}
}
my $email = Email::MIME->create(
attributes => {
content_type => "text/plain",
charset => "UTF-8",
},
header_str => [
From => FROM_MAIL,
To => [ TO_MAIL ],
Subject => 'Неудачи на почтовике за последние сутки',
],
body => encode('utf8', join "\n", @message));
sendmail(
$email,
{
from => FROM_MAIL,
to => TO_MAIL,
transport => Email::Sender::Transport::SMTP->new({ host => 'localhost' })
}
) || die 'Cant send';
Покритикуйте скрипт