class.tx_nG6_pi1.php 16.2 KB
Newer Older
Jerome Mariette's avatar
Jerome Mariette committed
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
<?php
/***************************************************************
*  Copyright notice
*
*  (c) 2009 PF bioinformatique de Toulouse <>
*  All rights reserved
*
*  This script is part of the TYPO3 project. The TYPO3 project is
*  free software; you can redistribute it and/or modify
*  it under the terms of the GNU General Public License as published by
*  the Free Software Foundation; either version 2 of the License, or
*  (at your option) any later version.
*
*  The GNU General Public License can be found at
*  http://www.gnu.org/copyleft/gpl.html.
*
*  This script is distributed in the hope that it will be useful,
*  but WITHOUT ANY WARRANTY; without even the implied warranty of
*  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
*  GNU General Public License for more details.
*
*  This copyright notice MUST APPEAR in all copies of the script!
***************************************************************/
/**
 * Plugin 'nG6' for the 'nG6' extension.
 *
 * @author	PF bioinformatique de Toulouse <>
 */

require_once(PATH_tslib.'class.tslib_pibase.php');
31
32
require_once(t3lib_extMgm::extPath('nG6').'/lib/class.tx_nG6_db.php');
require_once(t3lib_extMgm::extPath('nG6').'/lib/class.tx_nG6_utils.php');
33
require_once(t3lib_extMgm::extPath('nG6').'/res/smarty/libs/Smarty.class.php'); 
Jerome Mariette's avatar
Jerome Mariette committed
34
35

class tx_nG6_pi1 extends tslib_pibase {
Jerome Mariette's avatar
sql ok    
Jerome Mariette committed
36
	
Jerome Mariette's avatar
Jerome Mariette committed
37
38
39
40
41
42
43
44
45
46
47
48
	var $prefixId = 'tx_nG6_pi1';		// Same as class name
	var $scriptRelPath = 'pi1/class.tx_nG6_pi1.php';	// Path to this script relative to the extension dir.
	var $extKey = 'nG6';	// The extension key.
	
