Check-in [a2d9044788]
Not logged in

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:light/dark-mode
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: a2d9044788717e09c7215a2eaa5b04bba4137b48
User & Date: bernd 2020-01-06 21:59:43
Context
2020-01-08
23:31
Store ihave informations in chat log check-in: 4afc95c122 user: bernd tags: trunk
2020-01-06
21:59
light/dark-mode check-in: a2d9044788 user: bernd tags: trunk
2020-01-03
13:31
Fix dark mode qr scan check-in: 49c98efa7e user: bernd tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to Makefile.in.

35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
HOST     = 
FAST     = @FAST@
FORTHLIB = ed25519-donna.fs keccak.fs threefish.fs bdelta.fs

SOURCES = 64bit.fs base64.fs base85.fs crypto-api.fs debugging.fs	      \
	  hash-table.fs keccak-small.fs kregion.fs n2o.fs addr.fs classes.fs  \
	  cmd.fs connected.fs connect.fs crypt.fs dht.fs err.fs file.fs	      \
	  gui.fs gui-night.fs net2o.fs ip.fs helper.fs keys.fs log.fs msg.fs  \
	  notify.fs qr.fs socks.fs squid.fs tools.fs vault.fs rng.fs xtype.fs \
	  $(TESTS) $(FORTHLIB) ed25519-donnalib.fs keccaklib.fs		      \
	  threefishlib.fs startn2o.fs doc/net2o-logo.png version.fs.in	      \
	  android/net.fs android/notify.fs linux/net.fs linux/notify.fs	      \
	  dhtroot.fs dvcs.fs qrscan.fs android/qrscan-android.fs	      \
	  linux/qrscan-linux.fs doc/net2o-200.png doc/net2o.png doc/user.png  \
	  json/parser.fs json/g+-schema.fs json/g+-import.fs		      \







|







35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
HOST     = 
FAST     = @FAST@
FORTHLIB = ed25519-donna.fs keccak.fs threefish.fs bdelta.fs

SOURCES = 64bit.fs base64.fs base85.fs crypto-api.fs debugging.fs	      \
	  hash-table.fs keccak-small.fs kregion.fs n2o.fs addr.fs classes.fs  \
	  cmd.fs connected.fs connect.fs crypt.fs dht.fs err.fs file.fs	      \
	  gui.fs gui-dark.fs net2o.fs ip.fs helper.fs keys.fs log.fs msg.fs  \
	  notify.fs qr.fs socks.fs squid.fs tools.fs vault.fs rng.fs xtype.fs \
	  $(TESTS) $(FORTHLIB) ed25519-donnalib.fs keccaklib.fs		      \
	  threefishlib.fs startn2o.fs doc/net2o-logo.png version.fs.in	      \
	  android/net.fs android/notify.fs linux/net.fs linux/notify.fs	      \
	  dhtroot.fs dvcs.fs qrscan.fs android/qrscan-android.fs	      \
	  linux/qrscan-linux.fs doc/net2o-200.png doc/net2o.png doc/user.png  \
	  json/parser.fs json/g+-schema.fs json/g+-import.fs		      \

Changes to doc/36c3-presentation.fs.

50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
...
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
    {{  {{ leftimg glue*ll }}glue rightimg }}h
    glue*l }}glue
    }}v >o font-size# f2/ to border o o>
    to baseline# ;

' }}i18n-text is }}text'

day-mode
$005555FF text-color: author#
night-mode
$44FFFFFF re-color author#

{{
    {{
	glue-left @ }}glue
	
	\ page 0
................................................................................
[IFDEF] writeout-en
    lsids ' .lsids s" ef2018/en" r/w create-file throw
    dup >r outfile-execute r> close-file throw
[THEN]

previous

night-mode

script? [IF]
    next-arg s" time" str= [IF]  +db time( \ ) [THEN]
    presentation bye
[ELSE]
    presentation
[THEN]







|

|







 







|







50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
...
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
    {{  {{ leftimg glue*ll }}glue rightimg }}h
    glue*l }}glue
    }}v >o font-size# f2/ to border o o>
    to baseline# ;

' }}i18n-text is }}text'

light-gui
$005555FF text-color: author#
dark-gui
$44FFFFFF re-color author#

