[yahoo_search] at tagSwap.net: Open Source Lasso Code

[yahoo_search]

Description

Link: [yahoo_search]

Author: Jason Huck

Category: Utility

Version: 8.5.x

License:

Posted: Feb. 20, 2007

Updated: Mar. 15, 2007

More by this author...

This tag retrieves search results from Yahoo!'s REST Web Search API. Returns a dictionary containing the result details. Requires [dictionary], [xml_tree], and a valid Yahoo! Application ID. All of the parameters shown in the documentation can be passed to the tag. Note that if you wish to change the type of search performed, you must use 'searchtype' as the param name instead of 'type' to avoid conflicts with Lasso.

The following values are accessible in the resulting object:

->query - The original query used to create the results.
->found - The total found count (note: tends to vary).
->shown - The number of results shown.
->first - The position of the first result shown.
->last - The position of the last result shown.
->previous - The position needed to recreate the previous set of results.
->next - The position needed to create the next set of results.
->results - An array of dictionary objects containing the result data.

Each item in the results array contains the following values:
->title - The title of the page.
->summary - A summary or excerpt of the page.
->url - The URL of the page.
->clickurl - The same URL through Yahoo!'s click-tracking mechanism.

Parameters

none

Sample Usage

var('sr') = yahoo_search(
	-appid='xxxxxx',
	-query=decode_url(action_param('query')),
	-start=(action_param('skip') ? integer(action_param('skip')) | 1),
	-site='www.yoursite.com'
);

if($sr->size);
	'
	<h1>Displaying results ' + $sr->first + ' through ' + $sr->last + ' of ' + $sr->found + ' found for "' + $sr->query + '."</h1>
	<dl>
	';
	
	iterate($sr->results, local('i'));
		'<dt><a href="' + #i->url + '">' + #i->title + '</a></dt>\n';
		'<dd>' + #i->summary + '</dd>\n';
	/iterate;
	
	'
	</dl>
	';
else;
	'No results found.';
/if;

$sr->previous ? '[<a href="' + response_filepath + '?query=' + encode_url($sr->query) + '&skip=' + $sr->previous + '">Previous</a>]';
$sr->next ? '[<a href="' + response_filepath + '?query=' + encode_url($sr->query) + '&skip=' + $sr->next + '">Next</a>]';

Source Code

Click the "Download" button below to retrieve a copy of this tag, including the complete documentation and sample usage shown on this page. Place the downloaded ".inc" file in your LassoStartup folder, restart Lasso, and you can begin using this tag immediately.

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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79

define_tag(
	'search',
	-namespace='yahoo_',
	-req='appid',
	-req='query',
	-opt='region',
	-opt='searchtype',
	-opt='results',
	-opt='start',
	-opt='format',
	-opt='adult_ok',
	-opt='similar_ok',
	-opt='language',
	-opt='country',
	-opt='site',
	-opt='subscription',
	-opt='license',
	-opt='output',
	-opt='callback',
	-priority='replace',
	-description='Returns search results via Yahoo!'
);
	!local_defined('results') ? local('results') = 10;
	
	local('getparams') = array;
	
	iterate(params, local('i'));
		local('p') = #i->first;
		#p->removeleading('-');
		#p == 'searchtype' ? #p = 'type';
		#getparams->insert(#p = #i->second);
	/iterate;
	
	protect;
		local('resp') = xml_tree(
			string(
				include_url(
					'http://search.yahooapis.com/WebSearchService/V1/webSearch',
					-getparams=#getparams,
					-timeout=10
				)
			)
		);
		
		handle_error;
			return;
		/handle_error;
	/protect;
	
	local('out') = dictionary(
		'query' = #query,
		'found' = integer(#resp->totalResultsAvailable),
		'shown' = integer(#resp->totalResultsReturned),
		'first' = integer(#resp->firstResultPosition),
		'results' = array
	);
	
	#out->last = #out->first + #out->shown - 1;
	#out->previous = (#out->first > 1 ? #out->first - #results | null);
	#out->next = (#out->first + #results - 1 < #out->found ? #out->first + #results | null);
	
	// correct for yahoo's strange behavior on the last page of results
	#out->previous < 0 ? #out->previous = null;
	#out->shown < #results ? #out->next = null;
	
	iterate(#resp->Result, local('i'));
		#out->results->insert(
			dictionary(
				'title' = #i->Title->contents,
				'summary' = #i->Summary->contents,
				'url' = #i->Url->contents,
				'clickurl' = #i->ClickUrl->contents
			)
		);
	/iterate;
	
	return(#out);
/define_tag;

Related Tags

Comments

03/15/2007, Jason Huck
Updated.
Added some workarounds for how previous/next skip counts are calculated to account for some funky math returned by the service on the last set of search results.