X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=rtl%2Fjava%2FFiles.java;h=c201940c21cbb37cc41a3f0b85ee546288cea4b9;hb=317e2eb03b343f9d753990e6ed8386fd4effca60;hp=5ccfa25acacc8822278fce3aa1f2039837e6fd59;hpb=8620d81a0d78c987b250a7a471d76d96af461846;p=dsw-obn.git

diff --git a/rtl/java/Files.java b/rtl/java/Files.java
index 5ccfa25..c201940 100644
--- a/rtl/java/Files.java
+++ b/rtl/java/Files.java
@@ -99,8 +99,9 @@ class Files
 
 		try
 		{
-			filepath = File.createTempFile(SYSTEM.STRING(name), "tmp");
-			fileregpath = new File(SYSTEM.STRING(name));
+			String s = (name[0] == 0) ? (".TMP") : SYSTEM.STRING(name);
+			filepath = File.createTempFile(s, "tmp");
+			fileregpath = new File(s);
 			filedesc = new RandomAccessFile(filepath, "rw");
 		}
 		catch(IOException e)
@@ -375,12 +376,20 @@ class Files
 
 	public static void WriteInt(RECORD1 R[], int R$, short x)
 	{
-		SYSTEM.TRAP(-3);
+		byte[][] i = new byte[1][2];
+		i[0][0] = (byte) ((x >>> 8) & 0xff);
+		i[0][1] = (byte) ((x) & 0xff);
+		WriteBytes(R, R$, i, 0, 2);
 	}
 
 	public static void WriteLInt(RECORD1 R[], int R$, int x)
 	{
-		SYSTEM.TRAP(-3);
+		byte[][] i = new byte[1][4];
+		i[0][0] = (byte) ((x >>> 24) & 0xff);
+		i[0][1] = (byte) ((x >>> 16) & 0xff);
+		i[0][2] = (byte) ((x >>> 8) & 0xff);
+		i[0][3] = (byte) ((x) & 0xff);
+		WriteBytes(R, R$, i, 0, 4);
 	}
 
 	public static void WriteReal(RECORD1 R[], int R$, float x)
@@ -400,7 +409,9 @@ class Files
 
 	public static void WriteString(RECORD1 R[], int R$, byte x[])
 	{
-		SYSTEM.TRAP(-3);
+		byte[][] i = new byte[1][];
+		i[0] = x;
+		WriteBytes(R, R$, i, 0, SYSTEM.LEN(x));
 	}
 
 	public static void WriteSet(RECORD1 R[], int R$, int x)
@@ -415,7 +426,20 @@ class Files
 
 	public static void WriteBytes(RECORD1 r[], int r$, byte[][] x, int x$, int n)
 	{
-		SYSTEM.TRAP(-3);
+		RECORD1 rider = r[r$];
+		RandomAccessFile desc = rider.base.desc;
+
+		try
+		{
+			rider.base.SetActive(rider);
+			desc.write(x[x$], 0, n);
+                        rider.position += n;
+		}
+		catch(IOException e)
+		{
+			rider.res[0] = n;
+			rider.eof[0] = true;
+		}
 	}
 
 	public static void BEGIN()