Jukebox/w3tpl - Revision history

Woozle: updated script to work (at least somewhat) with latest w3tpl syntax

2011-05-31T01:33:30Z

updated script to work (at least somewhat) with latest w3tpl syntax

← Older revision		Revision as of 01:33, 31 May 2011
Line 6:		Line 6:
	=====================		=====================
	<func GetArtists>		<func GetArtists>
	<for db=audioferret table="qryArtists_index" sort="name" ~~name=ar~~>		<for db=audioferret table="qryArtists_index" sort="name">
	<let name=ar_name val="@row~~.ar~~.name" />		<let name=ar_name val="@row.name" />
	<let name=outFunc append>		<let name=outFunc append>
	* </let>		* </let>
	<if comp=@row~~.ar~~.id with=$doArtist>		<if comp=@row.id with=$doArtist>
	<let name=chosen_artist_name copy=ar_name />		<let name=chosen_artist_name copy=ar_name />
	<let name=outFunc append>'''</let>		<let name=outFunc append>'''</let>
Line 16:		Line 16:
	<let name=outFunc append>'''</let>		<let name=outFunc append>'''</let>
	</if><else>		</if><else>
	<let name=outFunc append vars>[{{fullurl:{{PAGENAME}}\|artist=[$@row~~.ar~~.id$]}} </let>		<let name=outFunc append vars>[{{fullurl:{{PAGENAME}}\|artist=[$@row.id$]}} </let>
	<let name=outFunc append copy=ar_name />		<let name=outFunc append copy=ar_name />
	<let name=outFunc append>]</let>		<let name=outFunc append>]</let>
Line 25:		Line 25:
	<let name=sqlFilt vars>idartist=</let>		<let name=sqlFilt vars>idartist=</let>
	<let name=sqlFilt append copy=doArtist />		<let name=sqlFilt append copy=doArtist />
	<for db=audioferret table="Albums" where=$sqlFilt sort="sort, name" ~~name=al~~>		<for db=audioferret table="Albums" where=$sqlFilt sort="sort, name">
	<let name=al_name val="@row~~.al~~.name" />		<let name=al_name val="@row.name" />
	<let name=outFunc append>		<let name=outFunc append>
	* </let>		* </let>
	<let name=outFunc append vars>[{{fullurl:{{PAGENAME}}\|artist=[$doArtist$]&album=[$@row~~.al~~.id$]}} </let>		<let name=outFunc append vars>[{{fullurl:{{PAGENAME}}\|artist=[$doArtist$]&album=[$@row.id$]}} </let>
	<let name=outFunc append copy=al_name />		<let name=outFunc append copy=al_name />
	<let name=outFunc append>]</let>		<let name=outFunc append>]</let>
