Посоветуйте тулзу для убиения комментариев в коде

0000

-- Пишем в лог

PKG_UTILS.LOG_WRITE ('Всем копец!');

freezer

0000

/*

bla-bla

-- bla-bla

/*

bla-bla

*/

freezer

spitfire

durka82

Я виндузятник, греюсь в биореакторе. Не уверен, что напишу корректную регулярку, которая вот, например, такие приколы будет обходить
code:
/*
bla-bla
— bla-bla
/*
bla-bla
*/

Я виндузятник, греюсь в биореакторе

0000

durka82

Скока всяких тулзов понаписали, а такого нету. Для VB есть, а для PL/SQL не нашел.

Блин, неужто так необходимо regexp курить то?

kruzer25

#define COMMENT_START /*

#define COMMENT_END */

COMMENT_START text COMMENT_END

Andbar

kill-still

0000

katrin2201

0000

salora

0000

slonishka

0000

freezer

slonishka

katrin2201

0000

katrin2201

более 90% из них камменты (руки оторвал бы за такое, была бы моя воля )

0000

0000

katrin2201

slonishka

katrin2201

0000

katrin2201

Я не резиновый, мне и текущих за глаза.

0000

ты если не секрет чем занимаешься то?

а что будет через 5 лет? через 10? =)

slonishka

Надеюсь по работе больше прогать не придется. Большая часть перечисленных левых скилов, относятся к моему текущему хобби (писанине игрухи на КПК).

0000

slonishka

