SV platform dependency builds

/*

 * Portable Audio I/O Library

 * Java Binding for PortAudio

 *

 * Based on the Open Source API proposed by Ross Bencina

 * Copyright (c) 2008 Ross Bencina

 *

 * Permission is hereby granted, free of charge, to any person obtaining

 * a copy of this software and associated documentation files

 * (the "Software"), to deal in the Software without restriction,

 * including without limitation the rights to use, copy, modify, merge,

 * publish, distribute, sublicense, and/or sell copies of the Software,

 * and to permit persons to whom the Software is furnished to do so,

 * subject to the following conditions:

 *

 * The above copyright notice and this permission notice shall be

 * included in all copies or substantial portions of the Software.

 *

 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,

 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF

 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.

 * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR

 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF

 * CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION

 * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

 */

/*

 * The text above constitutes the entire PortAudio license; however, 

 * the PortAudio community also makes the following non-binding requests:

 *

 * Any person wishing to distribute modifications to the Software is

 * requested to send the modifications to the original developer so that

 * they can be incorporated into the canonical version. It is also 

 * requested that these non-binding requests be included along with the 

 * license above.

 */

#include "com_portaudio_PortAudio.h"

#include "portaudio.h"

#include "jpa_tools.h"

jint jpa_GetIntField( JNIEnv *env, jclass cls, jobject obj, const char *fieldName )

{

     /* Look for the instance field maxInputChannels in cls */

     jfieldID fid = (*env)->GetFieldID(env, cls, fieldName, "I");

     if (fid == NULL)

         {

                 jpa_ThrowError( env, "Cannot find integer JNI field." );

                return 0;

     }

         else

         {

                return (*env)->GetIntField(env, obj, fid );

         }

}

void jpa_SetIntField( JNIEnv *env, jclass cls, jobject obj, const char *fieldName, jint value )

{

     /* Look for the instance field maxInputChannels in cls */

     jfieldID fid = (*env)->GetFieldID(env, cls, fieldName, "I");

     if (fid == NULL)

         {

                 jpa_ThrowError( env, "Cannot find integer JNI field." );

     }

         else

         {

                (*env)->SetIntField(env, obj, fid, value );

         }

}

jlong jpa_GetLongField( JNIEnv *env, jclass cls, jobject obj, const char *fieldName )

{

     /* Look for the instance field maxInputChannels in cls */

     jfieldID fid = (*env)->GetFieldID(env, cls, fieldName, "J");

     if (fid == NULL)

         {

                 jpa_ThrowError( env, "Cannot find long JNI field." );

                return 0L;

     }

         else

         {

                return (*env)->GetLongField(env, obj, fid );

         }

}

void jpa_SetLongField( JNIEnv *env, jclass cls, jobject obj, const char *fieldName, jlong value )

{

     /* Look for the instance field maxInputChannels in cls */

     jfieldID fid = (*env)->GetFieldID(env, cls, fieldName, "J");

     if (fid == NULL)

         {

                 jpa_ThrowError( env, "Cannot find long JNI field." );

     }

         else

         {

                (*env)->SetLongField(env, obj, fid, value );

         }

}

void jpa_SetDoubleField( JNIEnv *env, jclass cls, jobject obj, const char *fieldName, jdouble value )

{

     /* Look for the instance field maxInputChannels in cls */

     jfieldID fid = (*env)->GetFieldID(env, cls, fieldName, "D");

     if (fid == NULL)

         {

                 jpa_ThrowError( env, "Cannot find double JNI field." );

     }

         else

         {

                (*env)->SetDoubleField(env, obj, fid, value );

         }

}

jdouble jpa_GetDoubleField( JNIEnv *env, jclass cls, jobject obj, const char *fieldName )

{

     /* Look for the instance field maxInputChannels in cls */

     jfieldID fid = (*env)->GetFieldID(env, cls, fieldName, "D");

     if (fid == NULL)

         {

                 jpa_ThrowError( env, "Cannot find double JNI field." );

                return 0;

     }

         else

         {

                return (*env)->GetDoubleField(env, obj, fid );

         }

}

void jpa_SetStringField( JNIEnv *env, jclass cls, jobject obj, const char *fieldName, const char *value )

{

     /* Look for the instance field maxInputChannels in cls */

     jfieldID fid = (*env)->GetFieldID(env, cls, fieldName, "Ljava/lang/String;");

     if (fid == NULL)

         {

                 jpa_ThrowError( env, "Cannot find String JNI field." );

     }

         else

         {

                jstring jstr = (*env)->NewStringUTF(env, value);

                if (jstr == NULL)

                {

                        jpa_ThrowError( env, "Cannot create new String." );

                }

                else

                {

                        (*env)->SetObjectField(env, obj, fid, jstr );

                }

         }

}

PaStreamParameters *jpa_FillStreamParameters( JNIEnv *env, jobject jstreamParam, PaStreamParameters *myParams )

{

        jclass cls;

        if( jstreamParam == NULL ) return NULL; // OK, not an error

        cls = (*env)->GetObjectClass(env, jstreamParam);

        myParams->channelCount = jpa_GetIntField( env, cls, jstreamParam, "channelCount" );

        myParams->device = jpa_GetIntField( env, cls, jstreamParam, "device" );

        myParams->sampleFormat = jpa_GetIntField( env, cls, jstreamParam, "sampleFormat" );

        myParams->suggestedLatency = jpa_GetDoubleField( env, cls, jstreamParam, "suggestedLatency" );

        myParams->hostApiSpecificStreamInfo = NULL;

        return myParams;

}

// Create an exception that will be thrown when we return from the JNI call.

jint jpa_ThrowError( JNIEnv *env, const char *message )

{

        return (*env)->ThrowNew(env, (*env)->FindClass( env, "java/lang/RuntimeException"),

                  message );

}

// Throw an exception on error.

jint jpa_CheckError( JNIEnv *env, PaError err )

{

        if( err == -1 )

        {

        return jpa_ThrowError( env, "-1, possibly no available default device" );

    }

    else if( err < 0 )

    {

                if( err == paUnanticipatedHostError )

                {

                        const PaHostErrorInfo *hostErrorInfo = Pa_GetLastHostErrorInfo();

                        return jpa_ThrowError( env, hostErrorInfo->errorText );

                }

                else

                {

                        return jpa_ThrowError( env, Pa_GetErrorText( err ) );

                }

        }

        else

        {

                return err;

        }

}

// Get the stream pointer from a BlockingStream long field.

PaStream *jpa_GetStreamPointer( JNIEnv *env, jobject blockingStream )

{

        jclass cls = (*env)->GetObjectClass(env, blockingStream);

        return (PaStream *) jpa_GetLongField( env, cls, blockingStream, "nativeStream" );

}