	/**
	 * Main method of your PlugIn
	 *
	 * @param	string		$content: The content of the PlugIn
	 * @param	array		$conf: The PlugIn Configuration
	 * @return	The content that should be displayed on the website
	 */
	function main($content,$conf)	{
Jerome Mariette's avatar
sql ok    
Jerome Mariette committed
49
		
Jerome Mariette's avatar
Jerome Mariette committed
50
51
52
		if (strstr($this->cObj->currentRecord,'tt_content'))	{
			$conf['pidList'] = $this->cObj->data['pages'];
		}
Jerome Mariette's avatar
Jerome Mariette committed
53
54
		// Setting the TypoScript passed to this function in $this->conf
		$this->conf=$conf;
55
		
Jerome Mariette's avatar
sql ok    
Jerome Mariette committed
56
		$this->pi_setPiVarDefaults();
Jerome Mariette's avatar
Jerome Mariette committed
57
58
59
60
		// Configuring so caching is not expected. This value means that no cHash params are ever set. We do this, because it's a USER_INT object!
		$this->pi_USER_INT_obj=1;
		// Loading the LOCAL_LANG values
		$this->pi_loadLL();
Jerome Mariette's avatar
Jerome Mariette committed
61
	
62
		// Add the ng6 plugins css
Jerome Mariette's avatar
Jerome Mariette committed
63
64
65
66
67
68
69
		$GLOBALS['TSFE']->additionalHeaderData[$this->prefixId] = '
			<script type="text/javascript" src="'.t3lib_extMgm::siteRelPath($this->extKey).'res/js/jquery.js"></script>
			<script type="text/javascript" src="'.t3lib_extMgm::siteRelPath($this->extKey).'res/js/jquery.ui.core.min.js"></script>
			<script type="text/javascript" src="'.t3lib_extMgm::siteRelPath($this->extKey).'res/js/jquery.ui.dialog.min.js"></script>
			<script type="text/javascript" src="'.t3lib_extMgm::siteRelPath($this->extKey).'res/js/jquery.ui.draggable.min.js"></script>
			<script type="text/javascript" src="'.t3lib_extMgm::siteRelPath($this->extKey).'res/js/jquery.ui.resizable.min.js"></script> 
			<script type="text/javascript" src="'.t3lib_extMgm::siteRelPath($this->extKey).'res/js/jquery.bgiframe.min.js"></script>
70
71
			<script type="text/javascript" src="'.t3lib_extMgm::siteRelPath($this->extKey).'res/js/jquery.dataTables.min.js"></script>
			<script type="text/javascript" src="'.t3lib_extMgm::siteRelPath($this->extKey).'res/js/jquery.dataTables.plugins.js"></script>
Jerome Mariette's avatar
Jerome Mariette committed
72
73
			<script type="text/javascript" src="'.t3lib_extMgm::siteRelPath($this->extKey).'res/js/jquery.url.packed.js"></script>
			<script type="text/javascript" src="'.t3lib_extMgm::siteRelPath($this->extKey).'res/js/tx_nG6_pi1.js"></script>
74
			<link type="text/css" rel="stylesheet" media="screen" href="'.t3lib_extMgm::siteRelPath($this->extKey).'res/css/jquery.dataTables.css"/>
Jerome Mariette's avatar
Jerome Mariette committed
75
76
77
78
79
			<link type="text/css" rel="stylesheet" media="screen" href="'.t3lib_extMgm::siteRelPath($this->extKey).'res/css/tx_nG6.css"/>
			<link type="text/css" rel="stylesheet" media="screen" href="'.t3lib_extMgm::siteRelPath($this->extKey).'res/css/jquery.ui.core.css"/>
			<link type="text/css" rel="stylesheet" media="screen" href="'.t3lib_extMgm::siteRelPath($this->extKey).'res/css/jquery.ui.theme.css"/>
			<link type="text/css" rel="stylesheet" media="screen" href="'.t3lib_extMgm::siteRelPath($this->extKey).'res/css/jquery.ui.dialog.css"/>';
		
Jerome Mariette's avatar
Jerome Mariette committed
80
		// If the user is authorized to access the specified project/run, display the page
81
		if (tx_nG6_db::user_is_authorized($GLOBALS['TSFE']->fe_user->user['usergroup'], $this->piVars['project_id'], $this->piVars['run_id'])) {
Jerome Mariette's avatar
sql ok    
Jerome Mariette committed
82
			switch((string)$this->conf['view'])	{
Jerome Mariette's avatar
Jerome Mariette committed
83
				// If the plugin is configured to display results by project
Jerome Mariette's avatar
Jerome Mariette committed
84
85
				case 'project':
					if ($this->piVars['analyze_id']) {
Jerome Mariette's avatar
Jerome Mariette committed
86
						$content .= $this->pi_analyze_view();
Jerome Mariette's avatar
Jerome Mariette committed
87
					} elseif ($this->piVars['project_id'] && $this->piVars['run_id']) {
Jerome Mariette's avatar
Jerome Mariette committed
88
						$content .= $this->pi_run_view();
Jerome Mariette's avatar
Jerome Mariette committed
89
					} else {
Jerome Mariette's avatar
Jerome Mariette committed
90
						$content .= $this->pi_project_view();
Jerome Mariette's avatar
Jerome Mariette committed
91
92
					}
					break;
Jerome Mariette's avatar
Jerome Mariette committed
93
				// If the plugin is configured to display results by run
Jerome Mariette's avatar
Jerome Mariette committed
94
95
				case 'run':
					if ($this->piVars['analyze_id']) {
Jerome Mariette's avatar
Jerome Mariette committed
96
						$content .= $this->pi_analyze_view();
Jerome Mariette's avatar
Jerome Mariette committed
97
					} else {
Jerome Mariette's avatar
Jerome Mariette committed
98
						$content .= $this->pi_run_view();
Jerome Mariette's avatar
Jerome Mariette committed
99
					}
Jerome Mariette's avatar
Jerome Mariette committed
100
101
					break;
				// If the plugin is not configured, display by project is default
Jerome Mariette's avatar
Jerome Mariette committed
102
				default:
Jerome Mariette's avatar
Jerome Mariette committed
103
					$content .= $this->pi_project_view();
Jerome Mariette's avatar
Jerome Mariette committed
104
					break;
Jerome Mariette's avatar
Jerome Mariette committed
105
			}
Jerome Mariette's avatar
Jerome Mariette committed
106
		// If the user is not authorized
Jerome Mariette's avatar
Jerome Mariette committed
107
		} else {
Jerome Mariette's avatar
Jerome Mariette committed
108
			$content .= $this->pi_getLL('not_authorized','[not_authorized]');
Jerome Mariette's avatar
Jerome Mariette committed
109
		}
Jerome Mariette's avatar
Jerome Mariette committed
110
		return $this->pi_wrapInBaseClass($content);
Jerome Mariette's avatar
Jerome Mariette committed
111
	}
Jerome Mariette's avatar
Jerome Mariette committed
112

Jerome Mariette's avatar
Jerome Mariette committed
113
	/**
Jerome Mariette's avatar
Jerome Mariette committed
114
	 * Return the project view
Jerome Mariette's avatar
Jerome Mariette committed
115
	 */
Jerome Mariette's avatar
sql ok    
Jerome Mariette committed
116
	function pi_project_view()	{
Jerome Mariette's avatar
Jerome Mariette committed
117
118
119
120
121
		
		$projects = array();
		// If a single element
		if ($this->piVars['project_id']) {
			$projects = array('project_'.$this->piVars['project_id'] => tx_nG6_db::select_project($this->piVars['project_id']));
Jerome Mariette's avatar
Jerome Mariette committed
122
		} else {
Jerome Mariette's avatar
Jerome Mariette committed
123
			$projects = tx_nG6_db::select_all_user_projects($GLOBALS['TSFE']->fe_user->user['usergroup'], 'tx_nG6_project.name');
Jerome Mariette's avatar
Jerome Mariette committed
124
		}
Jerome Mariette's avatar
Jerome Mariette committed
125
126
127
128
129
130
131
		$smarty = new Smarty();
		$smarty->setTemplateDir(t3lib_extMgm::extPath('nG6').'/pi1');
		$smarty->setCompileDir(t3lib_extMgm::extPath('nG6').'/res/smarty/templates_c');
		$smarty->setCacheDir(t3lib_extMgm::extPath('nG6').'/res/smarty/cache');
		$smarty->setConfigDir(t3lib_extMgm::extPath('nG6').'/res/smarty/configs');
		$smarty->security = true;
		$smarty->security_settings['MODIFIER_FUNCS'] = array('count');
Jerome Mariette's avatar
Jerome Mariette committed
132

Jerome Mariette's avatar
Jerome Mariette committed
133
		// Add some information to the table
134
		$project_size = 0;
135
		foreach($projects as $project_id => $project_values) {
Jerome Mariette's avatar
Jerome Mariette committed
136
137
138
139
			if (tx_nG6_db::is_super_user($GLOBALS['TSFE']->fe_user->user['usergroup'], 'project', $project_values['id']) ) {
				$projects[$project_id]['superuser'] = true;
			} else {
				$projects[$project_id]['superuser'] = false;
140
			}
141
			$project_size += tx_nG6_db::get_project_size($project_values['id'], $this->conf["data"], $GLOBALS['TSFE']->fe_user->user['usergroup']);
Jerome Mariette's avatar
Jerome Mariette committed
142
			$projects[$project_id]['href'] = $this->pi_list_linkSingle($project_values['name'],$project_values['id'],1, array('project_id'=>$project_values['id']));
143
		}
Jerome Mariette's avatar
Jerome Mariette committed
144
145
146
147
148
		$smarty->assign('projects', $projects);
		$smarty->assign('login_user', $GLOBALS['TSFE']->loginUser);
		$smarty->assign('user_group', $GLOBALS['TSFE']->fe_user->user['usergroup']);
		$smarty->assign('data_folder', $this->conf["data"]);
		$smarty->assign('server_name', $this->conf["server_name"]);
149
		$smarty->assign('project_size', tx_nG6_utils::get_octet_string_representation($project_size));
Jerome Mariette's avatar
Jerome Mariette committed
150
151
152
		
		// If it's a single project, add runs and analysis information
		if (count($projects) == 1) {
Jerome Mariette's avatar
Jerome Mariette committed
153

Jerome Mariette's avatar
Jerome Mariette committed
154
155
156
157
158
159
160
161
162
			$project_runs = tx_nG6_db::get_project_runs($GLOBALS['TSFE']->fe_user->user['usergroup'], $projects[key($projects)]['id']);
			// Add some information to the table
			foreach($project_runs as $run_id => $run_values) {
				if (tx_nG6_db::is_super_user($GLOBALS['TSFE']->fe_user->user['usergroup'], 'run', $run_values['id']) ) {
					$project_runs[$run_id]['superuser'] = true;
				} else {
					$project_runs[$run_id]['superuser'] = false;
				}
				$project_runs[$run_id]['href'] = $this->pi_list_linkSingle($run_values['name'],$run_values['id'],1, array('run_id'=>$run_values['id'], 'project_id'=>$run_values['project_id']));
163
			}
Jerome Mariette's avatar
Jerome Mariette committed
164
165
166
167
168
169
170
171
172
173
174
175
			$smarty->assign('project_runs', $project_runs);
			$project_analysis = tx_nG6_db::get_project_analysis($GLOBALS['TSFE']->fe_user->user['usergroup'], $projects[key($projects)]['id']);
			// Add some information to the table
			foreach($project_analysis as $analysis_id => $analysis_values) {
				if (tx_nG6_db::is_super_user($GLOBALS['TSFE']->fe_user->user['usergroup'], 'analyze', $analysis_values['id']) ) {
					$project_analysis[$analysis_id]['superuser'] = true;
				} else {
					$project_analysis[$analysis_id]['superuser'] = false;
				}
				$project_analysis[$analysis_id]['href'] = $this->pi_list_linkSingle($analysis_values['name'],$analysis_values['id'],1, array('analyze_id'=>$analysis_values['id'], 'project_id'=>$projects[key($projects)]['uid']));
			}
			$smarty->assign('project_analysis', $project_analysis);
176
		}
Jerome Mariette's avatar
Jerome Mariette committed
177
178
179
180
181
182
		if (isset($this->LOCAL_LANG[$this->LLkey]) && count($this->LOCAL_LANG[$this->LLkey]) > 0) {
			$smarty->assign('llang', $this->LOCAL_LANG[$this->LLkey]);
		} else {
			$smarty->assign('llang', $this->LOCAL_LANG['default']);
		}			
		return $smarty->fetch('project_view.tpl');
Jerome Mariette's avatar
Jerome Mariette committed
183
184

	}
Jerome Mariette's avatar
sql ok    
Jerome Mariette committed
185

Jerome Mariette's avatar
Jerome Mariette committed
186
	/**
Jerome Mariette's avatar
Jerome Mariette committed
187
	 * Return the run view
Jerome Mariette's avatar
Jerome Mariette committed
188
	 */
Jerome Mariette's avatar
sql ok    
Jerome Mariette committed
189
    function pi_run_view() {
Jerome Mariette's avatar
Jerome Mariette committed
190
191
192
193
194
195
		$runs = array();
		// If a single element
		if ($this->piVars['run_id']) {
			$runs = array('run_'.$this->piVars['run_id'] => tx_nG6_db::select_run($this->piVars['run_id']));
		} else {
			$runs = tx_nG6_db::select_all_user_runs($GLOBALS['TSFE']->fe_user->user['usergroup']);
Jerome Mariette's avatar
Jerome Mariette committed
196
		}
Jerome Mariette's avatar
Jerome Mariette committed
197
198
199
200
201
202
203
		$smarty = new Smarty();
		$smarty->setTemplateDir(t3lib_extMgm::extPath('nG6').'/pi1');
		$smarty->setCompileDir(t3lib_extMgm::extPath('nG6').'/res/smarty/templates_c');
		$smarty->setCacheDir(t3lib_extMgm::extPath('nG6').'/res/smarty/cache');
		$smarty->setConfigDir(t3lib_extMgm::extPath('nG6').'/res/smarty/configs');
		$smarty->security = true;
		$smarty->security_settings['MODIFIER_FUNCS'] = array('count');
Jerome Mariette's avatar
sql ok    
Jerome Mariette committed
204

Jerome Mariette's avatar
Jerome Mariette committed
205
		// Add some information to the table
206
		$run_size = 0;
207
		foreach($runs as $run_id => $run_values) {
Jerome Mariette's avatar
Jerome Mariette committed
208
209
210
211
			if (tx_nG6_db::is_super_user($GLOBALS['TSFE']->fe_user->user['usergroup'], 'run', $run_values['id']) ) {
				$runs[$run_id]['superuser'] = true;
			} else {
				$runs[$run_id]['superuser'] = false;
212
			}
Jerome Mariette's avatar
Jerome Mariette committed
213
214
215
216
			if ($this->piVars['project_id']) {
				$runs[$run_id]['href'] = $this->pi_list_linkSingle($run_values['name'],$run_values['id'],1, array('run_id'=>$run_values['id'], 'project_id'=>$run_values['project_id']));	
			} else {
				$runs[$run_id]['href'] = $this->pi_list_linkSingle($run_values['name'],$run_values['id'],1, array('run_id'=>$run_values['id']));
Jerome Mariette's avatar
Jerome Mariette committed
217
			}
218
			$run_size += tx_nG6_db::get_run_size($run_values['id'], $this->conf["data"], $GLOBALS['TSFE']->fe_user->user['usergroup']);
219
		}
Jerome Mariette's avatar
Jerome Mariette committed
220
221
222
223
224
225
		$smarty->assign('runs', $runs);
		$smarty->assign('first_id', key($runs));
		$smarty->assign('login_user', $GLOBALS['TSFE']->loginUser);
		$smarty->assign('user_group', $GLOBALS['TSFE']->fe_user->user['usergroup']);
		$smarty->assign('data_folder', $this->conf["data"]);
		$smarty->assign('server_name', $this->conf["server_name"]);
226
		$smarty->assign('run_size', tx_nG6_utils::get_octet_string_representation($run_size));
227
		
Jerome Mariette's avatar
Jerome Mariette committed
228
229
230
231
232
233
234
235
236
237
238
239
240
241
		// If it's a single run, add analysis information
		if (count($runs) == 1) {
			$run_analysis = tx_nG6_db::get_run_analysis($GLOBALS['TSFE']->fe_user->user['usergroup'], $runs[key($runs)]['id']);
			// Add some information to the table
			foreach($run_analysis as $analysis_id => $analysis_values) {
				if (tx_nG6_db::is_super_user($GLOBALS['TSFE']->fe_user->user['usergroup'], 'analyze', $analysis_values['id']) ) {
					$run_analysis[$analysis_id]['superuser'] = true;
				} else {
					$run_analysis[$analysis_id]['superuser'] = false;
				}
				if ($this->piVars['project_id']) {
					$run_analysis[$analysis_id]['href'] = $this->pi_list_linkSingle($analysis_values['name'],$analysis_values['id'],1, array('analyze_id'=>$analysis_values['id'], 'project_id'=>$this->piVars['project_id'], 'run_id'=>$this->piVars['run_id']));
				} else {
					$run_analysis[$analysis_id]['href'] = $this->pi_list_linkSingle($analysis_values['name'],$analysis_values['id'],1, array('analyze_id'=>$analysis_values['id'], 'run_id'=>$this->piVars['run_id']));
Jerome Mariette's avatar
Jerome Mariette committed
242
243
				}
			}
Jerome Mariette's avatar
Jerome Mariette committed
244
			$smarty->assign('run_analysis', $run_analysis);
Jerome Mariette's avatar
Jerome Mariette committed
245
		}
Jerome Mariette's avatar
Jerome Mariette committed
246
247
		if (isset($this->LOCAL_LANG[$this->LLkey]) && count($this->LOCAL_LANG[$this->LLkey]) > 0) {
			$smarty->assign('llang', $this->LOCAL_LANG[$this->LLkey]);
Jerome Mariette's avatar
Jerome Mariette committed
248
		} else {
Jerome Mariette's avatar
Jerome Mariette committed
249
250
251
			$smarty->assign('llang', $this->LOCAL_LANG['default']);
		}			
		return $smarty->fetch('run_view.tpl');
Jerome Mariette's avatar
Jerome Mariette committed
252

Jerome Mariette's avatar
Jerome Mariette committed
253
    }
Jerome Mariette's avatar
sql ok    
Jerome Mariette committed
254

Jerome Mariette's avatar
Jerome Mariette committed
255
	/**
Jerome Mariette's avatar
Jerome Mariette committed
256
	 * Return the analysis view
Jerome Mariette's avatar
Jerome Mariette committed
257
	 */
Jerome Mariette's avatar
Jerome Mariette committed
258
	function pi_analyze_view() {
259
260

		// First select the analyse
Jerome Mariette's avatar
Jerome Mariette committed
261
		$analyse = tx_nG6_db::select_analyse($this->piVars['analyze_id']);
Jerome Mariette's avatar
Jerome Mariette committed
262
		
263
264
265
266
267
268
269
270
271
272
		// Handle old fashion
		if (file_exists($this->conf['data'].$analyse['directory'].'/index.html' )) {
			// Add the analyse description
			$content = '<div id="img_dialog" title=""></div>';
			$content .= '<input type="hidden" id="analyse_name" value="'.$analyse['name'].'" />';
			$content .= '<div'.$this->pi_classParam('singleView').'>';
			$content .= '<h2>Analyse '.$analyse['name'].' : <span>'.$analyse['description'].'</span></h2></div>';
			$fp = fopen((string)$this->conf['data'].$analyse['directory'].'/index.html',"r");
			while (!feof($fp)) {
				$content .= fgets($fp, 4096);
Jerome Mariette's avatar
Jerome Mariette committed
273
			}
Jerome Mariette's avatar
Jerome Mariette committed
274
			
275
		// Else meaning using smarty
Jerome Mariette's avatar
Jerome Mariette committed
276
		} else {
277
278
279
280
281
282
283
284
285
286
			
			$smarty = new Smarty();
			$smarty->setTemplateDir(t3lib_extMgm::extPath('nG6').'/pi1/analyzes');
			$smarty->setCompileDir(t3lib_extMgm::extPath('nG6').'/res/smarty/templates_c');
			$smarty->setCacheDir(t3lib_extMgm::extPath('nG6').'/res/smarty/cache');
			$smarty->setConfigDir(t3lib_extMgm::extPath('nG6').'/res/smarty/configs');
			$smarty->security = true;
			$smarty->security_settings['MODIFIER_FUNCS'] = array('count');

			$smarty->assign('analyse', $analyse);
287
288
			$analysis_size = tx_nG6_db::get_analysis_size($this->piVars['analyze_id'], $this->conf['data']);
			$smarty->assign('analyse_size', tx_nG6_utils::get_octet_string_representation($analysis_size));
289
290
			
			// Then select analyse results
Jerome Mariette's avatar
Jerome Mariette committed
291
			$results = tx_nG6_db::select_analyse_results($this->piVars['analyze_id']);		
292
293
294
295
296
297
298
299
300
301
			$smarty->assign('analyse_results', $results);
			
			// Select the run file description	
			if ($analyse['run_id'] != 'None') {
				$descriptions = tx_nG6_db::select_mid_descriptions($analyse['run_id']);
			} else {
				$descriptions = array();
			}
			$smarty->assign('descriptions', $descriptions);
			$smarty->assign('data_folder', $this->conf['data']);
Jerome Mariette's avatar
Jerome Mariette committed
302
			if (isset($this->LOCAL_LANG[$this->LLkey]) && count($this->LOCAL_LANG[$this->LLkey]) > 0) {
303
304
305
306
307
				$smarty->assign('llang', $this->LOCAL_LANG[$this->LLkey]);
			} else {
				$smarty->assign('llang', $this->LOCAL_LANG['default']);
			}			
			// Try to process the analyse template
Jerome Mariette's avatar
Jerome Mariette committed
308
309
			try { return $smarty->fetch($analyse['class'].'.tpl'); } 
			catch (Exception $e) { return str_replace(array('###ANALYSE_CLASS###'), array($analyse['class']), $this->pi_getLL('no_template_found','[no_template_found:###ANALYSE_CLASS###]')); }
Jerome Mariette's avatar
Jerome Mariette committed
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
		}
	}
	
