GURL
getDjViewDataFile(const char *fname)
{
GList<GURL> paths = DjVuMessage::GetProfilePaths();
GUTF8String file = fname;
// end hack alert
static const char *osi = "/osi/";
static const char *djview3 = "/djview3/";
for (GPosition pos=paths; pos; ++pos)
{
GURL url = GURL(file, paths[pos]);
GUTF8String urls = (const char*)url;
int pos = urls.search(osi);
if (pos >= 0)
{
GUTF8String urlx;
urlx += urls.substr(0, pos);
urlx += djview3;
urlx += urls.substr(pos+strlen(osi), -1);
GURL url = GURL::UTF8(urlx);
if (url.is_file())
return url;
}
}
// end hack alert
for (GPosition pos=paths; pos; ++pos)
{
GURL url = GURL(file, paths[pos]);
if(url.is_file())
return url;
}
return GURL();
}
int
main(int argc,char *argv[],char *[])
{
setlocale(LC_ALL,"");
djvu_programname(argv[0]);
G_TRY
{
int i;
if (argc < 2)
usage(argv[0]);
for (i=1; i<argc; i++)
{
GURL djvufile;
GURL *pdjvufile = 0;
if (! strcmp(argv[i], "-o"))
{
if (++i >= argc)
usage(argv[0]);
djvufile = GURL::Filename::Native(argv[i]);
pdjvufile = &djvufile;
if (! djvufile.is_file())
nofile(argv[i]);
if (++i >= argc)
usage(argv[0]);
}
GURL xmlfile = GURL::Filename::Native(argv[i]);
if (! xmlfile.is_file())
nofile(argv[i]);
GP<lt_XMLParser> parser(lt_XMLParser::create());
GP<lt_XMLTags> tag(lt_XMLTags::create(xmlfile));
parser->parse(*tag, pdjvufile);
parser->save();
}
}
G_CATCH(ex)
{
ex.perror();
exit(1);
}
G_ENDCATCH;
exit(0);
#ifdef WIN32
return 0;
#endif
}
GURL
getExecDir(void)
{
// This is the same as GetModulePath in DjVuMessage.cpp
GURL retval;
GUTF8String &xprogramname=DjVuMessage::programname();
if(xprogramname.length())
{
if(xprogramname[1]=='/'
||!xprogramname.cmp("../",3)
||!xprogramname.cmp("./",2))
{
retval=GURL::Filename::UTF8(xprogramname);
}
if(retval.is_empty() || !retval.is_file())
{
GList<GURL> paths(parsePATH());
GMap<GUTF8String,void *> pathMAP;
for(GPosition pos=paths;pos;++pos)
{
retval=GURL::UTF8(xprogramname,paths[pos]);
const GUTF8String path(retval.get_string());
if(!pathMAP.contains(path))
{
if(retval.is_file())
break;
pathMAP[path]=0;
}
}
}
if (! retval.is_empty() )
retval = retval.follow_symlinks();
if (! retval.is_empty() )
retval = retval.base();
}
return retval;
}
GList<GURL>
DjVuMessage::GetProfilePaths(void)
{
static bool first=true;
static GList<GURL> realpaths;
if(first)
{
first=false;
GMap<GUTF8String,void *> pathsmap;
GList<GURL> paths;
GURL path;
const GUTF8String envp(GOS::getenv(DjVuEnv));
if(envp.length())
appendPath(GURL::Filename::UTF8(envp),pathsmap,paths);
#if defined(WIN32) || defined(UNIX)
GURL mpath(GetModulePath());
if(!mpath.is_empty() && mpath.is_dir())
{
#if defined(UNIX) && !defined(AUTOCONF) && !defined(NDEBUG)
appendPath(GURL::UTF8(DebugModuleDjVuDir,mpath),pathsmap,paths);
#endif
appendPath(mpath,pathsmap,paths);
mpath=mpath.base();
appendPath(GURL::UTF8(ModuleDjVuDir,mpath),pathsmap,paths);
mpath=mpath.base();
appendPath(GURL::UTF8(ModuleDjVuDir,mpath),pathsmap,paths);
}
#endif
#if defined(AUTOCONF)
GURL dpath = GURL::Filename::UTF8(DjVuDataDir);
appendPath(dpath,pathsmap,paths);
#endif
#ifdef WIN32
appendPath(RegOpenReadConfig(HKEY_CURRENT_USER),pathsmap,paths);
appendPath(RegOpenReadConfig(HKEY_LOCAL_MACHINE),pathsmap,paths);
#else
GUTF8String home=GOS::getenv("HOME");
# if HAVE_GETPWUID
if (! home.length()) {
struct passwd *pw=0;
if ((pw = getpwuid(getuid())))
home=GNativeString(pw->pw_dir);
}
# endif
if (home.length()) {
GURL hpath = GURL::UTF8(LocalDjVuDir,GURL::Filename::UTF8(home));
appendPath(hpath,pathsmap,paths);
}
#endif
#ifdef LT_DEFAULT_PREFIX
appendPath(GURL::Filename::UTF8(DjVuPrefixDir),pathsmap,paths);
#endif
appendPath(GURL::Filename::UTF8(RootDjVuDir),pathsmap,paths);
pathsmap.empty();
GPosition pos;
GList< GMap<GUTF8String,GP<lt_XMLTags> > > localemaps;
for(pos=paths;pos;++pos)
{
path=GURL::UTF8(LanguageFile,paths[pos]);
if(path.is_file())
{
const GP<lt_XMLTags> xml(lt_XMLTags::create(ByteStream::create(path,"rb")));
const GPList<lt_XMLTags> Body(xml->get_Tags(bodystring));
GPosition pos=Body;
if(!pos || (pos != Body.lastpos()))
{
G_THROW( ERR_MSG("XMLAnno.extra_body") );
}
const GP<lt_XMLTags> GBody(Body[pos]);
if(!GBody)
{
G_THROW( ERR_MSG("XMLAnno.no_body") );
}
GMap<GUTF8String,GP<lt_XMLTags> > localemap;
lt_XMLTags::get_Maps(languagestring,localestring,Body,localemap);
localemaps.append(localemap);
}
}
GList<GURL> localepaths;
GList<GURL> osilocalepaths;
// Need to do it the right way!
GUTF8String defaultlocale = getenv("LANGUAGE");
if (! defaultlocale)
{
const GUTF8String oldlocale(setlocale(LC_MESSAGES,0));
defaultlocale = setlocale(LC_MESSAGES,"");
setlocale(LC_MESSAGES,(const char *)oldlocale);
}
// Unfathomable search.
for(int loop=0; loop<2; loop++)
{
static const char sepchars[]=" _.@";
const char *p=sepchars+sizeof(sepchars)-1;
do
{
int sepcharpos=p[0]?defaultlocale.search(p[0]):defaultlocale.length();
if(sepcharpos > 0)
{
const GUTF8String sublocale(defaultlocale,sepcharpos);
const GUTF8String downcasesublocale("downcase^"+sublocale.downcase());
for(pos=localemaps;pos;++pos)
{
const GMap<GUTF8String,GP<lt_XMLTags> > &localemap=localemaps[pos];
GPosition pos=localemap.contains(sublocale);
if(!pos)
pos=localemap.contains(downcasesublocale);
if(pos)
{
const GMap<GUTF8String,GUTF8String>&args
= localemap[pos]->get_args();
pos = args.contains(srcstring);
if (pos)
{
const GUTF8String src(args[pos]);
for(pos=paths;pos;++pos)
{
path=GURL::UTF8(src,paths[pos]);
if(path.is_dir())
localepaths.append(path);
path=GURL::UTF8(GUTF8String(opensourcedir)+"/"+src,paths[pos]);
if(path.is_dir())
osilocalepaths.append(path);
}
}
// We don't need to check anymore language files.
p=sepchars;
break;
}
}
if(!pos)
{
for(pos=paths;pos;++pos)
{
path=GURL::UTF8(sublocale,paths[pos]);
if(path.is_dir())
{
localepaths.append(path);
}
path=GURL::UTF8(GUTF8String(opensourcedir)+"/"+sublocale,paths[pos]);
if(path.is_dir())
{
osilocalepaths.append(path);
}
}
}
}
} while(p-- != sepchars);
if((GPosition) localepaths)
break;
defaultlocale="C";
}
for(pos=localepaths;pos;++pos)
appendPath(localepaths[pos],pathsmap,realpaths);
for(pos=paths;pos;++pos)
appendPath(paths[pos],pathsmap,realpaths);
for(pos=osilocalepaths;pos;++pos)
appendPath(osilocalepaths[pos],pathsmap,realpaths);
for(pos=paths;pos;++pos)
{
path=GURL::UTF8(opensourcedir,paths[pos]);
appendPath(path,pathsmap,realpaths);
}
}
return realpaths;
}
