File: client.ec

package info (click to toggle)
ecere-sdk 0.44.15-1
  • links: PTS
  • area: main
  • in suites: sid, stretch
  • size: 97,712 kB
  • ctags: 54,695
  • sloc: ansic: 593,042; makefile: 12,250; yacc: 4,955; lex: 707; objc: 259; python: 252; xml: 102
file content (36 lines) | stat: -rw-r--r-- 781 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
import "ecere"

class ClientApp : GuiApplication
{
   void Main()
   {
      FileServerConnection connection = ConnectToFileServer("hitomi", 7649);
      if(connection)
      {
         File f;
         Log("Connected\n");
         f = connection.Open("c:/boot.ini", read);
         if(f)
         {
            int newsize;
            byte * indexfs = null;
            int c;

            f.Seek(0, end);
            newsize = f.Tell();
            f.Seek(0, 0);

            indexfs = renew indexfs byte[newsize];
            c = f.Read(indexfs, newsize, 1);
            delete f;

            f = FileOpen("test.ini", write);
            f.Write(indexfs, 1, c);
            delete f;

            // while(true) Sleep(1);
         }
         delete connection;
      }
   }
}