Initial community commit

Src/external_dependencies/openmpt-trunk/include/unrar/ulinks.cpp

@@ -0,0 +1,110 @@
+
+
+static bool UnixSymlink(CommandData *Cmd,const char *Target,const wchar *LinkName,RarTime *ftm,RarTime *fta)
+{
+  CreatePath(LinkName,true,Cmd->DisableNames);
+
+  // Overwrite prompt was already issued and confirmed earlier, so we can
+  // remove existing symlink or regular file here. PrepareToDelete was also
+  // called earlier inside of uiAskReplaceEx.
+  DelFile(LinkName);
+
+  char LinkNameA[NM];
+  WideToChar(LinkName,LinkNameA,ASIZE(LinkNameA));
+  if (symlink(Target,LinkNameA)==-1) // Error.
+  {
+    if (errno==EEXIST)
+      uiMsg(UIERROR_ULINKEXIST,LinkName);
+    else
+    {
+      uiMsg(UIERROR_SLINKCREATE,UINULL,LinkName);
+      ErrHandler.SetErrorCode(RARX_WARNING);
+    }
+    return false;
+  }
+#ifdef USE_LUTIMES
+#ifdef UNIX_TIME_NS
+  timespec times[2];
+  times[0].tv_sec=fta->GetUnix();
+  times[0].tv_nsec=fta->IsSet() ? long(fta->GetUnixNS()%1000000000) : UTIME_NOW;
+  times[1].tv_sec=ftm->GetUnix();
+  times[1].tv_nsec=ftm->IsSet() ? long(ftm->GetUnixNS()%1000000000) : UTIME_NOW;
+  utimensat(AT_FDCWD,LinkNameA,times,AT_SYMLINK_NOFOLLOW);
+#else
+  struct timeval tv[2];
+  tv[0].tv_sec=fta->GetUnix();
+  tv[0].tv_usec=long(fta->GetUnixNS()%1000000000/1000);
+  tv[1].tv_sec=ftm->GetUnix();
+  tv[1].tv_usec=long(ftm->GetUnixNS()%1000000000/1000);
+  lutimes(LinkNameA,tv);
+#endif
+#endif
+
+  return true;
+}
+
+
+static bool IsFullPath(const char *PathA) // Unix ASCII version.
+{
+  return *PathA==CPATHDIVIDER;
+}
+
+
+bool ExtractUnixLink30(CommandData *Cmd,ComprDataIO &DataIO,Archive &Arc,const wchar *LinkName)
+{
+  char Target[NM];
+  if (IsLink(Arc.FileHead.FileAttr))
+  {
+    size_t DataSize=(size_t)Arc.FileHead.PackSize;
+    if (DataSize>ASIZE(Target)-1)
+      return false;
+    if ((size_t)DataIO.UnpRead((byte *)Target,DataSize)!=DataSize)
+      return false;
+    Target[DataSize]=0;
+
+    DataIO.UnpHash.Init(Arc.FileHead.FileHash.Type,1);
+    DataIO.UnpHash.Update(Target,strlen(Target));
+    DataIO.UnpHash.Result(&Arc.FileHead.FileHash);
+
+    // Return true in case of bad checksum, so link will be processed further
+    // and extraction routine will report the checksum error.
+    if (!DataIO.UnpHash.Cmp(&Arc.FileHead.FileHash,Arc.FileHead.UseHashKey ? Arc.FileHead.HashKey:NULL))
+      return true;
+
+    wchar TargetW[NM];
+    CharToWide(Target,TargetW,ASIZE(TargetW));
+    // Check for *TargetW==0 to catch CharToWide failure.
+    // Use Arc.FileHead.FileName instead of LinkName, since LinkName
+    // can include the destination path as a prefix, which can
+    // confuse IsRelativeSymlinkSafe algorithm.
+    if (!Cmd->AbsoluteLinks && (*TargetW==0 || IsFullPath(TargetW) ||
+        !IsRelativeSymlinkSafe(Cmd,Arc.FileHead.FileName,LinkName,TargetW)))
+      return false;
+    return UnixSymlink(Cmd,Target,LinkName,&Arc.FileHead.mtime,&Arc.FileHead.atime);
+  }
+  return false;
+}
+
+
+bool ExtractUnixLink50(CommandData *Cmd,const wchar *Name,FileHeader *hd)
+{
+  char Target[NM];
+  WideToChar(hd->RedirName,Target,ASIZE(Target));
+  if (hd->RedirType==FSREDIR_WINSYMLINK || hd->RedirType==FSREDIR_JUNCTION)
+  {
+    // Cannot create Windows absolute path symlinks in Unix. Only relative path
+    // Windows symlinks can be created here. RAR 5.0 used \??\ prefix
+    // for Windows absolute symlinks, since RAR 5.1 /??/ is used.
+    // We escape ? as \? to avoid "trigraph" warning
+    if (strncmp(Target,"\\??\\",4)==0 || strncmp(Target,"/\?\?/",4)==0)
+      return false;
+    DosSlashToUnix(Target,Target,ASIZE(Target));
+  }
+  // Use hd->FileName instead of LinkName, since LinkName can include
+  // the destination path as a prefix, which can confuse
+  // IsRelativeSymlinkSafe algorithm.
+  if (!Cmd->AbsoluteLinks && (IsFullPath(Target) ||
+      !IsRelativeSymlinkSafe(Cmd,hd->FileName,Name,hd->RedirName)))
+    return false;
+  return UnixSymlink(Cmd,Target,Name,&hd->mtime,&hd->atime);
+}