Dotaz: PHP funkce

[Pepino]

Dobrý večer, dovolil bych si prosím požádat jako ještě celkem nezkušený s jednou funkcí.

Mám proměne:

$prom1 = "neco";
$prom2_pozice = "1";
$znak1 = "S";
$znak2 = "E";

a potrebuji najit v souboru cast textu, ktery podle promenych rika: budu hledat 1 text "neco" za timto textem najdu první znak S a prvni znak E a mezi temito znaky vyberu text.

Vůbec nevim jak na to mam jit. Poradil by mi prosím někdo? Googloval jsem cele odpoledne ale nenasel jsem vubec nic. Dekuji za pomoc. Pepa

---

---

Odpovědi

[Přemek Vyhnal]

Nebylo by lepší použít regulární výraz? Něco jako /neco.*?S(.*?)E/

[Ben Joyce]

Příloha:

• abc.php (1867 bytů)

Mozna to je trochu neprehledne a nejspise by se nasel lepsi pristup k tomuto problemu, ale toto je muj prvni napad.
Pokud jsem dobre pochopil problem, chcete vyhledavat od pozice $prom2_pozice text $prom1 a dale vyhledat prvni znak $znak1 a prvni znak $znak2 a ziskat text mezi temito znaky.
Problem je reseny obecne, takze $prom1 muze byt napriklad i veta, ale znaky jsem zachoval jako znaky.
Zde je kod:

function vybrat_z_textu($prom2_pozice, $prom1, $znak1, $znak2, $string)
{
// vstupni kontrola
if (strlen($prom1) < 1)
$nalez = true;
else
$nalez = false;

if (strlen($string) < 1)
return;



// zjisti delku textu
$prom_lenght = strlen($prom1);
$string_lenght = strlen($string);

// prom2_pozice by mela obsahovat cislo v poradi znaku - tedy zacni na
// patem znaku => $prom2_pozice = 5;
$i = $prom2_pozice - 1;
// probiha hledani klicove fraze $prom1 v textu
while (($nalez != true) || ($string_lenght >= ($i + 1)))
{
// pokud prvni znak klic. fraze je shodny se znakem, ktery je na rade
if ($string[$i] == $prom1[0])
{
// zjisti zdali dalsi znaky jsou shodne
$n = $i + 1;
for ($j = 1; $j <= ($prom_lenght - 1); ++$j)
{
if ($string[$n] != $prom1[$j])
break;
else
$uspech = true;
++$n;
}

// pokud jsou dalsi znaky shodne, "vrati" pozici po klic. frazi
if ($uspech)
{
$i = $n;
break;
}
}


++$i;
}


// vyhleda obe pismena
$pozice_prvniho = 0;
$pozice_druheho = 0;
while (($nalez_druheho != true) || ($string_lenght >= ($i + 1)))
{
if ($string[$i] == $znak1)
$pozice_prvniho = $i;

if ($string[$i] == $znak2)
{
$pozice_druheho = $i;
$nalez_druheho = true;
}

++$i;
}


// vybere a vrati text mezi znaky
return substr($string, $pozice_prvniho + 1,
($pozice_druheho - $pozice_prvniho) - 1);
}


A zde je doplnek, na kterem muzete kod vyzkouset:

// vstupni data
$prom1 = "neco";
// predpokladam ze je zde pozice, na ktere ma zacit vyhledavat
$prom2_pozice = 1;
$znak1 = "S";
$znak2 = "E";

// vstupni text
$string = "Toto je cvicny text. Jde pouze o to, aby zde program nasel
slovo Neco NECO NeCo neco (zkouska) a potom pismeno S a mezi tim ma byt text - tedy je zde.
Nyni jiz musi najit pismeno E. A je to.";
var_dump(vybrat_z_textu($prom2_pozice, $prom1, $znak1, $znak2, $string));

Cely soubor (samostatne funkcni) naleznete v priloze.

[l4m4]

Lze se pak divit, že má PHP tak hroznou pověst?

[Vjetnam]

To je opravdu krize. Misto 1 radku kodu s regularnim vyrazem takovy bastl...

[Ben Joyce]

