/[svn]/liblscp/trunk/src/client.c
ViewVC logotype

Diff of /liblscp/trunk/src/client.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 977 by capela, Sun Dec 17 15:08:35 2006 UTC revision 1692 by schoenebeck, Fri Feb 15 17:04:34 2008 UTC
# Line 2  Line 2 
2  //  //
3  /****************************************************************************  /****************************************************************************
4     liblscp - LinuxSampler Control Protocol API     liblscp - LinuxSampler Control Protocol API
5     Copyright (C) 2004-2006, rncbc aka Rui Nuno Capela. All rights reserved.     Copyright (C) 2004-2008, rncbc aka Rui Nuno Capela. All rights reserved.
6    
7     This library is free software; you can redistribute it and/or     This library is free software; you can redistribute it and/or
8     modify it under the terms of the GNU Lesser General Public     modify it under the terms of the GNU Lesser General Public
# Line 84  static void _lscp_client_evt_proc ( void Line 84  static void _lscp_client_evt_proc ( void
84                          if (cchBuffer > 0) {                          if (cchBuffer > 0) {
85                                  // Make sure received buffer it's null terminated.                                  // Make sure received buffer it's null terminated.
86                                  achBuffer[cchBuffer] = (char) 0;                                  achBuffer[cchBuffer] = (char) 0;
87                                  // Parse for the notification event message...                                  pch = achBuffer;
88                                  pszToken = lscp_strtok(achBuffer, pszSeps, &(pch)); // Have "NOTIFY".                                  do {
89                                  if (strcasecmp(pszToken, "NOTIFY") == 0) {                                          // Parse for the notification event message...
90                                          pszToken = lscp_strtok(NULL, pszSeps, &(pch));                                          pszToken = lscp_strtok(NULL, pszSeps, &(pch)); // Have "NOTIFY"
91                                          event    = lscp_event_from_text(pszToken);                                          if (strcasecmp(pszToken, "NOTIFY") == 0) {
92                                          // And pick the rest of data...                                                  pszToken = lscp_strtok(NULL, pszSeps, &(pch));
93                                          pszToken = lscp_strtok(NULL, pszSeps, &(pch));                                                  event    = lscp_event_from_text(pszToken);
94                                          cchToken = (pszToken == NULL ? 0 : strlen(pszToken));                                                  // And pick the rest of data...
95                                          // Double-check if we're really up to it...                                                  pszToken = lscp_strtok(NULL, pszSeps, &(pch));
96                                          if (pClient->events & event) {                                                  cchToken = (pszToken == NULL ? 0 : strlen(pszToken));
97                                                  // Invoke the client event callback...                                                  // Double-check if we're really up to it...
98                                                  if ((*pClient->pfnCallback)(                                                  if (pClient->events & event) {
99                                                                  pClient,                                                          // Invoke the client event callback...
100                                                                  event,                                                          if ((*pClient->pfnCallback)(
101                                                                  pszToken,                                                                          pClient,
102                                                                  cchToken,                                                                          event,
103                                                                  pClient->pvData) != LSCP_OK) {                                                                          pszToken,
104                                                          pClient->evt.iState = 0;                                                                          cchToken,
105                                                                            pClient->pvData) != LSCP_OK) {
106                                                                    pClient->evt.iState = 0;
107                                                            }
108                                                  }                                                  }
109                                          }                                          }
110                                  }                                  } while (*pch);
111                          } else {                          } else {
112                                  lscp_socket_perror("_lscp_client_evt_proc: recv");                                  lscp_socket_perror("_lscp_client_evt_proc: recv");
113                                  pClient->evt.iState = 0;                                  pClient->evt.iState = 0;
# Line 327  lscp_client_t* lscp_client_create ( cons Line 330  lscp_client_t* lscp_client_create ( cons
330          pClient->midi_devices = NULL;          pClient->midi_devices = NULL;
331          pClient->engines = NULL;          pClient->engines = NULL;
332          pClient->channels = NULL;          pClient->channels = NULL;
333            pClient->fxsends = NULL;
334          pClient->midi_instruments = NULL;          pClient->midi_instruments = NULL;
335          pClient->midi_maps = NULL;          pClient->midi_maps = NULL;
336          pClient->midi_map_name = NULL;          pClient->midi_map_name = NULL;
# Line 343  lscp_client_t* lscp_client_create ( cons Line 347  lscp_client_t* lscp_client_create ( cons
347          lscp_server_info_init(&(pClient->server_info));          lscp_server_info_init(&(pClient->server_info));
348          lscp_engine_info_init(&(pClient->engine_info));          lscp_engine_info_init(&(pClient->engine_info));
349          lscp_channel_info_init(&(pClient->channel_info));          lscp_channel_info_init(&(pClient->channel_info));
350            lscp_fxsend_info_init(&(pClient->fxsend_info));
351          lscp_midi_instrument_info_init(&(pClient->midi_instrument_info));          lscp_midi_instrument_info_init(&(pClient->midi_instrument_info));
352          // Initialize error stuff.          // Initialize error stuff.
353          pClient->pszResult = NULL;          pClient->pszResult = NULL;
# Line 405  lscp_status_t lscp_client_destroy ( lscp Line 410  lscp_status_t lscp_client_destroy ( lscp
410    
411          // Free up all cached members.          // Free up all cached members.
412          lscp_midi_instrument_info_free(&(pClient->midi_instrument_info));          lscp_midi_instrument_info_free(&(pClient->midi_instrument_info));
413            lscp_fxsend_info_free(&(pClient->fxsend_info));
414          lscp_channel_info_free(&(pClient->channel_info));          lscp_channel_info_free(&(pClient->channel_info));
415          lscp_engine_info_free(&(pClient->engine_info));          lscp_engine_info_free(&(pClient->engine_info));
416          lscp_server_info_free(&(pClient->server_info));          lscp_server_info_free(&(pClient->server_info));
# Line 425  lscp_status_t lscp_client_destroy ( lscp Line 431  lscp_status_t lscp_client_destroy ( lscp
431          lscp_isplit_destroy(pClient->midi_devices);          lscp_isplit_destroy(pClient->midi_devices);
432          lscp_szsplit_destroy(pClient->engines);          lscp_szsplit_destroy(pClient->engines);
433          lscp_isplit_destroy(pClient->channels);          lscp_isplit_destroy(pClient->channels);
434            lscp_isplit_destroy(pClient->fxsends);
435          lscp_midi_instruments_destroy(pClient->midi_instruments);          lscp_midi_instruments_destroy(pClient->midi_instruments);
436          lscp_isplit_destroy(pClient->midi_maps);          lscp_isplit_destroy(pClient->midi_maps);
437          if (pClient->midi_map_name)          if (pClient->midi_map_name)
# Line 436  lscp_status_t lscp_client_destroy ( lscp Line 443  lscp_status_t lscp_client_destroy ( lscp
443          pClient->midi_devices = NULL;          pClient->midi_devices = NULL;
444          pClient->engines = NULL;          pClient->engines = NULL;
445          pClient->channels = NULL;          pClient->channels = NULL;
446            pClient->fxsends = NULL;
447          pClient->midi_instruments = NULL;          pClient->midi_instruments = NULL;
448          pClient->midi_maps = NULL;          pClient->midi_maps = NULL;
449          pClient->midi_map_name = NULL;          pClient->midi_map_name = NULL;
# Line 573  int lscp_client_get_errno ( lscp_client_ Line 581  int lscp_client_get_errno ( lscp_client_
581  // Client registration protocol functions.  // Client registration protocol functions.
582    
583  /**  /**
584   *  Register frontend for receiving event messages:   *  Register frontend for receiving event messages.
585   *  SUBSCRIBE CHANNEL_COUNT | VOICE_COUNT | STREAM_COUNT | BUFFER_FILL   *  @e Caution: since liblscp v0.5.5.4 you have to call lscp_client_subscribe()
586   *      | CHANNEL_INFO | MISCELLANEOUS   *  for @e each event you want to subscribe. That is the old bitflag approach
587     *  was abondoned at this point. You can however still register all older
588     *  events with one lscp_client_subscribe() call at once. Thus, the old
589     *  behavior of this functions was not broken. Those older events are namely:
590     *  @code
591     *  SUBSCRIBE CHANNEL_COUNT | VOICE_COUNT | STREAM_COUNT
592     *      | BUFFER_FILL | CHANNEL_INFO | TOTAL_VOICE_COUNT
593     *      | AUDIO_OUTPUT_DEVICE_COUNT | AUDIO_OUTPUT_DEVICE_INFO
594     *      | MIDI_INPUT_DEVICE_COUNT | MIDI_INPUT_DEVICE_INFO
595     *      | MIDI_INSTRUMENT_MAP_COUNT | MIDI_INSTRUMENT_MAP_INFO
596     *      | MIDI_INSTRUMENT_COUNT | MIDI_INSTRUMENT_INFO
597     *      | MISCELLANEOUS
598     *  @endcode
599     *  The old events occupy the lower 16 bits (as bit flags), and all younger
600     *  events enumerate the whole upper 16 bits range. The new, enumerated
601     *  events are namely:
602     *  @code
603     *  SUBSCRIBE CHANNEL_MIDI
604     *  @endcode
605   *   *
606   *  @param pClient  Pointer to client instance structure.   *  @param pClient  Pointer to client instance structure.
607   *  @param events   Bit-wise OR'ed event flags to subscribe.   *  @param events   Bit-wise OR'ed event flags to subscribe.
# Line 584  int lscp_client_get_errno ( lscp_client_ Line 610  int lscp_client_get_errno ( lscp_client_
610   */   */
611  lscp_status_t lscp_client_subscribe ( lscp_client_t *pClient, lscp_event_t events )  lscp_status_t lscp_client_subscribe ( lscp_client_t *pClient, lscp_event_t events )
612  {  {
613          lscp_status_t ret = LSCP_FAILED;          lscp_status_t ret = LSCP_OK;
614    
615          if (pClient == NULL)          if (pClient == NULL)
616                  return LSCP_FAILED;                  return LSCP_FAILED;
# Line 607  lscp_status_t lscp_client_subscribe ( ls Line 633  lscp_status_t lscp_client_subscribe ( ls
633                  ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_BUFFER_FILL);                  ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_BUFFER_FILL);
634          if (ret == LSCP_OK && (events & LSCP_EVENT_CHANNEL_INFO))          if (ret == LSCP_OK && (events & LSCP_EVENT_CHANNEL_INFO))
635                  ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_CHANNEL_INFO);                  ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_CHANNEL_INFO);
636            if (ret == LSCP_OK && (events & LSCP_EVENT_TOTAL_VOICE_COUNT))
637                    ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_TOTAL_VOICE_COUNT);
638            if (ret == LSCP_OK && (events & LSCP_EVENT_AUDIO_OUTPUT_DEVICE_COUNT))
639                    ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_AUDIO_OUTPUT_DEVICE_COUNT);
640            if (ret == LSCP_OK && (events & LSCP_EVENT_AUDIO_OUTPUT_DEVICE_INFO))
641                    ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_AUDIO_OUTPUT_DEVICE_INFO);
642            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INPUT_DEVICE_COUNT))
643                    ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_MIDI_INPUT_DEVICE_COUNT);
644            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INPUT_DEVICE_INFO))
645                    ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_MIDI_INPUT_DEVICE_INFO);
646            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INSTRUMENT_MAP_COUNT))
647                    ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_MIDI_INSTRUMENT_MAP_COUNT);
648            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INSTRUMENT_MAP_INFO))
649                    ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_MIDI_INSTRUMENT_MAP_INFO);
650            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INSTRUMENT_COUNT))
651                    ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_MIDI_INSTRUMENT_COUNT);
652            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INSTRUMENT_INFO))
653                    ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_MIDI_INSTRUMENT_INFO);
654          if (ret == LSCP_OK && (events & LSCP_EVENT_MISCELLANEOUS))          if (ret == LSCP_OK && (events & LSCP_EVENT_MISCELLANEOUS))
655                  ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_MISCELLANEOUS);                  ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_MISCELLANEOUS);
656            // Caution: for the upper 16 bits, we don't use bit flags anymore ...
657            if (ret == LSCP_OK && ((events & 0xffff0000) == LSCP_EVENT_CHANNEL_MIDI))
658                    ret = _lscp_client_evt_request(pClient, 1, LSCP_EVENT_CHANNEL_MIDI);
659    
660          // Unlock this section down.          // Unlock this section down.
661          lscp_mutex_unlock(pClient->mutex);          lscp_mutex_unlock(pClient->mutex);
# Line 619  lscp_status_t lscp_client_subscribe ( ls Line 666  lscp_status_t lscp_client_subscribe ( ls
666    
667  /**  /**
668   *  Deregister frontend from receiving UDP event messages anymore:   *  Deregister frontend from receiving UDP event messages anymore:
669   *  SUBSCRIBE CHANNEL_COUNT | VOICE_COUNT | STREAM_COUNT | BUFFER_FILL   *  @e Caution: since liblscp v0.5.5.4 you have to call
670   *      | CHANNEL_INFO | MISCELLANEOUS   *  lscp_client_unsubscribe() for @e each event you want to unsubscribe.
671     *  That is the old bitflag approach was abondoned at this point. You can
672     *  however still register all older events with one lscp_client_subscribe()
673     *  call at once. Thus, the old behavior of this functions was not broken.
674     *  Those older events are namely:
675     *  @code
676     *  UNSUBSCRIBE CHANNEL_COUNT | VOICE_COUNT | STREAM_COUNT
677     *      | BUFFER_FILL | CHANNEL_INFO | TOTAL_VOICE_COUNT
678     *      | AUDIO_OUTPUT_DEVICE_COUNT | AUDIO_OUTPUT_DEVICE_INFO
679     *      | MIDI_INPUT_DEVICE_COUNT | MIDI_INPUT_DEVICE_INFO
680     *      | MIDI_INSTRUMENT_MAP_COUNT | MIDI_INSTRUMENT_MAP_INFO
681     *      | MIDI_INSTRUMENT_COUNT | MIDI_INSTRUMENT_INFO
682     *      | MISCELLANEOUS
683     *  @endcode
684     *  The old events occupy the lower 16 bits (as bit flags), and all younger
685     *  events enumerate the whole upper 16 bits range. The new, enumerated
686     *  events are namely:
687     *  @code
688     *  UNSUBSCRIBE CHANNEL_MIDI
689     *  @endcode
690   *   *
691   *  @param pClient  Pointer to client instance structure.   *  @param pClient  Pointer to client instance structure.
692   *  @param events   Bit-wise OR'ed event flags to unsubscribe.   *  @param events   Bit-wise OR'ed event flags to unsubscribe.
# Line 648  lscp_status_t lscp_client_unsubscribe ( Line 714  lscp_status_t lscp_client_unsubscribe (
714                  ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_BUFFER_FILL);                  ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_BUFFER_FILL);
715          if (ret == LSCP_OK && (events & LSCP_EVENT_CHANNEL_INFO))          if (ret == LSCP_OK && (events & LSCP_EVENT_CHANNEL_INFO))
716                  ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_CHANNEL_INFO);                  ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_CHANNEL_INFO);
717            if (ret == LSCP_OK && (events & LSCP_EVENT_TOTAL_VOICE_COUNT))
718                    ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_TOTAL_VOICE_COUNT);
719            if (ret == LSCP_OK && (events & LSCP_EVENT_AUDIO_OUTPUT_DEVICE_COUNT))
720                    ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_AUDIO_OUTPUT_DEVICE_COUNT);
721            if (ret == LSCP_OK && (events & LSCP_EVENT_AUDIO_OUTPUT_DEVICE_INFO))
722                    ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_AUDIO_OUTPUT_DEVICE_INFO);
723            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INPUT_DEVICE_COUNT))
724                    ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_MIDI_INPUT_DEVICE_COUNT);
725            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INPUT_DEVICE_INFO))
726                    ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_MIDI_INPUT_DEVICE_INFO);
727            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INSTRUMENT_MAP_COUNT))
728                    ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_MIDI_INSTRUMENT_MAP_COUNT);
729            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INSTRUMENT_MAP_INFO))
730                    ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_MIDI_INSTRUMENT_MAP_INFO);
731            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INSTRUMENT_COUNT))
732                    ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_MIDI_INSTRUMENT_COUNT);
733            if (ret == LSCP_OK && (events & LSCP_EVENT_MIDI_INSTRUMENT_INFO))
734                    ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_MIDI_INSTRUMENT_INFO);
735          if (ret == LSCP_OK && (events & LSCP_EVENT_MISCELLANEOUS))          if (ret == LSCP_OK && (events & LSCP_EVENT_MISCELLANEOUS))
736                  ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_MISCELLANEOUS);                  ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_MISCELLANEOUS);
737            // Caution: for the upper 16 bits, we don't use bit flags anymore ...
738            if (ret == LSCP_OK && ((events & 0xffff0000) == LSCP_EVENT_CHANNEL_MIDI))
739                    ret = _lscp_client_evt_request(pClient, 0, LSCP_EVENT_CHANNEL_MIDI);
740    
741          // If necessary, close the alternate connection...          // If necessary, close the alternate connection...
742          if (pClient->events == LSCP_EVENT_NONE)          if (pClient->events == LSCP_EVENT_NONE)
# Line 1038  lscp_channel_info_t *lscp_get_channel_in Line 1125  lscp_channel_info_t *lscp_get_channel_in
1125                                  pszToken = lscp_strtok(NULL, pszCrlf, &(pch));                                  pszToken = lscp_strtok(NULL, pszCrlf, &(pch));
1126                                  if (pszToken) {                                  if (pszToken) {
1127                                          if (pChannelInfo->audio_routing)                                          if (pChannelInfo->audio_routing)
1128                                                  lscp_szsplit_destroy(pChannelInfo->audio_routing);                                                  lscp_isplit_destroy(pChannelInfo->audio_routing);
1129                                          pChannelInfo->audio_routing = lscp_szsplit_create(pszToken, ",");                                          pChannelInfo->audio_routing = lscp_isplit_create(pszToken, ",");
1130                                  }                                  }
1131                          }                          }
1132                          else if (strcasecmp(pszToken, "INSTRUMENT_FILE") == 0) {                          else if (strcasecmp(pszToken, "INSTRUMENT_FILE") == 0) {
# Line 1530  lscp_status_t lscp_set_channel_volume ( Line 1617  lscp_status_t lscp_set_channel_volume (
1617  {  {
1618          char szQuery[LSCP_BUFSIZ];          char szQuery[LSCP_BUFSIZ];
1619    
1620          if (iSamplerChannel < 0 || fVolume < 0.0)          if (iSamplerChannel < 0 || fVolume < 0.0f)
1621                  return LSCP_FAILED;                  return LSCP_FAILED;
1622    
1623          sprintf(szQuery, "SET CHANNEL VOLUME %d %g\r\n", iSamplerChannel, fVolume);          sprintf(szQuery, "SET CHANNEL VOLUME %d %g\r\n", iSamplerChannel, fVolume);
# Line 1617  lscp_status_t lscp_reset_channel ( lscp_ Line 1704  lscp_status_t lscp_reset_channel ( lscp_
1704   */   */
1705  lscp_status_t lscp_reset_sampler ( lscp_client_t *pClient )  lscp_status_t lscp_reset_sampler ( lscp_client_t *pClient )
1706  {  {
1707            // Do actual whole sampler reset...
1708          return lscp_client_query(pClient, "RESET\r\n");          return lscp_client_query(pClient, "RESET\r\n");
1709  }  }
1710    
# Line 1738  int lscp_get_total_voice_count_max ( lsc Line 1826  int lscp_get_total_voice_count_max ( lsc
1826    
1827    
1828  /**  /**
1829     *  Get global volume attenuation:
1830     *  GET VOLUME
1831     *
1832     *  @param pClient  Pointer to client instance structure.
1833     *
1834     *  @returns The global volume as positive floating point value usually in
1835     *  the range between 0.0 and 1.0; in case of failure 0.0 is returned.
1836     */
1837    float lscp_get_volume ( lscp_client_t *pClient )
1838    {
1839            float fVolume = 0.0f;
1840    
1841            if (pClient == NULL)
1842                    return 0.0f;
1843    
1844            // Lock this section up.
1845            lscp_mutex_lock(pClient->mutex);
1846    
1847            if (lscp_client_call(pClient, "GET VOLUME\r\n", 0) == LSCP_OK)
1848                    fVolume = (float) atof(lscp_client_get_result(pClient));
1849    
1850            // Unlock this section down.
1851            lscp_mutex_unlock(pClient->mutex);
1852    
1853            return fVolume;
1854    }
1855    
1856    
1857    /**
1858     *  Setting global volume attenuation:
1859     *  SET VOLUME <volume>
1860     *
1861     *  @param pClient  Pointer to client instance structure.
1862     *  @param fVolume  Global volume parameter as positive floating point
1863     *                  value usually be in the range between 0.0 and 1.0,
1864     *                  that is for attenuating the overall volume.
1865     *
1866     *  @returns LSCP_OK on success, LSCP_FAILED otherwise.
1867     */
1868    lscp_status_t lscp_set_volume ( lscp_client_t *pClient, float fVolume )
1869    {
1870            char szQuery[LSCP_BUFSIZ];
1871    
1872            if (fVolume < 0.0f)
1873                    return LSCP_FAILED;
1874    
1875            sprintf(szQuery, "SET VOLUME %g\r\n", fVolume);
1876            return lscp_client_query(pClient, szQuery);
1877    }
1878    
1879    
1880    /**
1881     *  Add an effect send to a sampler channel:
1882     *  CREATE FX_SEND <sampler-channel> <midi-ctrl> [<name>]
1883     *
1884     *  @param pClient          Pointer to client instance structure.
1885     *  @param iSamplerChannel  Sampler channel number.
1886     *  @param iMidiController  MIDI controller used to alter the effect,
1887     *                          usually a number between 0 and 127.
1888     *  @param pszName          Optional name for the effect send entity,
1889     *                          does not have to be unique.
1890     *
1891     *  @returns The new effect send number identifier, or -1 in case of failure.
1892     */
1893    int lscp_create_fxsend ( lscp_client_t *pClient, int iSamplerChannel, int iMidiController, const char *pszFxName )
1894    {
1895            int iFxSend = -1;
1896            char szQuery[LSCP_BUFSIZ];
1897    
1898            if (pClient == NULL)
1899                    return -1;
1900            if (iSamplerChannel < 0 || iMidiController < 0 || iMidiController > 127)
1901                    return -1;
1902    
1903            // Lock this section up.
1904            lscp_mutex_lock(pClient->mutex);
1905    
1906            sprintf(szQuery, "CREATE FX_SEND %d %d", iSamplerChannel, iMidiController);
1907            
1908            if (pszFxName)
1909                    sprintf(szQuery + strlen(szQuery), " '%s'", pszFxName);
1910    
1911            strcat(szQuery, "\r\n");
1912    
1913            if (lscp_client_call(pClient, szQuery, 0) == LSCP_OK)
1914                    iFxSend = atoi(lscp_client_get_result(pClient));
1915    
1916            // Unlock this section down.
1917            lscp_mutex_unlock(pClient->mutex);
1918    
1919            return iFxSend;
1920    }
1921    
1922    
1923    /**
1924     *  Remove an effect send from a sampler channel:
1925     *  DESTROY FX_SEND <sampler-channel> <fx-send-id>
1926     *
1927     *  @param pClient          Pointer to client instance structure.
1928     *  @param iSamplerChannel  Sampler channel number.
1929     *  @param iFxSend          Effect send number.
1930     *
1931     *  @returns LSCP_OK on success, LSCP_FAILED otherwise.
1932     */
1933    lscp_status_t lscp_destroy_fxsend ( lscp_client_t *pClient, int iSamplerChannel, int iFxSend )
1934    {
1935            char szQuery[LSCP_BUFSIZ];
1936    
1937            if (iSamplerChannel < 0 || iFxSend < 0)
1938                    return LSCP_FAILED;
1939    
1940            sprintf(szQuery, "DESTROY FX_SEND %d %d\r\n", iSamplerChannel, iFxSend);
1941    
1942            return lscp_client_query(pClient, szQuery);
1943    }
1944    
1945    
1946    /**
1947     *  Get amount of effect sends on a sampler channel:
1948     *  GET FX_SENDS <sampler-channel>
1949     *
1950     *  @param pClient          Pointer to client instance structure.
1951     *  @param iSamplerChannel  Sampler channel number.
1952     *
1953     *  @returns The current total number of effect sends of the sampler channel
1954     *  on success, -1 otherwise.
1955     */
1956    int lscp_get_fxsends ( lscp_client_t *pClient, int iSamplerChannel )
1957    {
1958            int iFxSends = -1;
1959            char szQuery[LSCP_BUFSIZ];
1960    
1961            if (pClient == NULL)
1962                    return -1;
1963            if (iSamplerChannel < 0)
1964                    return -1;
1965    
1966            // Lock this section up.
1967            lscp_mutex_lock(pClient->mutex);
1968    
1969            sprintf(szQuery, "GET FX_SENDS %d\r\n", iSamplerChannel);
1970    
1971            if (lscp_client_call(pClient, szQuery, 0) == LSCP_OK)
1972                    iFxSends = atoi(lscp_client_get_result(pClient));
1973    
1974            // Unlock this section doen.
1975            lscp_mutex_unlock(pClient->mutex);
1976    
1977            return iFxSends;
1978    }
1979    
1980    
1981    /**
1982     *  List all effect sends on a sampler channel:
1983     *  LIST FX_SENDS <sampler-channel>
1984     *
1985     *  @param pClient          Pointer to client instance structure.
1986     *  @param iSamplerChannel  Sampler channel number.
1987     *
1988     *  @returns An array of the effect sends identifiers as positive integers,
1989     *  terminated with -1 on success, NULL otherwise.
1990     */
1991    int *lscp_list_fxsends ( lscp_client_t *pClient, int iSamplerChannel )
1992    {
1993            const char *pszSeps = ",";
1994            char szQuery[LSCP_BUFSIZ];
1995    
1996            if (pClient == NULL)
1997                    return NULL;
1998    
1999            // Lock this section up.
2000            lscp_mutex_lock(pClient->mutex);
2001    
2002            if (pClient->fxsends) {
2003                    lscp_isplit_destroy(pClient->fxsends);
2004                    pClient->fxsends = NULL;
2005            }
2006    
2007            sprintf(szQuery, "LIST FX_SENDS %d\r\n", iSamplerChannel);
2008    
2009            if (lscp_client_call(pClient, szQuery, 0) == LSCP_OK)
2010                    pClient->fxsends = lscp_isplit_create(lscp_client_get_result(pClient), pszSeps);
2011    
2012            // Unlock this section down.
2013            lscp_mutex_unlock(pClient->mutex);
2014    
2015            return pClient->fxsends;
2016    }
2017    
2018    
2019    /**
2020     *  Getting effect send information
2021     *  GET FX_SEND INFO <sampler-channel> <fx-send-id>
2022     *
2023     *  @param pClient          Pointer to client instance structure.
2024     *  @param iSamplerChannel  Sampler channel number.
2025     *  @param iFxSend          Effect send number.
2026     *
2027     *  @returns A pointer to a @ref lscp_fxsend_info_t structure, with the
2028     *  information of the given FX send, or NULL in case of failure.
2029     */
2030    lscp_fxsend_info_t *lscp_get_fxsend_info ( lscp_client_t *pClient, int iSamplerChannel, int iFxSend )
2031    {
2032            lscp_fxsend_info_t *pFxSendInfo;
2033            char szQuery[LSCP_BUFSIZ];
2034            const char *pszResult;
2035            const char *pszSeps = ":";
2036            const char *pszCrlf = "\r\n";
2037            char *pszToken;
2038            char *pch;
2039    
2040            if (pClient == NULL)
2041                    return NULL;
2042            if (iSamplerChannel < 0 || iFxSend < 0)
2043                    return NULL;
2044    
2045            // Lock this section up.
2046            lscp_mutex_lock(pClient->mutex);
2047    
2048            pFxSendInfo = &(pClient->fxsend_info);
2049            lscp_fxsend_info_reset(pFxSendInfo);
2050    
2051            sprintf(szQuery, "GET FX_SEND INFO %d %d\r\n", iSamplerChannel, iFxSend);
2052            if (lscp_client_call(pClient, szQuery, 1) == LSCP_OK) {
2053                    pszResult = lscp_client_get_result(pClient);
2054                    pszToken = lscp_strtok((char *) pszResult, pszSeps, &(pch));
2055                    while (pszToken) {
2056                            if (strcasecmp(pszToken, "NAME") == 0) {
2057                                    pszToken = lscp_strtok(NULL, pszCrlf, &(pch));
2058                                    if (pszToken)
2059                                            lscp_unquote_dup(&(pFxSendInfo->name), &pszToken);
2060                            }
2061                            else if (strcasecmp(pszToken, "MIDI_CONTROLLER") == 0) {
2062                                    pszToken = lscp_strtok(NULL, pszCrlf, &(pch));
2063                                    if (pszToken)
2064                                            pFxSendInfo->midi_controller = atoi(lscp_ltrim(pszToken));
2065                            }
2066                            else if (strcasecmp(pszToken, "AUDIO_OUTPUT_ROUTING") == 0) {
2067                                    pszToken = lscp_strtok(NULL, pszCrlf, &(pch));
2068                                    if (pszToken) {
2069                                            if (pFxSendInfo->audio_routing)
2070                                                    lscp_isplit_destroy(pFxSendInfo->audio_routing);
2071                                            pFxSendInfo->audio_routing = lscp_isplit_create(pszToken, ",");
2072                                    }
2073                            }
2074                            else if (strcasecmp(pszToken, "LEVEL") == 0) {
2075                                    pszToken = lscp_strtok(NULL, pszCrlf, &(pch));
2076                                    if (pszToken)
2077                                            pFxSendInfo->level = (float) atof(lscp_ltrim(pszToken));
2078                            }
2079                            pszToken = lscp_strtok(NULL, pszSeps, &(pch));
2080                    }
2081            }
2082            else pFxSendInfo = NULL;
2083    
2084            // Unlock this section up.
2085            lscp_mutex_unlock(pClient->mutex);
2086    
2087            return pFxSendInfo;
2088    }
2089    
2090    /**
2091     *  Alter effect send's name:
2092     *  @code
2093     *  SET FX_SEND NAME <sampler-chan> <fx-send-id> <name>
2094     *  @endcode
2095     *
2096     *  @param pClient          Pointer to client instance structure.
2097     *  @param iSamplerChannel  Sampler channel number.
2098     *  @param iFxSend          Effect send number.
2099     *  @param pszFxName        Effect send's new name.
2100     *
2101     *  @returns LSCP_OK on success, LSCP_FAILED otherwise.
2102     */
2103    lscp_status_t lscp_set_fxsend_name ( lscp_client_t *pClient, int iSamplerChannel, int iFxSend, const char *pszFxName )
2104    {
2105            char szQuery[LSCP_BUFSIZ];
2106    
2107            if (!pClient || iSamplerChannel < 0 || iFxSend < 0 || !pszFxName)
2108                    return LSCP_FAILED;
2109    
2110            snprintf(szQuery, LSCP_BUFSIZ, "SET FX_SEND NAME %d %d '%s'\r\n", iSamplerChannel, iFxSend, pszFxName);
2111            return lscp_client_query(pClient, szQuery);
2112    }
2113    
2114    /**
2115     *  Alter effect send's audio routing:
2116     *  SET FX_SEND AUDIO_OUTPUT_CHANNEL <sampler-chan> <fx-send-id>
2117     *    <audio-src> <audio-dst>
2118     *
2119     *  @param pClient          Pointer to client instance structure.
2120     *  @param iSamplerChannel  Sampler channel number.
2121     *  @param iFxSend          Effect send number.
2122     *  @param iAudioSrc        Audio output device channel to be routed from.
2123     *  @param iAudioDst        Audio output device channel to be routed into.
2124     *
2125     *  @returns LSCP_OK on success, LSCP_FAILED otherwise.
2126     */
2127    lscp_status_t lscp_set_fxsend_audio_channel ( lscp_client_t *pClient, int iSamplerChannel, int iFxSend, int iAudioSrc, int iAudioDst )
2128    {
2129            char szQuery[LSCP_BUFSIZ];
2130    
2131            if (iSamplerChannel < 0 || iFxSend < 0 || iAudioSrc < 0 || iAudioDst < 0)
2132                    return LSCP_FAILED;
2133    
2134            sprintf(szQuery, "SET FX_SEND AUDIO_OUTPUT_CHANNEL %d %d %d %d\r\n", iSamplerChannel, iFxSend, iAudioSrc, iAudioDst);
2135            return lscp_client_query(pClient, szQuery);
2136    }
2137    
2138    
2139    /**
2140     *  Alter effect send's MIDI controller:
2141     *  SET FX_SEND MIDI_CONTROLLER <sampler-chan> <fx-send-id> <midi-ctrl>
2142     *
2143     *  @param pClient          Pointer to client instance structure.
2144     *  @param iSamplerChannel  Sampler channel number.
2145     *  @param iFxSend          Effect send number.
2146     *  @param iMidiController  MIDI controller used to alter the effect,
2147     *                          usually a number between 0 and 127.
2148     *
2149     *  @returns LSCP_OK on success, LSCP_FAILED otherwise.
2150     */
2151    lscp_status_t lscp_set_fxsend_midi_controller ( lscp_client_t *pClient, int iSamplerChannel, int iFxSend, int iMidiController )
2152    {
2153            char szQuery[LSCP_BUFSIZ];
2154    
2155            if (iSamplerChannel < 0 || iFxSend < 0 || iMidiController < 0 || iMidiController > 127)
2156                    return LSCP_FAILED;
2157    
2158            sprintf(szQuery, "SET FX_SEND MIDI_CONTROLLER %d %d %d\r\n", iSamplerChannel, iFxSend, iMidiController);
2159            return lscp_client_query(pClient, szQuery);
2160    }
2161    
2162    
2163    /**
2164     *  Alter effect send's audio level:
2165     *  SET FX_SEND LEVEL <sampler-chan> <fx-send-id> <level>
2166     *
2167     *  @param pClient          Pointer to client instance structure.
2168     *  @param iSamplerChannel  Sampler channel number.
2169     *  @param iFxSend          Effect send number.
2170     *  @param fLevel           Effect send volume level.
2171     *
2172     *  @returns LSCP_OK on success, LSCP_FAILED otherwise.
2173     */
2174    lscp_status_t lscp_set_fxsend_level ( lscp_client_t *pClient, int iSamplerChannel, int iFxSend, float fLevel )
2175    {
2176            char szQuery[LSCP_BUFSIZ];
2177    
2178            if (iSamplerChannel < 0 || iFxSend < 0 || fLevel < 0.0f)
2179                    return LSCP_FAILED;
2180    
2181            sprintf(szQuery, "SET FX_SEND LEVEL %d %d %f\r\n", iSamplerChannel, iFxSend, fLevel);
2182            return lscp_client_query(pClient, szQuery);
2183    }
2184    
2185    
2186    /**
2187   *  Create a new MIDI instrument map:   *  Create a new MIDI instrument map:
2188   *  ADD MIDI_INSTRUMENT_MAP [<name>]   *  ADD MIDI_INSTRUMENT_MAP [<name>]
2189   *   *
# Line 2240  lscp_status_t lscp_clear_midi_instrument Line 2686  lscp_status_t lscp_clear_midi_instrument
2686    
2687          return lscp_client_query(pClient, szQuery);          return lscp_client_query(pClient, szQuery);
2688  }  }
2689    
2690    /**
2691     * Open an instrument editor application for the instrument
2692     * on the given sampler channel:
2693     * EDIT CHANNEL INSTRUMENT <sampler-channel>
2694     *
2695     * @param pClient         Pointer to client instance structure.
2696     * @param iSamplerChannel Sampler Channel.
2697     *
2698     * @returns LSCP_OK on success, LSCP_FAILED otherwise.
2699     */
2700    lscp_status_t lscp_edit_channel_instrument ( lscp_client_t *pClient, int iSamplerChannel )
2701    {
2702            char szQuery[LSCP_BUFSIZ];
2703    
2704            if (iSamplerChannel < 0)
2705                    return LSCP_FAILED;
2706    
2707            sprintf(szQuery, "EDIT CHANNEL INSTRUMENT %d\r\n", iSamplerChannel);
2708    
2709            return lscp_client_query(pClient, szQuery);
2710    }
2711    
2712    
2713  // end of client.c  // end of client.c
Legend:
Removed from v.977  
changed lines
  Added in v.1692
  ViewVC Help
Powered by ViewVC