javonet-nodejs-sdk 2.5.14 → 2.5.16

package/Binaries/Nodejs/lib/utils/guid/generateGuid.js

@@ -1,9 +0,0 @@
-function generateGUID() {
-    return 'xxxxxxxx-xxxx-4xxx-yxxx-xxxxxxxxxxxx'.replace(/[xy]/g, function (c) {
-        const r = (Math.random() * 16) | 0
-        const v = c === 'x' ? r : (r & 0x3) | 0x8
-        return v.toString(16)
-    })
-}
-
-module.exports = generateGUID

package/Binaries/Nodejs/lib/utils/uuid/REGEX.js

@@ -1,2 +0,0 @@
-module.exports =
-    /^(?:[0-9a-f]{8}-[0-9a-f]{4}-[1-5][0-9a-f]{3}-[89ab][0-9a-f]{3}-[0-9a-f]{12}|00000000-0000-0000-0000-000000000000)$/i

package/Binaries/Nodejs/lib/utils/uuid/rng.js

@@ -1,12 +0,0 @@
-const crypto = require('crypto')
-
-const rnds8Pool = new Uint8Array(256) // # of random values to pre-allocate
-let poolPtr = rnds8Pool.length
-
-module.exports = function rng() {
-    if (poolPtr > rnds8Pool.length - 16) {
-        crypto.randomFillSync(rnds8Pool)
-        poolPtr = 0
-    }
-    return rnds8Pool.slice(poolPtr, (poolPtr += 16))
-}

package/Binaries/Nodejs/lib/utils/uuid/stringify.js

@@ -1,51 +0,0 @@
-const validate = require('./validate')
-
-/**
- * Convert array of 16 byte values to UUID string format of the form:
- * XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX
- */
-const byteToHex = []
-
-for (let i = 0; i < 256; ++i) {
-    byteToHex.push((i + 0x100).toString(16).substr(1))
-}
-
-function stringify(arr, offset = 0) {
-    // Note: Be careful editing this code!  It's been tuned for performance
-    // and works in ways you may not expect. See https://github.com/uuidjs/uuid/pull/434
-    const uuid = (
-        byteToHex[arr[offset + 0]] +
-        byteToHex[arr[offset + 1]] +
-        byteToHex[arr[offset + 2]] +
-        byteToHex[arr[offset + 3]] +
-        '-' +
-        byteToHex[arr[offset + 4]] +
-        byteToHex[arr[offset + 5]] +
-        '-' +
-        byteToHex[arr[offset + 6]] +
-        byteToHex[arr[offset + 7]] +
-        '-' +
-        byteToHex[arr[offset + 8]] +
-        byteToHex[arr[offset + 9]] +
-        '-' +
-        byteToHex[arr[offset + 10]] +
-        byteToHex[arr[offset + 11]] +
-        byteToHex[arr[offset + 12]] +
-        byteToHex[arr[offset + 13]] +
-        byteToHex[arr[offset + 14]] +
-        byteToHex[arr[offset + 15]]
-    ).toLowerCase()
-
-    // Consistency check for valid UUID.  If this throws, it's likely due to one
-    // of the following:
-    // - One or more input array values don't map to a hex octet (leading to
-    // "undefined" in the uuid)
-    // - Invalid input values for the RFC `version` or `variant` fields
-    if (!validate(uuid)) {
-        throw TypeError('Stringified UUID is invalid')
-    }
-
-    return uuid
-}
-
-module.exports = stringify

package/Binaries/Nodejs/lib/utils/uuid/v4.js

@@ -1,27 +0,0 @@
-const rng = require('./rng.js')
-const stringify = require('./stringify.js')
-
-function v4(options, buf, offset) {
-    options = options || {}
-
-    const rnds = options.random || (options.rng || rng)()
-
-    // Per 4.4, set bits for version and `clock_seq_hi_and_reserved`
-    rnds[6] = (rnds[6] & 0x0f) | 0x40
-    rnds[8] = (rnds[8] & 0x3f) | 0x80
-
-    // Copy bytes to buffer, if provided
-    if (buf) {
-        offset = offset || 0
-
-        for (let i = 0; i < 16; ++i) {
-            buf[offset + i] = rnds[i]
-        }
-
-        return buf
-    }
-
-    return stringify(rnds)
-}
-
-module.exports = v4

package/Binaries/Nodejs/lib/utils/uuid/validate.js

@@ -1,6 +0,0 @@
-const REGEX = require('./REGEX')
-
-function validate(uuid) {
-    return typeof uuid === 'string' && REGEX.test(uuid)
-}
-module.exports = validate

