C, parse comma-separated line

[metaclass]

Кошерен ли такой код для разбиения строки, разделенной запятыми на отдельные строки: http://ideone.com/rhNXq ?

PS: strtok не признаю по идеологическим причинам - она меняет анализируемую строку, что меня крайне пугает, хотя в моем конкретном случае это не мешает.

PPS: безотносительно к strtok, в функции было минимум две ошибки - отсутствие проверки на выход за пределы буфера и попадание eol в последнюю строку (девайсина, с которой приходит строка, терминирует ее \r)

Comments

[blacklion.livejournal.com]

А этот код разруливает? Вообще, приличного кода с полной поддержкой shell words я как-то не видел ни разу.

[metaclass.livejournal.com]

Написать нормальный парсер CSV с экранированием это та еще задача. Можно давать на собеседовании и издеваться.

[blacklion.livejournal.com]

Угу.

[http://users.livejournal.com/_slw/]

use Text::CSV;
$csv = Text::CSV->new({binary => 1, sep_char => ';'});
$status = $csv->parse($_);
foreach $f ($csv->fields()){
....
}

[lionet.livejournal.com]

На Эрланге примерно так:

extract_value([]) -> novalue;
extract_value([$\r,$\n|Rest]) -> {Rest};
extract_value([$\n|Rest]) -> {Rest};
extract_value([$"|Rest]) -> extract_quoted(Rest, []);
extract_value(Rest) -> extract_nonquoted(Rest, []).

extract_nonquoted([$\n|_]=Rest, V) -> {V, Rest};
extract_nonquoted([$\r,$\n|_]=Rest, V) -> {V, Rest};
extract_nonquoted([$,|Rest], V) -> {V, Rest};
extract_nonquoted([C|Rest], V) -> extract_nonquoted(Rest, [C|V]);
extract_nonquoted([], V) -> {V, []}.

extract_quoted([$",$,|Rest], V) -> {V, Rest};
extract_quoted([$",$\r,$\n|Rest], V) -> {V, [$\n|Rest]};
extract_quoted([$",$\n|Rest], V) -> {V, [$\n|Rest]};
extract_quoted([$",$"|Rest], V) -> extract_quoted(Rest, [$"|V]);
extract_quoted([$"], V) -> {V, []};
extract_quoted([$\r,$\n|Rest], V) -> extract_quoted(Rest, [$\n|V]);
extract_quoted([C|Rest], V) -> extract_quoted(Rest, [C|V]);
extract_quoted([], V) -> {V, []}.


[lionet.livejournal.com]

splitquotable() из http://libstrfunc.cvs.sourceforge.net/viewvc/libstrfunc/libstrfunc/sf_core/split.c?content-type=text%2Fplain ? Или ты о другом?

[blacklion.livejournal.com]

Смотреть надо — понимает ли он заэскейпленные кавычки в кавычках и прочее.

[lionet.livejournal.com]

Понимает. И прочее.