Read a file and output html

[eternalprophet]

I have a list of url's in a text file, as well as a description. I am pretty sure I know how to read those out of the text file, but, here is my predicament, I also have headings for the links.

Here is what the file looks like.

Music
www.musicmakestheworldgoround.com|Music makes the worlds' go round!
www.coalchamber.com|The official website of coal chamber
Stupid
www.thisandthat.com|The Official This and That webpage!
www.hereandnow.com|This is Here and Now's Official Website!
www.nowandagain.com|HomePage of now and again
News
www.cnn.com|The official CNN website
news.yahoo.com|Yahoo! News
www.microsoft.com|Microsoft News or Something

The format is:
Category
www.blah.com|Caption

THe category is ALWAYS one word, no separator, no special characters

the url may or may not have www., and I am thinking it may be easier if I add [url]http://[/url] before them, not sure. The separator character between the URL and caption is ALWAYS the | character. The caption may be words or a phrase, and may contain any special characters (mostly ! ' " ?)

Now, I can figure out how to read a list of links and output them, but how would I do it this way? THe other twist is, I only want the links in the categories printed if the page name matches the category. $pagename is on every page, with the proper category name.

So if I was on the news page, I want the links to outoput

Music Links
Stupid Links
News Links
-CNN
-Yahoo! News
-etc
-etc

Anyone got a place they can tell me to start to accomplish this?

I searched the forums but did not find anything very helpful.

[eternalprophet]

I realize I could use a database, but the server this is running on does not, and will not ever have mysql support..this is obviously not my server, and this will enable the script to work without a database anywhere.

Had to add that in 🙂

[suntra]

Try this...

<?
 // replace ./test_phpb25.dat by your file...
 $filFp = fopen("./test_phpb25.dat", "r"); 
 $strCategorie = "";
 $arrLiens = array();
 while(!feof($filFp)) {
 	$strLigne = trim(fgets($filFp, 4096));
 	if(strpos($strLigne, "|") === false) {
 		$strCategorie = $strLigne;
 	} else {
 		$arrDonnees = explode("|", $strLigne);
 		if(strtolower(substr($arrDonnees[0], 0, 7)) <> "http://") {
 			$arrDonnees[0] = "http://" . $arrDonnees[0];
 		}
 		$arrLiens[$strCategorie][$arrDonnees[1]] = $arrDonnees[0];
 	}
 }
 fclose($filFp);
 function Ecrire_Liens($arrLiens) {
 	foreach($arrLiens as $strCle => $strValeur) {
 		if(is_array($strValeur)) {
 			echo "Cat&eacute;gorie : $strCle<BR />\n";
 			Ecrire_Liens($strValeur);
 		} else {
 			echo "____<A HREF=\"$strValeur\">$strCle</A><BR>\n";
 		}
 	}
 }
 Ecrire_Liens($arrLiens);
?>

[eternalprophet]

I wasn't expecting a finished script, just some direction, but wow, it works GREAT. Thanks a bunch man. I will modify it some to check to see the category of the current page to only display a certain set of links, but damn, thanks a bunch, that gives me alot more then a starting point 🙂

BTW, that written in french?

[suntra]

Yes... I'm a French Canadian living in Quebec City !

[eternalprophet]

all hail Suntra

[suntra]

Originally posted by eternalprophet
all hail Suntra

Is that some kind of insult ?

[eternalprophet]

Insult? No, no, not at all, I swear. I was asking about the language because the code looked like it was in french, and the chou chou chouette(spelling on that may be off, it was under your name) made me think it was....was going to put a message in french saying thank you until I realized 1. my french kinda sucks, and 2. If you weren't french, you would be like what? So I decided to add my supreme thank you very much you are so damn awesome greeting.....ALL HAIL x, where x is your name, in this case....all hail suntra!

Just my way of saying "thanks a whole helluvalot, the script worked wonders"

Not an insult at all 🙂

Do you have any clue who alizee is? the spelling might be off, but she sings that moi lolita song...from the album gourmandices(think that means delicasies, not sure)....noone has any clue who the heck that is but me and the guy I used to play a game with online from paris 🙁

[eternalprophet]

Mind if I change the variable names and stuff to those of which I would normally use?

btw, I give credit to people who helped me with the scripts if/when I put them up on a website

Do you object to having something like
//Original script by Suntra

in the .php file? Will be glad to add your email address if you would like

BTW, the other stuff I have gotten help with I have not actually used on a live site. Some I planned on using, but I didn't get a chance to.

[suntra]

No problem if you change the variable names ! This don't think I'll use this script so it's in someway yours now... ! But you can put my real name in the script : Hubert Lemelin, but no need to write my e-mail since it can be redistributed !

About the singer you talked about, I just don't know who it is ! Sorry !

[eternalprophet]

Thank you and bAH! I wish everyone knew who it was! I would post an mp3 here if it was legal, its so upbeat and giddy....its just french pop music, but hey, my friends like it because its in a foreign language! wheeee!

[eternalprophet]

I changed some of the variables, and added the credit line with your name in it. Did I translate them all correctly, or at least close?

Also, can you explain this line?
echo "Cat&eacute;gorie : $strKey<BR />\n";
the &eacute; is just a special character right?

<?
// Original code by Hubert Lemelin
$file = fopen("./test_phpb25.dat", "r");
$strCategory = "";
$arrBonds = array();
while(!feof($file)) {
$strLine = trim(fgets($file, 4096));
if(strpos($strLine, "|") === false) {
$strCategory = $strLine;
} else {
$arrayData = explode("|", $strLine);
if(strtolower(substr($arrayData[0], 0, 7)) <> "http://") {
$arrayData[0] = "http://" . $arrayData[0];
}
$arrBonds[$strCategory][$arrayData[1]] = $arrayData[0];
}
}
fclose($file);
function Write_Lines($arrBonds) {
foreach($arrBonds as $strKey => $strValue) {
if(is_array($strValue)) {
echo "Cat&eacute;gorie : $strKey<BR />\n";
Write_Lines($strValue);
} else {
echo "____<A HREF=\"$strValue\">$strKey</A><BR>\n";
}
}
}
Write_Lines($arrBonds);
?>

[suntra]

The only errors I would see in the translation is "arrBonds" which should be "arrLinks" since Lien (in French) = Link (in English). Catégorie means... category and é is only to change the sound of "e"... if there were not accent, I would sound different...

But no matter if the translation of the variables is not exact... the only thing that must be perfect is that the script works... !

[eternalprophet]

function Ecrire_Liens($arrLiens) {

Meh, I got write lines but not arr lines, I dunno what the heck I was thinking 🙂 If someone else reads that code they might say "wtf was he smoking?" Thanks for catching that 🙂