package/Binaries/Perl/Linux/X64/deps/bin/config_data

@@ -1,249 +0,0 @@
-#!/usr/bin/perl 
-
-use strict;
-use Module::Build 0.25;
-use Getopt::Long;
-
-my %opt_defs = (
-		module      => {type => '=s',
-				desc => 'The name of the module to configure (required)'},
-		feature     => {type => ':s',
-				desc => 'Print the value of a feature or all features'},
-		config      => {type => ':s',
-				desc => 'Print the value of a config option'},
-		set_feature => {type => '=s%',
-				desc => "Set a feature to 'true' or 'false'"},
-		set_config  => {type => '=s%',
-				desc => 'Set a config option to the given value'},
-		eval        => {type => '',
-				desc => 'eval() config values before setting'},
-		help        => {type => '',
-				desc => 'Print a help message and exit'},
-	       );
-
-my %opts;
-GetOptions( \%opts, map "$_$opt_defs{$_}{type}", keys %opt_defs ) or die usage(%opt_defs);
-print usage(%opt_defs) and exit(0)
-  if $opts{help};
-
-my @exclusive = qw(feature config set_feature set_config);
-die "Exactly one of the options '" . join("', '", @exclusive) . "' must be specified\n" . usage(%opt_defs)
-  unless grep(exists $opts{$_}, @exclusive) == 1;
-
-die "Option --module is required\n" . usage(%opt_defs)
-  unless $opts{module};
-
-my $cf = load_config($opts{module});
-
-if (exists $opts{feature}) {
-
-  if (length $opts{feature}) {
-    print $cf->feature($opts{feature});
-  } else {
-    my %auto;
-    # note: need to support older ConfigData.pm's
-    @auto{$cf->auto_feature_names} = () if $cf->can("auto_feature_names");
-
-    print " Features defined in $cf:\n";
-    foreach my $name (sort $cf->feature_names) {
-      print "  $name => ", $cf->feature($name), (exists $auto{$name} ? " (dynamic)" : ""), "\n";
-    }
-  }
-
-} elsif (exists $opts{config}) {
-
-  require Data::Dumper;
-  local $Data::Dumper::Terse = 1;
-
-  if (length $opts{config}) {
-    print Data::Dumper::Dumper($cf->config($opts{config})), "\n";
-  } else {
-    print " Configuration defined in $cf:\n";
-    foreach my $name (sort $cf->config_names) {
-      print "  $name => ", Data::Dumper::Dumper($cf->config($name)), "\n";
-    }
-  }
-
-} elsif (exists $opts{set_feature}) {
-  my %to_set = %{$opts{set_feature}};
-  while (my ($k, $v) = each %to_set) {
-    die "Feature value must be 0 or 1\n" unless $v =~ /^[01]$/;
-    $cf->set_feature($k, 0+$v); # Cast to a number, not a string
-  }
-  $cf->write;
-  print "Feature" . 's'x(keys(%to_set)>1) . " saved\n";
-
-} elsif (exists $opts{set_config}) {
-
-  my %to_set = %{$opts{set_config}};
-  while (my ($k, $v) = each %to_set) {
-    if ($opts{eval}) {
-      $v = eval($v);
-      die $@ if $@;
-    }
-    $cf->set_config($k, $v);
-  }
-  $cf->write;
-  print "Config value" . 's'x(keys(%to_set)>1) . " saved\n";
-}
-
-sub load_config {
-  my $mod = shift;
-
-  $mod =~ /^([\w:]+)$/
-    or die "Invalid module name '$mod'";
-
-  my $cf = $mod . "::ConfigData";
-  eval "require $cf";
-  die $@ if $@;
-
-  return $cf;
-}
-
-sub usage {
-  my %defs = @_;
-
-  my $out = "\nUsage: $0 [options]\n\n  Options include:\n";
-
-  foreach my $name (sort keys %defs) {
-    $out .= "  --$name";
-
-    for ($defs{$name}{type}) {
-      /^=s$/  and      $out .= " <string>";
-      /^=s%$/ and      $out .= " <string>=<value>";
-    }
-
-    pad_line($out, 35);
-    $out .= "$defs{$name}{desc}\n";
-  }
-
-  $out .= <<EOF;
-
-  Examples:
-   $0 --module Foo::Bar --feature bazzable
-   $0 --module Foo::Bar --config magic_number
-   $0 --module Foo::Bar --set_feature bazzable=1
-   $0 --module Foo::Bar --set_config magic_number=42
-
-EOF
-
-  return $out;
-}
-
-sub pad_line {  $_[0] .= ' ' x ($_[1] - length($_[0]) + rindex($_[0], "\n")) }
-
-
-__END__
-
-=head1 NAME
-
-config_data - Query or change configuration of Perl modules
-
-=head1 SYNOPSIS
-
-  # Get config/feature values
-  config_data --module Foo::Bar --feature bazzable
-  config_data --module Foo::Bar --config magic_number
-
-  # Set config/feature values
-  config_data --module Foo::Bar --set_feature bazzable=1
-  config_data --module Foo::Bar --set_config magic_number=42
-
-  # Print a usage message
-  config_data --help
-
-=head1 DESCRIPTION
-
-The C<config_data> tool provides a command-line interface to the
-configuration of Perl modules.  By "configuration", we mean something
-akin to "user preferences" or "local settings".  This is a
-formalization and abstraction of the systems that people like Andreas
-Koenig (C<CPAN::Config>), Jon Swartz (C<HTML::Mason::Config>), Andy
-Wardley (C<Template::Config>), and Larry Wall (perl's own Config.pm)
-have developed independently.
-
-The configuration system employed here was developed in the context of
-C<Module::Build>.  Under this system, configuration information for a
-module C<Foo>, for example, is stored in a module called
-C<Foo::ConfigData>) (I would have called it C<Foo::Config>, but that
-was taken by all those other systems mentioned in the previous
-paragraph...).  These C<...::ConfigData> modules contain the
-configuration data, as well as publicly accessible methods for
-querying and setting (yes, actually re-writing) the configuration
-data.  The C<config_data> script (whose docs you are currently
-reading) is merely a front-end for those methods.  If you wish, you
-may create alternate front-ends.
-
-The two types of data that may be stored are called C<config> values
-and C<feature> values.  A C<config> value may be any perl scalar,
-including references to complex data structures.  It must, however, be
-serializable using C<Data::Dumper>.  A C<feature> is a boolean (1 or
-0) value.
-
-=head1 USAGE
-
-This script functions as a basic getter/setter wrapper around the
-configuration of a single module.  On the command line, specify which
-module's configuration you're interested in, and pass options to get
-or set C<config> or C<feature> values.  The following options are
-supported:
-
-=over 4
-
-=item module
-
-Specifies the name of the module to configure (required).
-
-=item feature
-
-When passed the name of a C<feature>, shows its value.  The value will
-be 1 if the feature is enabled, 0 if the feature is not enabled, or
-empty if the feature is unknown.  When no feature name is supplied,
-the names and values of all known features will be shown.
-
-=item config
-
-When passed the name of a C<config> entry, shows its value.  The value
-will be displayed using C<Data::Dumper> (or similar) as perl code.
-When no config name is supplied, the names and values of all known
-config entries will be shown.
-
-=item set_feature
-
-Sets the given C<feature> to the given boolean value.  Specify the value
-as either 1 or 0.
-
-=item set_config
-
-Sets the given C<config> entry to the given value.
-
-=item eval
-
-If the C<--eval> option is used, the values in C<set_config> will be
-evaluated as perl code before being stored.  This allows moderately
-complicated data structures to be stored.  For really complicated
-structures, you probably shouldn't use this command-line interface,
-just use the Perl API instead.
-
-=item help
-
-Prints a help message, including a few examples, and exits.
-
-=back
-
-=head1 AUTHOR
-
-Ken Williams, kwilliams@cpan.org
-
-=head1 COPYRIGHT
-
-Copyright (c) 1999, Ken Williams.  All rights reserved.
-
-This library is free software; you can redistribute it and/or modify
-it under the same terms as Perl itself.
-
-=head1 SEE ALSO
-
-Module::Build(3), perl(1).
-
-=cut