Че та с развитием мелких компов с обычным, не ARM/MIPS, процами и обычной ОС (WinXP для меня сомнительно будущее мобильных платформ.

0000

slonishka

0000

slonishka

0000

smit1

slonishka

pitrik2

select 1 "/* lala */" from dual

select 1 

-- /* 

from /* 

-- comment  */

dual

dgaf

bleyman

А нафига тут регэкспы? Здесь никакие регэкспы, здесь надо тупо идти по строке с одним из трёх состояний - никаких комментариев, комментарий первого типа, комментарий второго типа, и в зависимости от текущего символа (и мб следующего) переходить между состояниями и писать/не писать в выходную строку.

bleyman

Dasar

То, что ты написал, называется "конечный автомат", регекспы являются наиболее удобным языком описания конечных автоматов для работы с текстом.

vall

9173306234

пытался учить всякого г столько, что самому уже тошно, поскольку оно нафиг никому не надо

kruzer25

вообще, тебе нужно два регулярных выражения, по которым будет вырезаться текст, вот вариант (синтаксис PCRE, для grep-а надо будет адаптировать, не уверен, что получится):
#/\*.*?\*/#m
#--.*?$#
(именно в такой последовательности)

kruzer25

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

регекспы являются наиболее удобным языком описания конечных автоматов для работы с текстом.

практически у любого языка (и С, как и sql, входит в их число) лексер, бьющий поток на лексемы и выдирающий комменты, написан на регексах же.

pitrik2

практически у любого языка (и С, как и sql, входит в их число) лексер, бьющий поток на лексемы и выдирающий комменты, написан на регексах же.

kruzer25

pitrik2

Что он хотел сказать - понятно (если я правильно понял, в PHP это называется tokenizer)

kruzer25

tokuchu

ага, тож не понял что он хотел сказать

Andbar

pitrik2

kruzer25

kruzer25

<?php

class CommentDescription {

 public $sOpening;

 public $sEnding;

 public $sReplaceWith;

 public function __construct($sOpening, $sEnding, $sReplaceWith) {

  $this->sOpening = $sOpening;

  $this->sEnding = $sEnding;

  $this->sReplaceWith = $sReplaceWith;

 }

}



function stripComments($sCodeWithComments) {



 $sCode = '';

 $arrComments = array(

  new CommentDescription('/*','*/',''

  new CommentDescription('--',chr(0x0dchr(0x0d

  new CommentDescription('--',chr(0x0achr(0x0a

 );



 $bInComment = false;

 $iCommentType = null;



 $l = strlen($sCodeWithComments);

 for($i=0;$i<$l;$i++) {

  if($bInComment) {

   if(substr($sCodeWithComments,$i,strlen($arrComments[$iCommentType]->sEnding == $arrComments[$iCommentType]->sEnding) {

    $bInComment = false;

    $i += strlen($arrComments[$iCommentType]->sEnding) - 1;

    $sCode .= $arrComments[$iCommentType]->sReplaceWith;

    continue;

   } else {

    continue;

   }

  } else {

   foreach($arrComments as $key => $oComment) {

    if(substr($sCodeWithComments,$i,strlen($arrComments[$key]->sOpening == $arrComments[$key]->sOpening) {

     $bInComment = true;

     $iCommentType = $key;

     break;

    }

    if($bInComment) {

     $i += strlen($arrComments[$iCommentType]->sOpening) - 1;

     continue;

    } else {

     $sCode .= substr($sCodeWithComments,$i,1);

    }

   }

  }

 }

 return $sCode

}

?>

ark21

tokuchu

вот мне тож показалось что он компиляторы имел ввиду, а не токенайзеры
ну дык разве регвыражения существовали когда создавался Си?

katrin2201

kruzer25

perl -ne 'print unless m/^--/' | perl -e 'while (<>) {$line .= $_;}; $line =~ s/\/\*.*?\*\///sg; print $line;'

insert into `table` values('/*stringtoinsert*/');

karkar

simple text: a1a aa1a

single line comment: aa2a --bbb

other comment: aa3a /* bbb*/ aa3a

multiline comment: aa4a /*bbbb

bbbb 

bbbb */ aa4a

single in multi: a5aa /* bbb--ccc */ aa5a

simple string: a6aa 'dddd' aaa6

simple string with one apostr.: aaa7 'dd''dd' aaa7

comments in string: aaa8 'd/*ee*/d --ff''f' aaa8

comments in string: aaa9 "d/*ee*/d --ff""f" aaa9

comments in string: aaa10 `d/*ee*/d --ff``f` aaa10

comments around strings: aaa14 /* 'd/*ee*/d --fff' "ddd" `ddd` */ aaa14

strings in single line comments: aaa15-- "d/*ee*/d --fff" 'ddd' `ddd` bbb

nested strings: "aaa16 /*zz*/ 'bbb `dd /*zz*/ dd` /*zz*/ bb -- bb'aaa" /*bbb*/ aa16  

simple text: a1a aa1a

single line comment: aa2a 

other comment: aa3a  aa3a

multiline comment: aa4a  aa4a

single in multi: a5aa  aa5a

simple string: a6aa 'dddd' aaa6

simple string with one apostr.: aaa7 'dd''dd' aaa7

comments in string: aaa8 'd/*ee*/d --ff''f' aaa8

comments in string: aaa9 "d/*ee*/d --ff""f" aaa9

comments in string: aaa10 `d/*ee*/d --ff``f` aaa10

comments around strings: aaa14  aaa14

strings in single line comments: aaa15

nested strings: "aaa16 /*zz*/ 'bbb `dd /*zz*/ dd` /*zz*/ bb -- bb'aaa"  aa16  

type t = Out | OneLine | MultiLine | Quote of t * char | Q1 of t * char;;

let isquote c = (c='\'') || (c='"') || (c='`');;

let rec filter state =

  try

    let c = input_char stdin in

    let newstate, out = match state, c with

    | Out, '-' -> let c2 = input_char stdin in if c2 = '-' then OneLine, false 

                  else (print_char c; print_char c2; Out, false)

    | Out, '/' -> let c2 = input_char stdin in if c2 = '*' then MultiLine, false 

                  else (print_char c; print_char c2; Out, false)

    | Out, _ -> (if isquote c then Quote(Out, c) else Out true

    | OneLine, '\n' -> Out, true

    | OneLine, _ -> OneLine, false   

    | MultiLine, '*' -> let c2 = input_char stdin in if c2 = '/' then Out, false else MultiLine, true

    | MultiLine, _ -> (if isquote c then Quote(MultiLine, c) else MultiLine false

    | Quote(st, ch _ -> (if ch=c then Q1(st, c) else Quote(st, ch (st = Out)

    | Q1(st, ch _ -> (if ch=c then Quote(st, c) else st (st = Out)

    in (if out then print_char c; filter newstate)

  with End_of_file -> 

in filter Out;; 

katrin2201

karkar

Marinavo_0507

katrin2201

0000

karkar

karkar

type t = Out | OneLine | MultiLine | Quote of t * char;;

let isquote c = (c='\'') || (c='"') || (c='`');;

let rec filter state =

    let c = input_char stdin in

    let newstate, out = match state, c with

    | Out, '-' -> let c2 = input_char stdin in if c2 = '-' then OneLine, false 

                  else (print_char c; print_char c2; Out, false)

    | Out, '/' -> let c2 = input_char stdin in if c2 = '*' then MultiLine, false 

                  else (print_char c; print_char c2; Out, false)

    | Out, _ -> (if isquote c then Quote(Out, c) else Out true

    | OneLine, '\n' -> Out, true

    | OneLine, _ -> OneLine, false   

    | MultiLine, '*' -> let c2 = input_char stdin in if c2 = '/' then Out, false else MultiLine, true

    | MultiLine, _ -> (if isquote c then Quote(MultiLine, c) else MultiLine false

    | Quote(st, ch _ -> (if ch=c then st else Quote(st, ch (st = Out)

    in (if out then print_char c; filter newstate)  

in try filter Out with End_of_file -> ;;  

bleyman

Dasar

Я, видишь ли, могу по произвольному регексу построить автомат и наоборот, по произвольному автомату построть регекс, поэтому меня как-то удивляет такое заявление

kruzer25

по произвольному автомату построть регекс

человек, считающий себя программистом и при этом вынужденный придумывать своё определение конечного автомата, является клиническим идиотом

bleyman

Dasar

kruzer25

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

bleyman

Dasar

Не знаю, как тебе, но мне было с самого начала совершенно очевидно, что это можно сделать.

bleyman

kruzer25

ему на вход подаётся список вида "регулярное выражение" - "код выполняемый в случае успешного матча", так что я не очень понял эту вот ремарку про регекс как изобретение велосипеда =)

\/\*

 {

  if(!bInComment) {

   bInMultilineComment = true;

   bInComment = true;

  }

 }

\*\/

 {

  if(bInMultilineComment) {

   bInMultilineComment = false;

   bInComment = false;

  } else {

   echo '*/';

 }

\/\/

 {

  if(!bInComment) {

   bInSinglelineComment = true;

   bInComment = true;

  }

 }

[\n\r]

 {

  if(bInSinglelineComment) {

   bInComment = false;

   bInSinglelineComment = true;

  }

  echo '${0}';

 }

 {

  if(!bInComment) echo '${0}';

 }

Dasar

я не очень понял эту вот ремарку про регекс как изобретение велосипеда =)

Dasar

program: (code|comment)*

comment = multi_line_comment | single_line_comment

multi_line_comment = '/*' any_char* '*/'

single_line_comment = '//' symbol* line_break

line_break = '\n' | '\r\n'

code: (token space)*

token: \w+

space: \b+

kruzer25

в описании есть неточности.

Dasar

program: (code|comment)*

comment = multi_line_comment | single_line_comment

multi_line_comment = '/*' any_char* '*/'

single_line_comment = '//' symbol* line_break

line_break = '\n' | '\r\n'

code: token|string) space)*

token: \w+

space: \b+

string: string1 | string2

string1: '\''  [^']* '\''

string2: '"' [^"]* '"'

kruzer25

Dasar

kruzer25

так у меня же написано, что любой символ кроме кавычки может быть внутри строки

a=b*(c+d);

Dasar

Dasar

Dasar

program: (code|comment)*

comment = multi_line_comment | single_line_comment

multi_line_comment = '/*' any_char* '*/'

single_line_comment = '//' symbol* line_break

line_break = '\n' | '\r\n'

code: token|string) space)*

token: любой_символ_кроме_пробельных_и_кавычек+

space: \b+

string: string1 | string2

string1: '\''  [^']* '\''

string2: '"' [^"]* '"'

kruzer25

Dasar

тебе надо полностью описать весь язык.

kruzer25

<?php



abstract class StructureDescription {

 public $sOpening;

 public $sEnding;

 public function __construct($sOpening, $sEnding) {

  $this->sOpening = $sOpening;

  $this->sEnding = $sEnding;

 }

}



class StringDescription extends StructureDescription {

 public $arrEscapeTokens;

 public function __construct($sOpening, $sEnding, $arrEscapeTokens = array {

  parent::__construct($sOpening, $sEnding);

  $this->arrEscapeTokens = $arrEscapeTokens;

 }

}



class CommentDescription extends StructureDescription {

 public $sReplaceWith;

 public function __construct($sOpening, $sEnding, $sReplaceWith = '') {

  parent::__construct($sOpening, $sEnding);

  $this->sReplaceWith = $sReplaceWith;

 }

}



function stripComments($sCodeWithComments) {



 $sCode = '';



 $arrComments = array(

  new CommentDescription('/*','*/',''

  new CommentDescription('--',chr(0x0dchr(0x0d

  new CommentDescription('--',chr(0x0achr(0x0a

 );

 $arrEscapeTokens = array(

//  '\\\\0x[0-9a-f]{2}',

  '\\\\.',

 );

 $arrStrings = array(

  new StringDescription('\'','\'',$arrEscapeTokens

  new StringDescription('"','"',$arrEscapeTokens

 );



 $bInComment = false;

 $iCommentType = null;



 $bInString = false;

 $iStringType = null;



 $l = strlen($sCodeWithComments);

 for($i=0;$i<$l;$i++) {

  if($bInComment) {

   if(substr($sCodeWithComments,$i,strlen($arrComments[$iCommentType]->sEnding == $arrComments[$iCommentType]->sEnding) {

    $bInComment = false;

    $i += strlen($arrComments[$iCommentType]->sEnding) - 1;

    $sCode .= $arrComments[$iCommentType]->sReplaceWith;

    continue;

   } else {

    continue;

   }

  } else {

   if($bInString) {

    $sRest = substr($sCodeWithComments,$i);

    $bMatched = false;

    foreach($arrStrings[$iStringType]->arrEscapeTokens as $sEscapeToken) {

     if(preg_match('/^'.$sEscapeToken.'/s',$sRest,$arrMatches {

      $sCode .= $arrMatches[0];

      $i += strlen($arrMatches[0]) - 1;

      $bMatched = true;

      break;

     }

    }

    if($bMatched) continue;

    if(substr($sCodeWithComments,$i,strlen($arrStrings[$iStringType]->sEnding == $arrStrings[$iStringType->sEnding]) {

     $sCode .= $arrStrings[$iStringType]->sEnding;

     $i += strlen($arrStrings[$iStringType]->sEnding) - 1;

     continue;

    }

    $sCode .= substr($sCodeWithComments,$i,1);

    continue;

   }

   foreach($arrStrings as $key => $oString) {

    if(substr($sCodeWithComments,$i,strlen($oString->sOpening == $oString->sOpening) {

     $bInString = true;

     $iStringType = $key;

     $sCode .= $oString->sOpening;

     $i += strlen($oString->sOpening) - 1;

     break;

    }

   }

   if($bInString) continue;

   foreach($arrComments as $key => $oComment) {

    if(substr($sCodeWithComments,$i,strlen($arrComments[$key]->sOpening == $arrComments[$key]->sOpening) {

     $bInComment = true;

     $iCommentType = $key;

     $i += strlen($arrComments[$iCommentType]->sOpening) - 1;

     break;

    }

    if($bInComment) continue;

    $sCode .= substr($sCodeWithComments,$i,1);

   }

  }

 }

 return $sCode

}

?>

kruzer25

program: (code|comment)*
comment = multi_line_comment | single_line_comment
multi_line_comment = '/*' any_char* '*/'
single_line_comment = '//' symbol* line_break
line_break = '\n' | '\r\n'
code: token|string) space)*
token: любой_символ_кроме_пробельных_и_кавычек+
space: \b+
string: string1 | string2
string1: '\'' [^']* '\''
string2: '"' [^"]* '"'

/*test*/

Dasar

kruzer25

hwh2010

code: (token space)*

Dasar

kruzer25

Dasar

kruzer25

критические неточности на твой взгляд еще есть?

(code|comment)*

a /*b*/ c

tokuchu

правильное описание - это что-то типа:

program: (code|comment)*
comment = multi_line_comment | single_line_comment
multi_line_comment = '/*' any_char* '*/'
single_line_comment = '//' symbol* line_break
line_break = '\n' | '\r\n'
code: (token space)*
token: \w+
space: \b+

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

Dasar

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

tokuchu

оно наиболее эффективное по затратам сил и времени (а не единственное правильное)

кстати как много ты можешь привести качественных решений, использующие парсеры на основе регексов?
имхо, регекс - это хрень, для быстрого создания низкокачественного неподдерживаемого решения.

kruzer25

Dasar

лексемы большинства языков программирования описываются регулярными выражениями.

tokuchu

так вот именно, что отдельные лексемы, а не вся грамматика.

Dasar

tokuchu

дык, зло в regexp-ах, а не в самих регулярных грамматиках

Dasar

tokuchu

зло именно regex - а именна та реализация (та нотация что пошла с перла

сами по себе регулярные выражения полезны и записывать их лучше в виде того же Бэкуса-Наура

tokuchu

Кстати, я так и не увидел решения данной задачи на preg_replace. Даже если забыть о существовании строк, в которых то, что кажется комментами, таковыми не является.

комментарий: /\*.*?\*/|--.*?\n

строка: "([^"]|""|\\")*"

символ: .

if (/^${комментарий}/)

{

  skip;

}

else

{

  /^(${строка}|${символ})/

  print;

}

tokuchu

а именна та реализация (та нотация что пошла с перла

bleyman

Кстати, я так и не увидел решения данной задачи на preg_replace. Даже если забыть о существовании строк, в которых то, что кажется комментами, таковыми не является.

Dasar

Так что именно тебе в перловской нотации не нравится?

также regex-ы неудобны с эксплуатационной точки зрения:
1. нет повторного использования
2. нет разбиения на отдельные части
3. нет группового отделения команд от текста
4. предыдущие пункты + более мелкие - приводят к низкой читабельности regex-ов, что приводит к большому кол-ву ошибок в них

bleyman

tokuchu

Лексу на вход подаётся набор "регулярка" - "действие". Он объединяет все регулярки в один конечный автомат, хитроумно разруливая неоднозначности/специализации (типа что я могу написать регулярку для комментов, ниже — регулярку для токенов (по идее матчащую и комменты тоже а он при объединении сделает так, что токен будет матчится только если до того не заматчился коммент (этого не мог понять пенартурег, известно почему!.

tokuchu

1. нет повторного использования

2. нет разбиения на отдельные части

3. нет группового отделения команд от текста

4. предыдущие пункты + более мелкие - приводят к низкой читабельности regex-ов, что приводит к большому кол-ву ошибок в них

bleyman

tokuchu

Ты не понимал ДаркГрея! И спорил не с ним, а со своим непониманием! Это называется "тупить"!

Вот кстати я теперь стал неуверен, а самому проверять влом: это я правду написал про разруливание специализаций? Или всё-таки нужно в явном виде запретить токену начинаться с комментосимволов, например? Просто как бы оно же конечный автомат, поэтому если оно, например, считывает строчку "/*abc ", ему нужно сразу решить, это токен (и его нужно вернуть) или потенциальное начало коммента (и тогда надо читать дальше). А не слишко ли много он на себя возьмёт, если самостоятельно запретит такие токены?

bleyman

tokuchu

Он утверждает (и я с ним согласен что неудобно описывать регулярную грамматику при помощи одного длинного регулярного выражения, из которого, после очередного матча, можно вытащить содержимое надцатой скобки и, если оно не пусто, считать, что распозналась соответствующая лексема, иначе проверить содержимое надцатьпервой скобки и далее. Ну это реально неудобно, не правда ли?

Эм. А как это работает? Вот в данном случае, если коммент — это любые символы внутри скобок, а токен — это любые символы до пробела. Оно видит открывающую скобку и какие-то символы, читает, читает, потом хуяк, кончается файл. Тогда оно должно понять, что ему следовало бить на токены, вернуться и продолжить, но тогда это уже совсем не конечный автомат. А если найдёт закрывающую скобку, то следует вернуть коммент. Не понимаю!

kruzer25

kruzer25

Чувак, я вообще-то написал совершенно полное решение, с корректной обработкой строк и всем таким.

^(?'capture' "[^"]*") | (?[^\n\r]*

("[^"]*")

Dasar

bleyman

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

Marinavo_0507

bleyman

   

^

(?'capture'                  # chunk of code before comment

  ( 

    (' ([^'\\] | \\.)* ')    # quoted string

    | 

    (?!-- | /\* ) [^']       # any char (not starting a comment or quote)

  )* 

)  



(

  ( /\* ?!\*/).)* \*/ )    # multiline comment

  | 

  (--[^\n\r]*)               # singleline comment

)

karkar

comments around strings: aaa /* 'd/*ee*/d --fff' */ aaa

bleyman

karkar

tokuchu

И чем вот это конкретное решение принципиально отличается от моего варианта?
Я же говорил про те решения, которые состоят из одного длинного preg_replace, вроде
return preg_replace('/(\\/\\*.*\\*\\/|\\/\\/.*[\\r\\n])/s','',sCodeWithoutComments);
(с которым, кстати, даже если не думать о гадостях вроде вложенных комментов, неподготовленному читателю/писателю надо ещё долго думать, чтобы понять, где тут писать .*, где .*?, где [^\\r\\n]* и с какими ключами писать это регулярное выражение, чтобы оно захавало не так много, как смогло, а, наоборот, так мало, как только можно).

(Я правильно понимаю, что то, что ты написал - надо завернуть в цикл?)

tokuchu

tokuchu

bleyman

kruzer25

Если что, я его оттестил на разных примерах. Он работает.

"\""

kruzer25

~\{/{0,1}?:\^?\$|%\w+(?:\[(?:\d+|(?:"[^"\\]*(?:\\.[^"\\]*)*"|'[^'\\]*(?:\\.[^'\\]*)*')|\w[\w\d]*|(?:\^?\$|%)\w[\w\d]*(?:\.?(?:\^?\$|%)\w[\w\d]*)*(?:\.\w[\w\d]*)*)\])*(?:\.(?:\^?\$|%)?\w+(?:\[(?:\d+|(?:"[^"\\]*(?:\\.[^"\\]*)*"|'[^'\\]*(?:\\.[^'\\]*)*')|\w[\w\d]*|(?:\^?\$|%)\w[\w\d]*(?:\.?(?:\^?\$|%)\w[\w\d]*)*(?:\.\w[\w\d]*)*)\])*)*(?:(?:[\+\*\/\%]|(?:-(?!>?:(?:\-?\d+(?:\.\d+)?)|[\$\w\.\+\-\*\/\%\d\>\[\]])*)?:\|@?\w+(?::(?:\w+|(?:\-?\d+(?:\.\d+)?)|?:\^?\$|%\w+(?:\[(?:\d+|(?:"[^"\\]*(?:\\.[^"\\]*)*"|'[^'\\]*(?:\\.[^'\\]*)*')|\w[\w\d]*|(?:\^?\$|%)\w[\w\d]*(?:\.?(?:\^?\$|%)\w[\w\d]*)*(?:\.\w[\w\d]*)*)\])*(?:\.(?:\^?\$|%)?\w+(?:\[(?:\d+|(?:"[^"\\]*(?:\\.[^"\\]*)*"|'[^'\\]*(?:\\.[^'\\]*)*')|\w[\w\d]*|(?:\^?\$|%)\w[\w\d]*(?:\.?(?:\^?\$|%)\w[\w\d]*)*(?:\.\w[\w\d]*)*)\])*)*(?:(?:[\+\*\/\%]|(?:-(?!>?:(?:\-?\d+(?:\.\d+)?)|[\$\w\.\+\-\*\/\%\d\>\[\]])*)?)|(?:"[^"\\]*(?:\\.[^"\\]*)*"|'[^'\\]*(?:\\.[^'\\]*)*'*)*)/{0,1}\}~

slonishka

bleyman

karkar

Dasar

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

bleyman

karkar

bleyman

evgarus

Сейчас проверил в MySQL, C# и C++, везде коммент не может начаться внутри строки, но может в ней закончиться.

karkar

evgarus

slonishka

evgarus

kruzer25

0000

karkar

kruzer25

Что там надо установить подскажите плиз (т.е. что для пых-пыха надо?)

karkar

0000