#!/usr/bin/perl
#73
package fmtmplman;
########################################################################
# COPYRIGHT NOTICE:
#
# Copyright 2008 FocalMedia.Net All Rights Reserved.
#
# Selling the code for this program without prior written consent
# from FocalMedia.Net is expressly forbidden. You may not
# redistribute this program in any shape or form.
#
# This program is distributed "as is" and without warranty of any
# kind, either express or implied. In no event shall the liability
# of FocalMedia.Net for any damages, losses and/or causes of action
# exceed the total amount paid by the user for this software.
#
########################################################################
#### EDIT HERE -- FOR WINDOWS/IIS BASED INSTALLATIONS ONLY #######
$config_cgi = "../config.cgi"; ## <-- CHANGE THIS LINE TO THE FULL SERVER PATH TO config.cgi
# THE PATH ON A WINDOWS INSTALLATION WILL LOOK SOMETHING LIKE THIS:
# $config_cgi = "c:/inetpub/webpub/cgi-bin/pseek/config.cgi";
#### DO NOT CHANGE ANYTHING BELOW THIS LINE #################
#use FindBin;
#use lib $FindBin::Bin;
use CGI::Carp qw(fatalsToBrowser);
use CGI;
use acs;
require Exporter;
use vars qw/@ISA @EXPORT @EXPORT_OK $copyright $prgname/;
@ISA = qw(Exporter);
@EXPORT = qw(dir_templates
search_results
add_url_tmpls
add_url_tmpls2
ratings_templates
comments
whatsnew
tophits
broke_templ
mail_remove
favorites
template_functions
get_tmpl_details
);
@EXPORT_OK = qw($favorites_ret
$mail_remove_ret
$broke_templ_ret
$tophits_ret
$whatsnew_ret
$whatsnew_ret
$comments_ret
$ratings_templates_ret
$add_url_tmpls2_ret
$add_url_tmpls_ret
$search_results_ret
$dir_templates_ret);
&get_setup;
$q = CGI->new;
##################################################################################################################
sub contactus
{
($mlist1, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("contact_form");
($mlist2, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("contact_thank");
$contact_tmpl = qq[
];
return ($contact_tmpl);
}
sub get_tmpl_details
{
my ($the_tmpl) = @_;
if ($the_tmpl eq "defdir")
{
$t_title = "Directory Template";
$dir_details_r = "This template is used when displaying link listings in directories/categories.";
$vars_available_r = "
%%custom_pagetitle%%
This variable word will be replaced by a custom title for the category. This
title can be specified/added when adding or editing any category from the
Directory Manager. If no title has been defined for a category then you can
configure what will be displayed by clicking the 'Settings Tab' >> Global Engne
%%pagetitle%%
This variable word will be replaced by the location of the current category.
It can also be used anywhere in the template to indicate the current directory.
%%pagedescription%%
This description is obtained from the meta description supplied when the category
was added.
<!-- Hide %%metadescription%% // End Hide -->
This will be replaced by a meta tag (description) for search engines. (Place
this variable somewhere between the HEAD tags of the page.)
<!-- Hide %%metakeywords%% // End Hide -->
This will be replaced by a meta tag (keywords) for search engines. (Place
this variable somewhere between the HEAD tags of the page.)
!!add_url_link!!
The link to the add url script/page will be replaced by this variable.
!!add_premium_url_link!!
The link to the premium add url script/page will be replaced by this variable.
%%location%%
The current location in the category/directory will be replaced by this variable.
%%subdirectories%%
The subdirectories of the current category/directory will be replaced by this
variable.
%%searchresults%%
The search results (link listings) will be replaced by this variable.
%%prevnext%%
If there is multiple pages of link listings the previous and next links will be
replaced by this variable.
%%pages%%
The number of pages, (if any) of link listings for the current directory.
Replaced by links to the pages.
%%current_cat%%
The current category.
%%lnknr%%
Replaced by the number of links in the current category.
%%pgs%%
Replaced by the number of pages (containing links) of the current category.
!!tseeksearch!!
This is the location of the search script which is to be used in a form for a
search box.
%%related%%
Replaced by links to related categories of the current category.
%%updated%%
Replaced by the date on which pages was generated/built. Do not use this variable if
you are running a dynamic directory because it will display the current date when
end users browse your directory.
%%bannerslotX%%
This is to be used for banners in conjunction with the banner manager. X
can be 1, 2, 3, 4, or 5. You may define up to 5 banner slots in this template or
custom template. See the online documentation for full instructions.
";
}
elsif (($the_tmpl eq "tmplsearch") or ($q->param('template') eq "tmplsearch_prem"))
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an image field/key that has been created. Add !!$keyname!! to this template for the image to display. This field/key needs a URL to an image - for example: http://www.yourdomain.com/some_image.gif
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an extra field/key that has been created. Add !!$keyname!! to this template for it's values to be available.
"
}
}
if ($the_tmpl eq "tmplsearch")
{
$t_title = "Directory Links Style";
$dir_details_r = "This template reflects the HTML code used when displaying link listings in
directories/categories. This template is used in combination with the main category/directory template.";
}
else
{
$t_title = "Directory Premium Links Style";
$dir_details_r = "This template reflects the HTML code used when displaying premium link listings in
directories/categories. This template is used in combination with the main category/directory template. If this
template is left blank, then the premium links will inherit the style of 'tmplsearch.html' (Default directory links style)";
}
if ($q->param('includes') == 1)
{
$cat_det = "!!category!!
Replaced by the category of the link.
";
}
$vars_available_r = "!!title_with_link!!
Replaced by the title of the link and the title is hyperlinked.
!!title_without_link!!
Replaced by the title of the link but it is not hyperlinked.
!!nr!!
Replaced by the number of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the url of the link.
!!domain!!
Replaced by the domain name of the link.
!!date!!
Replaced by the date of when the link was added.
!!votes!!
Replaced by the number of votes received for this link.
$cat_det
!!rating!!
Replaced by the rating of the link.
!!rate_link_url!!
Replaced by the URL to the page where it can be rated.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!rno!!
Replaced by the number of comments/reviews for this link.
!!review_link_url!!
Replaced by the 'URL to the comment/review script' where users can add a review/comment for this
link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!gethtml!!
Replaced by the URL to a page where the owner can get the HTML code to place on his web
site, so that visitors can rate his link.
!!modify_link!!
Replaced by the URL to a page where the owner can modify the link.
!!name!!
Replaced by the name of the link owner.
!!email!!
Replaced by the email address of the link owner. (Not recommended for display)
!!new!!
Replaced by a 'New' graphic if the link is considered as being new. Settings regarding this is available
in Settings (button) >> Global Settings in the control panel.
!!pop!!
Replaced by a 'Pop' (Popular) graphic if the link is considered as being popular. Settings regarding this is available
in Settings (button) >> Global Settings in the control panel.
!!report_dead_link!!
Replaced by the URL to a page where users can report the link as a broken link.
!!more_info_url!!
This will be replaced by the link/URL to a page that contains more information about the link.
If this variable is present in this template, an extra page will be generated with more
information about the link. You can, for example, have extra fields/keys which display the extra
information if end users click on the 'More Info' link. To customize the extra link information
template, edit the 'Link Info' template.
!!hidden_url!!
This will be replaced by a link to a PowerSeek script that redirects to the URL of the link when clicked.
!!link_image!!
This will be replaced by an uploaded image that was uploaded for the link. You can set the width and height to be fixed by going to the Control Panel >> Settings >> Global Engine Settings >> Directory/Category Listing Settings
!!link_file!!
If something other than an image (like a .pdf or .avi file) was uploaded then this variable can be used and it will be replaced by the full URL path to the file.
$sql_extra_keys";
}
elsif ($the_tmpl eq "subdirs")
{
$t_title = "Sub Directories / Category Style";
$dir_details_r = "This template is used to display directories/categories. This template is used in combination with the main category/directory template.";
$vars_available_r = "
%%subdirs1%%
The subdirectories of the current category are replaced by this variable.
%%subdirs2%%
The subdirectories of the current category are replaced by this variable.
%%subdirs3%%
The subdirectories of the current category are replaced by this variable.
If you only use the %%subdirs1%% variable in this template, you will
only have one row of directories or categories displayed. If you use %%subdirs1%%
and %%subdirs2%% you will have two rows of directories/categories
displayed. You may have up to 3 rows of directories and categories displayed.
";
}
elsif ($the_tmpl eq "directories1")
{
$t_title = "Editing: Sub Directories / Category Style";
$dir_details_r = "This template is used to display directories/categories. This template is used in combination with the main category/directory template.";
$vars_available_r = "%%substyle%%
This variable is replaced by the link to the subdirectory/category. You can
assign font HTML tags to it, or make it bigger or smaller.
%%sub_description%%
This variable is replaced by the description of the subcategory.
The description is derived from the meta description.
The meta description can be added by editing the category name from the control panel. The option of adding a description is also
available when adding a category.
!!new!!
This variable is replaced by a new graphic if new links was recently added to a category. You can set options for this in the
PowerSeek Control Panel >> Settings >> Global Engine Settings
Look for the settings section that reads: 'New & Popular Indication Settings'
";
}
elsif ($the_tmpl eq "related1")
{
$t_title = "Related Category Template 1";
$dir_details_r = "This template is used to display related directories/categories to the existing directory/category. This template is used in combination with the main category/directory template.";
$vars_available_r = "%%related_categories%%
This variable is replaced by the list of related directories/categories in the main directory/category template.";
}
elsif ($the_tmpl eq "related2")
{
$t_title = "Related Category Template 2";
$dir_details_r = "This template is used to display related directories/categories to the existing directory/category. This template is used in combination with the main category/directory template.";
$vars_available_r = "%%related_categories%%
This variable defines the style (font/size, etc..) of related directories/categories in the first related category/directory template.";
}
elsif ($the_tmpl eq "linkinfo")
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an image field/key that has been created. Add !!$keyname!! to this template for the image to display. This field/key needs a URL to an image - for example: http://www.yourdomain.com/some_image.gif
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an extra field/key that has been created. Add !!$keyname!! to this template for it's values to be available.
"
}
}
$t_title = "Link Info Template";
$dir_details_r = "This template is used to display a page for each link (optional). You can, for example, have an extra
page with extra field/key information for each link. You link to this extra page from the
Link Style Template (tmplsearch.html) by using the variable !!more_info_url!! from it.
If you don't link from the 'Link Style Template' with the !!more_info_url!!, then the extra pages are not generated/available.
This is also valid for custom templates.
";
$vars_available_r = "!!title_with_link!!
Replaced by the title of the link and the title is hyperlinked.
!!title_without_link!!
Replaced by the title of the link, but it is not hyperlinked.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the description of the link.
!!domain!!
Replaced by the domain name of the link.
<!-- Hide !!metadescription!! // End Hide -->
This will be replaced by a meta tag (description) for search engines. (Place this variable somewhere between the HEAD tags of the page.)
<!-- Hide !!metakeywords!! // End Hide -->
This will be replaced by a meta tag (keywords) for search engines. (Place this variable somewhere between the HEAD tags of the page.)
!!date!!
Replaced by the date of when the link was added.
!!votes!!
Replaced by the number of votes received for this link.
!!rating!!
Replaced by the rating of the link.
!!rno!!
Replaced by the number of reviews/comments for this link.
!!review_link_url!!
Replaced by the URL to the comment/review script where users can add a review/comment for this
link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!gethtml!!
Replaced by the URL to a page where the owner can get the HTML code to place on his web
site so that visitors can rate his link.
!!modify_link!!
Replaced by the URL to a page where the owner can modify the link.
!!name!!
Replaced by the name of the link owner.
!!email!!
Replaced by the email address of the link owner. (Not recommended for display)
!!report_dead_link!!
Replaced by the URL to a page where users can report the link as a broken link.
!!category!!
Replaced by the category of the link.
!!category_link!!
Replaced by the URL to the category of the link.
!!category_full!!
Replaced by the full category path of the link.
!!new!!
Replaced by a 'New' graphic if the link is considered to be new. Settings regarding this is available
in Settings (button) >> Global Settings in the control panel.
!!pop!!
Replaced by a 'Pop' (Popular) graphic if the link is considered as being popular. Settings regarding this is available
in Settings (button) >> Global Settings in the control panel.
!!hidden_url!!
This will be replaced by a link to a PowerSeek script that redirects to the URL of the link when clicked.
%%reviews%%
If you would addisionally like to list reviews/comments in the 'Link Info' pages, you may use this variable
to list the comments. The comments style is taken from the reviewlinks.html template.
%%bannerslotX%%
This is to be used for banners in conjunction with the banner manager. X can be
1, 2, 3, 4, or 5. You may define up to 5 banner slots in this template or a custom template.
See the online documentation for full instructions.
!!link_image!!
This will be replaced by an uploaded image that was uploaded for the link. You can set the width and height to be fixed by going to the Control Panel >> Settings >> Global Engine Settings >> Directory/Category Listing Settings
!!link_file!!
If something other than an image (like a .pdf or .avi file) was uploaded then this variable can be used and it will be replaced by the full URL path to the file.
$sql_extra_keys
";
}
elsif ($the_tmpl eq "linkinfop")
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an image field/key that has been created. Add !!$keyname!! to this template for the image to display. This field/key needs a URL to an image - for example: http://www.yourdomain.com/some_image.gif
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an extra field/key that has been created. Add !!$keyname!! to this template for it's values to be available.
"
}
}
$t_title = "Link Info Premium Template";
$dir_details_r = "This template is used to display an individual page for premium links. You can, for example, have an extra
page with extra field/key information for each premium link that will look different than the normal link
info pages. You link to this extra page from the Link Style Template (tmplsearch.html) by using the variable
!!more_info_url!! from it. If you don't link from the 'Link Style Template' with the !!more_info_url!!,
then the extra pages are not generated/available for links that contain extra link or premium link information
pages. This is also valid for custom templates.
";
$vars_available_r = "!!title_with_link!!
Replaced by the title of the link and the title is hyperlinked.
!!title_without_link!!
Replaced by the title of the link, but it is not hyperlinked.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the description of the link.
!!domain!!
Replaced by the domain name of the link.
<!-- Hide !!metadescription!! // End Hide -->
This will be replaced by a meta tag (description) for search engines. (Place this variable somewhere between the HEAD tags of the page.)
<!-- Hide !!metakeywords!! // End Hide -->
This will be replaced by a meta tag (keywords) for search engines. (Place this variable somewhere between the HEAD tags of the page.)
!!date!!
Replaced by the date of when the link was added.
!!votes!!
Replaced by the number of votes received for this link.
!!rating!!
Replaced by the rating of the link.
!!rno!!
Replaced by the number of reviews/comments for this link.
!!review_link_url!!
Replaced by the URL to the review script where users can add a review/comment for this
link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!gethtml!!
Replaced by the URL to a page where the owner can get the HTML code to place on his web
site so that visitors can rate his link.
!!modify_link!!
Replaced by the URL to a page where the owner can modify the link.
!!name!!
Replaced by the name of the link owner.
!!email!!
Replaced by the email address of the link owner. (Not recommended for display)
!!report_dead_link!!
Replaced by the URL to a page where users can report the link as a broken link.
!!category!!
Replaced by the category of the link.
!!category_link!!
Replaced by the URL to the category of the link.
!!new!!
Replaced by a 'New' graphic if the link is considered to be new. Settings regarding this is available
in Settings (button) >> Global Settings in the control panel.
!!pop!!
Replaced by a 'Pop' (Popular) graphic if the link is considered as being popular. Settings regarding this is available
in Settings (button) >> Global Settings in the control panel.
!!hidden_url!!
This will be replaced by a link to a PowerSeek script that redirects to the URL of the link when clicked.
%%reviews%%
If you would addisionally like to list reviews/comments in the 'Link Info' pages, you may use this variable
to list the comments. The comments style is taken from the reviewlinks.html template.
%%bannerslotX%%
This is to be used for banners in conjunction with the banner manager. X can be
1, 2, 3, 4, or 5. You may define up to 5 banner slots in this template or a custom template.
See the online documentation for full instructions.
!!link_image!!
This will be replaced by an uploaded image that was uploaded for the link. You can set the width and height to be fixed by going to the Control Panel >> Settings >> Global Engine Settings >> Directory/Category Listing Settings
!!link_file!!
If something other than an image (like a .pdf or .avi file) was uploaded then this variable can be used and it will be replaced by the full URL path to the file.
$sql_extra_keys
";
}
elsif ($the_tmpl eq "searchres")
{
$t_title = "Main Search Page";
$dir_details_r = "This template is used to display search results.";
$vars_available_r = qq[
%%searchresults%%
The item search results template html are replaced with this variable.
%%prevnext%%
If there is multiple pages of listings the previous and next links will be
replaced by this variable.
%%pages%%
The number of pages, if any, of listings for the current directory.
%%link_matches%%
Number of links matched.
%%keywords%%
Keywords that has been used to search with.
];
}
elsif ($the_tmpl eq "searchadv")
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($searched eq "Yes")
{
#$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an image field/key that has been created. Add !!$keyname!! to this template for the image to display. This field/key needs a URL to an image - for example: http://www.yourdomain.com/some_image.gif
"
$sql_extra_keys = $sql_extra_keys . qq[<input type="checkbox" name="$keyname" value="$keyname"checked>$description</font>
];
}
}
$t_title = "Advanced Search Page";
$dir_details_r = qq[This template is used to display an advanced search form where there are search options available to refine searches.
You can link to this page from any PowerSeek template or web page by using the following link:
$script_url/searchadv.cgi
];
$vars_available_r = qq[!!advanced_search!!
Replaced by the path to the script that takes care of advanced searching. Used in-conjunction with the search form.
Extra Fields/Keys
You have extra fields/keys available in the database. You can let visitors search through these fields by adding the following
inside the search form for searchable each field/key:
$sql_extra_keys
];
}
elsif (($the_tmpl eq "lsearchres_loc") or ($the_tmpl eq "lsearchres_loc_prem"))
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an image field/key that has been created. Add !!$keyname!! to this template for the image to display. This field/key needs a URL to an image - for example: http://www.yourdomain.com/some_image.gif
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an extra field/key that has been created. Add !!$keyname!! to this template for it's values to become available.
"
}
}
if ($q->param('fct') ne "tinfo")
{
if ($the_tmpl eq "lsearchres_loc")
{
$t_title = "Links Style";
$dir_details_r = "This template is used when displaying matched links after a search.";
}
else
{
$t_title = "Premium Links Style";
$dir_details_r = "This template is used when displaying premium link listings in search results.";
}
}
else
{
$t_title = "Links Style";
#$dir_details_r = "Links Style";
}
$vars_available_r = "
!!title_with_link!!
Replaced by the title of the link and the title is hyperlinked.
!!title_without_link!!
Replaced by the title of the link, but it is not hyperlinked.
!!nr!!
Replaced by the number of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the description of the link.
!!domain!!
Replaced by the domain name of the link.
!!relevance!!
Replaced by the matched relevance of the link (according to the search terms provided)
!!rgraphic!!
Replaced by a graphic representing the matched relevance of the link.
!!date!!
Replaced by the date when the link was added.
!!votes!!
Replaced by the number of votes received for this link.
!!rating!!
Replaced by the rating of the link.
!!rate_link_url!!
Replaced by the URL to the page where it can be rated.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!rno!!
Replaced by the number of reviews/comments for this link.
!!review_link_url!!
Replaced by the URL to the review script where users can add a review/comment for this
link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!gethtml!!
Replaced by the URL to a page where the owner can get the HTML code to place on his web
site so that visitors can rate his link.
!!modify_link!!
Replaced by the URL to a page where the owner can modify the link.
!!name!!
Replaced by the name of the link owner.
!!email!!
Replaced by the email address of the link owner. (Not recommended for display)
!!report_dead_link!!
Replaced by the URL to a page where users can report the link as a broken link.
!!new!!
Replaced by a 'New' graphic if the link is considered as being new. Settings regarding this is available
in Settings (button) >> Global Settings in the control panel.
!!pop!!
Replaced by a 'Pop' (Popular) graphic if the link is considered as being popular. Settings regarding this is available
in Settings (button) >> Global Settings in the control panel.
!!more_info_url!!
This will be replaced by a link/URL to a page that contains more information about the
link. If this variable is present in this template, an extra page will be generated
with more information about the link. You can for example have extra fields/keys which
displays the extra information if end users click on the 'More Info' link. To customize
the extra link information template, edit the 'Link Info' template.
!!category!!
Replaced by the category of the matched link.
!!hidden_url!!
This will be replaced by a link to a PowerSeek script that redirects to the URL of the link when clicked.
!!link_image!!
This will be replaced by an uploaded image that was uploaded for the link. You can set the width and height to be fixed by going to the Control Panel >> Settings >> Global Engine Settings >> Directory/Category Listing Settings
!!link_file!!
If something other than an image (like a .pdf or .avi file) was uploaded then this variable can be used and it will be replaced by the full URL path to the file.
$sql_extra_keys
";
}
elsif ($the_tmpl eq "nomatch")
{
$t_title = "No Match";
$dir_details_r = "This template is used when a search revealed no matches. In order to use this
template, you have to enable the use of it. To enable the use of this template, click the
'Settings' button above. Then click on 'Global Settings'. Look for a setting that reads
'What to use when a search revealed no matches:' - Set it to 'Use and display the template
called 'nomatch.html'";
$vars_available_r = "%%keywords%%
Replaced by the keywords that has been searched for.";
}
elsif ($the_tmpl eq "flood")
{
$t_title = "Flood Control Template";
$dir_details_r = "The Flood control settings can be found inside the Control Panel >> Settings Tab >> Global Engine Settings >> Search Settings
The HTML code listed here will be displayed to a visitor pressing the search button more than once in a 1 second interval. When the
HTML code of this template is displayed it will wait for 2 seconds before attempting the search the visitor is trying to do.
Flood control is used so that visitors cannot flood the search script by continuously pressing the search button to bog down the
server.
";
$vars_available_r = "!!web_url!!
Replaced by the URL path to the 'html' directory.";
}
elsif ($the_tmpl eq "add_url_med")
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
}
if ($sql_extra_keys ne "")
{
$extra_field_text = qq[
You have defined extra/fields keys. Please read below:
In order to enable users to add/submit data to these extra fields/keys when submitting a new submission, you have to provide a field box with the name of your field/key.
For example:
Let's say you created a key/field called 'price' - In order for users to add a price value when submitting a new link, they will need a field box to fill in the price. The name of this field box needs to be the name of the field/key you defined/created. For example you will need to add something, like the following HTML code, to your submit form: (The text in orange is HTML code)
Enter a Price: <input type="text" name="price" size="20">
The following fields/keys have been found to be present in your directory/search engine:
$sql_extra_keys
];
}
$t_title = "Medium-Sized Search Engine Add URL Template";
$dir_details_r = "This template (when displayed to end users) comes with a drop down menu containing all the categories/directories
where end users can select where they would like to submit their URL. This template is intended for medium-sized
search engines with less than 5000 categories/directories.
You can choose what 'add url' forms to use (medium or large-sized engines), in Settings >> Global Engine Settings";
$vars_available_r = "%%category_dropdown%%
This is replaced by a category drop down box where end users can select the category wherein they would like to make a new submission.
%%submissionbox%%
This is replaced by a description fill-in-box where end users supply descriptions for their new submission.
!!addurlcgi!!
Replaced by the path to the 'Add URL' script which handles the new submission.
$extra_field_text";
}
elsif ($the_tmpl eq "add_url")
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
}
if ($sql_extra_keys ne "")#mark
{
$extra_field_text = qq[
You have defined extra/fields keys. Please read below:
In order to enable users to add/submit data to these extra fields/keys when submitting a new submission, you have to provide a field box with the name of your field/key.
For example:
Let's say you created a key/field called 'price' - In order for users to add a price value when submitting a new link, they will need a field box to fill in the price. The name of this field box needs to be the name of the field/key you defined/created. For example you will need to add something, like the following HTML code, to your submit form: (The text in orange is HTML code)
Enter a Price: <input type="text" name="price" size="20">
The following fields/keys have been found to be present in your directory/search engine:
$sql_extra_keys
];
}
$t_title = "Large-Sized Search Engine Add URL Template";
$dir_details_r = "This template (when displayed to end users) is intended to be used when you have more than 5000 categories/directories.
It doesn't come with a category dropdown menu where categories can be choosed when doing a new submission. The reason
for this is because having 10 000 categories in the drop down menu would make the add url form load very slowly.
You can choose what add url forms to use (medium or large-sized engines), in Settings >> Global Engine Settings";
$vars_available_r = "%%submissionbox%%
This is replaced by a description fill-in-box where end users supply descriptions for their new submission.
!!addurlcgi!!
Replaced by the path to the 'Add URL' script which handles the new submission.
!!catid!!
This is a hidden form variable that is replaced by a category ID so that the add url script which handles the submission
knows to what category the script needs to submit the new submission.
$extra_field_text
";
}
elsif ($the_tmpl eq "add_url_medp")
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
}
if ($sql_extra_keys ne "")
{
$extra_field_text = qq[
You have defined extra/fields keys. Please read below:
In order to enable users to add/submit data to these extra fields/keys when submitting a new submission, you have to provide a field box with the name of your field/key.
For example:
Let's say you created a key/field called 'price' - In order for users to add a price value when submitting a new link, they will need a field box to fill in the price. The name of this field box needs to be the name of the field/key you defined/created. For example you will need to add something, like the following HTML code, to your submit form: (The text in orange is HTML code)
Enter a Price: <input type="text" name="price" size="20">
The following fields/keys have been found to be present in your directory/search engine:
$sql_extra_keys
];
}
$t_title = "Medium-Sized Search Engine Premium Add URL Template";
$dir_details_r = "This template (when displayed to end users) is intended to be used when you have less than 5000 categories/directories.
It is also intended to be a premium add url form where users submit premium URLs.
";
$vars_available_r = "
%%category_dropdown%%
This is replaced by a category drop down box where end users can select the category where they would like to make a new submission.
%%submissionbox%%
This is replaced by a description fill-in-box where end users supply descriptions for their new submission.
!!addurlcgi!!
Replaced by the path to the 'Add URL' script which handles the new submission.
!!p!!
Replaced by a value of 1 to indicate to the 'ADD URL' script that a premium 'new submission' is about to take place.
$extra_field_text
";
}
elsif ($the_tmpl eq "add_urlp")
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
}
if ($sql_extra_keys ne "")
{
$extra_field_text = qq[
You have defined extra/fields keys. Please read below:
In order to enable users to add/submit data to these extra fields/keys when submitting a new submission, you have to provide a field box with the name of your field/key.
For example:
Let's say you created a key/field called 'price' - In order for users to add a price value when submitting a new link, they will need a field box to fill in the price. The name of this field box needs to be the name of the field/key you defined/created. For example you will need to add something, like the following HTML code, to your submit form: (The text in orange is HTML code)
Enter a Price: <input type="text" name="price" size="20">
The following fields/keys have been found to be present in your directory/search engine:
$sql_extra_keys
];
}
$t_title = "Large-Sized Search Engine Premium Add URL Template";
$dir_details_r = "This template (when displayed to end users) is intended to be used when you have more than 5000 categories/directories.
It is also intended to be a premium add url form where users submit premium URLs.
";
$vars_available_r = "%%submissionbox%%
This is replaced by a description fill-in-box where end users supply descriptions for their new submission.
!!addurlcgi!!
Replaced by the path to the 'Add URL' script which handles the new submission.
!!p!!
Replaced by a value of 1 to indicate to the 'ADD URL' script that a premium 'new submission' is about to take place.
!!catid!!
This is a hidden form variable that is replaced by a category ID so that the add url script which handles the submission
knows to what category the script needs to submit the new submission.
$extra_field_text
";
}
elsif ($the_tmpl eq "add_url_instructions")
{
$t_title = "Add URL Instructions";
$dir_details_r = "This will only be used when you are making use of the large-sized search engine 'add url' templates.
When using the large-sized search engine add url templates, end users need to click the 'add url' link
in a specific category/directory to add their URL/link. When they are not in a category and click the
'add url' link, then this template will be displayed - giving them instructions on how to add their
URL.
";
$vars_available_r = "No variables available for use in this template.";
}
elsif ($the_tmpl eq "add_url_problem")
{
$t_title = "Add URL Problem";
$dir_details_r = "This template is displayed to end users when they do a new submission but there was a problem. A problem
will usually occur when a user left out to include his/her email address, etc...";
$vars_available_r = "%%problem%%
This is replaced by text, explaining why a new submission could not be made.";
}
elsif ($the_tmpl eq "add_url_success")
{
$t_title = "Add URL Success";
$dir_details_r = "This template is displayed to end users when a new submission has been successful.";
$vars_available_r = "No variables available for use in this template.";
}
elsif ($the_tmpl eq "modify_link")
{
$t_title = "Modify Link Login";
$dir_details_r = "This template is displayed to end users when they click the 'Modify Link' available with
each link listing. This template prompts them for the password to modify their link.";
$vars_available_r = "!!title_with_link!!
Replaced by the hyperlinked title of the link/URL to be modified.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the description of the link.
!!category!!
Replaced by the category of the link.
!!rating!!
Replaced by the rating of the link.
!!votes!!
Replaced by the number of votes received for this link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!date!!
Replaced by the date of when the link was added.
!!cid!!
This is part of a hidden form variable, replaced by a category ID for use by the modify script.
!!id!!
This is part of a hidden form variable, replaced by a link ID for use by the modify script.
!!modify_cgi!!
Replaced by the path to the modify script.
";
}
elsif ($the_tmpl eq "modify_link_problem")
{
$t_title = "Modify Problem";
$dir_details_r = "This template is displayed when there was a problem modifying a link.";
$vars_available_r = "%%problem%%
This is replaced by text, explaining why a link could not be modified.";
}
elsif ($the_tmpl eq "modify_link_success")
{
$t_title = "Modify Success";
$dir_details_r = "This template is displayed when a link was successfully modified.";
$vars_available_r = "No variables available for use in this template.";
}
elsif ($the_tmpl eq "modify_link_edit")
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
}
if ($sql_extra_keys ne "")
{
$extra_field_text = qq[
You have defined extra/fields keys. Please read below:
In order to enable users to modify data in these extra fields/keys, you have to provide a field box with the name of your field/key and a value inside it.
For example:
Let's say you created a key/field called 'price' - In order for users to modify the price value of their link, they will need a field box where they can modify the price. The name of this field box needs to be the name of the field/key you defined/created. For example you will have to add something like the following HTML code to your modify form: (The text in orange is HTML code)
Price: <input type="text" name="price"
size="20" value="%%price%%">
The following fields/keys have been found to be present in your directory/search engine:
$sql_extra_keys
];
}
$t_title = "Modify Link Editing";
$dir_details_r = "This is where users submit changes to standard links.";
$vars_available_r = "%%title%%
Replaced by the title of the link.
%%keywords%%
Replaced by the keywords of the link.
%%url%%
Replaced by the URL of the link.
%%name%%
Replaced by the name of the link owner.
%%email%%
Replaced by the email address of the link owner.
%%password%%
Replaced by the modify password of the link.
%%notesbox%%
Replaced by a fill-in-box where link owners can write notes about the changes to the link.
!!cid!!
This is part of a hidden form variable, replaced by a category ID for use by the modify script.
!!id!!
This is part of a hidden form variable, replaced by a link ID for use by the modify script.
!!modify_cgi!!
Replaced by the path to the modify script.
!!password!!
This is a hidden form variable used by the modify script.
$extra_field_text
";
}
elsif ($the_tmpl eq "modify_link_editp")
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "$keyname
"
}
}
if ($sql_extra_keys ne "")
{
$extra_field_text = qq[
You have defined extra/fields keys. Please read below:
In order to enable users to modify data in these extra fields/keys, you have to provide a field box with the name of your field/key and a value inside it.
For example:
Let's say you created a key/field called 'price' - In order for users to modify the price value of their link, they will need a field box where they can modify the price. The name of this field box needs to be the name of the field/key you defined/created. For example you will have to add something like the following HTML code to your modify form: (The text in orange is HTML code)
Price: <input type="text" name="price"
size="20" value="%%price%%">
The following fields/keys have been found to be present in your directory/search engine:
$sql_extra_keys
];
}
$t_title = "Modify Link Editing";
$dir_details_r = "This is where users submit changes to premium links.";
$vars_available_r = "%%title%%
Replaced by the title of the link.
%%keywords%%
Replaced by the keywords of the link.
%%url%%
Replaced by the URL of the link.
%%name%%
Replaced by the name of the link owner.
%%email%%
Replaced by the email address of the link owner.
%%password%%
Replaced by the modify password of the link.
%%notesbox%%
Replaced by a fill-in-box where link owners can write notes about the changes to the link.
!!cid!!
This is part of a hidden form variable, replaced by a category ID for use by the modify script.
!!id!!
This is part of a hidden form variable, replaced by a link ID for use by the modify script.
!!modify_cgi!!
Replaced by the path to the modify script.
!!password!!
This is a hidden form variable used by the modify script.
$extra_field_text
";
}
elsif ($the_tmpl eq "modify_instructions")
{
$t_title = "Modify Instructions";
$dir_details_r = "This template will be displayed to users when the modify link is clicked but is not linked to a link listing.";
$vars_available_r = "No variables available for use in this template.";
}
elsif ($the_tmpl eq "retrievepass")
{
$t_title = "Password Retrieval";
$dir_details_r = "This template is used to enable end users to retrieve modification passwords for links.";
$vars_available_r = "!!email_script!!
This is replaced by the path to the email script that emails modification passwords to end users.
";
}
elsif ($the_tmpl eq "retrievepass_ok")
{
$t_title = "Password Email Success";
$dir_details_r = "Displayed to end users when a modification password was successfully sent.";
$vars_available_r = "No variables available for use in this template.";
}
elsif ($the_tmpl eq "retrievepass_prb")
{
$t_title = "Password Email Problem";
$dir_details_r = "Displayed to end users when a modification password could not be sent.";
$vars_available_r = "No variables available for use in this template.";
}
elsif ($the_tmpl eq "rate_it")
{
$t_title = "Rate It";
$dir_details_r = "Used to enable end users to rate links.";
$vars_available_r = "
!!title_with_link!!
Replaced by the hyperlinked title of the link/URL to be modified.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the URL of the link.
!!category!!
Replaced by the category of the link.
!!rating!!
Replaced by the rating of the link.
!!votes!!
Replaced by the number of votes received for this link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!date!!
Replaced by the date of when the link was added.
!!ct!!
This is part of a hidden form variable, used by the rating script.
!!id!!
This is part of a hidden form variable, used by the rating script.
!!rate_it!!
Replaced by the path to the rating script.
!!category_with_link!!
Replaced by the categories with links to these categories where the link resides.
!!title_without_link!!
Replaced by the title of the link.
!!more_info_url!!
Replaced by a link to the 'more info' page of the link.
";
}
elsif ($the_tmpl eq "rate_it_success")
{
$t_title = "Rate It Success";
$dir_details_r = "Displayed when an end user successfully rated a link.";
$vars_available_r = "
!!title_with_link!!
Replaced by the hyperlinked title of the link/URL to be modified.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the URL of the link.
!!category!!
Replaced by the category of the link.
!!rating!!
Replaced by the rating of the link.
!!votes!!
Replaced by the number of votes received for this link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!date!!
Replaced by the date of when the link was added.
!!category_with_link!!
Replaced by the categories with links to these categories where the link resides.
!!title_without_link!!
Replaced by the title of the link.
!!more_info_url!!
Replaced by a link to the 'more info' page of the link.
";
}
elsif ($the_tmpl eq "rate_it_fail")
{
$t_title = "Rate It Failure";
$dir_details_r = "Displayed when a rating for a link could not be recorded.";
$vars_available_r = "
!!category_with_link!!
Replaced by the categories with links to these categories where the link resides.
!!title_without_link!!
Replaced by the title of the link.
!!url!!
Replaced by the URL of the link.
!!more_info_url!!
Replaced by a link to the 'more info' page of the link.
";
}
elsif ($the_tmpl eq "gethtml")
{
$t_title = "Get Rating HTML Code";
$dir_details_r = "This template is used to enable link owners to retrieve HTML code which they can place
inside their web pages so that their visitors can rate their link on your
search engine.";
$vars_available_r = "
%%textlink%%
Replaced by a link to the rating page of the link (where users can rate this link).
%%textlink_code%%
Replaced by a box containg HTML code that the link owner can place on his web site.
%%remoteform_code%%
Replaced by a box containg HTML code that the link owner can place on his web site.
!!title_with_link!!
Replaced by the hyperlinked title of the link/URL to be modified.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the URL of the link.
!!category!!
Replaced by the category of the link.
!!rating!!
Replaced by the rating of the link.
!!votes!!
Replaced by the number of votes received for this link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!date!!
Replaced by the date of when the link was added.
!!category_with_link!!
Replaced by the categories with links to these categories where the link resides.
!!title_without_link!!
Replaced by the title of the link.
!!more_info_url!!
Replaced by a link to the 'more info' page of the link.
";
}
elsif ($the_tmpl eq "review_it")
{
$t_title = "Review/Comment Display Template";
$dir_details_r = "This template is used to enable end users to view and post reviews/comments about links.";
$vars_available_r = "!!title_with_link!!
Replaced by the hyperlinked title of the link/URL.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the URL of the link.
!!category!!
Replaced by the category of the link.
!!rating!!
Replaced by the rating of the link.
!!votes!!
Replaced by the number of votes received for this link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!date!!
Replaced by the date of when the link was added.
%%review_listings%%
This is replaced by the reviews/comments for links.
%%description_box%%
Replaced by a fill-in-box where end users enter reviews/comments.
!!review_it!!
Replaced by the path to the review script that handles the posting of reviews/comments.
!!ct!!
This is part of a hidden form variable, used by the review/comment script.
!!id!!
This is part of a hidden form variable, used by the review/comment script.
!!category_with_link!!
Replaced by the categories with links to these categories where the link resides.
!!title_without_link!!
Replaced by the title of the link.
!!more_info_url!!
Replaced by a link to the 'more info' page of the link.
";
}
elsif ($the_tmpl eq "reviewlinks")
{
$t_title = "Review/Comment Listing Style";
$dir_details_r = "This template is used to display comments/reviews.";
$vars_available_r = "
%%reviewer%%
Replaced by the name of the end user who posted the review/comment.
%%review%%
Replaced by the review/comment for a link.
%%reviewer_email%%
Replaced by the email address of the end user's review/comment.
%%date%%
The date when the review was added.
";
}
elsif ($the_tmpl eq "reviewadded")
{
$t_title = "Review Added";
$dir_details_r = "This template displayed when an end user successfully added a review/comment.";
$vars_available_r = "!!title_with_link!!
Replaced by the hyperlinked title of the link/URL.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the URL of the link.
!!category!!
Replaced by the category of the link.
!!rating!!
Replaced by the rating of the link.
!!votes!!
Replaced by the number of votes received for this link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!date!!
Replaced by the date of when the link was added.
!!category_with_link!!
Replaced by the categories with links to these categories where the link resides.
!!title_without_link!!
Replaced by the title of the link.
!!more_info_url!!
Replaced by a link to the 'more info' page of the link.
";
}
elsif ($the_tmpl eq "reviewproblem")
{
$t_title = "Review Problem";
$dir_details_r = "This template displayed if there was a problem when trying to add a review/comment.";
$vars_available_r = "
%%problem%%
Replaced by text describing the problem on why the review/comment could not be added.
!!category_with_link!!
Replaced by the categories with links to these categories where the link resides.
!!title_without_link!!
Replaced by the title of the link.
!!more_info_url!!
Replaced by a link to the 'more info' page of the link.
!!url!!
Replaced by the URL of the link.
";
}
elsif ($the_tmpl eq "whatsnew_main")
{
$t_title = "Main What's New Template";
$dir_details_r = "This template is used when displaying the latest additions to the directory.";
$vars_available_r = "%%whats_new_listings%%
Replaced by the latest link additions to the directory.
%%prevnext%%
If there is multiple pages of link listings, the previous and next links will be replaced by this variable.
%%pages%%
The number of pages, (if any) of link listings for the current directory. Replaced by links to the pages.
%%lnknr%%
Replaced by the number of links in the current category.
%%pgs%%
Replaced by the number of pages (containing links) of the current category.
";
}
elsif (($the_tmpl eq "whatsnew_lists") or ($the_tmpl eq "whatsnew_lists_prem"))
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an image field/key that has been created. Add !!$keyname!! to this template for the image to display. This field/key needs a URL to an image - for example: http://www.yourdomain.com/some_image.gif
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an extra field/key that has been created. Add !!$keyname!! to this template for it's values to be available.
"
}
}
if ($the_tmpl eq "whatsnew_lists")
{
$t_title = "What's New Listing Style";
$dir_details_r = "This template reflects the HTML code used when displaying new link listings.";
}
else
{
$t_title = "What's New Listing Style";
$dir_details_r = "This template reflects the HTML code used when displaying new premium link listings.";
}
$vars_available_r = "!!title_with_link!!
Replaced by the title of the link and the title is hyperlinked.
!!title_without_link!!
Replaced by the title of the link, but it is not hyperlinked.
!!nr!!
Replaced by the number of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the description of the link.
!!date!!
Replaced by the date of when the link was added.
!!votes!!
Replaced by the number of votes received for this link.
!!rating!!
Replaced by the rating of the link.
!!rate_link_url!!
Replaced by the URL to the page where it can be rated.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!rno!!
Replaced by the number of reviews/comments for this link.
!!review_link_url!!
Replaced by the URL to the review script where users can add a review/comment for this
link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!gethtml!!
Replaced by the URL to a page where the owner can get the HTML code to place on his web
site so that visitors can rate his link.
!!modify_link!!
Replaced by the URL to a page where the owner can modify the link.
!!name!!
Replaced by the name of the link owner.
!!email!!
Replaced by the email address of the link owner. (Not recommended for display)
!!report_dead_link!!
Replaced by the URL to a page where users can report the link as a broken link.
!!more_info_url!!
This will be replaced by a link/URL to a page that contains more information about the link.
If this variable is present in this template, an extra page will be generated with more
information about the link. You can, for example, have extra fields/keys which displays the extra
information if end users click on the 'More Info' link. To customize the extra link information
template, edit the 'Link Info' template.
!!category!!
Replaced by the category of the link.
!!hidden_url!!
This will be replaced by a link to a PowerSeek script that redirects to the URL of the link when clicked.
!!link_image!!
This will be replaced by an uploaded image that was uploaded for the link. You can set the width and height to be fixed by going to the Control Panel >> Settings >> Global Engine Settings >> Directory/Category Listing Settings
!!link_file!!
If something other than an image (like a .pdf or .avi file) was uploaded then this variable can be used and it will be replaced by the full URL path to the file.
$sql_extra_keys
";
}
elsif ($the_tmpl eq "tophits_main")
{
$t_title = "Main Top Hits Template";
$dir_details_r = "This template is used when displaying the most clicked links in the directory.";
$vars_available_r = "%%tophits_listings%%
Replaced by 'most clicked' links in the directory.
%%prevnext%%
If there is multiple pages of link listings, the previous and next links will be replaced by this variable.
%%pages%%
The number of pages, (if any) of link listings for the current directory. Replaced by links to the pages.
%%lnknr%%
Replaced by the number of links in the current category.
%%pgs%%
Replaced by the number of pages (containing links) of the current category.
";
}
elsif (($the_tmpl eq "tophits_listings") or ($the_tmpl eq "tophits_listings_prem"))
{
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an image field/key that has been created. Add !!$keyname!! to this template for the image to display. This field/key needs a URL to an image - for example: http://www.yourdomain.com/some_image.gif
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an extra field/key that has been created. Add !!$keyname!! to this template for it's values to be available.
"
}
}
if ($the_tmpl eq "tophits_listings")
{
$t_title = "Top Hits Listing Style";
$dir_details_r = "This template reflects the HTML code used when displaying the links that was most clicked.";
}
else
{
$t_title = "Top Hits Listing Style";
$dir_details_r = "This template reflects the HTML code used when displaying premium links that was most clicked.";
}
$vars_available_r = "!!title_with_link!!
Replaced by the title of the link and the title is hyperlinked.
!!title_without_link!!
Replaced by the title of the link, but it is not hyperlinked.
!!nr!!
Replaced by the number of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the description of the link.
!!date!!
Replaced by the date of when the link was added.
!!votes!!
Replaced by the number of votes received for this link.
!!rating!!
Replaced by the rating of the link.
!!rate_link_url!!
Replaced by the URL to the page where it can be rated.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!rno!!
Replaced by the number of reviews/comments for this link.
!!review_link_url!!
Replaced by the URL to the review script where users can add a review/comment for this
link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!gethtml!!
Replaced by the URL to a page where the owner can get the HTML code to place on his web
site so that visitors can rate his link.
!!modify_link!!
Replaced by the URL to a page where the owner can modify the link.
!!name!!
Replaced by the name of the link owner.
!!email!!
Replaced by the email address of the link owner. (Not recommended for display)
!!report_dead_link!!
Replaced by the URL to a page where users can report the link as a broken link.
!!more_info_url!!
This will be replaced by a link/URL to a page that contains more information about the link.
If this variable is present in this template, an extra page will be generated with more
information about the link. You can, for example, have extra fields/keys which displays the extra
information if end users click on the 'More Info' link. To customize the extra link information
template, edit the 'Link Info' template.
!!category!!
Replaced by the category of the link.
!!hidden_url!!
This will be replaced by a link to a PowerSeek script that redirects to the URL of the link when clicked.
!!link_image!!
This will be replaced by an uploaded image that was uploaded for the link. You can set the width and height to be fixed by going to the Control Panel >> Settings >> Global Engine Settings >> Directory/Category Listing Settings
!!link_file!!
If something other than an image (like a .pdf or .avi file) was uploaded then this variable can be used and it will be replaced by the full URL path to the file.
$sql_extra_keys
";
}
elsif ($the_tmpl eq "locked")
{
$t_title = "Locked Category/Directory Template";
$dir_details_r = "This template will be displayed to end users when they try to add an URL into a category that is locked. You can lock
categories from the 'Dir Manager' so that new submissions cannot be done in certain categories/directories.";
$vars_available_r = "No variables available for use in this template.";
}
elsif ($the_tmpl eq "locked")
{
$t_title = "Locked Category/Directory Template";
$dir_details_r = "This template will be displayed to end users when they try to add an URL into a category that is locked. You can lock
categories from the 'Dir Manager' so that new submissions cannot be done in certain categories/directories.";
$vars_available_r = "No variables available for use in this template.";
}
elsif ($the_tmpl eq "brokenlink")
{
$t_title = "Broken Link Page";
$dir_details_r = "This template will be displayed to end users when they want to report a broken link.";
$vars_available_r = "!!id!!
This is part of a hidden form variable, replaced by a link ID for use by the broken link script.
!!broken_link_script!!
This is the location/path of the broken link script which handles the reporting of broken links.
!!cid!!
This is part of a hidden form variable, replaced by a category ID for use by the broken link script.
!!title_with_link!!
This is part of a hidden form variable, replaced by a category ID for use by the broken link script.
!!problem!!
Replaced with text explaining a problem if there was a problem in submitting a problem with a link.
!!category_with_link!!
Replaced by the categories with links to these categories where the link resides.
!!title_without_link!!
Replaced by the title of the link.
!!more_info_url!!
Replaced by a link to the 'more info' page of the link.
!!url!!
Replaced by the URL of the link.
";
}
elsif ($the_tmpl eq "brokenlink_success")
{
$t_title = "Successfully Reported Broken Link Page";
$dir_details_r = "This page/template is displayed to end users when they successfully reported a broken link.";
$vars_available_r = "!!category_with_link!!
Replaced by the categories with links to these categories where the link resides.
!!title_without_link!!
Replaced by the title of the link.
!!more_info_url!!
Replaced by a link to the 'more info' page of the link.
!!url!!
Replaced by the URL of the link.
";
}
elsif ($the_tmpl eq "mlist1")
{
$t_title = "Mailing List Removal Template";
$dir_details_r = "This page/template is displayed to end users when they are about to remove themselves from the mailing list.";
$vars_available_r = "!!removalscript!!
This variable is replaced by the path to the mailing list removal script.
";
}
elsif ($the_tmpl eq "mlist2")
{
$t_title = "Mailing List Removal Problem";
$dir_details_r = "This page/template is displayed to end users when there was a problem removing their email address from the mailing list.";
$vars_available_r = "No variables available for use in this template.";
}
elsif ($the_tmpl eq "mlist3")
{
$t_title = "Mailing List Removal Success";
$dir_details_r = "This page/template is displayed to end users when their email addresses was successfully removed from the mailing list.";
$vars_available_r = "No variables available for use in this template.";
}
elsif ($the_tmpl eq "kanoodle_searchres")
{
$t_title = "Kanoodle.com Links Style";
$dir_details_r = "This template is used when displaying matched links after a Kanoodle PPC search.";
$vars_available_r = "!!kan_title_with_clickurl!!
This variable will show the heading as well as the link to click to kanoodle.com.
!!kan_description!!
Description of the result as provided by Kanoodle.
!!kan_url!!
URL to the website. Not to kanoodle but the actual bidders website.
!!kan_bidprice!!
It shows in US cents the price the bidder will pay for a click through.
!!kan_clickurl!!
The actual \"<a href>\" link the user will have to click on to register the click through.
!!kan_title!!
The title of the Website.
";
}
elsif ($the_tmpl eq "searchfeed_searchres")
{
$t_title = "Searchfeed.com Links Style";
$dir_details_r = "This template is used when displaying matched links after a Searchfeed PPC search.";
$vars_available_r = "!!searchfeed_title_with_clickurl!!
This variable will show the heading as well as the link to click to Searchfeed.com.
!!searchfeed_description!!
Description of the result as provided by Searchfeed.
!!searchfeed_url!!
URL to the website. Not to Searchfeed but the actual bidders Website.
!!searchfeed_bidprice!!
It shows in US cents the price the bidder will pay for a click through.
!!searchfeed_clickurl!!
The actual \"<a href>\" link the user will have to click on to register the click through.
!!searchfeed_title!!
The title of the Website.
";
}
elsif ($the_tmpl eq "searchresdir")
{
$t_title = "Main Directory Search Page";
$dir_details_r = "This template is used to display category/directory search results.";
$vars_available_r = "%%keywords%%
Replaced by the keywords that was search for.
%%link_matches%%
Indicates the number of matches foun
%%prevnext%%
Replaced by next/previous page navigation links.
%%searchresults%%
Replaced by search results.
";
}
elsif ($the_tmpl eq "lsearchres_locdir")
{
$t_title = "Directory Links Style";
$dir_details_r = "Defines the style of directories/categories that matched in a search.";
$vars_available_r = "!!nr!!
Replaced by a number to indicate the link number in the match list.
!!category!!
Replaced by the category name that matched.
!!description!!
Replaced by a category description.
";
}
elsif ($the_tmpl eq "fav_main")
{
$t_title = "Main Favourites Template";
$dir_details_r = "This template acts like a frame around favorite links that has been flagged by visitors as their favourites.";
$vars_available_r = "!!favorites!!
Replaced by favorite link listings that visitors has flagged as their favorites.
";
}
elsif (($the_tmpl eq "fav_standard") or ($the_tmpl eq "fav_premium"))
{
if ($the_tmpl eq "fav_standard")
{
$t_title = "Favorites Link Style";
$dir_details_r = "This template reflects the HTML code used when displaying a visitor's favorite links.";
}
else
{
$t_title = "Favorites Link Style Premium";
$dir_details_r = "This template reflects the HTML code used when displaying a visitor's favorite premium links.";
}
$keydata = acs::get_file_contents("$data_dir/keys.dat");
@akeys = split (/\n/, $keydata);
$knr = @akeys;
foreach $k_item (@akeys)
{
($keyname, $visible, $size, $searched, $description, $na, $imgk) = split (/\t/, $k_item);
$real_kname = $keyname . "_cust";
if ($imgk eq "Yes")
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an image field/key that has been created. Add !!$keyname!! to this template for the image to display. This field/key needs a URL to an image - for example: http://www.yourdomain.com/some_image.gif
"
}
else
{
$sql_extra_keys = $sql_extra_keys . "
!!$keyname!!
This is an extra field/key that has been created. Add !!$keyname!! to this template for it's values to be available.
"
}
}
$vars_available_r = "
!!title_with_link!!
Replaced by the title of the link and the title is hyperlinked.
!!title_without_link!!
Replaced by the title of the link, but it is not hyperlinked.
!!nr!!
Replaced by the number of the link.
!!description!!
Replaced by the description of the link.
!!url!!
Replaced by the description of the link.
!!date!!
Replaced by the date of when the link was added.
!!votes!!
Replaced by the number of votes received for this link.
!!rating!!
Replaced by the rating of the link.
!!rate_link_url!!
Replaced by the URL to the page where it can be rated.
!!rating_image!!
Replaced by an image representing the rating of the link.
!!rno!!
Replaced by the number of reviews/comments for this link.
!!review_link_url!!
Replaced by the URL to the review script where users can add a review/comment for this link.
!!hits!!
Replaced by the number of hits [mouse-clicks] the link has received.
!!gethtml!!
Replaced by the URL to a page where the owner can get the HTML code to place on his web site so that visitors can rate his link.
!!modify_link!!
Replaced by the URL to a page where the owner can modify the link.
!!name!!
Replaced by the name of the link owner.
!!email!!
Replaced by the email address of the link owner. (Not recommended for display)
!!report_dead_link!!
Replaced by the URL to a page where users can report the link as a broken link.
!!more_info_url!!
This will be replaced by a link/URL to a page that contains more information about the link. If this variable is present in this template, an extra page will be generated with more information about the link. You can, for example, have extra fields/keys which displays the extra information if end users click on the 'More Info' link. To customize the extra link information template, edit the 'Link Info' template.
!!category!!
Replaced by the category of the link.
!!hidden_url!!
This will be replaced by a link to a PowerSeek script that redirects to the URL of the link when clicked.
!!link_image!!
This will be replaced by an uploaded image that was uploaded for the link. You can set the width and height to be fixed by going to the Control Panel >> Settings >> Global Engine Settings >> Directory/Category Listing Settings
!!link_file!!
If something other than an image (like a .pdf or .avi file) was uploaded then this variable can be used and it will be replaced by the full URL path to the file.
$sql_extra_keys
";
}
elsif ($the_tmpl eq "fav_none")
{
$t_title = "No Favorites Added Yet";
$dir_details_r = "This template is displayed with the 'Main Favorites' (fav_main.html) when no favorites has been added yet.";
}
elsif ($the_tmpl eq "contact_form")
{
$t_title = "Contact Us Form";
$dir_details_r = "This template is displayed to a user when he/she clicked the contact us link.";
}
elsif ($the_tmpl eq "contact_thank")
{
$t_title = "Contact Us Thank You";
$dir_details_r = "This template is displayed when a user successfully completed the contact form.";
}
elsif ($the_tmpl eq "reg_success_paypal")
{
$t_title = "Success Page PayPal Purchase";
$dir_details_r = "This template is displayed when a user successfully submitted and paid for a link via PayPal.";
}
return($dir_details_r, $vars_available_r, $t_title);
}
sub favorites
{
($fav_main, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("fav_main");
($fav_standard, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("fav_standard");
($fav_premium, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("fav_premium");
($fav_none, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("fav_none");
$favorites_ret = qq[
];
return ($favorites_ret);
}
sub mail_remove
{
($mlist1, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("mlist1");
($mlist2, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("mlist2");
($mlist3, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("mlist3");
$mail_remove_ret = qq[
];
return ($mail_remove_ret);
}
sub broke_templ
{
($brokenlink, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("brokenlink");
($brokenlink_success, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("brokenlink_success");
$broke_templ_ret = qq[
];
return ($broke_templ_ret);
}
sub tophits
{
($tophits_main, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("tophits_main");
($tophits_listings, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("tophits_listings");
($tophits_listings_prem, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("tophits_listings_prem");
$tophits_ret = qq[
];
return ($tophits_ret);
}
sub whatsnew
{
($whatsnew_main, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("whatsnew_main");
($whatsnew_lists, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("whatsnew_lists");
($whatsnew_lists_prem, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("whatsnew_lists_prem");
$whatsnew_ret = qq[
];
return ($whatsnew_ret);
}
sub comments
{
($review_it, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("review_it");
($reviewlinks, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("reviewlinks");
($reviewadded, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("reviewadded");
($reviewproblem, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("reviewproblem");
$comments_ret = qq[
];
return ($comments_ret);
}
sub ratings_templates
{
($rate_it, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("rate_it");
($rate_it_success, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("rate_it_success");
($rate_it_fail, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("rate_it_fail");
($gethtml, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("gethtml");
$ratings_templates_ret = qq[
];
return ($ratings_templates_ret);
}
sub add_url_tmpls2
{
$gsettings = new_gsettings acs;
if ($gsettings->{add_url_form} eq "medium")
{
$medium_sized = "(In Use)";
$large_sized = "(Not In Use)";
$add_urlinst = "(Not In Use)";
}
else
{
$large_sized = "(In Use)";
$medium_sized = "(Not In Use)";
$add_urlinst = "(In Use)";
}
($add_url_med, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("add_url_med");
($add_url, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("add_url");
($add_url_medp, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("add_url_medp");
($add_urlp, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("add_urlp");
($add_url_instructions, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("add_url_instructions");
($locked, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("locked");
($add_url_problem, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("add_url_problem");
($add_url_success, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("add_url_success");
($modify_link, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("modify_link");
($modify_link_problem, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("modify_link_problem");
($modify_link_success, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("modify_link_success");
($modify_link_edit, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("modify_link_edit");
($modify_link_editp, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("modify_link_editp");
($modify_instructions, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("modify_instructions");
($retrievepass, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("retrievepass");
($retrievepass_ok, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("retrievepass_ok");
($retrievepass_prb, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("retrievepass_prb");
#### PayPal
$paypalsettings = acs::get_file_contents("$data_dir/paypalset.dat");
@paypalset = split (/\n/,$paypalsettings);
if ($paypalset[0] eq "Y")
{
$paypal_templates = qq[
Success Page PayPal Purchase |
reg_success_paypal.html |
Preview |
];
}
$add_url_tmpls2_ret = qq[
];
return ($add_url_tmpls2_ret);
}
sub add_url_tmpls
{
$gsettings = new_gsettings acs;
if ($gsettings->{add_url_form} eq "medium")
{
$medium_sized = "(In Use)";
$large_sized = "(Not In Use)";
$add_urlinst = "(Not In Use)";
$addtmp = acs::get_file_contents("$data_dir/rgs_add_url_med.html");
if ($addtmp !~ /!!error_text!!/) { $add_url_prb_display = "true"; }
$addtmp = acs::get_file_contents("$data_dir/rgs_add_url_medp.html");
if ($addtmp !~ /!!error_text!!/) { $add_url_prb_display = "true"; }
}
else
{
$large_sized = "(In Use)";
$medium_sized = "(Not In Use)";
$add_urlinst = "(In Use)";
$addtmp = acs::get_file_contents("$data_dir/rgs_add_url.html");
if ($addtmp !~ /!!error_text!!/) { $add_url_prb_display = "true"; }
$addtmp = acs::get_file_contents("$data_dir/rgs_add_urlp.html");
if ($addtmp !~ /!!error_text!!/) { $add_url_prb_display = "true"; }
}
$modstt1 = acs::get_file_contents("$data_dir/rgs_modify_link_edit.html");
if ($modstt1 !~ /!!error_text!!/) { $modprdisplay = "true"; }
$modstt2 = acs::get_file_contents("$data_dir/rgs_modify_link_editp.html");
if ($modstt2 !~ /!!error_text!!/) { $modprdisplay = "true"; }
if ($gsettings->{new_account_validation} eq "Yes")
{
$ratit_text = "Users are required to register an account to be able to rate listings";
}
else
{
$ratit_text = "Users are not required to register an account to be able to rate listings";
}
if ($gsettings->{comments_reg_system} eq "Yes")
{
$comm_text = "Users are required to register an account to be able to post comments to listings";
}
else
{
$comm_text = "Users are not required to register an account to be able to post comments to listings";
}
if ($add_url_prb_display eq "true")
{
$add_urlprbp = qq[
 Problem Page |
rgs_add_url_problem.html |
Preview |
];
}
if ($modprdisplay eq "true")
{
$modprb1 = qq[
| Modify Link Problem |
rgs_modify_link_problem.html |
Preview |
];
}
$pdset = acs::get_file_contents("$data_dir/paypalset.dat");
@ppsettings = split (/\n/, $pdset);
$usepaypal = $ppsettings[0];
$inusecnt = 0;
$expirytsettings = acs::get_file_contents("$data_dir/pexpiryopt.dat");
@expsettings = split (/\n/, $expirytsettings);
foreach $item (@expsettings)
{
($usdprice, $premium_expire_days, $premium_orderform_url, $standard_orderform_url) = split (/::/, $item);
if ($premium_expire_days > 0) { $inusecnt++; }
}
if ($inusecnt < 2) { $upgrade_option_in_use = "(Not in Use)"; }
if ($usepaypal eq "Y")
{
$paypal_success = qq[
|
Success Page PayPal Purchase
|
rgs_regsuccess_paypal.html |
Preview |
|
Upgrade Page Standard to Premium
$upgrade_option_in_use |
rgs_upgrade.html |
Preview |
|
Upgrade Page PayPal Purchase Success
|
rgs_upgrade_paypal_success.html |
Preview |
];
}
else
{
$paypal_success = qq[
|
Upgrade Page Standard to Premium
$upgrade_option_in_use |
rgs_upgrade.html |
Preview |
];
}
$add_url_tmpls_ret = qq[
];
return ($add_url_tmpls_ret);
}
sub search_results
{
($searchres, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("searchres");
($searchadv, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("searchadv");
($lsearchres_loc, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("lsearchres_loc");
($lsearchres_loc_prem, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("lsearchres_loc_prem");
($nomatch, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("nomatch");
($flood, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("flood");
($searchresdir, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("searchresdir");
($lsearchres_locdir, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("lsearchres_locdir");
($searchadv1, $tmp) = split (/You can/, $searchadv);
$search_results_ret = qq[
];
return ($search_results_ret);
}
sub dir_templates
{
$nr=0;
opendir(DIR,"$data_dir");
@files = readdir(DIR);
@files = sort(@files);
foreach $filename (@files)
{
if (substr($filename, length($filename) - 11, 11) eq "-1ctst\.html")
{
$nr++;
}
}
($maincat, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("defdir");
($lnkstyle1, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("tmplsearch");
($lnkstyle2, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("tmplsearch_prem");
($subc1, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("subdirs");
($subc2, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("directories1");
($related1, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("related1");
($related2, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("related2");
($linkinfo1, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("linkinfo");
($linkinfo2, $tmp2, $tmp2) = fmtmplman::get_tmpl_details("linkinfop");
$dir_templates_ret = qq[
Create or Edit Custom Category/Directory Template Sets ($nr)
You can use different category/directory template sets in different categories. Once you've created a custom template, it is selectable when you are in the 'Directory Manager'. Each category in the 'Directory Manager' has a 'Template' option. Click on the option (Example: 'Default') to choose templates for a specific category. The number in the brackets displayed above indicates the number of sets already created. |
];
return ($dir_templates_ret);
}
sub pgbreak
{
my ($ptext) = @_;
my ($pret);
my @pgitems = split (/ /, $ptext);
$pcnt = 0;
foreach $item (@pgitems)
{
if ($pcnt == 10)
{
$pret = $pret . "
" . $item . " ";
$pcnt = 0;
}
else
{
$pret = $pret . $item . " ";
$pcnt++;
}
}
return ($pret);
}
sub get_setup
{
if ((-e "config.cgi") and (length($config_cgi) < 15))
{
$cofile = "config.cgi"; $exists = 1;
}
elsif (-e "$config_cgi")
{
$cofile = "$config_cgi"; $exists = 1;
}
else
{
print "Content-type: text/html\n\n";
print "Could not find config.cgi"; exit;
}
#$exists = (-e "config.cgi");
if ($exists > 0)
{
open (STP, $cofile);
while (defined($line=))
{
if ($line =~ m/#/g)
{
$r = pos($line);
$line = substr($line, 0, $r - 1);
}
$line =~ s/\n//g;
if ($line =~ /^DB_NAME/){$db_name = &get_setup_line2($line, DB_NAME);}
if ($line =~ /^DB_USERNAME/){$db_username = &get_setup_line2($line, DB_USERNAME);}
if ($line =~ /^DB_PASSWORD/){$db_password = &get_setup_line2($line, DB_PASSWORD);}
if ($line =~ /^MYSQL_HOSTNAME/){$mysql_hostname = &get_setup_line2($line, MYSQL_HOSTNAME);}
if ($line =~ /^MYSQL_PORT/){$mysql_port = &get_setup_line2($line, MYSQL_PORT);}
if ($line =~ /^SCRIPT_URL/){$script_url = &get_setup_line2($line, SCRIPT_URL);}
if ($line =~ /^ADMIN_URL/){$admin_url = &get_setup_line2($line, ADMIN_URL);}
if ($line =~ /^WEB_URL/){$web_url = &get_setup_line2($line, WEB_URL);}
if ($line =~ /^WEB_DIR/){$web_dir = &get_setup_line2($line, WEB_DIR);}
if ($line =~ /^DATA_DIR/){$data_dir = &get_setup_line2($line, DATA_DIR);}
if ($line =~ /^USERNAME/){$username = &get_setup_line2($line, USERNAME);}
if ($line =~ /^PASSWORD/){$password = &get_setup_line2($line, PASSWORD);}
if ($line =~ /^MAIL_METHOD/){$mail_method = &get_setup_line2($line, MAIL_METHOD);}
if ($line =~ /^SENDMAIL/){$sendmail = &get_setup_line2($line, SENDMAIL);}
if ($line =~ /^SMTP_SERVER/){$smtp_server = &get_setup_line2($line, SMTP_SERVER);}
}
close (STP);
}
}
sub get_setup_line2
{
my ($setup_line, $setup_var) = @_;
$crit = "\"";
$setup_line =~ m/$crit/g;
$r1 = pos($setup_line);
$setup_line =~ m/$crit/g;
$r2 = pos($setup_line);
$setup_line = substr($setup_line, $r1, ($r2 - $r1 - 1));
$return_val = $setup_line;
return ($return_val);
}
1; 
Favorites Link Style