package/Binaries/Perl/Linux/X64/deps/bin/moose-outdated

@@ -1,22 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-# PODNAME: moose-outdated
-
-# this script was generated with Dist::Zilla::Plugin::Conflicts 0.20
-
-use Getopt::Long;
-use Moose::Conflicts;
-
-my $verbose;
-GetOptions( 'verbose|v' => \$verbose );
-
-if ($verbose) {
-    Moose::Conflicts->check_conflicts;
-}
-else {
-    my @conflicts = Moose::Conflicts->calculate_conflicts;
-    print "$_\n" for map { $_->{package} } @conflicts;
-    exit @conflicts;
-}

package/Binaries/Perl/Linux/X64/deps/bin/package-stash-conflicts

@@ -1,22 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-# PODNAME: package-stash-conflicts
-
-# this script was generated with Dist::Zilla::Plugin::Conflicts 0.19
-
-use Getopt::Long;
-use Package::Stash::Conflicts;
-
-my $verbose;
-GetOptions( 'verbose|v' => \$verbose );
-
-if ($verbose) {
-    Package::Stash::Conflicts->check_conflicts;
-}
-else {
-    my @conflicts = Package::Stash::Conflicts->calculate_conflicts;
-    print "$_\n" for map { $_->{package} } @conflicts;
-    exit @conflicts;
-}

