@stdlib/math-base-napi-unary 0.0.4 → 0.0.8

package/src/main.c

@@ -17,9 +17,14 @@
 */
 
 #include "stdlib/math/base/napi/unary.h"
+#include "stdlib/complex/float64.h"
+#include "stdlib/complex/float32.h"
+#include "stdlib/complex/reim.h"
+#include "stdlib/complex/reimf.h"
 #include <node_api.h>
 #include <stdint.h>
 #include <assert.h>
+#include <stdbool.h>
 
 /**
 * Invokes a unary function accepting and returning double-precision floating-point numbers.
@@ -33,7 +38,7 @@
 * @param env    environment under which the function is invoked
 * @param info   callback data
 * @param fcn    unary function
-* @return       function return value as an N-API double-precision floating-point number
+* @return       function return value as a Node-API double-precision floating-point number
 */
 napi_value stdlib_math_base_napi_d_d( napi_env env, napi_callback_info info, double (*fcn)( double ) ) {
 	napi_status status;
@@ -81,7 +86,7 @@ napi_value stdlib_math_base_napi_d_d( napi_env env, napi_callback_info info, dou
 * @param env    environment under which the function is invoked
 * @param info   callback data
 * @param fcn    unary function
-* @return       function return value as an N-API double-precision floating-point number
+* @return       function return value as a Node-API double-precision floating-point number
 */
 napi_value stdlib_math_base_napi_f_f( napi_env env, napi_callback_info info, float (*fcn)( float ) ) {
 	napi_status status;
@@ -117,6 +122,388 @@ napi_value stdlib_math_base_napi_f_f( napi_env env, napi_callback_info info, flo
 	return v;
 }
 
+/**
+* Invokes a unary function accepting and returning double-precision complex floating-point numbers.
+*
+* ## Notes
+*
+* -   This function expects that the callback `info` argument provides access to the following JavaScript arguments:
+*
+*     -   `x`: input value.
+*
+* @param env    environment under which the function is invoked
+* @param info   callback data
+* @param fcn    unary function
+* @return       function return value as a Node-API complex-like object
+*/
+napi_value stdlib_math_base_napi_z_z( napi_env env, napi_callback_info info, stdlib_complex128_t (*fcn)( stdlib_complex128_t ) ) {
+	napi_status status;
+
+	size_t argc = 1;
+	napi_value argv[ 1 ];
+	status = napi_get_cb_info( env, info, &argc, argv, NULL, NULL );
+	assert( status == napi_ok );
+
+	if ( argc < 1 ) {
+		status = napi_throw_error( env, NULL, "invalid invocation. Must provide a complex number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	bool hprop;
+	status = napi_has_named_property( env, argv[ 0 ], "re", &hprop );
+	assert( status == napi_ok );
+	if ( !hprop ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have a real component." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	napi_value xre;
+	status = napi_get_named_property( env, argv[ 0 ], "re", &xre );
+	assert( status == napi_ok );
+
+	napi_valuetype xretype;
+	status = napi_typeof( env, xre, &xretype );
+	assert( status == napi_ok );
+	if ( xretype != napi_number ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have a real component which is a number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	status = napi_has_named_property( env, argv[ 0 ], "im", &hprop );
+	assert( status == napi_ok );
+	if ( !hprop ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have an imaginary component." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	napi_value xim;
+	status = napi_get_named_property( env, argv[ 0 ], "im", &xim );
+	assert( status == napi_ok );
+
+	napi_valuetype ximtype;
+	status = napi_typeof( env, xim, &ximtype );
+	assert( status == napi_ok );
+	if ( ximtype != napi_number ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have an imaginary component which a number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	double re0;
+	status = napi_get_value_double( env, xre, &re0 );
+	assert( status == napi_ok );
+
+	double im0;
+	status = napi_get_value_double( env, xim, &im0 );
+	assert( status == napi_ok );
+
+	stdlib_complex128_t v = fcn( stdlib_complex128( re0, im0 ) );
+	double re;
+	double im;
+	stdlib_reim( v, &re, &im );
+
+	napi_value obj;
+	status = napi_create_object( env, &obj );
+	assert( status == napi_ok );
+
+	napi_value vre;
+	status = napi_create_double( env, re, &vre );
+	assert( status == napi_ok );
+
+	status = napi_set_named_property( env, obj, "re", vre );
+	assert( status == napi_ok );
+
+	napi_value vim;
+	status = napi_create_double( env, im, &vim );
+	assert( status == napi_ok );
+
+	status = napi_set_named_property( env, obj, "im", vim );
+	assert( status == napi_ok );
+
+	return obj;
+}
+
+/**
+* Invokes a unary function accepting a double-precision complex floating-point number and returning a double-precision floating-point number.
+*
+* ## Notes
+*
+* -   This function expects that the callback `info` argument provides access to the following JavaScript arguments:
+*
+*     -   `x`: input value.
+*
+* @param env    environment under which the function is invoked
+* @param info   callback data
+* @param fcn    unary function
+* @return       function return value as a Node-API complex-like object
+*/
+napi_value stdlib_math_base_napi_z_d( napi_env env, napi_callback_info info, double (*fcn)( stdlib_complex128_t ) ) {
+	napi_status status;
+
+	size_t argc = 1;
+	napi_value argv[ 1 ];
+	status = napi_get_cb_info( env, info, &argc, argv, NULL, NULL );
+	assert( status == napi_ok );
+
+	if ( argc < 1 ) {
+		status = napi_throw_error( env, NULL, "invalid invocation. Must provide a complex number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	bool hprop;
+	status = napi_has_named_property( env, argv[ 0 ], "re", &hprop );
+	assert( status == napi_ok );
+	if ( !hprop ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have a real component." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	napi_value xre;
+	status = napi_get_named_property( env, argv[ 0 ], "re", &xre );
+	assert( status == napi_ok );
+
+	napi_valuetype xretype;
+	status = napi_typeof( env, xre, &xretype );
+	assert( status == napi_ok );
+	if ( xretype != napi_number ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have a real component which is a number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	status = napi_has_named_property( env, argv[ 0 ], "im", &hprop );
+	assert( status == napi_ok );
+	if ( !hprop ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have an imaginary component." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	napi_value xim;
+	status = napi_get_named_property( env, argv[ 0 ], "im", &xim );
+	assert( status == napi_ok );
+
+	napi_valuetype ximtype;
+	status = napi_typeof( env, xim, &ximtype );
+	assert( status == napi_ok );
+	if ( ximtype != napi_number ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have an imaginary component which a number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	double re;
+	status = napi_get_value_double( env, xre, &re );
+	assert( status == napi_ok );
+
+	double im;
+	status = napi_get_value_double( env, xim, &im );
+	assert( status == napi_ok );
+
+	napi_value v;
+	status = napi_create_double( env, fcn( stdlib_complex128( re, im ) ), &v );
+	assert( status == napi_ok );
+
+	return v;
+}
+
+/**
+* Invokes a unary function accepting and returning single-precision complex floating-point numbers.
+*
+* ## Notes
+*
+* -   This function expects that the callback `info` argument provides access to the following JavaScript arguments:
+*
+*     -   `x`: input value.
+*
+* @param env    environment under which the function is invoked
+* @param info   callback data
+* @param fcn    unary function
+* @return       function return value as a Node-API complex-like object
+*/
+napi_value stdlib_math_base_napi_c_c( napi_env env, napi_callback_info info, stdlib_complex64_t (*fcn)( stdlib_complex64_t ) ) {
+	napi_status status;
+
+	size_t argc = 1;
+	napi_value argv[ 1 ];
+	status = napi_get_cb_info( env, info, &argc, argv, NULL, NULL );
+	assert( status == napi_ok );
+
+	if ( argc < 1 ) {
+		status = napi_throw_error( env, NULL, "invalid invocation. Must provide a complex number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	bool hprop;
+	status = napi_has_named_property( env, argv[ 0 ], "re", &hprop );
+	assert( status == napi_ok );
+	if ( !hprop ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have a real component." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	napi_value xre;
+	status = napi_get_named_property( env, argv[ 0 ], "re", &xre );
+	assert( status == napi_ok );
+
+	napi_valuetype xretype;
+	status = napi_typeof( env, xre, &xretype );
+	assert( status == napi_ok );
+	if ( xretype != napi_number ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have a real component which is a number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	status = napi_has_named_property( env, argv[ 0 ], "im", &hprop );
+	assert( status == napi_ok );
+	if ( !hprop ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have an imaginary component." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	napi_value xim;
+	status = napi_get_named_property( env, argv[ 0 ], "im", &xim );
+	assert( status == napi_ok );
+
+	napi_valuetype ximtype;
+	status = napi_typeof( env, xim, &ximtype );
+	assert( status == napi_ok );
+	if ( ximtype != napi_number ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have an imaginary component which a number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	double re0;
+	status = napi_get_value_double( env, xre, &re0 );
+	assert( status == napi_ok );
+
+	double im0;
+	status = napi_get_value_double( env, xim, &im0 );
+	assert( status == napi_ok );
+
+	stdlib_complex64_t v = fcn( stdlib_complex64( (float)re0, (float)im0 ) );
+	float re;
+	float im;
+	stdlib_reimf( v, &re, &im );
+
+	napi_value obj;
+	status = napi_create_object( env, &obj );
+	assert( status == napi_ok );
+
+	napi_value vre;
+	status = napi_create_double( env, (double)re, &vre );
+	assert( status == napi_ok );
+
+	status = napi_set_named_property( env, obj, "re", vre );
+	assert( status == napi_ok );
+
+	napi_value vim;
+	status = napi_create_double( env, (double)im, &vim );
+	assert( status == napi_ok );
+
+	status = napi_set_named_property( env, obj, "im", vim );
+	assert( status == napi_ok );
+
+	return obj;
+}
+
+/**
+* Invokes a unary function accepting a single-precision complex floating-point number and returning a single-precision floating-point number.
+*
+* ## Notes
+*
+* -   This function expects that the callback `info` argument provides access to the following JavaScript arguments:
+*
+*     -   `x`: input value.
+*
+* @param env    environment under which the function is invoked
+* @param info   callback data
+* @param fcn    unary function
+* @return       function return value as a Node-API complex-like object
+*/
+napi_value stdlib_math_base_napi_c_f( napi_env env, napi_callback_info info, float (*fcn)( stdlib_complex64_t ) ) {
+	napi_status status;
+
+	size_t argc = 1;
+	napi_value argv[ 1 ];
+	status = napi_get_cb_info( env, info, &argc, argv, NULL, NULL );
+	assert( status == napi_ok );
+
+	if ( argc < 1 ) {
+		status = napi_throw_error( env, NULL, "invalid invocation. Must provide a complex number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	bool hprop;
+	status = napi_has_named_property( env, argv[ 0 ], "re", &hprop );
+	assert( status == napi_ok );
+	if ( !hprop ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have a real component." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	napi_value xre;
+	status = napi_get_named_property( env, argv[ 0 ], "re", &xre );
+	assert( status == napi_ok );
+
+	napi_valuetype xretype;
+	status = napi_typeof( env, xre, &xretype );
+	assert( status == napi_ok );
+	if ( xretype != napi_number ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have a real component which is a number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	status = napi_has_named_property( env, argv[ 0 ], "im", &hprop );
+	assert( status == napi_ok );
+	if ( !hprop ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have an imaginary component." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	napi_value xim;
+	status = napi_get_named_property( env, argv[ 0 ], "im", &xim );
+	assert( status == napi_ok );
+
+	napi_valuetype ximtype;
+	status = napi_typeof( env, xim, &ximtype );
+	assert( status == napi_ok );
+	if ( ximtype != napi_number ) {
+		status = napi_throw_type_error( env, NULL, "invalid argument. Argument must have an imaginary component which a number." );
+		assert( status == napi_ok );
+		return NULL;
+	}
+
+	double re;
+	status = napi_get_value_double( env, xre, &re );
+	assert( status == napi_ok );
+
+	double im;
+	status = napi_get_value_double( env, xim, &im );
+	assert( status == napi_ok );
+
+	napi_value v;
+	status = napi_create_double( env, (double)fcn( stdlib_complex64( (float)re, (float)im ) ), &v );
+	assert( status == napi_ok );
+
+	return v;
+}
+
 /**
 * Invokes a unary function accepting and returning 32-bit signed integers.
 *
@@ -129,7 +516,7 @@ napi_value stdlib_math_base_napi_f_f( napi_env env, napi_callback_info info, flo
 * @param env    environment under which the function is invoked
 * @param info   callback data
 * @param fcn    unary function
-* @return       function return value as an N-API 32-bit signed integer
+* @return       function return value as a Node-API 32-bit signed integer
 */
 napi_value stdlib_math_base_napi_i_i( napi_env env, napi_callback_info info, int32_t (*fcn)( int32_t ) ) {
 	napi_status status;

package/CHANGELOG.md

@@ -1,5 +0,0 @@
-# CHANGELOG
-
-> Package changelog.
-
-See [GitHub Releases](https://github.com/stdlib-js/math-base-napi-unary/releases) for the changelog.

package/binding.gyp

@@ -1,170 +0,0 @@
-# @license Apache-2.0
-#
-# Copyright (c) 2020 The Stdlib Authors.
-#
-# Licensed under the Apache License, Version 2.0 (the "License");
-# you may not use this file except in compliance with the License.
-# You may obtain a copy of the License at
-#
-#    http://www.apache.org/licenses/LICENSE-2.0
-#
-# Unless required by applicable law or agreed to in writing, software
-# distributed under the License is distributed on an "AS IS" BASIS,
-# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-# See the License for the specific language governing permissions and
-# limitations under the License.
-
-# A `.gyp` file for building a Node.js native add-on.
-#
-# [1]: https://gyp.gsrc.io/docs/InputFormatReference.md
-# [2]: https://gyp.gsrc.io/docs/UserDocumentation.md
-{
-  # List of files to include in this file:
-  'includes': [
-    './include.gypi',
-  ],
-
-  # Define variables to be used throughout the configuration for all targets:
-  'variables': {
-    # Target name should match the add-on export name:
-    'addon_target_name%': 'addon',
-
-    # Set variables based on the host OS:
-    'conditions': [
-      [
-        'OS=="win"',
-        {
-          # Define the object file suffix:
-          'obj': 'obj',
-        },
-        {
-          # Define the object file suffix:
-          'obj': 'o',
-        }
-      ], # end condition (OS=="win")
-    ], # end conditions
-  }, # end variables
-
-  # Define compile targets:
-  'targets': [
-
-    # Target to generate an add-on:
-    {
-      # The target name should match the add-on export name:
-      'target_name': '<(addon_target_name)',
-
-      # Define dependencies:
-      'dependencies': [],
-
-      # Define directories which contain relevant include headers:
-      'include_dirs': [
-        # Local include directory:
-        '<@(include_dirs)',
-      ],
-
-      # List of source files:
-      'sources': [
-        '<@(src_files)',
-      ],
-
-      # Settings which should be applied when a target's object files are used as linker input:
-      'link_settings': {
-        # Define libraries:
-        'libraries': [
-          '<@(libraries)',
-        ],
-
-        # Define library directories:
-        'library_dirs': [
-          '<@(library_dirs)',
-        ],
-      },
-
-      # C/C++ compiler flags:
-      'cflags': [
-        # Enable commonly used warning options:
-        '-Wall',
-
-        # Aggressive optimization:
-        '-O3',
-      ],
-
-      # C specific compiler flags:
-      'cflags_c': [
-        # Specify the C standard to which a program is expected to conform:
-        '-std=c99',
-      ],
-
-      # C++ specific compiler flags:
-      'cflags_cpp': [
-        # Specify the C++ standard to which a program is expected to conform:
-        '-std=c++11',
-      ],
-
-      # Linker flags:
-      'ldflags': [],
-
-      # Apply conditions based on the host OS:
-      'conditions': [
-        [
-          'OS=="mac"',
-          {
-            # Linker flags:
-            'ldflags': [
-              '-undefined dynamic_lookup',
-              '-Wl,-no-pie',
-              '-Wl,-search_paths_first',
-            ],
-          },
-        ], # end condition (OS=="mac")
-        [
-          'OS!="win"',
-          {
-            # C/C++ flags:
-            'cflags': [
-              # Generate platform-independent code:
-              '-fPIC',
-            ],
-          },
-        ], # end condition (OS!="win")
-      ], # end conditions
-    }, # end target <(addon_target_name)
-
-    # Target to copy a generated add-on to a standard location:
-    {
-      'target_name': 'copy_addon',
-
-      # Declare that the output of this target is not linked:
-      'type': 'none',
-
-      # Define dependencies:
-      'dependencies': [
-        # Require that the add-on be generated before building this target:
-        '<(addon_target_name)',
-      ],
-
-      # Define a list of actions:
-      'actions': [
-        {
-          'action_name': 'copy_addon',
-          'message': 'Copying addon...',
-
-          # Explicitly list the inputs in the command-line invocation below:
-          'inputs': [],
-
-          # Declare the expected outputs:
-          'outputs': [
-            '<(addon_output_dir)/<(addon_target_name).node',
-          ],
-
-          # Define the command-line invocation:
-          'action': [
-            'cp',
-            '<(PRODUCT_DIR)/<(addon_target_name).node',
-            '<(addon_output_dir)/<(addon_target_name).node',
-          ],
-        },
-      ], # end actions
-    }, # end target copy_addon
-  ], # end targets
-}