Regularni vyrazy by snad vratili pouze true nebo false, ne?

[Ben Joyce]

Beru zpet, podival jsem se do dokumentace - vrati nejspise integer ukazujici na pozici vyskytu. Nenapadlo me to resit pres reg. vyrazy, bylo by to o dost kratsi.

[jos]

podívej se ještě jednou a pořádně

vrací to počet matchů, samotný matche ti to nacpe (preg_match) do třetího parametru

[Ben Joyce]

Pravda, to by to jeste podstatne zjednodusilo - pomalu do jednoho radku.

[novak]

Ne. Protoze v nem kdejakej bastlir vybastli kdejakej polofunkcni bastl a jeste se sam nazve programatorem.

[Michal Wirth]

no, misto takovy machisticky hlasky byste mohl priste poskytnout nejaky lepsi reseni ... ne kazdy totiz spadl z nebe uceny tak, jako vy

[l4m4]

A to konkrétně proč?

Řešení už je přece v prvním komentáři, výrazně starším než ten, na který jsem reagoval. Přesný regulární výraz z toho dotazu stejně nezkonstruuji, protože např. nerozumím, jak se vlastně použije ta jednička.

[Michal Wirth]

ja jsem uz psal proc ... pokud jste mel potrebu na neco takoveho reagovat, mohl jste vzit v potaz, ze dotycny je evidentne zacatecnikem a neshazovat ihned jeho reseni

navic pokud byste nemel po ruce regexpy, tak byste to ve vysledku pravdepodobne resil podobnym "rychlo-bastlem" a asi by vas hned nenapadl nejaky efektivnejsi algoritmus

ja take uplne nepochopil, co tazatel vlastne chce, ale nevidim nic slusneho na zesmesnovani nekoho, kdo se pokusil dat aspon nejakou "rozumnejsi" odpoved

[l4m4]

Kdyby se příspěvek, na který jsem reagoval, objevil první, a až poté řešení s regexpem, tak bych takto nereagoval. V tomto případě se ovšem dotyčný začátečník mohl poučit, že to jde dělat řádově lépe, a nedávat sem ty špagety. Že to neudělal... no, proto mají PHP a programátoři v něm pověst, jakou mají.

[Ben Joyce]

Ano, mohl bych se poučit, ale dříve jsem pokaždé použil reg. výraz jen v situaci, kdy jsem potřeboval true nebo false - tedy měl jsem zafixovanou návratovou hodnotu preg_match jako bool. Tedy jsem neviděl nějaké řešení. Je ale pravda, že jsem se měl ujistit v dokumentaci.

[Michal Wirth]

ano, to byste priste mel

[Michal Wirth]

na prvni pohled to vypada, ze by to mozna mohlo nejak fungovat, neni to ale ani bezpecne ani jednoduche a ani efektivni reseni, coz je spatne ... nelze totiz na prvni pohled zjistit, co to vlastne dela a zda je to tak spravne ... je lepsi vyuzit prostredku, ktere jsou pro toto urceny a ktere jsou uz lety proverene ... treba zde lze elegantne uplatnit regularni vyrazy ... napr. takto

/*
 * Najde v ramci textu prvni vyskyt slova "neco" a vrati prvni podretezec,
 * ktery nasleduje za timto nalezem mezi pismeny "S" a "E" (bez ohledu na
 * spravne parovani znaku). Pokud nedojde ke shode, funkce vraci false.
 */
function foo($text)
{
	$matches = array();

	if (preg_match('/neco[^S]*S([^E]*)E/', $text, $matches) > 0)
		return $matches[1];

	return false;
}

[Šangala]

Ale nužno podotknouti, že kdyby byly parametrické i další proměnné ze zadání, nebylo by to již tak triviální. A nakonec by se dospělo k podobnému klonu „ručního“ řešení jak zde byl již uvedeno, nebo by se funkce značně rozvinula na ošetření vstupu a generování platného regexp.
Nad 1. řešením by chtělo „malinko“ zapracovat, ale jinak obě jsou dobrá, ale každé na něco jiného :).

[Michal Wirth]

ano, muselo by se to jeste dodelat