Merge pull request #9784 from fluca1978/PWC261

PWC 261

1 files changed, 68 insertions, 0 deletions

diff --git a/challenge-261/luca-ferrari/pljava/src/main/java/Task1.java b/challenge-261/luca-ferrari/pljava/src/main/java/Task1.java
new file mode 100644
index 0000000000..512fbd230a
--- /dev/null
+++ b/challenge-261/luca-ferrari/pljava/src/main/java/Task1.java
@@ -0,0 +1,68 @@
+
+
+
+package PWC261;
+
+/**
+ * PL/Java implementation for PWC 261
+ * Task 1
+ * See <https://perlweeklychallenge.org/blog/perl-weekly-challenge-261>
+ *
+ *
+ * To compile on the local machine:
+
+ $ export JAVA_HOME=/usr/lib/jvm/java-17-openjdk-amd64/  # if not already set
+ $ mvn clean build
+ $ scp target/PWC261-1.jar  luca@rachel:/tmp
+
+
+ * To install into PostgreSQL execute:
+
+ select sqlj.install_jar( 'file:///tmp/PWC261-1.jar', 'PWC261', true );
+ select sqlj.set_classpath( 'public', 'PWC261' );
+
+ select pwc261.task2_pljava();
+
+ and then to redeploy:
+
+ select sqlj.replace_jar( 'file:///tmp/PWC261-1.jar', 'PWC261', true );
+
+*/
+
+import org.postgresql.pljava.*;
+import org.postgresql.pljava.annotation.Function;
+import static org.postgresql.pljava.annotation.Function.Effects.IMMUTABLE;
+import static org.postgresql.pljava.annotation.Function.OnNullInput.RETURNS_NULL;
+
+import java.util.*;
+import java.util.stream.*;
+import java.sql.SQLException;
+import java.util.logging.*;
+import java.sql.ResultSet;
+import java.sql.Date;
+import java.lang.Math;
+
+public class Task1 {
+
+    private final static Logger logger = Logger.getAnonymousLogger();
+
+    @Function( schema = "pwc261",
+	       onNullInput = RETURNS_NULL,
+	       effects = IMMUTABLE )
+    public static final int task1_pljava( int nums[] ) throws SQLException {
+	logger.log( Level.INFO, "Entering pwc261.task1_pljava" );
+	int sum_numbers = 0;
+	int sum_digits  = 0;
+
+	for ( int current : nums ) {
+	    sum_numbers += current;
+	    while ( current > 0 ) {
+		sum_digits += current % 10;
+		current /= 10;
+	    }
+	}
+
+	return Math.abs( sum_numbers - sum_digits );
+
+    }
+}