[hbelusca] 69775: [CLIP] Adds a simple CLIP utility, as found on Windows, to ReactOS. Like the Windows version, it can just redirect the output of another console program or a file to the clipboard...
1 Nov
2015
1 Nov
'15
2:47 p.m.
Author: hbelusca
Date: Sun Nov 1 14:47:12 2015
New Revision: 69775
URL: http://svn.reactos.org/svn/reactos?rev=69775&view=rev
Log:
[CLIP]
Adds a simple CLIP utility, as found on Windows, to ReactOS.
Like the Windows version, it can just redirect the output of another console program or a
file to the clipboard.
By Ricardo Hanke, with minor corrections by me.
CORE-10411
Added:
trunk/reactos/base/applications/cmdutils/clip/ (with props)
trunk/reactos/base/applications/cmdutils/clip/CMakeLists.txt (with props)
trunk/reactos/base/applications/cmdutils/clip/clip.c (with props)
trunk/reactos/base/applications/cmdutils/clip/clip.rc (with props)
trunk/reactos/base/applications/cmdutils/clip/lang/ (with props)
trunk/reactos/base/applications/cmdutils/clip/lang/de-DE.rc (with props)
trunk/reactos/base/applications/cmdutils/clip/lang/en-US.rc (with props)
trunk/reactos/base/applications/cmdutils/clip/lang/fr-FR.rc (with props)
trunk/reactos/base/applications/cmdutils/clip/resource.h (with props)
Modified:
trunk/reactos/base/applications/cmdutils/CMakeLists.txt
Modified: trunk/reactos/base/applications/cmdutils/CMakeLists.txt
URL:
http://svn.reactos.org/svn/reactos/trunk/reactos/base/applications/cmdutils…
==============================================================================
--- trunk/reactos/base/applications/cmdutils/CMakeLists.txt [iso-8859-1] (original)
+++ trunk/reactos/base/applications/cmdutils/CMakeLists.txt [iso-8859-1] Sun Nov 1
14:47:12 2015
@@ -1,3 +1,4 @@
+add_subdirectory(clip)
add_subdirectory(comp)
add_subdirectory(cscript)
add_subdirectory(dbgprint)
Propchange: trunk/reactos/base/applications/cmdutils/clip/
------------------------------------------------------------------------------
--- bugtraq:logregex (added)
+++ bugtraq:logregex Sun Nov 1 14:47:12 2015
@@ -0,0 +1 @@
+((CORE|ROSTESTS|ROSAPPS)-\d+)(,? ?((CORE|ROSTESTS|ROSAPPS)-\d+))*(,? ?(and |or
)?((CORE|ROSTESTS|ROSAPPS)-\d+))?
Propchange: trunk/reactos/base/applications/cmdutils/clip/
------------------------------------------------------------------------------
bugtraq:message = See issue %BUGID% for more details.
Propchange: trunk/reactos/base/applications/cmdutils/clip/
------------------------------------------------------------------------------
bugtraq:url = https://jira.reactos.org/browse/%BUGID%
Propchange: trunk/reactos/base/applications/cmdutils/clip/
------------------------------------------------------------------------------
tsvn:logminsize = 10
Added: trunk/reactos/base/applications/cmdutils/clip/CMakeLists.txt
URL:
http://svn.reactos.org/svn/reactos/trunk/reactos/base/applications/cmdutils…
==============================================================================
--- trunk/reactos/base/applications/cmdutils/clip/CMakeLists.txt (added)
+++ trunk/reactos/base/applications/cmdutils/clip/CMakeLists.txt [iso-8859-1] Sun Nov 1
14:47:12 2015
@@ -0,0 +1,5 @@
+
+add_executable(clip clip.c clip.rc)
+set_module_type(clip win32cui UNICODE)
+add_importlibs(clip user32 msvcrt kernel32 advapi32)
+add_cd_file(TARGET clip DESTINATION reactos/system32 FOR all)
Propchange: trunk/reactos/base/applications/cmdutils/clip/CMakeLists.txt
------------------------------------------------------------------------------
svn:eol-style = native
Added: trunk/reactos/base/applications/cmdutils/clip/clip.c
URL:
http://svn.reactos.org/svn/reactos/trunk/reactos/base/applications/cmdutils…
==============================================================================
--- trunk/reactos/base/applications/cmdutils/clip/clip.c (added)
+++ trunk/reactos/base/applications/cmdutils/clip/clip.c [iso-8859-1] Sun Nov 1 14:47:12
2015
@@ -0,0 +1,137 @@
+#include <stdio.h>
+
+#include <windef.h>
+#include <winbase.h>
+#include <winuser.h>
+
+#include "resource.h"
+
+static void PrintError(void)
+{
+ DWORD dwError;
+ LPWSTR lpMsgBuf = NULL;
+
+ dwError = GetLastError();
+ if (dwError == NO_ERROR)
+ return;
+
+ FormatMessageW(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM,
+ NULL, dwError, 0, (LPWSTR)&lpMsgBuf, 0, NULL);
+ wprintf(L"%s", lpMsgBuf);
+ LocalFree(lpMsgBuf);
+}
+
+static void PrintResourceString(UINT uID)
+{
+ WCHAR buff[500];
+
+ if (LoadStringW(GetModuleHandle(NULL), uID, buff, ARRAYSIZE(buff)))
+ {
+ wprintf(L"%s", buff);
+ }
+}
+
+static BOOL IsDataUnicode(HGLOBAL hGlobal)
+{
+ BOOL bReturn;
+ LPVOID lpBuffer;
+
+ lpBuffer = GlobalLock(hGlobal);
+ bReturn = IsTextUnicode(lpBuffer, GlobalSize(hGlobal), NULL);
+ GlobalUnlock(hGlobal);
+
+ return bReturn;
+}
+
+int wmain(int argc, wchar_t** argv)
+{
+ HANDLE hInput;
+ DWORD dwBytesRead;
+ BOOL bStatus;
+ HGLOBAL hBuffer;
+ HGLOBAL hTemp;
+ LPBYTE lpBuffer;
+ SIZE_T dwSize = 0;
+
+ hInput = GetStdHandle(STD_INPUT_HANDLE);
+
+ /* Check for usage */
+ if (argc > 1 && wcsncmp(argv[1], L"/?", 2) == 0)
+ {
+ PrintResourceString(IDS_HELP);
+ return 0;
+ }
+
+ if (GetFileType(hInput) == FILE_TYPE_CHAR)
+ {
+ PrintResourceString(IDS_USAGE);
+ return 0;
+ }
+
+ /* Initialize a growable buffer for holding clipboard data */
+ hBuffer = GlobalAlloc(GMEM_MOVEABLE | GMEM_ZEROINIT, 4096);
+ if (!hBuffer)
+ {
+ PrintError();
+ return -1;
+ }
+
+ /*
+ * Read data from the input stream by chunks of 4096 bytes
+ * and resize the buffer each time when needed.
+ */
+ do
+ {
+ lpBuffer = GlobalLock(hBuffer);
+ if (!lpBuffer)
+ goto cleanup;
+
+ bStatus = ReadFile(hInput, lpBuffer + dwSize, 4096, &dwBytesRead, NULL);
+ dwSize += dwBytesRead;
+ GlobalUnlock(hBuffer);
+
+ hTemp = GlobalReAlloc(hBuffer, GlobalSize(hBuffer) + 4096, GMEM_ZEROINIT);
+ if (!hTemp)
+ goto cleanup;
+
+ hBuffer = hTemp;
+ }
+ while (dwBytesRead > 0 && bStatus);
+
+ /*
+ * Resize the buffer to the total size of data read.
+ * Note that, if the call fails, we still have the old buffer valid.
+ * The old buffer would be larger than the actual size of data it contains,
+ * but this is not a problem for us.
+ */
+ hTemp = GlobalReAlloc(hBuffer, dwSize + sizeof(WCHAR), GMEM_ZEROINIT);
+ if (hTemp)
+ hBuffer = hTemp;
+
+ /* Attempt to open the clipboard */
+ if (!OpenClipboard(NULL))
+ goto cleanup;
+
+ /* Empty it, copy our data, then close it */
+
+ EmptyClipboard();
+
+ if (IsDataUnicode(hBuffer))
+ {
+ SetClipboardData(CF_UNICODETEXT, hBuffer);
+ }
+ else
+ {
+ // TODO: Convert text from current console page to standard ANSI.
+ // Alternatively one can use CF_OEMTEXT as done here.
+ SetClipboardData(CF_OEMTEXT, hBuffer);
+ }
+
+ CloseClipboard();
+ return 0;
+
+cleanup:
+ GlobalFree(hBuffer);
+ PrintError();
+ return -1;
+}
Propchange: trunk/reactos/base/applications/cmdutils/clip/clip.c
------------------------------------------------------------------------------
svn:eol-style = native
Added: trunk/reactos/base/applications/cmdutils/clip/clip.rc
URL:
http://svn.reactos.org/svn/reactos/trunk/reactos/base/applications/cmdutils…
==============================================================================
--- trunk/reactos/base/applications/cmdutils/clip/clip.rc (added)
+++ trunk/reactos/base/applications/cmdutils/clip/clip.rc [iso-8859-1] Sun Nov 1 14:47:12
2015
@@ -0,0 +1,21 @@
+#include <windef.h>
+
+#include "resource.h"
+
+#define REACTOS_STR_FILE_DESCRIPTION "ReactOS Clip Command"
+#define REACTOS_STR_INTERNAL_NAME "clip"
+#define REACTOS_STR_ORIGINAL_FILENAME "clip.exe"
+#include <reactos/version.rc>
+
+/* UTF-8 */
+#pragma code_page(65001)
+
+#ifdef LANGUAGE_DE_DE
+ #include "lang/de-DE.rc"
+#endif
+#ifdef LANGUAGE_EN_US
+ #include "lang/en-US.rc"
+#endif
+#ifdef LANGUAGE_FR_FR
+ #include "lang/fr-FR.rc"
+#endif
Propchange: trunk/reactos/base/applications/cmdutils/clip/clip.rc
------------------------------------------------------------------------------
svn:eol-style = native
Propchange: trunk/reactos/base/applications/cmdutils/clip/lang/
------------------------------------------------------------------------------
--- bugtraq:logregex (added)
+++ bugtraq:logregex Sun Nov 1 14:47:12 2015
@@ -0,0 +1 @@
+((CORE|ROSTESTS|ROSAPPS)-\d+)(,? ?((CORE|ROSTESTS|ROSAPPS)-\d+))*(,? ?(and |or
)?((CORE|ROSTESTS|ROSAPPS)-\d+))?
Propchange: trunk/reactos/base/applications/cmdutils/clip/lang/
------------------------------------------------------------------------------
bugtraq:message = See issue %BUGID% for more details.
Propchange: trunk/reactos/base/applications/cmdutils/clip/lang/
------------------------------------------------------------------------------
bugtraq:url = https://jira.reactos.org/browse/%BUGID%
Propchange: trunk/reactos/base/applications/cmdutils/clip/lang/
------------------------------------------------------------------------------
tsvn:logminsize = 10
Added: trunk/reactos/base/applications/cmdutils/clip/lang/de-DE.rc
URL:
http://svn.reactos.org/svn/reactos/trunk/reactos/base/applications/cmdutils…
==============================================================================
--- trunk/reactos/base/applications/cmdutils/clip/lang/de-DE.rc (added)
+++ trunk/reactos/base/applications/cmdutils/clip/lang/de-DE.rc [iso-8859-1] Sun Nov 1
14:47:12 2015
@@ -0,0 +1,9 @@
+LANGUAGE LANG_GERMAN, SUBLANG_NEUTRAL
+
+STRINGTABLE
+BEGIN
+ IDS_USAGE "\nGeben Sie ""CLIP /?"" ein, um die Syntax
anzuzeigen.\n"
+ IDS_HELP "\nLeitet die Ausgabe von Befehlszeilenprogrammen in die Zwischenablage
um.\n\n\
+CLIP [/?]\n\n\
+ /? Zeigt diese Hilfe an.\n"
+END
Propchange: trunk/reactos/base/applications/cmdutils/clip/lang/de-DE.rc
------------------------------------------------------------------------------
svn:eol-style = native
Added: trunk/reactos/base/applications/cmdutils/clip/lang/en-US.rc
URL:
http://svn.reactos.org/svn/reactos/trunk/reactos/base/applications/cmdutils…
==============================================================================
--- trunk/reactos/base/applications/cmdutils/clip/lang/en-US.rc (added)
+++ trunk/reactos/base/applications/cmdutils/clip/lang/en-US.rc [iso-8859-1] Sun Nov 1
14:47:12 2015
@@ -0,0 +1,9 @@
+LANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US
+
+STRINGTABLE
+BEGIN
+ IDS_USAGE "\nType ""CLIP /?"" for usage
information.\n"
+ IDS_HELP "\nRedirects the output of command line programs to the
clipboard.\n\n\
+CLIP [/?]\n\n\
+ /? Show this help message.\n"
+END
Propchange: trunk/reactos/base/applications/cmdutils/clip/lang/en-US.rc
------------------------------------------------------------------------------
svn:eol-style = native
Added: trunk/reactos/base/applications/cmdutils/clip/lang/fr-FR.rc
URL:
http://svn.reactos.org/svn/reactos/trunk/reactos/base/applications/cmdutils…
==============================================================================
--- trunk/reactos/base/applications/cmdutils/clip/lang/fr-FR.rc (added)
+++ trunk/reactos/base/applications/cmdutils/clip/lang/fr-FR.rc [iso-8859-1] Sun Nov 1
14:47:12 2015
@@ -0,0 +1,9 @@
+LANGUAGE LANG_FRENCH, SUBLANG_NEUTRAL
+
+STRINGTABLE
+BEGIN
+ IDS_USAGE "\nEntrez ""CLIP /?"" pour afficher la
syntaxe.\n"
+ IDS_HELP "\nRedirige la sortie des programmes en ligne de commande vers le
Presse-Papiers.\n\n\
+CLIP [/?]\n\n\
+ /? Affiche ce message d'aide.\n"
+END
Propchange: trunk/reactos/base/applications/cmdutils/clip/lang/fr-FR.rc
------------------------------------------------------------------------------
svn:eol-style = native
Added: trunk/reactos/base/applications/cmdutils/clip/resource.h
URL:
http://svn.reactos.org/svn/reactos/trunk/reactos/base/applications/cmdutils…
==============================================================================
--- trunk/reactos/base/applications/cmdutils/clip/resource.h (added)
+++ trunk/reactos/base/applications/cmdutils/clip/resource.h [iso-8859-1] Sun Nov 1
14:47:12 2015
@@ -0,0 +1,4 @@
+#pragma once
+
+#define IDS_USAGE 100
+#define IDS_HELP 101
Propchange: trunk/reactos/base/applications/cmdutils/clip/resource.h
------------------------------------------------------------------------------
svn:eol-style = native
3342
days inactive
3342
days old
0 comments
1 participants
participants (1)
-
hbelusca＠svn.reactos.org