NEURON
splitnrn.cpp
Go to the documentation of this file.
1
/* split a file.zip file into 1MB pieces called file.z1, file.z2 etc */
2
3
#include <stdio.h>
4
#include <malloc.h>
5
#include <stdlib.h>
6
7
void
main
(
int
argc
,
char
**
argv
) {
8
long
i
,
j
,
n
,
done
;
9
FILE* fi, *fo;
10
char
*
buf
;
11
buf = (
char
*)malloc(1024*16);
12
if
(argc != 2) {
13
printf
(
"usage: splitnrn nrndisk2\n"
);
14
exit(1);
15
}
16
sprintf
(buf,
"%s.zip"
, argv[1]);
17
if
((fi =
fopen
(buf,
"rb"
)) == (FILE*)0) {
18
printf
(
"can't open %s\n"
, buf);
19
exit(1);
20
}
21
n=1;
22
done = 0;
23
while
(!done) {
24
sprintf
(buf,
"%s.z%d"
, argv[1], n);
25
if
((fo =
fopen
(buf,
"wb"
)) == (FILE*)0) {
26
printf
(
"can't open %s\n"
, buf);
27
exit(1);
28
}
29
for
(j=0; j < 88; ++
j
) {
/* 88*1024*16 = 1441792 */
30
i = fread(buf,
sizeof
(
char
), 1024*16, fi);
31
printf
(
"read %d\n"
, i);
32
i = fwrite(buf,
sizeof
(
char
), i, fo);
33
printf
(
"write %d\n"
, i);
34
if
(i < 1024*16) {
35
done = 1;
36
break
;
37
}
38
}
39
++
n
;
40
fclose(fo);
41
}
42
}
43
sprintf
sprintf(buf," if (secondorder) {\ " int _i;\" " for(_i=0;_i< %d;++_i) {\" " _p[_slist%d[_i]]+=dt *_p[_dlist%d[_i]];\" " }}\", numeqn, listnum, listnum)
done
static double done(void *v)
Definition:
ocbbs.cpp:280
n
int const size_t const size_t n
Definition:
nrngsl.h:12
printf
#define printf
Definition:
mwprefix.h:26
j
size_t j
Definition:
nrngsl_real_radix2.cpp:56
main
void main(int argc, char **argv)
Definition:
splitnrn.cpp:7
i
#define i
Definition:
md1redef.h:12
buf
char buf[512]
Definition:
init.cpp:13
argc
static int argc
Definition:
inithoc.cpp:53
fopen
FILE * fopen()
argv
static char ** argv
Definition:
inithoc.cpp:54
src
mswin
extra
splitnrn.cpp