117 lines
2.6 KiB
C++
117 lines
2.6 KiB
C++
#help_index "Doc"
|
|
|
|
I64 DocOptEntry(CDoc *,CDocEntry *doc_e)
|
|
{
|
|
U8 *st,*st2,**dst;
|
|
I64 i,result=0;
|
|
|
|
if (doc_e->flags1&DOCEF1_LINK) {
|
|
if (doc_e->flags1 & DOCEF1_AUX_STR &&
|
|
Bt(doc_tag_types,doc_e->type_u8) &&
|
|
!MemCmp(doc_e->aux_str,"FI:",3) &&
|
|
!StrCmp(doc_e->aux_str+3,doc_e->tag)) {
|
|
Free(doc_e->aux_str);
|
|
doc_e->aux_str=NULL;
|
|
doc_e->flags1&=~DOCEF1_AUX_STR;
|
|
result++;
|
|
}
|
|
if (doc_e->flags1 & DOCEF1_AUX_STR)
|
|
dst=&doc_e->aux_str;
|
|
else
|
|
dst=&doc_e->tag;
|
|
if (StrStr(*dst,".Z")) {
|
|
st=DocLinkFile(*dst);
|
|
if (FileFind(st)) {
|
|
if (IsDotZ(st))
|
|
st[StrLen(st)-2]=0;
|
|
i=StrLen(st);
|
|
if ((st2=StrStr(*dst,st)) && st2[i]=='.' && st2[i+1]=='Z') {
|
|
StrCpy(st2+i,st2+i+2);
|
|
result++;
|
|
}
|
|
}
|
|
Free(st);
|
|
}
|
|
/* !!! Dangerous, but handy !!!
|
|
if (doc_e->flags1 & DOCEF1_AUX_STR) {
|
|
if (st=StrStr(doc_e->aux_str,".Z")) {
|
|
StrCpy(st,st+2);
|
|
result++;
|
|
}
|
|
}
|
|
if (Bt(doc_tag_types,doc_e->type_u8)) {
|
|
if (st=StrStr(doc_e->tag,".Z")) {
|
|
StrCpy(st,st+2);
|
|
result++;
|
|
}
|
|
}
|
|
*/
|
|
}
|
|
if (doc_e->type_u8==DOCT_MACRO && doc_e->flags1&DOCEF1_AUX_STR &&
|
|
doc_e->flags1&DOCEF1_LEFT_MACRO && !StrCmp(doc_e->tag,doc_e->left_macro) ||
|
|
doc_e->flags1&DOCEF1_RIGHT_MACRO && !StrCmp(doc_e->tag,doc_e->right_macro)) {
|
|
doc_e->flags1&=~DOCEF1_AUX_STR;
|
|
Free(doc_e->aux_str);
|
|
doc_e->aux_str=NULL;
|
|
result++;
|
|
}
|
|
return result;
|
|
}
|
|
|
|
public I64 DocOptDoc(CDoc *doc)
|
|
{//Optimize Doc
|
|
Bool unlock=DocLock(doc);
|
|
I64 result=0;
|
|
CDocEntry *doc_e;
|
|
DocRecalc(doc);
|
|
doc_e=doc->root.next;
|
|
while (doc_e!=doc) {
|
|
if (result+=DocOptEntry(doc,doc_e))
|
|
result+=DocOptEntry(doc,doc_e);
|
|
doc_e=doc_e->next;
|
|
}
|
|
DocRecalc(doc);
|
|
if (unlock)
|
|
DocUnlock(doc);
|
|
return result;
|
|
}
|
|
|
|
public I64 DocOptFile(U8 *filename)
|
|
{//Optimize File
|
|
I64 result;
|
|
CDoc *doc=DocRead(filename);
|
|
if (result=DocOptDoc(doc)) {
|
|
"-%d:%s\n",result,doc->filename.name;
|
|
DocWrite(doc);
|
|
}
|
|
DocDel(doc);
|
|
return result;
|
|
}
|
|
|
|
I64 DocOptLst(CDirEntry *tempm1)
|
|
{
|
|
I64 result=0;
|
|
CDirEntry *tempm2;
|
|
while (tempm1) {
|
|
tempm2=tempm1->next;
|
|
if (tempm1->attr & _ATTR_DIR) {
|
|
if (tempm1->sub) {
|
|
"%S %s\n","ST_SCANNING_DIR",tempm1->full_name;
|
|
result+=DocOptLst(tempm1->sub);
|
|
}
|
|
} else
|
|
result+=DocOptFile(tempm1->full_name);
|
|
CDirEntryDel(tempm1);
|
|
tempm1=tempm2;
|
|
}
|
|
return result;
|
|
}
|
|
|
|
public I64 DocOpt(U8 *files_find_mask="*",U8 *fu_flags=NULL)
|
|
{//Optimize Files
|
|
I64 f=0;
|
|
GetFFlags(&f,Define("ST_FILE_UTIL_FLAGS"),"+r+T");
|
|
GetFFlags(&f,Define("ST_FILE_UTIL_FLAGS"),fu_flags);
|
|
return DocOptLst(FilesFind(files_find_mask,f));
|
|
}
|