WebSVN – Kolibri OS – Path Comparison – / – /programs Rev 9361 and /programs/ Rev 9362

Regard whitespace Rev 9361 → Rev 9362

 /programs/cmm/lib/obj/box_lib.h
 ,6 → 136,28
         ESI.edit_box.size = strlen(ed_text);
 }
+:dword EditBox_CreateStandart(dword width, left, top, maxlen, text, flags)
+{
+        dword eb, i;
+        eb = malloc(sizeof(edit_box));
+        for (i = 0; i < sizeof(edit_box); i++) ESBYTE[eb + i] = 0;
+        ESDWORD[eb] = width;
+        ESDWORD[eb + 4] = left;
+        ESDWORD[eb + 8] = top;
+        ESDWORD[eb + 12] = 0xffffff;
+        ESDWORD[eb + 16] = 0x94AECE;
+        ESDWORD[eb + 20] = 0xffffff;
+        ESDWORD[eb + 24] = 0xffffff;
+        ESDWORD[eb + 28] = 0x10000000;
+        ESDWORD[eb + 32] = maxlen;
+        ESDWORD[eb + 36] = text;
+        ESDWORD[eb + 40] = 0;
+        ESDWORD[eb + 44] = flags;
+        ESDWORD[eb + 48] = 0;
+        ESDWORD[eb + 52] = 0;
+        return eb;
+}
 struct scroll_bar
 {
         word size_x,

 /programs/cmm/template/t.c
 ,27 → 1,82
-#define MEMSIZE 4096*40
+#define MEMSIZE 1024*100
+#include "../lib/kolibri.h"
+#include "../lib/collection.h"
 #include "../lib/gui.h"
 #include "../lib/fs.h"
+#include "../lib/obj/http.h"
+#include "../lib/obj/console.h"
+collection links;
+#include "urls.h"
+_http http;
+char accept_language[]= "Accept-Language: en\n";
+int url_id=0;
 void main()
 {
-        proc_info Form;
+        char savepath[100];
+        load_dll(libHTTP, #http_lib_init,1);
+        load_dll(libConsole, #con_init, 0);
-        @SetEventMask(EVM_REDRAW + EVM_KEY + EVM_BUTTON + EVM_MOUSE);
-        loop() switch(WaitEvent())
+        con_init stdcall (70, 40, 70, 1020, "Web stability test");
+        urls_add();
+        con_write_asciiz stdcall ("Redirect is not handled yet.\n");
+        con_write_asciiz stdcall ("All pages are saved into /tmp0/1\n\n");
+        con_write_asciiz stdcall ("Downloading pages...\n\n");
+        pause(100);
+        get_next_url();
+        @SetEventMask(EVM_REDRAW + EVM_KEY + EVM_BUTTON + EVM_MOUSE + EVM_MOUSE_FILTER + EVM_STACK);
+        loop() switch(@WaitEventTimeout(200))
         {
-                case evMouse:
-                        mouse.get();
-                        break;
+        case evNetwork:
+                if (!http.receive_result) {
+                                sprintf(#savepath, "/tmp0/1/%s.htm", links.get(url_id)+7);
+                                CreateFile(http.content_received, http.content_pointer, #savepath);
+                                free(http.content_pointer);
+                                http_free stdcall (http.transfer);
+                                http.transfer=0;
+                                con_write_asciiz stdcall ("\n");
+                                get_next_url();
+                }
+                if (http.transfer) {
+                        http.receive();
+                } else {
+                        con_write_asciiz stdcall (" => FAILED\n");
+                        get_next_url();
+                }
+        }
+}
-                case evKey:
-                        @GetKeyScancode();
-                        if (AL == SCAN_CODE_ESC) @ExitProcess();
-                        break;
+void get_next_url()
+{
+        char get_url[2500];
+        dword url;
-                case evReDraw:
-                        sc.get();
-                        DefineAndDrawWindow(100, 100, 300, 250, 0x34, sc.work, "Template app", 0);
-                        GetProcessInfo(#Form, SelfInfo);
+        url_id++;
+        url = links.get(url_id);
+        if (!url) {
+                con_write_asciiz stdcall ("Download complete.");
+                con_exit stdcall (0);
+                ExitProcess();
+        } else {
+                con_write_asciiz stdcall (itoa(url_id));
+                con_write_asciiz stdcall (". ");
+                con_write_asciiz stdcall (links.get(url_id));
+                if (!strncmp(url,"https:",6)) {
+                        sprintf(#get_url, "http://gate.aspero.pro/?site=%s", url);
+                } else if (!strncmp(url,"http:",5)) {
+                        sprintf(#get_url, "%s", url);
+                } else {
+                        get_next_url();
         }
+                http.get(#get_url);
 }
+}

/programs/fs/ndn/ndn.tfe
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/NDN.VWR
File deleted
\ No newline at end of file

/programs/fs/ndn/ndn.ini
File deleted

/programs/fs/ndn/ENGLISH.DLG
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/ndn.dsk
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/VAX.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/GRAY.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/FILE_ID.DIZ
File deleted

/programs/fs/ndn/COLORS/FAR.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/BW.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/MONO.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/DOSSHELL.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/NORTON.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/VAX2.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/DARK.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/PCTOOLS.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/STRELOK.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/DEFAULT.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/APOMETRN.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/GARL.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/DESCRIPT.ION
File deleted

/programs/fs/ndn/COLORS/BLUE.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/AH.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/FAR2.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/COLORS/TURBO.PAL
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/ndn.his
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/ndn.idx
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/RUSSIAN.LNG
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/ndn.flt
File deleted

/programs/fs/ndn/POLISH.DLG
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/NDN.QDR
File deleted

/programs/fs/ndn/HGROUPS.INI
File deleted

/programs/fs/ndn/RUSSIAN.HLP
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/NDN.SPF
File deleted

/programs/fs/ndn/XLT/PDF.XLT
File deleted

/programs/fs/ndn/XLT/KOI8-R.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/LATRUS.XLT
File deleted
\ No newline at end of file

/programs/fs/ndn/XLT/DLL.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/INF.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/ENGL_RUS.XLT
File deleted
\ No newline at end of file

/programs/fs/ndn/XLT/KOI8-RUS.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/RUS_DE.XLT
File deleted

/programs/fs/ndn/XLT/CAB.XLT
File deleted
\ No newline at end of file

/programs/fs/ndn/XLT/LF_DEL.XLT
File deleted
\ No newline at end of file

/programs/fs/ndn/XLT/UNICODE.XLT
File deleted
\ No newline at end of file

/programs/fs/ndn/XLT/UTF8.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/WINTOKOI.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/WIN&KOI.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/WIN2GER.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/KOI2WIN.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/DOS2WIN.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/TEST.TXT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/SHOWSPAC.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/ISOLAT-1.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/DSS.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/NOT.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/XLT/WIN866!.XLT
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/ENGLISH.LNG
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/ENGLISH.HLP
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/POLISH.LNG
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/NDN
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/POLISH.HLP
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/RUSSIAN.DLG
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

/programs/fs/ndn/ndn.man
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property

Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 9361 → Rev 9362