Free Hero Mesh

Check-in [a0e8163568]
Login
Home Timeline Files Branches Tags Tickets Wiki Sitemap
This is a mirror of the main repository for Free Hero Mesh. New tickets and changes will not be accepted at this mirror.
Overview
Comment:Add "bunny" mode for the "bunny archive" format suggested for use with uxn in a discussion; not used in Free Hero Mesh, though.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: a0e816356868e47e8b94cf8c1bfb58e9ec87903f
User & Date: user on 2026-09-24 05:13:45.302
Other Links: manifest | tags
Context
2026-09-24
19:30
Correct a mistake in the change to misc/har.c that was recently made Leaf check-in: 8eabce3572 user: user tags: trunk
05:13
Add "bunny" mode for the "bunny archive" format suggested for use with uxn in a discussion; not used in Free Hero Mesh, though. check-in: a0e8163568 user: user tags: trunk
2025-08-17
21:59
Correct the implementation of the BizarroSwap instruction. check-in: dcebadcbcd user: user tags: trunk
Changes
Side-by-Side Diff Ignore Whitespace Patch
Modified misc/har.c from [398da2db3e] to [c464e5cfda]. 
1
2
3
4
5
6
7
8
9

10
11
12
13
14
15
16

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17










+








#if 0
gcc -s -O2 -o ~/bin/har -Wno-unused-result har.c
exit
#endif

/*
  Hamster archiver
  Public domain

  b = Bunny
  c = Create
  d = Delete
  l = Lowercase
  o = Extract to stdout
  r = Rename
  s = Safe
  t = List
︙
79
80
81
82
83
84
85

86
87
88
89










90
91
92
93
94
95
96

80
81
82
83
84
85
86
87




88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104








+
-
-
-
-
+
+
+
+
+
+
+
+
+
+








      if(!c) break;
      if(n==254) fatal("Name too long: %s",name);
    }
    if(opt['s']) {
      if(!n) name[1]=0,n=1;
      if(d) name[n-1]='_';
    }
    if(opt['b']) {
    size=fgetc(stdin)<<16;
    size|=fgetc(stdin)<<24;
    size|=fgetc(stdin);
    size|=fgetc(stdin)<<8;
      size=fgetc(stdin)<<16;
      size|=fgetc(stdin)<<24;
      size|=fgetc(stdin);
      size|=fgetc(stdin)<<8;
    } else {
      size=fgetc(stdin)<<24;
      size|=fgetc(stdin)<<16;
      size|=fgetc(stdin)<<8;
      size|=fgetc(stdin);
    }
    if(argc<3) {
      o=1;
    } else {
      o=0;
      for(n=2;n<argc;n++) {
        if(!strcmp(name,argv[n])) {
          o=1;
︙
125
126
127
128
129
130
131


132
133
134
135









136
137
138
139
140
141
142

133
134
135
136
137
138
139
140
141




142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157








+
+
-
-
-
-
+
+
+
+
+
+
+
+
+








        perror(name);
        fatal("Cannot open file for output");
      }
    } else {
      fp=stdout;
      if(!opt['o']) {
        fwrite(name,1,strlen(name)+1,stdout);
        if(opt['b']) {
          putchar(size>>24);
        putchar(size>>16);
        putchar(size>>24);
        putchar(size);
        putchar(size>>8);
          putchar(size>>16);
          putchar(size>>8);
          putchar(size);
        } else {
          putchar(size>>16);
          putchar(size>>24);
          putchar(size);
          putchar(size>>8);
        }
      }
    }
    while(size--) fputc(fgetc(in),fp);
    if(opt['x']) fclose(fp);
  } else {
    while(size--) fgetc(in);
  }
︙
This page was generated in about 0.024s by Fossil version [1205ec86cb] 2025-04-30 16:57:32