vitunes-10.5 0.4.8

data/lib/vitunes.vim

@@ -0,0 +1,381 @@
+" Vim script that lets you search and play iTunes tracks from Vim
+" Maintainer:	Daniel Choi <dhchoi@gmail.com>
+" License: MIT License (c) 2011 Daniel Choi
+"
+" Buid this path with plugin install program
+
+if exists("g:vitunes_tool")
+  let s:vitunes_tool = g:vitunes_tool
+else
+  " This is the development version (specific to D Choi's setup)
+  let s:vitunes_tool = 'dev/vitunes '
+  " Maybe I should make this a relative path
+endif
+if !exists("g:mapleader")
+  let g:mapleader = ","
+endif
+
+let s:searchPrompt = "Search iTunes Music Library: "
+let s:getPlaylistsCommand = s:vitunes_tool . "playlists"
+let s:selectPlaylistPrompt = "Select playlist: "
+let s:getArtistsCommand = s:vitunes_tool . "group artist | uniq "
+let s:selectArtistPrompt = "Select artist: "
+let s:getGenresCommand = s:vitunes_tool . "group genre | uniq "
+let s:selectGenrePrompt = "Select genre: "
+let s:getAlbumsCommand = s:vitunes_tool . "group album | uniq "
+let s:selectAlbumPrompt = "Select album: "
+let s:addTracksToPlaylistPrompt = "Add track(s) to this playlist: "
+
+let s:currentPlaylist = ''
+let s:lastPlaylist = ''
+let s:selectedTrackIds = []
+
+let s:musicStoreURL = "http://www.amazon.com/gp/redirect.html?ie=UTF8&location=http%3A%2F%2Fwww.amazon.com%2FMP3-Music-Download%2Fb%3Fie%3DUTF8%26node%3D163856011%26ref_%3Dtopnav_storetab_dmusic%23&tag=instantwatche-20&linkCode=ur2&camp=1789&creative=390957"
+
+func! s:trimString(string)
+  let string = substitute(a:string, '\s\+$', '', '')
+  return substitute(string, '^\s\+', '', '')
+endfunc
+
+function! s:collectTrackIds(startline, endline)
+  let trackIds = []
+  let lnum = a:startline
+  while lnum <= a:endline
+    let trackId = matchstr(getline(lnum), '\d\+$')
+    call add(trackIds, trackId)
+    let lnum += 1
+  endwhile
+  return trackIds
+endfunc
+
+function! s:runCommand(command)
+  " echom a:command " can use for debugging
+  let res = system(a:command)
+  return res
+endfunction
+
+function! ViTunesStatusLine()
+  return "%<%f\ Press ".g:mapleader."? for help. "."%r%=%-14.(%l,%c%V%)\ %P"
+endfunction
+
+" the main window
+function! ViTunes()
+  rightbelow split ViTunesBuffer
+  setlocal cursorline
+  setlocal nowrap
+  setlocal textwidth=0
+  setlocal buftype=nofile
+  setlocal bufhidden=hide
+  setlocal noswapfile
+  noremap <buffer> <Leader>s :call <SID>openQueryWindow()<cr>
+  noremap <buffer> <Leader>p :call <SID>openPlaylistDropdown()<cr>
+  noremap <buffer> <Leader>a :call <SID>openArtistDropdown()<cr>
+  noremap <buffer> <Leader>g :call <SID>openGenreDropdown()<cr>
+  noremap <buffer> <Leader>A :call <SID>openAlbumDropdown()<cr>
+  noremap <buffer> <Leader>c :call <SID>openAddToPlaylistDropDown()<cr>
+  noremap <buffer> <BS> :call <SID>deleteTracksFromPlaylist()<CR> "
+  noremap <buffer> <Leader>P :call <SID>gotoCurrentPlaylist()<cr>
+
+  noremap <buffer> > :call <SID>nextTrack()<cr>
+  noremap <buffer> < :call <SID>prevTrack()<cr>
+  noremap <buffer> >> :call <SID>itunesControl("nextTrack")<cr>
+  noremap <buffer> << :call <SID>itunesControl("backTrack")<cr>
+  
+  noremap <buffer> .  :call <SID>currentTrackAndPlaylist()<cr>
+
+  noremap <buffer> <Space>  :call <SID>itunesControl("playpause")<cr>
+  noremap <buffer> -  :call <SID>changeVolume("volumeDown")<cr>
+  noremap <buffer> +  :call <SID>changeVolume("volumeUp")<cr>
+  noremap <buffer> =  :call <SID>changeVolume("volumeUp")<cr>
+
+  noremap <buffer> <Leader>i :close<CR>
+  noremap <buffer> <Leader>? :call <SID>help()<CR>
+  noremap <buffer> <Leader>z :call <SID>musicStore()<CR>
+  
+  noremap <buffer> <cr> :call <SID>playTrack()<cr>
+  setlocal nomodifiable
+  setlocal statusline=%!ViTunesStatusLine()
+
+  command! -buffer -bar -nargs=1 NewPlaylist call <SID>newPlaylist(<f-args>)
+
+  if line('$') == 1 " buffer empty
+    let msg = "Welcome to ViTunes\n\nPress ".g:mapleader."? for help"
+    setlocal modifiable
+    silent! 1,$delete
+    silent! put =msg
+    silent! 1delete
+    setlocal nomodifiable
+  endif
+endfunction
+
+function! s:help()
+  " This just displays the README
+  let res = system("vitunes-help") 
+  echo res  
+endfunction
+
+
+function! s:itunesControl(command)
+  let res = s:runCommand(s:vitunes_tool . "itunes ".a:command)
+  echom res
+endfunction
+
+function! s:changeVolume(command)
+  let res = s:runCommand(s:vitunes_tool.a:command)
+  echom res
+endfunction
+
+function! s:playTrack()
+  let trackID = matchstr(getline(line('.')), '\d\+$')
+  if (trackID == '')
+    return
+  endif
+  let command = ""
+  if (s:currentPlaylist != '')
+    let command = s:vitunes_tool . "playTrackIDFromPlaylist ".trackID.' '.shellescape(s:currentPlaylist)
+  else
+    let command = s:vitunes_tool . "playTrackID " . trackID
+  endif
+  "echom command
+  call system(command)
+  call s:currentTrackAndPlaylist()
+endfunc
+
+function! s:hasTrackID(line)
+  if a:line > line('$')
+    return 0
+  end
+  let res = matchstr(getline(a:line), '\d\+$')
+  if res != ''
+    return 1
+  else
+    return 0
+  end
+endfunction
+
+" move up or down the visible list of tracks
+function! s:nextTrack()
+  if s:hasTrackID(line('.') + 1)
+    normal j
+    call s:playTrack()
+    " call s:itunesControl("nextTrack")
+  endif
+endfunction
+
+function! s:prevTrack()
+  if s:hasTrackID(line('.') - 1)
+    normal k
+    call s:playTrack()
+    " call s:itunesControl("previousTrack")
+  endif
+endfunction
+
+function! s:currentTrackAndPlaylist()
+  let res1 = s:runCommand(s:vitunes_tool . "itunes currentTrack")
+  " fix this on obj-c side later; we just need to make sure this doesn't 
+  " spill over to another line.
+  let res2 = s:runCommand(s:vitunes_tool . "itunes currentPlaylist")
+  echo res1[0:60] . ' | '.res2[0:30]
+endfunction
+
+function! s:openQueryWindow()
+  leftabove split SearchLibrary
+  setlocal textwidth=0
+  setlocal buftype=nofile
+  setlocal noswapfile
+  setlocal modifiable
+  resize 1
+  inoremap <buffer> <cr> <Esc>:call <SID>submitQueryOrSelection('search')<cr>
+  noremap <buffer> <cr> <Esc>:call <SID>submitQueryOrSelection('search')<cr>
+  noremap <buffer> q <Esc>:close
+  inoremap <buffer> <Esc> <Esc>:close<CR>
+  noremap <buffer> <Esc> <Esc>:close<CR>
+  let s:selectionPrompt = s:searchPrompt " this makes sure we parse the query correctly
+  call setline(1, s:searchPrompt)
+  normal $
+  call feedkeys("a", "t")
+endfunction
+
+function! GenericCompletion(findstart, base)
+  if a:findstart
+    let prompt = s:selectionPrompt
+    let start = len(prompt) 
+    return start
+  else
+    if (a:base == '')
+      return s:selectionList
+    else
+      let res = []
+      " find tracks matching a:base
+      for m in s:selectionList
+        " why doesn't case insensitive flag work?
+        if m =~ '^\c' . a:base 
+          call add(res, m)
+        endif
+      endfor
+      return res
+    endif
+  endif
+endfun
+
+function! s:commonDropDownConfig()
+  setlocal textwidth=0
+  setlocal completefunc=GenericCompletion
+  setlocal buftype=nofile
+  setlocal noswapfile
+  setlocal modifiable
+  resize 1
+  noremap <buffer> q <Esc>:close<cr>
+  inoremap <buffer> <Esc> <Esc>:close<cr>
+  call setline(1, s:selectionPrompt)
+  inoremap <buffer> <Tab> <C-x><C-u>
+  normal $
+endfunction
+
+" Drop downs
+function! s:openPlaylistDropdown()
+  leftabove split ChoosePlaylist
+  inoremap <silent> <buffer> <cr> <Esc>:call <SID>submitQueryOrSelection('playlistTracks')<CR> 
+  let s:selectionPrompt = s:selectPlaylistPrompt
+  call s:commonDropDownConfig()
+  let s:selectionList = split(system(s:getPlaylistsCommand), '\n')
+  if (s:lastPlaylist != '')
+    call insert(s:selectionList, s:lastPlaylist);
+  endif
+  call feedkeys("a\<c-x>\<c-u>\<c-p>", 't')
+endfunction
+
+function! s:openArtistDropdown()
+  leftabove split ChooseArtist
+  inoremap <silent> <buffer> <cr> <Esc>:call <SID>submitQueryOrSelection('artist')<CR> 
+  let s:selectionPrompt = s:selectArtistPrompt
+  call s:commonDropDownConfig()
+  let s:selectionList = split(system(s:getArtistsCommand), '\n')
+  call feedkeys("a\<c-x>\<c-u>\<c-p>", 't')
+endfunction
+
+function! s:openGenreDropdown()
+  leftabove split ChooseGenre
+  inoremap <silent> <buffer> <cr> <Esc>:call <SID>submitQueryOrSelection('genre')<CR> 
+  let s:selectionPrompt = s:selectGenrePrompt
+  call <SID>commonDropDownConfig()
+  let s:selectionList = split(system(s:getGenresCommand), '\n')
+  call feedkeys("a\<c-x>\<c-u>\<c-p>", 't')
+endfunction
+
+function! s:openAlbumDropdown()
+  leftabove split ChooseAlbum
+  inoremap <silent> <buffer> <cr> <Esc>:call <SID>submitQueryOrSelection('album')<CR> 
+  let s:selectionPrompt = s:selectAlbumPrompt
+  call <SID>commonDropDownConfig()
+  let s:selectionList = split(system(s:getAlbumsCommand), '\n')
+  call feedkeys("a\<c-x>\<c-u>\<c-p>", 't')
+endfunction
+
+function! s:openAddToPlaylistDropDown() range
+  let s:selectedTrackIds = s:collectTrackIds(a:firstline, a:lastline)
+  leftabove split ChoosePlaylist
+  inoremap <silent> <buffer> <cr> <Esc>:call <SID>submitQueryOrSelection('addTracksToPlaylist')<CR> 
+  let s:selectionPrompt = s:addTracksToPlaylistPrompt 
+  echom s:selectionPrompt
+  call <SID>commonDropDownConfig()
+  let s:selectionList = split(system(s:getPlaylistsCommand), '\n')
+  if (s:lastPlaylist != '')
+    call insert(s:selectionList, s:lastPlaylist)
+  endif
+  call feedkeys("a\<c-x>\<c-u>\<c-p>", 't')
+endfunction
+
+" selection window pick or search window query
+function! s:submitQueryOrSelection(command)
+  if (getline('.') =~ '^\s*$')
+    close
+    return
+  endif
+  let query = getline('.')[len(s:selectionPrompt):] " get(split(getline('.'), ':\s*'), 1)
+  close
+  " echom query
+  if (len(query) == 0 || query =~ '^\s*$')
+    return
+  endif
+  if a:command == 'artist'
+    let query = substitute(query, "'", "\'", '')
+    let bcommand = s:vitunes_tool."predicate ".shellescape("artist == '".query."'")
+  elseif a:command == 'genre'
+    let bcommand = s:vitunes_tool."predicate ".shellescape("genre == '".query."'") 
+  elseif a:command == 'album'
+    let bcommand = s:vitunes_tool."predicate ".shellescape("album == '".query."'") 
+  elseif a:command == 'addTracksToPlaylist'
+    let trackIds = join(s:selectedTrackIds, ',')
+    let bcommand = s:vitunes_tool.a:command." ".trackIds." ".shellescape(query)
+  else
+    let bcommand = s:vitunes_tool . a:command . ' ' . shellescape(query)
+  end
+  echom bcommand
+  let res = s:runCommand(bcommand)
+  if a:command == 'addTracksToPlaylist'
+    redraw
+    echom "Added to playlist '".query."'"
+    return
+  endif
+  setlocal modifiable
+  silent! 1,$delete
+  silent! put =res
+  silent! 1delete
+  setlocal nomodifiable
+  " position cursor at 1st track
+  normal 3G
+  if (a:command == 'playlistTracks') "  
+    let s:currentPlaylist = query
+    let s:lastPlaylist = query
+  else
+    let s:currentPlaylist = ''
+  endif
+endfunction
+
+function! s:deleteTracksFromPlaylist() range 
+  let s:selectedTrackIds = s:collectTrackIds(a:firstline, a:lastline)
+  let trackIds = join(s:selectedTrackIds, ',')
+  let playlist = s:lastPlaylist
+  let bcommand = s:vitunes_tool."deleteTracksFromPlaylist ".trackIds." ".shellescape(playlist)
+  let res = s:runCommand(bcommand)
+  setlocal modifiable
+  exec "silent! ".a:firstline.",".a:lastline."delete"
+  redraw
+  setlocal nomodifiable
+  echom bcommand
+  return
+endfunc
+
+function! s:newPlaylist(name)
+  let command = s:vitunes_tool.'newPlaylist '.shellescape(a:name)
+  let res = system(s:vitunes_tool.'newPlaylist '.shellescape(a:name))
+  echom res
+endfunction
+
+function! s:gotoCurrentPlaylist()
+  let playlist = s:runCommand(s:vitunes_tool . "itunes currentPlaylist")
+  if playlist != ''
+    let bcommand = s:vitunes_tool.'playlistTracks '.shellescape(playlist)
+    let res = s:runCommand(bcommand)
+    setlocal modifiable
+    silent! 1,$delete
+    silent! put =res
+    silent! 1delete
+    setlocal nomodifiable
+    normal 3G
+    let s:currentPlaylist = playlist
+    let s:lastPlaylist = playlist
+  endif
+endfunction
+
+function! s:musicStore()
+  call system("open ".shellescape(s:musicStoreURL))
+endfunc
+
+nnoremap <silent> <leader>i :call ViTunes()<cr>
+nnoremap <silent> <leader>I :call ViTunes()<cr>:only<CR>
+
+
+let g:ViTunesLoaded = 1
+