Line 45:		Line 45:
	<let name=outFunc>		<let name=outFunc>
	{\| </let>		{\| </let>
	<for db=audioferret table="qryTitle_Files" where=$sqlFilt sort="track, name" ~~name=ti~~>		<for db=audioferret table="qryTitle_Files" where=$sqlFilt sort="track, name">
	<let name=outFunc append>		<let name=outFunc append>
	\|-		\|-
	\| '''</let>		\| '''</let>
	<let name=outFunc append copy=@row~~.ti~~.track />		<let name=outFunc append copy=@row.track />
	<let name=outFunc append>'''. </let>		<let name=outFunc append>'''. </let>
	<let name=outFunc append copy=@row~~.ti~~.name />		<let name=outFunc append copy=@row.name />
	<let name=outFunc append> \|\| [</let>		<let name=outFunc append> \|\| [</let>
	<let name=outFunc append copy=urlAudio />		<let name=outFunc append copy=urlAudio />
	<let name=outFunc append copy=@row~~.ti~~.filespec />		<let name=outFunc append copy=@row.filespec />
	<let name=outFunc append> download]</let>		<let name=outFunc append> download]</let>
	</for>		</for>

Woozle: updated description

2009-03-14T20:41:06Z

updated description

← Older revision		Revision as of 20:41, 14 March 2009
Line 1:		Line 1:
	=The Hypertwin Jukebox ~~Demo~~=		=The Hypertwin Jukebox Prototype=
	~~Right now~~, ~~all you can do~~ here ~~is see our music collection; downloads only work within our house network~~.		This was a prototype written in [[htyp:W3TPL\|W3TPL]]; it allowed us to export files over the LAN, but the links were often broken. It is also rather slow, being written in a language being interpreted by a parser written in another interpreted language. I'm leaving it here as an example of working W3TPL code.
	<hide>		<hide>
	=====================		=====================

Woozle: moved Jukebox to Jukebox/w3tpl: replacing with PHP version, but saving this one's edit history

2009-03-14T20:34:42Z

moved Jukebox to Jukebox/w3tpl: replacing with PHP version, but saving this one's edit history

← Older revision		Revision as of 20:34, 14 March 2009
(No difference)

Woozle: change descriptive text at top

2009-03-09T18:00:00Z

change descriptive text at top

← Older revision		Revision as of 18:00, 9 March 2009
Line 1:		Line 1:
	=The Hypertwin Jukebox=		=The Hypertwin Jukebox Demo=
	~~''is under construction~~, ~~but~~ here ~~are all the artists''~~		Right now, all you can do here is see our music collection; downloads only work within our house network.
	<hide>		<hide>
	=====================		=====================

Woozle: remove debugging test values

2009-03-09T17:58:08Z

remove debugging test values

← Older revision		Revision as of 17:58, 9 March 2009
Line 71:		Line 71:
	Get the input arguments:		Get the input arguments:
	<let name=doArtist copy=@query.artist />		<let name=doArtist copy=@query.artist />
	<let name=doArtist val=5 />		<!-- let name=doArtist val=5 / -->
	<let name=doAlbum copy=@query.album />		<let name=doAlbum copy=@query.album />
	<let name=doAlbum val=131 />		<!-- let name=doAlbum val=131 / -->

	Always show the artists:		Always show the artists:

Woozle: local downloads working

2009-03-09T17:57:23Z

local downloads working

← Older revision		Revision as of 17:57, 9 March 2009
Line 43:		Line 43:
	<let name=sqlFilt append copy=doArtist />		<let name=sqlFilt append copy=doArtist />
	</else>		</else>
	<for db=audioferret table="~~Titles~~" where=$sqlFilt sort="track, name" name=ti>		<let name=outFunc>
			{\| </let>
			<for db=audioferret table="qryTitle_Files" where=$sqlFilt sort="track, name" name=ti>
	<let name=outFunc append>		<let name=outFunc append>
	* '''</let>		\|-
			\| '''</let>
	<let name=outFunc append copy=@row.ti.track />		<let name=outFunc append copy=@row.ti.track />
	<let name=outFunc append>'''. </let>		<let name=outFunc append>'''. </let>
	<let name=outFunc append copy=@row.ti.name />		<let name=outFunc append copy=@row.ti.name />
			<let name=outFunc append> \|\| [</let>
			<let name=outFunc append copy=urlAudio />
			<let name=outFunc append copy=@row.ti.filespec />
			<let name=outFunc append> download]</let>
	</for>		</for>
			<let name=outFunc append>
			\|} </let>
	</func>		</func>
	============================		============================
	===== build the output =====		===== build the output =====
	============================		============================
	Turn off page cache:		Set up the environment:
			-- Turn off page cache:
	<w3tpl nocache />		<w3tpl nocache />
			-- base URL for audio files:
			<let name=urlAudio>smb://rizzo/shared/sdd/audio/Jukebox/content/</let>

	Get the input arguments:		Get the input arguments:
	<let name=doArtist copy=@query.artist />		<let name=doArtist copy=@query.artist />
	<~~!--~~ let name=doArtist val=5 / -->		<let name=doArtist val=5 />
	<let name=doAlbum copy=@query.album />		<let name=doAlbum copy=@query.album />
	<~~!--~~ let name=doAlbum val=131 / -->		<let name=doAlbum val=131 />

	Always show the artists:		Always show the artists:
Line 77:		Line 89:
	</if>		</if>
	<if flag=doTitles>		<if flag=doTitles>
	<let name=out append> \|\| '''titles'''</let>		<let name=out append> \|\| '''titles''' (only works from our house network)</let>
	</if>		</if>
	<let name=out append>		<let name=out append>

Woozle: formatting improvements

2009-03-09T01:31:09Z

formatting improvements

← Older revision		Revision as of 01:31, 9 March 2009
Line 10:		Line 10:
	<let name=outFunc append>		<let name=outFunc append>
	* </let>		* </let>
	<let name=outFunc append vars>[{{fullurl:{{PAGENAME}}\|artist=[$@row.ar.id$]}} </let>		<if comp=@row.ar.id with=$doArtist>
	<let name=outFunc append copy=ar_name />		<let name=chosen_artist_name copy=ar_name />
	<let name=outFunc append>]</let>		<let name=outFunc append>'''</let>
			<let name=outFunc append copy=ar_name />
			<let name=outFunc append>'''</let>
			</if><else>
			<let name=outFunc append vars>[{{fullurl:{{PAGENAME}}\|artist=[$@row.ar.id$]}} </let>
			<let name=outFunc append copy=ar_name />
			<let name=outFunc append>]</let>
	</for>		</for>
	</func>		</func>
Line 53:		Line 59:
	Get the input arguments:		Get the input arguments:
	<let name=doArtist copy=@query.artist />		<let name=doArtist copy=@query.artist />
			<!-- let name=doArtist val=5 / -->
	<let name=doAlbum copy=@query.album />		<let name=doAlbum copy=@query.album />
			<!-- let name=doAlbum val=131 / -->

	Always show the artists:		Always show the artists:
Line 61:		Line 69:
	{\|		{\|
	\|-		\|-
	~~! Artists~~</let>		\| '''artists'''</let>
	<if flag=doArtist>		<if flag=doArtist>
	<let name=doTitles val=1 />		<let name=doTitles val=1 />
	</if>		</if>
	<if flag=doArtist>		<if flag=doArtist>
	<let name=out append> \|\| ~~Albums~~</let>		<let name=out append vars> \|\| '''albums''': [$chosen_artist_name$]</let>
	</if>		</if>
	<if flag=doTitles>		<if flag=doTitles>
	<let name=out append> \|\| ~~Titles~~</let>		<let name=out append> \|\| '''titles'''</let>
	</if>		</if>
	<let name=out append>		<let name=out append>

Woozle: remove fixed album & artist

2009-03-08T22:50:26Z

remove fixed album & artist

← Older revision		Revision as of 22:50, 8 March 2009
Line 52:		Line 52:

	Get the input arguments:		Get the input arguments:
	<~~!--~~ let name=doArtist copy=@query.artist / -->		<let name=doArtist copy=@query.artist />
	<~~let name=doArtist val=5 />~~		<let name=doAlbum copy=@query.album />
	~~<!--~~ let name=doAlbum copy=@query.album ~~/ -->~~
	~~<let name=doAlbum val=79~~ />

	Always show the artists:		Always show the artists:

Woozle: got title listing working

2009-03-08T22:49:45Z

got title listing working

← Older revision		Revision as of 22:49, 8 March 2009
Line 6:		Line 6:
	=====================		=====================
	<func GetArtists>		<func GetArtists>
	<for db=audioferret table="~~Artists~~" sort="~~sort,~~ name" name=ar>		<for db=audioferret table="qryArtists_index" sort="name" name=ar>
	<let name=ar_name val="@row.ar.name" />		<let name=ar_name val="@row.ar.name" />
	<let name=outFunc append>		<let name=outFunc append>
Line 23:		Line 23:
	<let name=outFunc append>		<let name=outFunc append>
	* </let>		* </let>
			<let name=outFunc append vars>[{{fullurl:{{PAGENAME}}\|artist=[$doArtist$]&album=[$@row.al.id$]}} </let>
	<let name=outFunc append copy=al_name />		<let name=outFunc append copy=al_name />
			<let name=outFunc append>]</let>
			</for>
			</func>

			<func GetTitles>
			<if flag=doAlbum>
			<let name=sqlFilt vars>album_id=</let>
			<let name=sqlFilt append copy=doAlbum />
			</if><else>
			<let name=sqlFilt vars>artist_id=</let>
			<let name=sqlFilt append copy=doArtist />
			</else>
			<for db=audioferret table="Titles" where=$sqlFilt sort="track, name" name=ti>
			<let name=outFunc append>
			* '''</let>
			<let name=outFunc append copy=@row.ti.track />
			<let name=outFunc append>'''. </let>
			<let name=outFunc append copy=@row.ti.name />
	</for>		</for>
	</func>		</func>
Line 33:		Line 52:

	Get the input arguments:		Get the input arguments:
	<let name=doArtist copy=@query.artist />		<!-- let name=doArtist copy=@query.artist / -->
	<let name=doAlbum copy=@query.album />		<let name=doArtist val=5 />
			<!-- let name=doAlbum copy=@query.album / -->
			<let name=doAlbum val=79 />

	Always show the artists:		Always show the artists:
Line 56:		Line 77:
	\|		\|
	</let>		</let>

	<let name=out append copy=outFunc />		<let name=out append copy=outFunc />
			<let name=outFunc null />

	<if flag=doArtist>		<if flag=doArtist>
	<call GetAlbums />		<call GetAlbums />
	<let name=out append> \|\| </let>		<let name=out append>
			\| valign=top \| </let>
			<let name=out append copy=outFunc />
			<let name=outFunc null />
			</if>

			<if flag=doTitles>
			<call GetTitles />
			<let name=out append>
			\| valign=top \| </let>
	<let name=out append copy=outFunc />		<let name=out append copy=outFunc />
			<let name=outFunc null />
	</if>		</if>

	<let name=out append>		<let name=out append>
	\|}</let>		\|}</let>

Woozle: field name was wrong in album sql

2009-03-08T22:27:36Z

field name was wrong in album sql

← Older revision		Revision as of 22:27, 8 March 2009
Line 17:		Line 17:

	<func GetAlbums>		<func GetAlbums>
	<let name=sqlFilt vars>~~ID_Artist~~=</let>		<let name=sqlFilt vars>idartist=</let>
	<let name=sqlFilt append copy=doArtist />		<let name=sqlFilt append copy=doArtist />
	<for db=audioferret table="Albums" where=$sqlFilt sort="sort, name" name=al>		<for db=audioferret table="Albums" where=$sqlFilt sort="sort, name" name=al>
Line 68:		Line 68:
	===========================		===========================
	</hide><get name=out />		</hide><get name=out />
	~~doArtist=<get name=@query.artist />~~