package/Binaries/Perl/Linux/X64/deps/bin/yamlpp-events

@@ -1,62 +0,0 @@
-#!/usr/bin/perl
-use strict;
-use warnings;
-
-use Encode;
-use YAML::PP::Parser;
-use YAML::PP::Common;
-use Getopt::Long;
-Getopt::Long::Configure('bundling');
-GetOptions(
-    'help|h' => \my $help,
-    'module|M=s' => \my $module,
-) or usage(1);
-
-usage(0) if $help;
-
-$module ||= 'YAML::PP';
-if ($module eq 'YAML::PP') {
-    $module = 'YAML::PP::Parser';
-}
-elsif ($module eq 'YAML::PP::LibYAML') {
-    require YAML::PP::LibYAML::Parser;
-    $module = 'YAML::PP::LibYAML::Parser';
-}
-elsif ($module eq 'YAML::PP::Ref') {
-    require YAML::PP::Ref;
-    $module = 'YAML::PP::Ref::Parser';
-}
-
-my ($file) = @ARGV;
-
-my $parser = $module->new(
-    receiver => sub {
-      my ($self, undef, $event) = @_;
-      print encode_utf8(YAML::PP::Common::event_to_test_suite($event, { flow => 1 })), "\n";
-    },
-    $file ? (reader => YAML::PP::Reader::File->new) : (),
-);
-if ($file) {
-    $parser->parse_file($file);
-}
-else {
-    my $yaml;
-    $yaml = do { local $/; <STDIN> };
-    $yaml = decode_utf8($yaml);
-    $parser->parse_string($yaml);
-}
-
-sub usage {
-    my ($rc) = @_;
-    print <<"EOM";
-Usage:
-
-    $0 [options] < file
-    $0 [options] file
-
-Options:
-    --module -M  Module to use for parsing. YAML::PP (default),
-                 YAML::PP::LibYAML or YAML::PP::Ref
-EOM
-    exit $rc;
-}

package/Binaries/Perl/Linux/X64/deps/bin/yamlpp-highlight

@@ -1,54 +0,0 @@
-#!/usr/bin/perl
-use strict;
-use warnings;
-
-use YAML::PP::Highlight;
-use Encode;
-use Getopt::Long;
-
-GetOptions(
-    'help|h' => \my $help,
-    'expand-tabs|et!' => \my $expand_tabs,
-) or usage(1);
-
-$expand_tabs = 1 unless defined $expand_tabs;
-
-usage(0) if $help;
-
-my ($file) = @ARGV;
-my $yaml;
-
-unless ($file) {
-    $yaml = do { local $/; <STDIN> };
-    $yaml = decode_utf8($yaml);
-}
-
-my $error;
-my $tokens;
-if (defined $file) {
-    ($error, $tokens) = YAML::PP::Parser->yaml_to_tokens( file => $file );
-}
-else {
-    ($error, $tokens) = YAML::PP::Parser->yaml_to_tokens( string => $yaml );
-}
-my $highlighted = YAML::PP::Highlight->ansicolored($tokens, expand_tabs => $expand_tabs);
-print encode_utf8 $highlighted;
-if ($error) {
-    die $error;
-}
-
-sub usage {
-    my ($rc) = @_;
-    print <<"EOM";
-Usage:
-
-    $0 [options] < file
-    $0 [options] file
-
-Options:
-    --expand-tabs    --et         Expand tabs to 8 spaces (default true)
-    --no-expand-tabs --no-et      Don't expand tabs
-EOM
-    exit $rc;
-}
-

package/Binaries/Perl/Linux/X64/deps/bin/yamlpp-load

