1 #include <msp/datafile/parser.h>
2 #include <msp/datafile/statement.h>
3 #include <msp/datafile/writer.h>
4 #include <msp/fs/utils.h>
5 #include <msp/io/memory.h>
6 #include <msp/strings/format.h>
13 Packer::Packer(DataTool &t):
19 IO::BufferedFile *Packer::tempfile()
22 const char *tmp_env = getenv("TMPDIR");
28 for(unsigned i=0;; ++i)
32 FS::Path filename = tmpdir/format("mspdatatool.%d", i);
33 IO::BufferedFile *file = new IO::BufferedFile(filename.str(), IO::M_RDWR, IO::File::C_NEW);
34 FS::unlink(filename.str());
37 catch(const IO::file_already_exists &)
49 void Packer::pack_file(const string &fn)
52 throw logic_error("Packer::pack_file");
54 IO::SeekOffset offset = tmp_file->tell();
56 IO::BufferedFile in(fn);
59 transfer_datafile(in, fn, *tmp_file, objects);
61 transfer_unknown(in, *tmp_file);
63 unsigned length = tmp_file->tell()-offset;
65 DataFile::Statement st("file");
66 st.append(FS::basename(fn));
67 st.sub.push_back((DataFile::Statement("slice"), offset, length));
68 for(list<Object>::const_iterator i=objects.begin(); i!=objects.end(); ++i)
69 st.sub.push_back((DataFile::Statement("object"), i->name, i->keyword));
70 directory.push_back(st);
71 dir_alloc += 100+objects.size()*100;
74 bool Packer::detect_data(IO::Seekable &in)
76 IO::SeekOffset offset = in.tell();
78 DataFile::Parser parser(in, "-");
79 while(data && parser && in.tell()<10240)
90 in.seek(offset, IO::S_BEG);
94 void Packer::transfer_datafile(IO::Base &in, const string &fn, IO::Base &out, ObjectList &objects)
96 DataFile::Parser parser(in, fn);
98 DataFile::Writer *writer = tool.create_writer(out);
100 bool collection = FS::extpart(fn)==".mdc";
103 DataFile::Statement st = parser.parse(true);
106 if(collection && !st.control)
108 if(st.get_signature()=="s")
111 obj.name = st.args[0].get<string>();
112 obj.keyword = st.keyword;
113 objects.push_back(obj);
118 if(!st.control || st.keyword=="__src")
122 writer->write(DataFile::Statement("__end"));
126 void Packer::transfer_unknown(IO::Base &in, IO::Base &out)
131 unsigned len = in.read(buf, sizeof(buf));
138 void Packer::create_pack(const string &fn)
140 vector<char> dir_buffer(dir_alloc);
141 IO::Memory mem(&dir_buffer[0], dir_buffer.size(), IO::M_WRITE);
143 unsigned base_offset = 0;
146 mem.seek(0, IO::S_BEG);
148 DataFile::Writer *writer = tool.create_writer(mem);
150 for(list<DataFile::Statement>::const_iterator i=directory.begin(); i!=directory.end(); ++i)
153 base_offset = mem.tell();
154 writer->write((DataFile::Statement("base_offset"), base_offset));
155 writer->write(DataFile::Statement("__end"));
158 unsigned dir_size = mem.tell();
159 if(dir_size<=base_offset)
161 base_offset = dir_size;
164 IO::File out(fn, IO::M_WRITE);
165 out.write(&dir_buffer[0], base_offset);
166 tmp_file->seek(0, IO::S_BEG);
167 unsigned bufsize = 1048576;
168 char *buf = new char[bufsize];
169 while(!tmp_file->eof())
171 unsigned len = tmp_file->read(buf, bufsize);