lilypond-1.0.13
[lilypond.git] / lib / binary-source-file.cc
blob9bcf0e5f70fa1ab4dffd161c8c12755534548494
1 /*
2 binary-source-file.cc -- implement Binary_source_file
4 source file of the LilyPond music typesetter
6 (c) 1997--1998 Jan Nieuwenhuizen
7 */
10 #include <limits.h> // INT_MAX
11 #include <assert.h>
13 #include "proto.hh"
14 #include "plist.hh"
15 #include "string.hh"
16 #include "source-file.hh"
17 #include "binary-source-file.hh"
18 #include "string-convert.hh"
20 Binary_source_file::Binary_source_file (String& filename_str)
21 : Source_file (filename_str)
25 Binary_source_file::~Binary_source_file ()
29 String
30 Binary_source_file::error_str (char const* pos_ch_c_l) const
32 assert (this);
33 if (!in_b (pos_ch_c_l))
34 return "";
36 char const* begin_ch_c_l = pos_ch_c_l - 8 >? ch_C ();
37 char const* end_ch_c_l = pos_ch_c_l + 7 <? ch_C () + length_i ();
39 String pre_str ((Byte const*)begin_ch_c_l, pos_ch_c_l - begin_ch_c_l);
40 pre_str = String_convert::bin2hex_str (pre_str);
41 for (int i = 2; i < pre_str.length_i (); i += 3)
42 pre_str = pre_str.left_str (i) + " " + pre_str.cut_str (i, INT_MAX);
43 String post_str ((Byte const*)pos_ch_c_l, end_ch_c_l - pos_ch_c_l);
44 post_str = String_convert::bin2hex_str (post_str);
45 for (int i = 2; i < post_str.length_i (); i += 3)
46 post_str = post_str.left_str (i) + " " + post_str.cut_str (i, INT_MAX);
48 String str = pre_str
49 + to_str ('\n')
50 + to_str (' ', pre_str.length_i () + 1)
51 + post_str;
52 return str;
55 int
56 Binary_source_file::line_i (char const* pos_ch_c_l) const
58 if (!in_b (pos_ch_c_l))
59 return 0;
61 return pos_ch_c_l - ch_C ();