@@ -1,155 +0,0 @@
-#!/usr/bin/perl
-use strict;
-use warnings;
-
-use Data::Dumper;
-use YAML::PP;
-use YAML::PP::Common qw/ PRESERVE_ORDER /;
-use Encode;
-use Getopt::Long;
-Getopt::Long::Configure('bundling');
-
-GetOptions(
-    'help|h' => \my $help,
-    'boolean=s' => \my $boolean,
-    'cyclic' => \my $cyclic,
-    'duplicate-keys' => \my $duplicate_keys,
-    'merge' => \my $merge,
-    #'catchall' => \my $catchall,
-    'require-footer' => \my $require_footer,
-    'perl' => \my $perl,
-    'module|M=s' => \my $module,
-    'yaml-version=s' => \my $yaml_version,
-) or usage(1);
-
-usage(0) if $help;
-
-$module ||= 'YAML::PP';
-$boolean ||= 'JSON::PP';
-$yaml_version ||= 1.2;
-my @yaml_versions = split m/,/, $yaml_version;
-my @schema = ('+');
-if ($merge) {
-    push @schema, 'Merge';
-}
-if ($perl) {
-    push @schema, 'Perl';
-}
-#if ($catchall) {
-#    push @schema, 'Catchall';
-#}
-
-my ($file) = @ARGV;
-my $yaml;
-
-my $decode = 1;
-if ($module eq 'YAML::XS') {
-    $decode = 0;
-}
-if ($file) {
-    open my $fh, '<', $file or die "Can not open '$file'";
-    $yaml = do { local $/; <$fh> };
-    close $fh;
-}
-else {
-    $yaml = do { local $/; <STDIN> };
-}
-$yaml = decode_utf8($yaml) if $decode;
-
-my %codes = (
-    'YAML::PP' => \&yamlpp,
-    'YAML::PP::LibYAML' => \&yamlpplibyaml,
-    'YAML::PP::Ref' => \&yamlppref,
-    'YAML::XS' => \&yamlxs,
-    'YAML::Tiny' => \&yamltiny,
-    'YAML::Syck' => \&yamlsyck,
-    'YAML' => \&yaml,
-);
-
-my $code = $codes{ $module } or die "Module '$module' not supported";
-
-my @docs = $code->($yaml);
-
-sub _yamlpp {
-    my ($class, $yaml) = @_;
-    my $ypp = $class->new(
-        schema => \@schema,
-        boolean => $boolean,
-        cyclic_refs => $cyclic ? 'allow' : 'fatal',
-        duplicate_keys => $duplicate_keys ? 1 : 0,
-        preserve => PRESERVE_ORDER,
-        yaml_version => \@yaml_versions,
-        require_footer => $require_footer,
-    );
-    my @docs = $ypp->load_string($yaml);
-    return @docs;
-}
-sub yamlpp {
-    _yamlpp('YAML::PP' => $_[0]);
-}
-sub yamlpplibyaml {
-    eval { require YAML::PP::LibYAML };
-    _yamlpp('YAML::PP::LibYAML' => $_[0]);
-}
-sub yamlppref {
-    eval { require YAML::PP::Ref };
-    _yamlpp('YAML::PP::Ref' => $_[0]);
-}
-
-sub yamlxs {
-    eval { require YAML::XS };
-    my ($yaml) = @_;
-    no warnings 'once';
-    local $YAML::XS::LoadBlessed = $perl;
-    return YAML::XS::Load($yaml);
-}
-sub yamlsyck {
-    eval { require YAML::Syck };
-    my ($yaml) = @_;
-    no warnings 'once';
-    local $YAML::Syck::LoadBlessed = $perl;
-    local $YAML::Syck::ImplicitTyping = 1;
-    local $YAML::Syck::ImplicitUnicode = 1;
-    return YAML::Syck::Load($yaml);
-}
-sub yaml {
-    eval { require YAML };
-    my ($yaml) = @_;
-    no warnings 'once';
-    local $YAML::LoadBlessed = $perl;
-    return YAML::Load($yaml);
-}
-sub yamltiny {
-    eval { require YAML::Tiny };
-    my ($yaml) = @_;
-    return YAML::Tiny::Load($yaml);
-}
-
-local $Data::Dumper::Useqq = 1;
-local $Data::Dumper::Sortkeys = 1;
-print Data::Dumper->Dump([$docs[ $_ ]], ["doc$_"]) for 0 ..$#docs;
-
-
-sub usage {
-    my ($rc) = @_;
-    print <<"EOM";
-Usage:
-
-    $0 [options] < file
-    $0 [options] file
-
-Options:
-    --boolean=            'perl', 'JSON::PP', 'boolean'
-    --cyclic              Allow cyclic references
-    --duplicate-keys      Allow duplicate keys
-    --merge               Enable loading merge keys '<<'
-    --require-footer      Require '...' and the end of each document
-    --perl                Enable loading perl types and objects (use only
-                          on trusted input!)
-    --module -M           YAML::PP (default), YAML, YAML::PP::LibYAML,
-                          YAML::Syck, YAML::Tiny, YAML::XS, YAML::PP::Ref
-    --yaml-version=       '1.2' (default), '1.1', '1.2,1.1', '1.1,1.2'
-EOM
-    #--catchall            Ignore any unknown tags
-    exit $rc;
-}