{{
    {{
	glue-left @ }}glue
	
	\ page 0
................................................................................
[IFDEF] writeout-en
    lsids ' .lsids s" ef2018/en" r/w create-file throw
    dup >r outfile-execute r> close-file throw
[THEN]

previous

dark-gui

script? [IF]
    next-arg s" time" str= [IF]  +db time( \ ) [THEN]
    presentation bye
[ELSE]
    presentation
[THEN]

Changes to doc/qr-code-inv.png.

cannot compute difference between binary files

Name change from gui-night.fs to gui-dark.fs.

1
2
3
4
5
6
7
8
..
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
..
53
54
55
56
57
58
59
60
\ GUI night mode style

\ Copyright © 2019   Bernd Paysan

\ This program is free software: you can redistribute it and/or modify
\ it under the terms of the GNU Affero General Public License as published by
\ the Free Software Foundation, either version 3 of the License, or
\ (at your option) any later version.
................................................................................
\ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
\ GNU Affero General Public License for more details.

\ You should have received a copy of the GNU Affero General Public License
\ along with this program.  If not, see <http://www.gnu.org/licenses/>.

1 new-theme
night-mode
$FFFFFFFF re-text-color blackish
$FFFFBBFF re-text-color dark-blue
$000000FF re-text-color whitish
$40C0FFFF $000000FF $000000FF $FFFFFFFF re-text-emoji-fade-color toggle-color
$FF0040FF re-text-color pw-num-col#
$cc6600FF re-text-color pw-text-col#
$FFFFFFFF re-text-color show-sign-color#
................................................................................
$55DD55FF
$BBDD66FF
$33EE33FF
8 0 [DO]
    imports#rgb-fg [I] sfloats + sf@ floor f>s to color,#
    text-color, fdrop
[LOOP]
night-mode
|







 







|







 







|
1
2
3
4
5
6
7
8
..
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
..
53
54
55
56
57
58
59
60
\ GUI dark mode style

\ Copyright © 2019   Bernd Paysan

\ This program is free software: you can redistribute it and/or modify
\ it under the terms of the GNU Affero General Public License as published by
\ the Free Software Foundation, either version 3 of the License, or
\ (at your option) any later version.
................................................................................
\ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
\ GNU Affero General Public License for more details.

\ You should have received a copy of the GNU Affero General Public License
\ along with this program.  If not, see <http://www.gnu.org/licenses/>.

1 new-theme
dark-gui
$FFFFFFFF re-text-color blackish
$FFFFBBFF re-text-color dark-blue
$000000FF re-text-color whitish
$40C0FFFF $000000FF $000000FF $FFFFFFFF re-text-emoji-fade-color toggle-color
$FF0040FF re-text-color pw-num-col#
$cc6600FF re-text-color pw-text-col#
$FFFFFFFF re-text-color show-sign-color#
................................................................................
$55DD55FF
$BBDD66FF
$33EE33FF
8 0 [DO]
    imports#rgb-fg [I] sfloats + sf@ floor f>s to color,#
    text-color, fdrop
[LOOP]
dark-gui

Changes to gui.fs.

1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
    get-order n>r ['] /chat >body 1 set-order
    ['] widgets-loop catch
    /chat:text-chat-cmd-o to chat-cmd-o
    nr> set-order throw ;

' net2o-gui is run-gui

include gui-night.fs

previous

\ localization

cs-scope: lang








|







1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
    get-order n>r ['] /chat >body 1 set-order
    ['] widgets-loop catch
    /chat:text-chat-cmd-o to chat-cmd-o
    nr> set-order throw ;

' net2o-gui is run-gui

include gui-dark.fs

previous

\ localization

cs-scope: lang

Changes to keys.fs.

953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
' scanned-payment ,

here scanned-x - cell/ constant scanned-max#

$Variable lastscan$

: lastscan? ( addr u tag -- flag )
    >r $make { w^ just$ } r> just$ c$+!
    just$ $@ lastscan$ $@ str=
    just$ @ lastscan$ $!buf ;
: scan-result ( addr u tag -- flag )
    dup 2over rot lastscan? IF drop 2drop false EXIT THEN
    dup scanned-max# u< IF  cells scanned-x + perform
    ELSE  ." unknown tag " hex. ." scanned " 85type cr ?scan-level true
    THEN ;







|







953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
' scanned-payment ,

here scanned-x - cell/ constant scanned-max#

$Variable lastscan$

: lastscan? ( addr u tag -- flag )
    >r $10 + $make { w^ just$ } r> just$ c$+!
    just$ $@ lastscan$ $@ str=
    just$ @ lastscan$ $!buf ;
: scan-result ( addr u tag -- flag )
    dup 2over rot lastscan? IF drop 2drop false EXIT THEN
    dup scanned-max# u< IF  cells scanned-x + perform
    ELSE  ." unknown tag " hex. ." scanned " 85type cr ?scan-level true
    THEN ;

Changes to qrscan.fs.

520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
: scan-it ( -- flag )
    ?legit IF
	scan-legit
	$10 0 DO
	    I 3 and    to strip+x
	    I 2 rshift to strip+y
	    scan-legit? IF
		guessecc $10 + c@
		msg( dup 2over rot debug-scan-result )
		scan-result dup to scanned?
		qr( ." took: " .time cr )
		qr( save-png1 1 +to scan# )
		UNLOOP  EXIT
	    ELSE
		2drop







|







520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
: scan-it ( -- flag )
    ?legit IF
	scan-legit
	$10 0 DO
	    I 3 and    to strip+x
	    I 2 rshift to strip+y
	    scan-legit? IF
		guesstag c@
		msg( dup 2over rot debug-scan-result )
		scan-result dup to scanned?
		qr( ." took: " .time cr )
		qr( save-png1 1 +to scan# )
		UNLOOP  EXIT
	    ELSE
		2drop

Changes to wiki/commands.md.

1
2
3
4
5
6
7
8
9
10
# Commands #

Version 0.9.5-20191226.

net2o separates data and commands.  Data is passed through to higher
layers, commands are interpreted when they arrive.  For connection
requests, a special bit is set, and the address then isn't used as
address, but as IV for the opportunistic encoding.

The command interpreter is a stack machine with two data types: 64


|







1
2
3
4
5
6
7
8
9
10
# Commands #

Version 0.9.5-20200102.

net2o separates data and commands.  Data is passed through to higher
layers, commands are interpreted when they arrive.  For connection
requests, a special bit is set, and the address then isn't used as
address, but as IV for the opportunistic encoding.

The command interpreter is a stack machine with two data types: 64