	/**
	 * Overloading of the tslib_pibase->pi_list_linkSingle function so piVars[showUid] is not set.
	 * Uses pi_linkTP for the linking
	 *
	 * @param	string		The content string to wrap in <a> tags
	 * @param	integer		UID of the record for which to display details (basically this will become the value of [showUid]
	 * @param	boolean		See pi_linkTP_keepPIvars
	 * @param	array		Array of values to override in the current piVars. Same as $overrulePIvars in pi_linkTP_keepPIvars
	 * @param	boolean		If true, only the URL is returned, not a full link
	 * @param	integer		Alternative page ID for the link. (By default this function links to the SAME page!)
	 * @return	string		The input string wrapped in <a> tags
	 * @see pi_linkTP(), pi_linkTP_keepPIvars()
	 */
	function pi_list_linkSingle($str,$uid,$cache=FALSE,$mergeArr=array(),$urlOnly=FALSE,$altPageId=0)	{
		if ($this->prefixId)	{
			if ($cache)	{
				$overrulePIvars=(array)$mergeArr;
				$str = $this->pi_linkTP($str,Array($this->prefixId=>$overrulePIvars),$cache,$altPageId);
			} else {
				$overrulePIvars=(array)$mergeArr;
				$str = $this->pi_linkTP_keepPIvars($str,$overrulePIvars,$cache,0,$altPageId);
			}

				// If urlOnly flag, return only URL as it has recently be generated.
			if ($urlOnly)	{
				$str = $this->cObj->lastTypoLinkUrl;
			}
		}
		return $str;
	}
		
}

if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['ext/nG6/pi1/class.tx_nG6_pi1.php'])	{
	include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['ext/nG6/pi1/class.tx_nG6_pi1.php']);
}

350
?>