Check-in [69b5d91494]
Not logged in
Home Timeline Files Branches Tags Tickets Wiki Login Impressum Datenschutzerklärung

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

Overview
Comment:Bump version number
Timelines: family | ancestors | descendants | both | trunk | 0.8.0-20181004
Files: files | file ages | folders
SHA1: 69b5d9149483776e7ed6310442d631c08514f225
User & Date: bernd 2018-10-04 10:39:00
Context
2018-10-04
11:28
bump Gforth version in do check-in: 70518b2a84 user: bernd tags: trunk
10:39
Bump version number check-in: 69b5d91494 user: bernd tags: trunk, 0.8.0-20181004
2018-09-30
22:06
Fix chat groups problem in GUI check-in: 9b240c6491 user: bernd tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to configure.ac. 

11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

# but WITHOUT ANY WARRANTY; without even the implied warranty of
# 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/>.

AC_INIT([net2o], [0.8.0-20180906], [bernd@net2o.de], [net2o], [https://fossil.net2o.de/net2o/reportlist])
AC_PREREQ([2.59])
AC_CONFIG_MACRO_DIR([m4])
AC_USE_SYSTEM_EXTENSIONS
LT_INIT

AC_MSG_CHECKING([for gforth])









|








11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

# but WITHOUT ANY WARRANTY; without even the implied warranty of
# 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/>.

AC_INIT([net2o], [0.8.0-20181004], [bernd@net2o.de], [net2o], [https://fossil.net2o.de/net2o/reportlist])
AC_PREREQ([2.59])
AC_CONFIG_MACRO_DIR([m4])
AC_USE_SYSTEM_EXTENSIONS
LT_INIT

AC_MSG_CHECKING([for gforth])

Changes to tests/keccak.fs. 

1
2
3
4


5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
..
33
34
35
36
37
38
39
40

41
42
43
44
45
46
47
....
2089
2090
2091
2092
2093
2094
2095
2096

\ test for keccak

require ../net2o.fs



keccak0
pad $80 erase s" SX{9" pad swap move $80 pad $7F + c! $80
pad $80 >keccak
keccak* pad 8 keccak> pad le-uxd@ $466624B803BF072F. d=
keccak* pad 8 keccak> pad le-uxd@ $993340D7F9153F02. d= and
keccak* pad 8 keccak> pad le-uxd@ $6EAAAE36BE8E36D3. d= and
keccak* pad 8 keccak> pad le-uxd@ $1B4AEC08DA6A8BA6. d= and
[IF] ." succeeded" [ELSE] ." failed" [THEN] cr

: crypt-loop { n -- }
    pad 8 + pad DO
	I $180 erase
	keccak0 keccak* I $80 + $80 keccak>
	I $80 + $80 xtype cr
	n 1 ?DO
................................................................................
	LOOP cr
    LOOP ;
$80 crypt-loop

: sha3@ ( -- addr u ) pad c:key> pad $40 ;
: .sha3 ( -- )  sha3@ xtype cr ;
: >sha3 ( addr u -- ) c:0key c:hash ;
: ?sha3 ( addr u -- ) sha3@ str= '+' '-' rot select emit ;


\ the digests her are all different from the Keccak reference, because we do
\ padding differently
: run-tests ( -- )
!time
x" 00" >sha3 x" 88C23198B8E219492654E43484C30E9C5BF8099243B5D0A9B92F3F855EF80E505FFCCF75B155888F884FD7AB6C4FE23EBF3CE1BB8610F42C4851173F45F3FE2C" ?sha3
x" 00" >sha3 x" 88C23198B8E219492654E43484C30E9C5BF8099243B5D0A9B92F3F855EF80E505FFCCF75B155888F884FD7AB6C4FE23EBF3CE1BB8610F42C4851173F45F3FE2C" ?sha3
................................................................................
x" 41355A235D1F809C3C5B921CE7FB9D517ECC1E7439FB304F2D1CF919DAA5DE13154FAD2BC8FD7F3EA3B026CEF34BCFF61B5D779CD8D2C76461FA3821D6343AD05A791BC915164543C32A74C85FB225DF22A0039D6F349C6E39545CBD490359EE5152D32F263BA5B6169223F6BA9E125AF53BAFBA95FDEEF5A068B6299871CA1BB743235076471144501E03C911701476152C218EBF1A734198655498EB6F82A1FDDBE4BB845B0DD7636943CE869812F9DB13E59055A7ECA774C60105E95A59E23A9156E23FB51AA9B7AA95BE82D8B375542D320A1989A85E6F9ABADF85CFCAB576C93E71A1E1367A2789F21DE5D4BFC0660DFEC110860DAA15F23FD3A4600601" >sha3 x" E0778F58F8C0ECE1E268202A6F1A76B5BAFD5841517AF416012B4870CF55EC973A99983B531F2BFA85B7F9805A8AC4EB18BE0CE62E377168DA4F5CD8ADE7D01A" ?sha3
x" CA0B483D9E27EE4DE097CC92AF14D4A1B096E7533E85AFF050C49798A09167C63CCC9E85BEE8FDBF3681547C687D71E24B4CF618410FE9DF0B0D161AD323E14385C661EA7DCA937F62ACD0E54173FB18C22DC0048B35470D81BE6F1790B8CE63CC5495821AA34211DCE1E681F95DAC61C960EA25D74FABCF97BC3CB800BE6DFB4325A608BA2C701756B31C179B6E0724B7DE0E95E9732865034AEE72C19617BE8AC5CC266633E949C733B38F4915C94964EF5EC2F5C5BD65E1446F2621A120376B10DAC06792625799E67BE6F474D4DEE4D4E84C8EA08F03FE4C95D8967C3C28E82606FE7390449C4C0EBFC002054C8228157D04D8B4346A1667EB173CF2380B" >sha3 x" 9F8B0629B40C6C502F6968FA2507A0E17D91B91906A9781A31945D9A8FCA551B16D9B14F7DE8782853FB4C5333CD1EE34738496E0F67157AAEE4ADC68BC19B0F" ?sha3
x" EC545360EE77F181B55B942CC77E84B64A74241F8E02BB940560575964C5FA131C453BCB179B6547D317180BDA99D8EA69D4216B58E8C38BCABA42E2B1E23712C6558C6A1A14996955540A4D54A97364B1ED11BAB2B20E0DCA2827FE47EAC10E7BEB694ED6F48860D419F3C370F893F57D9858193389DAF69EAB130C0BCF00D639E3ACE5240E232D733D0A1AB4A805BB8367472DFEE0873762CED8006DB3EC84153A48088581C2BFEDF78FF9DCD628B2B9DB64FFA900B62EEC1F358E4ED5EA31CA719EFBF381B6AF5B366CBF2025099E30B39BF446C8CA123AC302FFCD163946306F5420E3C2E8D50F48169402EF2E1764228D30A4F14A3EEAD1C0A106667503" >sha3 x" DB51164F6720B3BA64B061EFC07188F4AF0C2CA2DC1B24D976D106642489665E97F664D39F6D6A646993E805DD8D8B5331B663CC4A1F3EF05103823A423D3BC2" ?sha3
x" 36CF74E3561474F90A2B62718C8740CE553A207334A1EDC7F95B702848595EC23285F826C989CD975C4390E24C485335B616BCBEBC16EB7C24E895F1A633D5E331DA67BD2A86B088BA6874BAAC74F08F5483D0702F0E41229C14A588BEBD592F86DADB5BA72A1E7FE310728B4234AEC7361AE460DB299D54235DBC92DC20DA9A9B3DD3FD7E68DABEE80C8D1272BC1D1C98093CAC93DBF7FAD2D448E2F1A7992256ECB537DC501756F66D6D7B4409C4C74CEB9355E8587136F67FEE9736667370EC924AF34DE22F75410C1251B344653F2535A163B7FB90ECD874FB0362670E2F9182EFDF0221B0F727BC63534E9F98F4AD713D6B9486F58221442273B9D1EE14" >sha3 x" 24A12DDFFCD929E07F4977A0ABB31627A3F5AB58D4CC67F60D7198946F99D030313A5C7AA257F3F89FCABDF38902EEF1E2A40E96D5DE59DB2EB6D88288795719" ?sha3
x" 1F42ADD25C0A80A4C82AAE3A0E302ABF9261DCA7E7884FD869D96ED4CE88AAAA25304D2D79E1FA5CC1FA2C95899229BC87431AD06DA524F2140E70BD0536E9685EE7808F598D8A9FE15D40A72AEFF431239292C5F64BDB7F620E5D160B329DEB58CF6D5C0665A3DED61AE4ADBCA94DC2B7B02CDF3992FDF79B3D93E546D5823C3A630923064ED24C3D974C4602A49DF75E49CF7BD51EDC7382214CBA850C4D3D11B40A70B1D926E3755EC79693620C242AB0F23EA206BA337A7EDC5421D63126CB6C7094F6BC1CF9943796BE2A0D9EB74FC726AA0C0D3B3D39039DEAD39A7169F8C3E2365DD349E358BF08C717D2E436D65172A76ED5E1F1E694A75C19280B15" >sha3 x" EADC37FAAF4181E51EDBEB4F49B16C165DE40D614355C6ADD63BDB30AF067605A2F79DC2D911DE0C4D90E63B4378BA7CBE9EEC9530F58D33DD0050590AC91280" ?sha3 cr .time ."  for 2048 hashes" cr ;
run-tests
10 0 [DO] c:0key pad $100000 !time c:encrypt .time ."  for 1MB" cr [LOOP]
script? [IF] bye [THEN]





>
>







|







 







|
>







 







|

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
..
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
....
2092
2093
2094
2095
2096
2097
2098
2099

\ test for keccak

require ../net2o.fs

Variable kerrs

keccak0
pad $80 erase s" SX{9" pad swap move $80 pad $7F + c! $80
pad $80 >keccak
keccak* pad 8 keccak> pad le-uxd@ $466624B803BF072F. d=
keccak* pad 8 keccak> pad le-uxd@ $993340D7F9153F02. d= and
keccak* pad 8 keccak> pad le-uxd@ $6EAAAE36BE8E36D3. d= and
keccak* pad 8 keccak> pad le-uxd@ $1B4AEC08DA6A8BA6. d= and
[IF] ." succeeded" [ELSE] ." failed" 1 kerrs +! [THEN] cr

: crypt-loop { n -- }
    pad 8 + pad DO
	I $180 erase
	keccak0 keccak* I $80 + $80 keccak>
	I $80 + $80 xtype cr
	n 1 ?DO
................................................................................
	LOOP cr
    LOOP ;
$80 crypt-loop

: sha3@ ( -- addr u ) pad c:key> pad $40 ;
: .sha3 ( -- )  sha3@ xtype cr ;
: >sha3 ( addr u -- ) c:0key c:hash ;
: ?sha3 ( addr u -- ) sha3@ str= dup 1+ kerrs +!
    '+' '-' rot select emit ;

\ the digests her are all different from the Keccak reference, because we do
\ padding differently
: run-tests ( -- )
!time
x" 00" >sha3 x" 88C23198B8E219492654E43484C30E9C5BF8099243B5D0A9B92F3F855EF80E505FFCCF75B155888F884FD7AB6C4FE23EBF3CE1BB8610F42C4851173F45F3FE2C" ?sha3
x" 00" >sha3 x" 88C23198B8E219492654E43484C30E9C5BF8099243B5D0A9B92F3F855EF80E505FFCCF75B155888F884FD7AB6C4FE23EBF3CE1BB8610F42C4851173F45F3FE2C" ?sha3
................................................................................
x" 41355A235D1F809C3C5B921CE7FB9D517ECC1E7439FB304F2D1CF919DAA5DE13154FAD2BC8FD7F3EA3B026CEF34BCFF61B5D779CD8D2C76461FA3821D6343AD05A791BC915164543C32A74C85FB225DF22A0039D6F349C6E39545CBD490359EE5152D32F263BA5B6169223F6BA9E125AF53BAFBA95FDEEF5A068B6299871CA1BB743235076471144501E03C911701476152C218EBF1A734198655498EB6F82A1FDDBE4BB845B0DD7636943CE869812F9DB13E59055A7ECA774C60105E95A59E23A9156E23FB51AA9B7AA95BE82D8B375542D320A1989A85E6F9ABADF85CFCAB576C93E71A1E1367A2789F21DE5D4BFC0660DFEC110860DAA15F23FD3A4600601" >sha3 x" E0778F58F8C0ECE1E268202A6F1A76B5BAFD5841517AF416012B4870CF55EC973A99983B531F2BFA85B7F9805A8AC4EB18BE0CE62E377168DA4F5CD8ADE7D01A" ?sha3
x" CA0B483D9E27EE4DE097CC92AF14D4A1B096E7533E85AFF050C49798A09167C63CCC9E85BEE8FDBF3681547C687D71E24B4CF618410FE9DF0B0D161AD323E14385C661EA7DCA937F62ACD0E54173FB18C22DC0048B35470D81BE6F1790B8CE63CC5495821AA34211DCE1E681F95DAC61C960EA25D74FABCF97BC3CB800BE6DFB4325A608BA2C701756B31C179B6E0724B7DE0E95E9732865034AEE72C19617BE8AC5CC266633E949C733B38F4915C94964EF5EC2F5C5BD65E1446F2621A120376B10DAC06792625799E67BE6F474D4DEE4D4E84C8EA08F03FE4C95D8967C3C28E82606FE7390449C4C0EBFC002054C8228157D04D8B4346A1667EB173CF2380B" >sha3 x" 9F8B0629B40C6C502F6968FA2507A0E17D91B91906A9781A31945D9A8FCA551B16D9B14F7DE8782853FB4C5333CD1EE34738496E0F67157AAEE4ADC68BC19B0F" ?sha3
x" EC545360EE77F181B55B942CC77E84B64A74241F8E02BB940560575964C5FA131C453BCB179B6547D317180BDA99D8EA69D4216B58E8C38BCABA42E2B1E23712C6558C6A1A14996955540A4D54A97364B1ED11BAB2B20E0DCA2827FE47EAC10E7BEB694ED6F48860D419F3C370F893F57D9858193389DAF69EAB130C0BCF00D639E3ACE5240E232D733D0A1AB4A805BB8367472DFEE0873762CED8006DB3EC84153A48088581C2BFEDF78FF9DCD628B2B9DB64FFA900B62EEC1F358E4ED5EA31CA719EFBF381B6AF5B366CBF2025099E30B39BF446C8CA123AC302FFCD163946306F5420E3C2E8D50F48169402EF2E1764228D30A4F14A3EEAD1C0A106667503" >sha3 x" DB51164F6720B3BA64B061EFC07188F4AF0C2CA2DC1B24D976D106642489665E97F664D39F6D6A646993E805DD8D8B5331B663CC4A1F3EF05103823A423D3BC2" ?sha3
x" 36CF74E3561474F90A2B62718C8740CE553A207334A1EDC7F95B702848595EC23285F826C989CD975C4390E24C485335B616BCBEBC16EB7C24E895F1A633D5E331DA67BD2A86B088BA6874BAAC74F08F5483D0702F0E41229C14A588BEBD592F86DADB5BA72A1E7FE310728B4234AEC7361AE460DB299D54235DBC92DC20DA9A9B3DD3FD7E68DABEE80C8D1272BC1D1C98093CAC93DBF7FAD2D448E2F1A7992256ECB537DC501756F66D6D7B4409C4C74CEB9355E8587136F67FEE9736667370EC924AF34DE22F75410C1251B344653F2535A163B7FB90ECD874FB0362670E2F9182EFDF0221B0F727BC63534E9F98F4AD713D6B9486F58221442273B9D1EE14" >sha3 x" 24A12DDFFCD929E07F4977A0ABB31627A3F5AB58D4CC67F60D7198946F99D030313A5C7AA257F3F89FCABDF38902EEF1E2A40E96D5DE59DB2EB6D88288795719" ?sha3
x" 1F42ADD25C0A80A4C82AAE3A0E302ABF9261DCA7E7884FD869D96ED4CE88AAAA25304D2D79E1FA5CC1FA2C95899229BC87431AD06DA524F2140E70BD0536E9685EE7808F598D8A9FE15D40A72AEFF431239292C5F64BDB7F620E5D160B329DEB58CF6D5C0665A3DED61AE4ADBCA94DC2B7B02CDF3992FDF79B3D93E546D5823C3A630923064ED24C3D974C4602A49DF75E49CF7BD51EDC7382214CBA850C4D3D11B40A70B1D926E3755EC79693620C242AB0F23EA206BA337A7EDC5421D63126CB6C7094F6BC1CF9943796BE2A0D9EB74FC726AA0C0D3B3D39039DEAD39A7169F8C3E2365DD349E358BF08C717D2E436D65172A76ED5E1F1E694A75C19280B15" >sha3 x" EADC37FAAF4181E51EDBEB4F49B16C165DE40D614355C6ADD63BDB30AF067605A2F79DC2D911DE0C4D90E63B4378BA7CBE9EEC9530F58D33DD0050590AC91280" ?sha3 cr .time ."  for 2048 hashes" cr ;
run-tests
10 0 [DO] c:0key pad $100000 !time c:encrypt .time ."  for 1MB" cr [LOOP]
script? [IF] kerrs @ [IF] 1 (bye) [THEN] bye [THEN]

Changes to wiki/commands.md. 

1
2
3
4
5
6
7
8
9
10

# Commands #

Version 0.8.0-20180906.

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.8.0-20181004.

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

Fossil 2.10 [a56cb60278] 2019-10-07 17:20:47