data/vitunes/main.m

@@ -0,0 +1,294 @@
+//
+//  main.m
+//  vitunes
+//
+//  Created by Daniel Choi on 6/29/11.
+//  Copyright 2011 by Daniel Choi. All rights reserved.
+//
+#import "iTunes.h"
+#import <Foundation/Foundation.h>
+
+static iTunesApplication *iTunes;
+static iTunesPlaylist *libraryPlaylist; 
+static iTunesSource *library;
+int const ARTIST_COL = 26;
+int const TRACK_NAME_COL = 33;
+int const GENRE_COL = 15;
+int const KIND_COL = 29;
+int const TIME_COL = 7;
+int const YEAR_COL = 4;
+int const ALBUM_COL = 30;
+
+NSString *trackListHeader() {
+  NSString *artist = [@"Artist" stringByPaddingToLength:ARTIST_COL withString:@" " startingAtIndex:0];
+  NSString *name = [@"Track" stringByPaddingToLength:TRACK_NAME_COL withString:@" " startingAtIndex:0];
+  NSString *genre = [@"Genre" stringByPaddingToLength:GENRE_COL withString:@" " startingAtIndex:0];
+  NSString *time = [@"Time" stringByPaddingToLength:TIME_COL withString:@" " startingAtIndex:0];
+  NSString *kind = [@"Kind" stringByPaddingToLength:KIND_COL withString:@" " startingAtIndex:0];
+  NSString *year = [@"Year" stringByPaddingToLength:YEAR_COL withString:@" " startingAtIndex:0];
+  NSString *album = [@"Album" stringByPaddingToLength:ALBUM_COL withString:@" " startingAtIndex:0];
+
+  NSString *artistSpacer = [@"-" stringByPaddingToLength:ARTIST_COL withString:@"-" startingAtIndex:0];
+  NSString *nameSpacer = [@"-" stringByPaddingToLength:TRACK_NAME_COL withString:@"-" startingAtIndex:0];
+  NSString *genreSpacer = [@"-" stringByPaddingToLength:GENRE_COL withString:@"-" startingAtIndex:0];
+  NSString *timeSpacer = [@"-" stringByPaddingToLength:TIME_COL withString:@"-" startingAtIndex:0];
+  NSString *kindSpacer = [@"-" stringByPaddingToLength:KIND_COL withString:@"-" startingAtIndex:0];
+  NSString *yearSpacer = [@"-" stringByPaddingToLength:YEAR_COL withString:@"-" startingAtIndex:0];
+  NSString *albumSpacer = [@"-" stringByPaddingToLength:ALBUM_COL withString:@"-" startingAtIndex:0];
+
+  NSString *headers = [NSString stringWithFormat: @"%@ | %@ | %@ | %@ | %@ | %@ | %@ | DatabaseID", artist, name, album, year, genre, time, kind ];
+  NSString *divider = [NSString stringWithFormat: @"%@-|-%@-|-%@-|-%@-|-%@-|-%@-|-%@-|-----------", 
+           artistSpacer, nameSpacer, albumSpacer, yearSpacer, genreSpacer, timeSpacer, kindSpacer ];
+  return [NSString stringWithFormat:@"%@\n%@", headers, divider];
+};
+
+NSString *formatTrackForDisplay(iTunesTrack *track) {
+  NSString *artist = [track.artist stringByPaddingToLength:ARTIST_COL withString:@" " startingAtIndex:0];
+  NSString *name = [track.name stringByPaddingToLength:TRACK_NAME_COL withString:@" " startingAtIndex:0];
+  NSString *genre = [track.genre stringByPaddingToLength:GENRE_COL withString:@" " startingAtIndex:0];
+  NSString *timeValue = track.time != nil ? track.time : @" ";
+  NSString *time = [timeValue stringByPaddingToLength:TIME_COL withString:@" " startingAtIndex:0];
+  NSString *kind = [track.kind stringByPaddingToLength:KIND_COL withString:@" " startingAtIndex:0];
+  NSString *year;
+  if (track.year != 0) {
+    year = [NSString stringWithFormat:@"%d", track.year];
+  } else {
+    year = @"    ";
+  }
+  NSString *album = [track.album stringByPaddingToLength:ALBUM_COL withString:@" " startingAtIndex:0];
+  return [NSString stringWithFormat: @"%@ | %@ | %@ | %@ | %@ | %@ | %@ | %d", 
+          artist,
+          name,
+          album,
+          year,
+          genre,
+          time,
+          kind,
+          track.databaseID
+            ];
+}
+
+SBElementArray *search(NSArray *args)  {
+  NSString *query = [args componentsJoinedByString:@" "];
+  return [libraryPlaylist searchFor:query only:iTunesESrAAll];
+}
+
+NSNumber *convertNSStringToNumber(NSString *s) {
+  NSNumberFormatter * f = [[NSNumberFormatter alloc] init];
+  [f setNumberStyle:NSNumberFormatterDecimalStyle];
+  NSNumber *result = [f numberFromString:s];
+  [f release];
+  return result;
+}
+
+iTunesTrack *findTrackID(NSString *trackID) {
+  NSNumber *databaseId = convertNSStringToNumber(trackID);
+  NSArray *xs = [[libraryPlaylist tracks] filteredArrayUsingPredicate: [NSPredicate predicateWithFormat:@"databaseID == %@", databaseId]];
+  iTunesTrack* t = [xs objectAtIndex:0];
+  return t;
+}
+
+void playTrackID(NSString *trackID) {
+  iTunesTrack* t = findTrackID(trackID);
+  NSLog(@"Playing track: %@", [t name]);
+  // TODO report a missing track
+  [t playOnce:true]; // false would play next song on list after this one finishes
+}
+
+void playTrackIDFromPlaylist(NSString *trackID, NSString *playlistName) {
+  NSNumber *databaseId = convertNSStringToNumber(trackID);
+  iTunesPlaylist *playlist =  [[library playlists] objectWithName:playlistName];
+  NSArray *xs = [[playlist tracks] filteredArrayUsingPredicate: [NSPredicate predicateWithFormat:@"databaseID == %@", databaseId]];
+  if ([xs count] == 0) {
+    NSLog(@"Could not find trackID: %@ in playlist: %@. Playing from Library.", trackID, playlistName);
+    playTrackID(trackID);
+    return;
+  } else {
+    iTunesTrack* t = [xs objectAtIndex:0];
+    NSLog(@"Playing track: %@ from playlist: %@", [t name], playlistName);
+    [t playOnce:false]; // play playlist continuously
+  }
+}
+
+void addTracksToPlaylistName(NSString *trackIds, NSString *playlistName) {
+  iTunesPlaylist *playlist =  [[library playlists] objectWithName:playlistName];
+  for (NSString *trackID in [trackIds componentsSeparatedByString:@","]) {
+    iTunesTrack* t = findTrackID(trackID);
+    NSLog(@"Adding track: %@ to playlist: %@", [t name], [playlist name]);
+    [t duplicateTo:playlist];
+  }
+}
+
+void deleteTracksFromPlaylistName(NSString *trackIds, NSString *playlistName) {
+  iTunesPlaylist *playlist =  [[library playlists] objectWithName:playlistName];
+  for (NSString *trackID in [trackIds componentsSeparatedByString:@","]) {
+    NSNumber *databaseId = convertNSStringToNumber(trackID);
+    NSArray *xs = [[playlist tracks] filteredArrayUsingPredicate: [NSPredicate predicateWithFormat:@"databaseID == %@", databaseId]];
+    iTunesTrack* t = [xs objectAtIndex:0];
+    NSLog(@"Removing track: %@ from playlist: %@", [t name], [playlist name]);
+    [t delete];
+  }
+}
+
+void groupTracksBy(NSString *property) {
+  // gets list of all e.g. artists, genres
+  // NOTE year won't work yet
+  // NOTE pipe the output through uniq 
+  NSArray *results = [[[libraryPlaylist tracks] arrayByApplyingSelector:NSSelectorFromString(property)]
+    filteredArrayUsingPredicate: [NSPredicate predicateWithFormat:@"%@ != ''", property]];
+  NSArray *sortedResults = [results sortedArrayUsingSelector:@selector(localizedCaseInsensitiveCompare:)];
+  for (NSString *s in sortedResults) {
+    printf("%s\n", [s cStringUsingEncoding: NSUTF8StringEncoding]);
+  }
+}
+
+void printTracks(NSArray *tracks) {
+  printf("%s\n", [trackListHeader() cStringUsingEncoding: NSUTF8StringEncoding]);
+  for (iTunesTrack *track in tracks) {
+    printf("%s\n", [formatTrackForDisplay(track) cStringUsingEncoding: NSUTF8StringEncoding]);
+  }
+}
+
+void playlists() {
+  for (iTunesPlaylist *p in [library playlists]) {
+    printf("%s\n", [p.name cStringUsingEncoding: NSUTF8StringEncoding]);
+  }
+}
+
+void playlistTracks(NSString *playlistName) {
+  iTunesPlaylist *playlist = [[library playlists] objectWithName:playlistName];
+  printTracks([playlist tracks]);
+}
+
+void playPlaylist(NSString *playlistName) {
+  iTunesPlaylist *playlist = [[library playlists] objectWithName:playlistName];
+  if (playlist == nil) {
+    NSLog(@"No playlist found: %@", playlistName);
+  }
+  [playlist playOnce:true];
+}
+
+void tracksMatchingPredicate(NSString *predString) {
+  // predicate can be something like "artist == 'U2'"
+  NSArray *tracks = [[libraryPlaylist tracks] 
+    filteredArrayUsingPredicate: [NSPredicate predicateWithFormat:predString]];
+  printTracks(tracks);
+}
+
+// This dispatches to any methods on iTunesApplication with no parameters.
+// If method returns an iTunesItem, its 'name' property will be called and
+// displayed.
+void itunes(NSString *command) {
+  SEL selector = NSSelectorFromString(command);
+  id result = [iTunes performSelector:selector];
+  if (result) {
+    if ([result respondsToSelector:@selector(name)]) {
+      NSString *s;
+      // Note that the real classname is ITunesTrack, not iTunesTrack;
+      // For current Track
+      if ([[result className] isEqual:@"ITunesTrack"]) {
+        if ([result name ] == nil) {
+          printf("No current track");
+          return;
+        }
+        s = [NSString stringWithFormat:@"\"%@\" by %@",
+           [((iTunesTrack *)result) name],
+           [((iTunesTrack *)result) artist]
+        ];
+        printf("%s", [s cStringUsingEncoding: NSUTF8StringEncoding]);
+      } else if ([[result className] isEqual:@"ITunesPlaylist"]) {
+        if ([result name ] == nil) {
+          printf("No current playlist");
+          return;
+        }
+        s = [NSString stringWithFormat:@"%@", [((iTunesPlaylist *)result) name]];
+        printf("%s", [s cStringUsingEncoding: NSUTF8StringEncoding]);
+      } else {
+        s = ((iTunesItem *)result).name;
+        printf("%s\n", [s cStringUsingEncoding: NSUTF8StringEncoding]);
+      }
+    }
+  }
+}
+
+void turnVolume(NSString *direction) {
+  NSInteger currentVolume = iTunes.soundVolume;
+  NSInteger increment = 8;
+  if (currentVolume < 100 && [direction isEqual:@"up"]) {
+    iTunes.soundVolume += increment;
+  } else if (currentVolume > 0 && [direction isEqual:@"down"]) {
+    iTunes.soundVolume -= increment;
+  }
+  printf("Changing volume %d -> %d", (int)currentVolume, (int)iTunes.soundVolume);
+}
+
+void newPlaylist(NSString *name) {
+  // note that we have to force realize it with get to check for missing
+  iTunesPlaylist *existingPlaylist = [[[library playlists] objectWithName:name] get];
+  if (existingPlaylist != nil) {
+    printf("%s already exists", [[existingPlaylist name] cStringUsingEncoding: NSUTF8StringEncoding]);
+    return;
+  }
+  NSDictionary *props = [NSDictionary dictionaryWithObject:name forKey:@"name"];
+  iTunesPlaylist *playlist = [[[iTunes classForScriptingClass:@"user playlist"] alloc] initWithProperties:props];
+  [[library playlists] addObject:playlist]; 
+  //[playlist reveal];
+  printf("Created new playlist: %s", [name cStringUsingEncoding:NSUTF8StringEncoding]);
+}
+
+int main (int argc, const char * argv[]) {
+  NSAutoreleasePool * pool = [[NSAutoreleasePool alloc] init];
+  NSArray *rawArgs = [[NSProcessInfo processInfo] arguments];
+  NSString *action;
+  NSArray *args;
+  if ([rawArgs count] < 2) {
+    action = @"search";
+    args = [NSArray arrayWithObject:@"bach"];
+  } else {
+    action = [rawArgs objectAtIndex:1];
+    NSRange aRange;
+    aRange.location = 2;
+    aRange.length = [rawArgs count] - 2;
+    args = [rawArgs subarrayWithRange:aRange];
+  }
+  iTunes = [SBApplication applicationWithBundleIdentifier:@"com.apple.iTunes"];
+  library = [[iTunes sources] objectAtIndex:0];
+  libraryPlaylist = [[library playlists] objectAtIndex:0];
+
+
+  if ([action isEqual: @"search"]) {
+    printTracks(search(args));
+  } else if ([action isEqual: @"playTrackID"]) { 
+    playTrackID([args objectAtIndex:0]);
+  } else if ([action isEqual: @"playTrackIDFromPlaylist"]) { 
+    playTrackIDFromPlaylist([args objectAtIndex:0], [args objectAtIndex:1]);
+  } else if ([action isEqual: @"group"]) {
+    groupTracksBy([args objectAtIndex:0]);
+  } else if ([action isEqual: @"predicate"]) {
+    tracksMatchingPredicate([args objectAtIndex:0]);
+  } else if ([action isEqual: @"playlists"]) {
+    playlists();
+  } else if ([action isEqual: @"playlistTracks"]) {
+    playlistTracks([args objectAtIndex:0]);
+  } else if ([action isEqual: @"playPlaylist"]) {
+    playPlaylist([args objectAtIndex:0]);
+  } else if ([action isEqual: @"addTracksToPlaylist"]) { 
+    // make sure to quote first arg
+    addTracksToPlaylistName([args objectAtIndex:0], [args objectAtIndex:1]);
+  } else if ([action isEqual: @"deleteTracksFromPlaylist"]) { 
+    // make sure to quote first arg
+    deleteTracksFromPlaylistName([args objectAtIndex:0], [args objectAtIndex:1]);
+  } else if ([action isEqual: @"volumeUp"]) {
+    turnVolume(@"up");
+  } else if ([action isEqual: @"volumeDown"]) {
+    turnVolume(@"down");
+  } else if ([action isEqual: @"newPlaylist"]) {
+    newPlaylist([args objectAtIndex:0]); 
+  } else if ([action isEqual: @"itunes"]) {
+    // argument is an action for iTunesApplication to perform
+    itunes([args objectAtIndex:0]);
+  }
+  [pool drain];
+  return 0;
+}
+

data/vitunes/vitunes-Prefix.pch

@@ -0,0 +1,7 @@
+//
+// Prefix header for all source files of the 'vitunes' target in the 'vitunes' project
+//
+
+#ifdef __OBJC__
+    #import <Foundation/Foundation.h>
+#endif